forked from osmocom/wireshark
1054 lines
33 KiB
C
1054 lines
33 KiB
C
/* packet-ip.c
|
|
* Routines for IP and miscellaneous IP protocol packet disassembly
|
|
*
|
|
* $Id: packet-ip.c,v 1.26 1999/06/21 16:20:18 gram Exp $
|
|
*
|
|
* Ethereal - Network traffic analyzer
|
|
* By Gerald Combs <gerald@zing.org>
|
|
* Copyright 1998 Gerald Combs
|
|
*
|
|
*
|
|
* 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
|
|
|
|
#ifdef HAVE_SYS_TYPES_H
|
|
# include <sys/types.h>
|
|
#endif
|
|
|
|
#ifdef HAVE_NETINET_IN_H
|
|
# include <netinet/in.h>
|
|
#endif
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <glib.h>
|
|
#include "packet.h"
|
|
#include "resolv.h"
|
|
#include "util.h"
|
|
|
|
#ifndef __PACKET_IP_H__
|
|
#include "packet-ip.h"
|
|
#endif
|
|
|
|
extern packet_info pi;
|
|
|
|
/* ICMP structs and definitions */
|
|
typedef struct _e_icmp {
|
|
guint8 icmp_type;
|
|
guint8 icmp_code;
|
|
guint16 icmp_cksum;
|
|
union {
|
|
struct { /* Address mask request/reply */
|
|
guint16 id;
|
|
guint16 seq;
|
|
guint32 sn_mask;
|
|
} am;
|
|
struct { /* Timestap request/reply */
|
|
guint16 id;
|
|
guint16 seq;
|
|
guint32 orig;
|
|
guint32 recv;
|
|
guint32 xmit;
|
|
} ts;
|
|
guint32 zero; /* Unreachable */
|
|
} opt;
|
|
} e_icmp;
|
|
|
|
#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
|
|
|
|
/* IGMP structs and definitions */
|
|
typedef struct _e_igmp {
|
|
guint8 igmp_v_t; /* combines igmp_v and igmp_t */
|
|
guint8 igmp_unused;
|
|
guint16 igmp_cksum;
|
|
guint32 igmp_gaddr;
|
|
} e_igmp;
|
|
|
|
#define IGMP_M_QRY 0x01
|
|
#define IGMP_V1_M_RPT 0x02
|
|
#define IGMP_V2_LV_GRP 0x07
|
|
#define IGMP_DVMRP 0x03
|
|
#define IGMP_PIM 0x04
|
|
#define IGMP_V2_M_RPT 0x06
|
|
#define IGMP_MTRC_RESP 0x1e
|
|
#define IGMP_MTRC 0x1f
|
|
|
|
/* IP structs and definitions */
|
|
|
|
typedef struct _e_ip {
|
|
guint8 ip_v_hl; /* combines ip_v and ip_hl */
|
|
guint8 ip_tos;
|
|
guint16 ip_len;
|
|
guint16 ip_id;
|
|
guint16 ip_off;
|
|
guint8 ip_ttl;
|
|
guint8 ip_p;
|
|
guint16 ip_sum;
|
|
guint32 ip_src;
|
|
guint32 ip_dst;
|
|
} e_ip;
|
|
|
|
/* IP flags. */
|
|
#define IP_CE 0x8000 /* Flag: "Congestion" */
|
|
#define IP_DF 0x4000 /* Flag: "Don't Fragment" */
|
|
#define IP_MF 0x2000 /* Flag: "More Fragments" */
|
|
#define IP_OFFSET 0x1FFF /* "Fragment Offset" part */
|
|
|
|
#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(tos) ((tos)&IPTOS_PREC_MASK)
|
|
#define IPTOS_PREC_NETCONTROL 0xe0
|
|
#define IPTOS_PREC_INTERNETCONTROL 0xc0
|
|
#define IPTOS_PREC_CRITIC_ECP 0xa0
|
|
#define IPTOS_PREC_FLASHOVERRIDE 0x80
|
|
#define IPTOS_PREC_FLASH 0x60
|
|
#define IPTOS_PREC_IMMEDIATE 0x40
|
|
#define IPTOS_PREC_PRIORITY 0x20
|
|
#define IPTOS_PREC_ROUTINE 0x00
|
|
|
|
/* 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_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 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 */
|
|
|
|
|
|
void
|
|
capture_ip(const u_char *pd, int offset, guint32 cap_len, packet_counts *ld) {
|
|
switch (pd[offset + 9]) {
|
|
case IP_PROTO_TCP:
|
|
ld->tcp++;
|
|
break;
|
|
case IP_PROTO_UDP:
|
|
ld->udp++;
|
|
break;
|
|
case IP_PROTO_OSPF:
|
|
ld->ospf++;
|
|
break;
|
|
case IP_PROTO_GRE:
|
|
ld->gre++;
|
|
break;
|
|
default:
|
|
ld->other++;
|
|
}
|
|
}
|
|
|
|
static void
|
|
dissect_ipopt_security(proto_tree *opt_tree, const char *name,
|
|
const u_char *opd, int offset, guint optlen)
|
|
{
|
|
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_item(opt_tree, offset, optlen, "%s:", name);
|
|
field_tree = proto_tree_new();
|
|
proto_item_add_subtree(tf, field_tree, ETT_IP_OPTION_SEC);
|
|
offset += 2;
|
|
|
|
val = pntohs(opd);
|
|
proto_tree_add_item(field_tree, offset, 2,
|
|
"Security: %s", val_to_str(val, secl_vals, "Unknown (0x%x)"));
|
|
offset += 2;
|
|
opd += 2;
|
|
|
|
val = pntohs(opd);
|
|
proto_tree_add_item(field_tree, offset, 2,
|
|
"Compartments: %d", val);
|
|
offset += 2;
|
|
opd += 2;
|
|
|
|
proto_tree_add_item(field_tree, offset, 2,
|
|
"Handling restrictions: %c%c", opd[0], opd[1]);
|
|
offset += 2;
|
|
opd += 2;
|
|
|
|
proto_tree_add_item(field_tree, offset, 3,
|
|
"Transmission control code: %c%c%c", opd[0], opd[1], opd[2]);
|
|
}
|
|
|
|
static void
|
|
dissect_ipopt_route(proto_tree *opt_tree, const char *name,
|
|
const u_char *opd, int offset, guint optlen)
|
|
{
|
|
proto_tree *field_tree = NULL;
|
|
proto_item *tf;
|
|
int ptr;
|
|
int optoffset = 0;
|
|
struct in_addr addr;
|
|
|
|
tf = proto_tree_add_item(opt_tree, offset, optlen, "%s (%d bytes)", name,
|
|
optlen);
|
|
field_tree = proto_tree_new();
|
|
proto_item_add_subtree(tf, field_tree, ETT_IP_OPTION_ROUTE);
|
|
|
|
optoffset += 2; /* skip past type and length */
|
|
optlen -= 2; /* subtract size of type and length */
|
|
|
|
ptr = *opd;
|
|
proto_tree_add_item(field_tree, offset + optoffset, 1,
|
|
"Pointer: %d%s", ptr,
|
|
((ptr < 4) ? " (points before first address)" :
|
|
((ptr & 3) ? " (points to middle of address)" : "")));
|
|
optoffset++;
|
|
opd++;
|
|
optlen--;
|
|
ptr--; /* ptr is 1-origin */
|
|
|
|
while (optlen > 0) {
|
|
if (optlen < 4) {
|
|
proto_tree_add_item(field_tree, offset, optlen,
|
|
"(suboption would go past end of option)");
|
|
break;
|
|
}
|
|
|
|
/* Avoids alignment problems on many architectures. */
|
|
memcpy((char *)&addr, (char *)opd, sizeof(addr));
|
|
|
|
proto_tree_add_item(field_tree, offset + optoffset, 4,
|
|
"%s%s",
|
|
((addr.s_addr == 0) ? "-" : (char *)get_hostname(addr.s_addr)),
|
|
((optoffset == ptr) ? " <- (current)" : ""));
|
|
optoffset += 4;
|
|
opd += 4;
|
|
optlen -= 4;
|
|
}
|
|
}
|
|
|
|
static void
|
|
dissect_ipopt_sid(proto_tree *opt_tree, const char *name, const u_char *opd,
|
|
int offset, guint optlen)
|
|
{
|
|
proto_tree_add_item(opt_tree, offset, optlen,
|
|
"%s: %d", name, pntohs(opd));
|
|
return;
|
|
}
|
|
|
|
static void
|
|
dissect_ipopt_timestamp(proto_tree *opt_tree, const char *name, const u_char *opd,
|
|
int offset, guint optlen)
|
|
{
|
|
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 } };
|
|
|
|
struct in_addr addr;
|
|
guint ts;
|
|
|
|
tf = proto_tree_add_item(opt_tree, offset, optlen, "%s:", name);
|
|
field_tree = proto_tree_new();
|
|
proto_item_add_subtree(tf, field_tree, ETT_IP_OPTION_TIMESTAMP);
|
|
|
|
optoffset += 2; /* skip past type and length */
|
|
optlen -= 2; /* subtract size of type and length */
|
|
|
|
ptr = *opd;
|
|
proto_tree_add_item(field_tree, offset + optoffset, 1,
|
|
"Pointer: %d%s", ptr,
|
|
((ptr < 5) ? " (points before first address)" :
|
|
(((ptr - 1) & 3) ? " (points to middle of address)" : "")));
|
|
optoffset++;
|
|
opd++;
|
|
optlen--;
|
|
ptr--; /* ptr is 1-origin */
|
|
|
|
flg = *opd;
|
|
proto_tree_add_item(field_tree, offset + optoffset, 1,
|
|
"Overflow: %d", flg >> 4);
|
|
flg &= 0xF;
|
|
proto_tree_add_item(field_tree, offset + optoffset, 1,
|
|
"Flag: %s", val_to_str(flg, flag_vals, "Unknown (0x%x)"));
|
|
optoffset++;
|
|
opd++;
|
|
optlen--;
|
|
|
|
while (optlen > 0) {
|
|
if (flg == IPOPT_TS_TSANDADDR) {
|
|
if (optlen < 4) {
|
|
proto_tree_add_item(field_tree, offset + optoffset, optlen,
|
|
"(suboption would go past end of option)");
|
|
break;
|
|
}
|
|
/* XXX - check whether it goes past end of packet */
|
|
ts = pntohl(opd);
|
|
opd += 4;
|
|
optlen -= 4;
|
|
if (optlen < 4) {
|
|
proto_tree_add_item(field_tree, offset + optoffset, optlen,
|
|
"(suboption would go past end of option)");
|
|
break;
|
|
}
|
|
/* XXX - check whether it goes past end of packet */
|
|
memcpy((char *)&addr, (char *)opd, sizeof(addr));
|
|
opd += 4;
|
|
optlen -= 4;
|
|
proto_tree_add_item(field_tree, offset, 8,
|
|
"Address = %s, time stamp = %u",
|
|
((addr.s_addr == 0) ? "-" : (char *)get_hostname(addr.s_addr)),
|
|
ts);
|
|
optoffset += 8;
|
|
} else {
|
|
if (optlen < 4) {
|
|
proto_tree_add_item(field_tree, offset + optoffset, optlen,
|
|
"(suboption would go past end of option)");
|
|
break;
|
|
}
|
|
/* XXX - check whether it goes past end of packet */
|
|
ts = pntohl(opd);
|
|
opd += 4;
|
|
optlen -= 4;
|
|
proto_tree_add_item(field_tree, offset + optoffset, 4,
|
|
"Time stamp = %u", ts);
|
|
optoffset += 4;
|
|
}
|
|
}
|
|
}
|
|
|
|
static ip_tcp_opt ipopts[] = {
|
|
{
|
|
IPOPT_END,
|
|
"EOL",
|
|
NO_LENGTH,
|
|
0,
|
|
NULL,
|
|
},
|
|
{
|
|
IPOPT_NOOP,
|
|
"NOP",
|
|
NO_LENGTH,
|
|
0,
|
|
NULL,
|
|
},
|
|
{
|
|
IPOPT_SEC,
|
|
"Security",
|
|
FIXED_LENGTH,
|
|
IPOLEN_SEC,
|
|
dissect_ipopt_security
|
|
},
|
|
{
|
|
IPOPT_SSRR,
|
|
"Strict source route",
|
|
VARIABLE_LENGTH,
|
|
IPOLEN_SSRR_MIN,
|
|
dissect_ipopt_route
|
|
},
|
|
{
|
|
IPOPT_LSRR,
|
|
"Loose source route",
|
|
VARIABLE_LENGTH,
|
|
IPOLEN_LSRR_MIN,
|
|
dissect_ipopt_route
|
|
},
|
|
{
|
|
IPOPT_RR,
|
|
"Record route",
|
|
VARIABLE_LENGTH,
|
|
IPOLEN_RR_MIN,
|
|
dissect_ipopt_route
|
|
},
|
|
{
|
|
IPOPT_SID,
|
|
"Stream identifier",
|
|
FIXED_LENGTH,
|
|
IPOLEN_SID,
|
|
dissect_ipopt_sid
|
|
},
|
|
{
|
|
IPOPT_TIMESTAMP,
|
|
"Time stamp",
|
|
VARIABLE_LENGTH,
|
|
IPOLEN_TIMESTAMP_MIN,
|
|
dissect_ipopt_timestamp
|
|
}
|
|
};
|
|
|
|
#define N_IP_OPTS (sizeof ipopts / sizeof ipopts[0])
|
|
|
|
/* Dissect the IP or TCP options in a packet. */
|
|
void
|
|
dissect_ip_tcp_options(proto_tree *opt_tree, const u_char *opd, int offset,
|
|
guint length, ip_tcp_opt *opttab, int nopts, int eol)
|
|
{
|
|
u_char opt;
|
|
ip_tcp_opt *optp;
|
|
guint len;
|
|
|
|
while (length > 0) {
|
|
opt = *opd++;
|
|
for (optp = &opttab[0]; optp < &opttab[nopts]; optp++) {
|
|
if (optp->optcode == opt)
|
|
break;
|
|
}
|
|
if (optp == &opttab[nopts]) {
|
|
proto_tree_add_item(opt_tree, offset, 1, "Unknown");
|
|
/* We don't know how long this option is, so we don't know how much
|
|
of it to skip, so we just bail. */
|
|
return;
|
|
}
|
|
--length; /* account for type byte */
|
|
if (optp->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_item(opt_tree, offset, 1,
|
|
"%s (length byte past end of header)", optp->name);
|
|
return;
|
|
}
|
|
len = *opd++; /* 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_item(opt_tree, offset, 2,
|
|
"%s (with too-short option length = %u bytes)", optp->name, 2);
|
|
return;
|
|
} else if (len - 2 > length) {
|
|
/* Bogus - option goes past the end of the header. */
|
|
proto_tree_add_item(opt_tree, offset, length,
|
|
"%s (option goes past end of header)", optp->name);
|
|
return;
|
|
} else if (optp->len_type == FIXED_LENGTH && len != optp->optlen) {
|
|
/* Bogus - option length isn't what it's supposed to be for this
|
|
option. */
|
|
proto_tree_add_item(opt_tree, offset, len,
|
|
"%s (with option length = %u bytes; should be %u)", optp->name,
|
|
len, optp->optlen);
|
|
return;
|
|
} else if (optp->len_type == VARIABLE_LENGTH && len < optp->optlen) {
|
|
/* Bogus - option length is less than what it's supposed to be for
|
|
this option. */
|
|
proto_tree_add_item(opt_tree, offset, len,
|
|
"%s (with option length = %u bytes; should be >= %u)", optp->name,
|
|
len, optp->optlen);
|
|
return;
|
|
} else {
|
|
if (optp->dissect != NULL) {
|
|
/* Option has a dissector. */
|
|
(*optp->dissect)(opt_tree, optp->name, opd, offset, len);
|
|
} else {
|
|
/* Option has no data, hence no dissector. */
|
|
proto_tree_add_item(opt_tree, offset, len, "%s", optp->name);
|
|
}
|
|
len -= 2; /* subtract size of type and length */
|
|
offset += 2 + len;
|
|
}
|
|
opd += len;
|
|
length -= len;
|
|
} else {
|
|
proto_tree_add_item(opt_tree, offset, 1, "%s", optp->name);
|
|
offset += 1;
|
|
}
|
|
if (opt == eol)
|
|
break;
|
|
}
|
|
}
|
|
|
|
void
|
|
dissect_ip(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
|
|
e_ip iph;
|
|
proto_tree *ip_tree, *field_tree;
|
|
proto_item *ti, *tf;
|
|
gchar tos_str[32];
|
|
guint hlen, optlen;
|
|
static const value_string proto_vals[] = { {IP_PROTO_ICMP, "ICMP"},
|
|
{IP_PROTO_IGMP, "IGMP"},
|
|
{IP_PROTO_TCP, "TCP" },
|
|
{IP_PROTO_UDP, "UDP" },
|
|
{IP_PROTO_OSPF, "OSPF"},
|
|
{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 } };
|
|
int advance;
|
|
guint8 nxt;
|
|
|
|
/* To do: check for runts, errs, etc. */
|
|
/* Avoids alignment problems on many architectures. */
|
|
memcpy(&iph, &pd[offset], sizeof(e_ip));
|
|
iph.ip_len = ntohs(iph.ip_len);
|
|
iph.ip_id = ntohs(iph.ip_id);
|
|
iph.ip_off = ntohs(iph.ip_off);
|
|
iph.ip_sum = ntohs(iph.ip_sum);
|
|
|
|
hlen = lo_nibble(iph.ip_v_hl) * 4; /* IP header length, in bytes */
|
|
|
|
switch (iph.ip_p) {
|
|
case IP_PROTO_ICMP:
|
|
case IP_PROTO_IGMP:
|
|
case IP_PROTO_TCP:
|
|
case IP_PROTO_UDP:
|
|
case IP_PROTO_OSPF:
|
|
case IP_PROTO_GRE:
|
|
case IP_PROTO_ESP:
|
|
case IP_PROTO_AH:
|
|
case IP_PROTO_IPV6:
|
|
/* Names are set in the associated dissect_* routines */
|
|
break;
|
|
default:
|
|
if (check_col(fd, COL_PROTOCOL))
|
|
col_add_str(fd, COL_PROTOCOL, "IP");
|
|
if (check_col(fd, COL_INFO))
|
|
col_add_fstr(fd, COL_INFO, "Unknown IP protocol (0x%02x)", iph.ip_p);
|
|
}
|
|
|
|
if (check_col(fd, COL_RES_NET_SRC))
|
|
col_add_str(fd, COL_RES_NET_SRC, get_hostname(iph.ip_src));
|
|
if (check_col(fd, COL_UNRES_NET_SRC))
|
|
col_add_str(fd, COL_UNRES_NET_SRC, ip_to_str((guint8 *) &iph.ip_src));
|
|
if (check_col(fd, COL_RES_NET_DST))
|
|
col_add_str(fd, COL_RES_NET_DST, get_hostname(iph.ip_dst));
|
|
if (check_col(fd, COL_UNRES_NET_DST))
|
|
col_add_str(fd, COL_UNRES_NET_DST, ip_to_str((guint8 *) &iph.ip_dst));
|
|
|
|
if (tree) {
|
|
|
|
switch (IPTOS_TOS(iph.ip_tos)) {
|
|
case IPTOS_NONE:
|
|
strcpy(tos_str, "None");
|
|
break;
|
|
case IPTOS_LOWCOST:
|
|
strcpy(tos_str, "Minimize cost");
|
|
break;
|
|
case IPTOS_RELIABILITY:
|
|
strcpy(tos_str, "Maximize reliability");
|
|
break;
|
|
case IPTOS_THROUGHPUT:
|
|
strcpy(tos_str, "Maximize throughput");
|
|
break;
|
|
case IPTOS_LOWDELAY:
|
|
strcpy(tos_str, "Minimize delay");
|
|
break;
|
|
case IPTOS_SECURITY:
|
|
strcpy(tos_str, "Maximize security");
|
|
break;
|
|
default:
|
|
strcpy(tos_str, "Unknown. Malformed?");
|
|
break;
|
|
}
|
|
|
|
ti = proto_tree_add_item(tree, offset, hlen, "Internet Protocol");
|
|
ip_tree = proto_tree_new();
|
|
proto_item_add_subtree(ti, ip_tree, ETT_IP);
|
|
proto_tree_add_item(ip_tree, offset, 1, "Version: %d", hi_nibble(iph.ip_v_hl));
|
|
proto_tree_add_item(ip_tree, offset, 1, "Header length: %d bytes", hlen);
|
|
tf = proto_tree_add_item(ip_tree, offset + 1, 1, "Type of service: 0x%02x (%s)",
|
|
iph.ip_tos, tos_str);
|
|
field_tree = proto_tree_new();
|
|
proto_item_add_subtree(tf, field_tree, ETT_IP_TOS);
|
|
proto_tree_add_item(field_tree, offset + 1, 1, "%s",
|
|
decode_enumerated_bitfield(iph.ip_tos, IPTOS_PREC_MASK,
|
|
sizeof (iph.ip_tos)*8, precedence_vals,
|
|
"%s precedence"));
|
|
proto_tree_add_item(field_tree, offset + 1, 1, "%s",
|
|
decode_boolean_bitfield(iph.ip_tos, IPTOS_LOWDELAY,
|
|
sizeof (iph.ip_tos)*8, "low delay", "normal delay"));
|
|
proto_tree_add_item(field_tree, offset + 1, 1, "%s",
|
|
decode_boolean_bitfield(iph.ip_tos, IPTOS_THROUGHPUT,
|
|
sizeof (iph.ip_tos)*8, "high throughput", "normal throughput"));
|
|
proto_tree_add_item(field_tree, offset + 1, 1, "%s",
|
|
decode_boolean_bitfield(iph.ip_tos, IPTOS_RELIABILITY,
|
|
sizeof (iph.ip_tos)*8, "high reliability", "normal reliability"));
|
|
proto_tree_add_item(field_tree, offset + 1, 1, "%s",
|
|
decode_boolean_bitfield(iph.ip_tos, IPTOS_LOWCOST,
|
|
sizeof (iph.ip_tos)*8, "low cost", "normal cost"));
|
|
proto_tree_add_item(ip_tree, offset + 2, 2, "Total length: %d", iph.ip_len);
|
|
proto_tree_add_item(ip_tree, offset + 4, 2, "Identification: 0x%04x",
|
|
iph.ip_id);
|
|
tf = proto_tree_add_item(ip_tree, offset + 6, 2, "Flags: 0x%x",
|
|
(iph.ip_off & (IP_DF|IP_MF)) >> 12);
|
|
field_tree = proto_tree_new();
|
|
proto_item_add_subtree(tf, field_tree, ETT_IP_OFF);
|
|
proto_tree_add_item(field_tree, offset + 6, 2, "%s",
|
|
decode_boolean_bitfield(iph.ip_off >> 8, IP_DF >> 8, 8, "don't fragment",
|
|
"may fragment"));
|
|
proto_tree_add_item(field_tree, offset + 6, 2, "%s",
|
|
decode_boolean_bitfield(iph.ip_off >> 8, IP_MF >> 8, 8, "more fragments",
|
|
"last fragment"));
|
|
proto_tree_add_item(ip_tree, offset + 6, 2, "Fragment offset: %d",
|
|
iph.ip_off & IP_OFFSET);
|
|
proto_tree_add_item(ip_tree, offset + 8, 1, "Time to live: %d",
|
|
iph.ip_ttl);
|
|
proto_tree_add_item(ip_tree, offset + 9, 1, "Protocol: %s",
|
|
val_to_str(iph.ip_p, proto_vals, "Unknown (0x%x)"));
|
|
proto_tree_add_item(ip_tree, offset + 10, 2, "Header checksum: 0x%04x",
|
|
iph.ip_sum);
|
|
proto_tree_add_item(ip_tree, offset + 12, 4, "Source address: %s (%s)",
|
|
get_hostname(iph.ip_src),
|
|
ip_to_str((guint8 *) &iph.ip_src));
|
|
proto_tree_add_item(ip_tree, offset + 16, 4, "Destination address: %s (%s)",
|
|
get_hostname(iph.ip_dst),
|
|
ip_to_str((guint8 *) &iph.ip_dst));
|
|
|
|
/* Decode IP options, if any. */
|
|
if (hlen > sizeof (e_ip)) {
|
|
/* There's more than just the fixed-length header. Decode the
|
|
options. */
|
|
optlen = hlen - sizeof (e_ip); /* length of options, in bytes */
|
|
tf = proto_tree_add_item(ip_tree, offset + 20, optlen,
|
|
"Options: (%d bytes)", optlen);
|
|
field_tree = proto_tree_new();
|
|
proto_item_add_subtree(tf, field_tree, ETT_IP_OPTIONS);
|
|
dissect_ip_tcp_options(field_tree, &pd[offset + 20], offset + 20, optlen,
|
|
ipopts, N_IP_OPTS, IPOPT_END);
|
|
}
|
|
}
|
|
|
|
pi.srcip = ip_to_str( (guint8 *) &iph.ip_src);
|
|
pi.destip = ip_to_str( (guint8 *) &iph.ip_dst);
|
|
pi.ipproto = iph.ip_p;
|
|
pi.iplen = iph.ip_len;
|
|
pi.iphdrlen = lo_nibble(iph.ip_v_hl);
|
|
pi.ip_src = iph.ip_src;
|
|
pi.payload = pi.iplen - hlen;
|
|
|
|
offset += hlen;
|
|
nxt = iph.ip_p;
|
|
if (iph.ip_off & IP_OFFSET) {
|
|
/* fragmented */
|
|
if (check_col(fd, COL_INFO))
|
|
col_add_fstr(fd, COL_INFO, "Fragmented IP protocol (proto=%02x, off=%d)",
|
|
iph.ip_p, iph.ip_off & IP_OFFSET);
|
|
dissect_data(pd, offset, fd, tree);
|
|
return;
|
|
}
|
|
|
|
again:
|
|
switch (nxt) {
|
|
case IP_PROTO_ICMP:
|
|
dissect_icmp(pd, offset, fd, tree);
|
|
break;
|
|
case IP_PROTO_IGMP:
|
|
dissect_igmp(pd, offset, fd, tree);
|
|
break;
|
|
case IP_PROTO_TCP:
|
|
dissect_tcp(pd, offset, fd, tree);
|
|
break;
|
|
case IP_PROTO_UDP:
|
|
dissect_udp(pd, offset, fd, tree);
|
|
break;
|
|
case IP_PROTO_OSPF:
|
|
dissect_ospf(pd, offset, fd, tree);
|
|
break;
|
|
case IP_PROTO_RSVP:
|
|
dissect_rsvp(pd, offset, fd, tree);
|
|
break;
|
|
case IP_PROTO_AH:
|
|
advance = dissect_ah(pd, offset, fd, tree);
|
|
nxt = pd[offset];
|
|
offset += advance;
|
|
goto again;
|
|
case IP_PROTO_GRE:
|
|
dissect_gre(pd, offset, fd, tree);
|
|
break;
|
|
case IP_PROTO_ESP:
|
|
dissect_esp(pd, offset, fd, tree);
|
|
break;
|
|
case IP_PROTO_IPV6:
|
|
dissect_ipv6(pd, offset, fd, tree);
|
|
break;
|
|
}
|
|
}
|
|
|
|
|
|
static const gchar *unreach_str[] = {"Network unreachable",
|
|
"Host unreachable",
|
|
"Protocol unreachable",
|
|
"Port unreachable",
|
|
"Fragmentation needed",
|
|
"Source route failed",
|
|
"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[] = {"TTL equals 0 during transit",
|
|
"TTL equals 0 during reassembly"};
|
|
|
|
#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])
|
|
|
|
void
|
|
dissect_icmp(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
|
|
e_icmp ih;
|
|
proto_tree *icmp_tree;
|
|
proto_item *ti;
|
|
guint16 cksum;
|
|
gchar type_str[64], code_str[64] = "";
|
|
guint8 num_addrs = 0;
|
|
guint8 addr_entry_size = 0;
|
|
int i;
|
|
|
|
/* Avoids alignment problems on many architectures. */
|
|
memcpy(&ih, &pd[offset], sizeof(e_icmp));
|
|
/* To do: check for runts, errs, etc. */
|
|
cksum = ntohs(ih.icmp_cksum);
|
|
|
|
switch (ih.icmp_type) {
|
|
case ICMP_ECHOREPLY:
|
|
strcpy(type_str, "Echo (ping) reply");
|
|
break;
|
|
case ICMP_UNREACH:
|
|
strcpy(type_str, "Destination unreachable");
|
|
if (ih.icmp_code < N_UNREACH) {
|
|
sprintf(code_str, "(%s)", unreach_str[ih.icmp_code]);
|
|
} else {
|
|
strcpy(code_str, "(Unknown - error?)");
|
|
}
|
|
break;
|
|
case ICMP_SOURCEQUENCH:
|
|
strcpy(type_str, "Source quench (flow control)");
|
|
break;
|
|
case ICMP_REDIRECT:
|
|
strcpy(type_str, "Redirect");
|
|
if (ih.icmp_code < N_REDIRECT) {
|
|
sprintf(code_str, "(%s)", redir_str[ih.icmp_code]);
|
|
} else {
|
|
strcpy(code_str, "(Unknown - error?)");
|
|
}
|
|
break;
|
|
case ICMP_ECHO:
|
|
strcpy(type_str, "Echo (ping) request");
|
|
break;
|
|
case ICMP_RTRADVERT:
|
|
strcpy(type_str, "Router advertisement");
|
|
break;
|
|
case ICMP_RTRSOLICIT:
|
|
strcpy(type_str, "Router solicitation");
|
|
break;
|
|
case ICMP_TIMXCEED:
|
|
strcpy(type_str, "Time-to-live exceeded");
|
|
if (ih.icmp_code < N_TIMXCEED) {
|
|
sprintf(code_str, "(%s)", ttl_str[ih.icmp_code]);
|
|
} else {
|
|
strcpy(code_str, "(Unknown - error?)");
|
|
}
|
|
break;
|
|
case ICMP_PARAMPROB:
|
|
strcpy(type_str, "Parameter problem");
|
|
if (ih.icmp_code < N_PARAMPROB) {
|
|
sprintf(code_str, "(%s)", par_str[ih.icmp_code]);
|
|
} else {
|
|
strcpy(code_str, "(Unknown - error?)");
|
|
}
|
|
break;
|
|
case ICMP_TSTAMP:
|
|
strcpy(type_str, "Timestamp request");
|
|
break;
|
|
case ICMP_TSTAMPREPLY:
|
|
strcpy(type_str, "Timestamp reply");
|
|
break;
|
|
case ICMP_IREQ:
|
|
strcpy(type_str, "Information request");
|
|
break;
|
|
case ICMP_IREQREPLY:
|
|
strcpy(type_str, "Information reply");
|
|
break;
|
|
case ICMP_MASKREQ:
|
|
strcpy(type_str, "Address mask request");
|
|
break;
|
|
case ICMP_MASKREPLY:
|
|
strcpy(type_str, "Address mask reply");
|
|
break;
|
|
default:
|
|
strcpy(type_str, "Unknown ICMP (obsolete or malformed?)");
|
|
}
|
|
|
|
if (check_col(fd, COL_PROTOCOL))
|
|
col_add_str(fd, COL_PROTOCOL, "ICMP");
|
|
if (check_col(fd, COL_INFO))
|
|
col_add_str(fd, COL_INFO, type_str);
|
|
|
|
if (tree) {
|
|
ti = proto_tree_add_item(tree, offset, 4,
|
|
"Internet Control Message Protocol");
|
|
icmp_tree = proto_tree_new();
|
|
proto_item_add_subtree(ti, icmp_tree, ETT_ICMP);
|
|
proto_tree_add_item(icmp_tree, offset, 1, "Type: %d (%s)",
|
|
ih.icmp_type, type_str);
|
|
proto_tree_add_item(icmp_tree, offset + 1, 1, "Code: %d %s",
|
|
ih.icmp_code, code_str);
|
|
proto_tree_add_item(icmp_tree, offset + 2, 2, "Checksum: 0x%04x",
|
|
ih.icmp_cksum);
|
|
|
|
/* Decode the second 4 bytes of the packet. */
|
|
switch (ih.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, offset + 4, 2, "Identifier: 0x%04x",
|
|
pntohs(&pd[offset + 4]));
|
|
proto_tree_add_item(icmp_tree, offset + 6, 2, "Sequence number: %u",
|
|
pntohs(&pd[offset + 6]));
|
|
break;
|
|
|
|
case ICMP_RTRADVERT:
|
|
num_addrs = pd[offset + 4];
|
|
proto_tree_add_item(icmp_tree, offset + 4, 1, "Number of addresses: %u",
|
|
num_addrs);
|
|
addr_entry_size = pd[offset + 5];
|
|
proto_tree_add_item(icmp_tree, offset + 5, 1, "Address entry size: %u",
|
|
addr_entry_size);
|
|
proto_tree_add_item(icmp_tree, offset + 6, 2, "Lifetime: %s",
|
|
time_secs_to_str(pntohs(&pd[offset + 6])));
|
|
break;
|
|
|
|
case ICMP_PARAMPROB:
|
|
proto_tree_add_item(icmp_tree, offset + 4, 1, "Pointer: %u",
|
|
pd[offset + 4]);
|
|
break;
|
|
|
|
case ICMP_REDIRECT:
|
|
proto_tree_add_item(icmp_tree, offset + 4, 4, "Gateway address: %s",
|
|
ip_to_str((guint8 *)&pd[offset + 4]));
|
|
break;
|
|
}
|
|
|
|
/* Decode the additional information in the packet. */
|
|
switch (ih.icmp_type) {
|
|
case ICMP_UNREACH:
|
|
case ICMP_TIMXCEED:
|
|
case ICMP_PARAMPROB:
|
|
case ICMP_SOURCEQUENCH:
|
|
case ICMP_REDIRECT:
|
|
/* Decode the IP header and first 64 bits of data from the
|
|
original datagram.
|
|
|
|
XXX - for now, just display it as data; not all dissection
|
|
routines can handle a short packet without exploding. */
|
|
dissect_data(pd, offset + 8, fd, icmp_tree);
|
|
break;
|
|
|
|
case ICMP_ECHOREPLY:
|
|
case ICMP_ECHO:
|
|
dissect_data(pd, offset + 8, fd, icmp_tree);
|
|
break;
|
|
|
|
case ICMP_RTRADVERT:
|
|
if (addr_entry_size == 2) {
|
|
for (i = 0; i < num_addrs; i++) {
|
|
proto_tree_add_item(icmp_tree, offset + 8 + (i*8), 4,
|
|
"Router address: %s",
|
|
ip_to_str((guint8 *)&pd[offset + 8 + (i*8)]));
|
|
proto_tree_add_item(icmp_tree, offset + 12 + (i*8), 4,
|
|
"Preference level: %d", pntohl(&pd[offset + 12 + (i*8)]));
|
|
}
|
|
} else
|
|
dissect_data(pd, offset + 8, fd, icmp_tree);
|
|
break;
|
|
|
|
case ICMP_TSTAMP:
|
|
case ICMP_TSTAMPREPLY:
|
|
proto_tree_add_item(icmp_tree, offset + 8, 4, "Originate timestamp: %u",
|
|
pntohl(&pd[offset + 8]));
|
|
proto_tree_add_item(icmp_tree, offset + 12, 4, "Originate timestamp: %u",
|
|
pntohl(&pd[offset + 12]));
|
|
proto_tree_add_item(icmp_tree, offset + 16, 4, "Receive timestamp: %u",
|
|
pntohl(&pd[offset + 16]));
|
|
proto_tree_add_item(icmp_tree, offset + 20, 4, "Transmit timestamp: %u",
|
|
pntohl(&pd[offset + 20]));
|
|
break;
|
|
|
|
case ICMP_MASKREQ:
|
|
case ICMP_MASKREPLY:
|
|
proto_tree_add_item(icmp_tree, offset + 8, 4, "Address mask: %s (0x%8x)",
|
|
ip_to_str((guint8 *)&pd[offset + 8]), pntohl(&pd[offset + 8]));
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
void
|
|
dissect_igmp(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
|
|
e_igmp ih;
|
|
proto_tree *igmp_tree;
|
|
proto_item *ti;
|
|
guint16 cksum;
|
|
gchar type_str[64] = "";
|
|
|
|
/* Avoids alignment problems on many architectures. */
|
|
memcpy(&ih, &pd[offset], sizeof(e_igmp));
|
|
/* To do: check for runts, errs, etc. */
|
|
cksum = ntohs(ih.igmp_cksum);
|
|
|
|
switch (lo_nibble(ih.igmp_v_t)) {
|
|
case IGMP_M_QRY:
|
|
strcpy(type_str, "Router query");
|
|
break;
|
|
case IGMP_V1_M_RPT:
|
|
strcpy(type_str, "Host response (v1)");
|
|
break;
|
|
case IGMP_V2_LV_GRP:
|
|
strcpy(type_str, "Leave group (v2)");
|
|
break;
|
|
case IGMP_DVMRP:
|
|
strcpy(type_str, "DVMRP");
|
|
break;
|
|
case IGMP_PIM:
|
|
strcpy(type_str, "PIM");
|
|
break;
|
|
case IGMP_V2_M_RPT:
|
|
strcpy(type_str, "Host reponse (v2)");
|
|
break;
|
|
case IGMP_MTRC_RESP:
|
|
strcpy(type_str, "Traceroute response");
|
|
break;
|
|
case IGMP_MTRC:
|
|
strcpy(type_str, "Traceroute message");
|
|
break;
|
|
default:
|
|
strcpy(type_str, "Unknown IGMP");
|
|
}
|
|
|
|
if (check_col(fd, COL_PROTOCOL))
|
|
col_add_str(fd, COL_PROTOCOL, "IGMP");
|
|
if (check_col(fd, COL_INFO))
|
|
col_add_str(fd, COL_INFO, type_str);
|
|
|
|
if (tree) {
|
|
ti = proto_tree_add_item(tree, offset, 4,
|
|
"Internet Group Management Protocol");
|
|
igmp_tree = proto_tree_new();
|
|
proto_item_add_subtree(ti, igmp_tree, ETT_IGMP);
|
|
proto_tree_add_item(igmp_tree, offset, 1, "Version: %d",
|
|
hi_nibble(ih.igmp_v_t));
|
|
proto_tree_add_item(igmp_tree, offset , 1, "Type: %d (%s)",
|
|
lo_nibble(ih.igmp_v_t), type_str);
|
|
proto_tree_add_item(igmp_tree, offset + 1, 1, "Unused: 0x%02x",
|
|
ih.igmp_unused);
|
|
proto_tree_add_item(igmp_tree, offset + 2, 2, "Checksum: 0x%04x",
|
|
ih.igmp_cksum);
|
|
proto_tree_add_item(igmp_tree, offset + 4, 4, "Group address: %s",
|
|
ip_to_str((guint8 *) &ih.igmp_gaddr));
|
|
}
|
|
}
|