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