/* packet-v5ua.c

 *

 * Extension of all V5.2-User Adaptation Layer dissection elements

 * References:

 * RFC 3807

 * RFC 4233

 * RFC 5133

 *

 * Copyright 2009

 *

 * ISKRATEL d.o.o.            |       4S d.o.o.

 * http://www.iskratel.si/    |       http://www.4es.si/

 * <info@iskratel.si>         |       <projects@4es.si>

 * Vladimir Smrekar <vladimir.smrekar@gmail.com>

 *

 * Routines for V5.2-User Adaptation Layer dissection

 *

 * Extension of ISDN Q.921-User Adaptation Layer dissection

 * Copyright 2002, Michael Tuexen <Michael.Tuexen[AT]siemens.com>

 *

 * Christoph Neusch <christoph.neusch@nortelnetworks.com>

 *

 * Wireshark - Network traffic analyzer

 * By Gerald Combs <gerald@wireshark.org>

 * Copyright 1998 Gerald Combs

 *

 * SPDX-License-Identifier: GPL-2.0-or-later

 */

#include "config.h"

#include <epan/packet.h>

#include <wsutil/str_util.h>

#include <wsutil/ws_roundup.h>

#include "packet-sctp.h"

void proto_register_v5ua(void);

void proto_reg_handoff_v5ua(void);

static dissector_handle_t v5ua_handle;

static int paddingl;

static int dlci_efa = -1;

/* Initialize the protocol and registered fields */

static int proto_v5ua;

static dissector_handle_t q931_handle;

static dissector_handle_t v52_handle;

/* common msg-header */

static int hf_version;

static int hf_reserved;

static int hf_msg_class;

static int hf_msg_type;

/* static int hf_msg_type_id; */

static int hf_msg_length;

/* V5UA message header */

static int hf_link_id;

static int hf_chnl_id;

static int hf_adaptation_layer_id;

static int hf_text_if_id;

static int hf_scn_protocol_id;

static int hf_info_string;

static int hf_asp_identifier;

static int hf_dlci_zero_bit;

static int hf_dlci_spare_bit;

static int hf_dlci_sapi;

static int hf_dlci_one_bit;

static int hf_dlci_tei;

static int hf_efa;

/* static int hf_spare_efa; */

/* variable length parameter (msg) */

static int hf_parameter_tag;

static int hf_parameter_tag_draft;

static int hf_parameter_length;

static int hf_parameter_value;

static int hf_parameter_padding;

 /* parameter fields */

static int hf_link_status;

static int hf_sa_bit_id;

static int hf_sa_bit_value;

static int hf_diagnostic_info;

static int hf_if_range_start;

static int hf_if_range_end;

static int hf_heartbeat_data;

static int hf_traffic_mode_type;

static int hf_error_code;

static int hf_draft_error_code;

static int hf_status_type;

static int hf_status_id;

static int hf_error_reason;

static int hf_asp_reason;

static int hf_tei_status;

static int hf_tei_draft_status;

static int hf_release_reason;

/* Initialize the subtree pointers */

static int ett_v5ua;

static int ett_v5ua_common_header;

static int ett_v5ua_parameter;

static int ett_v5ua_layer3;

#define RFC             0x1

#define DRAFT           0x2

 /* Version of IUA */

static int iua_version = RFC;

/* Variables necessary for dissection of draft messages */

static int msg_class   = -1;

static int msg_type    = -1;

static int msg_length  = -1;

static int messageclassCopy = -1;

static int sa_bit_id = -1;

static int link_status_operational = -1;

/* Code to actually dissect the packets */

 /* define the parameters for the Tags: Tag-Type,Tag-Length,Tag-Value (Payload) */

#define PARAMETER_TAG_OFFSET    0

#define PARAMETER_TAG_LENGTH    2

#define PARAMETER_LENGTH_OFFSET (PARAMETER_TAG_OFFSET + PARAMETER_TAG_LENGTH)

#define PARAMETER_LENGTH_LENGTH 2

#define PARAMETER_VALUE_OFFSET  (PARAMETER_LENGTH_OFFSET + PARAMETER_LENGTH_LENGTH)

#define PARAMETER_HEADER_OFFSET PARAMETER_TAG_OFFSET

#define PARAMETER_HEADER_LENGTH (PARAMETER_TAG_LENGTH + PARAMETER_LENGTH_LENGTH)

/*----------------------V5UA Interface Identifier (int) (Draft,RFC)------------*/

 /* define parameter for the format of the integer formatted Interface Identifier */

#define INT_IF_ID_LINK_OFFSET PARAMETER_VALUE_OFFSET

#define INT_IF_ID_LINK_LENGTH 4

#define INT_IF_ID_CHNL_OFFSET INT_IF_ID_LINK_OFFSET

#define INT_IF_ID_CHNL_LENGTH 1

#define INT_INTERFACE_ID_LENGTH 4

static int linkIdentifier = -1;

static void

dissect_int_interface_identifier_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   uint32_t identifier;

   uint16_t number_of_ids, id_number;

   int offset;

   number_of_ids= (tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET) - PARAMETER_HEADER_LENGTH) / INT_INTERFACE_ID_LENGTH;

   offset = INT_IF_ID_LINK_OFFSET;

   proto_item_append_text(parameter_item, "(");

   for (id_number = 0; id_number < number_of_ids; id_number++) {

      proto_tree_add_item(parameter_tree, hf_link_id, parameter_tvb, offset, INT_IF_ID_LINK_LENGTH, ENC_BIG_ENDIAN);

      identifier = tvb_get_ntohl(parameter_tvb,offset)>>5;

      if (id_number < 1) {

         proto_item_append_text(parameter_item, "L:%d",identifier);

      } else {

         proto_item_append_text(parameter_item, " | L:%d",identifier);

      }

      linkIdentifier = identifier;

      proto_tree_add_item(parameter_tree, hf_chnl_id, parameter_tvb, offset+3, INT_IF_ID_CHNL_LENGTH, ENC_BIG_ENDIAN);

      identifier = tvb_get_uint8(parameter_tvb,offset+3)&0x1f;

      proto_item_append_text(parameter_item, " C:%d", identifier);

      offset += INT_INTERFACE_ID_LENGTH;

   }

   proto_item_append_text(parameter_item, ")");

}

/*----------------------V5UA Interface Identifier (int) (Draft,RFC)------------*/

/*----------------------Text Interface Identifier (RFC)------------------------*/

#define TEXT_IF_ID_LENGTH_OFFSET PARAMETER_LENGTH_OFFSET

#define TEXT_IF_ID_VALUE_OFFSET  PARAMETER_VALUE_OFFSET

#define TEXT_IF_ID_HEADER_LENGTH PARAMETER_HEADER_LENGTH

static void

dissect_text_interface_identifier_parameter(packet_info *pinfo, tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   uint16_t if_id_length;

   const uint8_t* str;

   if_id_length = tvb_get_ntohs(parameter_tvb, TEXT_IF_ID_LENGTH_OFFSET) - TEXT_IF_ID_HEADER_LENGTH;

   proto_tree_add_item_ret_string(parameter_tree, hf_text_if_id, parameter_tvb, TEXT_IF_ID_VALUE_OFFSET, if_id_length, ENC_ASCII, pinfo->pool, &str);

   proto_item_append_text(parameter_item, " (0x%s)", str);

}

