contrib/tcpdump/print-igmp.c

   1 /*
   2  * Copyright (c) 1988, 1989, 1990, 1991, 1993, 1994, 1995, 1996
   3  *  The Regents of the University of California.  All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that: (1) source code distributions
   7  * retain the above copyright notice and this paragraph in its entirety, (2)
   8  * distributions including binary code include the above copyright notice and
   9  * this paragraph in its entirety in the documentation or other materials
  10  * provided with the distribution, and (3) all advertising materials mentioning
  11  * features or use of this software display the following acknowledgement:
  12  * ``This product includes software developed by the University of California,
  13  * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
  14  * the University nor the names of its contributors may be used to endorse
  15  * or promote products derived from this software without specific prior
  16  * written permission.
  17  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
  18  * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
  19  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  20  */
  21
  22 #ifndef lint
  23 static const char rcsid[] =
  24     "@(#) $Header: /tcpdump/master/tcpdump/print-igmp.c,v 1.5 2001/09/17 21:58:02 fenner Exp $ (LBL)";
  25 #endif
  26
  27 #ifdef HAVE_CONFIG_H
  28 #include "config.h"
  29 #endif
  30
  31 #include <sys/param.h>
  32 #include <sys/socket.h>
  33
  34 #include <netinet/in.h>
  35 #include <netinet/in_systm.h>
  36 #include <netinet/ip.h>
  37
  38 #include <stdio.h>
  39 #include <string.h>
  40
  41 #include "interface.h"
  42 #include "addrtoname.h"
  43 #include "extract.h"            /* must come after interface.h */
  44
  45 #ifndef IN_CLASSD
  46 #define IN_CLASSD(i) (((int32_t)(i) & 0xf0000000) == 0xe0000000)
  47 #endif
  48
  49 /* (following from ipmulti/mrouted/prune.h) */
  50
  51 /*
  52  * The packet format for a traceroute request.
  53  */
  54 struct tr_query {
  55     u_int  tr_src;          /* traceroute source */
  56     u_int  tr_dst;          /* traceroute destination */
  57     u_int  tr_raddr;        /* traceroute response address */
  58     u_int  tr_rttlqid;      /* response ttl and qid */
  59 };
  60
  61 #define TR_GETTTL(x)        (int)(((x) >> 24) & 0xff)
  62 #define TR_GETQID(x)        ((x) & 0x00ffffff)
  63
  64 /*
  65  * Traceroute response format.  A traceroute response has a tr_query at the
  66  * beginning, followed by one tr_resp for each hop taken.
  67  */
  68 struct tr_resp {
  69     u_int tr_qarr;          /* query arrival time */
  70     u_int tr_inaddr;        /* incoming interface address */
  71     u_int tr_outaddr;       /* outgoing interface address */
  72     u_int tr_rmtaddr;       /* parent address in source tree */
  73     u_int tr_vifin;         /* input packet count on interface */
  74     u_int tr_vifout;        /* output packet count on interface */
  75     u_int tr_pktcnt;        /* total incoming packets for src-grp */
  76     u_char  tr_rproto;      /* routing proto deployed on router */
  77     u_char  tr_fttl;        /* ttl required to forward on outvif */
  78     u_char  tr_smask;       /* subnet mask for src addr */
  79     u_char  tr_rflags;      /* forwarding error codes */
  80 };
  81
  82 /* defs within mtrace */
  83 #define TR_QUERY 1
  84 #define TR_RESP 2
  85
  86 /* fields for tr_rflags (forwarding error codes) */
  87 #define TR_NO_ERR   0
  88 #define TR_WRONG_IF 1
  89 #define TR_PRUNED   2
  90 #define TR_OPRUNED  3
  91 #define TR_SCOPED   4
  92 #define TR_NO_RTE   5
  93 #define TR_NO_FWD   7
  94 #define TR_NO_SPACE 0x81
  95 #define TR_OLD_ROUTER   0x82
  96
  97 /* fields for tr_rproto (routing protocol) */
  98 #define TR_PROTO_DVMRP  1
  99 #define TR_PROTO_MOSPF  2
 100 #define TR_PROTO_PIM    3
 101 #define TR_PROTO_CBT    4
 102
 103 /* igmpv3 report types */
 104 static struct tok igmpv3report2str[] = {
 105         { 1,    "is_in" },
 106         { 2,    "is_ex" },
 107         { 3,    "to_in" },
 108         { 4,    "to_ex" },
 109         { 5,    "allow" },
 110         { 6,    "block" },
 111         { 0,    NULL }
 112 };
 113
 114 static void
 115 print_mtrace(register const u_char *bp, register u_int len)
 116 {
 117     register const struct tr_query *tr = (const struct tr_query *)(bp + 8);
 118
 119     printf("mtrace %lu: %s to %s reply-to %s",
 120         (u_long)TR_GETQID(ntohl(tr->tr_rttlqid)),
 121         ipaddr_string(&tr->tr_src), ipaddr_string(&tr->tr_dst),
 122         ipaddr_string(&tr->tr_raddr));
 123     if (IN_CLASSD(ntohl(tr->tr_raddr)))
 124         printf(" with-ttl %d", TR_GETTTL(ntohl(tr->tr_rttlqid)));
 125 }
 126
 127 static void
 128 print_mresp(register const u_char *bp, register u_int len)
 129 {
 130     register const struct tr_query *tr = (const struct tr_query *)(bp + 8);
 131
 132     printf("mresp %lu: %s to %s reply-to %s",
 133         (u_long)TR_GETQID(ntohl(tr->tr_rttlqid)),
 134         ipaddr_string(&tr->tr_src), ipaddr_string(&tr->tr_dst),
 135         ipaddr_string(&tr->tr_raddr));
 136     if (IN_CLASSD(ntohl(tr->tr_raddr)))
 137         printf(" with-ttl %d", TR_GETTTL(ntohl(tr->tr_rttlqid)));
 138 }
 139
 140 static void
 141 print_igmpv3_report(register const u_char *bp, register u_int len)
 142 {
 143     u_int group, nsrcs, ngroups;
 144     register u_int i, j;
 145
 146     /* Minimum len is 16, and should be a multiple of 4 */
 147     if (len < 16 || len & 0x03) {
 148         (void)printf(" [invalid len %d]", len);
 149         return;
 150     }
 151     TCHECK2(bp[6], 2);
 152     ngroups = EXTRACT_16BITS(&bp[6]);
 153     (void)printf(", %d group record(s)", ngroups);
 154     if (vflag > 0) {
 155         /* Print the group records */
 156         group = 8;
 157         for (i=0; i<ngroups; i++) {
 158             if (len < group+8) {
 159                 (void)printf(" [invalid number of groups]");
 160                 return;
 161             }
 162             TCHECK2(bp[group+4], 4);
 163             (void)printf(" [gaddr %s", ipaddr_string(&bp[group+4]));
 164             (void)printf(" %s", tok2str(igmpv3report2str, " [v3-report-#%d]",
 165                                                                 bp[group]));
 166             nsrcs = EXTRACT_16BITS(&bp[group+2]);
 167             /* Check the number of sources and print them */
 168             if (len < group+8+(nsrcs<<2)) {
 169                 (void)printf(" [invalid number of sources %d]", nsrcs);
 170                 return;
 171             }
 172             if (vflag == 1)
 173                 (void)printf(", %d source(s)", nsrcs);
 174             else {
 175                 /* Print the sources */
 176                 (void)printf(" {");
 177                 for (j=0; j<nsrcs; j++) {
 178                     TCHECK2(bp[group+8+(j<<2)], 4);
 179                     (void)printf(" %s", ipaddr_string(&bp[group+8+(j<<2)]));
 180                 }
 181                 (void)printf(" }");
 182             }
 183             /* Next group record */
 184             group += 8 + (nsrcs << 2);
 185             (void)printf("]");
 186         }
 187     }
 188     return;
 189 trunc:
 190     (void)printf("[|igmp]");
 191     return;
 192 }
 193
 194 static void
 195 print_igmpv3_query(register const u_char *bp, register u_int len)
 196 {
 197     u_int mrc;
 198     int mrt;
 199     u_int nsrcs;
 200     register u_int i;
 201
 202     (void)printf(" v3");
 203     /* Minimum len is 12, and should be a multiple of 4 */
 204     if (len < 12 || len & 0x03) {
 205         (void)printf(" [invalid len %d]", len);
 206         return;
 207     }
 208     mrc = bp[1];
 209     if (mrc < 128) {
 210         mrt = mrc;
 211     } else {
 212         mrt = ((mrc & 0x0f) | 0x10) << (((mrc & 0x70) >> 4) + 3);
 213     }
 214     if (mrc != 100) {
 215         (void)printf(" [max resp time ");
 216         relts_print(mrt);
 217         (void)printf("]");
 218     }
 219     TCHECK2(bp[4], 4);
 220     if (EXTRACT_32BITS(&bp[4]) == 0)
 221         return;
 222     (void)printf(" [gaddr %s", ipaddr_string(&bp[4]));
 223     TCHECK2(bp[10], 2);
 224     nsrcs = EXTRACT_16BITS(&bp[10]);
 225     if (nsrcs > 0) {
 226         if (len < 12 + (nsrcs << 2))
 227             (void)printf(" [invalid number of sources]");
 228         else if (vflag > 1) {
 229             (void)printf(" {");
 230             for (i=0; i<nsrcs; i++) {
 231                 TCHECK2(bp[12+(i<<2)], 4);
 232                 (void)printf(" %s", ipaddr_string(&bp[12+(i<<2)]));
 233             }
 234             (void)printf(" }");
 235         } else
 236             (void)printf(", %d source(s)", nsrcs);
 237     }
 238     (void)printf("]");
 239     return;
 240 trunc:
 241     (void)printf("[|igmp]");
 242     return;
 243 }
 244
 245 void
 246 igmp_print(register const u_char *bp, register u_int len)
 247 {
 248     if (qflag) {
 249         (void)printf("igmp");
 250         return;
 251     }
 252
 253     TCHECK2(bp[0], 8);
 254     switch (bp[0]) {
 255     case 0x11:
 256         (void)printf("igmp query");
 257         if (len >= 12)
 258             print_igmpv3_query(bp, len);
 259         else {
 260             if (bp[1]) {
 261                 (void)printf(" v2");
 262                 if (bp[1] != 100)
 263                     (void)printf(" [max resp time %d]", bp[1]);
 264             } else
 265                 (void)printf(" v1");
 266             if (EXTRACT_32BITS(&bp[4]))
 267                 (void)printf(" [gaddr %s]", ipaddr_string(&bp[4]));
 268             if (len != 8)
 269                 (void)printf(" [len %d]", len);
 270         }
 271         break;
 272     case 0x12:
 273         (void)printf("igmp v1 report %s", ipaddr_string(&bp[4]));
 274         if (len != 8)
 275             (void)printf(" [len %d]", len);
 276         break;
 277     case 0x16:
 278         (void)printf("igmp v2 report %s", ipaddr_string(&bp[4]));
 279         break;
 280     case 0x22:
 281         (void)printf("igmp v3 report");
 282         print_igmpv3_report(bp, len);
 283         break;
 284     case 0x17:
 285         (void)printf("igmp leave %s", ipaddr_string(&bp[4]));
 286         break;
 287     case 0x13:
 288         (void)printf("igmp dvmrp");
 289         if (len < 8)
 290             (void)printf(" [len %d]", len);
 291         else
 292             dvmrp_print(bp, len);
 293         break;
 294     case 0x14:
 295         (void)printf("igmp pimv1");
 296         pimv1_print(bp, len);
 297         break;
 298     case 0x1e:
 299         print_mresp(bp, len);
 300         break;
 301     case 0x1f:
 302         print_mtrace(bp, len);
 303         break;
 304     default:
 305         (void)printf("igmp-%d", bp[0]);
 306         break;
 307     }
 308
 309     if (vflag && TTEST2(bp[0], len)) {
 310         /* Check the IGMP checksum */
 311         if (in_cksum((const u_short*)bp, len, 0))
 312             printf(" bad igmp cksum %x!", EXTRACT_16BITS(&bp[2]));
 313     }
 314     return;
 315 trunc:
 316     fputs("[|igmp]", stdout);
 317 }