contrib/tcpdump/print-ip6opts.c

   1 /*
   2  * Copyright (C) 1998 WIDE Project.
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. Neither the name of the project nor the names of its contributors
  14  *    may be used to endorse or promote products derived from this software
  15  *    without specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
  18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
  21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  27  * SUCH DAMAGE.
  28  */
  29
  30 #ifdef HAVE_CONFIG_H
  31 #include "config.h"
  32 #endif
  33
  34 #ifndef lint
  35 static const char rcsid[] =
  36      "@(#) $Header: /tcpdump/master/tcpdump/print-ip6opts.c,v 1.9 2001/05/09 02:47:26 itojun Exp $";
  37 #endif
  38
  39 #ifdef INET6
  40 #include <sys/param.h>
  41 #include <sys/time.h>
  42 #include <sys/types.h>
  43 #include <sys/socket.h>
  44
  45 #include <netinet/in.h>
  46 #include <stdio.h>
  47
  48 #include "ip6.h"
  49
  50 #include "interface.h"
  51 #include "addrtoname.h"
  52
  53 /* items outside of rfc2292bis */
  54 #ifndef IP6OPT_MINLEN
  55 #define IP6OPT_MINLEN   2
  56 #endif
  57 #ifndef IP6OPT_RTALERT_LEN
  58 #define IP6OPT_RTALERT_LEN      4
  59 #endif
  60 #ifndef IP6OPT_JUMBO_LEN
  61 #define IP6OPT_JUMBO_LEN        6
  62 #endif
  63 #define IP6OPT_HOMEADDR_MINLEN 18
  64 #define IP6OPT_BU_MINLEN       10
  65 #define IP6OPT_BA_MINLEN       13
  66 #define IP6OPT_BR_MINLEN        2
  67 #define IP6SOPT_ALTCOA        0x4
  68 #define IP6SOPT_ALTCOA_MINLEN  18
  69 #define IP6SOPT_UI            0x2
  70 #define IP6SOPT_UI_MINLEN       4
  71
  72 static void ip6_sopt_print(const u_char *, int);
  73
  74 static void
  75 ip6_sopt_print(const u_char *bp, int len)
  76 {
  77     int i;
  78     int optlen;
  79
  80     for (i = 0; i < len; i += optlen) {
  81         if (bp[i] == IP6OPT_PAD1)
  82             optlen = 1;
  83         else {
  84             if (i + 1 < len)
  85                 optlen = bp[i + 1] + 2;
  86             else
  87                 goto trunc;
  88         }
  89         if (i + optlen > len)
  90             goto trunc;
  91
  92         switch (bp[i]) {
  93         case IP6OPT_PAD1:
  94             printf(", pad1");
  95             break;
  96         case IP6OPT_PADN:
  97             if (len - i < IP6OPT_MINLEN) {
  98                 printf(", padn: trunc");
  99                 goto trunc;
 100             }
 101             printf(", padn");
 102             break;
 103         case IP6SOPT_ALTCOA:
 104              if (len - i < IP6SOPT_ALTCOA_MINLEN) {
 105                 printf(", altcoa: trunc");
 106                 goto trunc;
 107             }
 108             printf(", alt-CoA: %s", ip6addr_string(&bp[i+2]));
 109             break;
 110         case IP6SOPT_UI:
 111              if (len - i < IP6SOPT_UI_MINLEN) {
 112                 printf(", ui: trunc");
 113                 goto trunc;
 114             }
 115             printf("(ui: 0x%04x) ", ntohs(*(u_int16_t *)&bp[i + 2]));
 116             break;
 117         default:
 118             if (len - i < IP6OPT_MINLEN) {
 119                 printf(", sopt_type %d: trunc)", bp[i]);
 120                 goto trunc;
 121             }
 122             printf(", sopt_type 0x%02x: len=%d", bp[i], bp[i + 1]);
 123             break;
 124         }
 125     }
 126     return;
 127
 128 trunc:
 129     printf("[trunc] ");
 130 }
 131
 132 void
 133 ip6_opt_print(const u_char *bp, int len)
 134 {
 135     int i;
 136     int optlen;
 137
 138     for (i = 0; i < len; i += optlen) {
 139         if (bp[i] == IP6OPT_PAD1)
 140             optlen = 1;
 141         else {
 142             if (i + 1 < len)
 143                 optlen = bp[i + 1] + 2;
 144             else
 145                 goto trunc;
 146         }
 147         if (i + optlen > len)
 148             goto trunc;
 149
 150         switch (bp[i]) {
 151         case IP6OPT_PAD1:
 152             printf("(pad1)");
 153             break;
 154         case IP6OPT_PADN:
 155             if (len - i < IP6OPT_MINLEN) {
 156                 printf("(padn: trunc)");
 157                 goto trunc;
 158             }
 159             printf("(padn)");
 160             break;
 161         case IP6OPT_ROUTER_ALERT:
 162             if (len - i < IP6OPT_RTALERT_LEN) {
 163                 printf("(rtalert: trunc)");
 164                 goto trunc;
 165             }
 166             if (bp[i + 1] != IP6OPT_RTALERT_LEN - 2) {
 167                 printf("(rtalert: invalid len %d)", bp[i + 1]);
 168                 goto trunc;
 169             }
 170             printf("(rtalert: 0x%04x) ", ntohs(*(u_int16_t *)&bp[i + 2]));
 171             break;
 172         case IP6OPT_JUMBO:
 173             if (len - i < IP6OPT_JUMBO_LEN) {
 174                 printf("(jumbo: trunc)");
 175                 goto trunc;
 176             }
 177             if (bp[i + 1] != IP6OPT_JUMBO_LEN - 2) {
 178                 printf("(jumbo: invalid len %d)", bp[i + 1]);
 179                 goto trunc;
 180             }
 181             printf("(jumbo: %u) ", (u_int32_t)ntohl(*(u_int32_t *)&bp[i + 2]));
 182             break;
 183         case IP6OPT_HOME_ADDRESS:
 184             if (len - i < IP6OPT_HOMEADDR_MINLEN) {
 185                 printf("(homeaddr: trunc)");
 186                 goto trunc;
 187             }
 188             if (bp[i + 1] < IP6OPT_HOMEADDR_MINLEN - 2) {
 189                 printf("(homeaddr: invalid len %d)", bp[i + 1]);
 190                 goto trunc;
 191             }
 192             printf("(homeaddr: %s", ip6addr_string(&bp[i + 2]));
 193             if (bp[i + 1] > IP6OPT_HOMEADDR_MINLEN - 2) {
 194                 ip6_sopt_print(&bp[i + IP6OPT_HOMEADDR_MINLEN],
 195                     (optlen - IP6OPT_HOMEADDR_MINLEN));
 196             }
 197             printf(")");
 198             break;
 199         case IP6OPT_BINDING_UPDATE:
 200             if (len - i < IP6OPT_BU_MINLEN) {
 201                 printf("(bu: trunc)");
 202                 goto trunc;
 203             }
 204             if (bp[i + 1] < IP6OPT_BU_MINLEN - 2) {
 205                 printf("(bu: invalid len %d)", bp[i + 1]);
 206                 goto trunc;
 207             }
 208             printf("(bu: ");
 209             if (bp[i + 2] & 0x80)
 210                     printf("A");
 211             if (bp[i + 2] & 0x40)
 212                     printf("H");
 213             if (bp[i + 2] & 0x20)
 214                     printf("R");
 215             if (bp[i + 2] & 0x10)
 216                     printf("D");
 217             if (bp[i + 2] & 0x0f)
 218                     printf("res");
 219             printf(", prefixlen: %u", bp[i + 3]);
 220             printf(", sequence: %u",
 221                 (u_int16_t)ntohs(*(u_int16_t *)&bp[i + 4]));
 222             printf(", lifetime: %u",
 223                 (u_int32_t)ntohs(*(u_int32_t *)&bp[i + 8]));
 224
 225             if (bp[i + 1] > IP6OPT_BU_MINLEN - 2) {
 226                 ip6_sopt_print(&bp[i + IP6OPT_BU_MINLEN],
 227                     (optlen - IP6OPT_BU_MINLEN));
 228             }
 229             printf(")");
 230             break;
 231         case IP6OPT_BINDING_ACK:
 232             if (len - i < IP6OPT_BA_MINLEN) {
 233                 printf("(ba: trunc)");
 234                 goto trunc;
 235             }
 236             if (bp[i + 1] < IP6OPT_BA_MINLEN - 2) {
 237                 printf("(ba: invalid len %d)", bp[i + 1]);
 238                 goto trunc;
 239             }
 240             printf("(ba: ");
 241             printf("status: %u", bp[i + 2]);
 242             printf(", sequence: %u",
 243                 (u_int16_t)ntohs(*(u_int16_t *)&bp[i + 3]));
 244             printf(", lifetime: %u",
 245                 (u_int32_t)ntohs(*(u_int32_t *)&bp[i + 7]));
 246             printf(", refresh: %u",
 247                 (u_int32_t)ntohs(*(u_int32_t *)&bp[i + 11]));
 248
 249             if (bp[i + 1] > IP6OPT_BA_MINLEN - 2) {
 250                 ip6_sopt_print(&bp[i + IP6OPT_BA_MINLEN],
 251                     (optlen - IP6OPT_BA_MINLEN));
 252             }
 253             printf(")");
 254             break;
 255         case IP6OPT_BINDING_REQ:
 256             if (len - i < IP6OPT_BR_MINLEN) {
 257                 printf("(br: trunc)");
 258                 goto trunc;
 259             }
 260             printf("(br");
 261             if (bp[i + 1] > IP6OPT_BR_MINLEN - 2) {
 262                 ip6_sopt_print(&bp[i + IP6OPT_BR_MINLEN],
 263                     (optlen - IP6OPT_BR_MINLEN));
 264             }
 265             printf(")");
 266             break;
 267         default:
 268             if (len - i < IP6OPT_MINLEN) {
 269                 printf("(type %d: trunc)", bp[i]);
 270                 goto trunc;
 271             }
 272             printf("(opt_type 0x%02x: len=%d) ", bp[i], bp[i + 1]);
 273             break;
 274         }
 275     }
 276
 277 #if 0
 278 end:
 279 #endif
 280     return;
 281
 282 trunc:
 283     printf("[trunc] ");
 284 }
 285
 286 int
 287 hbhopt_print(register const u_char *bp)
 288 {
 289     const struct ip6_hbh *dp = (struct ip6_hbh *)bp;
 290     register const u_char *ep;
 291     int hbhlen = 0;
 292
 293     /* 'ep' points to the end of available data. */
 294     ep = snapend;
 295     TCHECK(dp->ip6h_len);
 296     hbhlen = (int)((dp->ip6h_len + 1) << 3);
 297     TCHECK2(*dp, hbhlen);
 298     printf("HBH ");
 299     if (vflag)
 300         ip6_opt_print((const u_char *)dp + sizeof(*dp), hbhlen - sizeof(*dp));
 301
 302     return(hbhlen);
 303
 304   trunc:
 305     fputs("[|HBH]", stdout);
 306     return(hbhlen);
 307 }
 308
 309 int
 310 dstopt_print(register const u_char *bp)
 311 {
 312     const struct ip6_dest *dp = (struct ip6_dest *)bp;
 313     register const u_char *ep;
 314     int dstoptlen = 0;
 315
 316     /* 'ep' points to the end of available data. */
 317     ep = snapend;
 318     TCHECK(dp->ip6d_len);
 319     dstoptlen = (int)((dp->ip6d_len + 1) << 3);
 320     TCHECK2(*dp, dstoptlen);
 321     printf("DSTOPT ");
 322     if (vflag) {
 323         ip6_opt_print((const u_char *)dp + sizeof(*dp),
 324             dstoptlen - sizeof(*dp));
 325     }
 326
 327     return(dstoptlen);
 328
 329   trunc:
 330     fputs("[|DSTOPT]", stdout);
 331     return(dstoptlen);
 332 }
 333 #endif /* INET6 */