#ifndef lint
static const char rcsid[] =
- "@(#) $Header: /tcpdump/master/tcpdump/print-pim.c,v 1.8 1999-10-17 21:37:14 mcr Exp $ (LBL)";
+ "@(#) $Header: /tcpdump/master/tcpdump/print-pim.c,v 1.9 1999-10-30 05:11:19 itojun Exp $ (LBL)";
#endif
#include <sys/param.h>
#include <netinet/in.h>
#include <netinet/in_systm.h>
#include <netinet/ip.h>
+#include <netinet/ip_var.h>
#include <netinet/udp.h>
+#include <netinet/udp_var.h>
#include <netinet/tcp.h>
+/*
+ * XXX: We consider a case where IPv6 is not ready yet for portability,
+ * but PIM dependent defintions should be independent of IPv6...
+ */
+#ifdef INET6
+#include <netinet6/pim6.h>
+#else
+struct pim {
+#if defined(BYTE_ORDER) && (BYTE_ORDER == LITTLE_ENDIAN)
+ u_char pim_type:4, /* the PIM message type, currently they are:
+ * Hello, Register, Register-Stop, Join/Prune,
+ * Bootstrap, Assert, Graft (PIM-DM only),
+ * Graft-Ack (PIM-DM only), C-RP-Adv
+ */
+ pim_ver:4; /* PIM version number; 2 for PIMv2 */
+#else
+ u_char pim_ver:4, /* PIM version */
+ pim_type:4; /* PIM type */
+#endif
+ u_char pim_rsv; /* Reserved */
+ u_short pim_cksum; /* IP style check sum */
+};
+#endif
+
+
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include "interface.h"
#include "addrtoname.h"
+static void pimv2_print(register const u_char *bp, register u_int len);
+
void
-pim_print(register const u_char *bp, register u_int len)
+igmp_pim_print(register const u_char *bp, register u_int len)
{
register const u_char *ep;
register u_char type;
break;
}
}
+
+void
+pim_print(register const u_char *bp, register u_int len)
+{
+ register const u_char *ep;
+ register struct pim *pim = (struct pim *)bp;
+
+ ep = (const u_char *)snapend;
+ if (bp >= ep)
+ return;
+#ifdef notyet /* currently we see only version and type */
+ TCHECK(pim->pim_rsv);
+#endif
+
+ switch(pim->pim_ver) {
+ case 2: /* avoid hardcoding? */
+ (void)printf("v2");
+ pimv2_print(bp, len);
+ break;
+ default:
+ (void)printf("v%d", pim->pim_ver);
+ break;
+ }
+ return;
+}
+
+enum pimv2_addrtype {
+ pimv2_unicast, pimv2_group, pimv2_source
+};
+#if 0
+static char *addrtypestr[] = {
+ "unicast", "group", "source"
+};
+#endif
+
+static int
+pimv2_addr_print(const u_char *bp, enum pimv2_addrtype at, int silent)
+{
+ const u_char *ep;
+ int af;
+ char *afstr;
+ int len;
+
+ ep = (const u_char *)snapend;
+ if (bp >= ep)
+ return -1;
+
+ switch (bp[0]) {
+ case 1:
+ af = AF_INET;
+ afstr = "IPv4";
+ break;
+#ifdef INET6
+ case 2:
+ af = AF_INET6;
+ afstr = "IPv6";
+ break;
+#endif
+ default:
+ return -1;
+ }
+
+ if (bp[1] != 0)
+ return -1;
+
+ switch (at) {
+ case pimv2_unicast:
+ if (af == AF_INET) {
+ len = 4;
+ if (bp + 2 + len > ep)
+ return -1;
+ if (!silent)
+ (void)printf("%s", ipaddr_string(bp + 2));
+ }
+#ifdef INET6
+ else if (af == AF_INET6) {
+ len = 16;
+ if (bp + 2 + len > ep)
+ return -1;
+ if (!silent)
+ (void)printf("%s", ip6addr_string(bp + 2));
+ }
+#endif
+ return 2 + len;
+ case pimv2_group:
+ if (af == AF_INET) {
+ len = 4;
+ if (bp + 4 + len > ep)
+ return -1;
+ if (!silent)
+ (void)printf("%s/%u", ipaddr_string(bp + 4), bp[3]);
+ }
+#ifdef INET6
+ else if (af == AF_INET6) {
+ len = 16;
+ if (bp + 4 + len > ep)
+ return -1;
+ if (!silent)
+ (void)printf("%s/%u", ip6addr_string(bp + 4), bp[3]);
+ }
+#endif
+ return 4 + len;
+ case pimv2_source:
+ if (af == AF_INET) {
+ len = 4;
+ if (bp + 4 + len > ep)
+ return -1;
+ if (!silent)
+ (void)printf("%s/%u", ipaddr_string(bp + 4), bp[3]);
+ }
+#ifdef INET6
+ else if (af == AF_INET6) {
+ len = 16;
+ if (bp + 4 + len > ep)
+ return -1;
+ if (!silent)
+ (void)printf("%s/%u", ip6addr_string(bp + 4), bp[3]);
+ }
+#endif
+ if (vflag && bp[2] && !silent) {
+ (void)printf("(%s%s%s)",
+ bp[2] & 0x04 ? "S" : "",
+ bp[2] & 0x02 ? "W" : "",
+ bp[2] & 0x01 ? "R" : "");
+ }
+ return 4 + len;
+ default:
+ return -1;
+ }
+}
+
+static void
+pimv2_print(register const u_char *bp, register u_int len)
+{
+ register const u_char *ep;
+ register struct pim *pim = (struct pim *)bp;
+ int advance;
+
+ ep = (const u_char *)snapend;
+ if (bp >= ep)
+ return;
+#ifdef notyet /* currently we see only version and type */
+ TCHECK(pim->pim_rsv);
+#endif
+
+ switch (pim->pim_type) {
+ case 0:
+ {
+ u_int16_t otype, olen;
+ (void)printf(" Hello");
+ bp += 4;
+ while (bp < ep) {
+ otype = ntohs(*(u_int16_t *)(bp + 0));
+ olen = ntohs(*(u_int16_t *)(bp + 2));
+ if (otype == 1 && olen == 2 && bp + 4 + olen <= ep) {
+ u_int16_t value;
+ (void)printf(" holdtime=");
+ value = ntohs(*(u_int16_t *)(bp + 4));
+ if (value == 0xffff)
+ (void)printf("infty");
+ else
+ (void)printf("%u", value);
+ bp += 4 + olen;
+ } else
+ break;
+ }
+ break;
+ }
+
+ case 1:
+ {
+ struct ip *ip;
+
+ (void)printf(" Register");
+ if (vflag && bp + 8 <= ep) {
+ (void)printf(" %s%s", bp[4] & 0x80 ? "B" : "",
+ bp[4] & 0x40 ? "N" : "");
+ }
+ bp += 8; len -= 8;
+
+ /* encapsulated multicast packet */
+ if (bp >= ep)
+ break;
+ ip = (struct ip *)bp;
+ switch(ip->ip_v) {
+ case 4: /* IPv4 */
+ printf(" ");
+ ip_print(bp, len);
+ break;
+#ifdef INET6
+ case 6: /* IPv6 */
+ printf(" ");
+ ip6_print(bp, len);
+ break;
+#endif
+ default:
+ (void)printf(" IP ver %d", ip->ip_v);
+ break;
+ }
+ break;
+ }
+
+ case 2:
+ (void)printf(" Register-Stop");
+ bp += 4; len -= 4;
+ if (bp >= ep)
+ break;
+ (void)printf(" group=");
+ if ((advance = pimv2_addr_print(bp, pimv2_group, 0)) < 0) {
+ (void)printf("...");
+ break;
+ }
+ bp += advance; len -= advance;
+ if (bp >= ep)
+ break;
+ (void)printf(" source=");
+ if ((advance = pimv2_addr_print(bp, pimv2_unicast, 0)) < 0) {
+ (void)printf("...");
+ break;
+ }
+ bp += advance; len -= advance;
+ break;
+
+ case 3:
+ case 6:
+ case 7:
+ {
+ u_int8_t ngroup;
+ u_int16_t holdtime;
+ u_int16_t njoin;
+ u_int16_t nprune;
+ int i, j;
+
+ switch (pim->pim_type) {
+ case 3:
+ (void)printf(" Join/Prune");
+ break;
+ case 6:
+ (void)printf(" Graft");
+ break;
+ case 7:
+ (void)printf(" Graft-ACK");
+ break;
+ }
+ bp += 4; len -= 4;
+ if (pim->pim_type != 7) { /*not for Graft-ACK*/
+ if (bp >= ep)
+ break;
+ (void)printf(" upstream-neighbor=");
+ if ((advance = pimv2_addr_print(bp, pimv2_unicast, 0)) < 0) {
+ (void)printf("...");
+ break;
+ }
+ bp += advance; len -= advance;
+ }
+ if (bp + 4 > ep)
+ break;
+ ngroup = bp[1];
+ holdtime = ntohs(*(u_int16_t *)(bp + 2));
+ (void)printf(" groups=%u", ngroup);
+ if (pim->pim_type != 7) { /*not for Graft-ACK*/
+ (void)printf(" holdtime=");
+ if (holdtime == 0xffff)
+ (void)printf("infty");
+ else
+ (void)printf("%u", holdtime);
+ }
+ bp += 4; len -= 4;
+ for (i = 0; i < ngroup; i++) {
+ if (bp >= ep)
+ goto jp_done;
+ (void)printf(" (group%d: ", i);
+ if ((advance = pimv2_addr_print(bp, pimv2_group, 0)) < 0) {
+ (void)printf("...)");
+ goto jp_done;
+ }
+ bp += advance; len -= advance;
+ if (bp + 4 > ep) {
+ (void)printf("...)");
+ goto jp_done;
+ }
+ njoin = ntohs(*(u_int16_t *)(bp + 0));
+ nprune = ntohs(*(u_int16_t *)(bp + 2));
+ (void)printf(" join=%u", njoin);
+ bp += 4; len -= 4;
+ for (j = 0; j < njoin; j++) {
+ (void)printf(" ");
+ if ((advance = pimv2_addr_print(bp, pimv2_source, 0)) < 0) {
+ (void)printf("...)");
+ goto jp_done;
+ }
+ bp += advance; len -= advance;
+ }
+ (void)printf(" prune=%u", nprune);
+ for (j = 0; j < nprune; j++) {
+ (void)printf(" ");
+ if ((advance = pimv2_addr_print(bp, pimv2_source, 0)) < 0) {
+ (void)printf("...)");
+ goto jp_done;
+ }
+ bp += advance; len -= advance;
+ }
+ (void)printf(")");
+ }
+ jp_done:
+ break;
+ }
+
+ case 4:
+ {
+ int i, j, frpcnt;
+
+ (void)printf(" Bootstrap");
+ bp += 4;
+
+ /* Fragment Tag, Hash Mask len, and BSR-priority */
+ if (bp + sizeof(u_int16_t) >= ep) break;
+ (void)printf(" tag=%x", ntohs(*(u_int16_t *)bp));
+ bp += sizeof(u_int16_t);
+ if (bp >= ep) break;
+ (void)printf(" hashmlen=%d", bp[0]);
+ if (bp + 1 >= ep) break;
+ (void)printf(" BSRprio=%d", bp[1]);
+ bp += 2;
+
+ /* Encoded-Unicast-BSR-Address */
+ if (bp >= ep) break;
+ (void)printf(" BSR=");
+ if ((advance = pimv2_addr_print(bp, pimv2_unicast, 0)) < 0) {
+ (void)printf("...");
+ break;
+ }
+ bp += advance;
+
+ for (i = 0; bp < ep; i++) {
+ /* Encoded-Group Address */
+ (void)printf(" (group%d: ", i);
+ if ((advance = pimv2_addr_print(bp, pimv2_group, 0))
+ < 0) {
+ (void)printf("...)");
+ goto bs_done;
+ }
+ bp += advance;
+
+ /* RP-Count, Frag RP-Cnt, and rsvd */
+ if (bp >= ep) {
+ (void)printf("...)");
+ goto bs_done;
+ }
+ (void)printf(" RPcnt=%d", frpcnt = bp[0]);
+ if (bp + 1 >= ep) {
+ (void)printf("...)");
+ goto bs_done;
+ }
+ (void)printf(" FRPcnt=%d", bp[1]);
+ bp += 4;
+
+ for (j = 0; j < frpcnt && bp < ep; j++) {
+ /* each RP info */
+ (void)printf(" RP%d=", j);
+ if ((advance = pimv2_addr_print(bp,
+ pimv2_unicast,
+ 0)) < 0) {
+ (void)printf("...)");
+ goto bs_done;
+ }
+ bp += advance;
+
+ if (bp + 2 >= ep) {
+ (void)printf("...)");
+ goto bs_done;
+ }
+ (void)printf(",holdtime=%d",
+ ntohs(*(u_int16_t *)bp));
+ if (bp + 3 >= ep) {
+ (void)printf("...)");
+ goto bs_done;
+ }
+ (void)printf(",prio=%d", bp[3]);
+ bp += 4;
+ }
+ (void)printf(")");
+ }
+ bs_done:
+ break;
+ }
+ case 5:
+ (void)printf(" Assert");
+ bp += 4; len -= 4;
+ if (bp >= ep)
+ break;
+ (void)printf(" group=");
+ if ((advance = pimv2_addr_print(bp, pimv2_group, 0)) < 0) {
+ (void)printf("...");
+ break;
+ }
+ bp += advance; len -= advance;
+ if (bp >= ep)
+ break;
+ (void)printf(" src=");
+ if ((advance = pimv2_addr_print(bp, pimv2_unicast, 0)) < 0) {
+ (void)printf("...");
+ break;
+ }
+ bp += advance; len -= advance;
+ if (bp + 8 > ep)
+ break;
+ if (ntohl(*(u_int32_t *)bp) & 0x80000000)
+ (void)printf(" RPT");
+ (void)printf(" pref=%u", ntohl(*(u_int32_t *)bp & 0x7fffffff));
+ (void)printf(" metric=%u", ntohl(*(u_int32_t *)(bp + 4)));
+ break;
+
+ case 8:
+ {
+ int i, pfxcnt;
+
+ (void)printf(" Candidate-RP-Advertisement");
+ bp += 4;
+
+ /* Prefix-Cnt, Priority, and Holdtime */
+ if (bp >= ep) break;
+ (void)printf(" prefix-cnt=%d", bp[0]);
+ pfxcnt = bp[0];
+ if (bp + 1 >= ep) break;
+ (void)printf(" prio=%d", bp[1]);
+ if (bp + 3 >= ep) break;
+ (void)printf(" holdtime=%d", ntohs(*(u_int16_t *)(bp + 2)));
+ bp += 4;
+
+ /* Encoded-Unicast-RP-Address */
+ if (bp >= ep) break;
+ (void)printf(" RP=");
+ if ((advance = pimv2_addr_print(bp, pimv2_unicast, 0)) < 0) {
+ (void)printf("...");
+ break;
+ }
+ bp += advance;
+
+ /* Encoded-Group Addresses */
+ for (i = 0; i < pfxcnt && bp < ep; i++) {
+ (void)printf(" Group%d=", i);
+ if ((advance = pimv2_addr_print(bp, pimv2_group, 0))
+ < 0) {
+ (void)printf("...");
+ break;
+ }
+ bp += advance;
+ }
+ break;
+ }
+
+ default:
+ (void)printf(" [type %d]", pim->pim_type);
+ break;
+ }
+
+ return;
+}
projects / tcpdump / blobdiff