Fix gcc 3.4 build.
[dragonfly.git] / contrib / tcpdump-3.8.3 / print-dvmrp.c
1 /*
2  * Copyright (c) 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-dvmrp.c,v 1.24.2.3 2003/11/19 09:41:28 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 #include <stdlib.h>
36
37 #include "interface.h"
38 #include "extract.h"
39 #include "addrtoname.h"
40
41 /*
42  * DVMRP message types and flag values shamelessly stolen from
43  * mrouted/dvmrp.h.
44  */
45 #define DVMRP_PROBE             1       /* for finding neighbors */
46 #define DVMRP_REPORT            2       /* for reporting some or all routes */
47 #define DVMRP_ASK_NEIGHBORS     3       /* sent by mapper, asking for a list */
48                                         /* of this router's neighbors */
49 #define DVMRP_NEIGHBORS         4       /* response to such a request */
50 #define DVMRP_ASK_NEIGHBORS2    5       /* as above, want new format reply */
51 #define DVMRP_NEIGHBORS2        6
52 #define DVMRP_PRUNE             7       /* prune message */
53 #define DVMRP_GRAFT             8       /* graft message */
54 #define DVMRP_GRAFT_ACK         9       /* graft acknowledgement */
55
56 /*
57  * 'flags' byte values in DVMRP_NEIGHBORS2 reply.
58  */
59 #define DVMRP_NF_TUNNEL         0x01    /* neighbors reached via tunnel */
60 #define DVMRP_NF_SRCRT          0x02    /* tunnel uses IP source routing */
61 #define DVMRP_NF_DOWN           0x10    /* kernel state of interface */
62 #define DVMRP_NF_DISABLED       0x20    /* administratively disabled */
63 #define DVMRP_NF_QUERIER        0x40    /* I am the subnet's querier */
64
65 static int print_probe(const u_char *, const u_char *, u_int);
66 static int print_report(const u_char *, const u_char *, u_int);
67 static int print_neighbors(const u_char *, const u_char *, u_int);
68 static int print_neighbors2(const u_char *, const u_char *, u_int);
69 static int print_prune(const u_char *);
70 static int print_graft(const u_char *);
71 static int print_graft_ack(const u_char *);
72
73 static u_int32_t target_level;
74
75 void
76 dvmrp_print(register const u_char *bp, register u_int len)
77 {
78         register const u_char *ep;
79         register u_char type;
80
81         ep = (const u_char *)snapend;
82         if (bp >= ep)
83                 return;
84
85         TCHECK(bp[1]);
86         type = bp[1];
87
88         /* Skip IGMP header */
89         bp += 8;
90         len -= 8;
91
92         switch (type) {
93
94         case DVMRP_PROBE:
95                 printf(" Probe");
96                 if (vflag) {
97                         if (print_probe(bp, ep, len) < 0)
98                                 goto trunc;
99                 }
100                 break;
101
102         case DVMRP_REPORT:
103                 printf(" Report");
104                 if (vflag > 1) {
105                         if (print_report(bp, ep, len) < 0)
106                                 goto trunc;
107                 }
108                 break;
109
110         case DVMRP_ASK_NEIGHBORS:
111                 printf(" Ask-neighbors(old)");
112                 break;
113
114         case DVMRP_NEIGHBORS:
115                 printf(" Neighbors(old)");
116                 if (print_neighbors(bp, ep, len) < 0)
117                         goto trunc;
118                 break;
119
120         case DVMRP_ASK_NEIGHBORS2:
121                 printf(" Ask-neighbors2");
122                 break;
123
124         case DVMRP_NEIGHBORS2:
125                 printf(" Neighbors2");
126                 /*
127                  * extract version and capabilities from IGMP group
128                  * address field
129                  */
130                 bp -= 4;
131                 TCHECK2(bp[0], 4);
132                 target_level = (bp[0] << 24) | (bp[1] << 16) |
133                     (bp[2] << 8) | bp[3];
134                 bp += 4;
135                 if (print_neighbors2(bp, ep, len) < 0)
136                         goto trunc;
137                 break;
138
139         case DVMRP_PRUNE:
140                 printf(" Prune");
141                 if (print_prune(bp) < 0)
142                         goto trunc;
143                 break;
144
145         case DVMRP_GRAFT:
146                 printf(" Graft");
147                 if (print_graft(bp) < 0)
148                         goto trunc;
149                 break;
150
151         case DVMRP_GRAFT_ACK:
152                 printf(" Graft-ACK");
153                 if (print_graft_ack(bp) < 0)
154                         goto trunc;
155                 break;
156
157         default:
158                 printf(" [type %d]", type);
159                 break;
160         }
161         return;
162
163 trunc:
164         printf("[|dvmrp]");
165         return;
166 }
167
168 static int 
169 print_report(register const u_char *bp, register const u_char *ep,
170     register u_int len)
171 {
172         register u_int32_t mask, origin;
173         register int metric, done;
174         register u_int i, width;
175
176         while (len > 0) {
177                 if (len < 3) {
178                         printf(" [|]");
179                         return (0);
180                 }
181                 TCHECK2(bp[0], 3);
182                 mask = (u_int32_t)0xff << 24 | bp[0] << 16 | bp[1] << 8 | bp[2];
183                 width = 1;
184                 if (bp[0])
185                         width = 2;
186                 if (bp[1])
187                         width = 3;
188                 if (bp[2])
189                         width = 4;
190
191                 printf("\n\tMask %s", intoa(htonl(mask)));
192                 bp += 3;
193                 len -= 3;
194                 do {
195                         if (bp + width + 1 > ep) {
196                                 printf(" [|]");
197                                 return (0);
198                         }
199                         if (len < width + 1) {
200                                 printf("\n\t  [Truncated Report]");
201                                 return (0);
202                         }
203                         origin = 0;
204                         for (i = 0; i < width; ++i) {
205                                 TCHECK(*bp);
206                                 origin = origin << 8 | *bp++;
207                         }
208                         for ( ; i < 4; ++i)
209                                 origin <<= 8;
210
211                         TCHECK(*bp);
212                         metric = *bp++;
213                         done = metric & 0x80;
214                         metric &= 0x7f;
215                         printf("\n\t  %s metric %d", intoa(htonl(origin)),
216                                 metric);
217                         len -= width + 1;
218                 } while (!done);
219         }
220         return (0);
221 trunc:
222         return (-1);
223 }
224
225 static int
226 print_probe(register const u_char *bp, register const u_char *ep,
227     register u_int len)
228 {
229         register u_int32_t genid;
230
231         TCHECK2(bp[0], 4);
232         if ((len < 4) || ((bp + 4) > ep)) {
233                 /* { (ctags) */
234                 printf(" [|}");
235                 return (0);
236         }
237         genid = (bp[0] << 24) | (bp[1] << 16) | (bp[2] << 8) | bp[3];
238         bp += 4;
239         len -= 4;
240         if (vflag > 1)
241                 printf("\n\t");
242         else
243                 printf(" ");
244         printf("genid %u", genid);
245         if (vflag < 2)
246                 return (0);
247
248         while ((len > 0) && (bp < ep)) {
249                 TCHECK2(bp[0], 4);
250                 printf("\n\tneighbor %s", ipaddr_string(bp));
251                 bp += 4; len -= 4;
252         }
253         return (0);
254 trunc:
255         return (-1);
256 }
257
258 static int
259 print_neighbors(register const u_char *bp, register const u_char *ep,
260     register u_int len)
261 {
262         const u_char *laddr;
263         register u_char metric;
264         register u_char thresh;
265         register int ncount;
266
267         while (len > 0 && bp < ep) {
268                 TCHECK2(bp[0], 7);
269                 laddr = bp;
270                 bp += 4;
271                 metric = *bp++;
272                 thresh = *bp++;
273                 ncount = *bp++;
274                 len -= 7;
275                 while (--ncount >= 0) {
276                         TCHECK2(bp[0], 4);
277                         printf(" [%s ->", ipaddr_string(laddr));
278                         printf(" %s, (%d/%d)]",
279                                    ipaddr_string(bp), metric, thresh);
280                         bp += 4;
281                         len -= 4;
282                 }
283         }
284         return (0);
285 trunc:
286         return (-1);
287 }
288
289 static int
290 print_neighbors2(register const u_char *bp, register const u_char *ep,
291     register u_int len)
292 {
293         const u_char *laddr;
294         register u_char metric, thresh, flags;
295         register int ncount;
296
297         printf(" (v %d.%d):",
298                (int)target_level & 0xff,
299                (int)(target_level >> 8) & 0xff);
300
301         while (len > 0 && bp < ep) {
302                 TCHECK2(bp[0], 8);
303                 laddr = bp;
304                 bp += 4;
305                 metric = *bp++;
306                 thresh = *bp++;
307                 flags = *bp++;
308                 ncount = *bp++;
309                 len -= 8;
310                 while (--ncount >= 0 && (len >= 4) && (bp + 4) <= ep) {
311                         printf(" [%s -> ", ipaddr_string(laddr));
312                         printf("%s (%d/%d", ipaddr_string(bp),
313                                      metric, thresh);
314                         if (flags & DVMRP_NF_TUNNEL)
315                                 printf("/tunnel");
316                         if (flags & DVMRP_NF_SRCRT)
317                                 printf("/srcrt");
318                         if (flags & DVMRP_NF_QUERIER)
319                                 printf("/querier");
320                         if (flags & DVMRP_NF_DISABLED)
321                                 printf("/disabled");
322                         if (flags & DVMRP_NF_DOWN)
323                                 printf("/down");
324                         printf(")]");
325                         bp += 4;
326                         len -= 4;
327                 }
328                 if (ncount != -1) {
329                         printf(" [|]");
330                         return (0);
331                 }
332         }
333         return (0);
334 trunc:
335         return (-1);
336 }
337
338 static int
339 print_prune(register const u_char *bp)
340 {
341         TCHECK2(bp[0], 12);
342         printf(" src %s grp %s", ipaddr_string(bp), ipaddr_string(bp + 4));
343         bp += 8;
344         (void)printf(" timer ");
345         relts_print(EXTRACT_32BITS(bp));
346         return (0);
347 trunc:
348         return (-1);
349 }
350
351 static int
352 print_graft(register const u_char *bp)
353 {
354         TCHECK2(bp[0], 8);
355         printf(" src %s grp %s", ipaddr_string(bp), ipaddr_string(bp + 4));
356         return (0);
357 trunc:
358         return (-1);
359 }
360
361 static int
362 print_graft_ack(register const u_char *bp)
363 {
364         TCHECK2(bp[0], 8);
365         printf(" src %s grp %s", ipaddr_string(bp), ipaddr_string(bp + 4));
366         return (0);
367 trunc:
368         return (-1);
369 }