forked from osmocom/wireshark
![Jörg Mayer](/assets/img/avatar_default.png)
winapi_cleanup tool written by Patrik Stridvall for the wine project. svn path=/trunk/; revision=6117
475 lines
14 KiB
C
475 lines
14 KiB
C
/* packet-vines.c
|
|
* Routines for Banyan VINES protocol packet disassembly
|
|
*
|
|
* $Id: packet-vines.c,v 1.43 2002/08/28 21:00:36 jmayer 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
|
|
|
|
#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(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 = g_ntohs(viph.vip_chksum);
|
|
viph.vip_pktlen = g_ntohs(viph.vip_pktlen);
|
|
viph.vip_dnet = g_ntohl(viph.vip_dnet);
|
|
viph.vip_dsub = g_ntohs(viph.vip_dsub);
|
|
viph.vip_snet = g_ntohl(viph.vip_snet);
|
|
viph.vip_ssub = g_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 = g_ntohs(viph.vspp_sport);
|
|
viph.vspp_dport = g_ntohs(viph.vspp_dport);
|
|
viph.vspp_lclid = g_ntohs(viph.vspp_lclid);
|
|
viph.vspp_rmtid = g_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, -1),
|
|
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);
|
|
}
|