/* packet-mtp3.c * Routines for Message Transfer Part Level 3 dissection * Copyright 2001, Michael Tuexen * * $Id: packet-mtp3.c,v 1.5 2001/07/07 09:06:40 guy Exp $ * * Ethereal - Network traffic analyzer * By Gerald Combs * Copyright 1998 Gerald Combs * * Copied from README.developer * * 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 #ifdef HAVE_SYS_TYPES_H # include #endif #ifdef HAVE_NETINET_IN_H # include #endif #include #include "packet.h" #include "prefs.h" /* Initialize the protocol and registered fields */ static int proto_mtp3 = -1; static module_t *mtp3_module; static int hf_mtp3_service_indicator = -1; static int hf_mtp3_network_indicator = -1; static int hf_mtp3_itu_spare = -1; static int hf_mtp3_ansi_priority = -1; static int hf_mtp3_itu_opc = -1; static int hf_mtp3_opc_network = -1; static int hf_mtp3_opc_cluster = -1; static int hf_mtp3_opc_member = -1; static int hf_mtp3_itu_dpc = -1; static int hf_mtp3_dpc_network = -1; static int hf_mtp3_dpc_cluster = -1; static int hf_mtp3_dpc_member = -1; static int hf_mtp3_itu_sls = -1; static int hf_mtp3_ansi_sls = -1; /* Initialize the subtree pointers */ static gint ett_mtp3 = -1; static gint ett_mtp3_sio = -1; static gint ett_mtp3_label = -1; static gint ett_mtp3_label_dpc = -1; static gint ett_mtp3_label_opc = -1; static dissector_table_t mtp3_sio_dissector_table; #define ITU_STANDARD 1 #define ANSI_STANDARD 2 static gint mtp3_standard = ITU_STANDARD; #define SIO_OFFSET 0 #define SIO_LENGTH 1 #define ITU_ROUTING_LABEL_OFFSET 1 #define ITU_ROUTING_LABEL_LENGTH 4 #define ITU_SLS_OFFSET 1 #define ITU_SLS_LENGTH 1 #define ITU_MTP_PAYLOAD_OFFSET 5 #define ANSI_ROUTING_LABEL_OFFSET 1 #define ANSI_ROUTING_LABEL_LENGTH 7 #define ANSI_MTP_PAYLOAD_OFFSET 8 #define ANSI_DPC_OFFSET 1 #define ANSI_DPC_LENGTH 3 #define ANSI_OPC_OFFSET 4 #define ANSI_OPC_LENGTH 3 #define ANSI_SLS_OFFSET 7 #define ANSI_SLS_LENGTH 1 #define ANSI_NCM_LENGTH 3 #define ANSI_DPC_OFFSET 1 #define ANSI_OPC_OFFSET 4 #define SERVICE_INDICATOR_MASK 0x0F #define SPARE_MASK 0x30 #define ANSI_PRIORITY_MASK SPARE_MASK #define NETWORK_INDICATOR_MASK 0xC0 #define ITU_DPC_MASK 0x00003FFF #define ITU_OPC_MASK 0x0FFFC000 #define ITU_SLS_MASK 0xF0000000 #define ANSI_NETWORK_MASK 0x0000FF #define ANSI_CLUSTER_MASK 0x00FF00 #define ANSI_MEMBER_MASK 0xFF0000 #define ANSI_5BIT_SLS_MASK 0x1F /* TODO: eventually add support for ANSI 8-bit SLS */ #define ANSI_8BIT_SLS_MASK 0xFF static const value_string service_indicator_code_vals[] = { { 0x0, "Signalling Network Management Message (SNM)" }, { 0x1, "Maintenance Regular Message (MTN)" }, { 0x2, "Maintenance Special Message (MTNS)" }, { 0x3, "SCCP" }, { 0x4, "TUP" }, { 0x5, "ISUP" }, { 0x6, "DUP (call and circuit related messages)" }, { 0x7, "DUP (facility registration and cancellation message)" }, { 0x8, "MTP testing user part" }, { 0x9, "Spare" }, { 0xa, "Spare" }, { 0xb, "Spare" }, { 0xc, "Spare" }, { 0xd, "Spare" }, { 0xe, "Spare" }, { 0xf, "Spare" }, { 0, NULL } }; static const value_string network_indicator_vals[] = { { 0x0, "International network" }, { 0x1, "Spare (for international use only)" }, { 0x2, "National network" }, { 0x3, "Reserved for national use" }, { 0, NULL } }; static void dissect_mtp3_sio(tvbuff_t *tvb, proto_tree *mtp3_tree) { guint8 sio; proto_item *sio_item; proto_tree *sio_tree; sio_item = proto_tree_add_text(mtp3_tree, tvb, SIO_OFFSET, SIO_LENGTH, "Service information octet"); sio_tree = proto_item_add_subtree(sio_item, ett_mtp3_sio); sio = tvb_get_guint8(tvb, SIO_OFFSET); proto_tree_add_uint(sio_tree, hf_mtp3_network_indicator, tvb, SIO_OFFSET, SIO_LENGTH, sio); if (mtp3_standard == ANSI_STANDARD) proto_tree_add_uint(sio_tree, hf_mtp3_ansi_priority, tvb, SIO_OFFSET, SIO_LENGTH, sio); else proto_tree_add_uint(sio_tree, hf_mtp3_itu_spare, tvb, SIO_OFFSET, SIO_LENGTH, sio); proto_tree_add_uint(sio_tree, hf_mtp3_service_indicator, tvb, SIO_OFFSET, SIO_LENGTH, sio); } static void dissect_mtp3_routing_label(tvbuff_t *tvb, proto_tree *mtp3_tree) { guint32 label, dpc, opc; guint8 sls; proto_item *label_item, *label_dpc_item, *label_opc_item; proto_tree *label_tree, *label_dpc_tree, *label_opc_tree; switch (mtp3_standard) { case ITU_STANDARD: label_item = proto_tree_add_text(mtp3_tree, tvb, ITU_ROUTING_LABEL_OFFSET, ITU_ROUTING_LABEL_LENGTH, "Routing label"); label_tree = proto_item_add_subtree(label_item, ett_mtp3_label); label = tvb_get_letohl(tvb, ITU_ROUTING_LABEL_OFFSET); sls = tvb_get_guint8(tvb, ITU_ROUTING_LABEL_OFFSET); proto_tree_add_uint(label_tree, hf_mtp3_itu_dpc, tvb, ITU_ROUTING_LABEL_OFFSET, ITU_ROUTING_LABEL_LENGTH, label); proto_tree_add_uint(label_tree, hf_mtp3_itu_opc, tvb, ITU_ROUTING_LABEL_OFFSET, ITU_ROUTING_LABEL_LENGTH, label); proto_tree_add_uint(label_tree, hf_mtp3_itu_sls, tvb, ITU_SLS_OFFSET, ITU_SLS_LENGTH, sls); break; case ANSI_STANDARD: /* this could be 5 or 8 bits */ sls = tvb_get_guint8(tvb, ANSI_SLS_OFFSET); /* Create the Routing Label Tree */ label_item = proto_tree_add_text(mtp3_tree, tvb, ANSI_ROUTING_LABEL_OFFSET, ANSI_ROUTING_LABEL_LENGTH, "Routing label"); label_tree = proto_item_add_subtree(label_item, ett_mtp3_label); /* create the DPC tree */ dpc = tvb_get_ntoh24(tvb, ANSI_DPC_OFFSET); label_dpc_item = proto_tree_add_text(label_tree, tvb, ANSI_DPC_OFFSET, ANSI_DPC_LENGTH, "DPC (%d-%d-%d)", (dpc & ANSI_NETWORK_MASK), ((dpc & ANSI_CLUSTER_MASK) >> 8), ((dpc & ANSI_MEMBER_MASK) >> 16)); label_dpc_tree = proto_item_add_subtree(label_dpc_item, ett_mtp3_label_dpc); proto_tree_add_uint(label_dpc_tree, hf_mtp3_dpc_member, tvb, ANSI_DPC_OFFSET, ANSI_NCM_LENGTH, dpc); proto_tree_add_uint(label_dpc_tree, hf_mtp3_dpc_cluster, tvb, ANSI_DPC_OFFSET, ANSI_NCM_LENGTH, dpc); proto_tree_add_uint(label_dpc_tree, hf_mtp3_dpc_network, tvb, ANSI_DPC_OFFSET, ANSI_NCM_LENGTH, dpc); /* create the OPC tree */ opc = tvb_get_ntoh24(tvb, ANSI_OPC_OFFSET); label_opc_item = proto_tree_add_text(label_tree, tvb, ANSI_OPC_OFFSET, ANSI_OPC_LENGTH, "OPC (%d-%d-%d)", (opc & ANSI_NETWORK_MASK), ((opc & ANSI_CLUSTER_MASK) >> 8), ((opc & ANSI_MEMBER_MASK) >> 16)); label_opc_tree = proto_item_add_subtree(label_opc_item, ett_mtp3_label_opc); proto_tree_add_uint(label_opc_tree, hf_mtp3_opc_member, tvb, ANSI_OPC_OFFSET, ANSI_NCM_LENGTH, opc); proto_tree_add_uint(label_opc_tree, hf_mtp3_opc_cluster, tvb, ANSI_OPC_OFFSET, ANSI_NCM_LENGTH, opc); proto_tree_add_uint(label_opc_tree, hf_mtp3_opc_network, tvb, ANSI_OPC_OFFSET, ANSI_NCM_LENGTH, opc); /* SLS */ /* TODO: separate 5-bit and 8-bit SLS */ proto_tree_add_item(label_tree, hf_mtp3_ansi_sls, tvb, ANSI_SLS_OFFSET, ANSI_SLS_LENGTH, sls); /* proto_tree_add_uint(label_tree, hf_mtp3_ansi_sls, tvb, ANSI_SLS_OFFSET, ANSI_SLS_LENGTH, sls);*/ break; default: printf("MTP3: unknown standard: %d\n", mtp3_standard); } } static void dissect_mtp3_payload(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree) { guint8 sio; guint8 service_indicator; tvbuff_t *payload_tvb; sio = tvb_get_guint8(tvb, SIO_OFFSET); service_indicator = sio & SERVICE_INDICATOR_MASK; switch (mtp3_standard) { case ITU_STANDARD: payload_tvb = tvb_new_subset(tvb, ITU_MTP_PAYLOAD_OFFSET, -1, -1); break; case ANSI_STANDARD: payload_tvb = tvb_new_subset(tvb, ANSI_MTP_PAYLOAD_OFFSET, -1, -1); break; default: printf("MTP3: unknown standard: %d\n", mtp3_standard); return; } if (!dissector_try_port(mtp3_sio_dissector_table, service_indicator, payload_tvb, pinfo, tree)) { proto_tree_add_text(tree, payload_tvb, 0, tvb_length(payload_tvb), "Payload (%u byte%s)", tvb_length(payload_tvb), plurality(tvb_length(payload_tvb), "", "s")); } } /* Code to actually dissect the packets */ static void dissect_mtp3(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree) { /* Set up structures needed to add the protocol subtree and manage it */ proto_item *mtp3_item; proto_tree *mtp3_tree; /* Make entries in Protocol column and Info column on summary display */ if (check_col(pinfo->fd, COL_PROTOCOL)) col_set_str(pinfo->fd, COL_PROTOCOL, "MTP3"); if (check_col(pinfo->fd, COL_INFO)) col_clear(pinfo->fd, COL_INFO); /* In the interest of speed, if "tree" is NULL, don't do any work not necessary to generate protocol tree items. */ if (tree) { /* create display subtree for the protocol */ mtp3_item = proto_tree_add_item(tree, proto_mtp3, tvb, 0, tvb_length(tvb), FALSE); mtp3_tree = proto_item_add_subtree(mtp3_item, ett_mtp3); /* dissect the packet */ dissect_mtp3_sio(tvb, mtp3_tree); dissect_mtp3_routing_label(tvb, mtp3_tree); dissect_mtp3_payload(tvb, pinfo, mtp3_tree); } } void proto_register_mtp3(void) { /* Setup list of header fields See Section 1.6.1 for details*/ static hf_register_info hf[] = { { &hf_mtp3_service_indicator, { "Service indicator", "mtp3.service_indicator", FT_UINT8, BASE_HEX, VALS(service_indicator_code_vals), SERVICE_INDICATOR_MASK, "", HFILL }}, { &hf_mtp3_network_indicator, { "Network indicator", "mtp3.network_indicator", FT_UINT8, BASE_HEX, VALS(network_indicator_vals), NETWORK_INDICATOR_MASK, "", HFILL }}, { &hf_mtp3_itu_spare, { "Spare", "mtp3.spare", FT_UINT8, BASE_HEX, NULL, SPARE_MASK, "", HFILL }}, { &hf_mtp3_ansi_priority, { "Priority", "mtp3.priority", FT_UINT8, BASE_HEX, NULL, ANSI_PRIORITY_MASK, "", HFILL }}, { &hf_mtp3_itu_opc, { "OPC", "mtp3.opc", FT_UINT32, BASE_DEC, NULL, ITU_OPC_MASK, "", HFILL }}, { &hf_mtp3_opc_network, { "OPC Network", "mtp3.opc.network", FT_UINT24, BASE_DEC, NULL, ANSI_NETWORK_MASK, "", HFILL }}, { &hf_mtp3_opc_cluster, { "OPC Cluster", "mtp3.opc.cluster", FT_UINT24, BASE_DEC, NULL, ANSI_CLUSTER_MASK, "", HFILL }}, { &hf_mtp3_opc_member, { "OPC Member", "mtp3.opc.member", FT_UINT24, BASE_DEC, NULL, ANSI_MEMBER_MASK, "", HFILL }}, { &hf_mtp3_itu_dpc, { "DPC", "mtp3.dpc", FT_UINT32, BASE_DEC, NULL, ITU_DPC_MASK, "", HFILL }}, { &hf_mtp3_dpc_network, { "DPC Network", "mtp3.dpc.network", FT_UINT24, BASE_DEC, NULL, ANSI_NETWORK_MASK, "", HFILL }}, { &hf_mtp3_dpc_cluster, { "DPC Cluster", "mtp3.dpc.cluster", FT_UINT24, BASE_DEC, NULL, ANSI_CLUSTER_MASK, "", HFILL }}, { &hf_mtp3_dpc_member, { "DPC Member", "mtp3.dpc.member", FT_UINT24, BASE_DEC, NULL, ANSI_MEMBER_MASK, "", HFILL }}, { &hf_mtp3_itu_sls, { "Signalling Link Selector", "mtp3.sls", FT_UINT32, BASE_DEC, NULL, ITU_SLS_MASK, "", HFILL }}, { &hf_mtp3_ansi_sls, { "Signalling Link Selector", "mtp3.sls", FT_UINT8, BASE_DEC, NULL, ANSI_5BIT_SLS_MASK, "", HFILL }} }; /* Setup protocol subtree array */ static gint *ett[] = { &ett_mtp3, &ett_mtp3_sio, &ett_mtp3_label, &ett_mtp3_label_dpc, &ett_mtp3_label_opc }; static enum_val_t mtp3_options[] = { { "ITU", ITU_STANDARD }, { "ANSI", ANSI_STANDARD }, { NULL, 0 } }; /* Register the protocol name and description */ proto_mtp3 = proto_register_protocol("Message Transfer Part Level 3", "MTP3", "mtp3"); /* Required function calls to register the header fields and subtrees used */ proto_register_field_array(proto_mtp3, hf, array_length(hf)); proto_register_subtree_array(ett, array_length(ett)); /* Register the dissector */ register_dissector("mtp3", dissect_mtp3, proto_mtp3); mtp3_sio_dissector_table = register_dissector_table("mtp3.service_indicator"); mtp3_module = prefs_register_protocol(proto_mtp3, NULL); prefs_register_enum_preference(mtp3_module, "mtp3_standard", "MTP3 standard", "MTP3 standard", &mtp3_standard, mtp3_options, FALSE); }