/*----------------------Text Interface Identifier (RFC)------------------------*/

/*----------------------DLCI & Envelope Function Address------------------------*/

/* interpretation of EFA-values */

static const value_string efa_values[] = {

 { 8175, "ISDN Protocol" },

 { 8176, "PSTN Protocol" },

 { 8177, "CONTROL Protocol" },

 { 8178, "BCC Protocol" },

 { 8179, "PROT Protocol" },

 { 8180, "Link Control Protocol" },

 { 8191, "VALUE RESERVED" },

 { 0,    NULL } };

#define DLCI_LENGTH_OFFSET PARAMETER_LENGTH_OFFSET

#define DLCI_SAPI_OFFSET   PARAMETER_VALUE_OFFSET

#define DLCI_HEADER_LENGTH PARAMETER_HEADER_LENGTH

#define DLCI_SAPI_LENGTH   1

#define DLCI_TEI_LENGTH    1

#define EFA_LENGTH         2

static void

dissect_dlci_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item, packet_info *pinfo)

{

   uint16_t efa = 0, offset = 0;

   uint32_t sapi, tei;

   if     (iua_version == RFC)   offset = DLCI_SAPI_OFFSET;

   else if(iua_version == DRAFT) offset = DLCI_HEADER_LENGTH + tvb_get_ntohs(parameter_tvb, DLCI_LENGTH_OFFSET);

   proto_tree_add_item(parameter_tree, hf_dlci_zero_bit,      parameter_tvb, offset,  DLCI_SAPI_LENGTH,  ENC_BIG_ENDIAN);

   proto_tree_add_item(parameter_tree, hf_dlci_spare_bit,     parameter_tvb, offset,  DLCI_SAPI_LENGTH,  ENC_BIG_ENDIAN);

   proto_tree_add_item_ret_uint(parameter_tree, hf_dlci_sapi, parameter_tvb, offset,  DLCI_SAPI_LENGTH,  ENC_BIG_ENDIAN, &sapi);

   offset += DLCI_SAPI_LENGTH;

   proto_tree_add_item(parameter_tree, hf_dlci_one_bit,       parameter_tvb, offset,  DLCI_TEI_LENGTH,   ENC_BIG_ENDIAN);

   proto_tree_add_item_ret_uint(parameter_tree, hf_dlci_tei,  parameter_tvb, offset,  DLCI_TEI_LENGTH,   ENC_BIG_ENDIAN, &tei);

   offset += DLCI_TEI_LENGTH;

   efa = tvb_get_ntohs(parameter_tvb, offset);

   dlci_efa = tvb_get_ntohs(parameter_tvb, offset);

   if (dlci_efa >= 0 && dlci_efa <= 8175) { col_append_fstr(pinfo->cinfo, COL_INFO, " | ISDN: %u", dlci_efa); }

   else if (dlci_efa == 8176) { col_append_str(pinfo->cinfo, COL_INFO, " | PSTN"); }

   else if (dlci_efa == 8177) { col_append_str(pinfo->cinfo, COL_INFO, " | Ctrl"); }

   else if (dlci_efa == 8178) { col_append_str(pinfo->cinfo, COL_INFO, " | BCC"); }

   else if (dlci_efa == 8179) { col_append_str(pinfo->cinfo, COL_INFO, " | ProtProt"); }

   else if (dlci_efa == 8180) { col_append_str(pinfo->cinfo, COL_INFO, " | LinkCtrl"); }

   if(efa <= 8175) {

      proto_tree_add_uint_format_value(parameter_tree, hf_efa,  parameter_tvb, offset, EFA_LENGTH, efa,

            "ISDN (%u)", efa);

      proto_item_append_text(parameter_item, " (SAPI:%u TEI:%u EFA:ISDN (%u))",sapi,tei,efa);

   }

   else if (efa <= 8180){

      proto_tree_add_uint_format_value(parameter_tree, hf_efa,  parameter_tvb, offset, EFA_LENGTH, efa,

            "%s (%u)", val_to_str_const(efa, efa_values, "unknown EFA"),tvb_get_ntohs(parameter_tvb, offset));

      proto_item_append_text(parameter_item, " (SAPI:%u TEI:%u EFA:%s (%u))",sapi,tei,val_to_str_const(efa, efa_values, "unknown EFA-value"),efa);

   }

   else {

      proto_tree_add_uint_format_value(parameter_tree, hf_efa,  parameter_tvb, offset, EFA_LENGTH, efa,

            "RESERVED (%u)", efa);

      proto_item_append_text(parameter_item, " (SAPI:%u TEI:%u EFA:RESERVED (%u))",sapi,tei,efa);

   }

}

/*----------------------DLCI & Envelope Function Address------------------------*/

/*----------------------Error Indication (Draft)-------------------------------*/

 /* define Error Code Parameter for Layer Management (MGMT) Messages */

#define MGMT_ERROR_INVALID_TEI_DRAFT                       0x00

#define MGMT_ERROR_INVALID_IFID_DRAFT                      0x01

#define MGMT_ERROR_UNDEFINIED_MSG_DRAFT                    0x02

#define MGMT_ERROR_VERSION_ERR_DRAFT                       0x03

#define MGMT_ERROR_INVALID_STID_DRAFT                      0x04

#define MGMT_ERROR_INVALID_SCNV_DRAFT                      0x05

#define MGMT_ERROR_INVALID_ALI_DRAFT                       0x06

static const value_string draft_error_code_values[] = {

  { MGMT_ERROR_INVALID_TEI_DRAFT,     "Invalid TEI" },

  { MGMT_ERROR_INVALID_IFID_DRAFT,    "Invalid interface ID" },

  { MGMT_ERROR_UNDEFINIED_MSG_DRAFT,  "An unexpected message was received" },

  { MGMT_ERROR_VERSION_ERR_DRAFT,     "The IUA layers are of different version" },

  { MGMT_ERROR_INVALID_STID_DRAFT,    "Invalid SCTP stream identifier" },

  { MGMT_ERROR_INVALID_SCNV_DRAFT,    "Invalid SCN version" },

  { MGMT_ERROR_INVALID_ALI_DRAFT,     "Invalid Adaptation Layer Identifier" },

  { 0,                                NULL } };

#define MGMT_ERROR_MSG_LENGTH_OFFSET PARAMETER_LENGTH_OFFSET

#define MGMT_ERROR_MSG_HEADER_LENGTH PARAMETER_HEADER_LENGTH

#define MGMT_ERROR_CODE_LENGTH 4

static void

dissect_draft_error_code_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)

{

   uint16_t offset = MGMT_ERROR_MSG_HEADER_LENGTH + tvb_get_ntohs(parameter_tvb, MGMT_ERROR_MSG_LENGTH_OFFSET) + 4;

   proto_tree_add_item(parameter_tree, hf_draft_error_code, parameter_tvb, offset, MGMT_ERROR_CODE_LENGTH, ENC_BIG_ENDIAN);

   offset += MGMT_ERROR_CODE_LENGTH ;

   if( tvb_reported_length_remaining(parameter_tvb,offset) > 0 )

      proto_tree_add_item(parameter_tree, hf_info_string, parameter_tvb, offset, msg_length - offset,ENC_ASCII);

}

