contrib/tcpdump/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.27 2003-11-19 09:42:04 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 }