/* packet-osi-options.c * Routines for the decode of ISO/OSI option part * Covers: * ISO 8473 CLNP (ConnectionLess Mode Network Service Protocol) * ISO 10589 ISIS (Intradomain Routing Information Exchange Protocol) * ISO 9542 ESIS (End System To Intermediate System Routing Exchange Protocol) * * $Id: packet-osi-options.c,v 1.16 2003/12/13 02:30:18 guy Exp $ * Ralf Schneider * * 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 #include "nlpid.h" #include "packet-osi.h" #include "packet-isis.h" #include "packet-isis-clv.h" #include "packet-isis-hello.h" #include "packet-isis-lsp.h" #include "packet-isis-snp.h" #include "packet-esis.h" #include "packet-osi-options.h" #define OSI_OPT_SECURITY 0xc5 #define OSI_OPT_QOS_MAINTANANCE 0xc3 #define OSI_OPT_PRIORITY 0xcd #define OSI_OPT_ADDRESS_MASK 0xe1 #define OSI_OPT_SNPA_MASK 0xe2 #define OSI_OPT_ES_CONFIG_TIMER 0xc6 #define OSI_OPT_MAX_PRIORITY 0x0e #define OSI_OPT_PADDING 0xcc #define OSI_OPT_SOURCE_ROUTING 0xc8 #define OSI_OPT_RECORD_OF_ROUTE 0xcb #define OSI_OPT_REASON_OF_DISCARD 0xc1 #define OSI_OPT_SEC_MASK 0xc0 #define OSI_OPT_SEC_RESERVED 0x00 #define OSI_OPT_SEC_SRC_ADR_SPEC 0x40 #define OSI_OPT_SEC_DST_ADR_SPEC 0x80 #define OSI_OPT_SEC_GLOBAL_UNIQUE 0xc0 #define OSI_OPT_QOS_MASK 0xc0 #define OSI_OPT_QOS_RESERVED 0x00 #define OSI_OPT_QOS_SRC_ADR_SPEC 0x40 #define OSI_OPT_QOS_DST_ADR_SPEC 0x80 #define OSI_OPT_QOS_GLOBAL_UNIQUE 0xc0 #define OSI_OPT_QOS_SUB_MASK 0x3f #define OSI_OPT_QOS_SUB_RSVD 0x20 #define OSI_OPT_QOS_SUB_SEQ_VS_TRS 0x10 #define OSI_OPT_QOS_SUB_CONG_EXPED 0x08 #define OSI_OPT_QOS_SUB_TSD_VS_COST 0x04 #define OSI_OPT_QOS_SUB_RESERR_TRS 0x02 #define OSI_OPT_QOS_SUB_RESERR_COST 0x01 #define OSI_OPT_RFD_GENERAL 0x00 #define OSI_OPT_RFD_ADDRESS 0x80 #define OSI_OPT_RFD_SOURCE_ROUTING 0x90 #define OSI_OPT_RFD_LIFETIME 0xa0 #define OSI_OPT_RFD_PDU_DISCARDED 0xb0 #define OSI_OPT_RFD_REASSEMBLY 0xc0 #define OSI_OPT_RFD_MASK 0xf0 #define OSI_OPT_RFD_SUB_MASK 0x0f static gint ott_osi_options = -1; static gint ott_osi_qos = -1; static gint ott_osi_route = -1; static gint ott_osi_redirect = -1; static const value_string osi_opt_sec_vals[] = { { OSI_OPT_SEC_RESERVED, "Reserved"}, { OSI_OPT_SEC_SRC_ADR_SPEC, "Source Address Specific"}, { OSI_OPT_SEC_DST_ADR_SPEC, "Destination Address Specific"}, { OSI_OPT_SEC_GLOBAL_UNIQUE, "Globally Unique"}, { 0, NULL} }; static const value_string osi_opt_qos_vals[] = { { OSI_OPT_QOS_RESERVED, "Reserved"}, { OSI_OPT_QOS_SRC_ADR_SPEC, "Source Address Specific"}, { OSI_OPT_QOS_DST_ADR_SPEC, "Destination Address Specific"}, { OSI_OPT_QOS_GLOBAL_UNIQUE, "Globally Unique"}, { 0, NULL} }; static const value_string osi_opt_qos_sub_vals[] = { { 0x20, " xx10 0000 Reserved"}, { 0x10, " xx01 0000 Sequencing versus transit delay"}, { 0x08, " xx00 1000 Congestion experienced"}, { 0x04, " xx00 0100 Transit delay versus cost"}, { 0x02, " xx00 0010 Residual error probability versus transit delay"}, { 0x01, " xx00 0001 Residual error probability versus cost"}, { 0, NULL} }; static const value_string osi_opt_rfd_general[] = { { 0x00, "Reason not specified"}, { 0x01, "Protocol procedure error"}, { 0x02, "Incorrect checksum"}, { 0x03, "PDU discarded due to congestion"}, { 0x04, "Header syntax error ( cannot be parsed )"}, { 0x05, "Segmentation needed but not permitted"}, { 0x06, "Incomplete PDU received"}, { 0x07, "Duplicate option"}, { 0, NULL} }; static const value_string osi_opt_rfd_address[] = { { 0x00, "Destination Address unreachable"}, { 0x01, "Destination Address unknown"}, { 0, NULL} }; static const value_string osi_opt_rfd_src_route[] = { { 0x00, "Unspecified source routing error"}, { 0x01, "Syntax error in source routing field"}, { 0x02, "Unknown address in source routing field"}, { 0x03, "Path not acceptable"}, { 0, NULL} }; static const value_string osi_opt_rfd_lifetime[] = { { 0x00, "Lifetime expired while data unit in transit"}, { 0x01, "Lifetime expired during reassembly"}, { 0, NULL} }; static const value_string osi_opt_rfd_discarded[] = { { 0x00, "Unsupported option not specified"}, { 0x01, "Unsupported protocol version"}, { 0x02, "Unsupported security option"}, { 0x03, "Unsupported source routing option"}, { 0x04, "Unsupported recording of route option"}, { 0, NULL} }; static const value_string osi_opt_rfd_reassembly[] = { { 0x00, "Reassembly interference"}, { 0, NULL} }; static void dissect_option_qos( const guchar type, const guchar sub_type, int offset, guchar len, tvbuff_t *tvb, proto_tree *tree ) { guchar tmp_type = 0; proto_item *ti; proto_tree *osi_qos_tree = NULL; ti = proto_tree_add_text( tree, tvb, offset, len, "Quality of service maintenance: %s", val_to_str( type, osi_opt_qos_vals, "Unknown (0x%x)") ); osi_qos_tree = proto_item_add_subtree( ti, ott_osi_qos ); if ( OSI_OPT_SEC_MASK == type ) { /* Analye BIT field to get all Values */ tmp_type = sub_type & OSI_OPT_QOS_SUB_RSVD; if ( tmp_type ) { proto_tree_add_text( osi_qos_tree, tvb, offset, len, val_to_str( tmp_type, osi_opt_qos_sub_vals, "Unknown (0x%x)") ); } tmp_type = sub_type & OSI_OPT_QOS_SUB_SEQ_VS_TRS; if ( tmp_type ) { proto_tree_add_text( osi_qos_tree, tvb, offset, len, val_to_str( tmp_type, osi_opt_qos_sub_vals, "Unknown (0x%x)") ); } tmp_type = sub_type &OSI_OPT_QOS_SUB_CONG_EXPED; if ( tmp_type ) { proto_tree_add_text( osi_qos_tree, tvb, offset, len, val_to_str( tmp_type, osi_opt_qos_sub_vals, "Unknown (0x%x)") ); } tmp_type = sub_type & OSI_OPT_QOS_SUB_TSD_VS_COST; if ( tmp_type ) { proto_tree_add_text( osi_qos_tree, tvb, offset, len, val_to_str( tmp_type, osi_opt_qos_sub_vals, "Unknown (0x%x)") ); } tmp_type = sub_type & OSI_OPT_QOS_SUB_RESERR_TRS; if ( tmp_type ) { proto_tree_add_text( osi_qos_tree, tvb, offset, len, val_to_str( tmp_type, osi_opt_qos_sub_vals, "Unknown (0x%x)") ); } tmp_type = sub_type & OSI_OPT_QOS_SUB_RESERR_COST; if ( tmp_type ) { proto_tree_add_text( osi_qos_tree, tvb, offset, len, val_to_str( tmp_type, osi_opt_qos_sub_vals, "Unknown (0x%x)") ); } } } static void dissect_option_route( guchar parm_type, int offset, guchar parm_len, tvbuff_t *tvb, proto_tree *tree ) { guchar next_hop = 0; guchar this_hop = 0; guchar netl = 0; guchar last_hop = 0; guchar cnt_hops = 0; proto_item *ti; proto_tree *osi_route_tree = NULL; static const value_string osi_opt_route[] = { { 0x03, "No Network Entity Titles Recorded Yet"}, { 0xff, "Recording Terminated !"}, { 0, NULL} }; if ( parm_type == OSI_OPT_SOURCE_ROUTING ) { next_hop = tvb_get_guint8(tvb, offset + 1 ); netl = tvb_get_guint8(tvb, next_hop + 2 ); this_hop = offset + 3; /* points to first netl */ ti = proto_tree_add_text( tree, tvb, offset + next_hop, netl, "Source Routing: %s ( Next Hop Highlighted In Data Buffer )", (tvb_get_guint8(tvb, offset) == 0) ? "Partial Source Routing" : "Complete Source Routing" ); } else { last_hop = tvb_get_guint8(tvb, offset + 1 ); /* points to the end of the list */ netl = tvb_get_guint8(tvb, last_hop ); /* mis-used to highlight buffer */ ti = proto_tree_add_text( tree, tvb, offset + next_hop, netl, "Record of Route: %s : %s", (tvb_get_guint8(tvb, offset) == 0) ? "Partial Source Routing" : "Complete Source Routing" , val_to_str( last_hop, osi_opt_route, "Unknown (0x%x" ) ); if ( 255 == last_hop ) this_hop = parm_len + 1; /* recording terminated, nothing to show */ else this_hop = offset + 3; } osi_route_tree = proto_item_add_subtree( ti, ott_osi_route ); while ( this_hop < parm_len ) { netl = tvb_get_guint8(tvb, this_hop + 1); proto_tree_add_text( osi_route_tree, tvb, offset + this_hop, netl, "Hop #%3u NETL: %2u, NET: %s", cnt_hops++, netl, print_nsap_net( tvb_get_ptr(tvb, this_hop + 1, netl), netl ) ); this_hop += 1 + netl; } } static void dissect_option_rfd( const guchar error, const guchar field, int offset, guchar len, tvbuff_t *tvb, proto_tree *tree ) { guchar error_class = 0; char *format_string[] = { "Reason for discard {General} : %s, in field %u", "Reason for discard {Address} : %s, in field %u", "Reason for discard {Source Routing}: %s, in field %u", "Reason for discard {Lifetime} : %s, in field %u", "Reason for discard {PDU discarded} : %s, in field %u", "Reason for discard {Reassembly} : %s, in field %u" }; error_class = error & OSI_OPT_RFD_MASK; if ( OSI_OPT_RFD_GENERAL == error_class ) { proto_tree_add_text( tree, tvb, offset + field, 1, format_string[0], val_to_str( error & OSI_OPT_RFD_SUB_MASK, osi_opt_rfd_general, "Unknown (0x%x)"), field ); } else if ( OSI_OPT_RFD_ADDRESS == error_class ) { proto_tree_add_text( tree, tvb, offset + field, 1, format_string[1], val_to_str( error & OSI_OPT_RFD_SUB_MASK, osi_opt_rfd_address, "Unknown (0x%x)"), field ); } else if ( OSI_OPT_RFD_SOURCE_ROUTING == error_class ) { proto_tree_add_text( tree, tvb, offset + field, 1, format_string[2], val_to_str( error & OSI_OPT_RFD_SUB_MASK, osi_opt_rfd_src_route, "Unknown (0x%x)"), field ); } else if ( OSI_OPT_RFD_LIFETIME == error_class ) { proto_tree_add_text( tree, tvb, offset + field, 1, format_string[3], val_to_str( error & OSI_OPT_RFD_SUB_MASK, osi_opt_rfd_lifetime, "Unknown (0x%x)"), field ); } else if ( OSI_OPT_RFD_PDU_DISCARDED == error_class ) { proto_tree_add_text( tree, tvb, offset + field, 1, format_string[4], val_to_str( error & OSI_OPT_RFD_SUB_MASK, osi_opt_rfd_discarded, "Unknown (0x%x)"), field ); } else if ( OSI_OPT_RFD_REASSEMBLY == error_class ) { proto_tree_add_text( tree, tvb, offset + field, 1, format_string[5], val_to_str( error & OSI_OPT_RFD_SUB_MASK, osi_opt_rfd_reassembly, "Unknown (0x%x)"), field ); } else { proto_tree_add_text( tree, tvb, offset, len, "Reason for discard: UNKNOWN Error Class" ); } } /* ############################## Dissection Functions ###################### */ /* * Name: dissect_osi_options() * * Description: * Main entry area for esis de-mangling. This will build the * main esis tree data and call the sub-protocols as needed. * * Input: * guchar : length of option section * tvbuff_t * : tvbuff containing packet data * int : offset into packet where we are (packet_data[offset]== start * of what we care about) * proto_tree * : tree of display data. May be NULL. * * Output: * void, but we will add to the proto_tree if it is not NULL. */ void dissect_osi_options( guchar opt_len, tvbuff_t *tvb, int offset, proto_tree *tree) { proto_item *ti; proto_tree *osi_option_tree = NULL; guchar parm_len = 0; guchar parm_type = 0; guint8 octet; if (tree) { if ( 0 == opt_len ) { proto_tree_add_text( tree, tvb, offset, 0, "### No Options for this PDU ###" ); return; } ti = proto_tree_add_text( tree, tvb, offset, opt_len, "### Option Section ###" ); osi_option_tree = proto_item_add_subtree( ti, ott_osi_options ); while ( 0 < opt_len ) { parm_type = (int) tvb_get_guint8(tvb, offset); offset++; parm_len = (int) tvb_get_guint8(tvb, offset); offset++; switch ( parm_type ) { case OSI_OPT_QOS_MAINTANANCE: octet = tvb_get_guint8(tvb, offset); dissect_option_qos( (guchar) (octet&OSI_OPT_QOS_MASK), (guchar) (octet&OSI_OPT_QOS_SUB_MASK), offset, parm_len, tvb, osi_option_tree ); break; case OSI_OPT_SECURITY: octet = tvb_get_guint8(tvb, offset); proto_tree_add_text( osi_option_tree, tvb, offset, parm_len, "Security type: %s", val_to_str( octet&OSI_OPT_SEC_MASK, osi_opt_sec_vals, "Unknown (0x%x)") ); break; case OSI_OPT_PRIORITY: octet = tvb_get_guint8(tvb, offset); if ( OSI_OPT_MAX_PRIORITY >= octet ) { proto_tree_add_text( osi_option_tree, tvb, offset, parm_len, "Priority : %u", octet ); } else { proto_tree_add_text( osi_option_tree, tvb, offset, parm_len, "Priority : %u ( Invalid )", octet ); } break; case OSI_OPT_ADDRESS_MASK: proto_tree_add_text( osi_option_tree, tvb, offset, parm_len, "Address Mask: %s", print_area( tvb_get_ptr(tvb, offset, parm_len), parm_len ) ); break; case OSI_OPT_SNPA_MASK: proto_tree_add_text( osi_option_tree, tvb, offset, parm_len, "SNPA Mask : %s", print_system_id( tvb_get_ptr(tvb, offset, parm_len), parm_len )); break; case OSI_OPT_ES_CONFIG_TIMER: proto_tree_add_text( osi_option_tree, tvb, offset, parm_len, "ESCT : %u seconds", tvb_get_ntohs( tvb, offset ) ); break; case OSI_OPT_PADDING: proto_tree_add_text( osi_option_tree, tvb, offset, parm_len, "Padding : %u Octets", parm_len ) ; break; case OSI_OPT_SOURCE_ROUTING: case OSI_OPT_RECORD_OF_ROUTE: dissect_option_route( parm_type, offset, parm_len, tvb, osi_option_tree ); break; case OSI_OPT_REASON_OF_DISCARD: dissect_option_rfd( tvb_get_guint8(tvb, offset), tvb_get_guint8(tvb, offset + 1), offset, parm_len, tvb, osi_option_tree ); break; } opt_len -= parm_len + 2; offset += parm_len; } } } /* dissect-osi-options */ /* * Name: proto_register_osi_options() * * Description: * main register for esis protocol set. We register some display * formats and the protocol module variables. * * NOTE: this procedure to autolinked by the makefile process that * builds register.c * * Input: * void * * Output: * void */ void proto_register_osi_options(void) { static gint *ott[] = { &ott_osi_options, &ott_osi_qos, &ott_osi_route, &ott_osi_redirect, }; proto_register_subtree_array( ott, array_length(ott)); }