/*----------------------Error Indication (Draft)-------------------------------*/

/*----------------------Error Indication (RFC)---------------------------------*/

 /* define Error Code Parameter for Layer Management (MGMT) Messages */

#define MGMT_ERROR_INVALID_VERSION                     0x01

#define MGMT_ERROR_INVALID_IF_ID                       0x02

#define MGMT_ERROR_UNSUPPORTED_MSG_CLASS               0x03

#define MGMT_ERROR_UNSUPPORTED_MSG_TYPE                0x04

#define MGMT_ERROR_UNSUPPORTED_TRAFFIC_HANDLING_MODE   0x05

#define MGMT_ERROR_UNEXPECTED_MSG                      0x06

#define MGMT_ERROR_PROTOCOL_ERROR                      0x07

#define MGMT_ERROR_UNSUPPORTED_IF_ID_TYPE              0x08

#define MGMT_ERROR_INVALID_STREAM_ID                   0x09

#define MGMT_ERROR_UNASSIGNED_TEI                      0x0a

#define MGMT_ERROR_UNRECOGNIZED_SAPI                   0x0b

#define MGMT_ERROR_INVALID_TEI_SAPI_COMBINATION        0x0c

static const value_string error_code_values[] = {

  { MGMT_ERROR_INVALID_VERSION,                       "Invalid version" },

  { MGMT_ERROR_INVALID_IF_ID,                         "Invalid interface identifier" },

  { MGMT_ERROR_UNSUPPORTED_MSG_CLASS,                 "Unsupported message class" },

  { MGMT_ERROR_UNSUPPORTED_MSG_TYPE,                  "Unsupported message type" },

  { MGMT_ERROR_UNSUPPORTED_TRAFFIC_HANDLING_MODE,     "Unsupported traffic handling mode" },

  { MGMT_ERROR_UNEXPECTED_MSG,                        "Unexpected message" },

  { MGMT_ERROR_PROTOCOL_ERROR,                        "Protocol error" },

  { MGMT_ERROR_UNSUPPORTED_IF_ID_TYPE,                "Unsupported interface identifier type" },

  { MGMT_ERROR_INVALID_STREAM_ID,                     "Invalid stream identifier" },

  { MGMT_ERROR_UNASSIGNED_TEI,                        "Unassigned TEI" },

  { MGMT_ERROR_UNRECOGNIZED_SAPI,                     "Unrecognized SAPI" },

  { MGMT_ERROR_INVALID_TEI_SAPI_COMBINATION,          "Invalid TEI/SAPI combination" },

  { 0,                                                NULL } };

#define MGMT_ERROR_CODE_OFFSET PARAMETER_VALUE_OFFSET

static void

dissect_error_code_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   proto_tree_add_item(parameter_tree, hf_error_code, parameter_tvb, MGMT_ERROR_CODE_OFFSET, MGMT_ERROR_CODE_LENGTH, ENC_BIG_ENDIAN);

   proto_item_append_text(parameter_item, " (%s)",

         val_to_str_const(tvb_get_ntohl(parameter_tvb, MGMT_ERROR_CODE_OFFSET), error_code_values, "Unknown error code"));

}

static void

dissect_diagnostic_information_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   uint16_t diag_info_length;

   diag_info_length = tvb_get_ntohs(parameter_tvb, MGMT_ERROR_MSG_LENGTH_OFFSET) - MGMT_ERROR_MSG_HEADER_LENGTH;

   proto_tree_add_item(parameter_tree, hf_diagnostic_info, parameter_tvb, PARAMETER_VALUE_OFFSET, diag_info_length, ENC_NA);

   proto_item_append_text(parameter_item, " (%u byte%s)", diag_info_length, plurality(diag_info_length, "", "s"));

}

/*----------------------Error Indication (RFC)---------------------------------*/

/*----------------------Notify (RFC)-------------------------------------------*/

 /* define Status Type parameters for Notify (NTFY) Messages */

#define NTFY_STATUS_TYPE_AS_STATE_CHANGE  0x01

#define NTFY_STATUS_TYPE_OTHER            0x02

static const value_string status_type_values[] = {

   { NTFY_STATUS_TYPE_AS_STATE_CHANGE,        "Application server state change" },

   { NTFY_STATUS_TYPE_OTHER,                  "Other" },

   { 0,                                       NULL } };

 /* define Status Identification parameters for NTFY Messages (AS state change)*/

#define NTFY_STATUS_IDENT_AS_DOWN          0x01

#define NTFY_STATUS_IDENT_AS_INACTIVE      0x02

#define NTFY_STATUS_IDENT_AS_ACTIVE        0x03

#define NTFY_STATUS_IDENT_AS_PENDING       0x04

 /* define Status Identification parameters for NTFY Messages (Other)*/

#define NTFY_STATUS_INSUFFICIENT_ASP_RES_ACTIVE 0x01

#define NTFY_STATUS_ALTERNATE_ASP_ACTIVE        0x02

static const value_string status_type_id_values[] = {

   { NTFY_STATUS_TYPE_AS_STATE_CHANGE * 256 * 256 + NTFY_STATUS_IDENT_AS_DOWN,         "Application server down" },

   { NTFY_STATUS_TYPE_AS_STATE_CHANGE * 256 * 256 + NTFY_STATUS_IDENT_AS_INACTIVE,     "Application server inactive" },

   { NTFY_STATUS_TYPE_AS_STATE_CHANGE * 256 * 256 + NTFY_STATUS_IDENT_AS_ACTIVE,       "Application server active" },

   { NTFY_STATUS_TYPE_AS_STATE_CHANGE * 256 * 256 + NTFY_STATUS_IDENT_AS_PENDING,      "Application server pending" },

   { NTFY_STATUS_TYPE_OTHER * 256 * 256 + NTFY_STATUS_INSUFFICIENT_ASP_RES_ACTIVE,     "Insufficient ASP resources active in AS" },

   { NTFY_STATUS_TYPE_OTHER * 256 * 256 + NTFY_STATUS_ALTERNATE_ASP_ACTIVE,            "Alternate ASP active" },

   { 0,                                           NULL } };

#define NTFY_STATUS_TYPE_OFFSET  PARAMETER_VALUE_OFFSET

#define NTFY_STATUS_TYPE_LENGTH  2

#define NTFY_STATUS_IDENT_OFFSET (NTFY_STATUS_TYPE_OFFSET + NTFY_STATUS_TYPE_LENGTH)

#define NTFY_STATUS_IDENT_LENGTH 2

static void

