Home | History | Annotate | Download | only in tcpdump
      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[] _U_ =
     24     "@(#) $Header: /tcpdump/master/tcpdump/print-igmp.c,v 1.15 2004-03-24 00:59:16 guy Exp $ (LBL)";
     25 #endif
     26 
     27 #ifdef HAVE_CONFIG_H
     28 #include "config.h"
     29 #endif
     30 
     31 #include <tcpdump-stdinc.h>
     32 
     33 #include <stdio.h>
     34 #include <string.h>
     35 
     36 #include "interface.h"
     37 #include "addrtoname.h"
     38 #include "extract.h"            /* must come after interface.h */
     39 
     40 #ifndef IN_CLASSD
     41 #define IN_CLASSD(i) (((int32_t)(i) & 0xf0000000) == 0xe0000000)
     42 #endif
     43 
     44 /* (following from ipmulti/mrouted/prune.h) */
     45 
     46 /*
     47  * The packet format for a traceroute request.
     48  */
     49 struct tr_query {
     50     u_int32_t  tr_src;          /* traceroute source */
     51     u_int32_t  tr_dst;          /* traceroute destination */
     52     u_int32_t  tr_raddr;        /* traceroute response address */
     53     u_int32_t  tr_rttlqid;      /* response ttl and qid */
     54 };
     55 
     56 #define TR_GETTTL(x)        (int)(((x) >> 24) & 0xff)
     57 #define TR_GETQID(x)        ((x) & 0x00ffffff)
     58 
     59 /*
     60  * Traceroute response format.  A traceroute response has a tr_query at the
     61  * beginning, followed by one tr_resp for each hop taken.
     62  */
     63 struct tr_resp {
     64     u_int32_t tr_qarr;          /* query arrival time */
     65     u_int32_t tr_inaddr;        /* incoming interface address */
     66     u_int32_t tr_outaddr;       /* outgoing interface address */
     67     u_int32_t tr_rmtaddr;       /* parent address in source tree */
     68     u_int32_t tr_vifin;         /* input packet count on interface */
     69     u_int32_t tr_vifout;        /* output packet count on interface */
     70     u_int32_t tr_pktcnt;        /* total incoming packets for src-grp */
     71     u_int8_t  tr_rproto;      /* routing proto deployed on router */
     72     u_int8_t  tr_fttl;        /* ttl required to forward on outvif */
     73     u_int8_t  tr_smask;       /* subnet mask for src addr */
     74     u_int8_t  tr_rflags;      /* forwarding error codes */
     75 };
     76 
     77 /* defs within mtrace */
     78 #define TR_QUERY 1
     79 #define TR_RESP 2
     80 
     81 /* fields for tr_rflags (forwarding error codes) */
     82 #define TR_NO_ERR   0
     83 #define TR_WRONG_IF 1
     84 #define TR_PRUNED   2
     85 #define TR_OPRUNED  3
     86 #define TR_SCOPED   4
     87 #define TR_NO_RTE   5
     88 #define TR_NO_FWD   7
     89 #define TR_NO_SPACE 0x81
     90 #define TR_OLD_ROUTER   0x82
     91 
     92 /* fields for tr_rproto (routing protocol) */
     93 #define TR_PROTO_DVMRP  1
     94 #define TR_PROTO_MOSPF  2
     95 #define TR_PROTO_PIM    3
     96 #define TR_PROTO_CBT    4
     97 
     98 /* igmpv3 report types */
     99 static const struct tok igmpv3report2str[] = {
    100 	{ 1,	"is_in" },
    101 	{ 2,	"is_ex" },
    102 	{ 3,	"to_in" },
    103 	{ 4,	"to_ex" },
    104 	{ 5,	"allow" },
    105 	{ 6,	"block" },
    106 	{ 0,	NULL }
    107 };
    108 
    109 static void
    110 print_mtrace(register const u_char *bp, register u_int len)
    111 {
    112     register const struct tr_query *tr = (const struct tr_query *)(bp + 8);
    113 
    114     TCHECK(*tr);
    115     if (len < 8 + sizeof (struct tr_query)) {
    116 	(void)printf(" [invalid len %d]", len);
    117 	return;
    118     }
    119     printf("mtrace %u: %s to %s reply-to %s",
    120         TR_GETQID(EXTRACT_32BITS(&tr->tr_rttlqid)),
    121         ipaddr_string(&tr->tr_src), ipaddr_string(&tr->tr_dst),
    122         ipaddr_string(&tr->tr_raddr));
    123     if (IN_CLASSD(EXTRACT_32BITS(&tr->tr_raddr)))
    124         printf(" with-ttl %d", TR_GETTTL(EXTRACT_32BITS(&tr->tr_rttlqid)));
    125     return;
    126 trunc:
    127     (void)printf("[|igmp]");
    128     return;
    129 }
    130 
    131 static void
    132 print_mresp(register const u_char *bp, register u_int len)
    133 {
    134     register const struct tr_query *tr = (const struct tr_query *)(bp + 8);
    135 
    136     TCHECK(*tr);
    137     if (len < 8 + sizeof (struct tr_query)) {
    138 	(void)printf(" [invalid len %d]", len);
    139 	return;
    140     }
    141     printf("mresp %lu: %s to %s reply-to %s",
    142         (u_long)TR_GETQID(EXTRACT_32BITS(&tr->tr_rttlqid)),
    143         ipaddr_string(&tr->tr_src), ipaddr_string(&tr->tr_dst),
    144         ipaddr_string(&tr->tr_raddr));
    145     if (IN_CLASSD(EXTRACT_32BITS(&tr->tr_raddr)))
    146         printf(" with-ttl %d", TR_GETTTL(EXTRACT_32BITS(&tr->tr_rttlqid)));
    147     return;
    148 trunc:
    149     (void)printf("[|igmp]");
    150     return;
    151 }
    152 
    153 static void
    154 print_igmpv3_report(register const u_char *bp, register u_int len)
    155 {
    156     u_int group, nsrcs, ngroups;
    157     register u_int i, j;
    158 
    159     /* Minimum len is 16, and should be a multiple of 4 */
    160     if (len < 16 || len & 0x03) {
    161 	(void)printf(" [invalid len %d]", len);
    162 	return;
    163     }
    164     TCHECK2(bp[6], 2);
    165     ngroups = EXTRACT_16BITS(&bp[6]);
    166     (void)printf(", %d group record(s)", ngroups);
    167     if (vflag > 0) {
    168 	/* Print the group records */
    169 	group = 8;
    170         for (i=0; i<ngroups; i++) {
    171 	    if (len < group+8) {
    172 		(void)printf(" [invalid number of groups]");
    173 		return;
    174 	    }
    175 	    TCHECK2(bp[group+4], 4);
    176             (void)printf(" [gaddr %s", ipaddr_string(&bp[group+4]));
    177 	    (void)printf(" %s", tok2str(igmpv3report2str, " [v3-report-#%d]",
    178 								bp[group]));
    179             nsrcs = EXTRACT_16BITS(&bp[group+2]);
    180 	    /* Check the number of sources and print them */
    181 	    if (len < group+8+(nsrcs<<2)) {
    182 		(void)printf(" [invalid number of sources %d]", nsrcs);
    183 		return;
    184 	    }
    185             if (vflag == 1)
    186                 (void)printf(", %d source(s)", nsrcs);
    187             else {
    188 		/* Print the sources */
    189                 (void)printf(" {");
    190                 for (j=0; j<nsrcs; j++) {
    191 		    TCHECK2(bp[group+8+(j<<2)], 4);
    192 		    (void)printf(" %s", ipaddr_string(&bp[group+8+(j<<2)]));
    193 		}
    194                 (void)printf(" }");
    195             }
    196 	    /* Next group record */
    197             group += 8 + (nsrcs << 2);
    198 	    (void)printf("]");
    199         }
    200     }
    201     return;
    202 trunc:
    203     (void)printf("[|igmp]");
    204     return;
    205 }
    206 
    207 static void
    208 print_igmpv3_query(register const u_char *bp, register u_int len)
    209 {
    210     u_int mrc;
    211     int mrt;
    212     u_int nsrcs;
    213     register u_int i;
    214 
    215     (void)printf(" v3");
    216     /* Minimum len is 12, and should be a multiple of 4 */
    217     if (len < 12 || len & 0x03) {
    218 	(void)printf(" [invalid len %d]", len);
    219 	return;
    220     }
    221     TCHECK(bp[1]);
    222     mrc = bp[1];
    223     if (mrc < 128) {
    224 	mrt = mrc;
    225     } else {
    226         mrt = ((mrc & 0x0f) | 0x10) << (((mrc & 0x70) >> 4) + 3);
    227     }
    228     if (mrc != 100) {
    229 	(void)printf(" [max resp time ");
    230         if (mrt < 600) {
    231             (void)printf("%.1fs", mrt * 0.1);
    232         } else {
    233             relts_print(mrt / 10);
    234         }
    235 	(void)printf("]");
    236     }
    237     TCHECK2(bp[4], 4);
    238     if (EXTRACT_32BITS(&bp[4]) == 0)
    239 	return;
    240     (void)printf(" [gaddr %s", ipaddr_string(&bp[4]));
    241     TCHECK2(bp[10], 2);
    242     nsrcs = EXTRACT_16BITS(&bp[10]);
    243     if (nsrcs > 0) {
    244 	if (len < 12 + (nsrcs << 2))
    245 	    (void)printf(" [invalid number of sources]");
    246 	else if (vflag > 1) {
    247 	    (void)printf(" {");
    248 	    for (i=0; i<nsrcs; i++) {
    249 		TCHECK2(bp[12+(i<<2)], 4);
    250 		(void)printf(" %s", ipaddr_string(&bp[12+(i<<2)]));
    251 	    }
    252 	    (void)printf(" }");
    253 	} else
    254 	    (void)printf(", %d source(s)", nsrcs);
    255     }
    256     (void)printf("]");
    257     return;
    258 trunc:
    259     (void)printf("[|igmp]");
    260     return;
    261 }
    262 
    263 void
    264 igmp_print(register const u_char *bp, register u_int len)
    265 {
    266     struct cksum_vec vec[1];
    267 
    268     if (qflag) {
    269         (void)printf("igmp");
    270         return;
    271     }
    272 
    273     TCHECK(bp[0]);
    274     switch (bp[0]) {
    275     case 0x11:
    276         (void)printf("igmp query");
    277 	if (len >= 12)
    278 	    print_igmpv3_query(bp, len);
    279 	else {
    280             TCHECK(bp[1]);
    281 	    if (bp[1]) {
    282 		(void)printf(" v2");
    283 		if (bp[1] != 100)
    284 		    (void)printf(" [max resp time %d]", bp[1]);
    285 	    } else
    286 		(void)printf(" v1");
    287             TCHECK2(bp[4], 4);
    288 	    if (EXTRACT_32BITS(&bp[4]))
    289                 (void)printf(" [gaddr %s]", ipaddr_string(&bp[4]));
    290             if (len != 8)
    291                 (void)printf(" [len %d]", len);
    292 	}
    293         break;
    294     case 0x12:
    295         TCHECK2(bp[4], 4);
    296         (void)printf("igmp v1 report %s", ipaddr_string(&bp[4]));
    297         if (len != 8)
    298             (void)printf(" [len %d]", len);
    299         break;
    300     case 0x16:
    301         TCHECK2(bp[4], 4);
    302         (void)printf("igmp v2 report %s", ipaddr_string(&bp[4]));
    303         break;
    304     case 0x22:
    305         (void)printf("igmp v3 report");
    306 	print_igmpv3_report(bp, len);
    307         break;
    308     case 0x17:
    309         TCHECK2(bp[4], 4);
    310         (void)printf("igmp leave %s", ipaddr_string(&bp[4]));
    311         break;
    312     case 0x13:
    313         (void)printf("igmp dvmrp");
    314         if (len < 8)
    315             (void)printf(" [len %d]", len);
    316         else
    317             dvmrp_print(bp, len);
    318         break;
    319     case 0x14:
    320         (void)printf("igmp pimv1");
    321         pimv1_print(bp, len);
    322         break;
    323     case 0x1e:
    324         print_mresp(bp, len);
    325         break;
    326     case 0x1f:
    327         print_mtrace(bp, len);
    328         break;
    329     default:
    330         (void)printf("igmp-%d", bp[0]);
    331         break;
    332     }
    333 
    334     if (vflag && TTEST2(bp[0], len)) {
    335         /* Check the IGMP checksum */
    336         vec[0].ptr = bp;
    337         vec[0].len = len;
    338         if (in_cksum(vec, 1))
    339             printf(" bad igmp cksum %x!", EXTRACT_16BITS(&bp[2]));
    340     }
    341     return;
    342 trunc:
    343     fputs("[|igmp]", stdout);
    344 }
    345