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