dissect_status_type_identification_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   uint16_t status_type, status_id;

   status_type = tvb_get_ntohs(parameter_tvb, NTFY_STATUS_TYPE_OFFSET);

   status_id   = tvb_get_ntohs(parameter_tvb, NTFY_STATUS_IDENT_OFFSET);

   proto_tree_add_item(parameter_tree, hf_status_type, parameter_tvb, NTFY_STATUS_TYPE_OFFSET, NTFY_STATUS_TYPE_LENGTH, ENC_BIG_ENDIAN);

   proto_tree_add_uint_format_value(parameter_tree, hf_status_id,  parameter_tvb, NTFY_STATUS_IDENT_OFFSET, NTFY_STATUS_IDENT_LENGTH,

         status_id, "%u (%s)", status_id,

         val_to_str_const((unsigned)status_type * 256 * 256 + status_id, status_type_id_values, "unknown"));

   proto_item_append_text(parameter_item, " (%s)",

         val_to_str_const((unsigned)status_type * 256 * 256 + status_id, status_type_id_values, "Unknown status information"));

}

/*----------------------Notify (RFC)-------------------------------------------*/

/*----------------------TEI Status Indication,Confirm (RFC)--------------------*/

 /* define parameters for TEI Status (Indication,Confirm) Messages */

#define TEI_STATUS_ASSIGNED       0x0

#define TEI_STATUS_UNASSIGNED     0x1

static const value_string tei_status_values[] = {

   { TEI_STATUS_ASSIGNED,   "TEI is considered assigned by Q.921" },

   { TEI_STATUS_UNASSIGNED, "TEI is considered unassigned by Q.921" },

   { 0,                     NULL } };

#define TEI_STATUS_OFFSET PARAMETER_VALUE_OFFSET

#define TEI_STATUS_LENGTH 4

static void

dissect_tei_status_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   proto_tree_add_item(parameter_tree, hf_tei_status, parameter_tvb, TEI_STATUS_OFFSET, TEI_STATUS_LENGTH, ENC_BIG_ENDIAN);

   proto_item_append_text(parameter_item, " (%s)",

         val_to_str_const(tvb_get_ntohl(parameter_tvb, TEI_STATUS_OFFSET), tei_status_values, "Unknown TEI status"));

}

/*----------------------TEI Status (RFC)---------------------------------------*/

/*----------------------TEI Status Indication,Confirm (Draft)------------------*/

#define TEI_DRAFT_IN_SERVICE     0x0

#define TEI_DRAFT_OUT_OF_SERVICE 0x1

static const value_string tei_draft_status_values[] = {

   { TEI_DRAFT_IN_SERVICE,    "TEI is in service" },

   { TEI_DRAFT_OUT_OF_SERVICE,"TEI is out of service" },

   { 0,                       NULL } };

#define TEI_STATUS_LENGTH_OFFSET PARAMETER_LENGTH_OFFSET

static void

dissect_draft_tei_status_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   int offset;

   offset = tvb_get_ntohs(parameter_tvb, TEI_STATUS_LENGTH_OFFSET) + 8;

   if(tvb_reported_length_remaining(parameter_tvb, offset) > 0 ){

      proto_tree_add_item(parameter_tree, hf_tei_draft_status, parameter_tvb, offset, TEI_STATUS_LENGTH, ENC_BIG_ENDIAN);

      proto_item_append_text(parameter_item, " (%s)",

            val_to_str_const(tvb_get_ntohl(parameter_tvb, offset), tei_draft_status_values, "Unknown TEI Status"));

   }

}

/*----------------------TEI Status (Draft)-------------------------------------*/

/*----------------------ASP Up,Down,Active,Inactive (Draft)--------------------*/

static void

dissect_asp_msg_parameter(packet_info *pinfo, tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   const uint8_t* str;

   uint16_t adaptation_layer_id_length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);

   proto_tree_add_item_ret_string(parameter_tree, hf_adaptation_layer_id, parameter_tvb, PARAMETER_VALUE_OFFSET, adaptation_layer_id_length, ENC_ASCII, pinfo->pool, &str);

   proto_item_append_text(parameter_item, " (%s)", str);

}

static void

dissect_scn_protocol_id_parameter(packet_info *pinfo, tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   const uint8_t* str;

   uint16_t id_length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);

   proto_tree_add_item_ret_string(parameter_tree, hf_scn_protocol_id, parameter_tvb, PARAMETER_VALUE_OFFSET, id_length, ENC_ASCII, pinfo->pool, &str);

   proto_item_append_text(parameter_item, " (%s)", str);

}

/*----------------------ASP (Draft)--------------------------------------------*/

/*----------------------ASP Down + Ack (RFC)--------------------------------*/

 /* define reason parameter for Application Server Process Maintenance (ASPM) Messages */

#define ASP_REASON_MGMT   1

static const value_string asp_reason_values[] = {

   { ASP_REASON_MGMT,      "Management inhibit" },

   { 0,                    NULL } };

#define ASP_REASON_OFFSET PARAMETER_VALUE_OFFSET

#define ASP_REASON_LENGTH 4

static void

dissect_asp_reason_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   proto_tree_add_item(parameter_tree, hf_asp_reason, parameter_tvb, ASP_REASON_OFFSET, ASP_REASON_LENGTH, ENC_BIG_ENDIAN);

   proto_item_append_text(parameter_item, " (%s)", val_to_str_const(tvb_get_ntohl(parameter_tvb, ASP_REASON_OFFSET), asp_reason_values, "Unknown ASP down reason"));

}

/*----------------------ASP (RFC)----------------------------------------------*/

/*----------------------Heartbeat Data + Ack (RFC)-----------------------------*/

#define HEARTBEAT_MSG_LENGTH_OFFSET PARAMETER_LENGTH_OFFSET

#define HEARTBEAT_DATA_OFFSET       PARAMETER_VALUE_OFFSET

#define HEARTBEAT_MSG_HEADER_LENGTH PARAMETER_HEADER_LENGTH

static void

dissect_heartbeat_data_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   uint16_t heartbeat_data_length;

   heartbeat_data_length = tvb_get_ntohs(parameter_tvb, HEARTBEAT_MSG_LENGTH_OFFSET) - HEARTBEAT_MSG_HEADER_LENGTH;

   proto_tree_add_item(parameter_tree, hf_heartbeat_data, parameter_tvb, HEARTBEAT_DATA_OFFSET, heartbeat_data_length, ENC_NA);

   proto_item_append_text(parameter_item, " (%u byte%s)", heartbeat_data_length, plurality(heartbeat_data_length, "", "s"));

}

/*----------------------Heartbeat Data (RFC)-----------------------------------*/

/*----------------------ASP Active,Inactive + Ack (RFC)------------------------*/

#define OVER_RIDE_TRAFFIC_MODE_TYPE  1

#define LOAD_SHARE_TRAFFIC_MODE_TYPE 2

static const value_string traffic_mode_type_values[] = {

   { OVER_RIDE_TRAFFIC_MODE_TYPE,      "Over-ride" },

   { LOAD_SHARE_TRAFFIC_MODE_TYPE,     "Load-share" },

   { 0,                    NULL } };

#define TRAFFIC_MODE_TYPE_LENGTH 4

#define TRAFFIC_MODE_TYPE_OFFSET PARAMETER_VALUE_OFFSET

static void

