/* packet-atm.c * Routines for ATM packet disassembly * * $Id: packet-atm.c,v 1.49 2002/08/28 21:00:07 jmayer Exp $ * * Ethereal - Network traffic analyzer * By Gerald Combs * 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 #include #include #include "oui.h" #include #include "packet-atm.h" #include "packet-snmp.h" #include "packet-eth.h" #include "packet-tr.h" #include "packet-llc.h" static int proto_atm = -1; static int hf_atm_vpi = -1; static int hf_atm_vci = -1; static int proto_atm_lane = -1; static int proto_ilmi = -1; static gint ett_atm = -1; static gint ett_atm_lane = -1; static gint ett_atm_lane_lc_lan_dest = -1; static gint ett_atm_lane_lc_lan_dest_rd = -1; static gint ett_atm_lane_lc_flags = -1; static gint ett_atm_lane_lc_tlv = -1; static gint ett_ilmi = -1; static dissector_handle_t eth_handle; static dissector_handle_t tr_handle; static dissector_handle_t llc_handle; static dissector_handle_t sscop_handle; static dissector_handle_t lane_handle; static dissector_handle_t ilmi_handle; static dissector_handle_t data_handle; /* * See * * http://www.atmforum.org/atmforum/specs/approved.html * * for a number of ATM Forum specifications, e.g. the LAN Emulation * over ATM 1.0 spec, whence I got most of this. */ /* LE Control opcodes */ #define LE_CONFIGURE_REQUEST 0x0001 #define LE_CONFIGURE_RESPONSE 0x0101 #define LE_JOIN_REQUEST 0x0002 #define LE_JOIN_RESPONSE 0x0102 #define READY_QUERY 0x0003 #define READY_IND 0x0103 #define LE_REGISTER_REQUEST 0x0004 #define LE_REGISTER_RESPONSE 0x0104 #define LE_UNREGISTER_REQUEST 0x0005 #define LE_UNREGISTER_RESPONSE 0x0105 #define LE_ARP_REQUEST 0x0006 #define LE_ARP_RESPONSE 0x0106 #define LE_FLUSH_REQUEST 0x0007 #define LE_FLUSH_RESPONSE 0x0107 #define LE_NARP_REQUEST 0x0008 #define LE_TOPOLOGY_REQUEST 0x0009 #define LE_VERIFY_REQUEST 0x000A #define LE_VERIFY_RESPONSE 0x010A static const value_string le_control_opcode_vals[] = { { LE_CONFIGURE_REQUEST, "LE_CONFIGURE_REQUEST" }, { LE_CONFIGURE_RESPONSE, "LE_CONFIGURE_RESPONSE" }, { LE_JOIN_REQUEST, "LE_JOIN_REQUEST" }, { LE_JOIN_RESPONSE, "LE_JOIN_RESPONSE" }, { READY_QUERY, "READY_QUERY" }, { READY_IND, "READY_IND" }, { LE_REGISTER_REQUEST, "LE_REGISTER_REQUEST" }, { LE_REGISTER_RESPONSE, "LE_REGISTER_RESPONSE" }, { LE_UNREGISTER_REQUEST, "LE_UNREGISTER_REQUEST" }, { LE_UNREGISTER_RESPONSE, "LE_UNREGISTER_RESPONSE" }, { LE_ARP_REQUEST, "LE_ARP_REQUEST" }, { LE_ARP_RESPONSE, "LE_ARP_RESPONSE" }, { LE_FLUSH_REQUEST, "LE_FLUSH_REQUEST" }, { LE_FLUSH_RESPONSE, "LE_FLUSH_RESPONSE" }, { LE_NARP_REQUEST, "LE_NARP_REQUEST" }, { LE_TOPOLOGY_REQUEST, "LE_TOPOLOGY_REQUEST" }, { LE_VERIFY_REQUEST, "LE_VERIFY_REQUEST" }, { LE_VERIFY_RESPONSE, "LE_VERIFY_RESPONSE" }, { 0, NULL } }; /* LE Control statuses */ static const value_string le_control_status_vals[] = { { 0, "Success" }, { 1, "Version not supported" }, { 2, "Invalid request parameters" }, { 4, "Duplicate LAN destination registration" }, { 5, "Duplicate ATM address" }, { 6, "Insufficient resources to grant request" }, { 7, "Access denied" }, { 8, "Invalid REQUESTOR-ID" }, { 9, "Invalid LAN destination" }, { 10, "Invalid ATM address" }, { 20, "No configuraton" }, { 21, "LE_CONFIGURE error" }, { 22, "Insufficient information" }, { 24, "TLV not found" }, { 0, NULL } }; /* LE Control LAN destination tags */ #define TAG_NOT_PRESENT 0x0000 #define TAG_MAC_ADDRESS 0x0001 #define TAG_ROUTE_DESCRIPTOR 0x0002 static const value_string le_control_landest_tag_vals[] = { { TAG_NOT_PRESENT, "Not present" }, { TAG_MAC_ADDRESS, "MAC address" }, { TAG_ROUTE_DESCRIPTOR, "Route descriptor" }, { 0, NULL } }; /* LE Control LAN types */ #define LANT_UNSPEC 0x00 #define LANT_802_3 0x01 #define LANT_802_5 0x02 static const value_string le_control_lan_type_vals[] = { { LANT_UNSPEC, "Unspecified" }, { LANT_802_3, "Ethernet/802.3" }, { LANT_802_5, "802.5" }, { 0, NULL } }; static const value_string le_control_frame_size_vals[] = { { 0x00, "Unspecified" }, { 0x01, "1516/1528/1580/1592" }, { 0x02, "4544/4556/1580/1592" }, { 0x03, "9234/9246" }, { 0x04, "18190/18202" }, { 0, NULL } }; static void dissect_le_client(tvbuff_t *tvb, proto_tree *tree) { proto_item *ti; proto_tree *lane_tree; if (tree) { ti = proto_tree_add_protocol_format(tree, proto_atm_lane, tvb, 0, 2, "ATM LANE"); lane_tree = proto_item_add_subtree(ti, ett_atm_lane); proto_tree_add_text(lane_tree, tvb, 0, 2, "LE Client: 0x%04X", tvb_get_ntohs(tvb, 0)); } } static void dissect_lan_destination(tvbuff_t *tvb, int offset, const char *type, proto_tree *tree) { proto_item *td; proto_tree *dest_tree; guint16 tag; proto_item *trd; proto_tree *rd_tree; guint16 route_descriptor; td = proto_tree_add_text(tree, tvb, offset, 8, "%s LAN destination", type); dest_tree = proto_item_add_subtree(td, ett_atm_lane_lc_lan_dest); tag = tvb_get_ntohs(tvb, offset); proto_tree_add_text(dest_tree, tvb, offset, 2, "Tag: %s", val_to_str(tag, le_control_landest_tag_vals, "Unknown (0x%04X)")); offset += 2; switch (tag) { case TAG_MAC_ADDRESS: proto_tree_add_text(dest_tree, tvb, offset, 6, "MAC address: %s", ether_to_str(tvb_get_ptr(tvb, offset, 6))); break; case TAG_ROUTE_DESCRIPTOR: offset += 4; route_descriptor = tvb_get_ntohs(tvb, offset); trd = proto_tree_add_text(dest_tree, tvb, offset, 2, "Route descriptor: 0x%02X", route_descriptor); rd_tree = proto_item_add_subtree(td, ett_atm_lane_lc_lan_dest_rd); proto_tree_add_text(rd_tree, tvb, offset, 2, decode_numeric_bitfield(route_descriptor, 0xFFF0, 2*8, "LAN ID = %u")); proto_tree_add_text(rd_tree, tvb, offset, 2, decode_numeric_bitfield(route_descriptor, 0x000F, 2*8, "Bridge number = %u")); break; } } /* * TLV values in LE Control frames. */ #define TLV_TYPE(oui, ident) (((oui) << 8) | (ident)) #define LE_CONTROL_TIMEOUT TLV_TYPE(OUI_ATM_FORUM, 0x01) #define LE_MAX_UNK_FRAME_COUNT TLV_TYPE(OUI_ATM_FORUM, 0x02) #define LE_MAX_UNK_FRAME_TIME TLV_TYPE(OUI_ATM_FORUM, 0x03) #define LE_VCC_TIMEOUT_PERIOD TLV_TYPE(OUI_ATM_FORUM, 0x04) #define LE_MAX_RETRY_COUNT TLV_TYPE(OUI_ATM_FORUM, 0x05) #define LE_AGING_TIME TLV_TYPE(OUI_ATM_FORUM, 0x06) #define LE_FORWARD_DELAY_TIME TLV_TYPE(OUI_ATM_FORUM, 0x07) #define LE_EXPECTED_ARP_RESPONSE_TIME TLV_TYPE(OUI_ATM_FORUM, 0x08) #define LE_FLUSH_TIMEOUT TLV_TYPE(OUI_ATM_FORUM, 0x09) #define LE_PATH_SWITCHING_DELAY TLV_TYPE(OUI_ATM_FORUM, 0x0A) #define LE_LOCAL_SEGMENT_ID TLV_TYPE(OUI_ATM_FORUM, 0x0B) #define LE_MCAST_SEND_VCC_TYPE TLV_TYPE(OUI_ATM_FORUM, 0x0C) #define LE_MCAST_SEND_VCC_AVGRATE TLV_TYPE(OUI_ATM_FORUM, 0x0D) #define LE_MCAST_SEND_VCC_PEAKRATE TLV_TYPE(OUI_ATM_FORUM, 0x0E) #define LE_CONN_COMPLETION_TIMER TLV_TYPE(OUI_ATM_FORUM, 0x0F) #define LE_CONFIG_FRAG_INFO TLV_TYPE(OUI_ATM_FORUM, 0x10) #define LE_LAYER_3_ADDRESS TLV_TYPE(OUI_ATM_FORUM, 0x11) #define LE_ELAN_ID TLV_TYPE(OUI_ATM_FORUM, 0x12) #define LE_SERVICE_CATEGORY TLV_TYPE(OUI_ATM_FORUM, 0x13) #define LE_LLC_MUXED_ATM_ADDRESS TLV_TYPE(OUI_ATM_FORUM, 0x2B) #define LE_X5_ADJUSTMENT TLV_TYPE(OUI_ATM_FORUM, 0x2C) #define LE_PREFERRED_LES TLV_TYPE(OUI_ATM_FORUM, 0x2D) static const value_string le_tlv_type_vals[] = { { LE_CONTROL_TIMEOUT, "Control Time-out" }, { LE_MAX_UNK_FRAME_COUNT, "Maximum Unknown Frame Count" }, { LE_MAX_UNK_FRAME_TIME, "Maximum Unknown Frame Time" }, { LE_VCC_TIMEOUT_PERIOD, "VCC Time-out" }, { LE_MAX_RETRY_COUNT, "Maximum Retry Count" }, { LE_AGING_TIME, "Aging Time" }, { LE_FORWARD_DELAY_TIME, "Forwarding Delay Time" }, { LE_EXPECTED_ARP_RESPONSE_TIME, "Expected LE_ARP Response Time" }, { LE_FLUSH_TIMEOUT, "Flush Time-out" }, { LE_PATH_SWITCHING_DELAY, "Path Switching Delay" }, { LE_LOCAL_SEGMENT_ID, "Local Segment ID" }, { LE_MCAST_SEND_VCC_TYPE, "Mcast Send VCC Type" }, { LE_MCAST_SEND_VCC_AVGRATE, "Mcast Send VCC AvgRate" }, { LE_MCAST_SEND_VCC_PEAKRATE, "Mcast Send VCC PeakRate" }, { LE_CONN_COMPLETION_TIMER, "Connection Completion Timer" }, { LE_CONFIG_FRAG_INFO, "Config Frag Info" }, { LE_LAYER_3_ADDRESS, "Layer 3 Address" }, { LE_ELAN_ID, "ELAN ID" }, { LE_SERVICE_CATEGORY, "Service Category" }, { LE_LLC_MUXED_ATM_ADDRESS, "LLC-muxed ATM Address" }, { LE_X5_ADJUSTMENT, "X5 Adjustment" }, { LE_PREFERRED_LES, "Preferred LES" }, { 0, NULL }, }; static void dissect_le_control_tlvs(tvbuff_t *tvb, int offset, guint num_tlvs, proto_tree *tree) { guint32 tlv_type; guint8 tlv_length; proto_item *ttlv; proto_tree *tlv_tree; while (num_tlvs != 0) { tlv_type = tvb_get_ntohl(tvb, offset); tlv_length = tvb_get_guint8(tvb, offset+4); ttlv = proto_tree_add_text(tree, tvb, offset, 5+tlv_length, "TLV type: %s", val_to_str(tlv_type, le_tlv_type_vals, "Unknown (0x%08x)")); tlv_tree = proto_item_add_subtree(ttlv, ett_atm_lane_lc_tlv); proto_tree_add_text(tlv_tree, tvb, offset, 4, "TLV Type: %s", val_to_str(tlv_type, le_tlv_type_vals, "Unknown (0x%08x)")); proto_tree_add_text(tlv_tree, tvb, offset+4, 1, "TLV Length: %u", tlv_length); offset += 5+tlv_length; num_tlvs--; } } static void dissect_le_configure_join_frame(tvbuff_t *tvb, int offset, proto_tree *tree) { guint8 num_tlvs; guint8 name_size; dissect_lan_destination(tvb, offset, "Source", tree); offset += 8; dissect_lan_destination(tvb, offset, "Target", tree); offset += 8; proto_tree_add_text(tree, tvb, offset, 20, "Source ATM Address: %s", tvb_bytes_to_str(tvb, offset, 20)); offset += 20; proto_tree_add_text(tree, tvb, offset, 1, "LAN type: %s", val_to_str(tvb_get_guint8(tvb, offset), le_control_lan_type_vals, "Unknown (0x%02X)")); offset += 1; proto_tree_add_text(tree, tvb, offset, 1, "Maximum frame size: %s", val_to_str(tvb_get_guint8(tvb, offset), le_control_frame_size_vals, "Unknown (0x%02X)")); offset += 1; num_tlvs = tvb_get_guint8(tvb, offset); proto_tree_add_text(tree, tvb, offset, 1, "Number of TLVs: %u", num_tlvs); offset += 1; name_size = tvb_get_guint8(tvb, offset); proto_tree_add_text(tree, tvb, offset, 1, "ELAN name size: %u", name_size); offset += 1; proto_tree_add_text(tree, tvb, offset, 20, "Target ATM Address: %s", tvb_bytes_to_str(tvb, offset, 20)); offset += 20; if (name_size > 32) name_size = 32; if (name_size != 0) { proto_tree_add_text(tree, tvb, offset, name_size, "ELAN name: %s", tvb_bytes_to_str(tvb, offset, name_size)); } offset += 32; dissect_le_control_tlvs(tvb, offset, num_tlvs, tree); } static void dissect_le_registration_frame(tvbuff_t *tvb, int offset, proto_tree *tree) { guint8 num_tlvs; dissect_lan_destination(tvb, offset, "Source", tree); offset += 8; dissect_lan_destination(tvb, offset, "Target", tree); offset += 8; proto_tree_add_text(tree, tvb, offset, 20, "Source ATM Address: %s", tvb_bytes_to_str(tvb, offset, 20)); offset += 20; /* Reserved */ offset += 2; num_tlvs = tvb_get_guint8(tvb, offset); proto_tree_add_text(tree, tvb, offset, 1, "Number of TLVs: %u", num_tlvs); offset += 1; /* Reserved */ offset += 53; dissect_le_control_tlvs(tvb, offset, num_tlvs, tree); } static void dissect_le_arp_frame(tvbuff_t *tvb, int offset, proto_tree *tree) { guint8 num_tlvs; dissect_lan_destination(tvb, offset, "Source", tree); offset += 8; dissect_lan_destination(tvb, offset, "Target", tree); offset += 8; proto_tree_add_text(tree, tvb, offset, 20, "Source ATM Address: %s", tvb_bytes_to_str(tvb, offset, 20)); offset += 20; /* Reserved */ offset += 2; num_tlvs = tvb_get_guint8(tvb, offset); proto_tree_add_text(tree, tvb, offset, 1, "Number of TLVs: %u", num_tlvs); offset += 1; /* Reserved */ offset += 1; proto_tree_add_text(tree, tvb, offset, 20, "Target ATM Address: %s", tvb_bytes_to_str(tvb, offset, 20)); offset += 20; /* Reserved */ offset += 32; dissect_le_control_tlvs(tvb, offset, num_tlvs, tree); } static void dissect_le_verify_frame(tvbuff_t *tvb, int offset, proto_tree *tree) { guint8 num_tlvs; /* Reserved */ offset += 38; num_tlvs = tvb_get_guint8(tvb, offset); proto_tree_add_text(tree, tvb, offset, 1, "Number of TLVs: %u", num_tlvs); offset += 1; /* Reserved */ offset += 1; proto_tree_add_text(tree, tvb, offset, 20, "Target ATM Address: %s", tvb_bytes_to_str(tvb, offset, 20)); offset += 20; /* Reserved */ offset += 32; dissect_le_control_tlvs(tvb, offset, num_tlvs, tree); } static void dissect_le_flush_frame(tvbuff_t *tvb, int offset, proto_tree *tree) { dissect_lan_destination(tvb, offset, "Source", tree); offset += 8; dissect_lan_destination(tvb, offset, "Target", tree); offset += 8; proto_tree_add_text(tree, tvb, offset, 20, "Source ATM Address: %s", tvb_bytes_to_str(tvb, offset, 20)); offset += 20; /* Reserved */ offset += 4; proto_tree_add_text(tree, tvb, offset, 20, "Target ATM Address: %s", tvb_bytes_to_str(tvb, offset, 20)); offset += 20; /* Reserved */ offset += 32; } static void dissect_le_control(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree) { proto_item *ti; proto_tree *lane_tree = NULL; int offset = 0; proto_item *tf; proto_tree *flags_tree; guint16 opcode; guint16 flags; if (check_col(pinfo->cinfo, COL_INFO)) col_set_str(pinfo->cinfo, COL_INFO, "LE Control"); if (tree) { ti = proto_tree_add_protocol_format(tree, proto_atm_lane, tvb, offset, 108, "ATM LANE"); lane_tree = proto_item_add_subtree(ti, ett_atm_lane); proto_tree_add_text(lane_tree, tvb, offset, 2, "Marker: 0x%04X", tvb_get_ntohs(tvb, offset)); } offset += 2; if (tree) { proto_tree_add_text(lane_tree, tvb, offset, 1, "Protocol: 0x%02X", tvb_get_guint8(tvb, offset)); } offset += 1; if (tree) { proto_tree_add_text(lane_tree, tvb, offset, 1, "Version: 0x%02X", tvb_get_guint8(tvb, offset)); } offset += 1; opcode = tvb_get_ntohs(tvb, offset); if (check_col(pinfo->cinfo, COL_INFO)) { col_append_fstr(pinfo->cinfo, COL_INFO, ": %s", val_to_str(opcode, le_control_opcode_vals, "Unknown opcode (0x%04X)")); } if (tree) { proto_tree_add_text(lane_tree, tvb, offset, 2, "Opcode: %s", val_to_str(opcode, le_control_opcode_vals, "Unknown (0x%04X)")); } offset += 2; if (opcode == READY_QUERY || opcode == READY_IND) { /* There's nothing more in this packet. */ return; } if (tree) { if (opcode & 0x0100) { /* Response; decode status. */ proto_tree_add_text(lane_tree, tvb, offset, 2, "Status: %s", val_to_str(tvb_get_ntohs(tvb, offset), le_control_status_vals, "Unknown (0x%04X)")); } offset += 2; proto_tree_add_text(lane_tree, tvb, offset, 4, "Transaction ID: 0x%08X", tvb_get_ntohl(tvb, offset)); offset += 4; proto_tree_add_text(lane_tree, tvb, offset, 2, "Requester LECID: 0x%04X", tvb_get_ntohs(tvb, offset)); offset += 2; flags = tvb_get_ntohs(tvb, offset); tf = proto_tree_add_text(lane_tree, tvb, offset, 2, "Flags: 0x%04X", flags); flags_tree = proto_item_add_subtree(tf, ett_atm_lane_lc_flags); switch (opcode) { case LE_CONFIGURE_REQUEST: case LE_CONFIGURE_RESPONSE: proto_tree_add_text(flags_tree, tvb, offset, 2, "%s", decode_boolean_bitfield(flags, 0x0002, 8*2, "V2 capable", "Not V2 capable")); offset += 2; dissect_le_configure_join_frame(tvb, offset, lane_tree); break; case LE_JOIN_REQUEST: case LE_JOIN_RESPONSE: proto_tree_add_text(flags_tree, tvb, offset, 2, "%s", decode_boolean_bitfield(flags, 0x0002, 8*2, "V2 capable", "Not V2 capable")); if (opcode == LE_JOIN_REQUEST) { proto_tree_add_text(flags_tree, tvb, offset, 2, "%s", decode_boolean_bitfield(flags, 0x0004, 8*2, "Selective multicast", "No selective multicast")); } else { proto_tree_add_text(flags_tree, tvb, offset, 2, "%s", decode_boolean_bitfield(flags, 0x0008, 8*2, "V2 required", "V2 not required")); } proto_tree_add_text(flags_tree, tvb, offset, 2, "%s", decode_boolean_bitfield(flags, 0x0080, 8*2, "Proxy", "Not proxy")); proto_tree_add_text(flags_tree, tvb, offset, 2, "%s", decode_boolean_bitfield(flags, 0x0200, 8*2, "Exclude explorer frames", "Don't exclude explorer frames")); offset += 2; dissect_le_configure_join_frame(tvb, offset, lane_tree); break; case LE_REGISTER_REQUEST: case LE_REGISTER_RESPONSE: case LE_UNREGISTER_REQUEST: case LE_UNREGISTER_RESPONSE: offset += 2; dissect_le_registration_frame(tvb, offset, lane_tree); break; case LE_ARP_REQUEST: case LE_ARP_RESPONSE: case LE_NARP_REQUEST: if (opcode != LE_NARP_REQUEST) { proto_tree_add_text(flags_tree, tvb, offset, 2, "%s", decode_boolean_bitfield(flags, 0x0001, 8*2, "Remote address", "Local address")); } offset += 2; dissect_le_arp_frame(tvb, offset, lane_tree); break; case LE_TOPOLOGY_REQUEST: proto_tree_add_text(flags_tree, tvb, offset, 2, "%s", decode_boolean_bitfield(flags, 0x0100, 8*2, "Topology change", "No topology change")); offset += 2; /* 92 reserved bytes */ break; case LE_VERIFY_REQUEST: case LE_VERIFY_RESPONSE: offset += 2; dissect_le_verify_frame(tvb, offset, lane_tree); break; case LE_FLUSH_REQUEST: case LE_FLUSH_RESPONSE: offset += 2; dissect_le_flush_frame(tvb, offset, lane_tree); break; } } } static void capture_lane(const union wtap_pseudo_header *pseudo_header, const guchar *pd, int len, packet_counts *ld) { /* Is it LE Control, 802.3, 802.5, or "none of the above"? */ switch (pseudo_header->atm.subtype) { case TRAF_ST_LANE_802_3: case TRAF_ST_LANE_802_3_MC: /* Dissect as Ethernet */ capture_eth(pd, 2, len, ld); break; case TRAF_ST_LANE_802_5: case TRAF_ST_LANE_802_5_MC: /* Dissect as Token-Ring */ capture_tr(pd, 2, len, ld); break; default: ld->other++; break; } } static void dissect_lane(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree) { tvbuff_t *next_tvb; tvbuff_t *next_tvb_le_client; if (check_col(pinfo->cinfo, COL_PROTOCOL)) col_set_str(pinfo->cinfo, COL_PROTOCOL, "ATM LANE"); /* Is it LE Control, 802.3, 802.5, or "none of the above"? */ switch (pinfo->pseudo_header->atm.subtype) { case TRAF_ST_LANE_LE_CTRL: dissect_le_control(tvb, pinfo, tree); break; case TRAF_ST_LANE_802_3: case TRAF_ST_LANE_802_3_MC: if (check_col(pinfo->cinfo, COL_INFO)) col_set_str(pinfo->cinfo, COL_INFO, "LE Client - Ethernet/802.3"); dissect_le_client(tvb, tree); /* Dissect as Ethernet */ next_tvb_le_client = tvb_new_subset(tvb, 2, -1, -1); call_dissector(eth_handle, next_tvb_le_client, pinfo, tree); break; case TRAF_ST_LANE_802_5: case TRAF_ST_LANE_802_5_MC: if (check_col(pinfo->cinfo, COL_INFO)) col_set_str(pinfo->cinfo, COL_INFO, "LE Client - 802.5"); dissect_le_client(tvb, tree); /* Dissect as Token-Ring */ next_tvb_le_client = tvb_new_subset(tvb, 2, -1, -1); call_dissector(tr_handle, next_tvb_le_client, pinfo, tree); break; default: /* Dump it as raw data. */ if (check_col(pinfo->cinfo, COL_INFO)) col_set_str(pinfo->cinfo, COL_INFO, "Unknown LANE traffic type"); next_tvb = tvb_new_subset(tvb, 0, -1, -1); call_dissector(data_handle,next_tvb, pinfo, tree); break; } } static void dissect_ilmi(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree) { dissect_snmp_pdu(tvb, 0, pinfo, tree, "ILMI", proto_ilmi, ett_ilmi); } /* AAL types */ static const value_string aal_vals[] = { { AAL_UNKNOWN, "Unknown AAL" }, { AAL_1, "AAL1" }, { AAL_2, "AAL2" }, { AAL_3_4, "AAL3/4" }, { AAL_5, "AAL5" }, { AAL_USER, "User AAL" }, { AAL_SIGNALLING, "Signalling AAL" }, { AAL_OAMCELL, "OAM cell" }, { 0, NULL } }; /* AAL5 higher-level traffic types */ static const value_string aal5_hltype_vals[] = { { TRAF_UNKNOWN, "Unknown traffic type" }, { TRAF_LLCMX, "LLC multiplexed" }, { TRAF_VCMX, "VC multiplexed" }, { TRAF_LANE, "LANE" }, { TRAF_ILMI, "ILMI" }, { TRAF_FR, "Frame Relay" }, { TRAF_SPANS, "FORE SPANS" }, { TRAF_IPSILON, "Ipsilon" }, { 0, NULL } }; /* Traffic subtypes for VC multiplexed traffic */ static const value_string vcmx_type_vals[] = { { TRAF_ST_UNKNOWN, "Unknown VC multiplexed traffic type" }, { TRAF_ST_VCMX_802_3_FCS, "802.3 FCS" }, { TRAF_ST_VCMX_802_4_FCS, "802.4 FCS" }, { TRAF_ST_VCMX_802_5_FCS, "802.5 FCS" }, { TRAF_ST_VCMX_FDDI_FCS, "FDDI FCS" }, { TRAF_ST_VCMX_802_6_FCS, "802.6 FCS" }, { TRAF_ST_VCMX_802_3, "802.3" }, { TRAF_ST_VCMX_802_4, "802.4" }, { TRAF_ST_VCMX_802_5, "802.5" }, { TRAF_ST_VCMX_FDDI, "FDDI" }, { TRAF_ST_VCMX_802_6, "802.6" }, { TRAF_ST_VCMX_FRAGMENTS, "Fragments" }, { TRAF_ST_VCMX_BPDU, "BPDU" }, { 0, NULL } }; /* Traffic subtypes for LANE traffic */ static const value_string lane_type_vals[] = { { TRAF_ST_UNKNOWN, "Unknown LANE traffic type" }, { TRAF_ST_LANE_LE_CTRL, "LE Control" }, { TRAF_ST_LANE_802_3, "802.3" }, { TRAF_ST_LANE_802_5, "802.5" }, { TRAF_ST_LANE_802_3_MC, "802.3 multicast" }, { TRAF_ST_LANE_802_5_MC, "802.5 multicast" }, { 0, NULL } }; /* Traffic subtypes for Ipsilon traffic */ static const value_string ipsilon_type_vals[] = { { TRAF_ST_UNKNOWN, "Unknown Ipsilon traffic type" }, { TRAF_ST_IPSILON_FT0, "Flow type 0" }, { TRAF_ST_IPSILON_FT1, "Flow type 1" }, { TRAF_ST_IPSILON_FT2, "Flow type 2" }, { 0, NULL } }; void capture_atm(const union wtap_pseudo_header *pseudo_header, const guchar *pd, int len, packet_counts *ld) { if (pseudo_header->atm.aal == AAL_5) { switch (pseudo_header->atm.type) { case TRAF_LLCMX: /* Dissect as WTAP_ENCAP_ATM_RFC1483 */ /* The ATM iptrace capture that we have shows LLC at this point, * so that's what I'm calling */ capture_llc(pd, 0, len, ld); break; case TRAF_LANE: capture_lane(pseudo_header, pd, len, ld); break; default: ld->other++; break; } } else ld->other++; } static void dissect_atm(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree) { proto_tree *atm_tree; proto_item *ti; if (check_col(pinfo->cinfo, COL_PROTOCOL)) col_set_str(pinfo->cinfo, COL_PROTOCOL, "ATM"); switch (pinfo->pseudo_header->atm.channel) { case 0: /* Traffic from DCE to DTE. */ if (check_col(pinfo->cinfo, COL_RES_DL_DST)) col_set_str(pinfo->cinfo, COL_RES_DL_DST, "DTE"); if (check_col(pinfo->cinfo, COL_RES_DL_SRC)) col_set_str(pinfo->cinfo, COL_RES_DL_SRC, "DCE"); break; case 1: /* Traffic from DTE to DCE. */ if (check_col(pinfo->cinfo, COL_RES_DL_DST)) col_set_str(pinfo->cinfo, COL_RES_DL_DST, "DCE"); if (check_col(pinfo->cinfo, COL_RES_DL_SRC)) col_set_str(pinfo->cinfo, COL_RES_DL_SRC, "DTE"); break; } if (check_col(pinfo->cinfo, COL_INFO)) { if (pinfo->pseudo_header->atm.aal == AAL_5) { col_add_fstr(pinfo->cinfo, COL_INFO, "AAL5 %s", val_to_str(pinfo->pseudo_header->atm.type, aal5_hltype_vals, "Unknown traffic type (%u)")); } else { col_add_str(pinfo->cinfo, COL_INFO, val_to_str(pinfo->pseudo_header->atm.aal, aal_vals, "Unknown AAL (%u)")); } } if (tree) { ti = proto_tree_add_protocol_format(tree, proto_atm, tvb, 0, 0, "ATM"); atm_tree = proto_item_add_subtree(ti, ett_atm); proto_tree_add_text(atm_tree, tvb, 0, 0, "AAL: %s", val_to_str(pinfo->pseudo_header->atm.aal, aal_vals, "Unknown AAL (%u)")); if (pinfo->pseudo_header->atm.aal == AAL_5) { proto_tree_add_text(atm_tree, tvb, 0, 0, "Traffic type: %s", val_to_str(pinfo->pseudo_header->atm.type, aal5_hltype_vals, "Unknown AAL5 traffic type (%u)")); switch (pinfo->pseudo_header->atm.type) { case TRAF_VCMX: proto_tree_add_text(atm_tree, tvb, 0, 0, "VC multiplexed traffic type: %s", val_to_str(pinfo->pseudo_header->atm.subtype, vcmx_type_vals, "Unknown VCMX traffic type (%u)")); break; case TRAF_LANE: proto_tree_add_text(atm_tree, tvb, 0, 0, "LANE traffic type: %s", val_to_str(pinfo->pseudo_header->atm.subtype, lane_type_vals, "Unknown LANE traffic type (%u)")); break; case TRAF_IPSILON: proto_tree_add_text(atm_tree, tvb, 0, 0, "Ipsilon traffic type: %s", val_to_str(pinfo->pseudo_header->atm.subtype, ipsilon_type_vals, "Unknown Ipsilon traffic type (%u)")); break; } } proto_tree_add_uint(atm_tree, hf_atm_vpi, tvb, 0, 0, pinfo->pseudo_header->atm.vpi); proto_tree_add_uint(atm_tree, hf_atm_vci, tvb, 0, 0, pinfo->pseudo_header->atm.vci); switch (pinfo->pseudo_header->atm.channel) { case 0: /* Traffic from DCE to DTE. */ proto_tree_add_text(atm_tree, tvb, 0, 0, "Channel: DCE->DTE"); break; case 1: /* Traffic from DTE to DCE. */ proto_tree_add_text(atm_tree, tvb, 0, 0, "Channel: DTE->DCE"); break; default: /* Sniffers shouldn't provide anything other than 0 or 1. */ proto_tree_add_text(atm_tree, tvb, 0, 0, "Channel: %u", pinfo->pseudo_header->atm.channel); break; } if (pinfo->pseudo_header->atm.cells != 0) { /* * If the cell count is 0, assume it means we don't know how * many cells it was. * * XXX - also, if this is AAL5 traffic, assume it means we don't * know what was in the AAL5 trailer. We may, however, find * some capture program that can give us the AAL5 trailer * information but not the cell count, in which case we need * some other way of indicating whether we have the AAL5 trailer * information. */ proto_tree_add_text(atm_tree, tvb, 0, 0, "Cells: %u", pinfo->pseudo_header->atm.cells); if (pinfo->pseudo_header->atm.aal == AAL_5) { proto_tree_add_text(atm_tree, tvb, 0, 0, "AAL5 U2U: %u", pinfo->pseudo_header->atm.aal5t_u2u); proto_tree_add_text(atm_tree, tvb, 0, 0, "AAL5 len: %u", pinfo->pseudo_header->atm.aal5t_len); proto_tree_add_text(atm_tree, tvb, 0, 0, "AAL5 checksum: 0x%08X", pinfo->pseudo_header->atm.aal5t_chksum); } } } switch (pinfo->pseudo_header->atm.aal) { case AAL_SIGNALLING: call_dissector(sscop_handle, tvb, pinfo, tree); break; case AAL_5: switch (pinfo->pseudo_header->atm.type) { case TRAF_LLCMX: /* Dissect as WTAP_ENCAP_ATM_RFC1483 */ /* The ATM iptrace capture that we have shows LLC at this point, * so that's what I'm calling */ call_dissector(llc_handle, tvb, pinfo, tree); break; case TRAF_LANE: call_dissector(lane_handle, tvb, pinfo, tree); break; case TRAF_ILMI: call_dissector(ilmi_handle, tvb, pinfo, tree); break; default: if (tree) { /* Dump it as raw data. */ call_dissector(data_handle,tvb, pinfo, tree); break; } } break; default: if (tree) { /* Dump it as raw data. (Is this a single cell?) */ call_dissector(data_handle,tvb, pinfo, tree); } break; } } void proto_register_atm(void) { static hf_register_info hf[] = { { &hf_atm_vpi, { "VPI", "atm.vpi", FT_UINT8, BASE_DEC, NULL, 0x0, "", HFILL }}, { &hf_atm_vci, { "VCI", "atm.vci", FT_UINT16, BASE_DEC, NULL, 0x0, "", HFILL }}, }; static gint *ett[] = { &ett_atm, &ett_ilmi, &ett_atm_lane, &ett_atm_lane_lc_lan_dest, &ett_atm_lane_lc_lan_dest_rd, &ett_atm_lane_lc_flags, &ett_atm_lane_lc_tlv, }; proto_atm = proto_register_protocol("ATM", "ATM", "atm"); proto_register_field_array(proto_atm, hf, array_length(hf)); proto_register_subtree_array(ett, array_length(ett)); proto_ilmi = proto_register_protocol("ILMI", "ILMI", "ilmi"); register_dissector("ilmi", dissect_ilmi, proto_ilmi); proto_atm_lane = proto_register_protocol("ATM LAN Emulation", "ATM LANE", "lane"); register_dissector("lane", dissect_lane, proto_atm_lane); } void proto_reg_handoff_atm(void) { dissector_handle_t atm_handle; /* * Get handles for the Ethernet, Token Ring, LLC, SSCOP, LANE, * and ILMI dissectors. */ eth_handle = find_dissector("eth"); tr_handle = find_dissector("tr"); llc_handle = find_dissector("llc"); sscop_handle = find_dissector("sscop"); lane_handle = find_dissector("lane"); ilmi_handle = find_dissector("ilmi"); data_handle = find_dissector("data"); atm_handle = create_dissector_handle(dissect_atm, proto_atm); dissector_add("wtap_encap", WTAP_ENCAP_ATM_SNIFFER, atm_handle); }