wireshark/packet-vines.c
Guy Harris ee5ca25d31 Include files from the "epan" directory and subdirectories thereof with
"epan/..." pathnames, so as to avoid collisions with header files in any
of the directories in which we look (e.g., "proto.h", as some other
package has its own "proto.h" file which it installs in the top-level
include directory).

Don't add "-I" flags to search "epan", as that's no longer necessary
(and we want includes of "epan" headers to fail if the "epan/" is left
out, so that we don't re-introduce includes lacking "epan/").

svn path=/trunk/; revision=4586
2002-01-21 07:37:49 +00:00

482 lines
14 KiB
C

/* packet-vines.c
* Routines for Banyan VINES protocol packet disassembly
*
* $Id: packet-vines.c,v 1.39 2002/01/21 07:36:44 guy Exp $
*
* Don Lafontaine <lafont02@cn.ca>
*
* Ethereal - Network traffic analyzer
* By Gerald Combs <gerald@ethereal.com>
* Copyright 1998 Gerald Combs
* Joerg Mayer <jmayer@loplof.de>
*
* 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 <string.h>
#include <glib.h>
#include <epan/packet.h>
#include "packet-vines.h"
#include "etypes.h"
#include "ppptypes.h"
#include "ipproto.h"
#define UDP_PORT_VINES 573
static int proto_vines = -1;
static int hf_vines_protocol = -1;
static gint ett_vines = -1;
static int proto_vines_frp = -1;
static gint ett_vines_frp = -1;
static int proto_vines_spp = -1;
static gint ett_vines_spp = -1;
static void dissect_vines_frp(tvbuff_t *, packet_info *, proto_tree *);
#if 0
static void dissect_vines_arp(tvbuff_t *, packet_info *, proto_tree *);
static void dissect_vines_icp(tvbuff_t *, packet_info *, proto_tree *);
static void dissect_vines_ipc(tvbuff_t *, packet_info *, proto_tree *);
static void dissect_vines_rtp(tvbuff_t *, packet_info *, proto_tree *);
#endif
static void dissect_vines_spp(tvbuff_t *, packet_info *, proto_tree *);
static void dissect_vines(tvbuff_t *, packet_info *, proto_tree *);
void
capture_vines(const u_char *pd, int offset, int len, packet_counts *ld)
{
ld->vines++;
}
static dissector_handle_t vines_handle;
static dissector_handle_t data_handle;
/* AFAIK Vines FRP (Fragmentation Protocol) is used on all media except
* Ethernet and TR (and probably FDDI) - Fragmentation on these media types
* is not possible
* FIXME: Do we need to use this header with PPP too?
*/
static void
dissect_vines_frp(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree)
{
guint8 vines_frp_ctrl;
proto_tree *vines_frp_tree;
proto_item *ti;
gchar frp_flags_str[32];
tvbuff_t *next_tvb;
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "Vines FRP");
if (check_col(pinfo->cinfo, COL_INFO))
col_clear(pinfo->cinfo, COL_INFO);
if (tree) {
ti = proto_tree_add_item(tree, proto_vines_frp, tvb, 0, 2,
FALSE);
vines_frp_tree = proto_item_add_subtree(ti, ett_vines_frp);
vines_frp_ctrl = tvb_get_guint8(tvb, 0);
/*
* 1: first fragment of vines packet
* 2: last fragment of vines packet
* 4 ... 80: unused
*/
switch (vines_frp_ctrl) {
case 0:
strcpy(frp_flags_str, "middle");
break;
case 1:
strcpy(frp_flags_str, "first");
break;
case 2:
strcpy(frp_flags_str, "last");
break;
case 3:
strcpy(frp_flags_str, "only");
break;
default:
strcpy(frp_flags_str, "please report: unknown");
break;
}
proto_tree_add_text(vines_frp_tree, tvb, 0, 1,
"Control Flags: 0x%02x = %s fragment",
vines_frp_ctrl, frp_flags_str);
proto_tree_add_text(vines_frp_tree, tvb, 1, 1,
"Sequence Number: 0x%02x",
tvb_get_guint8(tvb, 1));
}
/* Decode the "real" Vines now */
next_tvb = tvb_new_subset(tvb, 2, -1, -1);
call_dissector(vines_handle, next_tvb, pinfo, tree);
}
void
proto_register_vines_frp(void)
{
static gint *ett[] = {
&ett_vines_frp,
};
proto_vines_frp = proto_register_protocol(
"Banyan Vines Fragmentation Protocol", "Vines FRP", "vines_frp");
proto_register_subtree_array(ett, array_length(ett));
}
void
proto_reg_handoff_vines_frp(void)
{
dissector_handle_t vines_frp_handle;
vines_frp_handle = create_dissector_handle(dissect_vines_frp,
proto_vines_frp);
dissector_add("ip.proto", IP_PROTO_VINES, vines_frp_handle);
/* XXX: AFAIK, src and dst port must be the same; should
the dissector check for that? */
dissector_add("udp.port", UDP_PORT_VINES, vines_frp_handle);
}
static dissector_table_t vines_dissector_table;
static void
dissect_vines(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree)
{
int offset = 0;
e_vip viph;
proto_tree *vip_tree;
proto_item *ti;
/* gchar tos_str[32]; */
const guint8 *dst_addr, *src_addr;
int is_broadcast = 0;
int hops = 0;
tvbuff_t *next_tvb;
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "Vines");
if (check_col(pinfo->cinfo, COL_INFO))
col_clear(pinfo->cinfo, COL_INFO);
/* To do: check for runts, errs, etc. */
/* Avoids alignment problems on many architectures. */
tvb_memcpy(tvb, (guint8 *)&viph, offset, sizeof(e_vip));
viph.vip_chksum = ntohs(viph.vip_chksum);
viph.vip_pktlen = ntohs(viph.vip_pktlen);
viph.vip_dnet = ntohl(viph.vip_dnet);
viph.vip_dsub = ntohs(viph.vip_dsub);
viph.vip_snet = ntohl(viph.vip_snet);
viph.vip_ssub = ntohs(viph.vip_ssub);
switch (viph.vip_proto) {
case VIP_PROTO_IPC:
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "Vines IPC");
if (check_col(pinfo->cinfo, COL_INFO))
col_add_fstr(pinfo->cinfo, COL_INFO, "IPC (%02x)", viph.vip_proto);
break;
case VIP_PROTO_SPP:
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "Vines SPP");
if (check_col(pinfo->cinfo, COL_INFO))
col_add_fstr(pinfo->cinfo, COL_INFO, "SPP (%02x)", viph.vip_proto);
break;
case VIP_PROTO_ARP:
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "Vines ARP");
if (check_col(pinfo->cinfo, COL_INFO))
col_add_fstr(pinfo->cinfo, COL_INFO, "ARP (%02x)", viph.vip_proto);
break;
case VIP_PROTO_RTP:
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "Vines RTP");
if (check_col(pinfo->cinfo, COL_INFO))
col_add_fstr(pinfo->cinfo, COL_INFO, "RTP (%02x)", viph.vip_proto);
break;
case VIP_PROTO_ICP:
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "Vines ICP");
if (check_col(pinfo->cinfo, COL_INFO))
col_add_fstr(pinfo->cinfo, COL_INFO, "ICP (%02x)", viph.vip_proto);
break;
default:
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "Vines IP");
if (check_col(pinfo->cinfo, COL_INFO))
col_add_fstr(pinfo->cinfo, COL_INFO, "Unknown VIP protocol (%02x)",
viph.vip_proto);
}
src_addr = tvb_get_ptr(tvb, offset+12, VINES_ADDR_LEN);
SET_ADDRESS(&pinfo->net_src, AT_VINES, VINES_ADDR_LEN, src_addr);
SET_ADDRESS(&pinfo->src, AT_VINES, VINES_ADDR_LEN, src_addr);
dst_addr = tvb_get_ptr(tvb, offset+6, VINES_ADDR_LEN);
SET_ADDRESS(&pinfo->net_dst, AT_VINES, VINES_ADDR_LEN,dst_addr);
SET_ADDRESS(&pinfo->dst, AT_VINES, VINES_ADDR_LEN, dst_addr);
/* helpers to decode flags */
/* FIXME: Not used yet */
if ((viph.vip_dnet == 0xffffffff) && (viph.vip_dsub == 0xffff)) {
is_broadcast = 1;
}
hops = viph.vip_tctl & 0xf;
/*
viph.ip_tos = IPTOS_TOS(viph.ip_tos);
switch (viph.ip_tos) {
case IPTOS_NONE:
strcpy(tos_str, "None");
break;
case IPTOS_LOWDELAY:
strcpy(tos_str, "Minimize delay");
break;
case IPTOS_THROUGHPUT:
strcpy(tos_str, "Maximize throughput");
break;
case IPTOS_RELIABILITY:
strcpy(tos_str, "Maximize reliability");
break;
case IPTOS_LOWCOST:
strcpy(tos_str, "Minimize cost");
break;
default:
strcpy(tos_str, "Unknon. Malformed?");
break;
}
*/
if (tree) {
ti = proto_tree_add_protocol_format(tree, proto_vines, tvb,
offset, (viph.vip_pktlen),
"Vines IP");
vip_tree = proto_item_add_subtree(ti, ett_vines);
proto_tree_add_text(vip_tree, tvb, offset, 2,
"Packet checksum: 0x%04x",
viph.vip_chksum);
proto_tree_add_text(vip_tree, tvb, offset + 2, 2,
"Packet length: 0x%04x (%d)",
viph.vip_pktlen, viph.vip_pktlen);
proto_tree_add_text(vip_tree, tvb, offset + 4, 1,
"Transport control: 0x%02x",
viph.vip_tctl);
proto_tree_add_uint(vip_tree, hf_vines_protocol, tvb,
offset + 5, 1,
viph.vip_proto);
proto_tree_add_text(vip_tree, tvb, offset + 6,
VINES_ADDR_LEN,
"Destination: %s",
vines_addr_to_str(dst_addr));
proto_tree_add_text(vip_tree, tvb, offset + 12,
VINES_ADDR_LEN,
"Source: %s",
vines_addr_to_str(src_addr));
}
offset += 18;
next_tvb = tvb_new_subset(tvb, offset, -1, -1);
if (!dissector_try_port(vines_dissector_table, viph.vip_proto,
next_tvb, pinfo, tree))
call_dissector(data_handle,next_tvb, pinfo, tree);
}
void
proto_register_vines(void)
{
static gint *ett[] = {
&ett_vines,
};
static hf_register_info hf[] = {
{ &hf_vines_protocol,
{ "Protocol", "vines.protocol",
FT_UINT8, BASE_HEX, NULL, 0x0,
"Vines protocol", HFILL }}
};
proto_vines = proto_register_protocol("Banyan Vines", "Vines", "vines");
proto_register_field_array(proto_vines, hf, array_length(hf));
proto_register_subtree_array(ett, array_length(ett));
/* subdissector code */
vines_dissector_table = register_dissector_table("vines.proto",
"Vines protocol", FT_UINT8, BASE_HEX);
register_dissector("vines", dissect_vines, proto_vines);
vines_handle = find_dissector("vines");
}
void
proto_reg_handoff_vines(void)
{
dissector_add("ethertype", ETHERTYPE_VINES, vines_handle);
dissector_add("ppp.protocol", PPP_VINES, vines_handle);
data_handle = find_dissector("data");
}
static void
dissect_vines_spp(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree)
{
int offset = 0;
e_vspp viph;
proto_tree *vspp_tree;
proto_item *ti;
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "VSPP");
if (check_col(pinfo->cinfo, COL_INFO))
col_clear(pinfo->cinfo, COL_INFO);
/* To do: check for runts, errs, etc. */
/* Avoids alignment problems on many architectures. */
tvb_memcpy(tvb, (guint8 *)&viph, offset, sizeof(e_vspp));
viph.vspp_sport = ntohs(viph.vspp_sport);
viph.vspp_dport = ntohs(viph.vspp_dport);
viph.vspp_lclid = ntohs(viph.vspp_lclid);
viph.vspp_rmtid = ntohs(viph.vspp_rmtid);
switch (viph.vspp_pkttype) {
case VSPP_PKTTYPE_DATA:
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "VSPP Data");
break;
case VSPP_PKTTYPE_DISC:
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "VSPP Disconnect");
break;
case VSPP_PKTTYPE_PROBE:
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "VSPP Probe");
break;
case VSPP_PKTTYPE_ACK:
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "VSPP Ack");
break;
default:
if (check_col(pinfo->cinfo, COL_PROTOCOL))
col_set_str(pinfo->cinfo, COL_PROTOCOL, "VSPP Unknown");
}
if (check_col(pinfo->cinfo, COL_INFO))
col_add_fstr(pinfo->cinfo, COL_INFO,
"NS=%04x NR=%04x Window=%04x RID=%04x LID=%04x D=%04x S=%04x",
viph.vspp_seqno, viph.vspp_ack, viph.vspp_win,
viph.vspp_rmtid, viph.vspp_lclid, viph.vspp_dport,
viph.vspp_sport);
/*
iph.ip_tos = IPTOS_TOS(iph.ip_tos);
switch (iph.ip_tos) {
case IPTOS_NONE:
strcpy(tos_str, "None");
break;
case IPTOS_LOWDELAY:
strcpy(tos_str, "Minimize delay");
break;
case IPTOS_THROUGHPUT:
strcpy(tos_str, "Maximize throughput");
break;
case IPTOS_RELIABILITY:
strcpy(tos_str, "Maximize reliability");
break;
case IPTOS_LOWCOST:
strcpy(tos_str, "Minimize cost");
break;
default:
strcpy(tos_str, "Unknon. Malformed?");
break;
}
*/
if (tree) {
ti = proto_tree_add_item(tree, proto_vines_spp, tvb, offset,
sizeof(viph), FALSE);
vspp_tree = proto_item_add_subtree(ti, ett_vines_spp);
proto_tree_add_text(vspp_tree, tvb, offset, 2,
"Source port: 0x%04x", viph.vspp_sport);
proto_tree_add_text(vspp_tree, tvb, offset + 2, 2,
"Destination port: 0x%04x",
viph.vspp_dport);
proto_tree_add_text(vspp_tree, tvb, offset + 4, 1,
"Packet type: 0x%02x", viph.vspp_pkttype);
proto_tree_add_text(vspp_tree, tvb, offset + 5, 1,
"Control: 0x%02x", viph.vspp_control);
proto_tree_add_text(vspp_tree, tvb, offset + 6, 2,
"Local Connection ID: 0x%04x",
viph.vspp_lclid);
proto_tree_add_text(vspp_tree, tvb, offset + 8, 2,
"Remote Connection ID: 0x%04x",
viph.vspp_rmtid);
proto_tree_add_text(vspp_tree, tvb, offset + 10, 2,
"Sequence number: 0x%04x",
viph.vspp_seqno);
proto_tree_add_text(vspp_tree, tvb, offset + 12, 2,
"Ack number: 0x%04x", viph.vspp_ack);
proto_tree_add_text(vspp_tree, tvb, offset + 14, 2,
"Window: 0x%04x", viph.vspp_win);
}
offset += 16; /* sizeof SPP */
call_dissector(data_handle,tvb_new_subset(tvb, offset,-1,tvb_reported_length_remaining(tvb,offset)), pinfo, tree);
}
void
proto_register_vines_spp(void)
{
static gint *ett[] = {
&ett_vines_spp,
};
proto_vines_spp = proto_register_protocol("Banyan Vines SPP",
"Vines SPP", "vines_spp");
proto_register_subtree_array(ett, array_length(ett));
}
void
proto_reg_handoff_vines_spp(void)
{
dissector_handle_t vines_spp_handle;
vines_spp_handle = create_dissector_handle(dissect_vines_spp,
proto_vines_spp);
dissector_add("vines.proto", VIP_PROTO_SPP, vines_spp_handle);
}