dissect_traffic_mode_type_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   proto_tree_add_item(parameter_tree, hf_traffic_mode_type, parameter_tvb, TRAFFIC_MODE_TYPE_OFFSET, TRAFFIC_MODE_TYPE_LENGTH, ENC_BIG_ENDIAN);

   proto_item_append_text(parameter_item, " (%s)",

         val_to_str_const(tvb_get_ntohl(parameter_tvb, TRAFFIC_MODE_TYPE_OFFSET), traffic_mode_type_values, "Unknown traffic mode type"));

}

#define INT_RANGE_START_OFFSET  PARAMETER_VALUE_OFFSET

#define INT_RANGE_LENGTH_OFFSET PARAMETER_LENGTH_OFFSET

#define INT_RANGE_HEADER_LENGTH PARAMETER_HEADER_LENGTH

#define IF_ID_START_OFFSET      0

#define IF_ID_START_LENGTH      4

#define IF_ID_END_OFFSET        (IF_ID_START_OFFSET + IF_ID_START_LENGTH)

#define IF_ID_END_LENGTH        4

#define IF_ID_INTERVAL_LENGTH   (IF_ID_START_LENGTH + IF_ID_END_LENGTH)

static void

dissect_integer_range_interface_identifier_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   uint16_t number_of_ranges, range_number, offset;

   number_of_ranges = (tvb_get_ntohs(parameter_tvb, INT_RANGE_LENGTH_OFFSET) - INT_RANGE_HEADER_LENGTH) / IF_ID_INTERVAL_LENGTH;

   offset = INT_RANGE_START_OFFSET;

   for(range_number = 0; range_number < number_of_ranges; range_number++) {

      proto_tree_add_item(parameter_tree, hf_if_range_start, parameter_tvb, offset + IF_ID_START_OFFSET, IF_ID_START_LENGTH, ENC_BIG_ENDIAN);

      proto_tree_add_item(parameter_tree, hf_if_range_end,   parameter_tvb, offset + IF_ID_END_OFFSET,   IF_ID_END_LENGTH,   ENC_BIG_ENDIAN);

      offset += IF_ID_INTERVAL_LENGTH;

   };

   proto_item_append_text(parameter_item, " (%u range%s)", number_of_ranges, plurality(number_of_ranges, "", "s"));

}

/*----------------------ASP Active,Inactive (RFC)------------------------------*/

/*----------------------Data Request,Indication (Draft,RFC)--------------------*/

#define DISCRIMINATOR_OFFSET 0

#define DISCRIMINATOR_LENGTH 1

#define ADDRESS_OFFSET       1

#define ADDRESS_LENGTH       1

#define LOW_ADDRESS_OFFSET   2

#define LOW_ADDRESS_LENGTH   1

#define ALL_ADDRESS_OFFSET   1

#define ALL_ADDRESS_LENGTH   2

#define MSG_TYPE_OFFSET      3

#define MSG_TYPE_LENGTH      1

#define MSG_HEADER_LENGTH    4

#define INFO_ELEMENT_OFFSET  4

#define INFO_ELEMENT_LENGTH  1

static void

dissect_layer3_message(tvbuff_t *layer3_data_tvb, proto_tree *v5ua_tree,proto_item *parameter_item, packet_info *pinfo)

{

   uint16_t discriminator_offset;

   if(iua_version == DRAFT){

      discriminator_offset = DISCRIMINATOR_OFFSET;

   }

   else{

      discriminator_offset = DISCRIMINATOR_OFFSET + PARAMETER_HEADER_LENGTH;

   }

   if (tvb_get_uint8(layer3_data_tvb, discriminator_offset) == 0x48){

      uint16_t protocol_data_length;

      tvbuff_t *protocol_data_tvb;

      protocol_data_length = tvb_get_ntohs(layer3_data_tvb, PARAMETER_LENGTH_OFFSET) - PARAMETER_HEADER_LENGTH;

      protocol_data_tvb    = tvb_new_subset_length(layer3_data_tvb, PARAMETER_VALUE_OFFSET, protocol_data_length);

      call_dissector(v52_handle, protocol_data_tvb, pinfo, v5ua_tree);

      proto_item_append_text(parameter_item, " (%u byte%s)", protocol_data_length, plurality(protocol_data_length, "", "s"));

   }

   else{

      uint16_t protocol_data_length;

      tvbuff_t *protocol_data_tvb;

      protocol_data_length = tvb_get_ntohs(layer3_data_tvb, PARAMETER_LENGTH_OFFSET) - PARAMETER_HEADER_LENGTH;

      protocol_data_tvb    = tvb_new_subset_length(layer3_data_tvb, PARAMETER_VALUE_OFFSET, protocol_data_length);

      call_dissector(q931_handle, protocol_data_tvb, pinfo, v5ua_tree);

      proto_item_append_text(parameter_item, " (%u byte%s)", protocol_data_length, plurality(protocol_data_length, "", "s"));

   }

}

/*----------------------Data Request,Indication (Draft,RFC)------------------------*/

/*----------------------Establish Request,Confirm,Indication (Draft,RFC)-------*/

/*

 * no additional parameter

 */

/*----------------------Establish Request,Confirm,Indication (Draft,RFC)-------*/

/*----------------------Release Indication, Request (Draft,RFC)----------------*/

 /* define parameters for Release Request and Indication Messages */

#define RELEASE_MGMT   0x0

#define RELEASE_PHYS   0x1

#define RELEASE_DM     0x2

#define RELEASE_OTHER  0x3

static const value_string release_reason_values[] = {

   { RELEASE_MGMT,    "Management layer generated release" },

   { RELEASE_PHYS,    "Physical layer alarm generated release" },

   { RELEASE_DM,      "Specific to a request" },

   { RELEASE_OTHER,   "Other reason" },

   { 0,               NULL } };

#define RELEASE_REASON_LENGTH_OFFSET PARAMETER_LENGTH_OFFSET

#define RELEASE_REASON_OFFSET        PARAMETER_VALUE_OFFSET

#define RELEASE_REASON_LENGTH        4

static void

dissect_release_reason_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   int offset = RELEASE_REASON_OFFSET;

   if(iua_version == DRAFT) offset = tvb_get_ntohs(parameter_tvb, RELEASE_REASON_LENGTH_OFFSET)+8;

   proto_tree_add_item(parameter_tree, hf_release_reason, parameter_tvb, offset, RELEASE_REASON_LENGTH, ENC_BIG_ENDIAN);

   if(iua_version != DRAFT)

      proto_item_append_text(parameter_item, " (%s)",

            val_to_str_const(tvb_get_ntohl(parameter_tvb, offset), release_reason_values, "Unknown release reason"));

}

/*----------------------Release Indication,Request (Draft,RFC)-----------------*/

/*----------------------Link Status Start,Stop Report (Draft,RFC)--------------*/

/*

 * No additional Parameter

 */

/*----------------------Link Status Start,Stop Report (Draft,RFC)--------------*/

/*----------------------Link Status Indication (Draft,RFC)---------------------*/

 /* define parameters for Link Status Indication */

#define LINK_STATUS_OPERTIONAL      0x0

#define LINK_STATUS_NON_OPERTIONAL  0x1

static const value_string link_status_values[] = {

   { LINK_STATUS_OPERTIONAL,      "Link operational" },

   { LINK_STATUS_NON_OPERTIONAL,  "Link not operational" },

   { 0,                           NULL } };

