![Jörg Mayer](/assets/img/avatar_default.png)
Admittedly not much, so if you have any ideas what the rest means or where I'm wrong please provide feedback. As tapa uses udp 5000 and ip protocol 4, I needed to add a hack for the ip part to properly dispatch betweeen ipip and tapa-tunnel (actually I was unable to turn the ipip dissector into a heuristic dissector :-) svn path=/trunk/; revision=20971
2662 lines
86 KiB
C
2662 lines
86 KiB
C
/* packet-ip.c
|
|
* Routines for IP and miscellaneous IP protocol packet disassembly
|
|
*
|
|
* $Id$
|
|
*
|
|
* Wireshark - Network traffic analyzer
|
|
* By Gerald Combs <gerald@wireshark.org>
|
|
* Copyright 1998 Gerald Combs
|
|
*
|
|
* Monday, June 27, 2005
|
|
* Support for the ICMP extensions for MPLS
|
|
* (http://www.ietf.org/proceedings/01aug/I-D/draft-ietf-mpls-icmp-02.txt)
|
|
* by Maria-Luiza Crivat <luizacri@gmail.com>
|
|
* & Brice Augustin <bricecotte@gmail.com>
|
|
*
|
|
* Wednesday, January 17, 2006
|
|
* Support for the CIPSO IPv4 option
|
|
* (http://sourceforge.net/docman/display_doc.php?docid=34650&group_id=174379)
|
|
* by Paul Moore <paul.moore@hp.com>
|
|
*
|
|
* This program is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU General Public License
|
|
* as published by the Free Software Foundation; either version 2
|
|
* of the License, or (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
# include "config.h"
|
|
#endif
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <glib.h>
|
|
|
|
#include <epan/packet.h>
|
|
#include <epan/addr_resolv.h>
|
|
#include <epan/ipproto.h>
|
|
#include <epan/ip_opts.h>
|
|
#include <epan/prefs.h>
|
|
#include <epan/reassemble.h>
|
|
#include <epan/etypes.h>
|
|
#include <epan/greproto.h>
|
|
#include <epan/ppptypes.h>
|
|
#include <epan/llcsaps.h>
|
|
#include <epan/aftypes.h>
|
|
#include <epan/arcnet_pids.h>
|
|
#include "packet-ip.h"
|
|
#include "packet-ipsec.h"
|
|
#include <epan/in_cksum.h>
|
|
#include <epan/nlpid.h>
|
|
#include <epan/tap.h>
|
|
#include <epan/emem.h>
|
|
#include <epan/nstime.h>
|
|
|
|
static int ip_tap = -1;
|
|
|
|
static void dissect_icmp(tvbuff_t *, packet_info *, proto_tree *);
|
|
|
|
/* Decode the old IPv4 TOS field as the DiffServ DS Field (RFC2474/2475) */
|
|
static gboolean g_ip_dscp_actif = TRUE;
|
|
|
|
/* Defragment fragmented IP datagrams */
|
|
static gboolean ip_defragment = TRUE;
|
|
|
|
/* Place IP summary in proto tree */
|
|
static gboolean ip_summary_in_tree = TRUE;
|
|
|
|
/* Decode the end of the ICMP payload as ICMP MPLS extensions
|
|
if the packet in the payload has more than 128 bytes */
|
|
static gboolean favor_icmp_mpls_ext = FALSE;
|
|
|
|
/* Perform IP checksum */
|
|
static gboolean ip_check_checksum = TRUE;
|
|
|
|
static int proto_ip = -1;
|
|
static int hf_ip_version = -1;
|
|
static int hf_ip_hdr_len = -1;
|
|
static int hf_ip_dsfield = -1;
|
|
static int hf_ip_dsfield_dscp = -1;
|
|
static int hf_ip_dsfield_ect = -1;
|
|
static int hf_ip_dsfield_ce = -1;
|
|
static int hf_ip_tos = -1;
|
|
static int hf_ip_tos_precedence = -1;
|
|
static int hf_ip_tos_delay = -1;
|
|
static int hf_ip_tos_throughput = -1;
|
|
static int hf_ip_tos_reliability = -1;
|
|
static int hf_ip_tos_cost = -1;
|
|
static int hf_ip_len = -1;
|
|
static int hf_ip_id = -1;
|
|
static int hf_ip_dst = -1;
|
|
static int hf_ip_dst_host = -1;
|
|
static int hf_ip_src = -1;
|
|
static int hf_ip_src_host = -1;
|
|
static int hf_ip_addr = -1;
|
|
static int hf_ip_host = -1;
|
|
static int hf_ip_flags = -1;
|
|
static int hf_ip_flags_rf = -1;
|
|
static int hf_ip_flags_df = -1;
|
|
static int hf_ip_flags_mf = -1;
|
|
static int hf_ip_frag_offset = -1;
|
|
static int hf_ip_ttl = -1;
|
|
static int hf_ip_proto = -1;
|
|
static int hf_ip_checksum = -1;
|
|
static int hf_ip_checksum_good = -1;
|
|
static int hf_ip_checksum_bad = -1;
|
|
static int hf_ip_fragments = -1;
|
|
static int hf_ip_fragment = -1;
|
|
static int hf_ip_fragment_overlap = -1;
|
|
static int hf_ip_fragment_overlap_conflict = -1;
|
|
static int hf_ip_fragment_multiple_tails = -1;
|
|
static int hf_ip_fragment_too_long_fragment = -1;
|
|
static int hf_ip_fragment_error = -1;
|
|
static int hf_ip_reassembled_in = -1;
|
|
|
|
static gint ett_ip = -1;
|
|
static gint ett_ip_dsfield = -1;
|
|
static gint ett_ip_tos = -1;
|
|
static gint ett_ip_off = -1;
|
|
static gint ett_ip_options = -1;
|
|
static gint ett_ip_option_sec = -1;
|
|
static gint ett_ip_option_route = -1;
|
|
static gint ett_ip_option_timestamp = -1;
|
|
static gint ett_ip_option_cipso = -1;
|
|
static gint ett_ip_fragments = -1;
|
|
static gint ett_ip_fragment = -1;
|
|
static gint ett_ip_checksum = -1;
|
|
|
|
static const fragment_items ip_frag_items = {
|
|
&ett_ip_fragment,
|
|
&ett_ip_fragments,
|
|
&hf_ip_fragments,
|
|
&hf_ip_fragment,
|
|
&hf_ip_fragment_overlap,
|
|
&hf_ip_fragment_overlap_conflict,
|
|
&hf_ip_fragment_multiple_tails,
|
|
&hf_ip_fragment_too_long_fragment,
|
|
&hf_ip_fragment_error,
|
|
&hf_ip_reassembled_in,
|
|
"fragments"
|
|
};
|
|
|
|
static dissector_table_t ip_dissector_table;
|
|
|
|
static dissector_handle_t ip_handle;
|
|
static dissector_handle_t ipv6_handle;
|
|
static dissector_handle_t data_handle;
|
|
static dissector_handle_t tapa_handle;
|
|
|
|
static int proto_icmp = -1;
|
|
static int hf_icmp_type = -1;
|
|
static int hf_icmp_code = -1;
|
|
static int hf_icmp_checksum = -1;
|
|
static int hf_icmp_checksum_bad = -1;
|
|
static int hf_icmp_ident = -1;
|
|
static int hf_icmp_seq_num = -1;
|
|
static int hf_icmp_mtu = -1;
|
|
static int hf_icmp_redir_gw = -1;
|
|
|
|
|
|
/* Mobile ip */
|
|
static int hf_icmp_mip_type = -1;
|
|
static int hf_icmp_mip_length = -1;
|
|
static int hf_icmp_mip_prefix_length = -1;
|
|
static int hf_icmp_mip_seq = -1;
|
|
static int hf_icmp_mip_life = -1;
|
|
static int hf_icmp_mip_flags = -1;
|
|
static int hf_icmp_mip_r = -1;
|
|
static int hf_icmp_mip_b = -1;
|
|
static int hf_icmp_mip_h = -1;
|
|
static int hf_icmp_mip_f = -1;
|
|
static int hf_icmp_mip_m = -1;
|
|
static int hf_icmp_mip_g = -1;
|
|
static int hf_icmp_mip_v = -1;
|
|
static int hf_icmp_mip_rt = -1;
|
|
static int hf_icmp_mip_reserved = -1;
|
|
static int hf_icmp_mip_coa = -1;
|
|
static int hf_icmp_mip_challenge = -1;
|
|
|
|
/* MPLS extensions */
|
|
static int hf_icmp_mpls = -1;
|
|
static int hf_icmp_mpls_version = -1;
|
|
static int hf_icmp_mpls_reserved = -1;
|
|
static int hf_icmp_mpls_checksum = -1;
|
|
static int hf_icmp_mpls_checksum_bad = -1;
|
|
static int hf_icmp_mpls_length = -1;
|
|
static int hf_icmp_mpls_class = -1;
|
|
static int hf_icmp_mpls_c_type = -1;
|
|
static int hf_icmp_mpls_label = -1;
|
|
static int hf_icmp_mpls_exp = -1;
|
|
static int hf_icmp_mpls_s = -1;
|
|
static int hf_icmp_mpls_ttl = -1;
|
|
|
|
static gint ett_icmp = -1;
|
|
static gint ett_icmp_mip = -1;
|
|
static gint ett_icmp_mip_flags = -1;
|
|
/* MPLS extensions */
|
|
static gint ett_icmp_mpls = -1;
|
|
static gint ett_icmp_mpls_object = -1;
|
|
static gint ett_icmp_mpls_stack_object = -1;
|
|
|
|
/* ICMP definitions */
|
|
|
|
#define ICMP_ECHOREPLY 0
|
|
#define ICMP_UNREACH 3
|
|
#define ICMP_SOURCEQUENCH 4
|
|
#define ICMP_REDIRECT 5
|
|
#define ICMP_ECHO 8
|
|
#define ICMP_RTRADVERT 9
|
|
#define ICMP_RTRSOLICIT 10
|
|
#define ICMP_TIMXCEED 11
|
|
#define ICMP_PARAMPROB 12
|
|
#define ICMP_TSTAMP 13
|
|
#define ICMP_TSTAMPREPLY 14
|
|
#define ICMP_IREQ 15
|
|
#define ICMP_IREQREPLY 16
|
|
#define ICMP_MASKREQ 17
|
|
#define ICMP_MASKREPLY 18
|
|
|
|
/* ICMP UNREACHABLE */
|
|
|
|
#define ICMP_NET_UNREACH 0 /* Network Unreachable */
|
|
#define ICMP_HOST_UNREACH 1 /* Host Unreachable */
|
|
#define ICMP_PROT_UNREACH 2 /* Protocol Unreachable */
|
|
#define ICMP_PORT_UNREACH 3 /* Port Unreachable */
|
|
#define ICMP_FRAG_NEEDED 4 /* Fragmentation Needed/DF set */
|
|
#define ICMP_SR_FAILED 5 /* Source Route failed */
|
|
#define ICMP_NET_UNKNOWN 6
|
|
#define ICMP_HOST_UNKNOWN 7
|
|
#define ICMP_HOST_ISOLATED 8
|
|
#define ICMP_NET_ANO 9
|
|
#define ICMP_HOST_ANO 10
|
|
#define ICMP_NET_UNR_TOS 11
|
|
#define ICMP_HOST_UNR_TOS 12
|
|
#define ICMP_PKT_FILTERED 13 /* Packet filtered */
|
|
#define ICMP_PREC_VIOLATION 14 /* Precedence violation */
|
|
#define ICMP_PREC_CUTOFF 15 /* Precedence cut off */
|
|
|
|
|
|
/* IP structs and definitions */
|
|
|
|
/* Offsets of fields within an IP header. */
|
|
#define IPH_V_HL 0
|
|
#define IPH_TOS 1
|
|
#define IPH_LEN 2
|
|
#define IPH_ID 4
|
|
#define IPH_TTL 6
|
|
#define IPH_OFF 8
|
|
#define IPH_P 9
|
|
#define IPH_SUM 10
|
|
#define IPH_SRC 12
|
|
#define IPH_DST 16
|
|
|
|
/* Minimum IP header length. */
|
|
#define IPH_MIN_LEN 20
|
|
|
|
/* IP flags. */
|
|
#define IP_RF 0x8000 /* Flag: "Reserved bit" */
|
|
#define IP_DF 0x4000 /* Flag: "Don't Fragment" */
|
|
#define IP_MF 0x2000 /* Flag: "More Fragments" */
|
|
#define IP_OFFSET 0x1FFF /* "Fragment Offset" part */
|
|
|
|
/* Differentiated Services Field. See RFCs 2474, 2597 and 2598. */
|
|
#define IPDSFIELD_DSCP_MASK 0xFC
|
|
#define IPDSFIELD_ECN_MASK 0x03
|
|
#define IPDSFIELD_DSCP_SHIFT 2
|
|
#define IPDSFIELD_DSCP(dsfield) (((dsfield)&IPDSFIELD_DSCP_MASK)>>IPDSFIELD_DSCP_SHIFT)
|
|
#define IPDSFIELD_ECN(dsfield) ((dsfield)&IPDSFIELD_ECN_MASK)
|
|
#define IPDSFIELD_DSCP_DEFAULT 0x00
|
|
#define IPDSFIELD_DSCP_CS1 0x08
|
|
#define IPDSFIELD_DSCP_CS2 0x10
|
|
#define IPDSFIELD_DSCP_CS3 0x18
|
|
#define IPDSFIELD_DSCP_CS4 0x20
|
|
#define IPDSFIELD_DSCP_CS5 0x28
|
|
#define IPDSFIELD_DSCP_CS6 0x30
|
|
#define IPDSFIELD_DSCP_CS7 0x38
|
|
#define IPDSFIELD_DSCP_AF11 0x0A
|
|
#define IPDSFIELD_DSCP_AF12 0x0C
|
|
#define IPDSFIELD_DSCP_AF13 0x0E
|
|
#define IPDSFIELD_DSCP_AF21 0x12
|
|
#define IPDSFIELD_DSCP_AF22 0x14
|
|
#define IPDSFIELD_DSCP_AF23 0x16
|
|
#define IPDSFIELD_DSCP_AF31 0x1A
|
|
#define IPDSFIELD_DSCP_AF32 0x1C
|
|
#define IPDSFIELD_DSCP_AF33 0x1E
|
|
#define IPDSFIELD_DSCP_AF41 0x22
|
|
#define IPDSFIELD_DSCP_AF42 0x24
|
|
#define IPDSFIELD_DSCP_AF43 0x26
|
|
#define IPDSFIELD_DSCP_EF 0x2E
|
|
#define IPDSFIELD_ECT_MASK 0x02
|
|
#define IPDSFIELD_CE_MASK 0x01
|
|
|
|
/* IP TOS, superseded by the DS Field, RFC 2474. */
|
|
#define IPTOS_TOS_MASK 0x1E
|
|
#define IPTOS_TOS(tos) ((tos) & IPTOS_TOS_MASK)
|
|
#define IPTOS_NONE 0x00
|
|
#define IPTOS_LOWCOST 0x02
|
|
#define IPTOS_RELIABILITY 0x04
|
|
#define IPTOS_THROUGHPUT 0x08
|
|
#define IPTOS_LOWDELAY 0x10
|
|
#define IPTOS_SECURITY 0x1E
|
|
|
|
#define IPTOS_PREC_MASK 0xE0
|
|
#define IPTOS_PREC_SHIFT 5
|
|
#define IPTOS_PREC(tos) (((tos)&IPTOS_PREC_MASK)>>IPTOS_PREC_SHIFT)
|
|
#define IPTOS_PREC_NETCONTROL 7
|
|
#define IPTOS_PREC_INTERNETCONTROL 6
|
|
#define IPTOS_PREC_CRITIC_ECP 5
|
|
#define IPTOS_PREC_FLASHOVERRIDE 4
|
|
#define IPTOS_PREC_FLASH 3
|
|
#define IPTOS_PREC_IMMEDIATE 2
|
|
#define IPTOS_PREC_PRIORITY 1
|
|
#define IPTOS_PREC_ROUTINE 0
|
|
|
|
/* IP options */
|
|
#define IPOPT_COPY 0x80
|
|
|
|
#define IPOPT_CONTROL 0x00
|
|
#define IPOPT_RESERVED1 0x20
|
|
#define IPOPT_MEASUREMENT 0x40
|
|
#define IPOPT_RESERVED2 0x60
|
|
|
|
#define IPOPT_END (0 |IPOPT_CONTROL)
|
|
#define IPOPT_NOOP (1 |IPOPT_CONTROL)
|
|
#define IPOPT_SEC (2 |IPOPT_CONTROL|IPOPT_COPY)
|
|
#define IPOPT_LSRR (3 |IPOPT_CONTROL|IPOPT_COPY)
|
|
#define IPOPT_TIMESTAMP (4 |IPOPT_MEASUREMENT)
|
|
#define IPOPT_CIPSO (6 |IPOPT_CONTROL|IPOPT_COPY)
|
|
#define IPOPT_RR (7 |IPOPT_CONTROL)
|
|
#define IPOPT_SID (8 |IPOPT_CONTROL|IPOPT_COPY)
|
|
#define IPOPT_SSRR (9 |IPOPT_CONTROL|IPOPT_COPY)
|
|
#define IPOPT_RA (20|IPOPT_CONTROL|IPOPT_COPY)
|
|
|
|
/* IP option lengths */
|
|
#define IPOLEN_SEC 11
|
|
#define IPOLEN_LSRR_MIN 3
|
|
#define IPOLEN_TIMESTAMP_MIN 5
|
|
#define IPOLEN_RR_MIN 3
|
|
#define IPOLEN_SID 4
|
|
#define IPOLEN_SSRR_MIN 3
|
|
#define IPOLEN_RA 4
|
|
#define IPOLEN_CIPSO_MIN 10
|
|
|
|
#define IPSEC_UNCLASSIFIED 0x0000
|
|
#define IPSEC_CONFIDENTIAL 0xF135
|
|
#define IPSEC_EFTO 0x789A
|
|
#define IPSEC_MMMM 0xBC4D
|
|
#define IPSEC_RESTRICTED 0xAF13
|
|
#define IPSEC_SECRET 0xD788
|
|
#define IPSEC_TOPSECRET 0x6BC5
|
|
#define IPSEC_RESERVED1 0x35E2
|
|
#define IPSEC_RESERVED2 0x9AF1
|
|
#define IPSEC_RESERVED3 0x4D78
|
|
#define IPSEC_RESERVED4 0x24BD
|
|
#define IPSEC_RESERVED5 0x135E
|
|
#define IPSEC_RESERVED6 0x89AF
|
|
#define IPSEC_RESERVED7 0xC4D6
|
|
#define IPSEC_RESERVED8 0xE26B
|
|
|
|
#define IPOPT_TS_TSONLY 0 /* timestamps only */
|
|
#define IPOPT_TS_TSANDADDR 1 /* timestamps and addresses */
|
|
#define IPOPT_TS_PRESPEC 3 /* specified modules only */
|
|
|
|
/*
|
|
* defragmentation of IPv4
|
|
*/
|
|
static GHashTable *ip_fragment_table = NULL;
|
|
static GHashTable *ip_reassembled_table = NULL;
|
|
|
|
static void
|
|
ip_defragment_init(void)
|
|
{
|
|
fragment_table_init(&ip_fragment_table);
|
|
reassembled_table_init(&ip_reassembled_table);
|
|
}
|
|
|
|
void
|
|
capture_ip(const guchar *pd, int offset, int len, packet_counts *ld) {
|
|
if (!BYTES_ARE_IN_FRAME(offset, len, IPH_MIN_LEN)) {
|
|
ld->other++;
|
|
return;
|
|
}
|
|
switch (pd[offset + 9]) {
|
|
case IP_PROTO_TCP:
|
|
ld->tcp++;
|
|
break;
|
|
case IP_PROTO_UDP:
|
|
case IP_PROTO_UDPLITE:
|
|
ld->udp++;
|
|
break;
|
|
case IP_PROTO_ICMP:
|
|
case IP_PROTO_ICMPV6: /* XXX - separate counters? */
|
|
ld->icmp++;
|
|
break;
|
|
case IP_PROTO_SCTP:
|
|
ld->sctp++;
|
|
break;
|
|
case IP_PROTO_OSPF:
|
|
ld->ospf++;
|
|
break;
|
|
case IP_PROTO_GRE:
|
|
ld->gre++;
|
|
break;
|
|
case IP_PROTO_VINES:
|
|
ld->vines++;
|
|
break;
|
|
default:
|
|
ld->other++;
|
|
}
|
|
}
|
|
|
|
static void
|
|
dissect_ipopt_security(const ip_tcp_opt *optp, tvbuff_t *tvb, int offset,
|
|
guint optlen, packet_info *pinfo _U_,
|
|
proto_tree *opt_tree)
|
|
{
|
|
proto_tree *field_tree = NULL;
|
|
proto_item *tf;
|
|
guint val;
|
|
static const value_string secl_vals[] = {
|
|
{IPSEC_UNCLASSIFIED, "Unclassified"},
|
|
{IPSEC_CONFIDENTIAL, "Confidential"},
|
|
{IPSEC_EFTO, "EFTO" },
|
|
{IPSEC_MMMM, "MMMM" },
|
|
{IPSEC_RESTRICTED, "Restricted" },
|
|
{IPSEC_SECRET, "Secret" },
|
|
{IPSEC_TOPSECRET, "Top secret" },
|
|
{IPSEC_RESERVED1, "Reserved" },
|
|
{IPSEC_RESERVED2, "Reserved" },
|
|
{IPSEC_RESERVED3, "Reserved" },
|
|
{IPSEC_RESERVED4, "Reserved" },
|
|
{IPSEC_RESERVED5, "Reserved" },
|
|
{IPSEC_RESERVED6, "Reserved" },
|
|
{IPSEC_RESERVED7, "Reserved" },
|
|
{IPSEC_RESERVED8, "Reserved" },
|
|
{0, NULL } };
|
|
|
|
tf = proto_tree_add_text(opt_tree, tvb, offset, optlen, "%s:", optp->name);
|
|
field_tree = proto_item_add_subtree(tf, *optp->subtree_index);
|
|
offset += 2;
|
|
|
|
val = tvb_get_ntohs(tvb, offset);
|
|
proto_tree_add_text(field_tree, tvb, offset, 2,
|
|
"Security: %s", val_to_str(val, secl_vals, "Unknown (0x%x)"));
|
|
offset += 2;
|
|
|
|
val = tvb_get_ntohs(tvb, offset);
|
|
proto_tree_add_text(field_tree, tvb, offset, 2,
|
|
"Compartments: %u", val);
|
|
offset += 2;
|
|
|
|
proto_tree_add_text(field_tree, tvb, offset, 2,
|
|
"Handling restrictions: %c%c",
|
|
tvb_get_guint8(tvb, offset),
|
|
tvb_get_guint8(tvb, offset + 1));
|
|
offset += 2;
|
|
|
|
proto_tree_add_text(field_tree, tvb, offset, 3,
|
|
"Transmission control code: %c%c%c",
|
|
tvb_get_guint8(tvb, offset),
|
|
tvb_get_guint8(tvb, offset + 1),
|
|
tvb_get_guint8(tvb, offset + 2));
|
|
}
|
|
|
|
/* USHRT_MAX can hold at most 5 (base 10) digits (6 for the NULL byte) */
|
|
#define USHRT_MAX_STRLEN 6
|
|
|
|
/* Maximum CIPSO tag length:
|
|
* (IP hdr max)60 - (IPv4 hdr std)20 - (CIPSO base)6 = 34 */
|
|
#define CIPSO_TAG_LEN_MAX 34
|
|
|
|
/* The Commercial IP Security Option (CIPSO) is defined in IETF draft
|
|
* draft-ietf-cipso-ipsecurity-01.txt and FIPS 188, a copy of both documents
|
|
* can be found at the NetLabel project page, http://netlabel.sf.net. */
|
|
static void
|
|
dissect_ipopt_cipso(const ip_tcp_opt *optp, tvbuff_t *tvb, int offset,
|
|
guint optlen, packet_info *pinfo _U_, proto_tree *opt_tree)
|
|
{
|
|
proto_tree *field_tree = NULL;
|
|
proto_item *tf;
|
|
guint tagtype, taglen;
|
|
int offset_max = offset + optlen;
|
|
|
|
tf = proto_tree_add_text(opt_tree, tvb, offset, optlen, "%s", optp->name);
|
|
field_tree = proto_item_add_subtree(tf, *optp->subtree_index);
|
|
offset += 2;
|
|
|
|
proto_tree_add_text(field_tree, tvb, offset, 4, "DOI: %u",
|
|
tvb_get_ntohl(tvb, offset));
|
|
offset += 4;
|
|
|
|
/* loop through all of the tags in the CIPSO option */
|
|
while (offset < offset_max) {
|
|
tagtype = tvb_get_guint8(tvb, offset);
|
|
|
|
if ((offset + 1) < offset_max)
|
|
taglen = tvb_get_guint8(tvb, offset + 1);
|
|
else
|
|
taglen = 1;
|
|
|
|
switch (tagtype) {
|
|
case 0:
|
|
/* padding - skip this tag */
|
|
offset += 1;
|
|
continue;
|
|
break;
|
|
case 1:
|
|
/* restrictive bitmap, see CIPSO draft section 3.4.2 for tag format */
|
|
if ((taglen < 4) || (taglen > CIPSO_TAG_LEN_MAX) ||
|
|
((offset + (int)taglen - 1) > offset_max)) {
|
|
proto_tree_add_text(field_tree, tvb, offset, offset_max - offset,
|
|
"Malformed CIPSO tag");
|
|
return;
|
|
}
|
|
|
|
proto_tree_add_text(field_tree, tvb, offset, 1,
|
|
"Tag Type: Restrictive Category Bitmap (%u)",
|
|
tagtype);
|
|
|
|
/* skip past alignment octet */
|
|
offset += 3;
|
|
|
|
proto_tree_add_text(field_tree, tvb, offset, 1, "Sensitivity Level: %u",
|
|
tvb_get_guint8(tvb, offset));
|
|
offset += 1;
|
|
|
|
if (taglen > 4) {
|
|
guint bit_spot = 0;
|
|
guint byte_spot = 0;
|
|
unsigned char bitmask;
|
|
char *cat_str;
|
|
char *cat_str_tmp = ep_alloc(USHRT_MAX_STRLEN);
|
|
size_t cat_str_len;
|
|
const guint8 *val_ptr = tvb_get_ptr(tvb, offset, taglen - 4);
|
|
|
|
/* this is just a guess regarding string size, but we grow it below
|
|
* if needed */
|
|
cat_str_len = 256;
|
|
cat_str = ep_alloc0(cat_str_len);
|
|
|
|
/* we checked the length above so the highest category value
|
|
* possibile here is 240 */
|
|
while (byte_spot < (taglen - 4)) {
|
|
bitmask = 0x80;
|
|
bit_spot = 0;
|
|
while (bit_spot < 8) {
|
|
if (val_ptr[byte_spot] & bitmask) {
|
|
g_snprintf(cat_str_tmp, USHRT_MAX_STRLEN, "%u",
|
|
byte_spot * 8 + bit_spot);
|
|
cat_str_tmp[USHRT_MAX_STRLEN - 1] = '\0';
|
|
if (cat_str_len < (strlen(cat_str) + 2 + USHRT_MAX_STRLEN)) {
|
|
char *cat_str_new;
|
|
while (cat_str_len < (strlen(cat_str) + 2 + USHRT_MAX_STRLEN))
|
|
cat_str_len += cat_str_len;
|
|
cat_str_new = ep_alloc(cat_str_len);
|
|
strncpy(cat_str_new, cat_str, cat_str_len);
|
|
cat_str_new[cat_str_len - 1] = '\0';
|
|
cat_str = cat_str_new;
|
|
}
|
|
if (cat_str[0] != '\0')
|
|
strncat(cat_str, ",", cat_str_len - 1);
|
|
strncat(cat_str, cat_str_tmp, cat_str_len - 1);
|
|
}
|
|
bit_spot++;
|
|
bitmask >>= 1;
|
|
}
|
|
byte_spot++;
|
|
}
|
|
|
|
if (cat_str)
|
|
proto_tree_add_text(field_tree, tvb, offset, taglen - 4,
|
|
"Categories: %s", cat_str);
|
|
else
|
|
proto_tree_add_text(field_tree, tvb, offset, taglen - 4,
|
|
"Categories: ERROR PARSING CATEGORIES");
|
|
|
|
offset += taglen - 4;
|
|
}
|
|
break;
|
|
case 2:
|
|
/* enumerated categories, see CIPSO draft section 3.4.3 for tag format */
|
|
if ((taglen < 4) || (taglen > CIPSO_TAG_LEN_MAX) ||
|
|
((offset + (int)taglen - 1) > offset_max)) {
|
|
proto_tree_add_text(field_tree, tvb, offset, offset_max - offset,
|
|
"Malformed CIPSO tag");
|
|
return;
|
|
}
|
|
|
|
proto_tree_add_text(field_tree, tvb, offset, 1,
|
|
"Tag Type: Enumerated Categories (%u)", tagtype);
|
|
|
|
/* skip past alignment octet */
|
|
offset += 3;
|
|
|
|
/* sensitvity level */
|
|
proto_tree_add_text(field_tree, tvb, offset, 1, "Sensitivity Level: %u",
|
|
tvb_get_guint8(tvb, offset));
|
|
offset += 1;
|
|
|
|
if (taglen > 4) {
|
|
int offset_max_cat = offset + taglen - 4;
|
|
char *cat_str = ep_alloc0(USHRT_MAX_STRLEN * 15);
|
|
char *cat_str_tmp = ep_alloc(USHRT_MAX_STRLEN);
|
|
|
|
while ((offset + 2) <= offset_max_cat) {
|
|
g_snprintf(cat_str_tmp, USHRT_MAX_STRLEN, "%u",
|
|
tvb_get_ntohs(tvb, offset));
|
|
offset += 2;
|
|
cat_str_tmp[USHRT_MAX_STRLEN - 1] = '\0';
|
|
if (cat_str[0] != '\0')
|
|
strncat(cat_str, ",", USHRT_MAX_STRLEN * 15 - 1);
|
|
strncat(cat_str, cat_str_tmp, USHRT_MAX_STRLEN * 15 - 1);
|
|
}
|
|
|
|
proto_tree_add_text(field_tree, tvb, offset - taglen + 4, taglen - 4,
|
|
"Categories: %s", cat_str);
|
|
}
|
|
break;
|
|
case 5:
|
|
/* ranged categories, see CIPSO draft section 3.4.4 for tag format */
|
|
if ((taglen < 4) || (taglen > CIPSO_TAG_LEN_MAX) ||
|
|
((offset + (int)taglen - 1) > offset_max)) {
|
|
proto_tree_add_text(field_tree, tvb, offset, offset_max - offset,
|
|
"Malformed CIPSO tag");
|
|
return;
|
|
}
|
|
|
|
proto_tree_add_text(field_tree, tvb, offset, 1,
|
|
"Tag Type: Ranged Categories (%u)", tagtype);
|
|
|
|
/* skip past alignment octet */
|
|
offset += 3;
|
|
|
|
/* sensitvity level */
|
|
proto_tree_add_text(field_tree, tvb, offset, 1, "Sensitivity Level: %u",
|
|
tvb_get_guint8(tvb, offset));
|
|
offset += 1;
|
|
|
|
if (taglen > 4) {
|
|
guint16 cat_low, cat_high;
|
|
int offset_max_cat = offset + taglen - 4;
|
|
char *cat_str = ep_alloc0(USHRT_MAX_STRLEN * 16);
|
|
char *cat_str_tmp = ep_alloc(USHRT_MAX_STRLEN * 2);
|
|
|
|
while ((offset + 2) <= offset_max_cat) {
|
|
cat_high = tvb_get_ntohs(tvb, offset);
|
|
if ((offset + 4) <= offset_max_cat) {
|
|
cat_low = tvb_get_ntohs(tvb, offset + 2);
|
|
offset += 4;
|
|
} else {
|
|
cat_low = 0;
|
|
offset += 2;
|
|
}
|
|
if (cat_low != cat_high)
|
|
g_snprintf(cat_str_tmp, USHRT_MAX_STRLEN * 2, "%u-%u",
|
|
cat_high, cat_low);
|
|
else
|
|
g_snprintf(cat_str_tmp, USHRT_MAX_STRLEN * 2, "%u", cat_high);
|
|
if (cat_str[0] != '\0')
|
|
strncat(cat_str, ",", USHRT_MAX_STRLEN * 16 - 1);
|
|
strncat(cat_str, cat_str_tmp, USHRT_MAX_STRLEN * 16 - 1);
|
|
}
|
|
|
|
proto_tree_add_text(field_tree, tvb, offset - taglen + 4, taglen - 4,
|
|
"Categories: %s", cat_str);
|
|
}
|
|
break;
|
|
case 6:
|
|
/* permissive categories, see FIPS 188 section 6.9 for tag format */
|
|
if ((taglen < 4) || (taglen > CIPSO_TAG_LEN_MAX) ||
|
|
((offset + (int)taglen - 1) > offset_max)) {
|
|
proto_tree_add_text(field_tree, tvb, offset, offset_max - offset,
|
|
"Malformed CIPSO tag");
|
|
return;
|
|
}
|
|
|
|
proto_tree_add_text(field_tree, tvb, offset, 1,
|
|
"Tag Type: Permissive Categories (%u)", tagtype);
|
|
proto_tree_add_text(field_tree, tvb, offset + 2, taglen - 2, "Tag data");
|
|
offset += taglen;
|
|
break;
|
|
case 7:
|
|
/* free form, see FIPS 188 section 6.10 for tag format */
|
|
if ((taglen < 2) || (taglen > CIPSO_TAG_LEN_MAX) ||
|
|
((offset + (int)taglen - 1) > offset_max)) {
|
|
proto_tree_add_text(field_tree, tvb, offset, offset_max - offset,
|
|
"Malformed CIPSO tag");
|
|
return;
|
|
}
|
|
|
|
proto_tree_add_text(field_tree, tvb, offset, 1,
|
|
"Tag Type: Free Form (%u)", tagtype);
|
|
proto_tree_add_text(field_tree, tvb, offset + 2, taglen - 2, "Tag data");
|
|
offset += taglen;
|
|
break;
|
|
default:
|
|
/* unknown tag - stop parsing this IPv4 option */
|
|
if ((offset + 1) <= offset_max) {
|
|
taglen = tvb_get_guint8(tvb, offset + 1);
|
|
proto_tree_add_text(field_tree, tvb, offset, 1,
|
|
"Tag Type: Unknown (%u) (%u bytes)",
|
|
tagtype, taglen);
|
|
return;
|
|
}
|
|
proto_tree_add_text(field_tree, tvb, offset, 1,
|
|
"Tag Type: Unknown (%u) (invalid format)",
|
|
tagtype);
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
|
|
static void
|
|
dissect_ipopt_route(const ip_tcp_opt *optp, tvbuff_t *tvb, int offset,
|
|
guint optlen, packet_info *pinfo _U_,
|
|
proto_tree *opt_tree)
|
|
{
|
|
proto_tree *field_tree = NULL;
|
|
proto_item *tf;
|
|
int ptr;
|
|
int optoffset = 0;
|
|
guint32 addr;
|
|
|
|
tf = proto_tree_add_text(opt_tree, tvb, offset, optlen, "%s (%u bytes)",
|
|
optp->name, optlen);
|
|
field_tree = proto_item_add_subtree(tf, *optp->subtree_index);
|
|
|
|
optoffset += 2; /* skip past type and length */
|
|
optlen -= 2; /* subtract size of type and length */
|
|
|
|
ptr = tvb_get_guint8(tvb, offset + optoffset);
|
|
proto_tree_add_text(field_tree, tvb, offset + optoffset, 1,
|
|
"Pointer: %d%s", ptr,
|
|
((ptr < 4) ? " (points before first address)" :
|
|
((ptr & 3) ? " (points to middle of address)" : "")));
|
|
optoffset++;
|
|
optlen--;
|
|
ptr--; /* ptr is 1-origin */
|
|
|
|
while (optlen > 0) {
|
|
if (optlen < 4) {
|
|
proto_tree_add_text(field_tree, tvb, offset, optlen,
|
|
"(suboption would go past end of option)");
|
|
break;
|
|
}
|
|
|
|
addr = tvb_get_ipv4(tvb, offset + optoffset);
|
|
proto_tree_add_text(field_tree, tvb, offset + optoffset, 4,
|
|
"%s%s",
|
|
((addr == 0) ? "-" : (char *)get_hostname(addr)),
|
|
((optoffset == ptr) ? " <- (current)" : ""));
|
|
optoffset += 4;
|
|
optlen -= 4;
|
|
}
|
|
}
|
|
|
|
static void
|
|
dissect_ipopt_sid(const ip_tcp_opt *optp, tvbuff_t *tvb, int offset,
|
|
guint optlen, packet_info *pinfo _U_,
|
|
proto_tree *opt_tree)
|
|
{
|
|
proto_tree_add_text(opt_tree, tvb, offset, optlen,
|
|
"%s: %u", optp->name, tvb_get_ntohs(tvb, offset + 2));
|
|
return;
|
|
}
|
|
|
|
static void
|
|
dissect_ipopt_timestamp(const ip_tcp_opt *optp, tvbuff_t *tvb,
|
|
int offset, guint optlen, packet_info *pinfo _U_, proto_tree *opt_tree)
|
|
{
|
|
proto_tree *field_tree = NULL;
|
|
proto_item *tf;
|
|
int ptr;
|
|
int optoffset = 0;
|
|
int flg;
|
|
static const value_string flag_vals[] = {
|
|
{IPOPT_TS_TSONLY, "Time stamps only" },
|
|
{IPOPT_TS_TSANDADDR, "Time stamp and address" },
|
|
{IPOPT_TS_PRESPEC, "Time stamps for prespecified addresses"},
|
|
{0, NULL } };
|
|
guint32 addr;
|
|
guint ts;
|
|
|
|
tf = proto_tree_add_text(opt_tree, tvb, offset, optlen, "%s:", optp->name);
|
|
field_tree = proto_item_add_subtree(tf, *optp->subtree_index);
|
|
|
|
optoffset += 2; /* skip past type and length */
|
|
optlen -= 2; /* subtract size of type and length */
|
|
|
|
ptr = tvb_get_guint8(tvb, offset + optoffset);
|
|
proto_tree_add_text(field_tree, tvb, offset + optoffset, 1,
|
|
"Pointer: %d%s", ptr,
|
|
((ptr < 5) ? " (points before first address)" :
|
|
(((ptr - 1) & 3) ? " (points to middle of address)" : "")));
|
|
optoffset++;
|
|
optlen--;
|
|
ptr--; /* ptr is 1-origin */
|
|
|
|
flg = tvb_get_guint8(tvb, offset + optoffset);
|
|
proto_tree_add_text(field_tree, tvb, offset + optoffset, 1,
|
|
"Overflow: %u", flg >> 4);
|
|
flg &= 0xF;
|
|
proto_tree_add_text(field_tree, tvb, offset + optoffset, 1,
|
|
"Flag: %s", val_to_str(flg, flag_vals, "Unknown (0x%x)"));
|
|
optoffset++;
|
|
optlen--;
|
|
|
|
while (optlen > 0) {
|
|
if (flg == IPOPT_TS_TSANDADDR) {
|
|
if (optlen < 8) {
|
|
proto_tree_add_text(field_tree, tvb, offset + optoffset, optlen,
|
|
"(suboption would go past end of option)");
|
|
break;
|
|
}
|
|
addr = tvb_get_ipv4(tvb, offset + optoffset);
|
|
ts = tvb_get_ntohl(tvb, offset + optoffset + 4);
|
|
optlen -= 8;
|
|
proto_tree_add_text(field_tree, tvb, offset + optoffset, 8,
|
|
"Address = %s, time stamp = %u",
|
|
((addr == 0) ? "-" : (char *)get_hostname(addr)),
|
|
ts);
|
|
optoffset += 8;
|
|
} else {
|
|
if (optlen < 4) {
|
|
proto_tree_add_text(field_tree, tvb, offset + optoffset, optlen,
|
|
"(suboption would go past end of option)");
|
|
break;
|
|
}
|
|
ts = tvb_get_ntohl(tvb, offset + optoffset);
|
|
optlen -= 4;
|
|
proto_tree_add_text(field_tree, tvb, offset + optoffset, 4,
|
|
"Time stamp = %u", ts);
|
|
optoffset += 4;
|
|
}
|
|
}
|
|
}
|
|
|
|
static void
|
|
dissect_ipopt_ra(const ip_tcp_opt *optp, tvbuff_t *tvb, int offset,
|
|
guint optlen, packet_info *pinfo _U_, proto_tree *opt_tree)
|
|
{
|
|
/* Router-Alert, as defined by RFC2113 */
|
|
int opt = tvb_get_ntohs(tvb, offset + 2);
|
|
static const value_string ra_opts[] = {
|
|
{0, "Every router examines packet"},
|
|
{0, NULL}
|
|
};
|
|
|
|
proto_tree_add_text(opt_tree, tvb, offset, optlen,
|
|
"%s: %s", optp->name, val_to_str(opt, ra_opts, "Unknown (%d)"));
|
|
return;
|
|
}
|
|
|
|
static const ip_tcp_opt ipopts[] = {
|
|
{
|
|
IPOPT_END,
|
|
"EOL",
|
|
NULL,
|
|
NO_LENGTH,
|
|
0,
|
|
NULL,
|
|
},
|
|
{
|
|
IPOPT_NOOP,
|
|
"NOP",
|
|
NULL,
|
|
NO_LENGTH,
|
|
0,
|
|
NULL,
|
|
},
|
|
{
|
|
IPOPT_SEC,
|
|
"Security",
|
|
&ett_ip_option_sec,
|
|
FIXED_LENGTH,
|
|
IPOLEN_SEC,
|
|
dissect_ipopt_security
|
|
},
|
|
{
|
|
IPOPT_SSRR,
|
|
"Strict source route",
|
|
&ett_ip_option_route,
|
|
VARIABLE_LENGTH,
|
|
IPOLEN_SSRR_MIN,
|
|
dissect_ipopt_route
|
|
},
|
|
{
|
|
IPOPT_LSRR,
|
|
"Loose source route",
|
|
&ett_ip_option_route,
|
|
VARIABLE_LENGTH,
|
|
IPOLEN_LSRR_MIN,
|
|
dissect_ipopt_route
|
|
},
|
|
{
|
|
IPOPT_CIPSO,
|
|
"Commercial IP security option",
|
|
&ett_ip_option_cipso,
|
|
VARIABLE_LENGTH,
|
|
IPOLEN_CIPSO_MIN,
|
|
dissect_ipopt_cipso
|
|
},
|
|
{
|
|
IPOPT_RR,
|
|
"Record route",
|
|
&ett_ip_option_route,
|
|
VARIABLE_LENGTH,
|
|
IPOLEN_RR_MIN,
|
|
dissect_ipopt_route
|
|
},
|
|
{
|
|
IPOPT_SID,
|
|
"Stream identifier",
|
|
NULL,
|
|
FIXED_LENGTH,
|
|
IPOLEN_SID,
|
|
dissect_ipopt_sid
|
|
},
|
|
{
|
|
IPOPT_TIMESTAMP,
|
|
"Time stamp",
|
|
&ett_ip_option_timestamp,
|
|
VARIABLE_LENGTH,
|
|
IPOLEN_TIMESTAMP_MIN,
|
|
dissect_ipopt_timestamp
|
|
},
|
|
{
|
|
IPOPT_RA,
|
|
"Router Alert",
|
|
NULL,
|
|
FIXED_LENGTH,
|
|
IPOLEN_RA,
|
|
dissect_ipopt_ra
|
|
},
|
|
};
|
|
|
|
#define N_IP_OPTS (sizeof ipopts / sizeof ipopts[0])
|
|
|
|
/* Dissect the IP or TCP options in a packet. */
|
|
void
|
|
dissect_ip_tcp_options(tvbuff_t *tvb, int offset, guint length,
|
|
const ip_tcp_opt *opttab, int nopts, int eol,
|
|
packet_info *pinfo, proto_tree *opt_tree)
|
|
{
|
|
guchar opt;
|
|
const ip_tcp_opt *optp;
|
|
opt_len_type len_type;
|
|
unsigned int optlen;
|
|
const char *name;
|
|
void (*dissect)(const struct ip_tcp_opt *, tvbuff_t *,
|
|
int, guint, packet_info *, proto_tree *);
|
|
guint len;
|
|
|
|
while (length > 0) {
|
|
opt = tvb_get_guint8(tvb, offset);
|
|
for (optp = &opttab[0]; optp < &opttab[nopts]; optp++) {
|
|
if (optp->optcode == opt)
|
|
break;
|
|
}
|
|
if (optp == &opttab[nopts]) {
|
|
/* We assume that the only NO_LENGTH options are EOL and NOP options,
|
|
so that we can treat unknown options as VARIABLE_LENGTH with a
|
|
minimum of 2, and at least be able to move on to the next option
|
|
by using the length in the option. */
|
|
optp = NULL; /* indicate that we don't know this option */
|
|
len_type = VARIABLE_LENGTH;
|
|
optlen = 2;
|
|
name = ep_strdup_printf("Unknown (0x%02x)", opt);
|
|
dissect = NULL;
|
|
} else {
|
|
len_type = optp->len_type;
|
|
optlen = optp->optlen;
|
|
name = optp->name;
|
|
dissect = optp->dissect;
|
|
}
|
|
--length; /* account for type byte */
|
|
if (len_type != NO_LENGTH) {
|
|
/* Option has a length. Is it in the packet? */
|
|
if (length == 0) {
|
|
/* Bogus - packet must at least include option code byte and
|
|
length byte! */
|
|
proto_tree_add_text(opt_tree, tvb, offset, 1,
|
|
"%s (length byte past end of options)", name);
|
|
return;
|
|
}
|
|
len = tvb_get_guint8(tvb, offset + 1); /* total including type, len */
|
|
--length; /* account for length byte */
|
|
if (len < 2) {
|
|
/* Bogus - option length is too short to include option code and
|
|
option length. */
|
|
proto_tree_add_text(opt_tree, tvb, offset, 2,
|
|
"%s (with too-short option length = %u byte%s)", name,
|
|
len, plurality(len, "", "s"));
|
|
return;
|
|
} else if (len - 2 > length) {
|
|
/* Bogus - option goes past the end of the header. */
|
|
proto_tree_add_text(opt_tree, tvb, offset, length,
|
|
"%s (option length = %u byte%s says option goes past end of options)",
|
|
name, len, plurality(len, "", "s"));
|
|
return;
|
|
} else if (len_type == FIXED_LENGTH && len != optlen) {
|
|
/* Bogus - option length isn't what it's supposed to be for this
|
|
option. */
|
|
proto_tree_add_text(opt_tree, tvb, offset, len,
|
|
"%s (with option length = %u byte%s; should be %u)", name,
|
|
len, plurality(len, "", "s"), optlen);
|
|
return;
|
|
} else if (len_type == VARIABLE_LENGTH && len < optlen) {
|
|
/* Bogus - option length is less than what it's supposed to be for
|
|
this option. */
|
|
proto_tree_add_text(opt_tree, tvb, offset, len,
|
|
"%s (with option length = %u byte%s; should be >= %u)", name,
|
|
len, plurality(len, "", "s"), optlen);
|
|
return;
|
|
} else {
|
|
if (optp == NULL) {
|
|
proto_tree_add_text(opt_tree, tvb, offset, len, "%s (%u byte%s)",
|
|
name, len, plurality(len, "", "s"));
|
|
} else {
|
|
if (dissect != NULL) {
|
|
/* Option has a dissector. */
|
|
(*dissect)(optp, tvb, offset, len, pinfo, opt_tree);
|
|
} else {
|
|
/* Option has no data, hence no dissector. */
|
|
proto_tree_add_text(opt_tree, tvb, offset, len, "%s", name);
|
|
}
|
|
}
|
|
len -= 2; /* subtract size of type and length */
|
|
offset += 2 + len;
|
|
}
|
|
length -= len;
|
|
} else {
|
|
proto_tree_add_text(opt_tree, tvb, offset, 1, "%s", name);
|
|
offset += 1;
|
|
}
|
|
if (opt == eol)
|
|
break;
|
|
}
|
|
}
|
|
|
|
const value_string dscp_vals[] = {
|
|
{ IPDSFIELD_DSCP_DEFAULT, "Default" },
|
|
{ IPDSFIELD_DSCP_CS1, "Class Selector 1" },
|
|
{ IPDSFIELD_DSCP_CS2, "Class Selector 2" },
|
|
{ IPDSFIELD_DSCP_CS3, "Class Selector 3" },
|
|
{ IPDSFIELD_DSCP_CS4, "Class Selector 4" },
|
|
{ IPDSFIELD_DSCP_CS5, "Class Selector 5" },
|
|
{ IPDSFIELD_DSCP_CS6, "Class Selector 6" },
|
|
{ IPDSFIELD_DSCP_CS7, "Class Selector 7" },
|
|
{ IPDSFIELD_DSCP_AF11, "Assured Forwarding 11" },
|
|
{ IPDSFIELD_DSCP_AF12, "Assured Forwarding 12" },
|
|
{ IPDSFIELD_DSCP_AF13, "Assured Forwarding 13" },
|
|
{ IPDSFIELD_DSCP_AF21, "Assured Forwarding 21" },
|
|
{ IPDSFIELD_DSCP_AF22, "Assured Forwarding 22" },
|
|
{ IPDSFIELD_DSCP_AF23, "Assured Forwarding 23" },
|
|
{ IPDSFIELD_DSCP_AF31, "Assured Forwarding 31" },
|
|
{ IPDSFIELD_DSCP_AF32, "Assured Forwarding 32" },
|
|
{ IPDSFIELD_DSCP_AF33, "Assured Forwarding 33" },
|
|
{ IPDSFIELD_DSCP_AF41, "Assured Forwarding 41" },
|
|
{ IPDSFIELD_DSCP_AF42, "Assured Forwarding 42" },
|
|
{ IPDSFIELD_DSCP_AF43, "Assured Forwarding 43" },
|
|
{ IPDSFIELD_DSCP_EF, "Expedited Forwarding" },
|
|
{ 0, NULL } };
|
|
|
|
static const value_string precedence_vals[] = {
|
|
{ IPTOS_PREC_ROUTINE, "routine" },
|
|
{ IPTOS_PREC_PRIORITY, "priority" },
|
|
{ IPTOS_PREC_IMMEDIATE, "immediate" },
|
|
{ IPTOS_PREC_FLASH, "flash" },
|
|
{ IPTOS_PREC_FLASHOVERRIDE, "flash override" },
|
|
{ IPTOS_PREC_CRITIC_ECP, "CRITIC/ECP" },
|
|
{ IPTOS_PREC_INTERNETCONTROL, "internetwork control" },
|
|
{ IPTOS_PREC_NETCONTROL, "network control" },
|
|
{ 0, NULL } };
|
|
|
|
static const value_string iptos_vals[] = {
|
|
{ IPTOS_NONE, "None" },
|
|
{ IPTOS_LOWCOST, "Minimize cost" },
|
|
{ IPTOS_RELIABILITY, "Maximize reliability" },
|
|
{ IPTOS_THROUGHPUT, "Maximize throughput" },
|
|
{ IPTOS_LOWDELAY, "Minimize delay" },
|
|
{ IPTOS_SECURITY, "Maximize security" },
|
|
{ 0, NULL }
|
|
};
|
|
|
|
static const true_false_string tos_set_low = {
|
|
"Low",
|
|
"Normal"
|
|
};
|
|
|
|
static const true_false_string tos_set_high = {
|
|
"High",
|
|
"Normal"
|
|
};
|
|
|
|
static guint16 ip_checksum(const guint8 *ptr, int len)
|
|
{
|
|
vec_t cksum_vec[1];
|
|
|
|
cksum_vec[0].ptr = ptr;
|
|
cksum_vec[0].len = len;
|
|
return in_cksum(&cksum_vec[0], 1);
|
|
}
|
|
|
|
static void
|
|
dissect_ip(tvbuff_t *tvb, packet_info *pinfo, proto_tree *parent_tree)
|
|
{
|
|
proto_tree *ip_tree = NULL, *field_tree;
|
|
proto_item *ti = NULL, *tf;
|
|
guint32 addr;
|
|
int offset = 0;
|
|
guint hlen, optlen;
|
|
guint16 flags;
|
|
guint8 nxt;
|
|
guint16 ipsum;
|
|
fragment_data *ipfd_head=NULL;
|
|
tvbuff_t *next_tvb;
|
|
gboolean update_col_info = TRUE;
|
|
gboolean save_fragmented;
|
|
static e_ip eip_arr[4];
|
|
static int eip_current=0;
|
|
e_ip *iph;
|
|
const guchar *src_addr, *dst_addr;
|
|
guint32 src32, dst32;
|
|
proto_tree *tree;
|
|
proto_item *item;
|
|
proto_tree *checksum_tree;
|
|
|
|
tree=parent_tree;
|
|
|
|
eip_current++;
|
|
if(eip_current==4){
|
|
eip_current=0;
|
|
}
|
|
iph=&eip_arr[eip_current];
|
|
|
|
if (check_col(pinfo->cinfo, COL_PROTOCOL))
|
|
col_set_str(pinfo->cinfo, COL_PROTOCOL, "IP");
|
|
if (check_col(pinfo->cinfo, COL_INFO))
|
|
col_clear(pinfo->cinfo, COL_INFO);
|
|
|
|
iph->ip_v_hl = tvb_get_guint8(tvb, offset);
|
|
if ( hi_nibble(iph->ip_v_hl) == 6){
|
|
call_dissector(ipv6_handle, tvb, pinfo, parent_tree);
|
|
return;
|
|
}
|
|
|
|
hlen = lo_nibble(iph->ip_v_hl) * 4; /* IP header length, in bytes */
|
|
|
|
if (tree) {
|
|
ti = proto_tree_add_item(tree, proto_ip, tvb, offset, hlen, FALSE);
|
|
ip_tree = proto_item_add_subtree(ti, ett_ip);
|
|
|
|
proto_tree_add_uint(ip_tree, hf_ip_version, tvb, offset, 1,
|
|
hi_nibble(iph->ip_v_hl));
|
|
}
|
|
|
|
/* if IP is not referenced from any filters we dont need to worry about
|
|
generating any tree items. We must do this after we created the actual
|
|
protocol above so that proto hier stat still works though.
|
|
*/
|
|
if(!proto_field_is_referenced(parent_tree, proto_ip)){
|
|
tree=NULL;
|
|
}
|
|
|
|
if (hlen < IPH_MIN_LEN) {
|
|
if (check_col(pinfo->cinfo, COL_INFO))
|
|
col_add_fstr(pinfo->cinfo, COL_INFO, "Bogus IP header length (%u, must be at least %u)",
|
|
hlen, IPH_MIN_LEN);
|
|
if (tree) {
|
|
proto_tree_add_uint_format(ip_tree, hf_ip_hdr_len, tvb, offset, 1, hlen,
|
|
"Header length: %u bytes (bogus, must be at least %u)", hlen,
|
|
IPH_MIN_LEN);
|
|
}
|
|
goto end_of_ip;
|
|
}
|
|
|
|
if (tree) {
|
|
proto_tree_add_uint_format(ip_tree, hf_ip_hdr_len, tvb, offset, 1, hlen,
|
|
"Header length: %u bytes", hlen);
|
|
}
|
|
|
|
iph->ip_tos = tvb_get_guint8(tvb, offset + 1);
|
|
if (tree) {
|
|
|
|
if (check_col(pinfo->cinfo, COL_DSCP_VALUE)) {
|
|
col_add_fstr(pinfo->cinfo, COL_DSCP_VALUE, "%u", IPDSFIELD_DSCP(iph->ip_tos));
|
|
}
|
|
if (g_ip_dscp_actif) {
|
|
tf = proto_tree_add_uint_format(ip_tree, hf_ip_dsfield, tvb, offset + 1, 1, iph->ip_tos,
|
|
"Differentiated Services Field: 0x%02x (DSCP 0x%02x: %s; ECN: 0x%02x)", iph->ip_tos,
|
|
IPDSFIELD_DSCP(iph->ip_tos), val_to_str(IPDSFIELD_DSCP(iph->ip_tos), dscp_vals,
|
|
"Unknown DSCP"),IPDSFIELD_ECN(iph->ip_tos));
|
|
|
|
field_tree = proto_item_add_subtree(tf, ett_ip_dsfield);
|
|
proto_tree_add_uint(field_tree, hf_ip_dsfield_dscp, tvb, offset + 1, 1, iph->ip_tos);
|
|
proto_tree_add_uint(field_tree, hf_ip_dsfield_ect, tvb, offset + 1, 1, iph->ip_tos);
|
|
proto_tree_add_uint(field_tree, hf_ip_dsfield_ce, tvb, offset + 1, 1, iph->ip_tos);
|
|
} else {
|
|
tf = proto_tree_add_uint_format(ip_tree, hf_ip_tos, tvb, offset + 1, 1, iph->ip_tos,
|
|
"Type of service: 0x%02x (%s)", iph->ip_tos,
|
|
val_to_str( IPTOS_TOS(iph->ip_tos), iptos_vals, "Unknown") );
|
|
|
|
field_tree = proto_item_add_subtree(tf, ett_ip_tos);
|
|
proto_tree_add_uint(field_tree, hf_ip_tos_precedence, tvb, offset + 1, 1, iph->ip_tos);
|
|
proto_tree_add_boolean(field_tree, hf_ip_tos_delay, tvb, offset + 1, 1, iph->ip_tos);
|
|
proto_tree_add_boolean(field_tree, hf_ip_tos_throughput, tvb, offset + 1, 1, iph->ip_tos);
|
|
proto_tree_add_boolean(field_tree, hf_ip_tos_reliability, tvb, offset + 1, 1, iph->ip_tos);
|
|
proto_tree_add_boolean(field_tree, hf_ip_tos_cost, tvb, offset + 1, 1, iph->ip_tos);
|
|
}
|
|
}
|
|
|
|
/* Length of IP datagram.
|
|
XXX - what if this is greater than the reported length of the
|
|
tvbuff? This could happen, for example, in an IP datagram
|
|
inside an ICMP datagram; we need to somehow let the
|
|
dissector we call know that, as it might want to avoid
|
|
doing its checksumming. */
|
|
iph->ip_len = tvb_get_ntohs(tvb, offset + 2);
|
|
|
|
/* Adjust the length of this tvbuff to include only the IP datagram. */
|
|
set_actual_length(tvb, iph->ip_len);
|
|
|
|
if (iph->ip_len < hlen) {
|
|
if (check_col(pinfo->cinfo, COL_INFO))
|
|
col_add_fstr(pinfo->cinfo, COL_INFO, "Bogus IP length (%u, less than header length %u)",
|
|
iph->ip_len, hlen);
|
|
if (tree) {
|
|
proto_tree_add_uint_format(ip_tree, hf_ip_len, tvb, offset + 2, 2, iph->ip_len,
|
|
"Total length: %u bytes (bogus, less than header length %u)", iph->ip_len,
|
|
hlen);
|
|
}
|
|
goto end_of_ip;
|
|
}
|
|
if (tree)
|
|
proto_tree_add_uint(ip_tree, hf_ip_len, tvb, offset + 2, 2, iph->ip_len);
|
|
|
|
iph->ip_id = tvb_get_ntohs(tvb, offset + 4);
|
|
if (tree)
|
|
proto_tree_add_uint(ip_tree, hf_ip_id, tvb, offset + 4, 2, iph->ip_id);
|
|
|
|
iph->ip_off = tvb_get_ntohs(tvb, offset + 6);
|
|
if (tree) {
|
|
flags = (iph->ip_off & (IP_RF | IP_DF | IP_MF)) >> 12;
|
|
tf = proto_tree_add_uint(ip_tree, hf_ip_flags, tvb, offset + 6, 1, flags);
|
|
field_tree = proto_item_add_subtree(tf, ett_ip_off);
|
|
proto_tree_add_boolean(field_tree, hf_ip_flags_rf, tvb, offset + 6, 1, flags);
|
|
if (flags & (IP_DF>>12)) proto_item_append_text(tf, " (Don't Fragment)");
|
|
proto_tree_add_boolean(field_tree, hf_ip_flags_df, tvb, offset + 6, 1, flags);
|
|
if (flags & (IP_MF>>12)) proto_item_append_text(tf, " (More Fragments)");
|
|
proto_tree_add_boolean(field_tree, hf_ip_flags_mf, tvb, offset + 6, 1, flags);
|
|
|
|
proto_tree_add_uint(ip_tree, hf_ip_frag_offset, tvb, offset + 6, 2,
|
|
(iph->ip_off & IP_OFFSET)*8);
|
|
}
|
|
|
|
if (tree)
|
|
proto_tree_add_item(ip_tree, hf_ip_ttl, tvb, offset + 8, 1, FALSE);
|
|
|
|
iph->ip_p = tvb_get_guint8(tvb, offset + 9);
|
|
if (tree) {
|
|
proto_tree_add_uint_format(ip_tree, hf_ip_proto, tvb, offset + 9, 1, iph->ip_p,
|
|
"Protocol: %s (0x%02x)", ipprotostr(iph->ip_p), iph->ip_p);
|
|
}
|
|
|
|
iph->ip_sum = tvb_get_ntohs(tvb, offset + 10);
|
|
|
|
/*
|
|
* If we have the entire IP header available, check the checksum.
|
|
*/
|
|
if (ip_check_checksum && tvb_bytes_exist(tvb, offset, hlen)) {
|
|
ipsum = ip_checksum(tvb_get_ptr(tvb, offset, hlen), hlen);
|
|
if (tree) {
|
|
if (ipsum == 0) {
|
|
item = proto_tree_add_uint_format(ip_tree, hf_ip_checksum, tvb, offset + 10, 2, iph->ip_sum,
|
|
"Header checksum: 0x%04x [correct]", iph->ip_sum);
|
|
checksum_tree = proto_item_add_subtree(item, ett_ip_checksum);
|
|
item = proto_tree_add_boolean(checksum_tree, hf_ip_checksum_good, tvb, offset + 10, 2, TRUE);
|
|
PROTO_ITEM_SET_GENERATED(item);
|
|
item = proto_tree_add_boolean(checksum_tree, hf_ip_checksum_bad, tvb, offset + 10, 2, FALSE);
|
|
PROTO_ITEM_SET_GENERATED(item);
|
|
} else {
|
|
item = proto_tree_add_uint_format(ip_tree, hf_ip_checksum, tvb, offset + 10, 2, iph->ip_sum,
|
|
"Header checksum: 0x%04x [incorrect, should be 0x%04x]", iph->ip_sum,
|
|
in_cksum_shouldbe(iph->ip_sum, ipsum));
|
|
checksum_tree = proto_item_add_subtree(item, ett_ip_checksum);
|
|
item = proto_tree_add_boolean(checksum_tree, hf_ip_checksum_good, tvb, offset + 10, 2, FALSE);
|
|
PROTO_ITEM_SET_GENERATED(item);
|
|
item = proto_tree_add_boolean(checksum_tree, hf_ip_checksum_bad, tvb, offset + 10, 2, TRUE);
|
|
PROTO_ITEM_SET_GENERATED(item);
|
|
}
|
|
}
|
|
} else {
|
|
ipsum = 0;
|
|
if (tree) {
|
|
item = proto_tree_add_uint_format(ip_tree, hf_ip_checksum, tvb, offset + 10, 2, iph->ip_sum,
|
|
"Header checksum: 0x%04x [%s]", iph->ip_sum,
|
|
ip_check_checksum ? "not all data available" : "validation disabled");
|
|
checksum_tree = proto_item_add_subtree(item, ett_ip_checksum);
|
|
item = proto_tree_add_boolean(checksum_tree, hf_ip_checksum_good, tvb, offset + 10, 2, FALSE);
|
|
PROTO_ITEM_SET_GENERATED(item);
|
|
item = proto_tree_add_boolean(checksum_tree, hf_ip_checksum_bad, tvb, offset + 10, 2, FALSE);
|
|
PROTO_ITEM_SET_GENERATED(item);
|
|
}
|
|
}
|
|
src_addr = tvb_get_ptr(tvb, offset + IPH_SRC, 4);
|
|
src32 = tvb_get_ntohl(tvb, offset + IPH_SRC);
|
|
SET_ADDRESS(&pinfo->net_src, AT_IPv4, 4, src_addr);
|
|
SET_ADDRESS(&pinfo->src, AT_IPv4, 4, src_addr);
|
|
SET_ADDRESS(&iph->ip_src, AT_IPv4, 4, src_addr);
|
|
if (tree) {
|
|
memcpy(&addr, iph->ip_src.data, 4);
|
|
if (ip_summary_in_tree) {
|
|
proto_item_append_text(ti, ", Src: %s (%s)",
|
|
get_hostname(addr), ip_to_str(iph->ip_src.data));
|
|
}
|
|
proto_tree_add_ipv4(ip_tree, hf_ip_src, tvb, offset + 12, 4, addr);
|
|
item = proto_tree_add_ipv4(ip_tree, hf_ip_addr, tvb, offset + 12, 4, addr);
|
|
PROTO_ITEM_SET_HIDDEN(item);
|
|
item = proto_tree_add_string(ip_tree, hf_ip_src_host, tvb, offset + 12, 4, get_hostname(addr));
|
|
PROTO_ITEM_SET_GENERATED(item);
|
|
PROTO_ITEM_SET_HIDDEN(item);
|
|
item = proto_tree_add_string(ip_tree, hf_ip_host, tvb, offset + 12, 4, get_hostname(addr));
|
|
PROTO_ITEM_SET_GENERATED(item);
|
|
PROTO_ITEM_SET_HIDDEN(item);
|
|
}
|
|
dst_addr = tvb_get_ptr(tvb, offset + IPH_DST, 4);
|
|
dst32 = tvb_get_ntohl(tvb, offset + IPH_DST);
|
|
SET_ADDRESS(&pinfo->net_dst, AT_IPv4, 4, dst_addr);
|
|
SET_ADDRESS(&pinfo->dst, AT_IPv4, 4, dst_addr);
|
|
SET_ADDRESS(&iph->ip_dst, AT_IPv4, 4, dst_addr);
|
|
|
|
if (tree) {
|
|
memcpy(&addr, iph->ip_dst.data, 4);
|
|
if (ip_summary_in_tree) {
|
|
proto_item_append_text(ti, ", Dst: %s (%s)",
|
|
get_hostname(addr), ip_to_str(iph->ip_dst.data));
|
|
}
|
|
proto_tree_add_ipv4(ip_tree, hf_ip_dst, tvb, offset + 16, 4, addr);
|
|
item = proto_tree_add_ipv4(ip_tree, hf_ip_addr, tvb, offset + 16, 4, addr);
|
|
PROTO_ITEM_SET_HIDDEN(item);
|
|
item = proto_tree_add_string(ip_tree, hf_ip_dst_host, tvb, offset + 16, 4, get_hostname(addr));
|
|
PROTO_ITEM_SET_GENERATED(item);
|
|
PROTO_ITEM_SET_HIDDEN(item);
|
|
item = proto_tree_add_string(ip_tree, hf_ip_host, tvb, offset + 16, 4, get_hostname(addr));
|
|
PROTO_ITEM_SET_GENERATED(item);
|
|
PROTO_ITEM_SET_HIDDEN(item);
|
|
}
|
|
|
|
if (tree) {
|
|
/* Decode IP options, if any. */
|
|
if (hlen > IPH_MIN_LEN) {
|
|
/* There's more than just the fixed-length header. Decode the
|
|
options. */
|
|
optlen = hlen - IPH_MIN_LEN; /* length of options, in bytes */
|
|
tf = proto_tree_add_text(ip_tree, tvb, offset + 20, optlen,
|
|
"Options: (%u bytes)", optlen);
|
|
field_tree = proto_item_add_subtree(tf, ett_ip_options);
|
|
dissect_ip_tcp_options(tvb, offset + 20, optlen,
|
|
ipopts, N_IP_OPTS, IPOPT_END, pinfo, field_tree);
|
|
}
|
|
}
|
|
|
|
pinfo->ipproto = iph->ip_p;
|
|
|
|
pinfo->iplen = iph->ip_len;
|
|
|
|
pinfo->iphdrlen = hlen;
|
|
|
|
/* Skip over header + options */
|
|
offset += hlen;
|
|
nxt = iph->ip_p; /* XXX - what if this isn't the same for all fragments? */
|
|
|
|
/* If ip_defragment is on, this is a fragment, we have all the data
|
|
* in the fragment, and the header checksum is valid, then just add
|
|
* the fragment to the hashtable.
|
|
*/
|
|
save_fragmented = pinfo->fragmented;
|
|
if (ip_defragment && (iph->ip_off & (IP_MF|IP_OFFSET)) &&
|
|
tvb_bytes_exist(tvb, offset, pinfo->iplen - pinfo->iphdrlen) &&
|
|
ipsum == 0) {
|
|
ipfd_head = fragment_add_check(tvb, offset, pinfo,
|
|
iph->ip_p ^ iph->ip_id ^ src32 ^ dst32,
|
|
ip_fragment_table,
|
|
ip_reassembled_table,
|
|
(iph->ip_off & IP_OFFSET)*8,
|
|
pinfo->iplen - pinfo->iphdrlen,
|
|
iph->ip_off & IP_MF);
|
|
|
|
next_tvb = process_reassembled_data(tvb, offset, pinfo, "Reassembled IPv4",
|
|
ipfd_head, &ip_frag_items, &update_col_info, ip_tree);
|
|
} else {
|
|
/* If this is the first fragment, dissect its contents, otherwise
|
|
just show it as a fragment.
|
|
|
|
XXX - if we eventually don't save the reassembled contents of all
|
|
fragmented datagrams, we may want to always reassemble. */
|
|
if (iph->ip_off & IP_OFFSET) {
|
|
/* Not the first fragment - don't dissect it. */
|
|
next_tvb = NULL;
|
|
} else {
|
|
/* First fragment, or not fragmented. Dissect what we have here. */
|
|
|
|
/* Get a tvbuff for the payload. */
|
|
next_tvb = tvb_new_subset(tvb, offset, -1, -1);
|
|
|
|
/*
|
|
* If this is the first fragment, but not the only fragment,
|
|
* tell the next protocol that.
|
|
*/
|
|
if (iph->ip_off & IP_MF)
|
|
pinfo->fragmented = TRUE;
|
|
else
|
|
pinfo->fragmented = FALSE;
|
|
}
|
|
}
|
|
|
|
if (next_tvb == NULL) {
|
|
/* Just show this as a fragment. */
|
|
if (check_col(pinfo->cinfo, COL_INFO)) {
|
|
col_add_fstr(pinfo->cinfo, COL_INFO, "Fragmented IP protocol (proto=%s 0x%02x, off=%u)",
|
|
ipprotostr(iph->ip_p), iph->ip_p, (iph->ip_off & IP_OFFSET) * 8);
|
|
}
|
|
if( ipfd_head && ipfd_head->reassembled_in != pinfo->fd->num ){
|
|
if (check_col(pinfo->cinfo, COL_INFO)) {
|
|
col_append_fstr(pinfo->cinfo, COL_INFO, " [Reassembled in #%u]",
|
|
ipfd_head->reassembled_in);
|
|
}
|
|
}
|
|
|
|
call_dissector(data_handle, tvb_new_subset(tvb, offset, -1, -1), pinfo,
|
|
parent_tree);
|
|
pinfo->fragmented = save_fragmented;
|
|
goto end_of_ip;
|
|
}
|
|
|
|
/* XXX This is an ugly hack because I didn't manage to make the IPIP
|
|
* dissector a heuristic one [JMayer]
|
|
* The TAPA protocol also uses IP protocol number 4 but it isn't really
|
|
* IPIP, so try to detect it first and call it explicitly before calling
|
|
* the generic ip.proto dispatcher
|
|
*/
|
|
if (nxt == IP_PROTO_IPIP &&
|
|
(tvb_get_guint8(next_tvb, 0) & 0xF0) != 40 &&
|
|
tvb_get_ntohs(next_tvb, 2) < 20) {
|
|
call_dissector(tapa_handle,next_tvb, pinfo, parent_tree);
|
|
|
|
/* Hand off to the next protocol.
|
|
|
|
XXX - setting the columns only after trying various dissectors means
|
|
that if one of those dissectors throws an exception, the frame won't
|
|
even be labelled as an IP frame; ideally, if a frame being dissected
|
|
throws an exception, it'll be labelled as a mangled frame of the
|
|
type in question. */
|
|
} else if (!dissector_try_port(ip_dissector_table, nxt, next_tvb, pinfo, parent_tree)) {
|
|
/* Unknown protocol */
|
|
if (update_col_info) {
|
|
if (check_col(pinfo->cinfo, COL_INFO))
|
|
col_add_fstr(pinfo->cinfo, COL_INFO, "%s (0x%02x)", ipprotostr(iph->ip_p), iph->ip_p);
|
|
}
|
|
call_dissector(data_handle,next_tvb, pinfo, parent_tree);
|
|
}
|
|
pinfo->fragmented = save_fragmented;
|
|
|
|
end_of_ip:
|
|
tap_queue_packet(ip_tap, pinfo, iph);
|
|
|
|
}
|
|
|
|
#define ICMP_MIP_EXTENSION_PAD 0
|
|
#define ICMP_MIP_MOB_AGENT_ADV 16
|
|
#define ICMP_MIP_PREFIX_LENGTHS 19
|
|
#define ICMP_MIP_CHALLENGE 24
|
|
|
|
static value_string mip_extensions[] = {
|
|
{ ICMP_MIP_EXTENSION_PAD, "One byte padding extension"}, /* RFC 2002 */
|
|
{ ICMP_MIP_MOB_AGENT_ADV, "Mobility Agent Advertisement Extension"},
|
|
/* RFC 2002 */
|
|
{ ICMP_MIP_PREFIX_LENGTHS, "Prefix Lengths Extension"}, /* RFC 2002 */
|
|
{ ICMP_MIP_CHALLENGE, "Challenge Extension"}, /* RFC 3012 */
|
|
{ 0, NULL}
|
|
};
|
|
|
|
/*
|
|
* Dissect the mobile ip advertisement extensions.
|
|
*/
|
|
static void
|
|
dissect_mip_extensions(tvbuff_t *tvb, size_t offset, proto_tree *tree)
|
|
{
|
|
guint8 type;
|
|
guint8 length;
|
|
guint8 flags;
|
|
proto_item *ti;
|
|
proto_tree *mip_tree=NULL;
|
|
proto_tree *flags_tree=NULL;
|
|
gint numCOAs;
|
|
gint i;
|
|
|
|
/* Not much to do if we're not parsing everything */
|
|
if (!tree) return;
|
|
|
|
while (tvb_reported_length_remaining(tvb, offset) > 0) {
|
|
|
|
type = tvb_get_guint8(tvb, offset + 0);
|
|
if (type)
|
|
length = tvb_get_guint8(tvb, offset + 1);
|
|
else
|
|
length=0;
|
|
|
|
ti = proto_tree_add_text(tree, tvb, offset,
|
|
type?(length + 2):1,
|
|
"Ext: %s",
|
|
val_to_str(type, mip_extensions,
|
|
"Unknown ext %u"));
|
|
mip_tree = proto_item_add_subtree(ti, ett_icmp_mip);
|
|
|
|
|
|
switch (type) {
|
|
case ICMP_MIP_EXTENSION_PAD:
|
|
/* One byte padding extension */
|
|
/* Add our fields */
|
|
/* type */
|
|
proto_tree_add_item(mip_tree, hf_icmp_mip_type, tvb, offset,
|
|
1, FALSE);
|
|
offset++;
|
|
break;
|
|
case ICMP_MIP_MOB_AGENT_ADV:
|
|
/* Mobility Agent Advertisement Extension (RFC 2002)*/
|
|
/* Add our fields */
|
|
/* type */
|
|
proto_tree_add_item(mip_tree, hf_icmp_mip_type, tvb, offset,
|
|
1, FALSE);
|
|
offset++;
|
|
/* length */
|
|
proto_tree_add_item(mip_tree, hf_icmp_mip_length, tvb, offset,
|
|
1, FALSE);
|
|
offset++;
|
|
/* sequence number */
|
|
proto_tree_add_item(mip_tree, hf_icmp_mip_seq, tvb, offset,
|
|
2, FALSE);
|
|
offset+=2;
|
|
/* Registration Lifetime */
|
|
proto_tree_add_item(mip_tree, hf_icmp_mip_life, tvb, offset,
|
|
2, FALSE);
|
|
offset+=2;
|
|
/* flags */
|
|
flags = tvb_get_guint8(tvb, offset);
|
|
ti = proto_tree_add_item(mip_tree, hf_icmp_mip_flags, tvb, offset,
|
|
1, FALSE);
|
|
flags_tree = proto_item_add_subtree(ti, ett_icmp_mip_flags);
|
|
proto_tree_add_boolean(flags_tree, hf_icmp_mip_r, tvb, offset, 1, flags);
|
|
proto_tree_add_boolean(flags_tree, hf_icmp_mip_b, tvb, offset, 1, flags);
|
|
proto_tree_add_boolean(flags_tree, hf_icmp_mip_h, tvb, offset, 1, flags);
|
|
proto_tree_add_boolean(flags_tree, hf_icmp_mip_f, tvb, offset, 1, flags);
|
|
proto_tree_add_boolean(flags_tree, hf_icmp_mip_m, tvb, offset, 1, flags);
|
|
proto_tree_add_boolean(flags_tree, hf_icmp_mip_g, tvb, offset, 1, flags);
|
|
proto_tree_add_boolean(flags_tree, hf_icmp_mip_v, tvb, offset, 1, flags);
|
|
proto_tree_add_boolean(flags_tree, hf_icmp_mip_rt, tvb, offset, 1, flags);
|
|
|
|
offset++;
|
|
|
|
/* Reserved */
|
|
proto_tree_add_item(mip_tree, hf_icmp_mip_reserved, tvb, offset,
|
|
1, FALSE);
|
|
offset++;
|
|
|
|
/* COAs */
|
|
numCOAs = (length - 6) / 4;
|
|
for (i=0; i<numCOAs; i++) {
|
|
proto_tree_add_item(mip_tree, hf_icmp_mip_coa, tvb, offset,
|
|
4, FALSE);
|
|
offset+=4;
|
|
}
|
|
break;
|
|
case ICMP_MIP_PREFIX_LENGTHS:
|
|
/* Prefix-Lengths Extension (RFC 2002)*/
|
|
/* Add our fields */
|
|
/* type */
|
|
proto_tree_add_item(mip_tree, hf_icmp_mip_type, tvb, offset,
|
|
1, FALSE);
|
|
offset++;
|
|
/* length */
|
|
proto_tree_add_item(mip_tree, hf_icmp_mip_length, tvb, offset,
|
|
1, FALSE);
|
|
offset++;
|
|
|
|
/* prefix lengths */
|
|
for(i=0; i<length; i++) {
|
|
proto_tree_add_item(mip_tree, hf_icmp_mip_prefix_length, tvb, offset,
|
|
1, FALSE);
|
|
offset++;
|
|
}
|
|
break;
|
|
case ICMP_MIP_CHALLENGE:
|
|
/* Challenge Extension (RFC 3012)*/
|
|
/* type */
|
|
proto_tree_add_item(mip_tree, hf_icmp_mip_type, tvb, offset,
|
|
1, FALSE);
|
|
offset++;
|
|
/* length */
|
|
proto_tree_add_item(mip_tree, hf_icmp_mip_length, tvb, offset,
|
|
1, FALSE);
|
|
offset++;
|
|
/* challenge */
|
|
proto_tree_add_item(mip_tree, hf_icmp_mip_challenge, tvb, offset,
|
|
length, FALSE);
|
|
offset+=length;
|
|
|
|
break;
|
|
default:
|
|
g_warning("Unknown type(%u)! I hope the length is right (%u)",
|
|
type, length);
|
|
offset += length + 2;
|
|
break;
|
|
} /* switch type */
|
|
} /* end while */
|
|
|
|
} /* dissect_mip_extensions */
|
|
|
|
#define MPLS_STACK_ENTRY_OBJECT_CLASS 1
|
|
#define MPLS_EXTENDED_PAYLOAD_OBJECT_CLASS 2
|
|
|
|
#define MPLS_STACK_ENTRY_C_TYPE 1
|
|
#define MPLS_EXTENDED_PAYLOAD_C_TYPE 1
|
|
|
|
/* XXX no header defines these macros ??? */
|
|
#ifndef min
|
|
#define min(a,b) (((a)<(b))?(a):(b))
|
|
#endif
|
|
|
|
#ifndef max
|
|
#define max(a,b) (((a)>(b))?(a):(b))
|
|
#endif
|
|
|
|
/*
|
|
* Dissect the MPLS extensions
|
|
*/
|
|
static void
|
|
dissect_mpls_extensions(tvbuff_t *tvb, size_t offset, proto_tree *tree)
|
|
{
|
|
guint8 version;
|
|
guint8 class_num;
|
|
guint8 c_type;
|
|
guint8 ttl;
|
|
guint8 tmp;
|
|
guint16 reserved;
|
|
guint16 cksum, computed_cksum;
|
|
guint16 obj_length, obj_trunc_length;
|
|
proto_item *ti, *tf_object, *tf_entry;
|
|
proto_tree *mpls_tree=NULL, *mpls_object_tree, *mpls_stack_object_tree;
|
|
guint obj_end_offset;
|
|
guint reported_length;
|
|
guint label;
|
|
gboolean unknown_object;
|
|
|
|
if (!tree)
|
|
return;
|
|
|
|
reported_length = tvb_reported_length_remaining(tvb, offset);
|
|
|
|
if (reported_length < 4 /* Common header */)
|
|
{
|
|
proto_tree_add_text(tree, tvb, offset,
|
|
reported_length,
|
|
"MPLS Extensions (truncated)");
|
|
return;
|
|
}
|
|
|
|
/* Add a tree for the MPLS extensions */
|
|
ti = proto_tree_add_none_format(tree, hf_icmp_mpls, tvb,
|
|
offset, reported_length, "MPLS Extensions");
|
|
|
|
mpls_tree = proto_item_add_subtree(ti, ett_icmp_mpls);
|
|
|
|
/* Version */
|
|
version = hi_nibble(tvb_get_guint8(tvb, offset));
|
|
proto_tree_add_uint(mpls_tree, hf_icmp_mpls_version, tvb, offset, 1, version);
|
|
|
|
/* Reserved */
|
|
reserved = tvb_get_ntohs(tvb, offset) & 0x0fff;
|
|
proto_tree_add_uint_format(mpls_tree, hf_icmp_mpls_reserved,
|
|
tvb, offset, 2, reserved,
|
|
"Reserved: 0x%03x", reserved);
|
|
|
|
/* Checksum */
|
|
cksum = tvb_get_ntohs(tvb, offset + 2);
|
|
|
|
computed_cksum = ip_checksum(tvb_get_ptr(tvb, offset, reported_length),
|
|
reported_length);
|
|
|
|
if (computed_cksum == 0)
|
|
{
|
|
proto_tree_add_uint_format(mpls_tree, hf_icmp_mpls_checksum, tvb, offset + 2, 2,
|
|
cksum, "Checksum: 0x%04x [correct]", cksum);
|
|
}
|
|
else
|
|
{
|
|
proto_tree_add_boolean_hidden(mpls_tree, hf_icmp_mpls_checksum_bad, tvb,
|
|
offset + 2, 2, TRUE);
|
|
|
|
proto_tree_add_uint_format(mpls_tree, hf_icmp_mpls_checksum, tvb, offset + 2, 2,
|
|
cksum,
|
|
"Checksum: 0x%04x [incorrect, should be 0x%04x]",
|
|
cksum, in_cksum_shouldbe(cksum, computed_cksum));
|
|
}
|
|
|
|
if (version != 1 && version != 2)
|
|
{
|
|
/* Unsupported version */
|
|
proto_item_append_text(ti, " (unsupported version)");
|
|
return;
|
|
}
|
|
|
|
/* Skip the common header */
|
|
offset += 4;
|
|
|
|
/* While there is enough room to read an object */
|
|
while (tvb_reported_length_remaining(tvb, offset) >= 4 /* Object header */)
|
|
{
|
|
/* Object length */
|
|
obj_length = tvb_get_ntohs(tvb, offset);
|
|
|
|
obj_trunc_length = min(obj_length, tvb_reported_length_remaining(tvb, offset));
|
|
|
|
obj_end_offset = offset + obj_trunc_length;
|
|
|
|
/* Add a subtree for this object (the text will be reset later) */
|
|
tf_object = proto_tree_add_text(mpls_tree, tvb, offset,
|
|
max(obj_trunc_length, 4),
|
|
"Unknown object");
|
|
|
|
mpls_object_tree = proto_item_add_subtree(tf_object, ett_icmp_mpls_object);
|
|
|
|
proto_tree_add_uint(mpls_object_tree, hf_icmp_mpls_length, tvb, offset, 2, obj_length);
|
|
|
|
/* Class */
|
|
class_num = tvb_get_guint8(tvb, offset + 2);
|
|
proto_tree_add_uint(mpls_object_tree, hf_icmp_mpls_class, tvb, offset + 2, 1, class_num);
|
|
|
|
/* C-Type */
|
|
c_type = tvb_get_guint8(tvb, offset + 3);
|
|
proto_tree_add_uint(mpls_object_tree, hf_icmp_mpls_c_type, tvb, offset + 3, 1, c_type);
|
|
|
|
if (obj_length < 4 /* Object header */)
|
|
{
|
|
/* Thanks doc/README.developer :)) */
|
|
proto_item_set_text(tf_object, "Object with bad length");
|
|
break;
|
|
}
|
|
|
|
/* Skip the object header */
|
|
offset += 4;
|
|
|
|
/* Default cases will set this flag to TRUE */
|
|
unknown_object = FALSE;
|
|
|
|
switch (class_num)
|
|
{
|
|
case MPLS_STACK_ENTRY_OBJECT_CLASS:
|
|
switch (c_type)
|
|
{
|
|
case MPLS_STACK_ENTRY_C_TYPE:
|
|
|
|
proto_item_set_text(tf_object, "MPLS Stack Entry");
|
|
|
|
/* For each entry */
|
|
while (offset + 4 <= obj_end_offset)
|
|
{
|
|
if (tvb_reported_length_remaining(tvb, offset) < 4)
|
|
{
|
|
/* Not enough room in the packet ! */
|
|
break;
|
|
}
|
|
|
|
/* Create a subtree for each entry (the text will be set later) */
|
|
tf_entry = proto_tree_add_text(mpls_object_tree,
|
|
tvb, offset, 4, " ");
|
|
mpls_stack_object_tree = proto_item_add_subtree(tf_entry,
|
|
ett_icmp_mpls_stack_object);
|
|
|
|
/* Label */
|
|
label = (guint)tvb_get_ntohs(tvb, offset);
|
|
tmp = tvb_get_guint8(tvb, offset + 2);
|
|
label = (label << 4) + (tmp >> 4);
|
|
|
|
proto_tree_add_uint(mpls_stack_object_tree,
|
|
hf_icmp_mpls_label,
|
|
tvb,
|
|
offset,
|
|
3,
|
|
label << 4);
|
|
|
|
proto_item_set_text(tf_entry, "Label: %u", label);
|
|
|
|
/* Experimental field (also called "CoS") */
|
|
proto_tree_add_uint(mpls_stack_object_tree,
|
|
hf_icmp_mpls_exp,
|
|
tvb,
|
|
offset + 2,
|
|
1,
|
|
tmp);
|
|
|
|
proto_item_append_text(tf_entry, ", Exp: %u", (tmp >> 1) & 0x07);
|
|
|
|
/* Stack bit */
|
|
proto_tree_add_boolean(mpls_stack_object_tree,
|
|
hf_icmp_mpls_s,
|
|
tvb,
|
|
offset + 2,
|
|
1,
|
|
tmp);
|
|
|
|
proto_item_append_text(tf_entry, ", S: %u", tmp & 0x01);
|
|
|
|
/* TTL */
|
|
ttl = tvb_get_guint8(tvb, offset + 3);
|
|
|
|
proto_tree_add_item(mpls_stack_object_tree,
|
|
hf_icmp_mpls_ttl,
|
|
tvb,
|
|
offset + 3,
|
|
1,
|
|
FALSE);
|
|
|
|
proto_item_append_text(tf_entry, ", TTL: %u", ttl);
|
|
|
|
/* Skip the entry */
|
|
offset += 4;
|
|
|
|
} /* end while */
|
|
|
|
if (offset < obj_end_offset)
|
|
proto_tree_add_text(mpls_object_tree, tvb,
|
|
offset,
|
|
obj_end_offset - offset,
|
|
"%ld junk bytes",
|
|
(long)(obj_end_offset - offset));
|
|
|
|
break;
|
|
default:
|
|
|
|
unknown_object = TRUE;
|
|
|
|
break;
|
|
} /* end switch c_type */
|
|
break;
|
|
case MPLS_EXTENDED_PAYLOAD_OBJECT_CLASS:
|
|
switch (c_type)
|
|
{
|
|
case MPLS_EXTENDED_PAYLOAD_C_TYPE:
|
|
proto_item_set_text(tf_object, "Extended Payload");
|
|
|
|
/* This object contains some portion of the original packet
|
|
that could not fit in the 128 bytes of the ICMP payload */
|
|
if (obj_trunc_length > 4)
|
|
proto_tree_add_text(mpls_object_tree, tvb,
|
|
offset, obj_trunc_length - 4,
|
|
"Data (%d bytes)", obj_trunc_length - 4);
|
|
|
|
break;
|
|
default:
|
|
|
|
unknown_object = TRUE;
|
|
|
|
break;
|
|
} /* end switch c_type */
|
|
break;
|
|
default:
|
|
|
|
unknown_object = TRUE;
|
|
|
|
break;
|
|
} /* end switch class_num */
|
|
|
|
/* The switches couldn't decode the object */
|
|
if (unknown_object == TRUE)
|
|
{
|
|
proto_item_set_text(tf_object, "Unknown object (%d/%d)", class_num, c_type);
|
|
|
|
if (obj_trunc_length > 4)
|
|
proto_tree_add_text(mpls_object_tree, tvb,
|
|
offset, obj_trunc_length - 4,
|
|
"Data (%d bytes)", obj_trunc_length - 4);
|
|
}
|
|
|
|
/* */
|
|
if (obj_trunc_length < obj_length)
|
|
proto_item_append_text(tf_object, " (truncated)");
|
|
|
|
/* Go to the end of the object */
|
|
offset = obj_end_offset;
|
|
|
|
} /* end while */
|
|
} /* end dissect_mpls_extensions */
|
|
|
|
static const gchar *unreach_str[] = {"Network unreachable",
|
|
"Host unreachable",
|
|
"Protocol unreachable",
|
|
"Port unreachable",
|
|
"Fragmentation needed",
|
|
"Source route failed",
|
|
"Destination network unknown",
|
|
"Destination host unknown",
|
|
"Source host isolated",
|
|
"Network administratively prohibited",
|
|
"Host administratively prohibited",
|
|
"Network unreachable for TOS",
|
|
"Host unreachable for TOS",
|
|
"Communication administratively filtered",
|
|
"Host precedence violation",
|
|
"Precedence cutoff in effect"};
|
|
|
|
#define N_UNREACH (sizeof unreach_str / sizeof unreach_str[0])
|
|
|
|
static const gchar *redir_str[] = {"Redirect for network",
|
|
"Redirect for host",
|
|
"Redirect for TOS and network",
|
|
"Redirect for TOS and host"};
|
|
|
|
#define N_REDIRECT (sizeof redir_str / sizeof redir_str[0])
|
|
|
|
static const gchar *ttl_str[] = {"Time to live exceeded in transit",
|
|
"Fragment reassembly time exceeded"};
|
|
|
|
#define N_TIMXCEED (sizeof ttl_str / sizeof ttl_str[0])
|
|
|
|
static const gchar *par_str[] = {"IP header bad", "Required option missing"};
|
|
|
|
#define N_PARAMPROB (sizeof par_str / sizeof par_str[0])
|
|
|
|
/*
|
|
* RFC 792 for basic ICMP.
|
|
* RFC 1191 for ICMP_FRAG_NEEDED (with MTU of next hop).
|
|
* RFC 1256 for router discovery messages.
|
|
* RFC 2002 and 3012 for Mobile IP stuff.
|
|
*/
|
|
static void
|
|
dissect_icmp(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree)
|
|
{
|
|
proto_tree *icmp_tree;
|
|
proto_item *ti;
|
|
guint8 icmp_type;
|
|
guint8 icmp_code;
|
|
guint length, reported_length;
|
|
guint16 cksum, computed_cksum;
|
|
gchar *type_str, *code_str;
|
|
guint8 num_addrs = 0;
|
|
guint8 addr_entry_size = 0;
|
|
int i;
|
|
gboolean save_in_error_pkt;
|
|
tvbuff_t *next_tvb;
|
|
proto_item *item;
|
|
|
|
type_str="";
|
|
|
|
code_str=ep_alloc(64);
|
|
code_str[0]=0;
|
|
|
|
if (check_col(pinfo->cinfo, COL_PROTOCOL))
|
|
col_set_str(pinfo->cinfo, COL_PROTOCOL, "ICMP");
|
|
if (check_col(pinfo->cinfo, COL_INFO))
|
|
col_clear(pinfo->cinfo, COL_INFO);
|
|
|
|
/* To do: check for runts, errs, etc. */
|
|
icmp_type = tvb_get_guint8(tvb, 0);
|
|
icmp_code = tvb_get_guint8(tvb, 1);
|
|
cksum = tvb_get_ntohs(tvb, 2);
|
|
|
|
switch (icmp_type) {
|
|
case ICMP_ECHOREPLY:
|
|
type_str="Echo (ping) reply";
|
|
break;
|
|
case ICMP_UNREACH:
|
|
type_str="Destination unreachable";
|
|
if (icmp_code < N_UNREACH) {
|
|
g_snprintf(code_str, 64, "(%s)", unreach_str[icmp_code]);
|
|
} else {
|
|
g_snprintf(code_str, 64, "(Unknown - error?)");
|
|
}
|
|
break;
|
|
case ICMP_SOURCEQUENCH:
|
|
type_str="Source quench (flow control)";
|
|
break;
|
|
case ICMP_REDIRECT:
|
|
type_str="Redirect";
|
|
if (icmp_code < N_REDIRECT) {
|
|
g_snprintf(code_str, 64, "(%s)", redir_str[icmp_code]);
|
|
} else {
|
|
g_snprintf(code_str, 64, "(Unknown - error?)");
|
|
}
|
|
break;
|
|
case ICMP_ECHO:
|
|
type_str="Echo (ping) request";
|
|
break;
|
|
case ICMP_RTRADVERT:
|
|
switch (icmp_code) {
|
|
case 0: /* Mobile-Ip */
|
|
case 16: /* Mobile-Ip */
|
|
type_str="Mobile IP Advertisement";
|
|
break;
|
|
default:
|
|
type_str="Router advertisement";
|
|
break;
|
|
} /* switch icmp_code */
|
|
break;
|
|
case ICMP_RTRSOLICIT:
|
|
type_str="Router solicitation";
|
|
break;
|
|
case ICMP_TIMXCEED:
|
|
type_str="Time-to-live exceeded";
|
|
if (icmp_code < N_TIMXCEED) {
|
|
g_snprintf(code_str, 64, "(%s)", ttl_str[icmp_code]);
|
|
} else {
|
|
g_snprintf(code_str, 64, "(Unknown - error?)");
|
|
}
|
|
break;
|
|
case ICMP_PARAMPROB:
|
|
type_str="Parameter problem";
|
|
if (icmp_code < N_PARAMPROB) {
|
|
g_snprintf(code_str, 64, "(%s)", par_str[icmp_code]);
|
|
} else {
|
|
g_snprintf(code_str, 64, "(Unknown - error?)");
|
|
}
|
|
break;
|
|
case ICMP_TSTAMP:
|
|
type_str="Timestamp request";
|
|
break;
|
|
case ICMP_TSTAMPREPLY:
|
|
type_str="Timestamp reply";
|
|
break;
|
|
case ICMP_IREQ:
|
|
type_str="Information request";
|
|
break;
|
|
case ICMP_IREQREPLY:
|
|
type_str="Information reply";
|
|
break;
|
|
case ICMP_MASKREQ:
|
|
type_str="Address mask request";
|
|
break;
|
|
case ICMP_MASKREPLY:
|
|
type_str="Address mask reply";
|
|
break;
|
|
default:
|
|
type_str="Unknown ICMP (obsolete or malformed?)";
|
|
break;
|
|
}
|
|
|
|
if (check_col(pinfo->cinfo, COL_INFO)) {
|
|
col_add_str(pinfo->cinfo, COL_INFO, type_str);
|
|
if (code_str[0] != '\0')
|
|
col_append_fstr(pinfo->cinfo, COL_INFO, " %s", code_str);
|
|
}
|
|
|
|
if (tree) {
|
|
length = tvb_length(tvb);
|
|
reported_length = tvb_reported_length(tvb);
|
|
ti = proto_tree_add_item(tree, proto_icmp, tvb, 0, length, FALSE);
|
|
icmp_tree = proto_item_add_subtree(ti, ett_icmp);
|
|
proto_tree_add_uint_format(icmp_tree, hf_icmp_type, tvb, 0, 1,
|
|
icmp_type,
|
|
"Type: %u (%s)",
|
|
icmp_type, type_str);
|
|
proto_tree_add_uint_format(icmp_tree, hf_icmp_code, tvb, 1, 1,
|
|
icmp_code,
|
|
"Code: %u %s",
|
|
icmp_code, code_str);
|
|
|
|
if (!pinfo->fragmented && length >= reported_length) {
|
|
/* The packet isn't part of a fragmented datagram and isn't
|
|
truncated, so we can checksum it. */
|
|
|
|
computed_cksum = ip_checksum(tvb_get_ptr(tvb, 0, reported_length),
|
|
reported_length);
|
|
if (computed_cksum == 0) {
|
|
proto_tree_add_uint_format(icmp_tree, hf_icmp_checksum, tvb, 2, 2,
|
|
cksum,
|
|
"Checksum: 0x%04x [correct]", cksum);
|
|
} else {
|
|
item = proto_tree_add_boolean(icmp_tree, hf_icmp_checksum_bad,
|
|
tvb, 2, 2, TRUE);
|
|
PROTO_ITEM_SET_HIDDEN(item);
|
|
proto_tree_add_uint_format(icmp_tree, hf_icmp_checksum, tvb, 2, 2,
|
|
cksum,
|
|
"Checksum: 0x%04x [incorrect, should be 0x%04x]",
|
|
cksum, in_cksum_shouldbe(cksum, computed_cksum));
|
|
}
|
|
} else {
|
|
proto_tree_add_uint(icmp_tree, hf_icmp_checksum, tvb, 2, 2, cksum);
|
|
}
|
|
|
|
/* Decode the second 4 bytes of the packet. */
|
|
switch (icmp_type) {
|
|
case ICMP_ECHOREPLY:
|
|
case ICMP_ECHO:
|
|
case ICMP_TSTAMP:
|
|
case ICMP_TSTAMPREPLY:
|
|
case ICMP_IREQ:
|
|
case ICMP_IREQREPLY:
|
|
case ICMP_MASKREQ:
|
|
case ICMP_MASKREPLY:
|
|
proto_tree_add_item(icmp_tree, hf_icmp_ident, tvb, 4, 2, FALSE);
|
|
proto_tree_add_item(icmp_tree, hf_icmp_seq_num, tvb, 6, 2, FALSE);
|
|
break;
|
|
|
|
case ICMP_UNREACH:
|
|
switch (icmp_code) {
|
|
case ICMP_FRAG_NEEDED:
|
|
proto_tree_add_item(icmp_tree, hf_icmp_mtu, tvb, 6, 2, FALSE);
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case ICMP_RTRADVERT:
|
|
num_addrs = tvb_get_guint8(tvb, 4);
|
|
proto_tree_add_text(icmp_tree, tvb, 4, 1, "Number of addresses: %u",
|
|
num_addrs);
|
|
addr_entry_size = tvb_get_guint8(tvb, 5);
|
|
proto_tree_add_text(icmp_tree, tvb, 5, 1, "Address entry size: %u",
|
|
addr_entry_size);
|
|
proto_tree_add_text(icmp_tree, tvb, 6, 2, "Lifetime: %s",
|
|
time_secs_to_str(tvb_get_ntohs(tvb, 6)));
|
|
break;
|
|
|
|
case ICMP_PARAMPROB:
|
|
proto_tree_add_text(icmp_tree, tvb, 4, 1, "Pointer: %u",
|
|
tvb_get_guint8(tvb, 4));
|
|
break;
|
|
|
|
case ICMP_REDIRECT:
|
|
proto_tree_add_item(icmp_tree, hf_icmp_redir_gw, tvb, 4, 4, FALSE);
|
|
break;
|
|
}
|
|
|
|
/* Decode the additional information in the packet. */
|
|
switch (icmp_type) {
|
|
case ICMP_UNREACH:
|
|
case ICMP_TIMXCEED:
|
|
case ICMP_PARAMPROB:
|
|
case ICMP_SOURCEQUENCH:
|
|
case ICMP_REDIRECT:
|
|
/* Save the current value of the "we're inside an error packet"
|
|
flag, and set that flag; subdissectors may treat packets
|
|
that are the payload of error packets differently from
|
|
"real" packets. */
|
|
save_in_error_pkt = pinfo->in_error_pkt;
|
|
pinfo->in_error_pkt = TRUE;
|
|
|
|
/* Decode the IP header and first 64 bits of data from the
|
|
original datagram. */
|
|
next_tvb = tvb_new_subset(tvb, 8, -1, -1);
|
|
|
|
/* There is a collision between RFC 1812 and draft-ietf-mpls-icmp-02.
|
|
We don't know how to decode the 128th and following bytes of the ICMP payload.
|
|
According to draft-ietf-mpls-icmp-02, these bytes should be decoded as MPLS extensions
|
|
whereas RFC 1812 tells us to decode them as a portion of the original packet.
|
|
Let the user decide.
|
|
|
|
Here the user decided to favor MPLS extensions.
|
|
Force the IP dissector to decode only the first 128 bytes. */
|
|
if ((tvb_reported_length(tvb) > 8 + 128) &&
|
|
favor_icmp_mpls_ext && (tvb_get_ntohs(tvb, 8 + 2) > 128))
|
|
set_actual_length(next_tvb, 128);
|
|
|
|
call_dissector(ip_handle, next_tvb, pinfo, icmp_tree);
|
|
|
|
/* Restore the "we're inside an error packet" flag. */
|
|
pinfo->in_error_pkt = save_in_error_pkt;
|
|
|
|
/* Decode MPLS extensions if the payload has at least 128 bytes, and
|
|
- the original packet in the ICMP payload has less than 128 bytes, or
|
|
- the user favors the MPLS extensions analysis */
|
|
if ((tvb_reported_length(tvb) > 8 + 128)
|
|
&& (tvb_get_ntohs(tvb, 8 + 2) <= 128 || favor_icmp_mpls_ext))
|
|
dissect_mpls_extensions(tvb, 8 + 128, icmp_tree);
|
|
|
|
break;
|
|
|
|
case ICMP_ECHOREPLY:
|
|
case ICMP_ECHO:
|
|
call_dissector(data_handle, tvb_new_subset(tvb, 8, -1, -1), pinfo,
|
|
icmp_tree);
|
|
break;
|
|
|
|
case ICMP_RTRADVERT:
|
|
if (addr_entry_size == 2) {
|
|
for (i = 0; i < num_addrs; i++) {
|
|
proto_tree_add_text(icmp_tree, tvb, 8 + (i*8), 4,
|
|
"Router address: %s",
|
|
ip_to_str(tvb_get_ptr(tvb, 8 + (i*8), 4)));
|
|
proto_tree_add_text(icmp_tree, tvb, 12 + (i*8), 4,
|
|
"Preference level: %d", tvb_get_ntohl(tvb, 12 + (i*8)));
|
|
}
|
|
if ((icmp_code == 0) || (icmp_code == 16)) {
|
|
/* Mobile-Ip */
|
|
dissect_mip_extensions(tvb, 8 + i*8, icmp_tree);
|
|
}
|
|
} else
|
|
call_dissector(data_handle, tvb_new_subset(tvb, 8, -1, -1), pinfo,
|
|
icmp_tree);
|
|
break;
|
|
|
|
case ICMP_TSTAMP:
|
|
case ICMP_TSTAMPREPLY:
|
|
proto_tree_add_text(icmp_tree, tvb, 8, 4, "Originate timestamp: %s after midnight UTC",
|
|
time_msecs_to_str(tvb_get_ntohl(tvb, 8)));
|
|
proto_tree_add_text(icmp_tree, tvb, 12, 4, "Receive timestamp: %s after midnight UTC",
|
|
time_msecs_to_str(tvb_get_ntohl(tvb, 12)));
|
|
proto_tree_add_text(icmp_tree, tvb, 16, 4, "Transmit timestamp: %s after midnight UTC",
|
|
time_msecs_to_str(tvb_get_ntohl(tvb, 16)));
|
|
break;
|
|
|
|
case ICMP_MASKREQ:
|
|
case ICMP_MASKREPLY:
|
|
proto_tree_add_text(icmp_tree, tvb, 8, 4, "Address mask: %s (0x%08x)",
|
|
ip_to_str(tvb_get_ptr(tvb, 8, 4)), tvb_get_ntohl(tvb, 8));
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
void
|
|
proto_register_ip(void)
|
|
{
|
|
static hf_register_info hf[] = {
|
|
|
|
{ &hf_ip_version,
|
|
{ "Version", "ip.version", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_hdr_len,
|
|
{ "Header Length", "ip.hdr_len", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_dsfield,
|
|
{ "Differentiated Services field", "ip.dsfield", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_dsfield_dscp,
|
|
{ "Differentiated Services Codepoint", "ip.dsfield.dscp", FT_UINT8, BASE_HEX,
|
|
VALS(dscp_vals), IPDSFIELD_DSCP_MASK,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_dsfield_ect,
|
|
{ "ECN-Capable Transport (ECT)", "ip.dsfield.ect", FT_UINT8, BASE_DEC, NULL,
|
|
IPDSFIELD_ECT_MASK,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_dsfield_ce,
|
|
{ "ECN-CE", "ip.dsfield.ce", FT_UINT8, BASE_DEC, NULL,
|
|
IPDSFIELD_CE_MASK,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_tos,
|
|
{ "Type of Service", "ip.tos", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_tos_precedence,
|
|
{ "Precedence", "ip.tos.precedence", FT_UINT8, BASE_DEC, VALS(precedence_vals),
|
|
IPTOS_PREC_MASK,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_tos_delay,
|
|
{ "Delay", "ip.tos.delay", FT_BOOLEAN, 8, TFS(&tos_set_low),
|
|
IPTOS_LOWDELAY,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_tos_throughput,
|
|
{ "Throughput", "ip.tos.throughput", FT_BOOLEAN, 8, TFS(&tos_set_high),
|
|
IPTOS_THROUGHPUT,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_tos_reliability,
|
|
{ "Reliability", "ip.tos.reliability", FT_BOOLEAN, 8, TFS(&tos_set_high),
|
|
IPTOS_RELIABILITY,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_tos_cost,
|
|
{ "Cost", "ip.tos.cost", FT_BOOLEAN, 8, TFS(&tos_set_low),
|
|
IPTOS_LOWCOST,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_len,
|
|
{ "Total Length", "ip.len", FT_UINT16, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_id,
|
|
{ "Identification", "ip.id", FT_UINT16, BASE_HEX_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_dst,
|
|
{ "Destination", "ip.dst", FT_IPv4, BASE_NONE, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_dst_host,
|
|
{ "Destination Host", "ip.dst_host", FT_STRING, BASE_NONE, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_src,
|
|
{ "Source", "ip.src", FT_IPv4, BASE_NONE, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_src_host,
|
|
{ "Source Host", "ip.src_host", FT_STRING, BASE_NONE, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_addr,
|
|
{ "Source or Destination Address", "ip.addr", FT_IPv4, BASE_NONE, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_host,
|
|
{ "Source or Destination Host", "ip.host", FT_STRING, BASE_NONE, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_flags,
|
|
{ "Flags", "ip.flags", FT_UINT8, BASE_HEX, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_flags_rf,
|
|
{ "Reserved bit", "ip.flags.rb", FT_BOOLEAN, 4, TFS(&flags_set_truth), IP_RF >> 12,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_flags_df,
|
|
{ "Don't fragment", "ip.flags.df", FT_BOOLEAN, 4, TFS(&flags_set_truth), IP_DF >> 12,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_flags_mf,
|
|
{ "More fragments", "ip.flags.mf", FT_BOOLEAN, 4, TFS(&flags_set_truth), IP_MF >> 12,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_frag_offset,
|
|
{ "Fragment offset", "ip.frag_offset", FT_UINT16, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_ttl,
|
|
{ "Time to live", "ip.ttl", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_proto,
|
|
{ "Protocol", "ip.proto", FT_UINT8, BASE_HEX, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_checksum,
|
|
{ "Header checksum", "ip.checksum", FT_UINT16, BASE_HEX, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_ip_checksum_good,
|
|
{ "Good", "ip.checksum_good", FT_BOOLEAN, BASE_NONE, NULL, 0x0,
|
|
"True: checksum matches packet content; False: doesn't match content or not checked", HFILL }},
|
|
|
|
{ &hf_ip_checksum_bad,
|
|
{ "Bad ", "ip.checksum_bad", FT_BOOLEAN, BASE_NONE, NULL, 0x0,
|
|
"True: checksum doesn't match packet content; False: matches content or not checked", HFILL }},
|
|
|
|
{ &hf_ip_fragment_overlap,
|
|
{ "Fragment overlap", "ip.fragment.overlap", FT_BOOLEAN, BASE_NONE, NULL, 0x0,
|
|
"Fragment overlaps with other fragments", HFILL }},
|
|
|
|
{ &hf_ip_fragment_overlap_conflict,
|
|
{ "Conflicting data in fragment overlap", "ip.fragment.overlap.conflict", FT_BOOLEAN, BASE_NONE, NULL, 0x0,
|
|
"Overlapping fragments contained conflicting data", HFILL }},
|
|
|
|
{ &hf_ip_fragment_multiple_tails,
|
|
{ "Multiple tail fragments found", "ip.fragment.multipletails", FT_BOOLEAN, BASE_NONE, NULL, 0x0,
|
|
"Several tails were found when defragmenting the packet", HFILL }},
|
|
|
|
{ &hf_ip_fragment_too_long_fragment,
|
|
{ "Fragment too long", "ip.fragment.toolongfragment", FT_BOOLEAN, BASE_NONE, NULL, 0x0,
|
|
"Fragment contained data past end of packet", HFILL }},
|
|
|
|
{ &hf_ip_fragment_error,
|
|
{ "Defragmentation error", "ip.fragment.error", FT_FRAMENUM, BASE_NONE, NULL, 0x0,
|
|
"Defragmentation error due to illegal fragments", HFILL }},
|
|
|
|
{ &hf_ip_fragment,
|
|
{ "IP Fragment", "ip.fragment", FT_FRAMENUM, BASE_NONE, NULL, 0x0,
|
|
"IP Fragment", HFILL }},
|
|
|
|
{ &hf_ip_fragments,
|
|
{ "IP Fragments", "ip.fragments", FT_NONE, BASE_NONE, NULL, 0x0,
|
|
"IP Fragments", HFILL }},
|
|
|
|
{ &hf_ip_reassembled_in,
|
|
{ "Reassembled IP in frame", "ip.reassembled_in", FT_FRAMENUM, BASE_NONE, NULL, 0x0,
|
|
"This IP packet is reassembled in this frame", HFILL }}
|
|
};
|
|
static gint *ett[] = {
|
|
&ett_ip,
|
|
&ett_ip_dsfield,
|
|
&ett_ip_tos,
|
|
&ett_ip_off,
|
|
&ett_ip_options,
|
|
&ett_ip_option_sec,
|
|
&ett_ip_option_route,
|
|
&ett_ip_option_timestamp,
|
|
&ett_ip_option_cipso,
|
|
&ett_ip_fragments,
|
|
&ett_ip_fragment,
|
|
&ett_ip_checksum,
|
|
};
|
|
module_t *ip_module;
|
|
|
|
proto_ip = proto_register_protocol("Internet Protocol", "IP", "ip");
|
|
proto_register_field_array(proto_ip, hf, array_length(hf));
|
|
proto_register_subtree_array(ett, array_length(ett));
|
|
|
|
/* subdissector code */
|
|
ip_dissector_table = register_dissector_table("ip.proto",
|
|
"IP protocol", FT_UINT8, BASE_DEC);
|
|
|
|
/* Register configuration options */
|
|
ip_module = prefs_register_protocol(proto_ip, NULL);
|
|
prefs_register_bool_preference(ip_module, "decode_tos_as_diffserv",
|
|
"Decode IPv4 TOS field as DiffServ field",
|
|
"Whether the IPv4 type-of-service field should be decoded as a Differentiated Services field (see RFC2474/RFC2475)",
|
|
&g_ip_dscp_actif);
|
|
prefs_register_bool_preference(ip_module, "defragment",
|
|
"Reassemble fragmented IP datagrams",
|
|
"Whether fragmented IP datagrams should be reassembled",
|
|
&ip_defragment);
|
|
prefs_register_bool_preference(ip_module, "summary_in_tree",
|
|
"Show IP summary in protocol tree",
|
|
"Whether the IP summary line should be shown in the protocol tree",
|
|
&ip_summary_in_tree);
|
|
prefs_register_bool_preference(ip_module, "check_checksum" ,
|
|
"Validate the IP checksum if possible",
|
|
"Whether to validate the IP checksum",
|
|
&ip_check_checksum);
|
|
|
|
register_dissector("ip", dissect_ip, proto_ip);
|
|
register_init_routine(ip_defragment_init);
|
|
ip_tap=register_tap("ip");
|
|
}
|
|
|
|
void
|
|
proto_reg_handoff_ip(void)
|
|
{
|
|
dissector_handle_t ip_handle;
|
|
|
|
data_handle = find_dissector("data");
|
|
ip_handle = find_dissector("ip");
|
|
tapa_handle = find_dissector("tapa");
|
|
dissector_add("ethertype", ETHERTYPE_IP, ip_handle);
|
|
dissector_add("ppp.protocol", PPP_IP, ip_handle);
|
|
dissector_add("ppp.protocol", ETHERTYPE_IP, ip_handle);
|
|
dissector_add("gre.proto", ETHERTYPE_IP, ip_handle);
|
|
dissector_add("gre.proto", GRE_WCCP, ip_handle);
|
|
dissector_add("llc.dsap", SAP_IP, ip_handle);
|
|
dissector_add("ip.proto", IP_PROTO_IPIP, ip_handle);
|
|
dissector_add("null.type", BSD_AF_INET, ip_handle);
|
|
dissector_add("chdlctype", ETHERTYPE_IP, ip_handle);
|
|
dissector_add("osinl.excl", NLPID_IP, ip_handle);
|
|
dissector_add("fr.ietf", NLPID_IP, ip_handle);
|
|
dissector_add("x.25.spi", NLPID_IP, ip_handle);
|
|
dissector_add("arcnet.protocol_id", ARCNET_PROTO_IP_1051, ip_handle);
|
|
dissector_add("arcnet.protocol_id", ARCNET_PROTO_IP_1201, ip_handle);
|
|
dissector_add_handle("udp.port", ip_handle);
|
|
}
|
|
|
|
void
|
|
proto_register_icmp(void)
|
|
{
|
|
static hf_register_info hf[] = {
|
|
|
|
{ &hf_icmp_type,
|
|
{ "Type", "icmp.type", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_code,
|
|
{ "Code", "icmp.code", FT_UINT8, BASE_HEX, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_checksum,
|
|
{ "Checksum", "icmp.checksum", FT_UINT16, BASE_HEX, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_checksum_bad,
|
|
{ "Bad Checksum", "icmp.checksum_bad", FT_BOOLEAN, BASE_NONE, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_ident,
|
|
{"Identifier", "icmp.ident", FT_UINT16, BASE_HEX, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_seq_num,
|
|
{"Sequence number", "icmp.seq", FT_UINT16, BASE_DEC_HEX, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_mtu,
|
|
{"MTU of next hop", "icmp.mtu", FT_UINT16, BASE_DEC, NULL, 0x0,
|
|
"", HFILL}},
|
|
|
|
{ &hf_icmp_redir_gw,
|
|
{"Gateway address", "icmp.redir_gw", FT_IPv4, BASE_NONE, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_mip_type,
|
|
{ "Extension Type", "icmp.mip.type", FT_UINT8, BASE_DEC,
|
|
VALS(mip_extensions), 0x0,"", HFILL}},
|
|
|
|
{ &hf_icmp_mip_length,
|
|
{ "Length", "icmp.mip.length", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL}},
|
|
|
|
{ &hf_icmp_mip_prefix_length,
|
|
{ "Prefix Length", "icmp.mip.prefixlength", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL}},
|
|
|
|
{ &hf_icmp_mip_seq,
|
|
{ "Sequence Number", "icmp.mip.seq", FT_UINT16, BASE_DEC, NULL, 0x0,
|
|
"", HFILL}},
|
|
|
|
{ &hf_icmp_mip_life,
|
|
{ "Registration Lifetime", "icmp.mip.life", FT_UINT16, BASE_DEC, NULL, 0x0,
|
|
"", HFILL}},
|
|
|
|
{ &hf_icmp_mip_flags,
|
|
{ "Flags", "icmp.mip.flags", FT_UINT8, BASE_HEX, NULL, 0x0,
|
|
"", HFILL}},
|
|
|
|
{ &hf_icmp_mip_r,
|
|
{ "Registration Required", "icmp.mip.r", FT_BOOLEAN, 8, NULL, 128,
|
|
"Registration with this FA is required", HFILL }},
|
|
|
|
{ &hf_icmp_mip_b,
|
|
{ "Busy", "icmp.mip.b", FT_BOOLEAN, 8, NULL, 64,
|
|
"This FA will not accept requests at this time", HFILL }},
|
|
|
|
{ &hf_icmp_mip_h,
|
|
{ "Home Agent", "icmp.mip.h", FT_BOOLEAN, 8, NULL, 32,
|
|
"Home Agent Services Offered", HFILL }},
|
|
|
|
{ &hf_icmp_mip_f,
|
|
{ "Foreign Agent", "icmp.mip.f", FT_BOOLEAN, 8, NULL, 16,
|
|
"Foreign Agent Services Offered", HFILL }},
|
|
|
|
{ &hf_icmp_mip_m,
|
|
{ "Minimal Encapsulation", "icmp.mip.m", FT_BOOLEAN, 8, NULL, 8,
|
|
"Minimal encapsulation tunneled datagram support", HFILL }},
|
|
|
|
{ &hf_icmp_mip_g,
|
|
{ "GRE", "icmp.mip.g", FT_BOOLEAN, 8, NULL, 4,
|
|
"GRE encapsulated tunneled datagram support", HFILL }},
|
|
|
|
{ &hf_icmp_mip_v,
|
|
{ "VJ Comp", "icmp.mip.v", FT_BOOLEAN, 8, NULL, 2,
|
|
"Van Jacobson Header Compression Support", HFILL }},
|
|
|
|
{ &hf_icmp_mip_rt,
|
|
{ "Reverse tunneling", "icmp.mip.rt", FT_BOOLEAN, 8, NULL, 1,
|
|
"Reverse tunneling support", HFILL }},
|
|
|
|
|
|
{ &hf_icmp_mip_reserved,
|
|
{ "Reserved", "icmp.mip.reserved", FT_UINT8, BASE_HEX, NULL, 0x0,
|
|
"", HFILL}},
|
|
|
|
{ &hf_icmp_mip_coa,
|
|
{ "Care-Of-Address", "icmp.mip.coa", FT_IPv4, BASE_NONE, NULL, 0x0,
|
|
"", HFILL}},
|
|
|
|
{ &hf_icmp_mip_challenge,
|
|
{ "Challenge", "icmp.mip.challenge", FT_BYTES, BASE_NONE, NULL, 0x0,
|
|
"", HFILL}},
|
|
|
|
{ &hf_icmp_mpls,
|
|
{ "ICMP Extensions for MPLS", "icmp.mpls", FT_NONE, BASE_NONE, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_mpls_version,
|
|
{ "Version", "icmp.mpls.version", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_mpls_reserved,
|
|
{ "Reserved", "icmp.mpls.res", FT_UINT16, BASE_HEX, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_mpls_checksum,
|
|
{ "Checksum", "icmp.mpls.checksum", FT_UINT16, BASE_HEX, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_mpls_checksum_bad,
|
|
{ "Bad Checksum", "icmp.mpls.checksum_bad", FT_BOOLEAN, BASE_NONE, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_mpls_length,
|
|
{ "Length", "icmp.mpls.length", FT_UINT16, BASE_HEX, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_mpls_class,
|
|
{ "Class", "icmp.mpls.class", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_mpls_c_type,
|
|
{ "C-Type", "icmp.mpls.ctype", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_mpls_label,
|
|
{ "Label", "icmp.mpls.label", FT_UINT24, BASE_DEC, NULL, 0x00fffff0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_mpls_exp,
|
|
{ "Experimental", "icmp.mpls.exp", FT_UINT24, BASE_DEC,
|
|
NULL, 0x0e,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_mpls_s,
|
|
{ "Stack bit", "icmp.mpls.s", FT_BOOLEAN, 24, TFS(&flags_set_truth), 0x01,
|
|
"", HFILL }},
|
|
|
|
{ &hf_icmp_mpls_ttl,
|
|
{ "Time to live", "icmp.mpls.ttl", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }}
|
|
|
|
};
|
|
static gint *ett[] = {
|
|
&ett_icmp,
|
|
&ett_icmp_mip,
|
|
&ett_icmp_mip_flags,
|
|
/* MPLS extensions */
|
|
&ett_icmp_mpls,
|
|
&ett_icmp_mpls_object,
|
|
&ett_icmp_mpls_stack_object
|
|
};
|
|
|
|
module_t *icmp_module;
|
|
|
|
proto_icmp = proto_register_protocol("Internet Control Message Protocol",
|
|
"ICMP", "icmp");
|
|
proto_register_field_array(proto_icmp, hf, array_length(hf));
|
|
proto_register_subtree_array(ett, array_length(ett));
|
|
|
|
icmp_module = prefs_register_protocol(proto_icmp, NULL);
|
|
|
|
prefs_register_bool_preference(icmp_module, "favor_icmp_mpls",
|
|
"Favor ICMP extensions for MPLS",
|
|
"Whether the 128th and following bytes of the ICMP payload should be decoded as MPLS extensions or as a portion of the original packet",
|
|
&favor_icmp_mpls_ext);
|
|
}
|
|
|
|
void
|
|
proto_reg_handoff_icmp(void)
|
|
{
|
|
dissector_handle_t icmp_handle;
|
|
|
|
/*
|
|
* Get handle for the IP dissector.
|
|
*/
|
|
ip_handle = find_dissector("ip");
|
|
ipv6_handle = find_dissector("ipv6");
|
|
|
|
icmp_handle = create_dissector_handle(dissect_icmp, proto_icmp);
|
|
dissector_add("ip.proto", IP_PROTO_ICMP, icmp_handle);
|
|
}
|