X-Git-Url: https://git.tcpdump.org/tcpdump/blobdiff_plain/f6fa6a40d4156cdf5dea882024beb7b10d2412f1..refs/heads/tcpdump-4.6:/print-pim.c diff --git a/print-pim.c b/print-pim.c index 529e1aaa..567d3d99 100644 --- a/print-pim.c +++ b/print-pim.c @@ -19,79 +19,1075 @@ * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. */ -#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)"; +#define NETDISSECT_REWORKED +#ifdef HAVE_CONFIG_H +#include "config.h" #endif -#include -#include -#include - -#include -#include -#include -#include -#include - -#include -#include -#include +#include #include "interface.h" #include "addrtoname.h" +#include "extract.h" + +#include "ip.h" + +#define PIMV1_TYPE_QUERY 0 +#define PIMV1_TYPE_REGISTER 1 +#define PIMV1_TYPE_REGISTER_STOP 2 +#define PIMV1_TYPE_JOIN_PRUNE 3 +#define PIMV1_TYPE_RP_REACHABILITY 4 +#define PIMV1_TYPE_ASSERT 5 +#define PIMV1_TYPE_GRAFT 6 +#define PIMV1_TYPE_GRAFT_ACK 7 + +static const struct tok pimv1_type_str[] = { + { PIMV1_TYPE_QUERY, "Query" }, + { PIMV1_TYPE_REGISTER, "Register" }, + { PIMV1_TYPE_REGISTER_STOP, "Register-Stop" }, + { PIMV1_TYPE_JOIN_PRUNE, "Join/Prune" }, + { PIMV1_TYPE_RP_REACHABILITY, "RP-reachable" }, + { PIMV1_TYPE_ASSERT, "Assert" }, + { PIMV1_TYPE_GRAFT, "Graft" }, + { PIMV1_TYPE_GRAFT_ACK, "Graft-ACK" }, + { 0, NULL } +}; + +#define PIMV2_TYPE_HELLO 0 +#define PIMV2_TYPE_REGISTER 1 +#define PIMV2_TYPE_REGISTER_STOP 2 +#define PIMV2_TYPE_JOIN_PRUNE 3 +#define PIMV2_TYPE_BOOTSTRAP 4 +#define PIMV2_TYPE_ASSERT 5 +#define PIMV2_TYPE_GRAFT 6 +#define PIMV2_TYPE_GRAFT_ACK 7 +#define PIMV2_TYPE_CANDIDATE_RP 8 +#define PIMV2_TYPE_PRUNE_REFRESH 9 +#define PIMV2_TYPE_DF_ELECTION 10 +#define PIMV2_TYPE_ECMP_REDIRECT 11 + +static const struct tok pimv2_type_values[] = { + { PIMV2_TYPE_HELLO, "Hello" }, + { PIMV2_TYPE_REGISTER, "Register" }, + { PIMV2_TYPE_REGISTER_STOP, "Register Stop" }, + { PIMV2_TYPE_JOIN_PRUNE, "Join / Prune" }, + { PIMV2_TYPE_BOOTSTRAP, "Bootstrap" }, + { PIMV2_TYPE_ASSERT, "Assert" }, + { PIMV2_TYPE_GRAFT, "Graft" }, + { PIMV2_TYPE_GRAFT_ACK, "Graft Acknowledgement" }, + { PIMV2_TYPE_CANDIDATE_RP, "Candidate RP Advertisement" }, + { PIMV2_TYPE_PRUNE_REFRESH, "Prune Refresh" }, + { PIMV2_TYPE_DF_ELECTION, "DF Election" }, + { PIMV2_TYPE_ECMP_REDIRECT, "ECMP Redirect" }, + { 0, NULL} +}; + +#define PIMV2_HELLO_OPTION_HOLDTIME 1 +#define PIMV2_HELLO_OPTION_LANPRUNEDELAY 2 +#define PIMV2_HELLO_OPTION_DR_PRIORITY_OLD 18 +#define PIMV2_HELLO_OPTION_DR_PRIORITY 19 +#define PIMV2_HELLO_OPTION_GENID 20 +#define PIMV2_HELLO_OPTION_REFRESH_CAP 21 +#define PIMV2_HELLO_OPTION_BIDIR_CAP 22 +#define PIMV2_HELLO_OPTION_ADDRESS_LIST 24 +#define PIMV2_HELLO_OPTION_ADDRESS_LIST_OLD 65001 + +static const struct tok pimv2_hello_option_values[] = { + { PIMV2_HELLO_OPTION_HOLDTIME, "Hold Time" }, + { PIMV2_HELLO_OPTION_LANPRUNEDELAY, "LAN Prune Delay" }, + { PIMV2_HELLO_OPTION_DR_PRIORITY_OLD, "DR Priority (Old)" }, + { PIMV2_HELLO_OPTION_DR_PRIORITY, "DR Priority" }, + { PIMV2_HELLO_OPTION_GENID, "Generation ID" }, + { PIMV2_HELLO_OPTION_REFRESH_CAP, "State Refresh Capability" }, + { PIMV2_HELLO_OPTION_BIDIR_CAP, "Bi-Directional Capability" }, + { PIMV2_HELLO_OPTION_ADDRESS_LIST, "Address List" }, + { PIMV2_HELLO_OPTION_ADDRESS_LIST_OLD, "Address List (Old)" }, + { 0, NULL} +}; + +#define PIMV2_REGISTER_FLAG_LEN 4 +#define PIMV2_REGISTER_FLAG_BORDER 0x80000000 +#define PIMV2_REGISTER_FLAG_NULL 0x40000000 + +static const struct tok pimv2_register_flag_values[] = { + { PIMV2_REGISTER_FLAG_BORDER, "Border" }, + { PIMV2_REGISTER_FLAG_NULL, "Null" }, + { 0, NULL} +}; + +/* + * XXX: We consider a case where IPv6 is not ready yet for portability, + * but PIM dependent defintions should be independent of IPv6... + */ + +struct pim { + uint8_t pim_typever; + /* upper 4bit: PIM version number; 2 for PIMv2 */ + /* lower 4bit: 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 + */ +#define PIM_VER(x) (((x) & 0xf0) >> 4) +#define PIM_TYPE(x) ((x) & 0x0f) + u_char pim_rsv; /* Reserved */ + u_short pim_cksum; /* IP style check sum */ +}; + +static void pimv2_print(netdissect_options *, register const u_char *bp, register u_int len, u_int cksum); + +static void +pimv1_join_prune_print(netdissect_options *ndo, + register const u_char *bp, register u_int len) +{ + int ngroups, njoin, nprune; + int njp; + + /* If it's a single group and a single source, use 1-line output. */ + if (ND_TTEST2(bp[0], 30) && bp[11] == 1 && + ((njoin = EXTRACT_16BITS(&bp[20])) + EXTRACT_16BITS(&bp[22])) == 1) { + int hold; + + ND_PRINT((ndo, " RPF %s ", ipaddr_string(ndo, bp))); + hold = EXTRACT_16BITS(&bp[6]); + if (hold != 180) { + ND_PRINT((ndo, "Hold ")); + relts_print(ndo, hold); + } + ND_PRINT((ndo, "%s (%s/%d, %s", njoin ? "Join" : "Prune", + ipaddr_string(ndo, &bp[26]), bp[25] & 0x3f, + ipaddr_string(ndo, &bp[12]))); + if (EXTRACT_32BITS(&bp[16]) != 0xffffffff) + ND_PRINT((ndo, "/%s", ipaddr_string(ndo, &bp[16]))); + ND_PRINT((ndo, ") %s%s %s", + (bp[24] & 0x01) ? "Sparse" : "Dense", + (bp[25] & 0x80) ? " WC" : "", + (bp[25] & 0x40) ? "RP" : "SPT")); + return; + } + + ND_TCHECK2(bp[0], sizeof(struct in_addr)); + if (ndo->ndo_vflag > 1) + ND_PRINT((ndo, "\n")); + ND_PRINT((ndo, " Upstream Nbr: %s", ipaddr_string(ndo, bp))); + ND_TCHECK2(bp[6], 2); + if (ndo->ndo_vflag > 1) + ND_PRINT((ndo, "\n")); + ND_PRINT((ndo, " Hold time: ")); + relts_print(ndo, EXTRACT_16BITS(&bp[6])); + if (ndo->ndo_vflag < 2) + return; + bp += 8; + len -= 8; + + ND_TCHECK2(bp[0], 4); + ngroups = bp[3]; + bp += 4; + len -= 4; + while (ngroups--) { + /* + * XXX - does the address have length "addrlen" and the + * mask length "maddrlen"? + */ + ND_TCHECK2(bp[0], sizeof(struct in_addr)); + ND_PRINT((ndo, "\n\tGroup: %s", ipaddr_string(ndo, bp))); + ND_TCHECK2(bp[4], sizeof(struct in_addr)); + if (EXTRACT_32BITS(&bp[4]) != 0xffffffff) + ND_PRINT((ndo, "/%s", ipaddr_string(ndo, &bp[4]))); + ND_TCHECK2(bp[8], 4); + njoin = EXTRACT_16BITS(&bp[8]); + nprune = EXTRACT_16BITS(&bp[10]); + ND_PRINT((ndo, " joined: %d pruned: %d", njoin, nprune)); + bp += 12; + len -= 12; + for (njp = 0; njp < (njoin + nprune); njp++) { + const char *type; + + if (njp < njoin) + type = "Join "; + else + type = "Prune"; + ND_TCHECK2(bp[0], 6); + ND_PRINT((ndo, "\n\t%s %s%s%s%s/%d", type, + (bp[0] & 0x01) ? "Sparse " : "Dense ", + (bp[1] & 0x80) ? "WC " : "", + (bp[1] & 0x40) ? "RP " : "SPT ", + ipaddr_string(ndo, &bp[2]), bp[1] & 0x3f)); + bp += 6; + len -= 6; + } + } + return; +trunc: + ND_PRINT((ndo, "[|pim]")); + return; +} void -pim_print(register const u_char *bp, register u_int len) +pimv1_print(netdissect_options *ndo, + register const u_char *bp, register u_int len) { - register const u_char *ep; - register u_char type; + register const u_char *ep; + register u_char type; + + ep = (const u_char *)ndo->ndo_snapend; + if (bp >= ep) + return; + + ND_TCHECK(bp[1]); + type = bp[1]; + + ND_PRINT((ndo, " %s", tok2str(pimv1_type_str, "[type %u]", type))); + switch (type) { + case PIMV1_TYPE_QUERY: + if (ND_TTEST(bp[8])) { + switch (bp[8] >> 4) { + case 0: + ND_PRINT((ndo, " Dense-mode")); + break; + case 1: + ND_PRINT((ndo, " Sparse-mode")); + break; + case 2: + ND_PRINT((ndo, " Sparse-Dense-mode")); + break; + default: + ND_PRINT((ndo, " mode-%d", bp[8] >> 4)); + break; + } + } + if (ndo->ndo_vflag) { + ND_TCHECK2(bp[10],2); + ND_PRINT((ndo, " (Hold-time ")); + relts_print(ndo, EXTRACT_16BITS(&bp[10])); + ND_PRINT((ndo, ")")); + } + break; + + case PIMV1_TYPE_REGISTER: + ND_TCHECK2(bp[8], 20); /* ip header */ + ND_PRINT((ndo, " for %s > %s", ipaddr_string(ndo, &bp[20]), + ipaddr_string(ndo, &bp[24]))); + break; + case PIMV1_TYPE_REGISTER_STOP: + ND_TCHECK2(bp[12], sizeof(struct in_addr)); + ND_PRINT((ndo, " for %s > %s", ipaddr_string(ndo, &bp[8]), + ipaddr_string(ndo, &bp[12]))); + break; + case PIMV1_TYPE_RP_REACHABILITY: + if (ndo->ndo_vflag) { + ND_TCHECK2(bp[22], 2); + ND_PRINT((ndo, " group %s", ipaddr_string(ndo, &bp[8]))); + if (EXTRACT_32BITS(&bp[12]) != 0xffffffff) + ND_PRINT((ndo, "/%s", ipaddr_string(ndo, &bp[12]))); + ND_PRINT((ndo, " RP %s hold ", ipaddr_string(ndo, &bp[16]))); + relts_print(ndo, EXTRACT_16BITS(&bp[22])); + } + break; + case PIMV1_TYPE_ASSERT: + ND_TCHECK2(bp[16], sizeof(struct in_addr)); + ND_PRINT((ndo, " for %s > %s", ipaddr_string(ndo, &bp[16]), + ipaddr_string(ndo, &bp[8]))); + if (EXTRACT_32BITS(&bp[12]) != 0xffffffff) + ND_PRINT((ndo, "/%s", ipaddr_string(ndo, &bp[12]))); + ND_TCHECK2(bp[24], 4); + ND_PRINT((ndo, " %s pref %d metric %d", + (bp[20] & 0x80) ? "RP-tree" : "SPT", + EXTRACT_32BITS(&bp[20]) & 0x7fffffff, + EXTRACT_32BITS(&bp[24]))); + break; + case PIMV1_TYPE_JOIN_PRUNE: + case PIMV1_TYPE_GRAFT: + case PIMV1_TYPE_GRAFT_ACK: + if (ndo->ndo_vflag) + pimv1_join_prune_print(ndo, &bp[8], len - 8); + break; + } + if ((bp[4] >> 4) != 1) + ND_PRINT((ndo, " [v%d]", bp[4] >> 4)); + return; + +trunc: + ND_PRINT((ndo, "[|pim]")); + return; +} + +/* + * auto-RP is a cisco protocol, documented at + * ftp://ftpeng.cisco.com/ipmulticast/specs/pim-autorp-spec01.txt + * + * This implements version 1+, dated Sept 9, 1998. + */ +void +cisco_autorp_print(netdissect_options *ndo, + register const u_char *bp, register u_int len) +{ + int type; + int numrps; + int hold; + + ND_TCHECK(bp[0]); + ND_PRINT((ndo, " auto-rp ")); + type = bp[0]; + switch (type) { + case 0x11: + ND_PRINT((ndo, "candidate-advert")); + break; + case 0x12: + ND_PRINT((ndo, "mapping")); + break; + default: + ND_PRINT((ndo, "type-0x%02x", type)); + break; + } + + ND_TCHECK(bp[1]); + numrps = bp[1]; + + ND_TCHECK2(bp[2], 2); + ND_PRINT((ndo, " Hold ")); + hold = EXTRACT_16BITS(&bp[2]); + if (hold) + relts_print(ndo, EXTRACT_16BITS(&bp[2])); + else + ND_PRINT((ndo, "FOREVER")); + + /* Next 4 bytes are reserved. */ + + bp += 8; len -= 8; + + /*XXX skip unless -v? */ + + /* + * Rest of packet: + * numrps entries of the form: + * 32 bits: RP + * 6 bits: reserved + * 2 bits: PIM version supported, bit 0 is "supports v1", 1 is "v2". + * 8 bits: # of entries for this RP + * each entry: 7 bits: reserved, 1 bit: negative, + * 8 bits: mask 32 bits: source + * lather, rinse, repeat. + */ + while (numrps--) { + int nentries; + char s; + + ND_TCHECK2(bp[0], 4); + ND_PRINT((ndo, " RP %s", ipaddr_string(ndo, bp))); + ND_TCHECK(bp[4]); + switch (bp[4] & 0x3) { + case 0: ND_PRINT((ndo, " PIMv?")); + break; + case 1: ND_PRINT((ndo, " PIMv1")); + break; + case 2: ND_PRINT((ndo, " PIMv2")); + break; + case 3: ND_PRINT((ndo, " PIMv1+2")); + break; + } + if (bp[4] & 0xfc) + ND_PRINT((ndo, " [rsvd=0x%02x]", bp[4] & 0xfc)); + ND_TCHECK(bp[5]); + nentries = bp[5]; + bp += 6; len -= 6; + s = ' '; + for (; nentries; nentries--) { + ND_TCHECK2(bp[0], 6); + ND_PRINT((ndo, "%c%s%s/%d", s, bp[0] & 1 ? "!" : "", + ipaddr_string(ndo, &bp[2]), bp[1])); + if (bp[0] & 0x02) { + ND_PRINT((ndo, " bidir")); + } + if (bp[0] & 0xfc) { + ND_PRINT((ndo, "[rsvd=0x%02x]", bp[0] & 0xfc)); + } + s = ','; + bp += 6; len -= 6; + } + } + return; + +trunc: + ND_PRINT((ndo, "[|autorp]")); + return; +} + +void +pim_print(netdissect_options *ndo, + register const u_char *bp, register u_int len, u_int cksum) +{ + register const u_char *ep; + register struct pim *pim = (struct pim *)bp; + + ep = (const u_char *)ndo->ndo_snapend; + if (bp >= ep) + return; +#ifdef notyet /* currently we see only version and type */ + ND_TCHECK(pim->pim_rsv); +#endif - ep = (const u_char *)snapend; - if (bp >= ep) + switch (PIM_VER(pim->pim_typever)) { + case 2: + if (!ndo->ndo_vflag) { + ND_PRINT((ndo, "PIMv%u, %s, length %u", + PIM_VER(pim->pim_typever), + tok2str(pimv2_type_values,"Unknown Type",PIM_TYPE(pim->pim_typever)), + len)); + return; + } else { + ND_PRINT((ndo, "PIMv%u, length %u\n\t%s", + PIM_VER(pim->pim_typever), + len, + tok2str(pimv2_type_values,"Unknown Type",PIM_TYPE(pim->pim_typever)))); + pimv2_print(ndo, bp, len, cksum); + } + break; + default: + ND_PRINT((ndo, "PIMv%u, length %u", + PIM_VER(pim->pim_typever), + len)); + break; + } return; +} + +/* + * PIMv2 uses encoded address representations. + * + * The last PIM-SM I-D before RFC2117 was published specified the + * following representation for unicast addresses. However, RFC2117 + * specified no encoding for unicast addresses with the unicast + * address length specified in the header. Therefore, we have to + * guess which encoding is being used (Cisco's PIMv2 implementation + * uses the non-RFC encoding). RFC2117 turns a previously "Reserved" + * field into a 'unicast-address-length-in-bytes' field. We guess + * that it's the draft encoding if this reserved field is zero. + * + * RFC2362 goes back to the encoded format, and calls the addr length + * field "reserved" again. + * + * The first byte is the address family, from: + * + * 0 Reserved + * 1 IP (IP version 4) + * 2 IP6 (IP version 6) + * 3 NSAP + * 4 HDLC (8-bit multidrop) + * 5 BBN 1822 + * 6 802 (includes all 802 media plus Ethernet "canonical format") + * 7 E.163 + * 8 E.164 (SMDS, Frame Relay, ATM) + * 9 F.69 (Telex) + * 10 X.121 (X.25, Frame Relay) + * 11 IPX + * 12 Appletalk + * 13 Decnet IV + * 14 Banyan Vines + * 15 E.164 with NSAP format subaddress + * + * In addition, the second byte is an "Encoding". 0 is the default + * encoding for the address family, and no other encodings are currently + * specified. + * + */ + +static int pimv2_addr_len; + +enum pimv2_addrtype { + pimv2_unicast, pimv2_group, pimv2_source +}; + +/* 0 1 2 3 + * 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Addr Family | Encoding Type | Unicast Address | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+++++++ + * 0 1 2 3 + * 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Addr Family | Encoding Type | Reserved | Mask Len | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Group multicast Address | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * 0 1 2 3 + * 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Addr Family | Encoding Type | Rsrvd |S|W|R| Mask Len | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Source Address | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + */ +static int +pimv2_addr_print(netdissect_options *ndo, + const u_char *bp, enum pimv2_addrtype at, int silent) +{ + int af; + int len, hdrlen; + + ND_TCHECK(bp[0]); + + if (pimv2_addr_len == 0) { + ND_TCHECK(bp[1]); + switch (bp[0]) { + case 1: + af = AF_INET; + len = sizeof(struct in_addr); + break; +#ifdef INET6 + case 2: + af = AF_INET6; + len = sizeof(struct in6_addr); + break; +#endif + default: + return -1; + } + if (bp[1] != 0) + return -1; + hdrlen = 2; + } else { + switch (pimv2_addr_len) { + case sizeof(struct in_addr): + af = AF_INET; + break; +#ifdef INET6 + case sizeof(struct in6_addr): + af = AF_INET6; + break; +#endif + default: + return -1; + break; + } + len = pimv2_addr_len; + hdrlen = 0; + } + + bp += hdrlen; + switch (at) { + case pimv2_unicast: + ND_TCHECK2(bp[0], len); + if (af == AF_INET) { + if (!silent) + ND_PRINT((ndo, "%s", ipaddr_string(ndo, bp))); + } +#ifdef INET6 + else if (af == AF_INET6) { + if (!silent) + ND_PRINT((ndo, "%s", ip6addr_string(ndo, bp))); + } +#endif + return hdrlen + len; + case pimv2_group: + case pimv2_source: + ND_TCHECK2(bp[0], len + 2); + if (af == AF_INET) { + if (!silent) { + ND_PRINT((ndo, "%s", ipaddr_string(ndo, bp + 2))); + if (bp[1] != 32) + ND_PRINT((ndo, "/%u", bp[1])); + } + } +#ifdef INET6 + else if (af == AF_INET6) { + if (!silent) { + ND_PRINT((ndo, "%s", ip6addr_string(ndo, bp + 2))); + if (bp[1] != 128) + ND_PRINT((ndo, "/%u", bp[1])); + } + } +#endif + if (bp[0] && !silent) { + if (at == pimv2_group) { + ND_PRINT((ndo, "(0x%02x)", bp[0])); + } else { + ND_PRINT((ndo, "(%s%s%s", + bp[0] & 0x04 ? "S" : "", + bp[0] & 0x02 ? "W" : "", + bp[0] & 0x01 ? "R" : "")); + if (bp[0] & 0xf8) { + ND_PRINT((ndo, "+0x%02x", bp[0] & 0xf8)); + } + ND_PRINT((ndo, ")")); + } + } + return hdrlen + 2 + len; + default: + return -1; + } +trunc: + return -1; +} + +static void +pimv2_print(netdissect_options *ndo, + register const u_char *bp, register u_int len, u_int cksum) +{ + register const u_char *ep; + register struct pim *pim = (struct pim *)bp; + int advance; + + ep = (const u_char *)ndo->ndo_snapend; + if (bp >= ep) + return; + if (ep > bp + len) + ep = bp + len; + ND_TCHECK(pim->pim_rsv); + pimv2_addr_len = pim->pim_rsv; + if (pimv2_addr_len != 0) + ND_PRINT((ndo, ", RFC2117-encoding")); + + ND_PRINT((ndo, ", cksum 0x%04x ", EXTRACT_16BITS(&pim->pim_cksum))); + if (EXTRACT_16BITS(&pim->pim_cksum) == 0) { + ND_PRINT((ndo, "(unverified)")); + } else { + ND_PRINT((ndo, "(%scorrect)", ND_TTEST2(bp[0], len) && cksum ? "in" : "" )); + } + + switch (PIM_TYPE(pim->pim_typever)) { + case PIMV2_TYPE_HELLO: + { + uint16_t otype, olen; + bp += 4; + while (bp < ep) { + ND_TCHECK2(bp[0], 4); + otype = EXTRACT_16BITS(&bp[0]); + olen = EXTRACT_16BITS(&bp[2]); + ND_TCHECK2(bp[0], 4 + olen); + ND_PRINT((ndo, "\n\t %s Option (%u), length %u, Value: ", + tok2str(pimv2_hello_option_values, "Unknown", otype), + otype, + olen)); + bp += 4; + + switch (otype) { + case PIMV2_HELLO_OPTION_HOLDTIME: + relts_print(ndo, EXTRACT_16BITS(bp)); + break; - type = bp[1]; + case PIMV2_HELLO_OPTION_LANPRUNEDELAY: + if (olen != 4) { + ND_PRINT((ndo, "ERROR: Option Length != 4 Bytes (%u)", olen)); + } else { + char t_bit; + uint16_t lan_delay, override_interval; + lan_delay = EXTRACT_16BITS(bp); + override_interval = EXTRACT_16BITS(bp+2); + t_bit = (lan_delay & 0x8000)? 1 : 0; + lan_delay &= ~0x8000; + ND_PRINT((ndo, "\n\t T-bit=%d, LAN delay %dms, Override interval %dms", + t_bit, lan_delay, override_interval)); + } + break; - switch (type) { - case 0: - (void)printf(" Query"); - break; + case PIMV2_HELLO_OPTION_DR_PRIORITY_OLD: + case PIMV2_HELLO_OPTION_DR_PRIORITY: + switch (olen) { + case 0: + ND_PRINT((ndo, "Bi-Directional Capability (Old)")); + break; + case 4: + ND_PRINT((ndo, "%u", EXTRACT_32BITS(bp))); + break; + default: + ND_PRINT((ndo, "ERROR: Option Length != 4 Bytes (%u)", olen)); + break; + } + break; - case 1: - (void)printf(" Register"); - break; + case PIMV2_HELLO_OPTION_GENID: + ND_PRINT((ndo, "0x%08x", EXTRACT_32BITS(bp))); + break; - case 2: - (void)printf(" Register-Stop"); - break; + case PIMV2_HELLO_OPTION_REFRESH_CAP: + ND_PRINT((ndo, "v%d", *bp)); + if (*(bp+1) != 0) { + ND_PRINT((ndo, ", interval ")); + relts_print(ndo, *(bp+1)); + } + if (EXTRACT_16BITS(bp+2) != 0) { + ND_PRINT((ndo, " ?0x%04x?", EXTRACT_16BITS(bp+2))); + } + break; - case 3: - (void)printf(" Join/Prune"); - break; + case PIMV2_HELLO_OPTION_BIDIR_CAP: + break; - case 4: - (void)printf(" RP-reachable"); - break; + case PIMV2_HELLO_OPTION_ADDRESS_LIST_OLD: + case PIMV2_HELLO_OPTION_ADDRESS_LIST: + if (ndo->ndo_vflag > 1) { + const u_char *ptr = bp; + while (ptr < (bp+olen)) { + int advance; - case 5: - (void)printf(" Assert"); - break; + ND_PRINT((ndo, "\n\t ")); + advance = pimv2_addr_print(ndo, ptr, pimv2_unicast, 0); + if (advance < 0) { + ND_PRINT((ndo, "...")); + break; + } + ptr += advance; + } + } + break; + default: + if (ndo->ndo_vflag <= 1) + print_unknown_data(ndo, bp, "\n\t ", olen); + break; + } + /* do we want to see an additionally hexdump ? */ + if (ndo->ndo_vflag> 1) + print_unknown_data(ndo, bp, "\n\t ", olen); + bp += olen; + } + break; + } - case 6: - (void)printf(" Graft"); - break; + case PIMV2_TYPE_REGISTER: + { + struct ip *ip; - case 7: - (void)printf(" Graft-ACK"); - break; + ND_TCHECK2(*(bp + 4), PIMV2_REGISTER_FLAG_LEN); - case 8: - (void)printf(" Mode"); - break; + ND_PRINT((ndo, ", Flags [ %s ]\n\t", + tok2str(pimv2_register_flag_values, + "none", + EXTRACT_32BITS(bp+4)))); - default: - (void)printf(" [type %d]", type); - break; - } + bp += 8; len -= 8; + /* encapsulated multicast packet */ + ip = (struct ip *)bp; + switch (IP_V(ip)) { + case 0: /* Null header */ + ND_PRINT((ndo, "IP-Null-header %s > %s", + ipaddr_string(ndo, &ip->ip_src), + ipaddr_string(ndo, &ip->ip_dst))); + break; + + case 4: /* IPv4 */ + ip_print(ndo, bp, len); + break; +#ifdef INET6 + case 6: /* IPv6 */ + ip6_print(ndo, bp, len); + break; +#endif + default: + ND_PRINT((ndo, "IP ver %d", IP_V(ip))); + break; + } + break; + } + + case PIMV2_TYPE_REGISTER_STOP: + bp += 4; len -= 4; + if (bp >= ep) + break; + ND_PRINT((ndo, " group=")); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_group, 0)) < 0) { + ND_PRINT((ndo, "...")); + break; + } + bp += advance; len -= advance; + if (bp >= ep) + break; + ND_PRINT((ndo, " source=")); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_unicast, 0)) < 0) { + ND_PRINT((ndo, "...")); + break; + } + bp += advance; len -= advance; + break; + + case PIMV2_TYPE_JOIN_PRUNE: + case PIMV2_TYPE_GRAFT: + case PIMV2_TYPE_GRAFT_ACK: + + + /* + * 0 1 2 3 + * 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * |PIM Ver| Type | Addr length | Checksum | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Unicast-Upstream Neighbor Address | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Reserved | Num groups | Holdtime | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Encoded-Multicast Group Address-1 | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Number of Joined Sources | Number of Pruned Sources | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Encoded-Joined Source Address-1 | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | . | + * | . | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Encoded-Joined Source Address-n | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Encoded-Pruned Source Address-1 | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | . | + * | . | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Encoded-Pruned Source Address-n | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | . | + * | . | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + * | Encoded-Multicast Group Address-n | + * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ + */ + + { + uint8_t ngroup; + uint16_t holdtime; + uint16_t njoin; + uint16_t nprune; + int i, j; + + bp += 4; len -= 4; + if (PIM_TYPE(pim->pim_typever) != 7) { /*not for Graft-ACK*/ + if (bp >= ep) + break; + ND_PRINT((ndo, ", upstream-neighbor: ")); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_unicast, 0)) < 0) { + ND_PRINT((ndo, "...")); + break; + } + bp += advance; len -= advance; + } + if (bp + 4 > ep) + break; + ngroup = bp[1]; + holdtime = EXTRACT_16BITS(&bp[2]); + ND_PRINT((ndo, "\n\t %u group(s)", ngroup)); + if (PIM_TYPE(pim->pim_typever) != 7) { /*not for Graft-ACK*/ + ND_PRINT((ndo, ", holdtime: ")); + if (holdtime == 0xffff) + ND_PRINT((ndo, "infinite")); + else + relts_print(ndo, holdtime); + } + bp += 4; len -= 4; + for (i = 0; i < ngroup; i++) { + if (bp >= ep) + goto jp_done; + ND_PRINT((ndo, "\n\t group #%u: ", i+1)); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_group, 0)) < 0) { + ND_PRINT((ndo, "...)")); + goto jp_done; + } + bp += advance; len -= advance; + if (bp + 4 > ep) { + ND_PRINT((ndo, "...)")); + goto jp_done; + } + njoin = EXTRACT_16BITS(&bp[0]); + nprune = EXTRACT_16BITS(&bp[2]); + ND_PRINT((ndo, ", joined sources: %u, pruned sources: %u", njoin, nprune)); + bp += 4; len -= 4; + for (j = 0; j < njoin; j++) { + ND_PRINT((ndo, "\n\t joined source #%u: ", j+1)); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_source, 0)) < 0) { + ND_PRINT((ndo, "...)")); + goto jp_done; + } + bp += advance; len -= advance; + } + for (j = 0; j < nprune; j++) { + ND_PRINT((ndo, "\n\t pruned source #%u: ", j+1)); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_source, 0)) < 0) { + ND_PRINT((ndo, "...)")); + goto jp_done; + } + bp += advance; len -= advance; + } + } + jp_done: + break; + } + + case PIMV2_TYPE_BOOTSTRAP: + { + int i, j, frpcnt; + bp += 4; + + /* Fragment Tag, Hash Mask len, and BSR-priority */ + if (bp + sizeof(uint16_t) >= ep) break; + ND_PRINT((ndo, " tag=%x", EXTRACT_16BITS(bp))); + bp += sizeof(uint16_t); + if (bp >= ep) break; + ND_PRINT((ndo, " hashmlen=%d", bp[0])); + if (bp + 1 >= ep) break; + ND_PRINT((ndo, " BSRprio=%d", bp[1])); + bp += 2; + + /* Encoded-Unicast-BSR-Address */ + if (bp >= ep) break; + ND_PRINT((ndo, " BSR=")); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_unicast, 0)) < 0) { + ND_PRINT((ndo, "...")); + break; + } + bp += advance; + + for (i = 0; bp < ep; i++) { + /* Encoded-Group Address */ + ND_PRINT((ndo, " (group%d: ", i)); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_group, 0)) + < 0) { + ND_PRINT((ndo, "...)")); + goto bs_done; + } + bp += advance; + + /* RP-Count, Frag RP-Cnt, and rsvd */ + if (bp >= ep) { + ND_PRINT((ndo, "...)")); + goto bs_done; + } + ND_PRINT((ndo, " RPcnt=%d", bp[0])); + if (bp + 1 >= ep) { + ND_PRINT((ndo, "...)")); + goto bs_done; + } + ND_PRINT((ndo, " FRPcnt=%d", frpcnt = bp[1])); + bp += 4; + + for (j = 0; j < frpcnt && bp < ep; j++) { + /* each RP info */ + ND_PRINT((ndo, " RP%d=", j)); + if ((advance = pimv2_addr_print(ndo, bp, + pimv2_unicast, + 0)) < 0) { + ND_PRINT((ndo, "...)")); + goto bs_done; + } + bp += advance; + + if (bp + 1 >= ep) { + ND_PRINT((ndo, "...)")); + goto bs_done; + } + ND_PRINT((ndo, ",holdtime=")); + relts_print(ndo, EXTRACT_16BITS(bp)); + if (bp + 2 >= ep) { + ND_PRINT((ndo, "...)")); + goto bs_done; + } + ND_PRINT((ndo, ",prio=%d", bp[2])); + bp += 4; + } + ND_PRINT((ndo, ")")); + } + bs_done: + break; + } + case PIMV2_TYPE_ASSERT: + bp += 4; len -= 4; + if (bp >= ep) + break; + ND_PRINT((ndo, " group=")); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_group, 0)) < 0) { + ND_PRINT((ndo, "...")); + break; + } + bp += advance; len -= advance; + if (bp >= ep) + break; + ND_PRINT((ndo, " src=")); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_unicast, 0)) < 0) { + ND_PRINT((ndo, "...")); + break; + } + bp += advance; len -= advance; + if (bp + 8 > ep) + break; + if (bp[0] & 0x80) + ND_PRINT((ndo, " RPT")); + ND_PRINT((ndo, " pref=%u", EXTRACT_32BITS(&bp[0]) & 0x7fffffff)); + ND_PRINT((ndo, " metric=%u", EXTRACT_32BITS(&bp[4]))); + break; + + case PIMV2_TYPE_CANDIDATE_RP: + { + int i, pfxcnt; + bp += 4; + + /* Prefix-Cnt, Priority, and Holdtime */ + if (bp >= ep) break; + ND_PRINT((ndo, " prefix-cnt=%d", bp[0])); + pfxcnt = bp[0]; + if (bp + 1 >= ep) break; + ND_PRINT((ndo, " prio=%d", bp[1])); + if (bp + 3 >= ep) break; + ND_PRINT((ndo, " holdtime=")); + relts_print(ndo, EXTRACT_16BITS(&bp[2])); + bp += 4; + + /* Encoded-Unicast-RP-Address */ + if (bp >= ep) break; + ND_PRINT((ndo, " RP=")); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_unicast, 0)) < 0) { + ND_PRINT((ndo, "...")); + break; + } + bp += advance; + + /* Encoded-Group Addresses */ + for (i = 0; i < pfxcnt && bp < ep; i++) { + ND_PRINT((ndo, " Group%d=", i)); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_group, 0)) + < 0) { + ND_PRINT((ndo, "...")); + break; + } + bp += advance; + } + break; + } + + case PIMV2_TYPE_PRUNE_REFRESH: + ND_PRINT((ndo, " src=")); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_unicast, 0)) < 0) { + ND_PRINT((ndo, "...")); + break; + } + bp += advance; + ND_PRINT((ndo, " grp=")); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_group, 0)) < 0) { + ND_PRINT((ndo, "...")); + break; + } + bp += advance; + ND_PRINT((ndo, " forwarder=")); + if ((advance = pimv2_addr_print(ndo, bp, pimv2_unicast, 0)) < 0) { + ND_PRINT((ndo, "...")); + break; + } + bp += advance; + ND_TCHECK2(bp[0], 2); + ND_PRINT((ndo, " TUNR ")); + relts_print(ndo, EXTRACT_16BITS(bp)); + break; + + + default: + ND_PRINT((ndo, " [type %d]", PIM_TYPE(pim->pim_typever))); + break; + } + + return; + +trunc: + ND_PRINT((ndo, "[|pim]")); } + +/* + * Local Variables: + * c-style: whitesmith + * c-basic-offset: 8 + * End: + */