#define LINK_STATUS_OFFSET   PARAMETER_VALUE_OFFSET

#define LINK_STATUS_LENGTH   4

static void

dissect_link_status_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   proto_tree_add_item(parameter_tree, hf_link_status, parameter_tvb, LINK_STATUS_OFFSET, LINK_STATUS_LENGTH, ENC_BIG_ENDIAN);

   proto_item_append_text(parameter_item, " (%s)",

         val_to_str_const(tvb_get_ntohl(parameter_tvb, LINK_STATUS_OFFSET),link_status_values, "Unknown Link status"));

   link_status_operational = tvb_get_ntohl(parameter_tvb, LINK_STATUS_OFFSET);

}

/*----------------------Link Status Indication (Draft,RFC)---------------------*/

/*----------------------Sa-Bit (Draft,RFC)-------------------------------------*/

 /* define parameter for sa-bit message */

#define SA_BIT_ID_ZERO     0x0

#define SA_BIT_ID_ONE      0x1

#define SA_BIT_VALUE_SA7   0x7

static const value_string sa_bit_values[] = {

   { SA_BIT_ID_ZERO,    "set value ZERO" },

   { SA_BIT_ID_ONE,     "set value ONE" },

   { SA_BIT_VALUE_SA7,  "Addresses the Sa7 Bit" },

   { 0,                 NULL } };

#define SA_BIT_ID_OFFSET     PARAMETER_VALUE_OFFSET

#define SA_BIT_ID_LENGTH     2

#define SA_BIT_VALUE_OFFSET  (SA_BIT_ID_OFFSET + SA_BIT_ID_LENGTH)

#define SA_BIT_VALUE_LENGTH  2

static void

dissect_sa_bit_status_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   proto_tree_add_item(parameter_tree, hf_sa_bit_id, parameter_tvb, SA_BIT_ID_OFFSET, SA_BIT_ID_LENGTH, ENC_BIG_ENDIAN);

   proto_tree_add_item(parameter_tree, hf_sa_bit_value, parameter_tvb, SA_BIT_VALUE_OFFSET, SA_BIT_VALUE_LENGTH, ENC_BIG_ENDIAN);

   proto_item_append_text(parameter_item, " (%s %s)",

         val_to_str_const(tvb_get_ntohs(parameter_tvb, SA_BIT_ID_OFFSET), sa_bit_values, "unknown"),

         val_to_str_const(tvb_get_ntohs(parameter_tvb, SA_BIT_VALUE_OFFSET), sa_bit_values, "unknown Bit"));

   sa_bit_id = tvb_get_ntohs(parameter_tvb, SA_BIT_VALUE_OFFSET);

}

/*----------------------Sa-Bit (Draft,RFC)-------------------------------------*/

/*----------------------Error Indication (RFC)---------------------------------*/

#define ERROR_REASON_OVERLOAD 0x1

static const value_string error_reason_values[] = {

   { ERROR_REASON_OVERLOAD, "C-Channel is in overload state" },

   { 0,                     NULL } };

#define ERROR_REASON_LENGTH 4

#define ERROR_REASON_OFFSET PARAMETER_VALUE_OFFSET

static void

dissect_error_indication_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   proto_tree_add_item(parameter_tree, hf_error_reason, parameter_tvb, ERROR_REASON_OFFSET, ERROR_REASON_LENGTH, ENC_BIG_ENDIAN);

   proto_item_append_text(parameter_item, " (%s)",

         val_to_str_const(tvb_get_ntohl(parameter_tvb, ERROR_REASON_OFFSET), error_reason_values, "unknown"));

}

/*----------------------Error Indication (RFC)---------------------------------*/

/*--------------------------ASP identifier-------------------------------------*/

#define ASP_IDENTIFIER_LENGTH 4

#define ASP_IDENTIFIER_OFFSET PARAMETER_VALUE_OFFSET

static void

dissect_asp_identifier_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   proto_tree_add_item(parameter_tree, hf_asp_identifier, parameter_tvb, ASP_IDENTIFIER_OFFSET, ASP_IDENTIFIER_LENGTH, ENC_BIG_ENDIAN);

   proto_item_append_text(parameter_item, " (%d) ",tvb_get_ntohl(parameter_tvb,ASP_IDENTIFIER_OFFSET));

}

/*--------------------------ASP identifier-------------------------------------*/

#define INFO_STRING_OFFSET PARAMETER_VALUE_OFFSET

static void

dissect_info_string_parameter(packet_info *pinfo, tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   uint16_t info_string_length;

   const uint8_t* str;

   info_string_length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);

   if(iua_version == DRAFT) info_string_length += 4;

   if(info_string_length > 4){

      info_string_length -= PARAMETER_HEADER_LENGTH;

      proto_tree_add_item_ret_string(parameter_tree, hf_info_string, parameter_tvb, INFO_STRING_OFFSET, info_string_length, ENC_ASCII, pinfo->pool, &str);

      proto_item_append_text(parameter_item, " (%s)", str);

   }

}

static void

dissect_unknown_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)

{

   uint16_t parameter_value_length;

   parameter_value_length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET) - PARAMETER_HEADER_LENGTH;

   if (parameter_value_length > 0)

      proto_tree_add_item(parameter_tree, hf_parameter_value, parameter_tvb, PARAMETER_VALUE_OFFSET, parameter_value_length, ENC_NA);

   proto_item_append_text(parameter_item, " with tag %u and %u byte%s value",

         tvb_get_ntohs(parameter_tvb, PARAMETER_TAG_OFFSET), parameter_value_length, plurality(parameter_value_length, "", "s"));

}

#define Reserved_TAG               0x00

#define INT_INTERFACE_IDENTIFIER_PARAMETER_TAG           0x01

#define ASP_MSG_PARAMETER_TAG                            0x02

#define TEXT_INTERFACE_IDENTIFIER_PARAMETER_TAG          0x03

#define INFO_PARAMETER_TAG                               0x04

#define DLCI_PARAMETER_TAG                               0x81

#define DIAGNOSTIC_INFORMATION_PARAMETER_TAG             0x07

#define INTEGER_RANGE_INTERFACE_IDENTIFIER_PARAMETER_TAG 0x08

#define HEARTBEAT_DATA_PARAMETER_TAG                     0x09

#define ASP_DOWN_REASON_PARAMETER_TAG                    0x0a

#define TRAFFIC_MODE_TYPE_PARAMETER_TAG                  0x0b

#define ERROR_CODE_PARAMETER_TAG                         0x0c

#define STATUS_TYPE_INDENTIFICATION_PARAMETER_TAG        0x0d

#define PROTOCOL_DATA_PARAMETER_TAG                      0x0e

#define RELEASE_REASON_PARAMETER_TAG                     0x0f

#define TEI_STATUS_PARAMETER_TAG                         0x10

#define ASP_IDENTIFIER_PARAMETER_TAG                     0x11

#define NOT_USED_IN_IUA_PARAMETER_TAG                    0x12

#define LINK_STATUS_PARAMETER_TAG                        0x82

#define SA_BIT_STATUS_PARAMETER_TAG                      0x83

