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
23static 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 */
49struct 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 */
63struct 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 */
99static 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
109static void
110print_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;
126trunc:
127    (void)printf("[|igmp]");
128    return;
129}
130
131static void
132print_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;
148trunc:
149    (void)printf("[|igmp]");
150    return;
151}
152
153static void
154print_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;
202trunc:
203    (void)printf("[|igmp]");
204    return;
205}
206
207static void
208print_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;
258trunc:
259    (void)printf("[|igmp]");
260    return;
261}
262
263void
264igmp_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;
342trunc:
343    fputs("[|igmp]", stdout);
344}
345