From Michael T�xen: updates to support versions 6 and 10 of the SIGTRAN
[obnox/wireshark/wip.git] / packet-m3ua.c
1 /* packet-m3ua.c
2  * Routines for MTP3 User Adaptation Layer dissection
3  * It is hopefully (needs testing) compilant to
4  * http://www.ietf.org/internet-drafts/draft-ietf-sigtran-m3ua-06.txt
5  * http://www.ietf.org/internet-drafts/draft-ietf-sigtran-m3ua-10.txt
6  * To do: - clean up the code
7  *        - provide better handling of length parameters
8  *        - provide good information in summary window
9  *
10  * Copyright 2000, 2001, 2002, Michael Tuexen <Michael.Tuexen@icn.siemens.de>
11  *
12  * $Id: packet-m3ua.c,v 1.13 2002/01/31 00:47:40 guy Exp $
13  *
14  * Ethereal - Network traffic analyzer
15  * By Gerald Combs <gerald@ethereal.com>
16  * Copyright 1998 Gerald Combs
17  *
18  * Copied from README.developer
19  * 
20  * This program is free software; you can redistribute it and/or
21  * modify it under the terms of the GNU General Public License
22  * as published by the Free Software Foundation; either version 2
23  * of the License, or (at your option) any later version.
24  * 
25  * This program is distributed in the hope that it will be useful,
26  * but WITHOUT ANY WARRANTY; without even the implied warranty of
27  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
28  * GNU General Public License for more details.
29  * 
30  * You should have received a copy of the GNU General Public License
31  * along with this program; if not, write to the Free Software
32  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
33  */
34
35 #ifdef HAVE_CONFIG_H
36 # include "config.h"
37 #endif
38
39 #include <stdio.h>
40 #include <stdlib.h>
41
42
43 #ifdef HAVE_SYS_TYPES_H
44 # include <sys/types.h>
45 #endif
46
47 #ifdef HAVE_NETINET_IN_H
48 # include <netinet/in.h>
49 #endif
50
51 #include <string.h>
52 #include <glib.h>
53
54 #ifdef NEED_SNPRINTF_H
55 # include "snprintf.h"
56 #endif
57
58 #include <epan/packet.h>
59 #include "prefs.h"
60
61 #define SCTP_PORT_M3UA         2905
62 #define M3UA_PAYLOAD_PROTO_ID  3
63
64 #define VERSION_LENGTH         1
65 #define RESERVED_LENGTH        1
66 #define MESSAGE_CLASS_LENGTH   1
67 #define MESSAGE_TYPE_LENGTH    1
68 #define MESSAGE_LENGTH_LENGTH  4
69 #define COMMON_HEADER_LENGTH   (VERSION_LENGTH + RESERVED_LENGTH + MESSAGE_CLASS_LENGTH + \
70                                 MESSAGE_TYPE_LENGTH + MESSAGE_LENGTH_LENGTH)
71
72 #define VERSION_OFFSET         0
73 #define RESERVED_OFFSET        (VERSION_OFFSET + VERSION_LENGTH)
74 #define MESSAGE_CLASS_OFFSET   (RESERVED_OFFSET + RESERVED_LENGTH)
75 #define MESSAGE_TYPE_OFFSET    (MESSAGE_CLASS_OFFSET + MESSAGE_CLASS_LENGTH)
76 #define MESSAGE_LENGTH_OFFSET  (MESSAGE_TYPE_OFFSET + MESSAGE_TYPE_LENGTH)
77
78 #define PARAMETER_TAG_LENGTH    2
79 #define PARAMETER_LENGTH_LENGTH 2
80 #define PARAMETER_HEADER_LENGTH (PARAMETER_TAG_LENGTH + PARAMETER_LENGTH_LENGTH)
81
82 #define PARAMETER_TAG_OFFSET    0
83 #define PARAMETER_LENGTH_OFFSET (PARAMETER_TAG_OFFSET + PARAMETER_TAG_LENGTH)
84 #define PARAMETER_VALUE_OFFSET  (PARAMETER_LENGTH_OFFSET + PARAMETER_LENGTH_LENGTH)
85 #define PARAMETER_HEADER_OFFSET PARAMETER_TAG_OFFSET
86
87 #define V6_NETWORK_APPEARANCE_PARAMETER_TAG            1
88 #define V6_PROTOCOL_DATA_1_PARAMETER_TAG               2
89 #define V6_PROTOCOL_DATA_2_PARAMETER_TAG               3
90 #define V6_INFO_PARAMETER_TAG                          4
91 #define V6_AFFECTED_DESTINATIONS_PARAMETER_TAG         5
92 #define V6_ROUTING_CONTEXT_PARAMETER_TAG               6
93 #define V6_DIAGNOSTIC_INFORMATION_PARAMETER_TAG        7
94 #define V6_HEARTBEAT_DATA_PARAMETER_TAG                8
95 #define V6_USER_CAUSE_PARAMETER_TAG                    9
96 #define V6_REASON_PARAMETER_TAG                       10
97 #define V6_TRAFFIC_MODE_TYPE_PARAMETER_TAG            11
98 #define V6_ERROR_CODE_PARAMETER_TAG                   12
99 #define V6_STATUS_PARAMETER_TAG                       13
100 #define V6_CONGESTION_INDICATION_PARAMETER_TAG        14
101 #define V6_CONCERNED_DESTINATION_PARAMETER_TAG        15
102 #define V6_ROUTING_KEY_PARAMETER_TAG                  16
103 #define V6_REGISTRATION_RESULT_PARAMETER_TAG          17
104 #define V6_DEREGISTRATION_RESULT_PARAMETER_TAG        18
105 #define V6_LOCAL_ROUTING_KEY_IDENTIFIER_PARAMETER_TAG 19
106 #define V6_DESTINATION_POINT_CODE_PARAMETER_TAG       20
107 #define V6_SERVICE_INDICATORS_PARAMETER_TAG           21
108 #define V6_SUBSYSTEM_NUMBERS_PARAMETER_TAG            22
109 #define V6_ORIGINATING_POINT_CODE_LIST_PARAMETER_TAG  23
110 #define V6_CIRCUIT_RANGE_PARAMETER_TAG                24
111 #define V6_REGISTRATION_RESULTS_PARAMETER_TAG         25
112 #define V6_DEREGISTRATION_RESULTS_PARAMETER_TAG       26
113
114 static const value_string m3ua_v6_parameter_tag_values[] = {
115   { V6_NETWORK_APPEARANCE_PARAMETER_TAG,           "Network appearance" },
116   { V6_PROTOCOL_DATA_1_PARAMETER_TAG,              "Protocol data 1" },
117   { V6_PROTOCOL_DATA_2_PARAMETER_TAG,              "Protocol data 2" },
118   { V6_INFO_PARAMETER_TAG,                         "Info" },
119   { V6_AFFECTED_DESTINATIONS_PARAMETER_TAG,        "Affected destinations" },
120   { V6_ROUTING_CONTEXT_PARAMETER_TAG,              "Routing context" },
121   { V6_DIAGNOSTIC_INFORMATION_PARAMETER_TAG,       "Diagnostic information" },
122   { V6_HEARTBEAT_DATA_PARAMETER_TAG,               "Heartbeat data" },
123   { V6_USER_CAUSE_PARAMETER_TAG,                   "User / Cause" },
124   { V6_REASON_PARAMETER_TAG,                       "Reason" },
125   { V6_TRAFFIC_MODE_TYPE_PARAMETER_TAG,            "Traffic mode type" },
126   { V6_ERROR_CODE_PARAMETER_TAG,                   "Error code" },
127   { V6_STATUS_PARAMETER_TAG,                       "Status" }, 
128   { V6_CONGESTION_INDICATION_PARAMETER_TAG,        "Congestion indication" },
129   { V6_CONCERNED_DESTINATION_PARAMETER_TAG,        "Concerned destination" },
130   { V6_ROUTING_KEY_PARAMETER_TAG,                  "Routing Key" },
131   { V6_REGISTRATION_RESULT_PARAMETER_TAG,          "Registration result" },
132   { V6_DEREGISTRATION_RESULT_PARAMETER_TAG,        "De-registration result" },
133   { V6_LOCAL_ROUTING_KEY_IDENTIFIER_PARAMETER_TAG, "Local routing key identifier" },
134   { V6_DESTINATION_POINT_CODE_PARAMETER_TAG,       "Destination point code" },
135   { V6_SERVICE_INDICATORS_PARAMETER_TAG,           "Service indicators" },
136   { V6_SUBSYSTEM_NUMBERS_PARAMETER_TAG,            "Subsystem numbers" },
137   { V6_ORIGINATING_POINT_CODE_LIST_PARAMETER_TAG,  "Originating point code list" },
138   { V6_CIRCUIT_RANGE_PARAMETER_TAG,                "Circuit range" },
139   { V6_REGISTRATION_RESULTS_PARAMETER_TAG,         "Registration results" },
140   { V6_DEREGISTRATION_RESULTS_PARAMETER_TAG,       "De-registration results" },
141   { 0,                           NULL } };
142   
143 #define V10_INFO_STRING_PARAMETER_TAG                  0x0004
144 #define V10_ROUTING_CONTEXT_PARAMETER_TAG              0x0006
145 #define V10_DIAGNOSTIC_INFORMATION_PARAMETER_TAG       0x0007
146 #define V10_HEARTBEAT_DATA_PARAMETER_TAG               0x0009
147 #define V10_TRAFFIC_MODE_TYPE_PARAMETER_TAG            0x000b
148 #define V10_ERROR_CODE_PARAMETER_TAG                   0x000c
149 #define V10_STATUS_PARAMETER_TAG                       0x000d
150 #define V10_ASP_IDENTIFIER_PARAMETER_TAG               0x0011
151 #define V10_AFFECTED_POINT_CODE_PARAMETER_TAG          0x0012
152 #define V10_NETWORK_APPEARANCE_PARAMETER_TAG           0x0200
153 #define V10_USER_CAUSE_PARAMETER_TAG                   0x0204
154 #define V10_CONGESTION_INDICATIONS_PARAMETER_TAG       0x0205
155 #define V10_CONCERNED_DESTINATION_PARAMETER_TAG        0x0206
156 #define V10_ROUTING_KEY_PARAMETER_TAG                  0x0207
157 #define V10_REGISTRATION_RESULT_PARAMETER_TAG          0x0208
158 #define V10_DEREGISTRATION_RESULT_PARAMETER_TAG        0x0209
159 #define V10_LOCAL_ROUTING_KEY_IDENTIFIER_PARAMETER_TAG 0x020a
160 #define V10_DESTINATION_POINT_CODE_PARAMETER_TAG       0x020b
161 #define V10_SERVICE_INDICATORS_PARAMETER_TAG           0x020c
162 #define V10_SUBSYSTEM_NUMBERS_PARAMETER_TAG            0x020d
163 #define V10_ORIGINATING_POINT_CODE_LIST_PARAMETER_TAG  0x020e
164 #define V10_CIRCUIT_RANGE_PARAMETER_TAG                0x020f
165 #define V10_PROTOCOL_DATA_PARAMETER_TAG                0x0210
166 #define V10_CORRELATION_IDENTIFIER_PARAMETER_TAG       0x0211
167 #define V10_REGISTRATION_STATUS_PARAMETER_TAG          0x0212
168 #define V10_DEREGISTRATION_STATUS_PARAMETER_TAG        0x0213
169
170 static const value_string m3ua_v10_parameter_tag_values[] = {
171   { V10_INFO_STRING_PARAMETER_TAG,                  "Info string" } ,
172   { V10_ROUTING_CONTEXT_PARAMETER_TAG,              "Routing context" } ,
173   { V10_DIAGNOSTIC_INFORMATION_PARAMETER_TAG,       "Diagnostic Information" } ,
174   { V10_HEARTBEAT_DATA_PARAMETER_TAG,               "Heartbeat data" } ,
175   { V10_TRAFFIC_MODE_TYPE_PARAMETER_TAG,            "Traffic mode type" } ,
176   { V10_ERROR_CODE_PARAMETER_TAG,                   "Error code" } ,
177   { V10_STATUS_PARAMETER_TAG,                       "Status" } ,
178   { V10_ASP_IDENTIFIER_PARAMETER_TAG,               "ASP identifier" } ,
179   { V10_AFFECTED_POINT_CODE_PARAMETER_TAG,          "Affected point code" } ,
180   { V10_NETWORK_APPEARANCE_PARAMETER_TAG,           "Network appearance" } ,
181   { V10_USER_CAUSE_PARAMETER_TAG,                   "User / cause" } ,
182   { V10_CONGESTION_INDICATIONS_PARAMETER_TAG,       "Congestion indications" } ,
183   { V10_CONCERNED_DESTINATION_PARAMETER_TAG,        "Concerned destination" } ,
184   { V10_ROUTING_KEY_PARAMETER_TAG,                  "Routing key" } ,
185   { V10_REGISTRATION_RESULT_PARAMETER_TAG,          "Registration result" } ,
186   { V10_DEREGISTRATION_RESULT_PARAMETER_TAG,        "Deregistration result" } ,
187   { V10_LOCAL_ROUTING_KEY_IDENTIFIER_PARAMETER_TAG, "Local routing key identifier" } ,
188   { V10_DESTINATION_POINT_CODE_PARAMETER_TAG,       "Destination point code" } ,
189   { V10_SERVICE_INDICATORS_PARAMETER_TAG,           "Service indicators" } ,
190   { V10_SUBSYSTEM_NUMBERS_PARAMETER_TAG,            "Subsystem number" } ,
191   { V10_ORIGINATING_POINT_CODE_LIST_PARAMETER_TAG,  "Originating point code list" } ,
192   { V10_CIRCUIT_RANGE_PARAMETER_TAG,                "Circuit range" } ,
193   { V10_PROTOCOL_DATA_PARAMETER_TAG,                "Protocol data" } ,
194   { V10_CORRELATION_IDENTIFIER_PARAMETER_TAG,       "Correlation identifier" } ,
195   { V10_REGISTRATION_STATUS_PARAMETER_TAG,          "Registration status" } ,
196   { V10_DEREGISTRATION_STATUS_PARAMETER_TAG,        "Deregistration status" } ,
197   { 0,                           NULL } };
198
199 #define PROTOCOL_VERSION_RELEASE_1             1
200
201 static const value_string m3ua_protocol_version_values[] = {
202   { PROTOCOL_VERSION_RELEASE_1,  "Release 1" },
203   { 0,                           NULL } };
204
205 #define MESSAGE_CLASS_MGMT_MESSAGE        0
206 #define MESSAGE_CLASS_TFER_MESSAGE        1
207 #define MESSAGE_CLASS_SSNM_MESSAGE        2
208 #define MESSAGE_CLASS_ASPSM_MESSAGE       3
209 #define MESSAGE_CLASS_ASPTM_MESSAGE       4
210
211 static const value_string m3ua_message_class_values[] = {
212   { MESSAGE_CLASS_MGMT_MESSAGE,   "Management messages" },
213   { MESSAGE_CLASS_TFER_MESSAGE,   "Transfer messages" },
214   { MESSAGE_CLASS_SSNM_MESSAGE,   "SS7 signalling network management messages" },
215   { MESSAGE_CLASS_ASPSM_MESSAGE,  "ASP state maintenance messages" },
216   { MESSAGE_CLASS_ASPTM_MESSAGE,  "ASP traffic maintenance messages" },
217   { 0,                           NULL } };
218
219 #define MESSAGE_TYPE_ERR                  0
220 #define MESSAGE_TYPE_NTFY                 1
221
222 #define MESSAGE_TYPE_DATA                 1
223
224 #define MESSAGE_TYPE_DUNA                 1
225 #define MESSAGE_TYPE_DAVA                 2
226 #define MESSAGE_TYPE_DAUD                 3
227 #define MESSAGE_TYPE_SCON                 4
228 #define MESSAGE_TYPE_DUPU                 5
229
230 #define MESSAGE_TYPE_UP                   1
231 #define MESSAGE_TYPE_DOWN                 2
232 #define MESSAGE_TYPE_BEAT                 3
233 #define MESSAGE_TYPE_UP_ACK               4
234 #define MESSAGE_TYPE_DOWN_ACK             5
235 #define MESSAGE_TYPE_BEAT_ACK             6
236
237 #define MESSAGE_TYPE_ACTIVE               1
238 #define MESSAGE_TYPE_INACTIVE             2
239 #define MESSAGE_TYPE_ACTIVE_ACK           3
240 #define MESSAGE_TYPE_INACTIVE_ACK         4
241
242 static const value_string m3ua_message_class_type_values[] = {
243   { MESSAGE_CLASS_MGMT_MESSAGE  * 256 + MESSAGE_TYPE_ERR,           "Error (ERR)" },
244   { MESSAGE_CLASS_MGMT_MESSAGE  * 256 + MESSAGE_TYPE_NTFY,          "Notify (NTFY)" },
245   { MESSAGE_CLASS_TFER_MESSAGE  * 256 + MESSAGE_TYPE_DATA,          "Payload data (DATA)" },
246   { MESSAGE_CLASS_SSNM_MESSAGE  * 256 + MESSAGE_TYPE_DUNA,          "Destination unavailable (DUNA)" },
247   { MESSAGE_CLASS_SSNM_MESSAGE  * 256 + MESSAGE_TYPE_DAVA,          "Destination available (DAVA)" },
248   { MESSAGE_CLASS_SSNM_MESSAGE  * 256 + MESSAGE_TYPE_DAUD,          "Destination state audit (DAUD)" },
249   { MESSAGE_CLASS_SSNM_MESSAGE  * 256 + MESSAGE_TYPE_SCON,          "SS7 Network congestion state (SCON)" },
250   { MESSAGE_CLASS_SSNM_MESSAGE  * 256 + MESSAGE_TYPE_DUPU,          "Destination userpart unavailable (DUPU)" },
251   { MESSAGE_CLASS_ASPSM_MESSAGE * 256 + MESSAGE_TYPE_UP,            "ASP up (UP)" },
252   { MESSAGE_CLASS_ASPSM_MESSAGE * 256 + MESSAGE_TYPE_DOWN,          "ASP down (DOWN)" },
253   { MESSAGE_CLASS_ASPSM_MESSAGE * 256 + MESSAGE_TYPE_BEAT,          "Heartbeat (BEAT)" },
254   { MESSAGE_CLASS_ASPSM_MESSAGE * 256 + MESSAGE_TYPE_UP_ACK,        "ASP up ack (UP ACK)" },
255   { MESSAGE_CLASS_ASPSM_MESSAGE * 256 + MESSAGE_TYPE_DOWN_ACK,      "ASP down ack (DOWN ACK)" },
256   { MESSAGE_CLASS_ASPSM_MESSAGE * 256 + MESSAGE_TYPE_BEAT_ACK,      "Heartbeat ack (BEAT ACK)" },
257   { MESSAGE_CLASS_ASPTM_MESSAGE * 256 + MESSAGE_TYPE_ACTIVE ,       "ASP active (ACTIVE)" },
258   { MESSAGE_CLASS_ASPTM_MESSAGE * 256 + MESSAGE_TYPE_INACTIVE ,     "ASP inactive (INACTIVE)" },
259   { MESSAGE_CLASS_ASPTM_MESSAGE * 256 + MESSAGE_TYPE_ACTIVE_ACK ,   "ASP active ack (ACTIVE ACK)" },
260   { MESSAGE_CLASS_ASPTM_MESSAGE * 256 + MESSAGE_TYPE_INACTIVE_ACK , "ASP inactive ack (INACTIVE ACK)" },
261   { 0,                           NULL } };
262
263 static const value_string m3ua_message_class_type_acro_values[] = {
264   { MESSAGE_CLASS_MGMT_MESSAGE  * 256 + MESSAGE_TYPE_ERR,           "ERR" },
265   { MESSAGE_CLASS_MGMT_MESSAGE  * 256 + MESSAGE_TYPE_NTFY,          "NTFY" },
266   { MESSAGE_CLASS_TFER_MESSAGE  * 256 + MESSAGE_TYPE_DATA,          "DATA" },
267   { MESSAGE_CLASS_SSNM_MESSAGE  * 256 + MESSAGE_TYPE_DUNA,          "DUNA" },
268   { MESSAGE_CLASS_SSNM_MESSAGE  * 256 + MESSAGE_TYPE_DAVA,          "DAVA" },
269   { MESSAGE_CLASS_SSNM_MESSAGE  * 256 + MESSAGE_TYPE_DAUD,          "DAUD" },
270   { MESSAGE_CLASS_SSNM_MESSAGE  * 256 + MESSAGE_TYPE_SCON,          "SCON" },
271   { MESSAGE_CLASS_SSNM_MESSAGE  * 256 + MESSAGE_TYPE_DUPU,          "DUPU" },
272   { MESSAGE_CLASS_ASPSM_MESSAGE * 256 + MESSAGE_TYPE_UP,            "ASP_UP" },
273   { MESSAGE_CLASS_ASPSM_MESSAGE * 256 + MESSAGE_TYPE_DOWN,          "ASP_DOWN" },
274   { MESSAGE_CLASS_ASPSM_MESSAGE * 256 + MESSAGE_TYPE_BEAT,          "BEAT" },
275   { MESSAGE_CLASS_ASPSM_MESSAGE * 256 + MESSAGE_TYPE_UP_ACK,        "ASP_UP_ACK" },
276   { MESSAGE_CLASS_ASPSM_MESSAGE * 256 + MESSAGE_TYPE_DOWN_ACK,      "ASP_DOWN_ACK" },
277   { MESSAGE_CLASS_ASPSM_MESSAGE * 256 + MESSAGE_TYPE_BEAT_ACK,      "BEAT_ACK" },
278   { MESSAGE_CLASS_ASPTM_MESSAGE * 256 + MESSAGE_TYPE_ACTIVE ,       "ASP_ACTIVE" },
279   { MESSAGE_CLASS_ASPTM_MESSAGE * 256 + MESSAGE_TYPE_INACTIVE ,     "ASP_INACTIVE" },
280   { MESSAGE_CLASS_ASPTM_MESSAGE * 256 + MESSAGE_TYPE_ACTIVE_ACK ,   "ASP_ACTIVE_ACK" },
281   { MESSAGE_CLASS_ASPTM_MESSAGE * 256 + MESSAGE_TYPE_INACTIVE_ACK , "ASP_INACTIVE_ACK" },
282   { 0,                           NULL } };
283
284
285
286
287
288 #define PROTOCOL_DATA_OFFSET PARAMETER_VALUE_OFFSET
289
290
291 #define UNSPECIFIED_REASON          0
292 #define USER_UNAVAILABLE_REASON     1
293 #define MANAGEMENT_BLOCKING_REASON  2
294
295 static const value_string m3ua_reason_values[] = {
296   { UNSPECIFIED_REASON,                             "Unspecified" },
297   { USER_UNAVAILABLE_REASON,                        "User unavailable" },
298   { MANAGEMENT_BLOCKING_REASON,                     "Management blocking" },
299   {0,                           NULL } };
300
301 #define REASON_LENGTH 4
302 #define REASON_OFFSET PARAMETER_VALUE_OFFSET
303
304 #define TRAFFIC_MODE_TYPE_LENGTH 4
305 #define TRAFFIC_MODE_TYPE_OFFSET PARAMETER_VALUE_OFFSET
306
307 /* Initialize the protocol and registered fields */
308 static int proto_m3ua = -1;
309 static int hf_m3ua_version = -1;
310 static int hf_m3ua_reserved = -1;
311 static int hf_m3ua_message_class = -1;
312 static int hf_m3ua_message_type = -1;
313 static int hf_m3ua_message_length = -1;
314 static int hf_m3ua_parameter_tag = -1;
315 static int hf_m3ua_parameter_length = -1;
316 static int hf_m3ua_parameter_value = -1;
317 static int hf_m3ua_parameter_padding = -1;
318 static int hf_m3ua_network_appearance = -1;
319 static int hf_m3ua_info_string = -1;
320 static int hf_m3ua_routing_context = -1;
321 static int hf_m3ua_diagnostic_information = -1;
322 static int hf_m3ua_heartbeat_data = -1;
323 static int hf_m3ua_error_code = -1;
324 static int hf_m3ua_status_type = -1;
325 static int hf_m3ua_status_info = -1;
326 static int hf_m3ua_asp_identifier = -1;
327 static int hf_m3ua_affected_point_code_mask = -1;
328 static int hf_m3ua_affected_point_code_pc = -1;
329 static int hf_m3ua_unavailability_cause = -1;
330 static int hf_m3ua_user_identity = -1;
331 static int hf_m3ua_reason = -1;
332 static int hf_m3ua_traffic_mode_type = -1;
333 static int hf_m3ua_congestion_reserved = -1;
334 static int hf_m3ua_congestion_level = -1;
335 static int hf_m3ua_concerned_dest_reserved = -1;
336 static int hf_m3ua_concerned_dest_pc = -1;
337 static int hf_m3ua_local_rk_identifier = -1;
338 static int hf_m3ua_dpc_mask = -1;
339 static int hf_m3ua_dpc_pc = -1;
340 static int hf_m3ua_si = -1;
341 static int hf_m3ua_ssn = -1;
342 static int hf_m3ua_opc_list_mask = -1;
343 static int hf_m3ua_opc_list_pc = -1;
344 static int hf_m3ua_cic_range_mask = -1;
345 static int hf_m3ua_cic_range_pc = -1;
346 static int hf_m3ua_cic_range_upper = -1;
347 static int hf_m3ua_cic_range_lower = -1;
348 static int hf_m3ua_protocol_data_opc = -1;
349 static int hf_m3ua_protocol_data_dpc = -1;
350 static int hf_m3ua_protocol_data_si = -1;
351 static int hf_m3ua_protocol_data_ni = -1;
352 static int hf_m3ua_protocol_data_mp = -1;
353 static int hf_m3ua_protocol_data_sls = -1;
354 static int hf_m3ua_correlation_identifier = -1;
355 static int hf_m3ua_registration_status = -1;
356 static int hf_m3ua_deregistration_status = -1;
357 static int hf_m3ua_registration_result_identifier = -1;
358 static int hf_m3ua_registration_result_status = -1;
359 static int hf_m3ua_registration_result_context = -1;
360 static int hf_m3ua_deregistration_result_status = -1;
361 static int hf_m3ua_deregistration_result_context = -1;
362 static int hf_m3ua_li = -1;
363
364 /* Initialize the subtree pointers */
365 static gint ett_m3ua = -1;
366 static gint ett_m3ua_parameter = -1;
367
368 static module_t *m3ua_module;
369 static dissector_handle_t mtp3_handle, data_handle;
370 static dissector_table_t m3ua_si_dissector_table;
371
372 /* stuff for supporting multiple versions */
373 #define M3UA_V6            1
374 #define M3UA_V10           2
375 static gint m3ua_version = M3UA_V10;
376
377 static void
378 dissect_m3ua_parameters(tvbuff_t *, packet_info *, proto_tree *, proto_tree *);
379
380 static guint 
381 nr_of_padding_bytes (guint length)
382 {
383   guint remainder;
384
385   remainder = length % 4;
386
387   if (remainder == 0)
388     return 0;
389   else
390     return 4 - remainder;
391 }
392
393 static void
394 dissect_m3ua_common_header(tvbuff_t *common_header_tvb, packet_info *pinfo, proto_tree *m3ua_tree)
395 {
396   guint8  version, reserved, message_class, message_type;
397   guint32 message_length;
398   
399   /* Extract the common header */
400   version        = tvb_get_guint8(common_header_tvb, VERSION_OFFSET);
401   reserved       = tvb_get_guint8(common_header_tvb, RESERVED_OFFSET);
402   message_class  = tvb_get_guint8(common_header_tvb, MESSAGE_CLASS_OFFSET);
403   message_type   = tvb_get_guint8(common_header_tvb, MESSAGE_TYPE_OFFSET);
404   message_length = tvb_get_ntohl (common_header_tvb, MESSAGE_LENGTH_OFFSET);
405
406   if (check_col(pinfo->cinfo, COL_INFO)) {
407     col_append_str(pinfo->cinfo, COL_INFO, val_to_str(message_class * 256 + message_type, m3ua_message_class_type_acro_values, "reserved"));
408     col_append_str(pinfo->cinfo, COL_INFO, " ");
409   }
410
411   if (m3ua_tree) {
412     /* add the components of the common header to the protocol tree */
413     proto_tree_add_uint(m3ua_tree, hf_m3ua_version, common_header_tvb, VERSION_OFFSET, VERSION_LENGTH, version);
414     proto_tree_add_uint(m3ua_tree, hf_m3ua_reserved, common_header_tvb, RESERVED_OFFSET, RESERVED_LENGTH, reserved);
415     proto_tree_add_uint(m3ua_tree, hf_m3ua_message_class, common_header_tvb, MESSAGE_CLASS_OFFSET, MESSAGE_CLASS_LENGTH, message_class);
416     proto_tree_add_uint_format(m3ua_tree, hf_m3ua_message_type, common_header_tvb, MESSAGE_TYPE_OFFSET, MESSAGE_TYPE_LENGTH, message_type,
417                                "Message type: %s (%u)", 
418                                val_to_str(message_class * 256 + message_type, m3ua_message_class_type_values, "reserved"), message_type);
419     proto_tree_add_uint(m3ua_tree, hf_m3ua_message_length, common_header_tvb, MESSAGE_LENGTH_OFFSET, MESSAGE_LENGTH_LENGTH, message_length);
420   }
421 }
422
423 #define INFO_STRING_OFFSET PARAMETER_VALUE_OFFSET
424
425 static void
426 dissect_m3ua_info_string_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
427 {
428   guint16 length, info_string_length;
429   char *info_string;
430
431   length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
432   
433   info_string_length = length - PARAMETER_HEADER_LENGTH;
434   info_string = (char *)tvb_get_ptr(parameter_tvb, INFO_STRING_OFFSET, info_string_length);
435   proto_tree_add_string(parameter_tree, hf_m3ua_info_string, parameter_tvb, INFO_STRING_OFFSET, info_string_length, info_string);
436   proto_item_set_text(parameter_item, "Info String (%.*s)", info_string_length, info_string);
437 }
438
439 #define ROUTING_CONTEXT_LENGTH 4
440
441 static void
442 dissect_m3ua_routing_context_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
443 {
444   guint16 length, number_of_contexts, context_number;
445   guint32 context;
446   gint context_offset;
447
448   length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
449   number_of_contexts = (length - PARAMETER_HEADER_LENGTH) / 4;
450   context_offset = PARAMETER_VALUE_OFFSET;
451   for(context_number=1; context_number <= number_of_contexts; context_number++) {
452     context = tvb_get_ntohl(parameter_tvb, context_offset);
453     proto_tree_add_uint(parameter_tree, hf_m3ua_routing_context, parameter_tvb, context_offset, ROUTING_CONTEXT_LENGTH, context);
454     context_offset += ROUTING_CONTEXT_LENGTH;
455   }
456   proto_item_set_text(parameter_item, "Routing context parameter (%u context%s)", number_of_contexts, plurality(number_of_contexts, "", "s"));
457 }
458
459 static void
460 dissect_m3ua_diagnostic_information_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
461 {
462   guint16 length, diagnostic_info_length;
463   
464   length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
465   diagnostic_info_length = length - PARAMETER_HEADER_LENGTH;
466
467   proto_tree_add_bytes(parameter_tree, hf_m3ua_diagnostic_information, parameter_tvb, PARAMETER_VALUE_OFFSET, diagnostic_info_length,
468                                    tvb_get_ptr(parameter_tvb, PARAMETER_VALUE_OFFSET, diagnostic_info_length));
469
470   proto_item_set_text(parameter_item, "Diagnostic information (%u byte%s)", diagnostic_info_length, plurality(diagnostic_info_length, "", "s"));
471 }
472
473 static void
474 dissect_m3ua_heartbeat_data_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
475 {
476   guint16 length, heartbeat_data_length;
477   
478   length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
479   
480   heartbeat_data_length = length - PARAMETER_HEADER_LENGTH;
481
482   proto_tree_add_bytes(parameter_tree, hf_m3ua_heartbeat_data, parameter_tvb, PARAMETER_VALUE_OFFSET, heartbeat_data_length,
483                                    tvb_get_ptr(parameter_tvb, PARAMETER_VALUE_OFFSET, heartbeat_data_length));
484
485   proto_item_set_text(parameter_item, "Heartbeat data (%u byte%s)", heartbeat_data_length, plurality(heartbeat_data_length, "", "s"));
486 }
487
488 #define OVER_RIDE_TYPE           1
489 #define LOAD_SHARE_TYPE          2
490 #define OVER_RIDE_STANDBY_TYPE   3
491 #define LOAD_SHARE_STANDBY_TYPE  4
492
493 static const value_string m3ua_v6_traffic_mode_type_values[] = {
494   { OVER_RIDE_TYPE ,                             "Over-ride" },
495   { LOAD_SHARE_TYPE,                             "Load-share" },
496   { OVER_RIDE_STANDBY_TYPE,                      "Over-ride (standby)" },
497   { LOAD_SHARE_STANDBY_TYPE,                     "Load-share (standby)" },
498   {0,                           NULL } };
499
500 static void
501 dissect_m3ua_v6_traffic_mode_type_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
502 {
503   guint32 traffic_mode_type;
504
505   traffic_mode_type = tvb_get_ntohl(parameter_tvb, TRAFFIC_MODE_TYPE_OFFSET);
506
507   proto_tree_add_uint_format(parameter_tree, hf_m3ua_traffic_mode_type, parameter_tvb, TRAFFIC_MODE_TYPE_OFFSET, TRAFFIC_MODE_TYPE_LENGTH, traffic_mode_type,
508                              "Traffic mode type: %u (%s)", traffic_mode_type, val_to_str(traffic_mode_type, m3ua_v6_traffic_mode_type_values, "unknown"));
509   proto_item_set_text(parameter_item, "Traffic mode type parameter (%s)", val_to_str(traffic_mode_type, m3ua_v6_traffic_mode_type_values, "unknown"));
510 }
511
512 #define BROADCAST_TYPE   3
513
514 static const value_string m3ua_v10_traffic_mode_type_values[] = {
515   { OVER_RIDE_TYPE ,                             "Over-ride" },
516   { LOAD_SHARE_TYPE,                             "Load-share" },
517   { BROADCAST_TYPE,                              "Broadcast" },
518   {0,                           NULL } };
519
520 static void
521 dissect_m3ua_v10_traffic_mode_type_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
522 {
523   guint32 traffic_mode_type;
524
525   traffic_mode_type = tvb_get_ntohl(parameter_tvb, TRAFFIC_MODE_TYPE_OFFSET);
526
527   proto_tree_add_uint_format(parameter_tree, hf_m3ua_traffic_mode_type, 
528                                                parameter_tvb, TRAFFIC_MODE_TYPE_OFFSET, TRAFFIC_MODE_TYPE_LENGTH,
529                                                traffic_mode_type, "Traffic mode type: %u (%s)",
530                                                traffic_mode_type, val_to_str(traffic_mode_type, m3ua_v10_traffic_mode_type_values, "unknown"));
531   proto_item_set_text(parameter_item, "Traffic mode type parameter (%s)", val_to_str(traffic_mode_type, m3ua_v10_traffic_mode_type_values, "unknown"));
532 }
533
534 #define V6_INVALID_VERSION_ERROR_CODE               1
535 #define V6_INVALID_NETWORK_APPEARANCE_ERROR_CODE    2
536 #define V6_UNSUPPORTED_MESSAGE_CLASS_ERROR_CODE     3
537 #define V6_UNSUPPORTED_MESSAGE_TYPE_ERROR_CODE      4
538 #define V6_INVALID_TRAFFIC_HANDLING_MODE_ERROR_CODE 5
539 #define V6_UNEXPECTED_MESSAGE_ERROR_CODE            6
540 #define V6_PROTOCOL_ERROR_ERROR_CODE                7
541 #define V6_INVALID_ROUTING_CONTEXT_ERROR_CODE       8
542 #define V6_INVALID_STREAM_IDENTIFIER_ERROR_CODE     9
543 #define V6_INVALID_PARAMETER_VALUE_ERROR_CODE      10
544
545 static const value_string m3ua_v6_error_code_values[] = {
546   { V6_INVALID_VERSION_ERROR_CODE,               "Invalid version" },
547   { V6_INVALID_NETWORK_APPEARANCE_ERROR_CODE,    "Invalid network appearance" },
548   { V6_UNSUPPORTED_MESSAGE_CLASS_ERROR_CODE,     "Unsupported message class" },
549   { V6_UNSUPPORTED_MESSAGE_TYPE_ERROR_CODE,      "Unsupported message type" },
550   { V6_INVALID_TRAFFIC_HANDLING_MODE_ERROR_CODE, "Invalid traffic handling mode" },
551   { V6_UNEXPECTED_MESSAGE_ERROR_CODE,            "Unexpected message" },
552   { V6_PROTOCOL_ERROR_ERROR_CODE,                "Protocol error" },
553   { V6_INVALID_ROUTING_CONTEXT_ERROR_CODE,       "Invalid routing context" },
554   { V6_INVALID_STREAM_IDENTIFIER_ERROR_CODE,     "Invalid stream identifier" },
555   { V6_INVALID_PARAMETER_VALUE_ERROR_CODE,       "Invalid parameter value" },
556   { 0,                           NULL } };
557
558 #define ERROR_CODE_LENGTH 4
559 #define ERROR_CODE_OFFSET PARAMETER_VALUE_OFFSET
560
561 static void
562 dissect_m3ua_v6_error_code_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
563 {
564   guint32 error_code;
565
566   error_code = tvb_get_ntohl(parameter_tvb, ERROR_CODE_OFFSET);
567   proto_tree_add_uint_format(parameter_tree, hf_m3ua_error_code, parameter_tvb, ERROR_CODE_OFFSET, ERROR_CODE_LENGTH, error_code,
568                              "Error code: %u (%s)", error_code, val_to_str(error_code, m3ua_v6_error_code_values, "unknown"));
569   proto_item_set_text(parameter_item, "Error code parameter (%s)", val_to_str(error_code, m3ua_v6_error_code_values, "unknown"));
570 }
571
572
573 #define V10_INVALID_VERSION_ERROR_CODE                   0x01
574 #define V10_UNSUPPORTED_MESSAGE_CLASS_ERROR_CODE         0x03
575 #define V10_UNSUPPORTED_MESSAGE_TYPE_ERROR_CODE          0x04
576 #define V10_UNSUPPORTED_TRAFFIC_HANDLING_MODE_ERROR_CODE 0x05
577 #define V10_UNEXPECTED_MESSAGE_ERROR_CODE                0x06
578 #define V10_PROTOCOL_ERROR_ERROR_CODE                    0x07
579 #define V10_INVALID_STREAM_IDENTIFIER_ERROR_CODE         0x09
580 #define V10_REFUSED_ERROR_CODE                           0x0d
581 #define V10_ASP_IDENTIFIER_REQUIRED_ERROR_CODE           0x0e
582 #define V10_INVALID_ASP_IDENTIFIER_ERROR_CODE            0x0f
583 #define V10_INVALID_ROUTING_CONTEXT_ERROR_CODE           0x10
584 #define V10_INVALID_PARAMETER_VALUE_ERROR_CODE           0x11
585 #define V10_PARAMETER_FIELD_ERROR_CODE                   0x12
586 #define V10_UNEXPECTED_PARAMETER_ERROR_CODE              0x13
587 #define V10_DESTINATION_STATUS_UNKNOWN_ERROR_CODE        0x14
588 #define V10_INVALID_NETWORK_APPEARANCE_ERROR_CODE        0x15
589 #define V10_NO_CONFIGURED_AS_FOR_ASP_ERROR_CODE          0x16
590
591 static const value_string m3ua_v10_error_code_values[] = {
592   { V10_INVALID_VERSION_ERROR_CODE,                   "Invalid version" },
593   { V10_UNSUPPORTED_MESSAGE_CLASS_ERROR_CODE,         "Unsupported message class" },
594   { V10_UNSUPPORTED_MESSAGE_TYPE_ERROR_CODE,          "Unsupported message type" },
595   { V10_UNSUPPORTED_TRAFFIC_HANDLING_MODE_ERROR_CODE, "Unsupported traffic handling mode" },
596   { V10_UNEXPECTED_MESSAGE_ERROR_CODE,                "Unexpected message" },
597   { V10_PROTOCOL_ERROR_ERROR_CODE,                    "Protocol error" },
598   { V10_INVALID_STREAM_IDENTIFIER_ERROR_CODE,         "Invalid stream identifier" },
599   { V10_REFUSED_ERROR_CODE,                           "Refused - management blocking" },
600   { V10_ASP_IDENTIFIER_REQUIRED_ERROR_CODE,           "ASP identifier required" },
601   { V10_INVALID_ASP_IDENTIFIER_ERROR_CODE,            "Invalid ASP identifier" },
602   { V10_INVALID_ROUTING_CONTEXT_ERROR_CODE,           "Invalid routing context" },
603   { V10_INVALID_PARAMETER_VALUE_ERROR_CODE,           "Invalid parameter value" },
604   { V10_PARAMETER_FIELD_ERROR_CODE,                   "Parameter field error" },
605   { V10_UNEXPECTED_PARAMETER_ERROR_CODE,              "Unexpected parameter" },
606   { V10_DESTINATION_STATUS_UNKNOWN_ERROR_CODE,        "Destination status unknown" },
607   { V10_INVALID_NETWORK_APPEARANCE_ERROR_CODE,        "Invalid network sppearance" },
608   { V10_NO_CONFIGURED_AS_FOR_ASP_ERROR_CODE,          "No configured AS for ASP" },
609   { 0,                                            NULL } };
610
611 static void
612 dissect_m3ua_v10_error_code_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
613 {
614   guint32 error_code;
615
616   error_code = tvb_get_ntohl(parameter_tvb, ERROR_CODE_OFFSET);
617   proto_tree_add_uint_format(parameter_tree, hf_m3ua_error_code, parameter_tvb, ERROR_CODE_OFFSET, ERROR_CODE_LENGTH, error_code,
618                              "Error code: %u (%s)",error_code, val_to_str(error_code, m3ua_v10_error_code_values, "unknown"));
619   proto_item_set_text(parameter_item, "Error code parameter (%s)", val_to_str(error_code, m3ua_v10_error_code_values, "unknown"));
620 }
621
622 #define AS_STATE_CHANGE_TYPE       1
623 #define OTHER_TYPE                 2
624
625 static const value_string m3ua_status_type_values[] = {
626   { AS_STATE_CHANGE_TYPE,            "Application server state change" },
627   { OTHER_TYPE,                      "Other" },
628   { 0,                           NULL } };
629
630 #define RESERVED_INFO              1
631 #define AS_INACTIVE_INFO           2
632 #define AS_ACTIVE_INFO             3
633 #define AS_PENDING_INFO            4
634
635 #define INSUFFICIENT_ASP_RES_INFO  1
636 #define ALTERNATE_ASP_ACTIVE_INFO  2
637 #define ASP_FAILURE_INFO           3
638
639 static const value_string m3ua_status_type_info_values[] = {
640   { AS_STATE_CHANGE_TYPE * 256 * 256 + RESERVED_INFO,             "Reserved" },
641   { AS_STATE_CHANGE_TYPE * 256 * 256 + AS_INACTIVE_INFO,          "Application server inactive" },
642   { AS_STATE_CHANGE_TYPE * 256 * 256 + AS_ACTIVE_INFO,            "Application server active" },
643   { AS_STATE_CHANGE_TYPE * 256 * 256 + AS_PENDING_INFO,           "Application server pending" },
644   { OTHER_TYPE           * 256 * 256 + INSUFFICIENT_ASP_RES_INFO, "Insufficient ASP resources active in AS" },
645   { OTHER_TYPE           * 256 * 256 + ALTERNATE_ASP_ACTIVE_INFO, "Alternate ASP active" },
646   { OTHER_TYPE           * 256 * 256 + ASP_FAILURE_INFO,          "ASP Failure" },
647   {0,                           NULL } };
648
649 #define STATUS_TYPE_LENGTH 2
650 #define STATUS_INFO_LENGTH 2
651
652 #define STATUS_TYPE_OFFSET PARAMETER_VALUE_OFFSET
653 #define STATUS_INFO_OFFSET (STATUS_TYPE_OFFSET + STATUS_TYPE_LENGTH)
654
655 static void
656 dissect_m3ua_status_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
657 {
658   guint16 status_type, status_info;
659
660   status_type = tvb_get_ntohs(parameter_tvb, STATUS_TYPE_OFFSET);
661   status_info = tvb_get_ntohs(parameter_tvb, STATUS_INFO_OFFSET);
662
663   proto_tree_add_uint(parameter_tree, hf_m3ua_status_type, parameter_tvb, STATUS_TYPE_OFFSET, STATUS_TYPE_LENGTH, status_type);
664   proto_tree_add_uint_format(parameter_tree, hf_m3ua_status_info, parameter_tvb, STATUS_INFO_OFFSET, STATUS_INFO_LENGTH, status_info,
665                              "Status info: %s (%u)", val_to_str(status_type * 256 * 256 + status_info, m3ua_status_type_info_values, "unknown"), status_info);
666
667   proto_item_set_text(parameter_item, 
668                       "Status type / ID (%s)", val_to_str(status_type * 256 * 256 + status_info, m3ua_status_type_info_values, "unknown status information"));
669 }
670
671 #define ASP_IDENTIFIER_OFFSET PARAMETER_VALUE_OFFSET
672 #define ASP_IDENTIFIER_LENGTH  4
673
674 static void
675 dissect_m3ua_asp_identifier_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
676 {
677   guint32 identifier;
678   
679   identifier = tvb_get_ntohl(parameter_tvb, ASP_IDENTIFIER_OFFSET);
680   proto_tree_add_uint(parameter_tree, hf_m3ua_asp_identifier, parameter_tvb, ASP_IDENTIFIER_OFFSET, ASP_IDENTIFIER_LENGTH, identifier);
681   proto_item_set_text(parameter_item, "ASP identifier (%u)", identifier);
682 }
683
684 #define AFFECTED_MASK_LENGTH       1
685 #define AFFECTED_PC_LENGTH         3
686 #define AFFECTED_POINT_CODE_LENGTH (AFFECTED_MASK_LENGTH + AFFECTED_PC_LENGTH)
687
688 #define AFFECTED_MASK_OFFSET        0
689 #define AFFECTED_PC_OFFSET         (AFFECTED_MASK_OFFSET + AFFECTED_MASK_LENGTH)
690
691 static void
692 dissect_m3ua_affected_point_code_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
693 {
694   guint8  mask;
695   guint16 length, number_of_point_codes, point_code_number;
696   guint32 pc;
697   gint point_code_offset;
698
699   length                = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
700   number_of_point_codes = (length - PARAMETER_HEADER_LENGTH) / AFFECTED_POINT_CODE_LENGTH;
701
702   point_code_offset = PARAMETER_VALUE_OFFSET;
703   for(point_code_number=1; point_code_number <= number_of_point_codes; point_code_number++) {
704     mask = tvb_get_guint8(parameter_tvb, point_code_offset + AFFECTED_MASK_OFFSET);
705     pc   = tvb_get_ntoh24(parameter_tvb, point_code_offset + AFFECTED_PC_OFFSET);
706     proto_tree_add_uint(parameter_tree, hf_m3ua_affected_point_code_mask, parameter_tvb, point_code_offset + AFFECTED_MASK_OFFSET, AFFECTED_MASK_LENGTH, mask);
707     proto_tree_add_uint(parameter_tree, hf_m3ua_affected_point_code_pc, parameter_tvb, point_code_offset + AFFECTED_PC_OFFSET, AFFECTED_PC_LENGTH, pc);
708     point_code_offset += AFFECTED_POINT_CODE_LENGTH;
709   };
710   proto_item_set_text(parameter_item, "Affected point code parameter (%u point code%s)", number_of_point_codes, plurality(number_of_point_codes, "", "s"));
711
712 }
713
714 #define NETWORK_APPEARANCE_LENGTH 4
715 #define NETWORK_APPEARANCE_OFFSET PARAMETER_VALUE_OFFSET
716
717 static void
718 dissect_m3ua_network_appearance_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
719 {
720   guint32 network_appearance;
721
722   network_appearance = tvb_get_ntohl(parameter_tvb, NETWORK_APPEARANCE_OFFSET);
723   proto_tree_add_uint(parameter_tree, hf_m3ua_network_appearance, parameter_tvb, NETWORK_APPEARANCE_OFFSET, NETWORK_APPEARANCE_LENGTH, network_appearance);
724   proto_item_set_text(parameter_item, "Network appearance: %u", network_appearance);
725 }
726
727 #define UNKNOWN_UNAVAIL_CAUSE                  0
728 #define UNEQUIPPED_REMOTE_USER_UNAVAIL_CAUSE   1
729 #define INACCESSABLE_REMOTE_USER_UNAVAIL_CAUSE 2
730
731 static const value_string m3ua_unavailability_cause_values[] = {
732   { UNKNOWN_UNAVAIL_CAUSE,                             "Unknown" },
733   { UNEQUIPPED_REMOTE_USER_UNAVAIL_CAUSE,              "Unequipped remote user" },
734   { INACCESSABLE_REMOTE_USER_UNAVAIL_CAUSE,            "Inaccessable remote user" },
735   {0,                           NULL } };
736
737 #define RESERVED_0_USER_ID                0
738 #define RESERVED_1_USER_ID                1
739 #define RESERVED_2_USER_ID                2
740 #define SCCP_USER_ID                      3
741 #define TUP_USER_ID                       4
742 #define ISUP_USER_ID                      5
743 #define RESERVED_6_USER_ID                6
744 #define RESERVED_7_USER_ID                7
745 #define RESERVED_8_USER_ID                8
746 #define BROADBAND_ISUP_USER_ID            9
747 #define SATELLITE_ISUP_USER_ID           10
748
749 static const value_string m3ua_user_identity_values[] = {
750   { RESERVED_0_USER_ID,                             "Reserved" },
751   { RESERVED_1_USER_ID,                             "Reserved" },
752   { RESERVED_2_USER_ID,                             "Reserved" },
753   { SCCP_USER_ID,                                   "SCCP" },
754   { TUP_USER_ID,                                    "TUP" },
755   { ISUP_USER_ID,                                   "ISUP" },
756   { RESERVED_6_USER_ID,                             "Reserved" },
757   { RESERVED_7_USER_ID,                             "Reserved" },
758   { RESERVED_8_USER_ID,                             "Reserved" },
759   { BROADBAND_ISUP_USER_ID,                         "Broadband ISUP" },
760   { SATELLITE_ISUP_USER_ID,                         "Satellite ISUP" },
761   {0,                           NULL } };
762
763 #define CAUSE_LENGTH 2
764 #define USER_LENGTH  2
765
766 #define CAUSE_OFFSET  PARAMETER_VALUE_OFFSET
767 #define USER_OFFSET   (CAUSE_OFFSET + CAUSE_LENGTH)
768
769 static void
770 dissect_m3ua_user_cause_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
771 {
772   guint16 cause, user;
773
774   cause = tvb_get_ntohs(parameter_tvb, CAUSE_OFFSET);
775   user  = tvb_get_ntohs(parameter_tvb, USER_OFFSET);
776
777   proto_tree_add_uint(parameter_tree, hf_m3ua_unavailability_cause, parameter_tvb, CAUSE_OFFSET, CAUSE_LENGTH, cause);
778   proto_tree_add_uint(parameter_tree, hf_m3ua_user_identity, parameter_tvb, USER_OFFSET, USER_LENGTH, user);
779   proto_item_set_text(parameter_item, "User / Cause parameter (%s: %s)",
780                                   val_to_str(user, m3ua_user_identity_values, "Unknown user"),
781                       val_to_str(cause, m3ua_unavailability_cause_values, "unknown cause"));
782 }
783
784 static void
785 dissect_m3ua_protocol_data_1_parameter(tvbuff_t *parameter_tvb, packet_info *pinfo, proto_tree *tree, proto_tree *parameter_tree, proto_item *parameter_item)
786 {
787   guint16 length, protocol_data_length;
788   tvbuff_t *payload_tvb;
789
790   length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
791   protocol_data_length = length - PARAMETER_HEADER_LENGTH;
792   payload_tvb          = tvb_new_subset(parameter_tvb, PROTOCOL_DATA_OFFSET, protocol_data_length, protocol_data_length);
793   proto_item_set_text(parameter_item, "Protocol data (SS7 message of %u byte%s)", protocol_data_length, plurality(protocol_data_length, "", "s"));
794   proto_item_set_len(parameter_item, PARAMETER_HEADER_LENGTH);
795   call_dissector(mtp3_handle, payload_tvb, pinfo, tree);
796
797 }
798
799 #define LI_OCTETT_LENGTH 1
800 #define LI_OCTETT_OFFSET PARAMETER_VALUE_OFFSET
801
802 static void
803 dissect_m3ua_protocol_data_2_parameter(tvbuff_t *parameter_tvb, packet_info *pinfo, proto_tree *tree, proto_tree *parameter_tree, proto_item *parameter_item)
804 {
805   guint8 li;
806   guint16 length, protocol_data_length;
807   tvbuff_t *payload_tvb;
808
809   length               = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
810   li                   = tvb_get_guint8(parameter_tvb, LI_OCTETT_OFFSET);
811   protocol_data_length = length - PARAMETER_HEADER_LENGTH - LI_OCTETT_LENGTH;
812   payload_tvb          = tvb_new_subset(parameter_tvb, PROTOCOL_DATA_OFFSET + LI_OCTETT_LENGTH, protocol_data_length, protocol_data_length);
813   proto_tree_add_uint(parameter_tree, hf_m3ua_li, parameter_tvb, LI_OCTETT_OFFSET, LI_OCTETT_LENGTH, li);
814   proto_item_set_text(parameter_item, "Protocol data (SS7 message of %u byte%s)", protocol_data_length, plurality(protocol_data_length, "", "s"));
815   proto_item_set_len(parameter_item, PARAMETER_HEADER_LENGTH + LI_OCTETT_LENGTH);
816   call_dissector(mtp3_handle, payload_tvb, pinfo, tree);
817 }
818
819 static void
820 dissect_m3ua_reason_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
821 {
822   guint32 reason;
823
824   reason = tvb_get_ntohl(parameter_tvb, REASON_OFFSET);
825
826   proto_tree_add_uint(parameter_tree, hf_m3ua_reason, parameter_tvb, REASON_OFFSET, REASON_LENGTH, reason);
827   proto_item_set_text(parameter_item, "Reason parameter (%s)", val_to_str(reason, m3ua_reason_values, "unknown"));
828 }
829
830 #define NO_CONGESTION_LEVEL         0
831 #define CONGESTION_LEVEL_1_LEVEL    1
832 #define CONGESTION_LEVEL_2_LEVEL    2
833 #define CONGESTION_LEVEL_3_LEVEL    3
834
835 static const value_string m3ua_congestion_level_values[] = {
836   { NO_CONGESTION_LEVEL,                             "No congestion or undefined" },
837   { CONGESTION_LEVEL_1_LEVEL,                        "Congestion level 1" },
838   { CONGESTION_LEVEL_2_LEVEL,                        "Congestion level 2" },
839   { CONGESTION_LEVEL_3_LEVEL,                        "Congestion level 3" },
840   {0,                           NULL } };
841
842 #define CONG_IND_RESERVED_LENGTH    3
843 #define CONG_IND_LEVEL_LENGTH       1
844
845 #define CONG_IND_RESERVED_OFFSET     PARAMETER_VALUE_OFFSET
846 #define CONG_IND_LEVEL_OFFSET        (CONG_IND_RESERVED_OFFSET + CONG_IND_RESERVED_LENGTH)
847
848 static void
849 dissect_m3ua_congestion_indication_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
850 {
851   guint8 level;
852   
853   level = tvb_get_guint8(parameter_tvb, CONG_IND_LEVEL_OFFSET);
854
855   proto_tree_add_bytes(parameter_tree, hf_m3ua_congestion_reserved, parameter_tvb, CONG_IND_RESERVED_OFFSET, CONG_IND_RESERVED_LENGTH,
856                        tvb_get_ptr(parameter_tvb, CONG_IND_RESERVED_OFFSET, CONG_IND_RESERVED_LENGTH));
857   proto_tree_add_uint(parameter_tree, hf_m3ua_congestion_level, parameter_tvb, CONG_IND_LEVEL_OFFSET, CONG_IND_LEVEL_LENGTH, level);
858   proto_item_set_text(parameter_item, "Congestion indication(%s)", val_to_str(level, m3ua_congestion_level_values, "unknown"));
859 }
860
861 #define CON_DEST_RESERVED_LENGTH    1
862 #define CON_DEST_PC_LENGTH          3
863
864 #define CON_DEST_RESERVED_OFFSET    PARAMETER_VALUE_OFFSET
865 #define CON_DEST_PC_OFFSET          (CON_DEST_RESERVED_OFFSET + CON_DEST_RESERVED_LENGTH)
866
867 static void
868 dissect_m3ua_concerned_destination_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
869 {
870   guint32 pc;
871   
872   pc = tvb_get_ntoh24(parameter_tvb, CON_DEST_PC_OFFSET);
873
874   proto_tree_add_bytes(parameter_tree, hf_m3ua_concerned_dest_reserved, parameter_tvb, CON_DEST_RESERVED_OFFSET, CON_DEST_RESERVED_LENGTH,
875                        tvb_get_ptr(parameter_tvb, CON_DEST_RESERVED_OFFSET, CON_DEST_RESERVED_LENGTH));
876   proto_tree_add_uint(parameter_tree, hf_m3ua_concerned_dest_pc, parameter_tvb, CON_DEST_PC_OFFSET, CON_DEST_PC_LENGTH, pc);
877   proto_item_set_text(parameter_item, "Concerned destination (%u)", pc);
878 }
879
880 static void
881 dissect_m3ua_routing_key_parameter(tvbuff_t *parameter_tvb, packet_info *pinfo, proto_tree *tree, proto_tree *parameter_tree, proto_item *parameter_item)
882 {
883   tvbuff_t *parameters_tvb;
884   guint16 length, parameters_length;
885   
886   length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
887   parameters_length = length - PARAMETER_HEADER_LENGTH;
888   parameters_tvb          = tvb_new_subset(parameter_tvb, PARAMETER_VALUE_OFFSET, parameters_length, parameters_length);
889   dissect_m3ua_parameters(parameters_tvb, pinfo, tree, parameter_tree);
890   proto_item_set_text(parameter_item, "Routing key");
891 }
892
893 static const value_string m3ua_registration_result_status_values[] = {
894   { 0,           "Successfully Registered" } ,
895   { 1,           "Error - Unknown" } ,
896   { 2,           "Error - Invalid DPC" } ,
897   { 3,           "Error - Invalid Network Appearance" } ,
898   { 4,           "Error - Invalid Routing Key" } ,
899   { 5,           "Error - Permission Denied" } ,
900   { 6,           "Error - Overlapping (Non-unique) Routing Key" } ,
901   { 7,           "Error - Routing Key not Provisioned" } ,
902   { 8,           "Error - Insufficient Resources" } ,
903   { 0,           NULL } };
904
905 #define REG_RES_IDENTIFIER_LENGTH 4
906 #define REG_RES_STATUS_LENGTH     4
907 #define REG_RES_CONTEXT_LENGTH    4
908
909 #define REG_RES_IDENTIFIER_OFFSET PARAMETER_VALUE_OFFSET
910 #define REG_RES_STATUS_OFFSET     (REG_RES_IDENTIFIER_OFFSET + REG_RES_IDENTIFIER_LENGTH)
911 #define REG_RES_CONTEXT_OFFSET    (REG_RES_STATUS_OFFSET + REG_RES_STATUS_LENGTH)
912
913 static void
914 dissect_m3ua_v6_registration_result_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
915 {
916   guint32 id, status, context;
917
918   id      = tvb_get_ntohl(parameter_tvb, REG_RES_IDENTIFIER_OFFSET);
919   status  = tvb_get_ntohl(parameter_tvb, REG_RES_STATUS_OFFSET);
920   context = tvb_get_ntohl(parameter_tvb, REG_RES_CONTEXT_OFFSET);
921
922   proto_tree_add_uint(parameter_tree, hf_m3ua_registration_result_identifier, parameter_tvb, REG_RES_IDENTIFIER_OFFSET, REG_RES_IDENTIFIER_LENGTH, id);
923   proto_tree_add_uint(parameter_tree, hf_m3ua_registration_result_status, parameter_tvb, REG_RES_STATUS_OFFSET, REG_RES_STATUS_LENGTH, status);
924   proto_tree_add_uint(parameter_tree, hf_m3ua_registration_result_context, parameter_tvb, REG_RES_CONTEXT_OFFSET, REG_RES_CONTEXT_LENGTH, context); 
925   proto_item_set_text(parameter_item, "Registration result");
926 }
927
928 static void
929 dissect_m3ua_v10_registration_result_parameter(tvbuff_t *parameter_tvb, packet_info *pinfo, proto_tree *tree, proto_tree *parameter_tree, proto_item *parameter_item)
930 {
931   tvbuff_t *parameters_tvb;
932   guint16 length, parameters_length;
933   
934   length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
935   parameters_length = length - PARAMETER_HEADER_LENGTH;
936   parameters_tvb          = tvb_new_subset(parameter_tvb, PARAMETER_VALUE_OFFSET, parameters_length, parameters_length);
937   dissect_m3ua_parameters(parameters_tvb, pinfo, tree, parameter_tree);
938   proto_item_set_text(parameter_item, "Registration result");
939 }
940
941 static const value_string m3ua_deregistration_result_status_values[] = {
942   { 0,           "Successfully De-registered" } ,
943   { 1,           "Error - Unknown" } ,
944   { 2,           "Error - Invalid Routing context" } ,
945   { 3,           "Error - Permission Denied" } ,
946   { 4,           "Error - Not registered" } ,
947   { 0,           NULL } };
948
949 #define DEREG_RES_CONTEXT_LENGTH 4
950 #define DEREG_RES_STATUS_LENGTH  4
951
952 #define DEREG_RES_CONTEXT_OFFSET PARAMETER_VALUE_OFFSET
953 #define DEREG_RES_STATUS_OFFSET  (DEREG_RES_CONTEXT_OFFSET + DEREG_RES_CONTEXT_LENGTH)
954
955 static void
956 dissect_m3ua_v6_deregistration_result_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
957 {
958   guint32 status, context;
959
960   context = tvb_get_ntohl(parameter_tvb, DEREG_RES_CONTEXT_OFFSET);
961   status  = tvb_get_ntohl(parameter_tvb, DEREG_RES_STATUS_OFFSET);
962
963   proto_tree_add_uint(parameter_tree, hf_m3ua_deregistration_result_context, parameter_tvb, DEREG_RES_CONTEXT_OFFSET, DEREG_RES_CONTEXT_LENGTH, context); 
964   proto_tree_add_uint(parameter_tree, hf_m3ua_deregistration_result_status, parameter_tvb, DEREG_RES_STATUS_OFFSET, DEREG_RES_STATUS_LENGTH, status);
965   proto_item_set_text(parameter_item, "De-registration result");
966
967 }
968
969 static void
970 dissect_m3ua_v10_deregistration_result_parameter(tvbuff_t *parameter_tvb, packet_info *pinfo, proto_tree *tree, proto_tree *parameter_tree, proto_item *parameter_item)
971 {
972   tvbuff_t *parameters_tvb;
973   guint16 length, parameters_length;
974   
975   length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
976   parameters_length = length - PARAMETER_HEADER_LENGTH;
977   parameters_tvb          = tvb_new_subset(parameter_tvb, PARAMETER_VALUE_OFFSET, parameters_length, parameters_length);
978   dissect_m3ua_parameters(parameters_tvb, pinfo, tree, parameter_tree);
979   proto_item_set_text(parameter_item, "Deregistration result");
980 }
981
982
983 #define LOCAL_RK_IDENTIFIER_OFFSET PARAMETER_VALUE_OFFSET
984 #define LOCAL_RK_IDENTIFIER_LENGTH 4
985
986 static void
987 dissect_m3ua_local_routing_key_identifier_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
988 {
989   guint32 id;
990   
991   id = tvb_get_ntohl(parameter_tvb, LOCAL_RK_IDENTIFIER_OFFSET);
992   proto_tree_add_uint(parameter_tree, hf_m3ua_local_rk_identifier, parameter_tvb, LOCAL_RK_IDENTIFIER_OFFSET, LOCAL_RK_IDENTIFIER_LENGTH, id);
993   proto_item_set_text(parameter_item, "Local routing key identifier (%u)", id);
994 }
995
996 #define DPC_MASK_LENGTH    1
997 #define DPC_PC_LENGTH      3
998
999 #define DPC_MASK_OFFSET    PARAMETER_VALUE_OFFSET
1000 #define DPC_PC_OFFSET      (DPC_MASK_OFFSET + DPC_MASK_LENGTH)
1001
1002 static void
1003 dissect_m3ua_destination_point_code_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
1004 {
1005   guint32 pc;
1006   guint8  mask;
1007  
1008   mask = tvb_get_guint8(parameter_tvb, DPC_MASK_OFFSET);
1009   pc   = tvb_get_ntoh24(parameter_tvb, DPC_PC_OFFSET);
1010
1011   proto_tree_add_uint(parameter_tree, hf_m3ua_dpc_mask, parameter_tvb, DPC_MASK_OFFSET, DPC_MASK_LENGTH, mask);
1012   proto_tree_add_uint(parameter_tree, hf_m3ua_dpc_pc, parameter_tvb, DPC_PC_OFFSET, DPC_PC_LENGTH, pc);
1013   proto_item_set_text(parameter_item, "Destination point code (%u)", pc);
1014 }
1015
1016 #define SI_LENGTH 1
1017
1018 static void
1019 dissect_m3ua_service_indicators_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
1020 {
1021   guint8  si;
1022   guint16 length, number_of_sis, si_number;
1023   gint si_offset;
1024
1025   length        = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
1026   number_of_sis = length - PARAMETER_HEADER_LENGTH;
1027
1028   si_offset = PARAMETER_VALUE_OFFSET;
1029   for(si_number=1; si_number <= number_of_sis; si_number++) {
1030     si = tvb_get_guint8(parameter_tvb, si_offset);
1031     proto_tree_add_uint(parameter_tree, hf_m3ua_si, parameter_tvb, si_offset, SI_LENGTH, si);
1032     si_offset += SI_LENGTH;
1033   };
1034   proto_item_set_text(parameter_item, "Service indicators (%u indicator%s)", number_of_sis, plurality(number_of_sis, "", "s"));
1035
1036 }
1037 #define SSN_LENGTH 1
1038
1039 static void
1040 dissect_m3ua_subsystem_numbers_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
1041 {
1042   guint8  ssn;
1043   guint16 length, number_of_ssns, ssn_number;
1044   gint ssn_offset;
1045
1046   length         = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
1047   number_of_ssns = length - PARAMETER_HEADER_LENGTH;
1048
1049   ssn_offset = PARAMETER_VALUE_OFFSET;
1050   for(ssn_number=1; ssn_number <= number_of_ssns; ssn_number++) {
1051     ssn = tvb_get_guint8(parameter_tvb, ssn_offset);
1052     proto_tree_add_uint(parameter_tree, hf_m3ua_ssn, parameter_tvb, ssn_offset, SSN_LENGTH, ssn);
1053     ssn_offset += SSN_LENGTH;
1054   };
1055   proto_item_set_text(parameter_item, "Subsystem numbers (%u number%s)", number_of_ssns, plurality(number_of_ssns, "", "s"));
1056
1057 }
1058
1059 #define OPC_MASK_LENGTH             1
1060 #define OPC_PC_LENGTH               3
1061 #define OPC_LENGTH                  (OPC_MASK_LENGTH + OPC_PC_LENGTH)
1062 #define OPC_MASK_OFFSET             0
1063 #define OPC_PC_OFFSET               (OPC_MASK_OFFSET + OPC_MASK_LENGTH)
1064
1065 static void
1066 dissect_m3ua_originating_point_code_list_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
1067 {
1068   guint8  mask;
1069   guint16 length, number_of_point_codes, point_code_number;
1070   guint32 pc;
1071   gint point_code_offset;
1072
1073   length                = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
1074   number_of_point_codes = (length - PARAMETER_HEADER_LENGTH) / 4;
1075
1076   point_code_offset = PARAMETER_VALUE_OFFSET;
1077   for(point_code_number=1; point_code_number <= number_of_point_codes; point_code_number++) {
1078     mask = tvb_get_guint8(parameter_tvb, point_code_offset + AFFECTED_MASK_OFFSET);
1079     pc   = tvb_get_ntoh24(parameter_tvb, point_code_offset + AFFECTED_PC_OFFSET);
1080     proto_tree_add_uint(parameter_tree, hf_m3ua_opc_list_mask, parameter_tvb, point_code_offset + OPC_MASK_OFFSET, OPC_MASK_LENGTH, mask);
1081     proto_tree_add_uint(parameter_tree, hf_m3ua_opc_list_pc, parameter_tvb, point_code_offset + OPC_PC_OFFSET, OPC_PC_LENGTH, pc);
1082     point_code_offset += OPC_LENGTH;
1083   };
1084   proto_item_set_text(parameter_item, "Originating point code list (%u point code%s)", number_of_point_codes, plurality(number_of_point_codes, "", "s"));
1085 }
1086
1087 #define CIC_RANGE_MASK_LENGTH             1
1088 #define CIC_RANGE_PC_LENGTH               3
1089 #define CIC_RANGE_LOWER_LENGTH            2
1090 #define CIC_RANGE_UPPER_LENGTH            2
1091 #define CIC_RANGE_LENGTH                  (CIC_RANGE_MASK_LENGTH + CIC_RANGE_PC_LENGTH + CIC_RANGE_LOWER_LENGTH + CIC_RANGE_UPPER_LENGTH)
1092 #define CIC_RANGE_MASK_OFFSET             0
1093 #define CIC_RANGE_PC_OFFSET               (CIC_RANGE_MASK_OFFSET + CIC_RANGE_MASK_LENGTH)
1094 #define CIC_RANGE_LOWER_OFFSET            (CIC_RANGE_PC_OFFSET + CIC_RANGE_PC_LENGTH)
1095 #define CIC_RANGE_UPPER_OFFSET            (CIC_RANGE_LOWER_OFFSET + CIC_RANGE_LOWER_LENGTH)
1096
1097 static void
1098 dissect_m3ua_circuit_range_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
1099 {
1100   guint8  mask;
1101   guint16 length, number_of_point_codes, point_code_number, lower, upper;
1102   guint32 pc;
1103   gint point_code_offset;
1104
1105   length                = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
1106   number_of_point_codes = (length - PARAMETER_HEADER_LENGTH) / CIC_RANGE_LENGTH;
1107
1108   point_code_offset = PARAMETER_VALUE_OFFSET;
1109   for(point_code_number = 1; point_code_number <= number_of_point_codes; point_code_number++) {
1110     mask  = tvb_get_guint8(parameter_tvb, point_code_offset + CIC_RANGE_MASK_OFFSET);
1111     pc    = tvb_get_ntoh24(parameter_tvb, point_code_offset + CIC_RANGE_PC_OFFSET);
1112     lower = tvb_get_ntohs(parameter_tvb, point_code_offset + CIC_RANGE_LOWER_OFFSET);
1113     upper = tvb_get_ntohs(parameter_tvb, point_code_offset + CIC_RANGE_UPPER_OFFSET);
1114
1115     proto_tree_add_uint(parameter_tree, hf_m3ua_cic_range_mask, parameter_tvb, point_code_offset + CIC_RANGE_MASK_OFFSET, CIC_RANGE_MASK_LENGTH, mask);
1116     proto_tree_add_uint(parameter_tree, hf_m3ua_cic_range_pc, parameter_tvb, point_code_offset + CIC_RANGE_PC_OFFSET, CIC_RANGE_PC_LENGTH, pc);
1117     proto_tree_add_uint(parameter_tree, hf_m3ua_cic_range_lower, parameter_tvb, point_code_offset + CIC_RANGE_LOWER_OFFSET, CIC_RANGE_LOWER_LENGTH, lower);
1118     proto_tree_add_uint(parameter_tree, hf_m3ua_cic_range_upper, parameter_tvb, point_code_offset + CIC_RANGE_UPPER_OFFSET, CIC_RANGE_UPPER_LENGTH, upper);
1119     point_code_offset += CIC_RANGE_LENGTH;
1120   };
1121   proto_item_set_text(parameter_item, "Circuit range (%u range%s)", number_of_point_codes, plurality(number_of_point_codes, "", "s"));
1122 }
1123
1124 #define DATA_OPC_LENGTH   4
1125 #define DATA_DPC_LENGTH   4
1126 #define DATA_SI_LENGTH    1
1127 #define DATA_NI_LENGTH    1
1128 #define DATA_MP_LENGTH    1
1129 #define DATA_SLS_LENGTH   1
1130 #define DATA_HDR_LENGTH   (DATA_OPC_LENGTH + DATA_DPC_LENGTH + DATA_SI_LENGTH + DATA_NI_LENGTH + DATA_MP_LENGTH + DATA_SLS_LENGTH)
1131
1132 #define DATA_OPC_OFFSET   PARAMETER_VALUE_OFFSET
1133 #define DATA_DPC_OFFSET   (DATA_OPC_OFFSET + DATA_OPC_LENGTH)
1134 #define DATA_SI_OFFSET    (DATA_DPC_OFFSET + DATA_DPC_LENGTH)
1135 #define DATA_NI_OFFSET    (DATA_SI_OFFSET + DATA_SI_LENGTH)
1136 #define DATA_MP_OFFSET    (DATA_NI_OFFSET + DATA_NI_LENGTH)
1137 #define DATA_SLS_OFFSET   (DATA_MP_OFFSET + DATA_MP_LENGTH)
1138 #define DATA_ULP_OFFSET   (DATA_SLS_OFFSET + DATA_SLS_LENGTH)
1139
1140 static void
1141 dissect_m3ua_protocol_data_parameter(tvbuff_t *parameter_tvb, packet_info *pinfo, proto_tree *tree, proto_tree *parameter_tree, proto_item *parameter_item)
1142 {
1143   guint32 opc, dpc;
1144   guint16 length, ulp_length;
1145   guint8 si, ni, mp, sls;
1146   tvbuff_t *payload_tvb;
1147
1148   length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
1149   ulp_length = length - PARAMETER_HEADER_LENGTH - DATA_HDR_LENGTH;
1150   payload_tvb          = tvb_new_subset(parameter_tvb, DATA_ULP_OFFSET, ulp_length, ulp_length);
1151   opc = tvb_get_ntohl(parameter_tvb, DATA_OPC_OFFSET);
1152   dpc = tvb_get_ntohl(parameter_tvb, DATA_DPC_OFFSET);
1153   si  = tvb_get_guint8(parameter_tvb, DATA_SI_OFFSET);
1154   ni  = tvb_get_guint8(parameter_tvb, DATA_NI_OFFSET);
1155   mp  = tvb_get_guint8(parameter_tvb, DATA_MP_OFFSET);
1156   sls = tvb_get_guint8(parameter_tvb, DATA_SLS_OFFSET);
1157   proto_tree_add_uint(parameter_tree, hf_m3ua_protocol_data_opc, parameter_tvb, DATA_OPC_OFFSET, DATA_OPC_LENGTH, opc);
1158   proto_tree_add_uint(parameter_tree, hf_m3ua_protocol_data_dpc, parameter_tvb, DATA_DPC_OFFSET, DATA_DPC_LENGTH, dpc);
1159   proto_tree_add_uint(parameter_tree, hf_m3ua_protocol_data_si,  parameter_tvb, DATA_SI_OFFSET,  DATA_SI_LENGTH,  si);
1160   proto_tree_add_uint(parameter_tree, hf_m3ua_protocol_data_ni,  parameter_tvb, DATA_NI_OFFSET,  DATA_NI_LENGTH,  ni);
1161   proto_tree_add_uint(parameter_tree, hf_m3ua_protocol_data_mp,  parameter_tvb, DATA_MP_OFFSET,  DATA_MP_LENGTH,  mp);
1162   proto_tree_add_uint(parameter_tree, hf_m3ua_protocol_data_sls, parameter_tvb, DATA_SLS_OFFSET, DATA_SLS_LENGTH, sls);
1163
1164   proto_item_set_text(parameter_item, "Protocol data (SS7 message of %u byte%s)", ulp_length, plurality(ulp_length, "", "s"));
1165   proto_item_set_len(parameter_item, PARAMETER_HEADER_LENGTH + DATA_HDR_LENGTH);
1166   
1167   if (!dissector_try_port(m3ua_si_dissector_table, si, payload_tvb, pinfo, tree)) {
1168     call_dissector(data_handle, payload_tvb, pinfo, tree);
1169   }
1170 }
1171
1172 #define CORR_ID_OFFSET PARAMETER_VALUE_OFFSET
1173 #define CORR_ID_LENGTH 4
1174
1175 static void
1176 dissect_m3ua_correlation_identifier_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
1177 {
1178   guint32 id;
1179   
1180   id = tvb_get_ntohl(parameter_tvb, CORR_ID_OFFSET);
1181   proto_tree_add_uint(parameter_tree, hf_m3ua_correlation_identifier, parameter_tvb, CORR_ID_OFFSET, CORR_ID_LENGTH, id);
1182   proto_item_set_text(parameter_item, "Correlation Identifer (%u)", id);
1183 }
1184
1185 #define REG_STATUS_LENGTH  4
1186 #define REG_STATUS_OFFSET  PARAMETER_VALUE_OFFSET
1187
1188 static const value_string m3ua_registration_status_values[] = {
1189   {  0,           "Successfully Registered" },
1190   {  1,           "Error - Unknown" },
1191   {  2,           "Error - Invalid DPC" },
1192   {  3,           "Error - Invalid Network Appearance" },
1193   {  4,           "Error - Invalid Routing Key" },
1194   {  5,           "Error - Permission Denied" },
1195   {  6,           "Error - Cannot Support Unique Routing" },
1196   {  7,           "Error - Routing Key not Currently Provisioned" },
1197   {  8,           "Error - Insufficient Resources" },
1198   {  9,           "Error - Unsupported RK parameter Field" },
1199   { 10,           "Error - Unsupported/Invalid Traffic Handling Mode" },
1200   {  0,           NULL } };
1201
1202 static void
1203 dissect_m3ua_registration_status_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
1204 {
1205   guint32 status;
1206   
1207   status = tvb_get_ntohl(parameter_tvb, REG_STATUS_OFFSET);
1208   proto_tree_add_uint(parameter_tree, hf_m3ua_registration_status, parameter_tvb, REG_STATUS_OFFSET, REG_STATUS_LENGTH, status);
1209   proto_item_set_text(parameter_item, "Registration status (%s)", val_to_str(status, m3ua_registration_status_values, "unknown"));
1210 }
1211
1212 #define DEREG_STATUS_LENGTH  4
1213 #define DEREG_STATUS_OFFSET  PARAMETER_VALUE_OFFSET
1214
1215 static const value_string m3ua_deregistration_status_values[] = {
1216   { 0,          "Successfully Deregistered" },
1217   { 1,          "Error - Unknown" },
1218   { 2,          "Error - Invalid Routing Context" },
1219   { 3,          "Error - Permission Denied" },
1220   { 4,          "Error - Not Registered" },
1221   { 5,          "Error - ASP Currently Active for Routing Context" },
1222   { 0,          NULL } };
1223
1224 static void
1225 dissect_m3ua_deregistration_status_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
1226 {
1227   guint32 status;
1228   
1229   status = tvb_get_ntohl(parameter_tvb, DEREG_STATUS_OFFSET);
1230   proto_tree_add_uint(parameter_tree, hf_m3ua_deregistration_status, parameter_tvb, DEREG_STATUS_OFFSET, DEREG_STATUS_LENGTH, status);
1231   proto_item_set_text(parameter_item, "Deregistration status (%s)", val_to_str(status, m3ua_deregistration_status_values, "unknown"));
1232 }
1233
1234 static void
1235 dissect_m3ua_registration_results_parameter(tvbuff_t *parameter_tvb, packet_info *pinfo, proto_tree *tree, proto_tree *parameter_tree, proto_item *parameter_item)
1236 {
1237   tvbuff_t *parameters_tvb;
1238   guint16 length, parameters_length;
1239   
1240   length            = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
1241   parameters_length = length - PARAMETER_HEADER_LENGTH;
1242   parameters_tvb    = tvb_new_subset(parameter_tvb, PARAMETER_VALUE_OFFSET, parameters_length, parameters_length);
1243   dissect_m3ua_parameters(parameters_tvb, pinfo, tree, parameter_tree);
1244   proto_item_set_text(parameter_item, "Registration results");
1245 }
1246
1247 static void
1248 dissect_m3ua_deregistration_results_parameter(tvbuff_t *parameter_tvb, packet_info *pinfo, proto_tree *tree, proto_tree *parameter_tree, proto_item *parameter_item)
1249 {
1250   tvbuff_t *parameters_tvb;
1251   guint16 length, parameters_length;
1252   
1253   length            = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
1254   parameters_length = length - PARAMETER_HEADER_LENGTH;
1255   parameters_tvb    = tvb_new_subset(parameter_tvb, PARAMETER_VALUE_OFFSET, parameters_length, parameters_length);
1256   dissect_m3ua_parameters(parameters_tvb, pinfo, tree, parameter_tree);
1257   proto_item_set_text(parameter_item, "Deregistration results");
1258 }
1259
1260 static void
1261 dissect_m3ua_unknown_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
1262 {
1263   guint16 tag, length, parameter_value_length;
1264   
1265   tag    = tvb_get_ntohs(parameter_tvb, PARAMETER_TAG_OFFSET);
1266   length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
1267   
1268   parameter_value_length = length - PARAMETER_HEADER_LENGTH;
1269
1270   proto_tree_add_bytes(parameter_tree, hf_m3ua_parameter_value, parameter_tvb, PARAMETER_VALUE_OFFSET, parameter_value_length, 
1271                        tvb_get_ptr(parameter_tvb, PARAMETER_VALUE_OFFSET, parameter_value_length));
1272
1273   proto_item_set_text(parameter_item, "Parameter with tag %u and %u byte%s value", tag, parameter_value_length, plurality(parameter_value_length, "", "s"));
1274 }
1275
1276 static void
1277 dissect_m3ua_v6_parameter(tvbuff_t *parameter_tvb, packet_info *pinfo, proto_tree *tree, proto_tree *m3ua_tree)
1278 {
1279   guint16 tag, length, padding_length, total_length;
1280   proto_item *parameter_item;
1281   proto_tree *parameter_tree;
1282
1283   /* extract tag and length from the parameter */
1284   tag            = tvb_get_ntohs(parameter_tvb, PARAMETER_TAG_OFFSET);
1285   length         = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
1286
1287   /* calculate padding and total length */
1288   padding_length = tvb_length(parameter_tvb) - length;
1289   total_length   = length + padding_length;
1290
1291   /* create proto_tree stuff */
1292   parameter_item   = proto_tree_add_text(m3ua_tree, parameter_tvb, PARAMETER_HEADER_OFFSET, total_length, "Incomplete parameter");
1293   parameter_tree   = proto_item_add_subtree(parameter_item, ett_m3ua_parameter);
1294
1295   /* add tag and length to the m3ua tree */
1296   proto_tree_add_uint_format(parameter_tree, hf_m3ua_parameter_tag, parameter_tvb, PARAMETER_TAG_OFFSET, PARAMETER_TAG_LENGTH, tag, 
1297                              "Parameter tag: %s (0x%x)", val_to_str(tag, m3ua_v6_parameter_tag_values, "unknown"), tag);
1298   proto_tree_add_uint(parameter_tree, hf_m3ua_parameter_length, parameter_tvb, PARAMETER_LENGTH_OFFSET, PARAMETER_LENGTH_LENGTH, length);
1299
1300   switch(tag) {
1301   case V6_NETWORK_APPEARANCE_PARAMETER_TAG:
1302     dissect_m3ua_network_appearance_parameter(parameter_tvb, parameter_tree, parameter_item);
1303     break;
1304   case V6_PROTOCOL_DATA_1_PARAMETER_TAG:
1305     dissect_m3ua_protocol_data_1_parameter(parameter_tvb, pinfo, tree, parameter_tree, parameter_item);
1306     break;
1307   case V6_PROTOCOL_DATA_2_PARAMETER_TAG:
1308     dissect_m3ua_protocol_data_2_parameter(parameter_tvb, pinfo, tree, parameter_tree, parameter_item);
1309     break;
1310   case V6_INFO_PARAMETER_TAG:
1311     dissect_m3ua_info_string_parameter(parameter_tvb, parameter_tree, parameter_item);
1312     break;
1313   case V6_AFFECTED_DESTINATIONS_PARAMETER_TAG:
1314     dissect_m3ua_affected_point_code_parameter(parameter_tvb, parameter_tree, parameter_item);
1315     break;
1316   case V6_ROUTING_CONTEXT_PARAMETER_TAG:
1317     dissect_m3ua_routing_context_parameter(parameter_tvb, parameter_tree, parameter_item);
1318     break;
1319   case V6_DIAGNOSTIC_INFORMATION_PARAMETER_TAG:
1320     dissect_m3ua_diagnostic_information_parameter(parameter_tvb, parameter_tree, parameter_item);
1321     break;
1322   case V6_HEARTBEAT_DATA_PARAMETER_TAG:
1323     dissect_m3ua_heartbeat_data_parameter(parameter_tvb, parameter_tree, parameter_item);
1324     break;
1325   case V6_USER_CAUSE_PARAMETER_TAG:
1326     dissect_m3ua_user_cause_parameter(parameter_tvb, parameter_tree, parameter_item);
1327     break;
1328   case V6_REASON_PARAMETER_TAG:
1329     dissect_m3ua_reason_parameter(parameter_tvb, parameter_tree, parameter_item);
1330     break;
1331   case V6_TRAFFIC_MODE_TYPE_PARAMETER_TAG:
1332     dissect_m3ua_v6_traffic_mode_type_parameter(parameter_tvb, parameter_tree, parameter_item);
1333     break;
1334   case V6_ERROR_CODE_PARAMETER_TAG:
1335     dissect_m3ua_v6_error_code_parameter(parameter_tvb, parameter_tree, parameter_item);
1336     break;
1337   case V6_STATUS_PARAMETER_TAG:
1338     dissect_m3ua_status_parameter(parameter_tvb, parameter_tree, parameter_item);
1339     break;
1340   case V6_CONGESTION_INDICATION_PARAMETER_TAG:
1341     dissect_m3ua_congestion_indication_parameter(parameter_tvb, parameter_tree, parameter_item);
1342     break;
1343   case V6_CONCERNED_DESTINATION_PARAMETER_TAG:
1344     dissect_m3ua_concerned_destination_parameter(parameter_tvb, parameter_tree, parameter_item);
1345     break;
1346   case V6_ROUTING_KEY_PARAMETER_TAG:
1347     dissect_m3ua_routing_key_parameter(parameter_tvb, pinfo, tree, parameter_tree, parameter_item);
1348     break;
1349   case V6_REGISTRATION_RESULT_PARAMETER_TAG:
1350     dissect_m3ua_v6_registration_result_parameter(parameter_tvb, parameter_tree, parameter_item);
1351     break;
1352   case V6_DEREGISTRATION_RESULT_PARAMETER_TAG:
1353     dissect_m3ua_v6_deregistration_result_parameter(parameter_tvb, parameter_tree, parameter_item);
1354     break;
1355   case V6_LOCAL_ROUTING_KEY_IDENTIFIER_PARAMETER_TAG:
1356     dissect_m3ua_local_routing_key_identifier_parameter(parameter_tvb, parameter_tree, parameter_item);
1357     break;
1358   case V6_DESTINATION_POINT_CODE_PARAMETER_TAG:
1359     dissect_m3ua_destination_point_code_parameter(parameter_tvb, parameter_tree, parameter_item);
1360     break;
1361   case V6_SERVICE_INDICATORS_PARAMETER_TAG:
1362     dissect_m3ua_service_indicators_parameter(parameter_tvb, parameter_tree, parameter_item);
1363     break;
1364   case V6_SUBSYSTEM_NUMBERS_PARAMETER_TAG:
1365     dissect_m3ua_subsystem_numbers_parameter(parameter_tvb, parameter_tree, parameter_item);
1366     break;
1367   case V6_ORIGINATING_POINT_CODE_LIST_PARAMETER_TAG:
1368     dissect_m3ua_originating_point_code_list_parameter(parameter_tvb, parameter_tree, parameter_item);
1369     break;
1370   case V6_CIRCUIT_RANGE_PARAMETER_TAG:
1371     dissect_m3ua_circuit_range_parameter(parameter_tvb, parameter_tree, parameter_item);
1372     break;
1373   case V6_REGISTRATION_RESULTS_PARAMETER_TAG:
1374     dissect_m3ua_registration_results_parameter(parameter_tvb, pinfo, tree, parameter_tree, parameter_item);
1375     break;
1376   case V6_DEREGISTRATION_RESULTS_PARAMETER_TAG:
1377     dissect_m3ua_deregistration_results_parameter(parameter_tvb, pinfo, tree, parameter_tree, parameter_item);
1378     break;
1379   default:
1380     dissect_m3ua_unknown_parameter(parameter_tvb, parameter_tree, parameter_item);
1381     break;
1382   };
1383
1384   if (padding_length > 0)
1385     proto_tree_add_bytes(parameter_tree, hf_m3ua_parameter_padding, parameter_tvb, PARAMETER_HEADER_OFFSET + length, padding_length, 
1386                          tvb_get_ptr(parameter_tvb, PARAMETER_HEADER_OFFSET + length, padding_length));
1387 }
1388
1389 static void
1390 dissect_m3ua_v10_parameter(tvbuff_t *parameter_tvb, packet_info *pinfo, proto_tree *tree, proto_tree *m3ua_tree)
1391 {
1392   guint16 tag, length, padding_length, total_length;
1393   proto_item *parameter_item;
1394   proto_tree *parameter_tree;
1395
1396   /* extract tag and length from the parameter */
1397   tag            = tvb_get_ntohs(parameter_tvb, PARAMETER_TAG_OFFSET);
1398   length         = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
1399
1400   /* calculate padding and total length */
1401   padding_length = tvb_length(parameter_tvb) - length;
1402   total_length   = length + padding_length;
1403
1404   /* create proto_tree stuff */
1405   parameter_item   = proto_tree_add_text(m3ua_tree, parameter_tvb, PARAMETER_HEADER_OFFSET, total_length, "Incomplete parameter");
1406   parameter_tree   = proto_item_add_subtree(parameter_item, ett_m3ua_parameter);
1407
1408   /* add tag and length to the m3ua tree */
1409   proto_tree_add_uint_format(parameter_tree, hf_m3ua_parameter_tag, parameter_tvb, PARAMETER_TAG_OFFSET, PARAMETER_TAG_LENGTH, tag, 
1410                              "Parameter tag: %s (0x%x)", val_to_str(tag, m3ua_v10_parameter_tag_values, "unknown"), tag);
1411   proto_tree_add_uint(parameter_tree, hf_m3ua_parameter_length, parameter_tvb, PARAMETER_LENGTH_OFFSET, PARAMETER_LENGTH_LENGTH, length);
1412
1413   switch(tag) {
1414   case V10_INFO_STRING_PARAMETER_TAG:
1415     dissect_m3ua_info_string_parameter(parameter_tvb, parameter_tree, parameter_item);
1416     break;
1417   case V10_ROUTING_CONTEXT_PARAMETER_TAG:
1418     dissect_m3ua_routing_context_parameter(parameter_tvb, parameter_tree, parameter_item);
1419     break;
1420   case V10_DIAGNOSTIC_INFORMATION_PARAMETER_TAG:
1421     dissect_m3ua_diagnostic_information_parameter(parameter_tvb, parameter_tree, parameter_item);
1422     break;
1423   case V10_HEARTBEAT_DATA_PARAMETER_TAG:
1424     dissect_m3ua_heartbeat_data_parameter(parameter_tvb, parameter_tree, parameter_item);
1425     break;
1426   case V10_TRAFFIC_MODE_TYPE_PARAMETER_TAG:
1427     dissect_m3ua_v10_traffic_mode_type_parameter(parameter_tvb, parameter_tree, parameter_item);
1428     break;
1429   case V10_ERROR_CODE_PARAMETER_TAG:
1430     dissect_m3ua_v10_error_code_parameter(parameter_tvb, parameter_tree, parameter_item);
1431     break;
1432   case V10_STATUS_PARAMETER_TAG:
1433     dissect_m3ua_status_parameter(parameter_tvb, parameter_tree, parameter_item);
1434     break;
1435   case V10_ASP_IDENTIFIER_PARAMETER_TAG:
1436     dissect_m3ua_asp_identifier_parameter(parameter_tvb, parameter_tree, parameter_item);
1437     break;
1438   case V10_AFFECTED_POINT_CODE_PARAMETER_TAG:
1439     dissect_m3ua_affected_point_code_parameter(parameter_tvb, parameter_tree, parameter_item);
1440     break;
1441   case V10_NETWORK_APPEARANCE_PARAMETER_TAG:
1442     dissect_m3ua_network_appearance_parameter(parameter_tvb, parameter_tree, parameter_item);
1443     break;
1444   case V10_USER_CAUSE_PARAMETER_TAG:
1445     dissect_m3ua_user_cause_parameter(parameter_tvb, parameter_tree, parameter_item);
1446     break;
1447   case V10_CONGESTION_INDICATIONS_PARAMETER_TAG:
1448     dissect_m3ua_congestion_indication_parameter(parameter_tvb, parameter_tree, parameter_item);
1449     break;
1450   case V10_CONCERNED_DESTINATION_PARAMETER_TAG:
1451     dissect_m3ua_concerned_destination_parameter(parameter_tvb, parameter_tree, parameter_item);
1452     break;
1453   case V10_ROUTING_KEY_PARAMETER_TAG:
1454     dissect_m3ua_routing_key_parameter(parameter_tvb, pinfo, tree, parameter_tree, parameter_item);
1455     break;
1456   case V10_REGISTRATION_RESULT_PARAMETER_TAG:
1457     dissect_m3ua_v10_registration_result_parameter(parameter_tvb, pinfo, tree, parameter_tree, parameter_item);
1458     break;
1459   case V10_DEREGISTRATION_RESULT_PARAMETER_TAG:
1460     dissect_m3ua_v10_deregistration_result_parameter(parameter_tvb, pinfo, tree, parameter_tree, parameter_item);
1461     break;
1462   case V10_LOCAL_ROUTING_KEY_IDENTIFIER_PARAMETER_TAG:
1463     dissect_m3ua_local_routing_key_identifier_parameter(parameter_tvb, parameter_tree, parameter_item);
1464     break;
1465   case V10_DESTINATION_POINT_CODE_PARAMETER_TAG:
1466     dissect_m3ua_destination_point_code_parameter(parameter_tvb, parameter_tree, parameter_item);
1467     break;
1468   case V10_SERVICE_INDICATORS_PARAMETER_TAG:
1469     dissect_m3ua_service_indicators_parameter(parameter_tvb, parameter_tree, parameter_item);
1470     break;
1471   case V10_ORIGINATING_POINT_CODE_LIST_PARAMETER_TAG:
1472     dissect_m3ua_originating_point_code_list_parameter(parameter_tvb, parameter_tree, parameter_item);
1473     break;
1474   case V10_CIRCUIT_RANGE_PARAMETER_TAG:
1475     dissect_m3ua_circuit_range_parameter(parameter_tvb, parameter_tree, parameter_item);
1476     break;
1477   case V10_PROTOCOL_DATA_PARAMETER_TAG:
1478     dissect_m3ua_protocol_data_parameter(parameter_tvb, pinfo, tree, parameter_tree, parameter_item);
1479     break;
1480   case V10_CORRELATION_IDENTIFIER_PARAMETER_TAG:
1481     dissect_m3ua_correlation_identifier_parameter(parameter_tvb, parameter_tree, parameter_item);
1482     break;
1483   case V10_REGISTRATION_STATUS_PARAMETER_TAG:
1484     dissect_m3ua_registration_status_parameter(parameter_tvb, parameter_tree, parameter_item);
1485     break;
1486   case V10_DEREGISTRATION_STATUS_PARAMETER_TAG:
1487     dissect_m3ua_deregistration_status_parameter(parameter_tvb, parameter_tree, parameter_item);
1488     break;
1489   default:
1490     dissect_m3ua_unknown_parameter(parameter_tvb, parameter_tree, parameter_item);
1491     break;
1492   };
1493
1494   if (padding_length > 0)
1495     proto_tree_add_bytes(parameter_tree, hf_m3ua_parameter_padding, parameter_tvb, PARAMETER_HEADER_OFFSET + length, padding_length, 
1496                          tvb_get_ptr(parameter_tvb, PARAMETER_HEADER_OFFSET + length, padding_length));
1497 }
1498
1499 static void
1500 dissect_m3ua_parameters(tvbuff_t *parameters_tvb, packet_info *pinfo, proto_tree *tree, proto_tree *m3ua_tree)
1501 {
1502   gint offset, length, padding_length, total_length, remaining_length;
1503   tvbuff_t *parameter_tvb;
1504
1505   offset = 0;
1506   while((remaining_length = tvb_reported_length_remaining(parameters_tvb, offset))) {
1507     length         = tvb_get_ntohs(parameters_tvb, offset + PARAMETER_LENGTH_OFFSET);
1508     padding_length = nr_of_padding_bytes(length);
1509     if (remaining_length >= length)
1510       total_length = MIN(length + padding_length, remaining_length);
1511     else
1512       total_length = length + padding_length;
1513     /* create a tvb for the parameter including the padding bytes */
1514     parameter_tvb    = tvb_new_subset(parameters_tvb, offset, total_length, total_length);
1515     switch(m3ua_version) {
1516       case M3UA_V6:
1517         dissect_m3ua_v6_parameter(parameter_tvb, pinfo, tree, m3ua_tree); 
1518         break;
1519       case M3UA_V10:
1520         dissect_m3ua_v10_parameter(parameter_tvb, pinfo, tree, m3ua_tree);
1521         break;
1522     }
1523     /* get rid of the handled parameter */
1524     offset += total_length;
1525   }
1526 }
1527
1528
1529 static void
1530 dissect_m3ua_message(tvbuff_t *message_tvb, packet_info *pinfo, proto_tree *tree, proto_tree *m3ua_tree)
1531 {
1532   tvbuff_t *common_header_tvb, *parameters_tvb;
1533
1534   common_header_tvb = tvb_new_subset(message_tvb, 0, COMMON_HEADER_LENGTH, COMMON_HEADER_LENGTH);
1535   parameters_tvb    = tvb_new_subset(message_tvb, COMMON_HEADER_LENGTH, -1, -1);
1536   dissect_m3ua_common_header(common_header_tvb, pinfo, m3ua_tree);  
1537   if (m3ua_tree)
1538     dissect_m3ua_parameters(parameters_tvb, pinfo, tree, m3ua_tree);
1539 }
1540
1541 static void
1542 dissect_m3ua(tvbuff_t *message_tvb, packet_info *pinfo, proto_tree *tree)
1543 {
1544   proto_item *m3ua_item;
1545   proto_tree *m3ua_tree;
1546
1547   /* make entry in the Protocol column on summary display */
1548   if (check_col(pinfo->cinfo, COL_PROTOCOL)) 
1549     col_set_str(pinfo->cinfo, COL_PROTOCOL, "M3UA");
1550   
1551   /* In the interest of speed, if "tree" is NULL, don't do any work not
1552      necessary to generate protocol tree items. */
1553   if (tree) {
1554     /* create the m3ua protocol tree */
1555     m3ua_item = proto_tree_add_item(tree, proto_m3ua, message_tvb, 0, -1, FALSE);
1556     m3ua_tree = proto_item_add_subtree(m3ua_item, ett_m3ua);
1557   } else {
1558     m3ua_tree = NULL;
1559   };
1560   /* dissect the message */
1561   dissect_m3ua_message(message_tvb, pinfo, tree, m3ua_tree);
1562 }
1563
1564 /* Register the protocol with Ethereal */
1565 void
1566 proto_register_m3ua(void)
1567 {                 
1568
1569   /* Setup list of header fields */
1570   static hf_register_info hf[] = {
1571     { &hf_m3ua_version,
1572       { "Version", "m3ua.version",
1573               FT_UINT8, BASE_DEC, VALS(m3ua_protocol_version_values), 0x0,          
1574         "", HFILL }
1575     },
1576     { &hf_m3ua_reserved,
1577       { "Reserved", "m3ua.reserved",
1578               FT_UINT8, BASE_HEX, NULL, 0x0,          
1579               "", HFILL }
1580     }, 
1581     { &hf_m3ua_message_class,
1582       { "Message class", "m3ua.message_class",
1583         FT_UINT8, BASE_DEC, VALS(m3ua_message_class_values), 0x0,          
1584               "", HFILL }
1585     },
1586     { &hf_m3ua_message_type,
1587       { "Message Type", "m3ua.message_type",
1588               FT_UINT8, BASE_DEC, NULL, 0x0,          
1589               "", HFILL }
1590     },
1591     { &hf_m3ua_message_length,
1592       { "Message length", "m3ua.message_length",
1593         FT_UINT32, BASE_DEC, NULL, 0x0,          
1594               "", HFILL }
1595     }, 
1596     { &hf_m3ua_parameter_tag,
1597       { "Parameter Tag", "m3ua.parameter_tag",
1598         FT_UINT16, BASE_DEC, NULL, 0x0,          
1599         "", HFILL }
1600     },
1601     { &hf_m3ua_parameter_length,
1602       { "Parameter length", "m3ua.parameter_length",
1603         FT_UINT16, BASE_DEC, NULL, 0x0,          
1604               "", HFILL }
1605     }, 
1606     { &hf_m3ua_parameter_value,
1607       { "Paramter value", "m3ua.parameter_value",
1608               FT_BYTES, BASE_NONE, NULL, 0x0,          
1609               "", HFILL }
1610     },    
1611     { &hf_m3ua_parameter_padding,
1612       { "Padding", "m3ua.parameter_padding",
1613               FT_BYTES, BASE_NONE, NULL, 0x0,          
1614               "", HFILL }
1615     },    
1616     { &hf_m3ua_info_string,
1617       { "Info string", "m3ua.info_string",
1618               FT_STRING, BASE_DEC, NULL, 0x0,          
1619               "", HFILL }
1620     }, 
1621     { &hf_m3ua_routing_context,
1622       { "Routing context", "m3ua.routing_context",
1623               FT_UINT32, BASE_HEX, NULL, 0x0,          
1624         "", HFILL }
1625     }, 
1626     { &hf_m3ua_diagnostic_information,
1627       { "Diagnostic information", "m3ua.diagnostic_information",
1628               FT_BYTES, BASE_NONE, NULL, 0x0,          
1629               "", HFILL }
1630     },    
1631     { &hf_m3ua_heartbeat_data,
1632       { "Heartbeat data", "m3ua.heartbeat_data",
1633               FT_BYTES, BASE_NONE, NULL, 0x0,          
1634               "", HFILL }
1635     },    
1636     { &hf_m3ua_error_code,
1637       { "Error code", "m3ua.error_code",
1638         FT_UINT32, BASE_DEC, NULL, 0x0,          
1639               "", HFILL }
1640     }, 
1641     { &hf_m3ua_status_type,
1642       { "Status type", "m3ua.status_type",
1643               FT_UINT16, BASE_DEC, VALS(m3ua_status_type_values), 0x0,          
1644               "", HFILL }
1645     }, 
1646     { &hf_m3ua_status_info,
1647       { "Status info", "m3ua.status_info",
1648               FT_UINT16, BASE_DEC, NULL, 0x0,          
1649               "", HFILL }
1650     }, 
1651     { &hf_m3ua_asp_identifier,
1652       { "ASP identifier", "m3ua.asp_identifier",
1653               FT_UINT32, BASE_HEX, NULL, 0x0,          
1654               "", HFILL }
1655     },    
1656     { &hf_m3ua_affected_point_code_mask,
1657       { "Mask", "m3ua.affected_point_code_mask",
1658         FT_UINT8, BASE_DEC, NULL, 0x0,          
1659               "", HFILL }
1660     }, 
1661     { &hf_m3ua_affected_point_code_pc,
1662       { "Affected point code", "m3ua.affected_point_code_pc",
1663               FT_UINT24, BASE_DEC, NULL, 0x0,          
1664               "", HFILL }
1665     }, 
1666     { &hf_m3ua_network_appearance,
1667       { "Network appearance", "m3ua.network_appearance",
1668               FT_UINT32, BASE_DEC, NULL, 0x0,          
1669               "", HFILL }
1670     }, 
1671     { &hf_m3ua_unavailability_cause,
1672       { "Unavailability cause", "m3ua.unavailability_cause",
1673               FT_UINT16, BASE_DEC, VALS(m3ua_unavailability_cause_values), 0x0,          
1674         "", HFILL }
1675     }, 
1676     { &hf_m3ua_user_identity,
1677       { "User Identity", "m3ua.user_identity",
1678                FT_UINT16, BASE_DEC, VALS(m3ua_user_identity_values), 0x0,          
1679                "", HFILL }
1680     }, 
1681     { &hf_m3ua_congestion_reserved,
1682       { "Reserved", "m3ua.congestion_reserved",
1683               FT_BYTES, BASE_NONE, NULL, 0x0,          
1684               "", HFILL }
1685     },    
1686     { &hf_m3ua_congestion_level,
1687       { "Congestion level", "m3ua.congestion_level",
1688                FT_UINT8, BASE_DEC, VALS(m3ua_congestion_level_values), 0x0,          
1689                "", HFILL }
1690     }, 
1691     { &hf_m3ua_concerned_dest_reserved,
1692       { "Reserved", "m3ua.concerned_reserved",
1693               FT_BYTES, BASE_NONE, NULL, 0x0,          
1694               "", HFILL }
1695     },    
1696     { &hf_m3ua_concerned_dest_pc,
1697       { "Concerned DPC", "m3ua.concerned_dpc",
1698                FT_UINT24, BASE_DEC, NULL, 0x0,          
1699                "", HFILL }
1700     }, 
1701     { &hf_m3ua_dpc_mask,
1702       { "Mask", "m3ua.dpc_mask",
1703               FT_UINT8, BASE_HEX, NULL, 0x0,          
1704               "", HFILL }
1705     },    
1706     { &hf_m3ua_dpc_pc,
1707       { "Destination point code", "m3ua.dpc_pc",
1708                FT_UINT24, BASE_DEC, NULL, 0x0,          
1709                "", HFILL }
1710     }, 
1711     { &hf_m3ua_si,
1712       { "Service indicator", "m3ua_si",
1713         FT_UINT8, BASE_DEC, VALS(m3ua_user_identity_values), 0x0,          
1714               "", HFILL }
1715     }, 
1716     { &hf_m3ua_ssn,
1717       { "Subsystem number", "m3ua_ssn",
1718         FT_UINT8, BASE_DEC, NULL, 0x0,          
1719               "", HFILL }
1720     }, 
1721     { &hf_m3ua_opc_list_mask,
1722       { "Mask", "m3ua.opc_list_mask",
1723               FT_UINT8, BASE_HEX, NULL, 0x0,          
1724               "", HFILL }
1725     },    
1726     { &hf_m3ua_opc_list_pc,
1727       { "Originating point code", "m3ua.opc_list_pc",
1728                FT_UINT24, BASE_DEC, NULL, 0x0,          
1729                "", HFILL }
1730     }, 
1731     { &hf_m3ua_cic_range_mask,
1732       { "Mask", "m3ua.cic_range_mask",
1733               FT_UINT8, BASE_HEX, NULL, 0x0,          
1734               "", HFILL }
1735     },    
1736     { &hf_m3ua_cic_range_pc,
1737       { "Originating point code", "m3ua.cic_range_pc",
1738                FT_UINT24, BASE_DEC, NULL, 0x0,          
1739                "", HFILL }
1740     }, 
1741     { &hf_m3ua_cic_range_lower,
1742       { "Lower CIC value", "m3ua.cic_range_lower",
1743               FT_UINT16, BASE_DEC, NULL, 0x0,          
1744               "", HFILL }
1745     },    
1746     { &hf_m3ua_cic_range_upper,
1747       { "Upper CIC value", "m3ua.cic_range_upper",
1748                FT_UINT16, BASE_DEC, NULL, 0x0,          
1749                "", HFILL }
1750     }, 
1751     { &hf_m3ua_local_rk_identifier,
1752       { "Local routing key identifier", "m3ua.local_rk_identifier",
1753               FT_UINT32, BASE_DEC, NULL, 0x0,          
1754               "", HFILL }
1755     }, 
1756     { &hf_m3ua_li,
1757       { "Length indicator", "m3ua.protocol_data_2_li",
1758               FT_UINT8, BASE_HEX, NULL, 0x0,          
1759               "", HFILL }
1760     }, 
1761     { &hf_m3ua_protocol_data_opc,
1762       { "OPC", "m3ua.protocol_data_opc",
1763               FT_UINT32, BASE_DEC, NULL, 0x0,          
1764               "", HFILL }
1765     }, 
1766     { &hf_m3ua_protocol_data_dpc,
1767       { "DPC", "m3ua.protocol_data_dpc",
1768               FT_UINT32, BASE_DEC, NULL, 0x0,          
1769               "", HFILL }
1770     }, 
1771     { &hf_m3ua_protocol_data_si,
1772       { "SI", "m3ua.protocol_data_si",
1773               FT_UINT8, BASE_DEC, NULL, 0x0,          
1774               "", HFILL }
1775     }, 
1776     { &hf_m3ua_protocol_data_ni,
1777       { "NI", "m3ua.protocol_data_ni",
1778               FT_UINT8, BASE_DEC, NULL, 0x0,          
1779               "", HFILL }
1780     }, 
1781     { &hf_m3ua_protocol_data_mp,
1782       { "MP", "m3ua.protocol_data_mp",
1783               FT_UINT8, BASE_DEC, NULL, 0x0,          
1784               "", HFILL }
1785     }, 
1786     { &hf_m3ua_protocol_data_sls,
1787       { "SLS", "m3ua.protocol_data_sls",
1788               FT_UINT8, BASE_DEC, NULL, 0x0,          
1789               "", HFILL }
1790     }, 
1791     { &hf_m3ua_correlation_identifier,
1792       { "Correlation Identifier", "m3ua.correlation_identifier",
1793               FT_UINT32, BASE_HEX, NULL, 0x0,          
1794               "", HFILL }
1795     },
1796     { &hf_m3ua_registration_status,
1797       { "Registration status", "m3ua.registration_status",
1798               FT_UINT32, BASE_HEX, VALS(m3ua_registration_status_values), 0x0,          
1799               "", HFILL }
1800     },
1801     { &hf_m3ua_deregistration_status,
1802       { "Deregistration status", "m3ua.deregistration_status",
1803               FT_UINT32, BASE_HEX, VALS(m3ua_deregistration_status_values), 0x0,          
1804               "", HFILL }
1805     },
1806     { &hf_m3ua_reason,
1807       { "Reason", "m3ua_reason",
1808         FT_UINT32, BASE_DEC, VALS(m3ua_reason_values), 0x0,          
1809         "", HFILL }
1810     }, 
1811     { &hf_m3ua_traffic_mode_type,
1812       { "Traffic mode Type", "m3ua.traffic_mode_type",
1813               FT_UINT32, BASE_DEC, NULL, 0x0,          
1814               "", HFILL }
1815     }, 
1816     { &hf_m3ua_registration_result_identifier,
1817       { "Local RK-identifier value", "m3ua.registration_result_identifier",
1818               FT_UINT32, BASE_DEC, NULL, 0x0,          
1819               "", HFILL }
1820     }, 
1821     { &hf_m3ua_registration_result_status,
1822       { "Registration status", "m3ua.registration_results_status",
1823               FT_UINT32, BASE_DEC, VALS(m3ua_registration_result_status_values), 0x0,          
1824               "", HFILL }
1825     }, 
1826     { &hf_m3ua_registration_result_context,
1827       { "Routing context", "m3ua.registration_result_routing_context",
1828               FT_UINT32, BASE_DEC, NULL, 0x0,          
1829               "", HFILL }
1830     }, 
1831     { &hf_m3ua_deregistration_result_status,
1832       { "De-Registration status", "m3ua.deregistration_results_status",
1833               FT_UINT32, BASE_DEC, VALS(m3ua_deregistration_result_status_values), 0x0,          
1834               "", HFILL }
1835     }, 
1836     { &hf_m3ua_deregistration_result_context,
1837       { "Routing context", "m3ua.deregistration_result_routing_context",
1838               FT_UINT32, BASE_DEC, NULL, 0x0,          
1839               "", HFILL }
1840     }, 
1841   };
1842   
1843   /* Setup protocol subtree array */
1844   static gint *ett[] = {
1845     &ett_m3ua,
1846     &ett_m3ua_parameter,
1847   };
1848   
1849   static enum_val_t m3ua_options[] = {
1850     { "Internet Draft version 6",        M3UA_V6 },
1851     { "Internet Draft version 10",       M3UA_V10 },
1852     { NULL, 0 }
1853   };
1854
1855   /* Register the protocol name and description */
1856   proto_m3ua = proto_register_protocol("MTP 3 User Adaptation Layer", "M3UA",  "m3ua");
1857   m3ua_module = prefs_register_protocol(proto_m3ua, NULL);
1858   prefs_register_enum_preference(m3ua_module,
1859                                                          "version", "M3UA Version", "Internet Draft version used by Ethereal",
1860                                                          &m3ua_version, m3ua_options, FALSE);
1861
1862   /* Required function calls to register the header fields and subtrees used */
1863   proto_register_field_array(proto_m3ua, hf, array_length(hf));
1864   proto_register_subtree_array(ett, array_length(ett));
1865   m3ua_si_dissector_table = register_dissector_table("m3ua.protocol_data_si", "MTP3 Service indicator", FT_UINT8, BASE_HEX);
1866
1867 };
1868
1869 void
1870 proto_reg_handoff_m3ua(void)
1871 {
1872   dissector_handle_t m3ua_handle;
1873
1874   /*
1875    * Get a handle for the MTP3 dissector.
1876    */
1877   mtp3_handle = find_dissector("mtp3");
1878   data_handle = find_dissector("data");
1879   m3ua_handle = create_dissector_handle(dissect_m3ua, proto_m3ua);
1880   dissector_add("sctp.ppi",  M3UA_PAYLOAD_PROTO_ID, m3ua_handle);
1881   dissector_add("sctp.port", SCTP_PORT_M3UA, m3ua_handle);
1882 }