xref: /freebsd/contrib/tcpdump/print-igmp.c (revision b52b9d56d4e96089873a75f9e29062eec19fabba)
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 }
318