#define ERROR_INDICATION_PARAMETER_TAG                   0x84

static const value_string parameter_tag_values[] = {

   { Reserved_TAG,                   "Reserved" },

   { INT_INTERFACE_IDENTIFIER_PARAMETER_TAG,              "Interface Identifier (integer)" },

   { TEXT_INTERFACE_IDENTIFIER_PARAMETER_TAG,             "Interface Identifier (text)" },

   { INFO_PARAMETER_TAG,                                  "Info string" },

   { DLCI_PARAMETER_TAG,                                  "DLCI" },

   { DIAGNOSTIC_INFORMATION_PARAMETER_TAG,                "Diagnostic information" },

   { INTEGER_RANGE_INTERFACE_IDENTIFIER_PARAMETER_TAG,    "Interface Identifier Range" },

   { HEARTBEAT_DATA_PARAMETER_TAG,                        "Hearbeat data" },

   { ASP_DOWN_REASON_PARAMETER_TAG,                       "ASP DOWN Reason" },

   { TRAFFIC_MODE_TYPE_PARAMETER_TAG,                     "Traffic mode type" },

   { ERROR_CODE_PARAMETER_TAG,                            "Error code" },

   { STATUS_TYPE_INDENTIFICATION_PARAMETER_TAG,           "Status type/identification" },

   { PROTOCOL_DATA_PARAMETER_TAG,                         "Protocol Data" },

   { RELEASE_REASON_PARAMETER_TAG,                        "Release Reason" },

   { TEI_STATUS_PARAMETER_TAG,                            "TEI status" },

   { ASP_IDENTIFIER_PARAMETER_TAG,                        "ASP Identifier" },

   { NOT_USED_IN_IUA_PARAMETER_TAG,                       "Not used in IUA" },

   { LINK_STATUS_PARAMETER_TAG,                           "Link status" },

   { SA_BIT_STATUS_PARAMETER_TAG,                         "SA-Bit status" },

   { ERROR_INDICATION_PARAMETER_TAG,                      "Error reason" },

   { 0,                                                    NULL } };

static const value_string parameter_tag_draft_values[] = {

   { INT_INTERFACE_IDENTIFIER_PARAMETER_TAG,              "V5UA Interface Identifier (int)" },

   { ASP_MSG_PARAMETER_TAG,                               "ASP Adaption Layer ID" },

   { TEXT_INTERFACE_IDENTIFIER_PARAMETER_TAG,             "SCN Protocol Identifier" },

   { INFO_PARAMETER_TAG,                                  "Info" },

   { PROTOCOL_DATA_PARAMETER_TAG,                         "Protocol Data" },

   { LINK_STATUS_PARAMETER_TAG,                           "Link status" },

   { SA_BIT_STATUS_PARAMETER_TAG,                         "SA-Bit status" },

   { ERROR_INDICATION_PARAMETER_TAG,                      "Error reason" },

   { 0,                                                   NULL } };

static void

dissect_parameter(tvbuff_t *parameter_tvb, packet_info *pinfo, proto_tree *v5ua_tree)

{

   uint16_t tag, length, padding_length;

   proto_item *parameter_item;

   proto_tree *parameter_tree;

   /* extract tag and length from the parameter */

   tag      = tvb_get_ntohs(parameter_tvb, PARAMETER_TAG_OFFSET);

   length   = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);

   /* on IUA-Draft messages the message length not including the message header */

   if((iua_version==DRAFT)&&(tag<=0x4)){

      /* at V5UA Header, length of header and length of DLCI+EFA must be added */

      if(tag==0x1)       length += 8;

      /* at ASP message tags only length of header must be added */

      else if(tag<=0x4)  length += PARAMETER_HEADER_LENGTH;

      /* for following message-tags are no length information available. Only in common msg header */

      if((msg_class==0 || msg_class==1 || msg_class==9) && msg_type<=10)

         length = msg_length;

   }

   padding_length = tvb_reported_length(parameter_tvb) - length;

   paddingl = padding_length;

   /* create proto_tree stuff */

   switch(iua_version){

      case RFC:

         parameter_tree   = proto_tree_add_subtree(v5ua_tree, parameter_tvb, PARAMETER_HEADER_OFFSET, -1, ett_v5ua_parameter, &parameter_item,

               val_to_str_const(tag, parameter_tag_values, "Unknown parameter"));

         /* add tag to the v5ua tree */

         proto_tree_add_item(parameter_tree, hf_parameter_tag, parameter_tvb, PARAMETER_TAG_OFFSET, PARAMETER_TAG_LENGTH, ENC_BIG_ENDIAN);

         break;

      case DRAFT:

      default:

         parameter_tree   = proto_tree_add_subtree(v5ua_tree, parameter_tvb, PARAMETER_HEADER_OFFSET, -1, ett_v5ua_parameter, &parameter_item,

               val_to_str_const(tag, parameter_tag_draft_values, "Unknown parameter"));

         /* add tag to the v5ua tree */

         proto_tree_add_item(parameter_tree, hf_parameter_tag_draft, parameter_tvb, PARAMETER_TAG_OFFSET, PARAMETER_TAG_LENGTH, ENC_BIG_ENDIAN);

         break;

   };

   /* add length to the v5ua tree */

   proto_tree_add_item(parameter_tree, hf_parameter_length, parameter_tvb, PARAMETER_LENGTH_OFFSET, PARAMETER_LENGTH_LENGTH, ENC_BIG_ENDIAN);

   switch(tag) {

      case INT_INTERFACE_IDENTIFIER_PARAMETER_TAG:

         if(iua_version == RFC) dissect_int_interface_identifier_parameter(parameter_tvb, parameter_tree, parameter_item);

         if(iua_version == DRAFT){

            dissect_int_interface_identifier_parameter(parameter_tvb, parameter_tree, parameter_item);

            dissect_dlci_parameter(parameter_tvb, parameter_tree, parameter_item, pinfo);

            /* for the following parameters no tag- and length-informations available. Parameters must be dissect with info from common msg header */

            if(msg_class==0 && msg_type==0)    dissect_draft_error_code_parameter(parameter_tvb, parameter_tree);

            if(msg_class==1)                   dissect_draft_tei_status_parameter(parameter_tvb, parameter_tree, parameter_item);

            if(msg_class==9){

               if(msg_type==1||msg_type==2||msg_type==3||msg_type==4){

                  uint16_t length_2, offset;

                  tvbuff_t *layer3_data_tvb;

                  offset = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET) + 8;

                  length_2 = msg_length - offset;

                  if(length_2 > 0){

                     if(tvb_get_uint8(parameter_tvb, offset) == 0x48){

                        layer3_data_tvb = tvb_new_subset_length(parameter_tvb, offset, length_2);

                        dissect_layer3_message(layer3_data_tvb, v5ua_tree, parameter_item, pinfo);

                     }

                  }

               }

               else if(msg_type==8||msg_type==10) dissect_release_reason_parameter(parameter_tvb, parameter_tree, parameter_item);

            }

         }

         break;

      case ASP_MSG_PARAMETER_TAG:

         dissect_asp_msg_parameter(pinfo, parameter_tvb, parameter_tree, parameter_item);

         break;

      case TEXT_INTERFACE_IDENTIFIER_PARAMETER_TAG:

         if(iua_version == RFC)

            dissect_text_interface_identifier_parameter(pinfo, parameter_tvb, parameter_tree, parameter_item);

         if(iua_version == DRAFT)

            dissect_scn_protocol_id_parameter(pinfo, parameter_tvb, parameter_tree, parameter_item);

         break;

      case INFO_PARAMETER_TAG:

         dissect_info_string_parameter(pinfo, parameter_tvb, parameter_tree, parameter_item);

         break;

      case DLCI_PARAMETER_TAG:

         dissect_dlci_parameter(parameter_tvb, parameter_tree, parameter_item, pinfo);

         break;

      case DIAGNOSTIC_INFORMATION_PARAMETER_TAG:

         dissect_diagnostic_information_parameter(parameter_tvb, parameter_tree, parameter_item);

         break;

      case INTEGER_RANGE_INTERFACE_IDENTIFIER_PARAMETER_TAG:

         dissect_integer_range_interface_identifier_parameter(parameter_tvb, parameter_tree, parameter_item);

         break;

      case HEARTBEAT_DATA_PARAMETER_TAG:

         dissect_heartbeat_data_parameter(parameter_tvb, parameter_tree, parameter_item);

         break;

      case ASP_DOWN_REASON_PARAMETER_TAG:

         dissect_asp_reason_parameter(parameter_tvb, parameter_tree, parameter_item);

         break;

      case TRAFFIC_MODE_TYPE_PARAMETER_TAG:

         dissect_traffic_mode_type_parameter(parameter_tvb, parameter_tree, parameter_item);

         break;

      case ERROR_CODE_PARAMETER_TAG:

         dissect_error_code_parameter(parameter_tvb, parameter_tree, parameter_item);

         break;

      case STATUS_TYPE_INDENTIFICATION_PARAMETER_TAG:

         dissect_status_type_identification_parameter(parameter_tvb, parameter_tree, parameter_item);

         break;

      case PROTOCOL_DATA_PARAMETER_TAG:

         dissect_layer3_message(parameter_tvb, v5ua_tree, parameter_item, pinfo);

         break;

      case RELEASE_REASON_PARAMETER_TAG:

         dissect_release_reason_parameter(parameter_tvb, parameter_tree, parameter_item);

         break;

      case TEI_STATUS_PARAMETER_TAG:

         dissect_tei_status_parameter(parameter_tvb, parameter_tree, parameter_item);

         break;

      case ASP_IDENTIFIER_PARAMETER_TAG:

         dissect_asp_identifier_parameter(parameter_tvb, parameter_tree, parameter_item);

         break;

      case LINK_STATUS_PARAMETER_TAG:

         dissect_link_status_parameter(parameter_tvb, parameter_tree, parameter_item);

         break;

      case SA_BIT_STATUS_PARAMETER_TAG:

         dissect_sa_bit_status_parameter(parameter_tvb, parameter_tree, parameter_item);

         break;

      case ERROR_INDICATION_PARAMETER_TAG:

         dissect_error_indication_parameter( parameter_tvb, parameter_tree, parameter_item);

         break;

      default:

         dissect_unknown_parameter(parameter_tvb, parameter_tree, parameter_item);

         break;

   };

   if (padding_length > 0){

      proto_tree_add_item(parameter_tree, hf_parameter_padding, parameter_tvb, PARAMETER_HEADER_OFFSET + length, padding_length, ENC_NA);

   }

}

