diff options
Diffstat (limited to 'packet-lmi.c')
-rw-r--r-- | packet-lmi.c | 254 |
1 files changed, 254 insertions, 0 deletions
diff --git a/packet-lmi.c b/packet-lmi.c new file mode 100644 index 0000000000..a2841b24f7 --- /dev/null +++ b/packet-lmi.c @@ -0,0 +1,254 @@ +/* packet-lmi.c + * Routines for Frame Relay Local Management Interface (LMI) disassembly + * Copyright 2001, Jeffrey C. Foster <jfoste@woodward.com> + * + * $Id: packet-lmi.c,v 1.1 2001/03/23 19:22:02 jfoster Exp $ + * + * Ethereal - Network traffic analyzer + * By Gerald Combs <gerald@zing.org> + * Copyright 1998 + * + * + * 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. + * + * ToDo: + * + * References: + * + * http://www.techfest.com/networking/wan/frrel.htm + * http://www.frforum.com/5000/frf1_2.pdf + * http://www.cisco.com/univercd/cc/td/doc/cisintwk/ito_doc/frame.htm#xtocid125314 + * http://www.net.aapt.com.au/techref/lmimess.htm + * http://www.raleigh.ibm.com:80/cgi-bin/bookmgr/BOOKS/EZ305800/1.2.4.4 + */ + + +#ifdef HAVE_CONFIG_H +# include "config.h" +#endif + +#ifdef HAVE_SYS_TYPES_H +# include <sys/types.h> +#endif + +#include <stdio.h> +#include <glib.h> +#include <string.h> +#include "packet.h" +#include "packet-osi.h" + + +static int proto_lmi = -1; +static int hf_lmi_call_ref = -1; +static int hf_lmi_msg_type = -1; +static int hf_lmi_inf_ele = -1; +static int hf_lmi_inf_len = -1; + +static int hf_lmi_rcd_type = -1; +static int hf_lmi_send_seq = -1; +static int hf_lmi_recv_seq = -1; +static int hf_lmi_dlci_high = -1; +static int hf_lmi_dlci_low = -1; +static int hf_lmi_new = -1; +static int hf_lmi_act = -1; + +static gint ett_lmi = -1; +static gint ett_lmi_ele = -1; + +#define NLPID_LMI 0x09 /* NLPID value for LMI */ + +#ifdef _OLD_ +/* + * Bits in the address field. + */ +#define LMI_CMD 0xf000 /* LMI Command */ +#define LMI_SEQ 0x0fff /* LMI Sequence number */ + +#endif + +static const value_string msg_type_str[] = { + {0x75, "Status Enquiry"}, + {0x7D, "Status"}, + { 0, NULL } + }; + +static const value_string element_type_str[] = { + +/*** These are the ANSI values ***/ + {0x01, "Report"}, + {0x03, "Keep Alive"}, + {0x07, "PVC Status"}, + +/*** These are the ITU values ***/ + {0x51, "Report"}, + {0x53, "Keep Alive"}, + {0x07, "PVC Status"}, + + { 0, NULL } + }; + +static const value_string record_type_str[] = { + {0x00, "Full Status"}, + {0x01, "Link Integrity Verification Only"}, + {0x02, "Single PVC"}, + { 0, NULL } + }; + +static const value_string pvc_status_new_str[] = { + {0x00, "PVC already present"}, + {0x01, "PVC is new"}, + { 0, NULL } + }; + +static const value_string pvc_status_act_str[] = { + {0x00, "PVC is Inactive"}, + {0x01, "PVC is Acive"}, + { 0, NULL } + }; + +static void +dissect_lmi_report_type(tvbuff_t *tvb, int offset, proto_tree *tree) +{ + proto_tree_add_uint(tree, hf_lmi_rcd_type, tvb, offset, 1, tvb_get_guint8( tvb, offset)); +} + +static void +dissect_lmi_link_int(tvbuff_t *tvb, int offset, proto_tree *tree) +{ + proto_tree_add_uint(tree, hf_lmi_send_seq, tvb, offset, 1, tvb_get_guint8( tvb, offset)); + ++offset; + proto_tree_add_uint(tree, hf_lmi_recv_seq, tvb, offset, 0, tvb_get_guint8( tvb, offset)); + +} + +static void +dissect_lmi_pvc_status(tvbuff_t *tvb, int offset, proto_tree *tree) +{ + proto_tree_add_uint(tree, hf_lmi_dlci_high, tvb, offset, 1, tvb_get_guint8( tvb, offset)); + ++offset; + proto_tree_add_uint(tree, hf_lmi_dlci_low, tvb, offset, 1, tvb_get_guint8( tvb, offset)); + ++offset; + proto_tree_add_uint(tree, hf_lmi_new, tvb, offset, 1, tvb_get_guint8( tvb, offset)); + proto_tree_add_uint(tree, hf_lmi_act, tvb, offset, 1, tvb_get_guint8( tvb, offset)); +} + +static void +dissect_lmi(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree) +{ + proto_tree *lmi_tree, *lmi_subtree; + proto_item *ti; + int offset = 2, len; + guint8 ele_id; + + if (check_col(pinfo->fd, COL_PROTOCOL)) + col_set_str(pinfo->fd, COL_PROTOCOL, "LMI"); + + if (tree) { + ti = proto_tree_add_item(tree, proto_lmi, tvb, 0, 3, FALSE); + lmi_tree = proto_item_add_subtree(ti, ett_lmi_ele); + + proto_tree_add_uint(lmi_tree, hf_lmi_call_ref, tvb, 0, 1, tvb_get_guint8( tvb, 0)); + proto_tree_add_uint(lmi_tree, hf_lmi_msg_type, tvb, 1, 1, tvb_get_guint8( tvb, 1)); + + /* Display the LMI elements */ + while( offset < tvb_length( tvb)){ + ele_id = tvb_get_guint8( tvb, offset); + len = tvb_get_guint8( tvb, offset + 1); + + ti = proto_tree_add_uint(lmi_tree, hf_lmi_inf_ele, tvb, offset, len + 2, + tvb_get_guint8( tvb, offset)); + + lmi_subtree = proto_item_add_subtree(ti, ett_lmi_ele); + + proto_tree_add_uint(lmi_subtree, hf_lmi_inf_ele, tvb, offset, 1, + tvb_get_guint8( tvb, offset)); + ++offset; + len = tvb_get_guint8( tvb, offset); + proto_tree_add_uint(lmi_subtree, hf_lmi_inf_len, tvb, offset, 1, len); + ++offset; + if (( ele_id == 1) || (ele_id == 51)) + dissect_lmi_report_type( tvb, offset, lmi_subtree); + else if (( ele_id == 3) || (ele_id == 53)) + dissect_lmi_link_int( tvb, offset, lmi_subtree); + else if (( ele_id == 7) || (ele_id == 57)) + dissect_lmi_pvc_status( tvb, offset, lmi_subtree); + offset += len; + } + } + else { + lmi_tree = NULL; + } +} + + +void +proto_register_lmi(void) +{ + static hf_register_info hf[] = { + { &hf_lmi_call_ref, + { "Call reference", "lmi.cmd", FT_UINT8, BASE_HEX, NULL, 0, + "Call Reference" }}, + + { &hf_lmi_msg_type, + { "Message Type", "lmi.msg_type", FT_UINT8, BASE_HEX, VALS(msg_type_str), 0, + "Message Type" }}, + + { &hf_lmi_inf_ele, + { "Information Element", "lmi.inf_ele", FT_UINT8, BASE_DEC, VALS(element_type_str), 0, + "Information Element" }}, + { &hf_lmi_inf_ele, + { "Type", "lmi.inf_ele_type", FT_UINT8, BASE_DEC, VALS(element_type_str), 0, + "Information Element Type" }}, + { &hf_lmi_inf_len, + { "Length", "lmi.inf_ele_len", FT_UINT8, BASE_DEC, NULL, 0, + "Information Element Length" }}, + + { &hf_lmi_rcd_type, + { "Record Type", "lmi.ele_rcd_type", FT_UINT8, BASE_DEC, VALS(record_type_str), 0, + "Record Type" }}, + { &hf_lmi_send_seq, + { "Send Seq", "lmi.send_seq", FT_UINT8, BASE_DEC, NULL, 0, + "Send Sequence" }}, + { &hf_lmi_recv_seq, + { "Recv Seq", "lmi.recv_seq", FT_UINT8, BASE_DEC, NULL, 0, + "Receive Sequence" }}, + { &hf_lmi_dlci_high, + { "DLCI High", "lmi.dlci_hi", FT_UINT8, BASE_DEC, NULL, 0x3f, + "DLCI High bits" }}, + { &hf_lmi_dlci_low, + { "DLCI Low", "lmi.dlci_low", FT_UINT8, BASE_DEC, NULL, 0x78, + "DLCI Low bits" }}, + { &hf_lmi_new, + { "DLCI New", "lmi.dlci_new", FT_UINT8, BASE_DEC, VALS(pvc_status_new_str), 0x08, + "DLCI New Flag" }}, + { &hf_lmi_act, + { "DLCI Active","lmi.dlci_act", FT_UINT8, BASE_DEC, VALS(pvc_status_act_str), 0x02, + "DLCI Active Flag" }}, + }; + static gint *ett[] = { + &ett_lmi, + &ett_lmi_ele, + }; + proto_lmi = proto_register_protocol ("Local Management Interface", "LMI", "lmi"); + proto_register_field_array (proto_lmi, hf, array_length(hf)); + proto_register_subtree_array(ett, array_length(ett)); + +} + +void +proto_reg_handoff_lmi(void) +{ + dissector_add("fr.ietf", NLPID_LMI, dissect_lmi, proto_lmi); +} |