forked from osmocom/wireshark
416 lines
13 KiB
C
416 lines
13 KiB
C
/* packet-trmac.c
|
|
* Routines for Token-Ring Media Access Control
|
|
* Gilbert Ramirez <gram@alumni.rice.edu>
|
|
*
|
|
* $Id: packet-trmac.c,v 1.39 2004/02/18 10:11:52 guy Exp $
|
|
*
|
|
* Ethereal - Network traffic analyzer
|
|
* By Gerald Combs <gerald@ethereal.com>
|
|
* 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
|
|
|
|
#include <string.h>
|
|
#include <glib.h>
|
|
#include <epan/packet.h>
|
|
#include "packet-frame.h"
|
|
|
|
static int proto_trmac = -1;
|
|
static int hf_trmac_mv = -1;
|
|
static int hf_trmac_length = -1;
|
|
static int hf_trmac_srcclass = -1;
|
|
static int hf_trmac_dstclass = -1;
|
|
static int hf_trmac_sv = -1;
|
|
static int hf_trmac_errors_iso = -1;
|
|
static int hf_trmac_errors_line = -1;
|
|
static int hf_trmac_errors_internal = -1;
|
|
static int hf_trmac_errors_burst = -1;
|
|
static int hf_trmac_errors_ac = -1;
|
|
static int hf_trmac_errors_abort = -1;
|
|
static int hf_trmac_errors_noniso = -1;
|
|
static int hf_trmac_errors_lost = -1;
|
|
static int hf_trmac_errors_congestion = -1;
|
|
static int hf_trmac_errors_fc = -1;
|
|
static int hf_trmac_errors_freq = -1;
|
|
static int hf_trmac_errors_token = -1;
|
|
static int hf_trmac_naun = -1;
|
|
|
|
static gint ett_tr_mac = -1;
|
|
static gint ett_tr_ierr_cnt = -1;
|
|
static gint ett_tr_nerr_cnt = -1;
|
|
|
|
/* Major Vector */
|
|
static value_string major_vector_vs[] = {
|
|
{ 0x00, "Response" },
|
|
{ 0x02, "Beacon" },
|
|
{ 0x03, "Claim Token" },
|
|
{ 0x04, "Ring Purge" },
|
|
{ 0x05, "Active Monitor Present" },
|
|
{ 0x06, "Standby Monitor Present" },
|
|
{ 0x07, "Duplicate Address Test" },
|
|
{ 0x09, "Transmit Forward" },
|
|
{ 0x0B, "Remove Ring Station" },
|
|
{ 0x0C, "Change Parameters" },
|
|
{ 0x0D, "Initialize Ring Station" },
|
|
{ 0x0E, "Request Ring Station Address" },
|
|
{ 0x0F, "Request Ring Station Address" },
|
|
{ 0x10, "Request Ring Station Attachments" },
|
|
{ 0x20, "Request Initialization" },
|
|
{ 0x22, "Report Ring Station Address" },
|
|
{ 0x23, "Report Ring Station State" },
|
|
{ 0x24, "Report Ring Station Attachments" },
|
|
{ 0x25, "Report New Active Monitor" },
|
|
{ 0x26, "Report NAUN Change" },
|
|
{ 0x27, "Report Poll Error" },
|
|
{ 0x28, "Report Monitor Errors" },
|
|
{ 0x29, "Report Error" },
|
|
{ 0x2A, "Report Transmit Forward" },
|
|
{ 0x00, NULL }
|
|
};
|
|
|
|
/* Src. and Dest. Classes */
|
|
static value_string classes_vs[] = {
|
|
{ 0x00, "Ring Station" },
|
|
{ 0x01, "LLC Manager" },
|
|
{ 0x04, "Configuration Report Server" },
|
|
{ 0x05, "Ring Parameter Server" },
|
|
{ 0x06, "Ring Error Monitor" },
|
|
{ 0x00, NULL }
|
|
};
|
|
|
|
|
|
/* Sub-vectors */
|
|
static int
|
|
sv_text(tvbuff_t *tvb, int svoff, proto_tree *tree)
|
|
{
|
|
int sv_length = tvb_get_guint8(tvb, svoff+0);
|
|
guint16 beacon_type, ring;
|
|
|
|
char *beacon[] = {"Recovery mode set", "Signal loss error",
|
|
"Streaming signal not Claim Token MAC frame",
|
|
"Streaming signal, Claim Token MAC frame"};
|
|
|
|
proto_tree *sv_tree;
|
|
proto_item *ti;
|
|
|
|
guchar errors[6]; /* isolating or non-isolating */
|
|
|
|
/* Check the SV length.
|
|
XXX - Should we do this in each case statement below, e.g. to force
|
|
an SV length of 6 for the NAUN address? */
|
|
if (sv_length < 1) {
|
|
proto_tree_add_protocol_format(tree, proto_malformed, tvb, svoff+0, 1,
|
|
"Invalid subvector length: %d bytes", sv_length);
|
|
return sv_length;
|
|
}
|
|
|
|
/* this just adds to the clutter on the screen...
|
|
proto_tree_add_text(tree, tvb, svoff, 1,
|
|
"Subvector Length: %d bytes", sv_length);*/
|
|
|
|
proto_tree_add_uint_hidden(tree, hf_trmac_sv, tvb, svoff+1, 1, tvb_get_guint8(tvb, svoff+1));
|
|
|
|
switch(tvb_get_guint8(tvb, svoff+1)) {
|
|
case 0x01: /* Beacon Type */
|
|
beacon_type = tvb_get_ntohs(tvb, svoff+2);
|
|
if (beacon_type < array_length(beacon)) {
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Beacon Type: %s", beacon[beacon_type] );
|
|
} else {
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Beacon Type: Illegal value: %d", beacon_type );
|
|
}
|
|
break;
|
|
|
|
case 0x02: /* NAUN */
|
|
proto_tree_add_ether(tree, hf_trmac_naun, tvb, svoff+1, sv_length-1,
|
|
tvb_get_ptr(tvb, svoff+2, 6));
|
|
break;
|
|
|
|
case 0x03: /* Local Ring Number */
|
|
ring = tvb_get_ntohs(tvb, svoff+2);
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Local Ring Number: 0x%04X (%d)", ring, ring);
|
|
break;
|
|
|
|
case 0x04: /* Assign Physical Location */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Assign Physical Location: 0x%08X", tvb_get_ntohl(tvb, svoff+2) );
|
|
break;
|
|
|
|
case 0x05: /* Soft Error Report Value */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Soft Error Report Value: %d ms", 10 * tvb_get_ntohs(tvb, svoff+2) );
|
|
break;
|
|
|
|
case 0x06: /* Enabled Function Classes */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Enabled Function Classes: %04X", tvb_get_ntohs(tvb, svoff+2) );
|
|
break;
|
|
|
|
case 0x07: /* Allowed Access Priority */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Allowed Access Priority: %04X", tvb_get_ntohs(tvb, svoff+2) );
|
|
break;
|
|
|
|
case 0x09: /* Correlator */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Correlator: %04X", tvb_get_ntohs(tvb, svoff+2) );
|
|
break;
|
|
|
|
case 0x0A: /* Address of last neighbor notification */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Address of Last Neighbor Notification: %s",
|
|
ether_to_str(tvb_get_ptr(tvb, svoff+2, 6)));
|
|
break;
|
|
|
|
case 0x0B: /* Physical Location */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Physical Location: 0x%08X", tvb_get_ntohl(tvb, svoff+2) );
|
|
break;
|
|
|
|
case 0x20: /* Response Code */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Response Code: 0x%04X 0x%04X", tvb_get_ntohl(tvb, svoff+2),
|
|
tvb_get_ntohl(tvb, svoff+4) );
|
|
break;
|
|
|
|
case 0x21: /* Reserved */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Reserved: 0x%04X", tvb_get_ntohs(tvb, svoff+2) );
|
|
break;
|
|
|
|
case 0x22: /* Product Instance ID */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Product Instance ID: ...");
|
|
break;
|
|
|
|
case 0x23: /* Ring Station Microcode Level */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Ring Station Microcode Level: ...");
|
|
break;
|
|
|
|
case 0x26: /* Wrap data */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Wrap Data: ... (%d bytes)", sv_length - 2);
|
|
break;
|
|
|
|
case 0x27: /* Frame Forward */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Frame Forward: ... (%d bytes)", sv_length - 2);
|
|
break;
|
|
|
|
case 0x29: /* Ring Station Status Subvector */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Ring Station Status Subvector: ...");
|
|
break;
|
|
|
|
case 0x2A: /* Transmit Status Code */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Transmit Status Code: %04X", tvb_get_ntohs(tvb, svoff+2) );
|
|
break;
|
|
|
|
case 0x2B: /* Group Address */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Group Address: %08X", tvb_get_ntohl(tvb, svoff+2) );
|
|
break;
|
|
|
|
case 0x2C: /* Functional Address */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Functional Address: %08X", tvb_get_ntohl(tvb, svoff+2) );
|
|
break;
|
|
|
|
case 0x2D: /* Isolating Error Counts */
|
|
memcpy(errors, tvb_get_ptr(tvb, svoff+2, 6), 6);
|
|
ti = proto_tree_add_uint(tree, hf_trmac_errors_iso, tvb, svoff+1, sv_length-1,
|
|
errors[0] + errors[1] + errors[2] + errors[3] + errors[4]);
|
|
sv_tree = proto_item_add_subtree(ti, ett_tr_ierr_cnt);
|
|
|
|
proto_tree_add_uint(sv_tree, hf_trmac_errors_line, tvb, svoff+2, 1, errors[0]);
|
|
proto_tree_add_uint(sv_tree, hf_trmac_errors_internal, tvb, svoff+3, 1, errors[1]);
|
|
proto_tree_add_uint(sv_tree, hf_trmac_errors_burst, tvb, svoff+4, 1, errors[2]);
|
|
proto_tree_add_uint(sv_tree, hf_trmac_errors_ac, tvb, svoff+5, 1, errors[3]);
|
|
proto_tree_add_uint(sv_tree, hf_trmac_errors_abort, tvb, svoff+6, 1, errors[4]);
|
|
|
|
break;
|
|
|
|
case 0x2E: /* Non-Isolating Error Counts */
|
|
memcpy(errors, tvb_get_ptr(tvb, svoff+2, 6), 6);
|
|
ti = proto_tree_add_uint(tree, hf_trmac_errors_noniso, tvb, svoff+1, sv_length-1,
|
|
errors[0] + errors[1] + errors[2] + errors[3] + errors[4]);
|
|
sv_tree = proto_item_add_subtree(ti, ett_tr_nerr_cnt);
|
|
|
|
proto_tree_add_uint(sv_tree, hf_trmac_errors_lost, tvb, svoff+2, 1, errors[0]);
|
|
proto_tree_add_uint(sv_tree, hf_trmac_errors_congestion, tvb, svoff+3, 1, errors[1]);
|
|
proto_tree_add_uint(sv_tree, hf_trmac_errors_fc, tvb, svoff+4, 1, errors[2]);
|
|
proto_tree_add_uint(sv_tree, hf_trmac_errors_freq, tvb, svoff+5, 1, errors[3]);
|
|
proto_tree_add_uint(sv_tree, hf_trmac_errors_token, tvb, svoff+6, 1, errors[4]);
|
|
break;
|
|
|
|
case 0x30: /* Error Code */
|
|
proto_tree_add_text(tree, tvb, svoff+1, sv_length-1,
|
|
"Error Code: %04X", tvb_get_ntohs(tvb, svoff+2) );
|
|
break;
|
|
|
|
default: /* Unknown */
|
|
proto_tree_add_text(tree, tvb, svoff+1, 1,
|
|
"Unknown Sub-Vector: 0x%02X", tvb_get_guint8(tvb, svoff+1));
|
|
}
|
|
return sv_length;
|
|
}
|
|
|
|
static void
|
|
dissect_trmac(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree)
|
|
{
|
|
proto_tree *mac_tree = NULL;
|
|
proto_item *ti;
|
|
int mv_length, sv_offset, sv_additional;
|
|
guint8 mv_val;
|
|
char *mv_text;
|
|
|
|
if (check_col(pinfo->cinfo, COL_PROTOCOL))
|
|
col_set_str(pinfo->cinfo, COL_PROTOCOL, "TR MAC");
|
|
if (check_col(pinfo->cinfo, COL_INFO))
|
|
col_clear(pinfo->cinfo, COL_INFO);
|
|
|
|
mv_val = tvb_get_guint8(tvb, 3);
|
|
|
|
/* Interpret the major vector */
|
|
mv_text = val_to_str(mv_val, major_vector_vs, "Unknown Major Vector: %u");
|
|
|
|
if (check_col(pinfo->cinfo, COL_INFO))
|
|
col_add_str(pinfo->cinfo, COL_INFO, mv_text);
|
|
|
|
if (tree) {
|
|
mv_length = tvb_get_ntohs(tvb, 0);
|
|
ti = proto_tree_add_item(tree, proto_trmac, tvb, 0, mv_length, FALSE);
|
|
mac_tree = proto_item_add_subtree(ti, ett_tr_mac);
|
|
|
|
proto_tree_add_uint(mac_tree, hf_trmac_mv, tvb, 3, 1, mv_val);
|
|
proto_tree_add_uint_format(mac_tree, hf_trmac_length, tvb, 0, 2, mv_length,
|
|
"Total Length: %d bytes", mv_length);
|
|
proto_tree_add_uint(mac_tree, hf_trmac_srcclass, tvb, 2, 1, tvb_get_guint8(tvb, 2) & 0x0f);
|
|
proto_tree_add_uint(mac_tree, hf_trmac_dstclass, tvb, 2, 1, tvb_get_guint8(tvb, 2) >> 4 );
|
|
|
|
/* interpret the subvectors */
|
|
sv_offset = 4;
|
|
while (sv_offset < mv_length) {
|
|
sv_additional = sv_text(tvb, sv_offset, mac_tree);
|
|
|
|
/* if this is a bad packet, we could get a 0-length added here,
|
|
* looping forever */
|
|
if (sv_additional > 0)
|
|
sv_offset += sv_additional;
|
|
else
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
void
|
|
proto_register_trmac(void)
|
|
{
|
|
static hf_register_info hf[] = {
|
|
{ &hf_trmac_mv,
|
|
{ "Major Vector", "trmac.mvec", FT_UINT8, BASE_HEX, major_vector_vs, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_length,
|
|
{ "Total Length", "trmac.length", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_srcclass,
|
|
{ "Source Class", "trmac.srcclass", FT_UINT8, BASE_HEX, classes_vs, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_dstclass,
|
|
{ "Destination Class", "trmac.dstclass", FT_UINT8, BASE_HEX, classes_vs, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_sv,
|
|
{ "Sub-Vector", "trmac.svec", FT_UINT8, BASE_HEX, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_errors_iso,
|
|
{ "Isolating Errors", "trmac.errors.iso", FT_UINT16, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_errors_line,
|
|
{ "Line Errors", "trmac.errors.line", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_errors_internal,
|
|
{ "Internal Errors", "trmac.errors.internal", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_errors_burst,
|
|
{ "Burst Errors", "trmac.errors.burst", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_errors_ac,
|
|
{ "A/C Errors", "trmac.errors.ac", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_errors_abort,
|
|
{ "Abort Delimiter Transmitted Errors", "trmac.errors.abort", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_errors_noniso,
|
|
{ "Non-Isolating Errors", "trmac.errors.noniso", FT_UINT16, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_errors_lost,
|
|
{ "Lost Frame Errors", "trmac.errors.lost", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_errors_congestion,
|
|
{ "Receiver Congestion Errors", "trmac.errors.congestion", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_errors_fc,
|
|
{ "Frame-Copied Errors", "trmac.errors.fc", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_errors_freq,
|
|
{ "Frequency Errors", "trmac.errors.freq", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_errors_token,
|
|
{ "Token Errors", "trmac.errors.token", FT_UINT8, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
|
|
{ &hf_trmac_naun,
|
|
{ "NAUN", "trmac.naun", FT_ETHER, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }},
|
|
};
|
|
static gint *ett[] = {
|
|
&ett_tr_mac,
|
|
&ett_tr_ierr_cnt,
|
|
&ett_tr_nerr_cnt,
|
|
};
|
|
|
|
proto_trmac = proto_register_protocol("Token-Ring Media Access Control",
|
|
"TR MAC", "trmac");
|
|
proto_register_field_array(proto_trmac, hf, array_length(hf));
|
|
proto_register_subtree_array(ett, array_length(ett));
|
|
|
|
register_dissector("trmac", dissect_trmac, proto_trmac);
|
|
}
|