/* dissect the V5UA-Parameters into subsets which are separated by Tag-Length-Header and call up the dissector for the subsets */

static void

dissect_parameters(tvbuff_t *parameters_tvb, packet_info *pinfo, proto_tree *tree _U_, proto_tree *v5ua_tree)

{

   int tag, offset, length, total_length, remaining_length;

   tvbuff_t *parameter_tvb;

   offset = 0;

   while((remaining_length = tvb_reported_length_remaining(parameters_tvb, offset))) {

      tag = tvb_get_ntohs(parameters_tvb, offset + PARAMETER_TAG_OFFSET);

      length = tvb_get_ntohs(parameters_tvb, offset + PARAMETER_LENGTH_OFFSET);

      if(iua_version==DRAFT){

         if(tag==0x1) length += 8;  /* V5UA Header */

         else if(tag<=0x4) length += PARAMETER_HEADER_LENGTH; /* ASP MSGs */

         /* add the parameters which are not separated by tag-length-header to the V5UA header */

         if((msg_class==0 || msg_class==1 || msg_class==9)&&msg_type<=10)

            length = msg_length;

      }

      total_length = WS_ROUNDUP_4(length);

      if (remaining_length >= length)

         total_length = MIN(total_length, remaining_length);

      /* create a tvb for the parameter including the padding bytes */

      parameter_tvb  = tvb_new_subset_length(parameters_tvb, offset, total_length);

      dissect_parameter(parameter_tvb, pinfo, v5ua_tree);

      /* get rid of the handled parameter */

      offset += total_length;

   }

}

 /* define the common header fields of V5UA MSG */

#define COMMON_HEADER_VERSION_LENGTH        1

#define COMMON_HEADER_RESERVED_LENGTH       1

#define COMMON_HEADER_MSG_CLASS_LENGTH      1

#define COMMON_HEADER_MSG_TYPE_LENGTH       1

#define COMMON_HEADER_MSG_LENGTH_LENGTH     4

#define COMMON_HEADER_LENGTH                (COMMON_HEADER_VERSION_LENGTH + COMMON_HEADER_RESERVED_LENGTH +\

                                             COMMON_HEADER_MSG_CLASS_LENGTH + COMMON_HEADER_MSG_TYPE_LENGTH +\

                                             COMMON_HEADER_MSG_LENGTH_LENGTH)

 /* define the offsets of common header */

#define COMMON_HEADER_OFFSET            0

#define COMMON_HEADER_VERSION_OFFSET    COMMON_HEADER_OFFSET

#define COMMON_HEADER_RESERVED_OFFSET   (COMMON_HEADER_VERSION_OFFSET       + COMMON_HEADER_VERSION_LENGTH)

#define COMMON_HEADER_MSG_CLASS_OFFSET  (COMMON_HEADER_RESERVED_OFFSET      + COMMON_HEADER_RESERVED_LENGTH)

#define COMMON_HEADER_MSG_TYPE_OFFSET   (COMMON_HEADER_MSG_CLASS_OFFSET     + COMMON_HEADER_MSG_CLASS_LENGTH)

#define COMMON_HEADER_MSG_LENGTH_OFFSET (COMMON_HEADER_MSG_TYPE_OFFSET      + COMMON_HEADER_MSG_TYPE_LENGTH)

#define COMMON_HEADER_PARAMETERS_OFFSET (COMMON_HEADER_OFFSET               + COMMON_HEADER_LENGTH)

 /* version of V5UA protocol */

#define V5UA_PROTOCOL_VERSION_RELEASE_1     1

static const value_string v5ua_protocol_version_values[] = {

   { V5UA_PROTOCOL_VERSION_RELEASE_1,  "Release 1.0" },

   { 0,                                NULL } };