/* packet-pim.c * Routines for PIM disassembly * (c) Copyright Jun-ichiro itojun Hagino * * Wireshark - Network traffic analyzer * By Gerald Combs * Copyright 1998 Gerald Combs * * SPDX-License-Identifier: GPL-2.0-or-later */ #include "config.h" #include #include #include #include #include #include #include #include "packet-igmp.h" void proto_register_pim(void); void proto_reg_handoff_pim(void); #define PIM_TYPE(x) ((x) & 0x0f) #define PIM_VER(x) (((x) & 0xf0) >> 4) #define PIM_BIDIR_SUBTYPE(x) ((x) & 0x0f) #define PIM_SUBTYPE(x) (((x) & 0xf0) >> 4) /* PIM message type */ #define PIM_TYPE_HELLO 0 /* Hello [RFC3973][RFC4601] */ #define PIM_TYPE_REGISTER 1 /* Register [RFC4601] */ #define PIM_TYPE_REGISTER_STOP 2 /* Register Stop [RFC4601] */ #define PIM_TYPE_JOIN_PRUNE 3 /* Join/Prune [RFC3973][RFC4601] */ #define PIM_TYPE_BOOTSTRAP 4 /* Bootstrap [RFC4601] */ #define PIM_TYPE_ASSERT 5 /* Assert [RFC3973][RFC4601] */ #define PIM_TYPE_GRAFT 6 /* Graft [RFC3973] */ #define PIM_TYPE_GRAFT_ACK 7 /* Graft-Ack [RFC3973] */ #define PIM_TYPE_CAND_RP_ADV 8 /* Candidate RP Advertisement [RFC4601] */ #define PIM_TYPE_STATE_REFRESH 9 /* State Refresh [RFC3973] */ #define PIM_TYPE_DF_ELECT 10 /* DF Election [RFC5015] */ #define PIM_TYPE_ECMP_REDIR 11 /* ECMP Redirect [RFC6754] */ #define PIM_TYPE_PFM 12 /* PIM PFM [RFC8364] */ #define PIM_TYPE_PACKED_REGISTER 13 /* PIM PFM [RFC9465] */ /* PIM Message Subtypes */ #define PIM_TYPE_PACKED_NULL_REGISTER 0 /* 13.0 */ #define PIM_TYPE_PACKED_REGISTER_STOP 1 /* 13.1 */ /* PIM Message hello options */ #define PIM_HELLO_HOLD_T 1 /* Hold Time [RFC7761] */ #define PIM_HELLO_LAN_PRUNE_DELAY 2 /* LAN Prune Delay [RFC3973] */ #define PIM_HELLO_LABEL_PARA 17 /* Label Parameters [Dino_Farinacci] */ #define PIM_HELLO_DEPRECATED_18 18 /* Deprecated */ #define PIM_HELLO_DR_PRIORITY 19 /* DR Priority [RFC7761] */ #define PIM_HELLO_GEN_ID 20 /* Generation ID [RFC3973] */ #define PIM_HELLO_STATE_REFRESH 21 /* State-Refresh [RFC3973] */ #define PIM_HELLO_BIDIR_CAPA 22 /* Bidirectional Capable [RFC5015] */ #define PIM_HELLO_VCI_CAPA 23 /* VCI Capability */ #define PIM_HELLO_VAR_ADDR_LST 24 /* variable Address List [RF7761] */ #define PIM_HELLO_VAR_NEIG_LST 25 /* variable Neighbor List TLV */ #define PIM_HELL0_JOIN_ATTR 26 /* Join Attribute [RFC5384] */ #define PIM_HELLO_O_TCP_CAPA 27 /* variable PIM-over-TCP-Capable [RFC6559] */ #define PIM_HELLO_O_SCTP_CAPA 28 /* variable PIM-over-SCTP-Capable [RFC6559] */ #define PIM_HELLO_VAR_POP_COUNT 29 /* variable Pop-Count [RFC6807] */ #define PIM_HELLO_MT_ID 30 /* PIM MT-ID [RFC6420] */ #define PIM_HELLO_INT_ID 31 /* Interface ID [RFC6395] */ #define PIM_HELLO_ECMP_REDIR 32 /* PIM ECMP Redirect Hello Option [RFC6754] */ #define PIM_HELLO_VPC_PEER_ID 33 /* 2 vPC Peer ID */ #define PIM_HELLO_DR_LB_CAPA 34 /* variable DR Load Balancing Capability [RFC8775] */ #define PIM_HELLO_DR_LB_LIST 35 /* variable DR Load Balancing List [RFC8775] */ #define PIM_HELLO_HIER_JP_ATTR 36 /* Hierarchical Join/Prune Attribute [RFC7887] */ #define PIM_HELLO_ADDR_LST 65001 /* Address list, old implementation */ #define PIM_HELLO_RPF_PROXY 65004 /* RPF Proxy Vector (Cisco proprietary) */ /* PIM PFM message */ #define PIM_PFM_GROUP_SOURCE 1 /* Source Group Holdtime [RFC8364] */ /* PIM BIDIR DF election messages */ #define PIM_BDIR_DF_OFFER 1 #define PIM_BDIR_DF_WINNER 2 #define PIM_BDIR_DF_BACKOFF 3 #define PIM_BDIR_DF_PASS 4 /* PIM Address Encoding Types */ #define PIM_ADDR_ET_NATIVE 0 /* RFC7761 */ #define PIM_ADDR_ET_NATIVE_JA 1 /* RFC5384 */ #define PIM_TRANSPORT_MODE_MULTICAST 0 /*RFC8059*/ #define PIM_TRANSPORT_MODE_UNICAST_REPLICATION 1 /*RFC8059*/ #define PIM_JOIN_ATTRIBUTE_TYPE_RPF 0 /* RFC5496 */ #define PIM_JOIN_ATTRIBUTE_TYPE_MVPN 1 /* RFC6513 */ #define PIM_JOIN_ATTRIBUTE_TYPE_MTID 2 /* RFC6420 */ #define PIM_JOIN_ATTRIBUTE_TYPE_PC 3 /* RFC6807 */ #define PIM_JOIN_ATTRIBUTE_TYPE_EX_RPF 4 /* RFC7891 */ #define PIM_JOIN_ATTRIBUTE_TYPE_TA 5 /* RFC8059 */ #define PIM_JOIN_ATTRIBUTE_TYPE_RLOC 6 /* RFC8059 */ #define PIM_GROUP_ADDR_FLAGS_B 0x80 #define PIM_GROUP_ADDR_FLAGS_RESERVED 0x7E #define PIM_GROUP_ADDR_FLAGS_Z 0x01 #define PIM_SOURCE_ADDR_FLAGS_RESERVED 0xF8 #define PIM_SOURCE_ADDR_FLAGS_S 0x04 #define PIM_SOURCE_ADDR_FLAGS_W 0x02 #define PIM_SOURCE_ADDR_FLAGS_R 0x01 #define PIM_SOURCE_JA_FLAGS_F 0x80 #define PIM_SOURCE_JA_FLAGS_E 0x40 #define PIM_SOURCE_JA_FLAGS_ATTR_TYPE 0x3F static const value_string pimtypevals[] = { { PIM_TYPE_HELLO, "Hello" }, { PIM_TYPE_REGISTER, "Register" }, { PIM_TYPE_REGISTER_STOP, "Register-stop" }, { PIM_TYPE_JOIN_PRUNE, "Join/Prune" }, { PIM_TYPE_BOOTSTRAP, "Bootstrap" }, { PIM_TYPE_ASSERT, "Assert" }, { PIM_TYPE_GRAFT, "Graft" }, { PIM_TYPE_GRAFT_ACK, "Graft-Ack" }, { PIM_TYPE_CAND_RP_ADV, "Candidate-RP-Advertisement" }, { PIM_TYPE_STATE_REFRESH, "State-Refresh" }, { PIM_TYPE_DF_ELECT, "DF election"}, { PIM_TYPE_ECMP_REDIR, "ECMP redirect" }, { PIM_TYPE_PFM, "PFM source discovery"}, { PIM_TYPE_PACKED_REGISTER, "Packed Register"}, { 0, NULL } }; /* * List of subtypes for PIM message Type 13. */ static const value_string pimtype13subtypevals[] = { { PIM_TYPE_PACKED_NULL_REGISTER, "Packed Null-Register" }, { PIM_TYPE_PACKED_REGISTER_STOP, "Packed Register-Stop" }, { 0, NULL } }; static const value_string pimbdirdfvals[] = { { PIM_BDIR_DF_OFFER, "offer"}, { PIM_BDIR_DF_WINNER, "DF Winner"}, { PIM_BDIR_DF_BACKOFF, "DF Backoff"}, { PIM_BDIR_DF_PASS, "DF Pass"}, { 0, NULL } }; static const value_string pim_opt_vals[] = { { PIM_HELLO_HOLD_T, "Hold Time" }, { PIM_HELLO_LAN_PRUNE_DELAY, "LAN Prune Delay" }, { PIM_HELLO_LABEL_PARA, "Label Parameters" }, { PIM_HELLO_DEPRECATED_18, "Deprecated" }, { PIM_HELLO_DR_PRIORITY, "DR Priority" }, { PIM_HELLO_GEN_ID, "Generation ID" }, { PIM_HELLO_STATE_REFRESH, "State-Refresh" }, { PIM_HELLO_BIDIR_CAPA, "Bidirectional Capable" }, { PIM_HELLO_VCI_CAPA, "VCI Capability" }, { PIM_HELLO_VAR_ADDR_LST, "Address List" }, { PIM_HELLO_VAR_NEIG_LST, "Neighbor List TLV" }, { PIM_HELL0_JOIN_ATTR, "Join Attribute" }, { PIM_HELLO_O_TCP_CAPA, "PIM-over-TCP-Capable" }, { PIM_HELLO_O_SCTP_CAPA, "PIM-over-SCTP-Capable" }, { PIM_HELLO_VAR_POP_COUNT, "Pop-Count" }, { PIM_HELLO_MT_ID, "PIM MT-ID" }, { PIM_HELLO_INT_ID, "Interface ID" }, { PIM_HELLO_ECMP_REDIR, "PIM ECMP Redirect Hello Option" }, { PIM_HELLO_VPC_PEER_ID, "vPC Peer ID" }, { PIM_HELLO_DR_LB_CAPA, "DR Load Balancing Capability" }, { PIM_HELLO_DR_LB_LIST, "DR Load Balancing List" }, { PIM_HELLO_HIER_JP_ATTR, "Hierarchical Join/Prune Attribute" }, { PIM_HELLO_ADDR_LST, "Address list, old implementation" }, { PIM_HELLO_RPF_PROXY, "RPF Proxy Vector (Cisco proprietary)" }, { 0, NULL } }; static const value_string pim_opt_vals1[] = { { PIM_PFM_GROUP_SOURCE, "Group Source Holdtime TLV" }, { 0, NULL } }; static const value_string pim_addr_et_vals[] = { { PIM_ADDR_ET_NATIVE, "Native"}, { PIM_ADDR_ET_NATIVE_JA, "Native with Join Attribute"}, { 0, NULL } }; static const value_string attribute_transport_mode[] = { {PIM_TRANSPORT_MODE_UNICAST_REPLICATION, "Unicast Replication"}, {PIM_TRANSPORT_MODE_MULTICAST, "Multicast"}, {0, NULL}}; static const value_string pim_join_attribute_type_vals[] = { { PIM_JOIN_ATTRIBUTE_TYPE_RPF, "RPF Vector TLV"}, { PIM_JOIN_ATTRIBUTE_TYPE_MVPN, "MVPN Join Attribute"}, { PIM_JOIN_ATTRIBUTE_TYPE_MTID, "MT-ID Join Attribute"}, { PIM_JOIN_ATTRIBUTE_TYPE_PC, "Pop-Count"}, { PIM_JOIN_ATTRIBUTE_TYPE_EX_RPF, "Explicit RPF Vector"}, { PIM_JOIN_ATTRIBUTE_TYPE_TA, "Transport Attribute"}, { PIM_JOIN_ATTRIBUTE_TYPE_RLOC, "Receiver RLOC Attribute"}, { 0, NULL } }; enum pimv2_addrtype { pimv2_unicast, pimv2_group, pimv2_source }; static int proto_pim; static int hf_pim_version; static int hf_pim_type; static int hf_pim_code; static int hf_pim_igmp_type; static int hf_pim_df_elect_subtype; static int hf_pim_df_elect_rsvd; static int hf_pim_cksum; static int hf_pim_cksum_status; static int hf_pim_res_bytes; static int hf_pim_reg_stop_p_bit; static int hf_pim_type_13_subtype; static int hf_pim_type_13_flagbits; /* PIM Hello options (RFC 4601, section 4.9.2 and RFC 3973, section 4.7.5) */ static int hf_pim_option; static int hf_pim_optiontype; static int hf_pim_optionlength; static int hf_pim_optionvalue; static int hf_pim_register_flag; static int hf_pim_register_flag_border; static int hf_pim_register_flag_null_register; static int hf_pim_mode; static int hf_pim_holdtime; static int hf_pim_holdtime_t; static int hf_pim_numgroups; static int hf_pim_numjoins; static int hf_pim_numprunes; static int hf_pim_t; static int hf_pim_propagation_delay; static int hf_pim_override_interval; static int hf_pim_dr_priority; static int hf_pim_generation_id; static int hf_pim_state_refresh_version; static int hf_pim_state_refresh_interval; static int hf_pim_state_refresh_reserved; /* Assert fields */ static int hf_pim_rpt; static int hf_pim_metric_pref; static int hf_pim_df_metric_pref; static int hf_pim_metric; static int hf_pim_prune_indicator; static int hf_pim_prune_now; static int hf_pim_assert_override; static int hf_pim_ip_version; static int hf_pim_dummy_header; static int hf_pim_source_ip4; static int hf_pim_source_ip6; static int hf_pim_group_ip4; static int hf_pim_group_ip6; static int hf_pim_group_mask_ip4; static int hf_pim_upstream_neighbor_ip4; static int hf_pim_upstream_neighbor_ip6; static int hf_pim_join_ip4; static int hf_pim_join_ip6; static int hf_pim_prune_ip4; static int hf_pim_prune_ip6; static int hf_pim_address_list_ip4; static int hf_pim_address_list_ip6; static int hf_pim_bsr_ip4; static int hf_pim_bsr_ip6; static int hf_pim_rp_ip4; static int hf_pim_rp_ip6; static int hf_pim_bd_bo_offer_ip4; static int hf_pim_bd_bo_offer_ip6; static int hf_pim_bd_offer_metric_pref; static int hf_pim_bd_offer_metric; static int hf_pim_bd_offer_interval; static int hf_pim_bd_pass_ip4; static int hf_pim_bd_pass_ip6; static int hf_pim_bd_pass_metric_pref; static int hf_pim_bd_pass_metric; static int hf_pim_originator_ip4; static int hf_pim_originator_ip6; static int hf_pim_group_address_ip4; static int hf_pim_fragment_tag; static int hf_pim_hash_mask_len; static int hf_pim_bsr_priority; static int hf_pim_rp_count; static int hf_pim_frp_count; static int hf_pim_priority; static int hf_pim_prefix_count; static int hf_pim_addr_len; static int hf_pim_src_flags_a; static int hf_pim_src_flags_s; static int hf_pim_src_flags_w; static int hf_pim_src_flags_r; static int hf_pim_src_flags_rsv; static int hf_pim_mask_len; static int hf_pim_addr_af; static int hf_pim_addr_et; static int hf_pim_unicast_addr_ipv4; static int hf_pim_unicast_addr_ipv6; static int hf_pim_rloc_addr_ipv4; static int hf_pim_rloc_addr_ipv6; static int hf_pim_attribute_transport_mode; static int hf_pim_group; static int hf_pim_group_addr_flags; static int hf_pim_group_addr_flags_b; static int hf_pim_group_addr_flags_reserved; static int hf_pim_group_addr_flags_z; static int hf_pim_source_addr_flags; static int hf_pim_source_addr_flags_reserved; static int hf_pim_source_addr_flags_s; static int hf_pim_source_addr_flags_w; static int hf_pim_source_addr_flags_r; static int hf_pim_source_join_attribute; static int hf_pim_source_ja_flags; static int hf_pim_source_ja_flags_f; static int hf_pim_source_ja_flags_e; static int hf_pim_source_ja_flags_attr_type; static int hf_pim_source_ja_length; static int hf_pim_source_ja_value; static int hf_pim_ttl; static int hf_pim_interval; static int hf_pim_srcount; static int hf_pim_srcholdt; static int hf_pim_transitivetype; static int hf_pim_optiontype1; static int hf_pfm_no_forward_bit; static int ett_pim; static int ett_pim_opts; static int ett_pim_opt; static int ett_pim_addr_flags; static expert_field ei_pim_cksum; static dissector_handle_t pim_handle; static dissector_handle_t pimv1_handle; static dissector_handle_t ip_handle; static dissector_handle_t ipv6_handle; static bool use_main_tree = true; /* * The Story About Ping^WPIM: * * http://www.cs.usc.edu/assets/003/83187.pdf * * dated January 11, 1995, entitled "Protocol Independent Multicast (PIM): * Protocol Specification", calls itself draft-ietf-idmr-pim-spec-01, * and is in PostScript-converted-to-PDF form. It describes a protocol * that runs atop IGMP, with a type of 4 for "Router PIM Messages", and * a PIM version number field of 1. * * https://tools.ietf.org/html/draft-ietf-idmr-pim-sm-spec-00 * * dated September 7, 1995, and * * https://tools.ietf.org/html/draft-ietf-idmr-pim-spec-02 * * dated September 7, 1995, both entitled "Protocol Independent Multicast- * Sparse Mode (PIM-SM): Protocol Specification", describe a protocol that * runs atop IGMP, with a type of 4 for "Router PIM Messages", and a PIM * version number field of 2. * * https://tools.ietf.org/html/draft-ietf-idmr-pim-sm-spec-03 * * dated June 6, 1996, and all subsequent drafts, and RFC 2117, dated * June 1997, all entitled "Protocol Independent Multicast-Sparse Mode * (PIM-SM): Protocol Specification", describe a protocol that runs * atop IP, with a protocol number of 103, and with a PIM version number * field of 2. RFC 2117 was obsoleted by RFC 2362, which was obsoleted by * RFC 4601. * * None of them, including the PDF from USC, appear to describe the protocol * dissected by the dissect_pimv1() code. In particular, none have a * packet type value of 8 meaning "Mode"; the PDF from USC doesn't mention * it at all, and subsequent drafts and RFC 2117 have (Candidate-)RP- * Advertisement. Perhaps what's dissected by dissect_pimv1() was * something between the PDF and draft-ietf-idmr-pim-spec-02. * * Looking at the Dense Mode specs, * * https://tools.ietf.org/html/draft-ietf-idmr-pim-dm-spec-02 * * entitled "Protocol Independent Multicast-Dense Mode (PIM-DM): Protocol * Specification", dated September 1995, describes a protocol that runs * atop IGMP, with a type of 4 for "Router PIM Messages", and with a PIM * version number field of 2. * * RFC 3973, entitled "Protocol Independent Multicast-Dense Mode (PIM-DM): * Protocol Specification", also describes a protocol that runs atop IP, * with a protocol number of 103, and with a PIM version number field of 2. */ static int * const pim_src_flags_fields[] = { &hf_pim_src_flags_a, &hf_pim_src_flags_s, &hf_pim_src_flags_w, &hf_pim_src_flags_r, &hf_pim_src_flags_rsv, NULL }; static int * const pim_group_addr_flags[] = { &hf_pim_group_addr_flags_b, &hf_pim_group_addr_flags_reserved, &hf_pim_group_addr_flags_z, NULL }; static int * const pim_source_addr_flags[] = { &hf_pim_source_addr_flags_reserved, &hf_pim_source_addr_flags_s, &hf_pim_source_addr_flags_w, &hf_pim_source_addr_flags_r, NULL }; static int * const pim_source_ja_flags[] = { &hf_pim_source_ja_flags_f, &hf_pim_source_ja_flags_e, &hf_pim_source_ja_flags_attr_type, NULL }; static void dissect_pimv1_addr(tvbuff_t *tvb, int offset, proto_tree *pim_tree, int hf_ip) { proto_tree_add_bitmask_list(pim_tree, tvb, offset, 1, pim_src_flags_fields, ENC_BIG_ENDIAN); offset += 1; proto_tree_add_item(pim_tree, hf_pim_mask_len, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 1; proto_tree_add_item(pim_tree, hf_ip, tvb, offset, 4, ENC_BIG_ENDIAN); } static const value_string pim_type1_vals[] = { { 0, "Query" }, { 1, "Register" }, { 2, "Register-stop" }, { 3, "Join/Prune" }, { 4, "RP-Reachable" }, { 5, "Assert" }, { 6, "Graft" }, { 7, "Graft-Ack" }, { 8, "Mode" }, { 0, NULL }, }; static const value_string pimv1_modevals[] = { { 0, "Dense" }, { 1, "Sparse" }, { 2, "Sparse-Dense" }, { 0, NULL } }; static const value_string pim_ip_version_vals[] = { { 0, "Dummy Header" }, { 4, "IPv4" }, { 6, "IPv6" }, { 0, NULL } }; static const value_string unique_infinity[] = { { 0xffff, "Infinity" }, { 0, NULL } }; static const value_string unique_infinity_t[] = { { 0, "goodbye" }, { 0xffff, "Infinity" }, { 0, NULL } }; /* This function is only called from the IGMP dissector */ static int dissect_pimv1(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree, void* data _U_) { uint8_t pim_type; uint8_t pim_ver; unsigned length, pim_length; vec_t cksum_vec[1]; proto_tree *pim_tree = NULL; proto_item *ti; proto_tree *pimopt_tree = NULL; int offset = 0; col_set_str(pinfo->cinfo, COL_PROTOCOL, "PIMv1"); col_clear(pinfo->cinfo, COL_INFO); ti = proto_tree_add_item(tree, proto_pim, tvb, offset, -1, ENC_NA); pim_tree = proto_item_add_subtree(ti, ett_pim); /* Put IGMP type, 0x14, into the tree */ proto_tree_add_string(pim_tree, hf_pim_igmp_type, tvb, offset, 0, "PIM (0x14)"); offset += 1; pim_type = tvb_get_uint8(tvb, offset); col_add_str(pinfo->cinfo, COL_INFO, val_to_str(pim_type, pim_type1_vals, "Unknown (%u)")); proto_tree_add_uint(pim_tree, hf_pim_code, tvb, offset, 1, pim_type); offset += 1; pim_ver = PIM_VER(tvb_get_uint8(tvb, offset + 2)); if (pim_ver != 1) { proto_tree_add_checksum(pim_tree, tvb, offset, hf_pim_cksum, hf_pim_cksum_status, &ei_pim_cksum, pinfo, 0, ENC_BIG_ENDIAN, PROTO_CHECKSUM_NO_FLAGS); /* * Not PIMv1; should we bother dissecting the PIM drafts * with a version number of 2 and with PIM running atop * IGMP? */ offset += 2; proto_tree_add_item(pim_tree, hf_pim_version, tvb, offset, 1, ENC_BIG_ENDIAN); return offset+tvb_reported_length_remaining(tvb, offset); } /* * Well, it's PIM v1, so we can check whether this is a * Register message, and thus can figure out how much to * checksum and whether to make the columns read-only. */ length = tvb_reported_length(tvb); if (pim_type == 1) { /* * Register message - the PIM header is 8 bytes long. * Also set the columns non-writable. Otherwise the IPv4 or * IPv6 dissector for the encapsulated packet that caused * this register will overwrite the PIM info in the columns. * * XXX - that's not what draft-ietf-idmr-pim-spec-01 or * draft-ietf-idmr-pim-spec-02 say; they say that the checksum * covers the entire IGMP message. Later drafts say it * doesn't cover the encapsulated packet; perhaps that's what * was always intended, and they just felt they needed to * explicitly state that. */ pim_length = 8; col_set_writable(pinfo->cinfo, -1, false); } else { /* * Other message - checksum the entire packet. */ pim_length = length; } if (!pinfo->fragmented && length >= pim_length && tvb_captured_length(tvb) >= pim_length) { /* * The packet isn't part of a fragmented datagram and isn't * truncated, so we can checksum it. */ SET_CKSUM_VEC_TVB(cksum_vec[0], tvb, 0, pim_length); proto_tree_add_checksum(pim_tree, tvb, offset, hf_pim_cksum, hf_pim_cksum_status, &ei_pim_cksum, pinfo, in_cksum(&cksum_vec[0], 1), ENC_BIG_ENDIAN, PROTO_CHECKSUM_VERIFY|PROTO_CHECKSUM_IN_CKSUM); } else { proto_tree_add_checksum(pim_tree, tvb, offset, hf_pim_cksum, hf_pim_cksum_status, &ei_pim_cksum, pinfo, 0, ENC_BIG_ENDIAN, PROTO_CHECKSUM_NO_FLAGS); } offset += 2; proto_tree_add_item(pim_tree, hf_pim_version, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 1; /* reserved stuff */ proto_tree_add_item(pim_tree, hf_pim_res_bytes, tvb, offset, 3, ENC_NA); offset += 3; if (tvb_reported_length_remaining(tvb, offset) > 0) { proto_item *subitem; subitem = proto_tree_add_item(pim_tree, hf_pim_option, tvb, offset, -1, ENC_NA); pimopt_tree = proto_item_add_subtree(subitem, ett_pim_opts); } else return offset; /* version 1 decoder */ switch (pim_type) { case 0: /* query */ { proto_tree_add_item(pimopt_tree, hf_pim_mode, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 2; proto_tree_add_item(pimopt_tree, hf_pim_holdtime, tvb, offset, 2, ENC_BIG_ENDIAN); offset += 2; break; } case 1: /* register */ { uint8_t v_hl; tvbuff_t *next_tvb; /* * The rest of the packet is a multicast data packet. */ next_tvb = tvb_new_subset_remaining(tvb, offset); /* * It's an IP packet - determine whether it's IPv4 or IPv6. */ v_hl = tvb_get_uint8(tvb, offset); proto_tree_add_item(pimopt_tree, hf_pim_ip_version, tvb, offset, 1, ENC_BIG_ENDIAN); switch((v_hl & 0xf0) >> 4) { case 0: /* Null-Register dummy header. * Has the same address family as the encapsulating PIM packet, * e.g. an IPv6 data packet is encapsulated in IPv6 PIM packet. */ ti = proto_tree_add_item(pimopt_tree, hf_pim_dummy_header, tvb, offset, -1, ENC_NA); if (pinfo->src.type == AT_IPv4) { proto_item_append_text(ti, " IPv4"); proto_tree_add_item(pimopt_tree, hf_pim_source_ip4, tvb, offset + 12, 4, ENC_BIG_ENDIAN); proto_tree_add_item(pimopt_tree, hf_pim_group_ip4, tvb, offset + 16, 4, ENC_BIG_ENDIAN); } else if (pinfo->src.type == AT_IPv6) { proto_item_append_text(ti, " IPv6"); proto_tree_add_item(pimopt_tree, hf_pim_source_ip6, tvb, offset + 8, 16, ENC_NA); proto_tree_add_item(pimopt_tree, hf_pim_group_ip6, tvb, offset + 8 + 16, 16, ENC_NA); } else proto_item_append_text(ti, " for an unknown protocol"); break; case 4: /* IPv4 */ if (use_main_tree) { call_dissector(ip_handle, next_tvb, pinfo, tree); } else { call_dissector(ip_handle, next_tvb, pinfo, pimopt_tree); } break; case 6: /* IPv6 */ if (use_main_tree) { call_dissector(ipv6_handle, next_tvb, pinfo, tree); } else { call_dissector(ipv6_handle, next_tvb, pinfo, pimopt_tree); } break; default: break; } break; } case 2: /* register-stop */ { proto_tree_add_item(pimopt_tree, hf_pim_group_ip4, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; proto_tree_add_item(pimopt_tree, hf_pim_source_ip4, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; break; } case 3: /* join/prune */ case 6: /* graft */ case 7: /* graft-ack */ { int off; int ngroup, i, njoin, nprune, j; proto_tree *grouptree = NULL; proto_item *tigroup; proto_tree *subtree = NULL; proto_item *tisub; proto_tree_add_item(pimopt_tree, hf_pim_upstream_neighbor_ip4, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; /* reserved stuff */ proto_tree_add_item(pim_tree, hf_pim_res_bytes, tvb, offset, 2, ENC_NA); offset += 2; proto_tree_add_item(pimopt_tree, hf_pim_holdtime, tvb, offset, 2, ENC_BIG_ENDIAN); offset += 2; /* reserved stuff */ proto_tree_add_item(pim_tree, hf_pim_res_bytes, tvb, offset, 1, ENC_NA); offset += 1; proto_tree_add_item(pimopt_tree, hf_pim_mask_len, tvb, offset, 1, ENC_NA); offset += 1; proto_tree_add_item(pimopt_tree, hf_pim_addr_len, tvb, offset, 1, ENC_NA); offset += 1; ngroup = tvb_get_uint8(tvb, offset); proto_tree_add_item(pimopt_tree, hf_pim_numgroups, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 1; for (i = 0; i < ngroup; i++) { /* * XXX - does the group address have the length "adr_len" * and the group mask the length "mask_len"? */ tigroup = proto_tree_add_ipv4_format(pimopt_tree, hf_pim_group_ip4, tvb, offset, 4, tvb_get_ipv4(tvb, offset), "Group %d: %s", i, tvb_ip_to_str(pinfo->pool, tvb, offset)); grouptree = proto_item_add_subtree(tigroup, ett_pim); offset += 4; proto_tree_add_ipv4_format(grouptree, hf_pim_group_mask_ip4, tvb, offset, 4, tvb_get_ipv4(tvb, offset), "Group %d Mask: %s", i, tvb_ip_to_str(pinfo->pool, tvb, offset)); offset += 4; njoin = tvb_get_ntohs(tvb, offset); nprune = tvb_get_ntohs(tvb, offset + 2); tisub = proto_tree_add_item(grouptree, hf_pim_numjoins, tvb, offset, 2, ENC_BIG_ENDIAN); subtree = proto_item_add_subtree(tisub, ett_pim); off = offset + 4; for (j = 0; j < njoin; j++) { dissect_pimv1_addr(tvb, off, subtree, hf_pim_join_ip4); off += 6; } tisub = proto_tree_add_item(grouptree, hf_pim_numprunes, tvb, offset + 2, 2, ENC_BIG_ENDIAN); subtree = proto_item_add_subtree(tisub, ett_pim); for (j = 0; j < nprune; j++) { dissect_pimv1_addr(tvb, off, subtree, hf_pim_prune_ip4); off += 6; } offset = off; } break; } case 4: /* rp-reachability */ { proto_tree_add_item(pimopt_tree, hf_pim_group_address_ip4, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; proto_tree_add_item(pimopt_tree, hf_pim_group_mask_ip4, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; proto_tree_add_item(pimopt_tree, hf_pim_rp_ip4, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; /* reserved stuff */ proto_tree_add_item(pim_tree, hf_pim_res_bytes, tvb, offset, 2, ENC_NA); offset += 2; proto_tree_add_item(pimopt_tree, hf_pim_holdtime, tvb, offset, 2, ENC_BIG_ENDIAN); offset += 2; break; } case 5: /* assert */ { proto_tree_add_item(pimopt_tree, hf_pim_group_address_ip4, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; proto_tree_add_item(pimopt_tree, hf_pim_group_mask_ip4, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; proto_tree_add_item(pimopt_tree, hf_pim_rpt, tvb, offset, 1, ENC_BIG_ENDIAN); proto_tree_add_item(pimopt_tree, hf_pim_metric_pref, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; proto_tree_add_item(pimopt_tree, hf_pim_metric, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; break; } default: break; } return offset; } static bool // NOLINTNEXTLINE(misc-no-recursion) dissect_pim_addr(packet_info *pinfo, proto_tree* tree, tvbuff_t *tvb, int offset, enum pimv2_addrtype at, const char* label, proto_item** ret_item, int hf_ip4, int hf_ip6, int *advance) { uint8_t af, et, flags, mask_len, ja_af; ws_in6_addr ipv6; uint32_t ipv4 = 0; proto_item* ti = NULL; proto_tree* addr_tree = NULL; proto_item *rloc_tree = NULL; proto_tree *rloc_sub_tree = NULL; proto_tree* ja_tree = NULL; int len = 0; int ja_offset = 0; uint8_t ja_eos_type = 0; uint8_t ja_length = 0; int ja_length_sum = 0; af = tvb_get_uint8(tvb, offset); if (af != AFNUM_INET && af != AFNUM_INET6) { /* * We don't handle the other formats, and addresses don't include * a length field, so we can't even show them as raw bytes. */ return false; } et = tvb_get_uint8(tvb, offset + 1); if ((et != PIM_ADDR_ET_NATIVE) && (et != PIM_ADDR_ET_NATIVE_JA)) { /* * The only defined encoding type is 0 and 1, for the native encoding * and native with Join Attribute TLVs; * again, as addresses don't include a length field, we can't * even show addresses with a different encoding type as raw * bytes. */ return false; } switch (at) { case pimv2_unicast: switch (af) { case AFNUM_INET: len = 4; ipv4 = tvb_get_ipv4(tvb, offset + 2); if (label) { ti = proto_tree_add_ipv4_format(tree, hf_ip4, tvb, offset, 2 + len, ipv4, "%s: %s", label, tvb_ip_to_str(pinfo->pool, tvb, offset + 2)); } else { ti = proto_tree_add_ipv4(tree, hf_ip4, tvb, offset, 2 + len, ipv4); } break; case AFNUM_INET6: len = 16; tvb_get_ipv6(tvb, offset + 2, &ipv6); if (label) { ti = proto_tree_add_ipv6_format(tree, hf_ip6, tvb, offset, 2 + len, &ipv6, "%s: %s", label, tvb_ip6_to_str(pinfo->pool, tvb, offset + 2)); } else { ti = proto_tree_add_ipv6(tree, hf_ip6, tvb, offset, 2 + len, &ipv6); } break; } addr_tree = proto_item_add_subtree(ti, ett_pim); proto_tree_add_item(addr_tree, hf_pim_addr_af, tvb, offset, 1, ENC_NA); proto_tree_add_item(addr_tree, hf_pim_addr_et, tvb, offset+1, 1, ENC_NA); switch (af) { case AFNUM_INET: proto_tree_add_item(addr_tree, hf_pim_unicast_addr_ipv4, tvb, offset+2, 4, ENC_BIG_ENDIAN); break; case AFNUM_INET6: proto_tree_add_item(addr_tree, hf_pim_unicast_addr_ipv6, tvb, offset+2, 16, ENC_NA); break; } if (et == PIM_ADDR_ET_NATIVE_JA){ ja_offset = offset + len + 2; while (((ja_eos_type & 0x40) != 0x40) && (tvb_reported_length_remaining(tvb, ja_offset) >= 2)){ ja_length = tvb_get_uint8(tvb, ja_offset+1); ti = proto_tree_add_item(addr_tree, hf_pim_source_join_attribute, tvb, ja_offset, ja_length + 2, ENC_NA); ja_tree = proto_item_add_subtree(ti, ett_pim); ja_eos_type = tvb_get_uint8(tvb, ja_offset); proto_tree_add_bitmask(ja_tree, tvb, ja_offset, hf_pim_source_ja_flags, ett_pim_addr_flags, pim_source_ja_flags, ENC_BIG_ENDIAN); proto_item_append_text(ti, ": %s", val_to_str_const(ja_eos_type & 0x3F, pim_join_attribute_type_vals, "Unknown")); ja_offset += 1; proto_tree_add_item(ja_tree, hf_pim_source_ja_length, tvb, ja_offset, 1, ENC_BIG_ENDIAN); ja_offset += 1; switch(ja_eos_type & 0x3F){ case PIM_JOIN_ATTRIBUTE_TYPE_TA: proto_tree_add_item(ja_tree, hf_pim_attribute_transport_mode, tvb, ja_offset, 1, ENC_NA); break; case PIM_JOIN_ATTRIBUTE_TYPE_RLOC: ja_af = tvb_get_uint8(tvb, offset); switch(ja_af) { case AFNUM_INET: rloc_tree = proto_tree_add_ipv4_format(ja_tree, hf_ip4, tvb, ja_offset, ja_length, ipv4, "RLOC: %s", tvb_ip_to_str(pinfo->pool, tvb, ja_offset+ 1)); rloc_sub_tree = proto_item_add_subtree(rloc_tree, ett_pim); proto_tree_add_item(rloc_sub_tree, hf_pim_addr_af, tvb, ja_offset, 1, ENC_NA); proto_tree_add_item(rloc_sub_tree, hf_pim_rloc_addr_ipv4, tvb, ja_offset + 1, 4, ENC_BIG_ENDIAN); break; case AFNUM_INET6: rloc_tree = proto_tree_add_ipv6_format(ja_tree, hf_ip6, tvb, ja_offset, ja_length, &ipv6, "RLOC: %s", tvb_ip_to_str(pinfo->pool, tvb, ja_offset+ 1)); rloc_sub_tree = proto_item_add_subtree(rloc_tree, ett_pim); proto_tree_add_item(rloc_sub_tree, hf_pim_addr_af, tvb, ja_offset, 1, ENC_NA); proto_tree_add_item(rloc_sub_tree, hf_pim_rloc_addr_ipv6, tvb, ja_offset + 1, 16, ENC_NA); break; } break; default: break; } ja_offset += ja_length; ja_length_sum += (2 + (int)ja_length); } *advance = 2 + len + ja_length_sum; break; } *advance = 2 + len; break; case pimv2_group: mask_len = tvb_get_uint8(tvb, offset + 3); switch (af) { case AFNUM_INET: len = 4; ipv4 = tvb_get_ipv4(tvb, offset + 4); if (label) { ti = proto_tree_add_ipv4_format(tree, hf_ip4, tvb, offset, 4 + len, ipv4, "%s: %s", label, tvb_ip_to_str(pinfo->pool, tvb, offset + 4)); } else { ti = proto_tree_add_ipv4(tree, hf_ip4, tvb, offset, 4 + len, ipv4); } proto_item_append_text(ti, "/%u", mask_len); break; case AFNUM_INET6: len = 16; tvb_get_ipv6(tvb, offset + 4, &ipv6); if (label) { ti = proto_tree_add_ipv6_format(tree, hf_ip6, tvb, offset, 4 + len, &ipv6, "%s: %s", label, tvb_ip6_to_str(pinfo->pool, tvb, offset + 4)); } else { ti = proto_tree_add_ipv6(tree, hf_ip6, tvb, offset, 4 + len, &ipv6); } proto_item_append_text(ti, "/%u", mask_len); break; } addr_tree = proto_item_add_subtree(ti, ett_pim); proto_tree_add_item(addr_tree, hf_pim_addr_af, tvb, offset, 1, ENC_NA); proto_tree_add_item(addr_tree, hf_pim_addr_et, tvb, offset+1, 1, ENC_NA); proto_tree_add_bitmask(addr_tree, tvb, offset+2, hf_pim_group_addr_flags, ett_pim_addr_flags, pim_group_addr_flags, ENC_BIG_ENDIAN); proto_tree_add_item(addr_tree, hf_pim_mask_len, tvb, offset+3, 1, ENC_NA); switch (af) { case AFNUM_INET: proto_tree_add_item(addr_tree, hf_pim_group_ip4, tvb, offset+4, 4, ENC_BIG_ENDIAN); break; case AFNUM_INET6: proto_tree_add_item(addr_tree, hf_pim_group_ip6, tvb, offset+4, 16, ENC_NA); break; } *advance = 4 + len; break; case pimv2_source: flags = tvb_get_uint8(tvb, offset + 2); mask_len = tvb_get_uint8(tvb, offset + 3); switch (af) { case AFNUM_INET: len = 4; ipv4 = tvb_get_ipv4(tvb, offset + 4); if (label) { ti = proto_tree_add_ipv4_format(tree, hf_ip4, tvb, offset, 4 + len, ipv4, "%s: %s", label, tvb_ip_to_str(pinfo->pool, tvb, offset + 4)); } else { ti = proto_tree_add_ipv4_format_value(tree, hf_ip4, tvb, offset, 4 + len, ipv4, "%s", tvb_ip_to_str(pinfo->pool, tvb, offset + 4)); } proto_item_append_text(ti, "/%u", mask_len); break; case AFNUM_INET6: len = 16; tvb_get_ipv6(tvb, offset + 4, &ipv6); if (label) { ti = proto_tree_add_ipv6_format(tree, hf_ip6, tvb, offset, 4 + len, &ipv6, "%s: %s", label, tvb_ip6_to_str(pinfo->pool, tvb, offset + 4)); } else { ti = proto_tree_add_ipv6_format_value(tree, hf_ip6, tvb, offset, 4 + len, &ipv6, "%s", tvb_ip6_to_str(pinfo->pool, tvb, offset + 4)); } proto_item_append_text(ti, "/%u", mask_len); break; } if (flags) { proto_item_append_text(ti, " (%s%s%s)", flags & 0x04 ? "S" : "", flags & 0x02 ? "W" : "", flags & 0x01 ? "R" : ""); } addr_tree = proto_item_add_subtree(ti, ett_pim); proto_tree_add_item(addr_tree, hf_pim_addr_af, tvb, offset, 1, ENC_NA); proto_tree_add_item(addr_tree, hf_pim_addr_et, tvb, offset+1, 1, ENC_NA); proto_tree_add_bitmask(addr_tree, tvb, offset+2, hf_pim_source_addr_flags, ett_pim_addr_flags, pim_source_addr_flags, ENC_BIG_ENDIAN); proto_tree_add_item(addr_tree, hf_pim_mask_len, tvb, offset+3, 1, ENC_NA); switch (af) { case AFNUM_INET: proto_tree_add_item(addr_tree, hf_pim_source_ip4, tvb, offset+4, 4, ENC_BIG_ENDIAN); break; case AFNUM_INET6: proto_tree_add_item(addr_tree, hf_pim_source_ip6, tvb, offset+4, 16, ENC_NA); break; } if (et == PIM_ADDR_ET_NATIVE_JA) { ja_offset = offset + 4 + len; while (((ja_eos_type & 0x40) != 0x40) && (tvb_reported_length_remaining(tvb, ja_offset) >= 2)) { ja_length = tvb_get_uint8(tvb, ja_offset+1); ti = proto_tree_add_item(addr_tree, hf_pim_source_join_attribute, tvb, ja_offset, ja_length + 2, ENC_NA); ja_tree = proto_item_add_subtree(ti, ett_pim); ja_eos_type = tvb_get_uint8(tvb, ja_offset); proto_tree_add_bitmask(ja_tree, tvb, ja_offset, hf_pim_source_ja_flags, ett_pim_addr_flags, pim_source_ja_flags, ENC_BIG_ENDIAN); proto_item_append_text(ti, ": %s", val_to_str_const(ja_eos_type & 0x3F, pim_join_attribute_type_vals, "Unknown")); ja_offset += 1; proto_tree_add_item(ja_tree, hf_pim_source_ja_length, tvb, ja_offset, 1, ENC_BIG_ENDIAN); ja_offset += 1; switch(ja_eos_type & 0x3F) { case PIM_JOIN_ATTRIBUTE_TYPE_RPF: if ((ja_length == 6) || (ja_length == 18)) { int advance_attr; // We recurse here, but we'll run out of packet before we run out of stack. if (!dissect_pim_addr(pinfo, ja_tree, tvb, ja_offset, pimv2_unicast, NULL, NULL, hf_pim_unicast_addr_ipv4, hf_pim_unicast_addr_ipv6, &advance_attr)) break; } else { proto_tree_add_item(ja_tree, hf_pim_source_ja_value, tvb, ja_offset, ja_length, ENC_NA); } break; case PIM_JOIN_ATTRIBUTE_TYPE_RLOC: ja_af = tvb_get_uint8(tvb, offset); switch(ja_af) { case AFNUM_INET: rloc_tree = proto_tree_add_ipv4_format(ja_tree, hf_ip4, tvb, ja_offset, ja_length, ipv4, "RLOC: %s", tvb_ip_to_str(pinfo->pool, tvb, ja_offset+ 1)); rloc_sub_tree = proto_item_add_subtree(rloc_tree, ett_pim); proto_tree_add_item(rloc_sub_tree, hf_pim_addr_af, tvb, ja_offset, 1, ENC_NA); proto_tree_add_item(rloc_sub_tree, hf_pim_rloc_addr_ipv4, tvb, ja_offset + 1, 4, ENC_BIG_ENDIAN); break; case AFNUM_INET6: rloc_tree = proto_tree_add_ipv6_format(ja_tree, hf_ip6, tvb, ja_offset, ja_length, &ipv6, "RLOC: %s", tvb_ip_to_str(pinfo->pool, tvb, ja_offset+ 1)); rloc_sub_tree = proto_item_add_subtree(rloc_tree, ett_pim); proto_tree_add_item(rloc_sub_tree, hf_pim_addr_af, tvb, ja_offset, 1, ENC_NA); proto_tree_add_item(rloc_sub_tree, hf_pim_rloc_addr_ipv6, tvb, ja_offset + 1, 16, ENC_NA); break; } break; default: proto_tree_add_item(ja_tree, hf_pim_source_ja_value, tvb, ja_offset, ja_length, ENC_NA); } ja_offset += ja_length; ja_length_sum += (2 + (int)ja_length); } } *advance = 4 + len + ja_length_sum; break; default: return false; } if (ret_item != NULL) *ret_item = ti; return true; } /* * For PIM v2, see RFC 4601, RFC 3973 and draft-ietf-pim-sm-v2-new-03 * (when PIM is run over IPv6, the rules for computing the PIM checksum * from the draft in question, not from RFC 2362, should be used). */ static int dissect_pim(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree, void* data _U_) { int offset = 0; uint8_t pim_typever; uint8_t pim_subtype; uint8_t pim_bidir_subtype = 0; unsigned length, pim_length; vec_t cksum_vec[4]; uint32_t phdr[2]; const char *typestr; proto_tree *pim_tree = NULL; proto_item *ti; proto_tree *pimopt_tree = NULL; proto_item *tiopt; col_set_str(pinfo->cinfo, COL_PROTOCOL, "PIM"); col_clear(pinfo->cinfo, COL_INFO); pim_typever = tvb_get_uint8(tvb, 0); pim_subtype = PIM_SUBTYPE(tvb_get_uint8(tvb, 1)); switch (PIM_VER(pim_typever)) { case 2: if (PIM_TYPE(pim_typever) < 12) { typestr = val_to_str(PIM_TYPE(pim_typever), pimtypevals, "Unknown (%u)"); } else if ((PIM_TYPE(pim_typever) == PIM_TYPE_PACKED_REGISTER)) { /* * Need only the first 4 bits for subtype as per the new PIM Common header. */ typestr = val_to_str(pim_subtype, pimtype13subtypevals, "Unknown (%u)"); } else { typestr = "Unknown"; } break; case 1: /* PIMv1 - we should never see this */ default: typestr = "Unknown"; break; } col_add_fstr(pinfo->cinfo, COL_PROTOCOL, "PIMv%d", PIM_VER(pim_typever)); col_add_str(pinfo->cinfo, COL_INFO, typestr); ti = proto_tree_add_item(tree, proto_pim, tvb, offset, -1, ENC_NA); pim_tree = proto_item_add_subtree(ti, ett_pim); proto_tree_add_item(pim_tree, hf_pim_version, tvb, offset, 1, ENC_BIG_ENDIAN); proto_tree_add_item(pim_tree, hf_pim_type, tvb, offset, 1, ENC_BIG_ENDIAN); if (PIM_TYPE(pim_typever) == PIM_TYPE_PFM) { proto_tree_add_item(pim_tree, hf_pfm_no_forward_bit, tvb, offset+1, 1, ENC_BIG_ENDIAN); } if (PIM_TYPE(pim_typever) == PIM_TYPE_REGISTER_STOP) { /* * [version-4bits][type-4bits][0x01] */ proto_tree_add_item(pim_tree, hf_pim_reg_stop_p_bit, tvb, offset+1, 1, ENC_BIG_ENDIAN); } if (PIM_TYPE(pim_typever) == PIM_TYPE_DF_ELECT) { proto_tree_add_item(pim_tree, hf_pim_df_elect_subtype, tvb, offset + 1, 1, ENC_BIG_ENDIAN); proto_tree_add_item(pim_tree, hf_pim_df_elect_rsvd, tvb, offset + 1, 1, ENC_BIG_ENDIAN); pim_bidir_subtype = tvb_get_uint8(tvb,offset); } else if ((PIM_TYPE(pim_typever) == PIM_TYPE_PACKED_REGISTER)) { /* * [version-4bits][type-4bits][0x[SubType-4bits][Flagbits-4bits] */ proto_tree_add_item(pim_tree, hf_pim_type_13_subtype, tvb, offset+1, 1, ENC_BIG_ENDIAN); proto_tree_add_item(pim_tree, hf_pim_type_13_flagbits, tvb, offset+1, 1, ENC_BIG_ENDIAN); } else { proto_tree_add_item(pim_tree, hf_pim_res_bytes, tvb, offset + 1, 1, ENC_NA); } if (PIM_VER(pim_typever) != 2) { proto_tree_add_checksum(pim_tree, tvb, offset+2, hf_pim_cksum, hf_pim_cksum_status, &ei_pim_cksum, pinfo, 0, ENC_BIG_ENDIAN, PROTO_CHECKSUM_NO_FLAGS); /* * We don't know this version, so we don't know how much of the * packet the checksum covers. */ if (tvb_reported_length_remaining(tvb, offset) > 0) { proto_tree_add_item(pim_tree, hf_pim_option, tvb, offset, -1, ENC_NA); } goto done; } /* * Well, it's PIM v2, so we can check whether this is a Register * message, and thus can figure out how much to checksum and * whether to make the columns read-only. */ length = tvb_reported_length(tvb); if (PIM_TYPE(pim_typever) == 1) { /* * Register message - the PIM header is 8 bytes long. * Also set the columns non-writable. Otherwise the IPv4 or * IPv6 dissector for the encapsulated packet that caused * this register will overwrite the PIM info in the columns. */ pim_length = 8; col_set_writable(pinfo->cinfo, -1, false); } else { /* * Other message - checksum the entire packet. */ pim_length = length; } if (!pinfo->fragmented && length >= pim_length && tvb_captured_length(tvb) >= pim_length) { /* * The packet isn't part of a fragmented datagram and isn't * truncated, so we can checksum it. */ switch (pinfo->src.type) { case AT_IPv4: SET_CKSUM_VEC_TVB(cksum_vec[0], tvb, 0, pim_length); proto_tree_add_checksum(pim_tree, tvb, offset+2, hf_pim_cksum, hf_pim_cksum_status, &ei_pim_cksum, pinfo, in_cksum(&cksum_vec[0], 1), ENC_BIG_ENDIAN, PROTO_CHECKSUM_VERIFY|PROTO_CHECKSUM_IN_CKSUM); break; case AT_IPv6: /* Set up the fields of the pseudo-header. */ SET_CKSUM_VEC_PTR(cksum_vec[0], (const uint8_t *)pinfo->src.data, pinfo->src.len); SET_CKSUM_VEC_PTR(cksum_vec[1], (const uint8_t *)pinfo->dst.data, pinfo->dst.len); phdr[0] = g_htonl(pim_length); phdr[1] = g_htonl(IP_PROTO_PIM); SET_CKSUM_VEC_PTR(cksum_vec[2], (const uint8_t *)&phdr, 8); SET_CKSUM_VEC_TVB(cksum_vec[3], tvb, 0, pim_length); proto_tree_add_checksum(pim_tree, tvb, offset+2, hf_pim_cksum, hf_pim_cksum_status, &ei_pim_cksum, pinfo, in_cksum(&cksum_vec[0], 4), ENC_BIG_ENDIAN, PROTO_CHECKSUM_VERIFY|PROTO_CHECKSUM_IN_CKSUM); break; default: /* PIM is available for IPv4 and IPv6 right now */ DISSECTOR_ASSERT_NOT_REACHED(); break; } } else { proto_tree_add_checksum(pim_tree, tvb, offset+2, hf_pim_cksum, hf_pim_cksum_status, &ei_pim_cksum, pinfo, 0, ENC_BIG_ENDIAN, PROTO_CHECKSUM_NO_FLAGS); } offset += 4; if (tvb_reported_length_remaining(tvb, offset) > 0) { tiopt = proto_tree_add_item(pim_tree, hf_pim_option, tvb, offset, -1, ENC_NA); pimopt_tree = proto_item_add_subtree(tiopt, ett_pim_opts); } else goto done; /* version 2 decoder */ switch (PIM_TYPE(pim_typever)) { case PIM_TYPE_HELLO: /*hello*/ { int opt_count = 0; while (tvb_reported_length_remaining(tvb, offset) >= 2) { uint16_t hello_opt, opt_len; uint32_t holdtime; const char* hold_str; proto_item *opt_item; proto_tree *opt_tree; opt_count++; hello_opt = tvb_get_ntohs(tvb, offset); opt_len = tvb_get_ntohs(tvb, offset + 2); opt_tree = proto_tree_add_subtree_format(pimopt_tree, tvb, offset, 4 + opt_len, ett_pim_opt, &opt_item, "Option %u: %s", hello_opt, val_to_str(hello_opt, pim_opt_vals, "Unknown: %u")); proto_tree_add_item(opt_tree, hf_pim_optiontype, tvb, offset, 2, ENC_BIG_ENDIAN); proto_tree_add_item(opt_tree, hf_pim_optionlength, tvb, offset + 2, 2, ENC_BIG_ENDIAN); switch(hello_opt) { case PIM_HELLO_HOLD_T: /* Hello Hold Time Option */ proto_tree_add_item_ret_uint(opt_tree, hf_pim_holdtime_t, tvb, offset+4, 2, ENC_BIG_ENDIAN, &holdtime); proto_item_append_text(opt_item, ": %u", holdtime); hold_str = try_val_to_str(holdtime, unique_infinity_t); if (hold_str != NULL) proto_item_append_text(opt_item, " (%s)", hold_str); break; case PIM_HELLO_LAN_PRUNE_DELAY: /* LAN Prune Delay Option */ proto_tree_add_item(opt_tree, hf_pim_t, tvb, offset + 4, 1, ENC_BIG_ENDIAN); proto_tree_add_item(opt_tree, hf_pim_propagation_delay, tvb, offset + 4, 2, ENC_BIG_ENDIAN); proto_tree_add_item(opt_tree, hf_pim_override_interval, tvb, offset + 6, 2, ENC_BIG_ENDIAN); proto_item_append_text(opt_item, ": T = %u, Propagation Delay = %ums, Override Interval = %ums", tvb_get_uint8(tvb, offset + 4) & 0x80 ? 1 : 0, tvb_get_ntohs(tvb, offset + 4) & 0x7fff, tvb_get_ntohs(tvb, offset + 6)); break; case PIM_HELLO_DR_PRIORITY: /* DR priority */ proto_tree_add_item(opt_tree, hf_pim_dr_priority, tvb, offset + 4, 4, ENC_BIG_ENDIAN); proto_item_append_text(opt_item, ": %u", tvb_get_ntohl(tvb, offset + 4)); break; case PIM_HELLO_GEN_ID: /* Generation ID */ proto_tree_add_item(opt_tree, hf_pim_generation_id, tvb, offset + 4, 4, ENC_BIG_ENDIAN); proto_item_append_text(opt_item, ": %u", tvb_get_ntohl(tvb, offset + 4)); break; case PIM_HELLO_STATE_REFRESH: /* State Refresh Capable Option */ proto_tree_add_item(opt_tree, hf_pim_state_refresh_version, tvb, offset + 4, 1, ENC_BIG_ENDIAN); proto_tree_add_item(opt_tree, hf_pim_state_refresh_interval, tvb, offset + 5, 1, ENC_BIG_ENDIAN); proto_tree_add_item(opt_tree, hf_pim_state_refresh_reserved, tvb, offset + 6, 2, ENC_BIG_ENDIAN); proto_item_append_text(opt_item, ": Version = %u, Interval = %us", tvb_get_uint8(tvb, offset + 4), tvb_get_uint8(tvb, offset + 5)); break; case PIM_HELLO_VAR_ADDR_LST: /* address list */ case PIM_HELLO_ADDR_LST: /* address list (old implementations) */ { int i; proto_tree *sub_tree = NULL; sub_tree = proto_tree_add_subtree_format(opt_tree, tvb, offset, 4 + opt_len, ett_pim_opt, NULL, "%sAddress List (%u)", hello_opt == 65001 ? "old " : "", hello_opt); for (i = offset + 4; i < offset + 4 + opt_len; ) { int advance; if (!dissect_pim_addr(pinfo, sub_tree, tvb, i, pimv2_unicast, NULL, NULL, hf_pim_address_list_ip4, hf_pim_address_list_ip6, &advance)) break; i += advance; } break; } default: if (opt_len) proto_tree_add_item(opt_tree, hf_pim_optionvalue, tvb, offset + 4, opt_len, ENC_NA); break; } offset += 4 + opt_len; } proto_item_append_text(tiopt, ": %u", opt_count); break; } case PIM_TYPE_REGISTER: /* register */ { uint8_t v_hl; tvbuff_t *next_tvb; proto_tree *flag_tree; proto_item *tiflag; tiflag = proto_tree_add_item(pimopt_tree, hf_pim_register_flag, tvb, offset, 4, ENC_BIG_ENDIAN); flag_tree = proto_item_add_subtree(tiflag, ett_pim); proto_tree_add_item(flag_tree, hf_pim_register_flag_border, tvb, offset, 4, ENC_BIG_ENDIAN); proto_tree_add_item(flag_tree, hf_pim_register_flag_null_register, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; /* * The rest of the packet is a multicast data packet. */ next_tvb = tvb_new_subset_remaining(tvb, offset); /* * It's an IP packet - determine whether it's IPv4 or IPv6. */ v_hl = tvb_get_uint8(tvb, offset); proto_tree_add_item(pimopt_tree, hf_pim_ip_version, tvb, offset, 1, ENC_BIG_ENDIAN); switch((v_hl & 0xf0) >> 4) { case 0: /* Null-Register dummy header. * Has the same address family as the encapsulating PIM packet, * e.g. an IPv6 data packet is encapsulated in IPv6 PIM packet. */ ti = proto_tree_add_item(pimopt_tree, hf_pim_dummy_header, tvb, offset, -1, ENC_NA); if (pinfo->src.type == AT_IPv4) { proto_item_append_text(ti, "IPv4"); proto_tree_add_item(pimopt_tree, hf_pim_source_ip4, tvb, offset + 12, 4, ENC_BIG_ENDIAN); proto_tree_add_item(pimopt_tree, hf_pim_group_ip4, tvb, offset + 16, 4, ENC_BIG_ENDIAN); } else if (pinfo->src.type == AT_IPv6) { proto_item_append_text(ti, "IPv6"); proto_tree_add_item(pimopt_tree, hf_pim_source_ip6, tvb, offset + 8, 16, ENC_NA); proto_tree_add_item(pimopt_tree, hf_pim_group_ip6, tvb, offset + 8 + 16, 16, ENC_NA); } else proto_item_append_text(ti, "for an unknown protocol"); break; case 4: /* IPv4 */ if (use_main_tree) { call_dissector(ip_handle, next_tvb, pinfo, tree); } else { call_dissector(ip_handle, next_tvb, pinfo, pimopt_tree); } break; case 6: /* IPv6 */ if (use_main_tree) { call_dissector(ipv6_handle, next_tvb, pinfo, tree); } else { call_dissector(ipv6_handle, next_tvb, pinfo, pimopt_tree); } break; default: break; } break; } case PIM_TYPE_REGISTER_STOP: /* register-stop */ { int advance; if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_group, NULL, NULL, hf_pim_group_ip4, hf_pim_group_ip6, &advance)) break; offset += advance; if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_unicast, NULL, NULL, hf_pim_source_ip4, hf_pim_source_ip6, &advance)) break; break; } case PIM_TYPE_JOIN_PRUNE: /* join/prune */ case PIM_TYPE_GRAFT: /* graft */ case PIM_TYPE_GRAFT_ACK: /* graft-ack */ { int advance; int off; int ngroup, i, njoin, nprune, j; proto_tree *grouptree = NULL; proto_item *tigroup; proto_tree *subtree = NULL; proto_item *tisub; if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_unicast, NULL, NULL, hf_pim_upstream_neighbor_ip4, hf_pim_upstream_neighbor_ip6, &advance)) break; offset += advance; /* reserved field */ proto_tree_add_item(pimopt_tree, hf_pim_res_bytes, tvb, offset, 1, ENC_NA); offset += 1; ngroup = tvb_get_uint8(tvb, offset); proto_tree_add_item(pimopt_tree, hf_pim_numgroups, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 1; proto_tree_add_item(pimopt_tree, hf_pim_holdtime, tvb, offset, 2, ENC_BIG_ENDIAN); offset += 2; for (i = 0; i < ngroup; i++) { tigroup=proto_tree_add_string_format(pimopt_tree, hf_pim_group, tvb, offset, -1, "", "Group %d", i); grouptree = proto_item_add_subtree(tigroup, ett_pim); if (!dissect_pim_addr(pinfo, grouptree, tvb, offset, pimv2_group, wmem_strdup_printf(pinfo->pool, "Group %d", i), NULL, hf_pim_group_ip4, hf_pim_group_ip6, &advance)) goto breakbreak3; offset += advance; njoin = tvb_get_ntohs(tvb, offset); nprune = tvb_get_ntohs(tvb, offset + 2); tisub = proto_tree_add_item(grouptree, hf_pim_numjoins, tvb, offset, 2, ENC_BIG_ENDIAN); subtree = proto_item_add_subtree(tisub, ett_pim); off = offset + 4; for (j = 0; j < njoin; j++) { if (!dissect_pim_addr(pinfo, subtree, tvb, off, pimv2_source, NULL, NULL, hf_pim_join_ip4, hf_pim_join_ip6, &advance)) goto breakbreak3; off += advance; } tisub = proto_tree_add_item(grouptree, hf_pim_numprunes, tvb, offset + 2, 2, ENC_BIG_ENDIAN); subtree = proto_item_add_subtree(tisub, ett_pim); for (j = 0; j < nprune; j++) { if (!dissect_pim_addr(pinfo, subtree, tvb, off, pimv2_source, NULL, NULL, hf_pim_prune_ip4, hf_pim_prune_ip6, &advance)) goto breakbreak3; off += advance; } offset = off; } breakbreak3: break; } case PIM_TYPE_BOOTSTRAP: /* bootstrap */ { int advance; int i, j; int frpcnt; proto_tree *grouptree = NULL; proto_item *tigroup; proto_tree_add_item(pimopt_tree, hf_pim_fragment_tag, tvb, offset, 2, ENC_BIG_ENDIAN); offset += 2; proto_tree_add_item(pimopt_tree, hf_pim_hash_mask_len, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 1; proto_tree_add_item(pimopt_tree, hf_pim_bsr_priority, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 1; if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_unicast, NULL, NULL, hf_pim_bsr_ip4, hf_pim_bsr_ip6, &advance)) break; offset += advance; for (i = 0; tvb_reported_length_remaining(tvb, offset) > 0; i++) { if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_group, wmem_strdup_printf(pinfo->pool, "Group %d", i), &tigroup, hf_pim_group_ip4, hf_pim_group_ip6, &advance)) goto breakbreak4; grouptree = proto_item_add_subtree(tigroup, ett_pim); offset += advance; proto_tree_add_item(grouptree, hf_pim_rp_count, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 1; frpcnt = tvb_get_uint8(tvb, offset); proto_tree_add_item(grouptree, hf_pim_frp_count, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 3; for (j = 0; j < frpcnt; j++) { if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_unicast, wmem_strdup_printf(pinfo->pool, "RP %d", j), NULL, hf_pim_rp_ip4, hf_pim_rp_ip6, &advance)) goto breakbreak4; offset += advance; proto_tree_add_item(pimopt_tree, hf_pim_holdtime, tvb, offset, 2, ENC_BIG_ENDIAN); offset += 2; proto_tree_add_item(grouptree, hf_pim_priority, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 1; /* reserved stuff */ proto_tree_add_item(pim_tree, hf_pim_res_bytes, tvb, offset, 1, ENC_NA); offset += 1; } } breakbreak4: break; } case PIM_TYPE_ASSERT: /* assert */ { int advance; if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_group, NULL, NULL, hf_pim_group_ip4, hf_pim_group_ip6, &advance)) break; offset += advance; if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_unicast, NULL, NULL, hf_pim_source_ip4, hf_pim_source_ip6, &advance)) break; offset += advance; proto_tree_add_item(pimopt_tree, hf_pim_rpt, tvb, offset, 1, ENC_BIG_ENDIAN); proto_tree_add_item(pimopt_tree, hf_pim_metric_pref, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; proto_tree_add_item(pimopt_tree, hf_pim_metric, tvb, offset, 4, ENC_BIG_ENDIAN); /* offset += 4;*/ break; } case PIM_TYPE_CAND_RP_ADV: /* Candidate-RP-Advertisement */ { int advance; int pfxcnt; int i; pfxcnt = tvb_get_uint8(tvb, offset); proto_tree_add_item(pimopt_tree, hf_pim_prefix_count, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 1; proto_tree_add_item(pimopt_tree, hf_pim_priority, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 1; proto_tree_add_item(pimopt_tree, hf_pim_holdtime, tvb, offset, 2, ENC_BIG_ENDIAN); offset += 2; if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_unicast, NULL, NULL, hf_pim_rp_ip4, hf_pim_rp_ip6, &advance)) break; offset += advance; for (i = 0; i < pfxcnt; i++) { if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_group, wmem_strdup_printf(pinfo->pool, "Group %d", i), NULL, hf_pim_group_ip4, hf_pim_group_ip6, &advance)) goto breakbreak8; offset += advance; } breakbreak8: break; } case PIM_TYPE_STATE_REFRESH: /* State-Refresh */ { int advance; if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_group, NULL, NULL, hf_pim_group_ip4, hf_pim_group_ip6, &advance)) break; offset += advance; if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_unicast, NULL, NULL, hf_pim_source_ip4, hf_pim_source_ip6, &advance)) break; offset += advance; if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_unicast, NULL, NULL, hf_pim_originator_ip4, hf_pim_originator_ip6, &advance)) break; offset += advance; proto_tree_add_item(pimopt_tree, hf_pim_rpt, tvb, offset, 1, ENC_BIG_ENDIAN); proto_tree_add_item(pimopt_tree, hf_pim_metric_pref, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; proto_tree_add_item(pimopt_tree, hf_pim_metric, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; proto_tree_add_item(pimopt_tree, hf_pim_mask_len, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 1; proto_tree_add_item(pimopt_tree, hf_pim_ttl, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 1; proto_tree_add_item(pimopt_tree, hf_pim_prune_indicator, tvb, offset, 1, ENC_BIG_ENDIAN); proto_tree_add_item(pimopt_tree, hf_pim_prune_now, tvb, offset, 1, ENC_BIG_ENDIAN); proto_tree_add_item(pimopt_tree, hf_pim_assert_override, tvb, offset, 1, ENC_BIG_ENDIAN); offset += 1; proto_tree_add_item(pimopt_tree, hf_pim_interval, tvb, offset, 1, ENC_BIG_ENDIAN); /*offset += 1;*/ break; } case PIM_TYPE_DF_ELECT: { int advance; if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_unicast, NULL, NULL, hf_pim_rp_ip4, hf_pim_rp_ip6, &advance)) break; offset += advance; proto_tree_add_item(pimopt_tree, hf_pim_df_metric_pref, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; proto_tree_add_item(pimopt_tree, hf_pim_metric, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; switch(PIM_BIDIR_SUBTYPE(pim_bidir_subtype)) { case PIM_BDIR_DF_BACKOFF : if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_unicast, NULL, NULL, hf_pim_bd_bo_offer_ip4, hf_pim_bd_bo_offer_ip6, &advance)) break; offset += advance; proto_tree_add_item(pimopt_tree, hf_pim_bd_offer_metric_pref, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; proto_tree_add_item(pimopt_tree, hf_pim_bd_offer_metric, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; proto_tree_add_item(pimopt_tree, hf_pim_bd_offer_interval, tvb, offset, 2, ENC_BIG_ENDIAN); break; case PIM_BDIR_DF_PASS: if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_unicast, NULL, NULL, hf_pim_bd_pass_ip4, hf_pim_bd_pass_ip6, &advance)) break; offset += advance; proto_tree_add_item(pimopt_tree, hf_pim_bd_pass_metric_pref, tvb, offset, 4, ENC_BIG_ENDIAN); offset += 4; proto_tree_add_item(pimopt_tree, hf_pim_bd_pass_metric, tvb, offset, 4, ENC_BIG_ENDIAN); break; } break; } case PIM_TYPE_PFM: /*pfm*/ { int opt_count = 0; int advance; if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_unicast, NULL, NULL, hf_pim_originator_ip4, hf_pim_originator_ip6, &advance)) break; offset += advance; while (tvb_reported_length_remaining(tvb, offset) >= 2) { uint16_t pfm, pfm_opt, opt_len; proto_item *opt_item; proto_tree *opt_tree; opt_count++; pfm = tvb_get_ntohs(tvb, offset); opt_len = tvb_get_ntohs(tvb, offset + 2); pfm_opt = pfm & 0x7FFF; opt_tree = proto_tree_add_subtree_format(pimopt_tree, tvb, offset, 4 + opt_len, ett_pim_opt, &opt_item, "Option %u: %s", pfm_opt, val_to_str(pfm_opt, pim_opt_vals1, "Unknown: %u")); proto_tree_add_item(opt_tree, hf_pim_transitivetype, tvb, offset, 1, ENC_BIG_ENDIAN); proto_tree_add_item(opt_tree, hf_pim_optiontype1, tvb, offset, 2, ENC_BIG_ENDIAN); proto_tree_add_item(opt_tree, hf_pim_optionlength, tvb, offset + 2, 2, ENC_BIG_ENDIAN); offset += 4; switch(pfm_opt){ case PIM_PFM_GROUP_SOURCE: { if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_group, NULL, NULL, hf_pim_group_ip4, hf_pim_group_ip6, &advance)) break; offset += advance; uint16_t src_count; src_count=tvb_get_ntohs(tvb, offset); proto_tree_add_item(pimopt_tree, hf_pim_srcount, tvb, offset, 2, ENC_BIG_ENDIAN); offset += 2; proto_tree_add_item(pimopt_tree, hf_pim_srcholdt, tvb, offset, 2, ENC_BIG_ENDIAN); offset += 2; while(src_count>0){ if (!dissect_pim_addr(pinfo, pimopt_tree, tvb, offset, pimv2_unicast, NULL, NULL, hf_pim_source_ip4, hf_pim_source_ip6, &advance)) goto breakbreak12; offset+=advance; src_count--; } break; } default: if (opt_len) proto_tree_add_item(opt_tree, hf_pim_optionvalue, tvb, offset, opt_len, ENC_NA); offset += opt_len; break; } } proto_item_append_text(tiopt, ": %u", opt_count); breakbreak12: break; } case PIM_TYPE_PACKED_REGISTER: /* Packed Register */ { int ngroups; int advance, i; proto_tree *grouptree = NULL; proto_item *tigroup; switch (pim_subtype) { case PIM_TYPE_PACKED_NULL_REGISTER: case PIM_TYPE_PACKED_REGISTER_STOP: /* * Total length minus PIM header length * divided by 1 encoded record size (14 bytes). */ ngroups = (length-4)/14; for (i = 0; i < ngroups; i++) { /* * RFC9465 states that an (S,G) entry is called a "Record". */ tigroup=proto_tree_add_string_format(pimopt_tree, hf_pim_group, tvb, offset, -1, "", "Record %d", i+1); grouptree = proto_item_add_subtree(tigroup, ett_pim); if (!dissect_pim_addr(pinfo, grouptree, tvb, offset, pimv2_group, wmem_strdup_printf(pinfo->pool, "Group"), NULL, hf_pim_group_ip4, hf_pim_group_ip6, &advance)) goto breakpackedreg; offset += advance; if (!dissect_pim_addr(pinfo, grouptree, tvb, offset, pimv2_unicast, NULL, NULL, hf_pim_source_ip4, hf_pim_source_ip6, &advance)) goto breakpackedreg; offset += advance; } break; default: break; } breakpackedreg: break; } default: break; } done: return tvb_captured_length(tvb); } void proto_register_pim(void) { static hf_register_info hf[] = { { &hf_pim_version, { "Version", "pim.version", FT_UINT8, BASE_DEC, NULL, 0xf0, NULL, HFILL } }, { &hf_pim_type, { "Type", "pim.type", FT_UINT8, BASE_DEC, VALS(pimtypevals), 0x0f, NULL, HFILL } }, { &hf_pim_df_elect_subtype, { "DF Subtype", "pim.df_elect.subtype", FT_UINT8, BASE_DEC, VALS(pimbdirdfvals), 0xf0, NULL, HFILL} }, { &hf_pim_df_elect_rsvd, { "DF reserved", "pim.df_elect.rsvd", FT_UINT8, BASE_DEC, NULL, 0x0f, NULL, HFILL} }, { &hf_pim_igmp_type, { "Type", "pim.igmp_type", FT_STRING, BASE_NONE, NULL, 0x0, NULL, HFILL } }, { &hf_pim_code, { "Code", "pim.code", FT_UINT8, BASE_DEC, VALS(pim_type1_vals), 0x0, NULL, HFILL } }, { &hf_pim_cksum, { "Checksum", "pim.cksum", FT_UINT16, BASE_HEX, NULL, 0x0, NULL, HFILL } }, { &hf_pim_cksum_status, { "Checksum Status", "pim.cksum.status", FT_UINT8, BASE_NONE, VALS(proto_checksum_vals), 0x0, NULL, HFILL } }, { &hf_pim_res_bytes, { "Reserved byte(s)", "pim.res_bytes", FT_BYTES, BASE_NONE, NULL, 0x0, NULL, HFILL } }, { &hf_pim_type_13_subtype, { "Subtype", "pim.subtype_type13", FT_UINT8, BASE_DEC, VALS(pimtype13subtypevals), 0xf0, NULL, HFILL } }, { &hf_pim_type_13_flagbits, { "Flag Bits", "pim.flag_bits_type13", FT_UINT8, BASE_DEC, NULL, 0x0f, NULL, HFILL } }, { &hf_pim_option, { "PIM Options", "pim.option", FT_NONE, BASE_NONE, NULL, 0x0, NULL, HFILL } }, { &hf_pim_optiontype, { "Type", "pim.optiontype", FT_UINT16, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_optiontype1, { "Type", "pim.optiontype", FT_UINT16, BASE_DEC, NULL, 0x7fff, NULL, HFILL } }, { &hf_pim_optionlength, { "Length", "pim.optionlength", FT_UINT16, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_optionvalue, { "Unknown", "pim.optionvalue", FT_BYTES, BASE_NONE, NULL, 0x0, NULL, HFILL } }, { &hf_pim_register_flag, { "Flags", "pim.register_flag", FT_UINT32, BASE_HEX, NULL, 0x0, NULL, HFILL } }, { &hf_pim_register_flag_border, { "Border", "pim.register_flag.border", FT_BOOLEAN, 32, TFS(&tfs_yes_no), 0x80000000, NULL, HFILL } }, { &hf_pim_register_flag_null_register, { "Null-Register", "pim.register_flag.null_register", FT_BOOLEAN, 32, TFS(&tfs_yes_no), 0x40000000, NULL, HFILL } }, { &hf_pim_mode, { "Mode", "pim.mode", FT_UINT8, BASE_DEC, VALS(pimv1_modevals), 0xf0, NULL, HFILL } }, { &hf_pim_holdtime, { "Holdtime", "pim.holdtime", FT_UINT16, BASE_DEC|BASE_SPECIAL_VALS, VALS(unique_infinity), 0x0, "The amount of time a receiver must keep the neighbor " "reachable, in seconds.", HFILL } }, { &hf_pim_holdtime_t, { "Holdtime", "pim.holdtime", FT_UINT16, BASE_DEC|BASE_SPECIAL_VALS, VALS(unique_infinity_t), 0x0, "The amount of time a receiver must keep the neighbor " "reachable, in seconds.", HFILL } }, { &hf_pim_numgroups, { "Num Groups", "pim.numgroups", FT_UINT16, BASE_DEC, NULL, 0x0, "Number of multicast group sets contained in the message.", HFILL } }, { &hf_pim_numjoins, { "Num Joins", "pim.numjoins", FT_UINT16, BASE_DEC, NULL, 0x0, "Number of joined sources.", HFILL } }, { &hf_pim_numprunes, { "Num Prunes", "pim.numprunes", FT_UINT16, BASE_DEC, NULL, 0x0, "Number of pruned sources.", HFILL } }, { &hf_pim_t, { "T", "pim.t", FT_BOOLEAN, 8, NULL, 0x80, "Specifies the ability of the sending router to disable joins " "suppression.", HFILL } }, { &hf_pim_propagation_delay, { "Propagation Delay", "pim.propagation_delay", FT_UINT16, BASE_DEC, NULL, 0x7fff, "Units are milli-seconds", HFILL } }, { &hf_pim_override_interval, { "Override Interval", "pim.override_interval", FT_UINT16, BASE_DEC, NULL, 0x0, "Units are milli-seconds", HFILL } }, { &hf_pim_dr_priority, { "DR Priority", "pim.dr_priority", FT_UINT32, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_generation_id, { "Generation ID", "pim.generation_id", FT_UINT32, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_state_refresh_version, { "Version", "pim.state_refresh_version", FT_UINT8, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_state_refresh_interval, { "Interval", "pim.state_refresh_interval", FT_UINT8, BASE_DEC, NULL, 0x0, "Units in seconds.", HFILL } }, { &hf_pim_state_refresh_reserved, { "Reserved", "pim.state_refresh_reserved", FT_UINT16, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_rpt, { "RP Tree", "pim.rpt", FT_BOOLEAN, 8, NULL, 0x80, "Set to 1 for assert(*,G) messages and 0 for assert(S,G) " "messages.", HFILL } }, { &hf_pim_metric_pref, { "Metric Preference", "pim.metric_pref", FT_UINT32, BASE_DEC, NULL, 0x7fffffff, NULL, HFILL } }, { &hf_pim_df_metric_pref, { "DF Metric Preference", "pim.metric_pref", FT_UINT32, BASE_DEC, NULL, 0, NULL, HFILL } }, { &hf_pim_metric, { "Metric", "pim.metric", FT_UINT32, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_prune_indicator, { "Prune indicator", "pim.prune_indicator", FT_BOOLEAN, 8, TFS(&tfs_set_notset), 0x80, NULL, HFILL } }, { &hf_pim_prune_now, { "Prune now", "pim.prune_now", FT_BOOLEAN, 8, TFS(&tfs_set_notset), 0x40, NULL, HFILL } }, { &hf_pim_assert_override, { "Assert override", "pim.assert_override", FT_BOOLEAN, 8, TFS(&tfs_set_notset), 0x20, NULL, HFILL } }, { &hf_pim_ip_version, { "IP Version", "pim.ip_version", FT_UINT8, BASE_DEC, VALS(pim_ip_version_vals), 0xF0, NULL, HFILL } }, { &hf_pim_dummy_header, { "Dummy Header", "pim.dummy_header", FT_NONE, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_source_ip4, { "Source", "pim.source", FT_IPv4, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_source_ip6, { "Source", "pim.source_ip6", FT_IPv6, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_group_ip4, { "Group", "pim.group", FT_IPv4, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_group_mask_ip4, { "Mask", "pim.group_mask", FT_IPv4, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_group_ip6, { "Group", "pim.group_ip6", FT_IPv6, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_upstream_neighbor_ip4, { "Upstream-neighbor", "pim.upstream_neighbor", FT_IPv4, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_upstream_neighbor_ip6, { "Upstream-neighbor", "pim.upstream_neighbor_ip6", FT_IPv6, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_join_ip4, { "IP address", "pim.join_ip", FT_IPv4, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_join_ip6, { "IP address", "pim.join_ip6", FT_IPv6, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_prune_ip4, { "IP address", "pim.prune_ip", FT_IPv4, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_prune_ip6, { "IP address", "pim.prune_ip6", FT_IPv6, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_address_list_ip4, { "Address", "pim.address_list", FT_IPv4, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_address_list_ip6, { "Address", "pim.address_list_ip6", FT_IPv6, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_bsr_ip4, { "BSR", "pim.bsr", FT_IPv4, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_bsr_ip6, { "BSR", "pim.bsr_ip6", FT_IPv6, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_rp_ip4, { "RP", "pim.rp", FT_IPv4, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_rp_ip6, { "RP", "pim.rp_ip6", FT_IPv6, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_originator_ip4, { "Originator", "pim.originator", FT_IPv4, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_originator_ip6, { "Originator", "pim.originator_ip6", FT_IPv6, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_group_address_ip4, { "Group Address", "pim.group_address", FT_IPv4, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_bd_pass_ip4, { "New Winner IP", "pim.bidir_winner_ip4", FT_IPv4, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_bd_pass_ip6, { "New Winner IP", "pim.bidir_winner_ip6", FT_IPv6, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_bd_pass_metric_pref, { "Winner Metric Preference", "pim.bidir_win_metric_pref", FT_UINT32, BASE_DEC, NULL, 0, NULL, HFILL } }, { &hf_pim_bd_pass_metric, { "Winner Metric", "pim.bidir_win_metric", FT_UINT32, BASE_DEC, NULL, 0, NULL, HFILL } }, { &hf_pim_bd_bo_offer_ip4, { "Offering IP", "pim.bidir_offering_ip4", FT_IPv4, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_bd_bo_offer_ip6, { "Offering IP", "pim.bidir_offering_ip6", FT_IPv6, BASE_NONE, NULL, 0, NULL, HFILL } }, { &hf_pim_bd_offer_metric_pref, { "Offering Metric Preference", "pim.bidir_off_metric_pref", FT_UINT32, BASE_DEC, NULL, 0, NULL, HFILL } }, { &hf_pim_bd_offer_metric, { "Offering Metric", "pim.bidir_off_metric", FT_UINT32, BASE_DEC, NULL, 0, NULL, HFILL } }, { &hf_pim_bd_offer_interval, { "Offering interval (ms)", "pim.bidir_offering_interval", FT_UINT16, BASE_DEC, NULL, 0, NULL, HFILL } }, { &hf_pim_fragment_tag, { "Fragment tag", "pim.fragment_tag", FT_UINT16, BASE_HEX, NULL, 0x0, NULL, HFILL } }, { &hf_pim_hash_mask_len, { "Hash mask len", "pim.hash_mask_len", FT_UINT8, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_bsr_priority, { "BSR priority", "pim.bsr_priority", FT_UINT8, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_rp_count, { "RP count", "pim.rp_count", FT_UINT8, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_frp_count, { "FRP count", "pim.frp_count", FT_UINT8, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_priority, { "Priority", "pim.priority", FT_UINT8, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_prefix_count, { "Prefix-count", "pim.prefix_count", FT_UINT8, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_src_flags_a, { "Annotated", "pim.src_flags.a", FT_UINT8, BASE_DEC, NULL, 0x08, NULL, HFILL } }, { &hf_pim_src_flags_s, { "Sparse", "pim.src_flags.s", FT_UINT8, BASE_DEC, NULL, 0x04, NULL, HFILL } }, { &hf_pim_src_flags_w, { "WC", "pim.src_flags.w", FT_UINT8, BASE_DEC, NULL, 0x02, NULL, HFILL } }, { &hf_pim_src_flags_r, { "RP", "pim.src_flags.r", FT_UINT8, BASE_DEC, NULL, 0x01, NULL, HFILL } }, { &hf_pim_src_flags_rsv, { "Reserved", "pim.src_flags.rsv", FT_UINT8, BASE_DEC, NULL, 0xF0, NULL, HFILL } }, { &hf_pim_mask_len, { "Masklen", "pim.mask_len", FT_UINT8, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_addr_len, { "Address Len", "pim.addr_len", FT_UINT8, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_ttl, { "TTL", "pim.ttl", FT_UINT8, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_interval, { "Interval", "pim.interval", FT_UINT8, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_addr_af, { "Address Family", "pim.addr_address_family", FT_UINT8, BASE_DEC, VALS(afn_vals), 0x0, NULL, HFILL } }, { &hf_pim_addr_et, { "Encoding Type", "pim.addr_encoding_type", FT_UINT8, BASE_DEC, VALS(pim_addr_et_vals), 0x0, NULL, HFILL } }, { &hf_pim_unicast_addr_ipv4, { "Unicast", "pim.unicast", FT_IPv4, BASE_NONE, NULL, 0x0, NULL, HFILL } }, { &hf_pim_unicast_addr_ipv6, { "Unicast", "pim.unicast_ipv6", FT_IPv6, BASE_NONE, NULL, 0x0, NULL, HFILL } }, { &hf_pim_attribute_transport_mode, { "Attribute Transport Mode", "pim.attribute_transport_mode", FT_UINT8, BASE_DEC, VALS(attribute_transport_mode), 0x0, NULL, HFILL } }, { &hf_pim_rloc_addr_ipv4, { "RLOC", "pim.rloc", FT_IPv4, BASE_NONE, NULL, 0x0, NULL, HFILL } }, { &hf_pim_rloc_addr_ipv6, { "RLOC", "pim.rloc_ipv6", FT_IPv6, BASE_NONE, NULL, 0x0, NULL, HFILL } }, { &hf_pim_group, { "Group", "pim.group_set", FT_STRING, BASE_NONE, NULL, 0x0, NULL, HFILL } }, { &hf_pim_group_addr_flags, { "Flags", "pim.group_addr.flags", FT_UINT8, BASE_HEX, NULL, 0x0, NULL, HFILL } }, { &hf_pim_group_addr_flags_b, { "Bidirectional PIM", "pim.group_addr.flags.b", FT_BOOLEAN, 8, TFS(&tfs_set_notset), PIM_GROUP_ADDR_FLAGS_B, NULL, HFILL } }, { &hf_pim_group_addr_flags_reserved, { "Reserved", "pim.group_addr.flags.reserved", FT_UINT8, BASE_HEX, NULL, PIM_GROUP_ADDR_FLAGS_RESERVED, NULL, HFILL } }, { &hf_pim_group_addr_flags_z, { "Admin Scope Zone", "pim.group_addr.flags.z", FT_BOOLEAN, 8, TFS(&tfs_set_notset), PIM_GROUP_ADDR_FLAGS_Z, NULL, HFILL } }, { &hf_pim_source_addr_flags, { "Flags", "pim.source_addr.flags", FT_UINT8, BASE_HEX, NULL, 0x0, NULL, HFILL } }, { &hf_pim_source_addr_flags_reserved, { "Reserved", "pim.source_addr.flags.reserved", FT_UINT8, BASE_HEX, NULL, PIM_SOURCE_ADDR_FLAGS_RESERVED, NULL, HFILL } }, { &hf_pim_source_addr_flags_s, { "Sparse", "pim.source_addr.flags.s", FT_BOOLEAN, 8, TFS(&tfs_set_notset), PIM_SOURCE_ADDR_FLAGS_S, NULL, HFILL } }, { &hf_pim_source_addr_flags_w, { "WildCard", "pim.source_addr.flags.w", FT_BOOLEAN, 8, TFS(&tfs_set_notset), PIM_SOURCE_ADDR_FLAGS_W, NULL, HFILL } }, { &hf_pim_source_addr_flags_r, { "Rendezvous Point Tree", "pim.source_addr.flags.r", FT_BOOLEAN, 8, TFS(&tfs_set_notset), PIM_SOURCE_ADDR_FLAGS_R, NULL, HFILL } }, { &hf_pim_source_join_attribute, { "Join Attribute", "pim.source_ja", FT_NONE, BASE_NONE, NULL, 0x0, NULL, HFILL } }, { &hf_pim_source_ja_flags, { "Flags", "pim.source_ja.flags", FT_UINT8, BASE_HEX, NULL, 0x0, NULL, HFILL } }, { &hf_pim_source_ja_flags_f, { "Forward", "pim.source_ja.flags.f", FT_BOOLEAN, 8, TFS(&tfs_set_notset), PIM_SOURCE_JA_FLAGS_F, NULL, HFILL } }, { &hf_pim_source_ja_flags_e, { "End of Attributes", "pim.source_ja.flags.e", FT_BOOLEAN, 8, TFS(&tfs_set_notset), PIM_SOURCE_JA_FLAGS_E, NULL, HFILL } }, { &hf_pim_source_ja_flags_attr_type, { "Attribute Type", "pim.source_ja.flags.attr_type", FT_UINT8, BASE_DEC, VALS(pim_join_attribute_type_vals), PIM_SOURCE_JA_FLAGS_ATTR_TYPE, NULL, HFILL } }, { &hf_pim_source_ja_length, { "Length", "pim.source_ja.length", FT_UINT8, BASE_DEC, NULL, 0x0, NULL, HFILL } }, { &hf_pim_source_ja_value, { "Value", "pim.source_ja.value", FT_BYTES, BASE_NONE, NULL, 0x0, NULL, HFILL } }, { &hf_pim_srcount, { "Source Count", "pim.srccount", FT_UINT16, BASE_DEC, NULL, 0x0, "Number of sources.", HFILL } }, { &hf_pim_srcholdt, { "Source Holdtime", "pim.srcholdtime", FT_UINT16, BASE_DEC|BASE_SPECIAL_VALS, VALS(unique_infinity_t), 0x0, "The amount of time a receiver must keep the source reachable, in seconds.", HFILL } }, { &hf_pim_transitivetype, { "Transitive Type", "pim.transitivetype", FT_BOOLEAN, 8, NULL, 0x80, "Set to 1 if this type is to be forwarded even if a router does not support it.", HFILL } }, { &hf_pfm_no_forward_bit, { "Pfm no forward bit", "pim.pfmnoforwardbit", FT_BOOLEAN, 8, NULL, 0x80, "When set, this bit means that the PFM message is not to be forwarded.", HFILL } }, { &hf_pim_reg_stop_p_bit, { "P-bit", "pim.packedregstoppbit", FT_BOOLEAN, 8, NULL, 0x01, "RP is indicating Register-Packing capability (RFC9465).", HFILL } } }; static int *ett[] = { &ett_pim, &ett_pim_opts, /* Tree for all options */ &ett_pim_opt, /* Tree for each option */ &ett_pim_addr_flags /* Tree for flags */ }; static ei_register_info ei[] = { { &ei_pim_cksum, { "pim.bad_checksum", PI_CHECKSUM, PI_ERROR, "Bad checksum", EXPFILL }}, }; expert_module_t* expert_pim; module_t *pim_module; proto_pim = proto_register_protocol("Protocol Independent Multicast", "PIM", "pim"); proto_register_field_array(proto_pim, hf, array_length(hf)); proto_register_subtree_array(ett, array_length(ett)); expert_pim = expert_register_protocol(proto_pim); expert_register_field_array(expert_pim, ei, array_length(ei)); pim_handle = register_dissector("pim", dissect_pim, proto_pim); pimv1_handle = register_dissector("pimv1", dissect_pimv1, proto_pim); pim_module = prefs_register_protocol(proto_pim, NULL); prefs_register_bool_preference(pim_module, "payload_tree", "PIM payload shown on main tree", "Whether the PIM payload is shown off of the main tree or encapsulated within the PIM options", &use_main_tree); } void proto_reg_handoff_pim(void) { dissector_add_uint("ip.proto", IP_PROTO_PIM, pim_handle); dissector_add_uint("igmp.type", IGMP_V1_PIM_ROUTING_MESSAGE, pimv1_handle); /* * Get handles for the IPv4 and IPv6 dissectors. */ ip_handle = find_dissector_add_dependency("ip", proto_pim); ipv6_handle = find_dissector_add_dependency("ipv6", proto_pim); } /* * Editor modelines - https://www.wireshark.org/tools/modelines.html * * Local variables: * c-basic-offset: 4 * tab-width: 8 * indent-tabs-mode: nil * End: * * vi: set shiftwidth=4 tabstop=8 expandtab: * :indentSize=4:tabSize=8:noTabs=true: */