1 /* packet-asap.c
2  * Routines for Aggregate Server Access Protocol (ASAP)
3  * It is hopefully (needs testing) compliant to
4  * RFC 5352
5  * RFC 5354
6  * RFC 5356
7  * https://tools.ietf.org/html/draft-dreibholz-rserpool-asap-hropt-27
8  * https://tools.ietf.org/html/draft-dreibholz-rserpool-delay-26
9  *
10  * Copyright 2008-2021 Thomas Dreibholz <dreibh [AT] iem.uni-due.de>
11  * Copyright 2004-2007 Michael Tüxen <tuexen [AT] fh-muenster.de>
12  *
13  * Wireshark - Network traffic analyzer
14  * By Gerald Combs <gerald@wireshark.org>
15  * Copyright 1998 Gerald Combs
16  *
17  * Copied from README.developer
18  *
19  * SPDX-License-Identifier: GPL-2.0-or-later
20  */
21 
22 #include "config.h"
23 
24 #include <epan/packet.h>
25 #include <epan/to_str.h>
26 #include <epan/sctpppids.h>
27 #include <epan/stat_tap_ui.h>
28 
29 #include <wsutil/str_util.h>
30 
31 #include "packet-asap+enrp-common.h"
32 
33 void proto_register_asap(void);
34 void proto_reg_handoff_asap(void);
35 
36 /* Initialize the protocol and registered fields */
37 static int asap_tap = -1;
38 static int proto_asap = -1;
39 static int hf_cause_code = -1;
40 static int hf_cause_length = -1;
41 static int hf_cause_info = -1;
42 static int hf_cause_padding = -1;
43 static int hf_message_type = -1;
44 static int hf_message_flags = -1;
45 static int hf_message_length = -1;
46 static int hf_parameter_type = -1;
47 static int hf_parameter_length = -1;
48 static int hf_parameter_value = -1;
49 static int hf_parameter_padding = -1;
50 static int hf_parameter_ipv4_address = -1;
51 static int hf_parameter_ipv6_address = -1;
52 static int hf_dccp_port = -1;
53 static int hf_dccp_reserved = -1;
54 static int hf_dccp_service_code = -1;
55 static int hf_sctp_port = -1;
56 static int hf_transport_use = -1;
57 static int hf_tcp_port = -1;
58 static int hf_udp_port = -1;
59 static int hf_udp_reserved = -1;
60 static int hf_udp_lite_port = -1;
61 static int hf_udp_lite_reserved = -1;
62 static int hf_policy_type = -1;
63 static int hf_policy_value = -1;
64 static int hf_policy_weight = -1;
65 static int hf_policy_priority = -1;
66 static int hf_policy_load = -1;
67 static int hf_policy_degradation = -1;
68 static int hf_policy_loaddpf = -1;
69 static int hf_policy_weightdpf = -1;
70 static int hf_policy_distance = -1;
71 static int hf_pool_handle = -1;
72 static int hf_pe_pe_identifier = -1;
73 static int hf_home_enrp_id = -1;
74 static int hf_reg_life = -1;
75 static int hf_server_identifier = -1;
76 static int hf_cookie = -1;
77 static int hf_pe_identifier = -1;
78 static int hf_pe_checksum = -1;
79 static int hf_hropt_items = -1;
80 static int hf_home_enrp_server_bit = -1;
81 static int hf_reject_bit = -1;
82 
83 /* Initialize the subtree pointers */
84 static gint ett_asap = -1;
85 static gint ett_asap_parameter = -1;
86 static gint ett_asap_cause = -1;
87 static gint ett_asap_flags = -1;
88 
89 static guint64 asap_total_msgs = 0;
90 static guint64 asap_total_bytes = 0;
91 
92 static void
93 dissect_parameters(tvbuff_t *, proto_tree *);
94 static void
95 dissect_parameter(tvbuff_t *, proto_tree *);
96 static int
97 dissect_asap(tvbuff_t *, packet_info *, proto_tree *, void *);
98 
99 #define ASAP_UDP_PORT  3863
100 #define ASAP_TCP_PORT  3863
101 #define ASAP_SCTP_PORT 3863
102 
103 typedef struct _asap_tap_rec_t {
104   guint8      type;
105   guint16     size;
106   const char* type_string;
107 } asap_tap_rec_t;
108 
109 /* Dissectors for error causes. This is common for ASAP and ENRP. */
110 
111 static void
112 dissect_unknown_cause(tvbuff_t *cause_tvb, proto_tree *cause_tree, proto_item *cause_item)
113 {
114   guint16 code, length, cause_info_length;
115 
116   code              = tvb_get_ntohs(cause_tvb, CAUSE_CODE_OFFSET);
117   length            = tvb_get_ntohs(cause_tvb, CAUSE_LENGTH_OFFSET);
118   cause_info_length = length - CAUSE_HEADER_LENGTH;
119   if (cause_info_length > 0)
120     proto_tree_add_item(cause_tree, hf_cause_info, cause_tvb, CAUSE_INFO_OFFSET, cause_info_length, ENC_NA);
121   proto_item_append_text(cause_item, " (code %u and %u byte%s information)", code, cause_info_length, plurality(cause_info_length, "", "s"));
122 }
123 
124 static void
125 dissect_error_cause(tvbuff_t *cause_tvb, proto_tree *parameter_tree)
126 {
127   guint16 code, length, padding_length;
128   proto_item *cause_item;
129   proto_tree *cause_tree;
130   tvbuff_t *parameter_tvb, *message_tvb;
131 
132   code           = tvb_get_ntohs(cause_tvb, CAUSE_CODE_OFFSET);
133   length         = tvb_get_ntohs(cause_tvb, CAUSE_LENGTH_OFFSET);
134   padding_length = tvb_reported_length(cause_tvb) - length;
135 
136   cause_tree = proto_tree_add_subtree(parameter_tree, cause_tvb, CAUSE_HEADER_OFFSET, -1, ett_asap_cause, &cause_item,
137                                    val_to_str_const(code, cause_code_values, "Unknown error cause"));
138 
139   proto_tree_add_item(cause_tree, hf_cause_code,   cause_tvb, CAUSE_CODE_OFFSET,   CAUSE_CODE_LENGTH,   ENC_BIG_ENDIAN);
140   proto_tree_add_item(cause_tree, hf_cause_length, cause_tvb, CAUSE_LENGTH_OFFSET, CAUSE_LENGTH_LENGTH, ENC_BIG_ENDIAN);
141 
142   switch(code) {
143   case UNRECOGNIZED_PARAMETER_CAUSE_CODE:
144     parameter_tvb = tvb_new_subset_remaining(cause_tvb, CAUSE_INFO_OFFSET);
145     dissect_parameter(parameter_tvb, cause_tree);
146     break;
147   case UNRECONGNIZED_MESSAGE_CAUSE_CODE:
148     message_tvb = tvb_new_subset_remaining(cause_tvb, CAUSE_INFO_OFFSET);
149     dissect_asap(message_tvb, NULL, cause_tree, NULL);
150     break;
151   case INVALID_VALUES:
152     parameter_tvb = tvb_new_subset_remaining(cause_tvb, CAUSE_INFO_OFFSET);
153     dissect_parameter(parameter_tvb, cause_tree);
154     break;
155   case NON_UNIQUE_PE_IDENTIFIER:
156     break;
157   case POOLING_POLICY_INCONSISTENT_CAUSE_CODE:
158     parameter_tvb = tvb_new_subset_remaining(cause_tvb, CAUSE_INFO_OFFSET);
159     dissect_parameter(parameter_tvb, cause_tree);
160     break;
161   case LACK_OF_RESOURCES_CAUSE_CODE:
162     break;
163   case INCONSISTENT_TRANSPORT_TYPE_CAUSE_CODE:
164     parameter_tvb = tvb_new_subset_remaining(cause_tvb, CAUSE_INFO_OFFSET);
165     dissect_parameter(parameter_tvb, cause_tree);
166     break;
167   case INCONSISTENT_DATA_CONTROL_CONFIGURATION_CAUSE_CODE:
168     break;
169   case UNKNOWN_POOL_HANDLE:
170     break;
171   case REJECTION_DUE_TO_SECURITY_CAUSE_CODE:
172     break;
173   default:
174     dissect_unknown_cause(cause_tvb, cause_tree, cause_item);
175     break;
176   }
177   if (padding_length > 0)
178     proto_tree_add_item(cause_tree, hf_cause_padding, cause_tvb, CAUSE_HEADER_OFFSET + length, padding_length, ENC_NA);
179 }
180 
181 static void
182 dissect_error_causes(tvbuff_t *error_causes_tvb, proto_tree *parameter_tree)
183 {
184   guint16 length, total_length;
185   gint offset;
186   tvbuff_t *error_cause_tvb;
187 
188   offset = 0;
189   while(tvb_reported_length_remaining(error_causes_tvb, offset) > 0) {
190     length          = tvb_get_ntohs(error_causes_tvb, offset + CAUSE_LENGTH_OFFSET);
191     total_length    = ADD_PADDING(length);
192     error_cause_tvb = tvb_new_subset_length(error_causes_tvb, offset , total_length);
193     dissect_error_cause(error_cause_tvb, parameter_tree);
194     offset += total_length;
195   }
196 }
197 
198 /* Dissectors for parameters. This is common for ASAP and ENRP. */
199 
200 static void
201 dissect_ipv4_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
202 {
203   proto_tree_add_item(parameter_tree, hf_parameter_ipv4_address, parameter_tvb, IPV4_ADDRESS_OFFSET, IPV4_ADDRESS_LENGTH, ENC_BIG_ENDIAN);
204   proto_item_append_text(parameter_item, " (%s)", tvb_ip_to_str(wmem_packet_scope(), parameter_tvb, IPV4_ADDRESS_OFFSET));
205 }
206 
207 static void
208 dissect_ipv6_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
209 {
210   proto_tree_add_item(parameter_tree, hf_parameter_ipv6_address, parameter_tvb, IPV6_ADDRESS_OFFSET, IPV6_ADDRESS_LENGTH, ENC_NA);
211   proto_item_append_text(parameter_item, " (%s)", tvb_ip6_to_str(wmem_packet_scope(), parameter_tvb, IPV6_ADDRESS_OFFSET));
212 }
213 
214 static void
215 dissect_dccp_transport_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
216 {
217   tvbuff_t *parameters_tvb;
218 
219   proto_tree_add_item(parameter_tree, hf_dccp_port,         parameter_tvb, DCCP_PORT_OFFSET,         DCCP_PORT_LENGTH,         ENC_BIG_ENDIAN);
220   proto_tree_add_item(parameter_tree, hf_dccp_reserved,     parameter_tvb, DCCP_RESERVED_OFFSET,     DCCP_RESERVED_LENGTH,     ENC_BIG_ENDIAN);
221   proto_tree_add_item(parameter_tree, hf_dccp_service_code, parameter_tvb, DCCP_SERVICE_CODE_OFFSET, DCCP_SERVICE_CODE_LENGTH, ENC_BIG_ENDIAN);
222 
223   parameters_tvb = tvb_new_subset_remaining(parameter_tvb, DCCP_ADDRESS_OFFSET);
224   dissect_parameters(parameters_tvb, parameter_tree);
225 }
226 
227 static void
228 dissect_sctp_transport_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
229 {
230   tvbuff_t *parameters_tvb;
231 
232   proto_tree_add_item(parameter_tree, hf_sctp_port,     parameter_tvb, SCTP_PORT_OFFSET,          SCTP_PORT_LENGTH,          ENC_BIG_ENDIAN);
233   proto_tree_add_item(parameter_tree, hf_transport_use, parameter_tvb, SCTP_TRANSPORT_USE_OFFSET, SCTP_TRANSPORT_USE_LENGTH, ENC_BIG_ENDIAN);
234 
235   parameters_tvb = tvb_new_subset_remaining(parameter_tvb, SCTP_ADDRESS_OFFSET);
236   dissect_parameters(parameters_tvb, parameter_tree);
237 }
238 
239 static void
240 dissect_tcp_transport_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
241 {
242   tvbuff_t *parameters_tvb;
243 
244   proto_tree_add_item(parameter_tree, hf_tcp_port,      parameter_tvb, TCP_PORT_OFFSET,          TCP_PORT_LENGTH,          ENC_BIG_ENDIAN);
245   proto_tree_add_item(parameter_tree, hf_transport_use, parameter_tvb, TCP_TRANSPORT_USE_OFFSET, TCP_TRANSPORT_USE_LENGTH, ENC_BIG_ENDIAN);
246 
247   parameters_tvb = tvb_new_subset_remaining(parameter_tvb, TCP_ADDRESS_OFFSET);
248   dissect_parameters(parameters_tvb, parameter_tree);
249 }
250 
251 static void
252 dissect_udp_transport_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
253 {
254   tvbuff_t *parameters_tvb;
255 
256   proto_tree_add_item(parameter_tree, hf_udp_port,     parameter_tvb, UDP_PORT_OFFSET,     UDP_PORT_LENGTH,     ENC_BIG_ENDIAN);
257   proto_tree_add_item(parameter_tree, hf_udp_reserved, parameter_tvb, UDP_RESERVED_OFFSET, UDP_RESERVED_LENGTH, ENC_BIG_ENDIAN);
258 
259   parameters_tvb = tvb_new_subset_remaining(parameter_tvb, UDP_ADDRESS_OFFSET);
260   dissect_parameters(parameters_tvb, parameter_tree);
261 }
262 
263 static void
264 dissect_udp_lite_transport_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
265 {
266   tvbuff_t *parameters_tvb;
267 
268   proto_tree_add_item(parameter_tree, hf_udp_lite_port,     parameter_tvb, UDP_LITE_PORT_OFFSET,     UDP_LITE_PORT_LENGTH,     ENC_BIG_ENDIAN);
269   proto_tree_add_item(parameter_tree, hf_udp_lite_reserved, parameter_tvb, UDP_LITE_RESERVED_OFFSET, UDP_LITE_RESERVED_LENGTH, ENC_BIG_ENDIAN);
270 
271   parameters_tvb = tvb_new_subset_remaining(parameter_tvb, UDP_LITE_ADDRESS_OFFSET);
272   dissect_parameters(parameters_tvb, parameter_tree);
273 }
274 
275 static void
276 dissect_pool_member_selection_policy_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
277 {
278   guint32 type;
279   guint   length;
280 
281   proto_tree_add_item(parameter_tree, hf_policy_type,  parameter_tvb, POLICY_TYPE_OFFSET,  POLICY_TYPE_LENGTH,  ENC_BIG_ENDIAN);
282   type = tvb_get_ntohl(parameter_tvb, POLICY_TYPE_OFFSET);
283   switch (type) {
284   case RANDOM_POLICY:
285   case ROUND_ROBIN_POLICY:
286     break;
287   case WEIGHTED_RANDOM_POLICY:
288   case WEIGHTED_ROUND_ROBIN_POLICY:
289     proto_tree_add_item(parameter_tree, hf_policy_weight, parameter_tvb, POLICY_WEIGHT_OFFSET, POLICY_WEIGHT_LENGTH, ENC_BIG_ENDIAN);
290     break;
291   case PRIORITY_POLICY:
292     proto_tree_add_item(parameter_tree, hf_policy_priority, parameter_tvb, POLICY_PRIORITY_OFFSET, POLICY_PRIORITY_LENGTH, ENC_BIG_ENDIAN);
293     break;
294   case LEAST_USED_POLICY:
295   case RANDOMIZED_LEAST_USED_POLICY:
296     proto_tree_add_double_format_value(parameter_tree, hf_policy_load, parameter_tvb, POLICY_LOAD_OFFSET, POLICY_LOAD_LENGTH,
297                                        100.0 * tvb_get_ntohl(parameter_tvb, POLICY_LOAD_OFFSET) / (double)0xffffffff, "%1.2f%%",
298                                        100.0 * tvb_get_ntohl(parameter_tvb, POLICY_LOAD_OFFSET) / (double)0xffffffff);
299     break;
300   case LEAST_USED_WITH_DEG_POLICY:
301   case PRIORITY_LEAST_USED_POLICY:
302     proto_tree_add_double_format_value(parameter_tree, hf_policy_load, parameter_tvb, POLICY_LOAD_OFFSET, POLICY_LOAD_LENGTH,
303                                        100.0 * tvb_get_ntohl(parameter_tvb, POLICY_LOAD_OFFSET) / (double)0xffffffff, "%1.2f%%",
304                                        100.0 * tvb_get_ntohl(parameter_tvb, POLICY_LOAD_OFFSET) / (double)0xffffffff);
305     proto_tree_add_double_format_value(parameter_tree, hf_policy_degradation, parameter_tvb, POLICY_DEGRADATION_OFFSET, POLICY_DEGRADATION_LENGTH,
306                                        100.0 * tvb_get_ntohl(parameter_tvb, POLICY_DEGRADATION_OFFSET) / (double)0xffffffff, "%1.2f%%",
307                                        100.0 * tvb_get_ntohl(parameter_tvb, POLICY_DEGRADATION_OFFSET) / (double)0xffffffff);
308     break;
309   case LEAST_USED_DPF_POLICY:
310     proto_tree_add_double_format_value(parameter_tree, hf_policy_load, parameter_tvb, POLICY_LOAD_OFFSET, POLICY_LOAD_LENGTH,
311                                       100.0 * tvb_get_ntohl(parameter_tvb, POLICY_LOAD_OFFSET) / (double)0xffffffff, "%1.2f%%",
312                                       100.0 * tvb_get_ntohl(parameter_tvb, POLICY_LOAD_OFFSET) / (double)0xffffffff);
313     proto_tree_add_double_format_value(parameter_tree, hf_policy_loaddpf, parameter_tvb, POLICY_LUDPF_LOADDPF_OFFSET, POLICY_LUDPF_LOADDPF_LENGTH,
314                                       tvb_get_ntohl(parameter_tvb, POLICY_LUDPF_LOADDPF_OFFSET) / (double)0xffffffff, "%1.5f",
315                                       tvb_get_ntohl(parameter_tvb, POLICY_LUDPF_LOADDPF_OFFSET) / (double)0xffffffff);
316     proto_tree_add_item(parameter_tree, hf_policy_distance, parameter_tvb, POLICY_LUDPF_DISTANCE_OFFSET, POLICY_LUDPF_DISTANCE_LENGTH, ENC_BIG_ENDIAN);
317     break;
318   case WEIGHTED_RANDOM_DPF_POLICY:
319     proto_tree_add_item(parameter_tree, hf_policy_weight, parameter_tvb, POLICY_WEIGHT_OFFSET, POLICY_WEIGHT_LENGTH, ENC_BIG_ENDIAN);
320     proto_tree_add_double_format_value(parameter_tree, hf_policy_weightdpf, parameter_tvb, POLICY_WRANDDPF_WEIGHTDPF_OFFSET, POLICY_WRANDDPF_WEIGHTDPF_LENGTH,
321                                        tvb_get_ntohl(parameter_tvb, POLICY_WRANDDPF_WEIGHTDPF_OFFSET) / (double)0xffffffff, "%1.5f",
322                                        tvb_get_ntohl(parameter_tvb, POLICY_WRANDDPF_WEIGHTDPF_OFFSET) / (double)0xffffffff);
323     proto_tree_add_item(parameter_tree, hf_policy_distance, parameter_tvb, POLICY_WRANDDPF_DISTANCE_OFFSET, POLICY_WRANDDPF_DISTANCE_LENGTH, ENC_BIG_ENDIAN);
324     break;
325   default:
326     length = tvb_reported_length(parameter_tvb) - POLICY_VALUE_OFFSET;
327     if (length > 0) {
328       proto_tree_add_item(parameter_tree, hf_policy_value, parameter_tvb, POLICY_VALUE_OFFSET, length, ENC_NA);
329     }
330     break;
331   }
332 }
333 
334 static void
335 dissect_pool_handle_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
336 {
337   guint16 handle_length;
338   proto_item*    pi;
339 
340   handle_length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET) - PARAMETER_HEADER_LENGTH;
341   pi = proto_tree_add_item(parameter_tree, hf_pool_handle, parameter_tvb, POOL_HANDLE_OFFSET, handle_length, ENC_NA);
342 
343   proto_item_append_text(pi, " (%s)",
344                          tvb_format_text(wmem_packet_scope(), parameter_tvb, POOL_HANDLE_OFFSET, handle_length));
345 }
346 
347 static void
348 dissect_pool_element_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
349 {
350   tvbuff_t*   parameters_tvb;
351 
352   proto_tree_add_item(parameter_tree, hf_pe_pe_identifier, parameter_tvb, PE_PE_IDENTIFIER_OFFSET,      PE_PE_IDENTIFIER_LENGTH,      ENC_BIG_ENDIAN);
353   proto_tree_add_item(parameter_tree, hf_home_enrp_id,     parameter_tvb, HOME_ENRP_INDENTIFIER_OFFSET, HOME_ENRP_INDENTIFIER_LENGTH, ENC_BIG_ENDIAN);
354   proto_tree_add_item(parameter_tree, hf_reg_life,    parameter_tvb, REGISTRATION_LIFE_OFFSET,     REGISTRATION_LIFE_LENGTH,     ENC_BIG_ENDIAN);
355 
356   parameters_tvb = tvb_new_subset_remaining(parameter_tvb, USER_TRANSPORT_PARAMETER_OFFSET);
357   dissect_parameters(parameters_tvb, parameter_tree);
358 }
359 
360 static void
361 dissect_server_information_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
362 {
363   tvbuff_t *parameters_tvb;
364 
365   proto_tree_add_item(parameter_tree, hf_server_identifier, parameter_tvb, SERVER_ID_OFFSET, SERVER_ID_LENGTH, ENC_BIG_ENDIAN);
366 
367   parameters_tvb = tvb_new_subset_remaining(parameter_tvb, SERVER_TRANSPORT_OFFSET);
368   dissect_parameters(parameters_tvb, parameter_tree);
369 }
370 
371 static void
372 dissect_operation_error_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
373 {
374   tvbuff_t *error_causes_tvb;
375 
376   error_causes_tvb = tvb_new_subset_remaining(parameter_tvb, ERROR_CAUSES_OFFSET);
377   dissect_error_causes(error_causes_tvb, parameter_tree);
378 }
379 
380 static void
381 dissect_cookie_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
382 {
383   guint16 cookie_length;
384 
385   cookie_length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET) - PARAMETER_HEADER_LENGTH;
386   if (cookie_length > 0)
387     proto_tree_add_item(parameter_tree, hf_cookie, parameter_tvb, COOKIE_OFFSET, cookie_length, ENC_NA);
388   proto_item_append_text(parameter_item, " (%u byte%s)", cookie_length, plurality(cookie_length, "", "s"));
389 }
390 
391 static void
392 dissect_pe_identifier_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
393 {
394   proto_tree_add_item(parameter_tree, hf_pe_identifier, parameter_tvb, PE_IDENTIFIER_OFFSET, PE_IDENTIFIER_LENGTH, ENC_BIG_ENDIAN);
395   proto_item_append_text(parameter_item, " (0x%x)", tvb_get_ntohl(parameter_tvb, PE_IDENTIFIER_OFFSET));
396 }
397 
398 static void
399 dissect_pe_checksum_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
400 {
401   proto_tree_add_checksum(parameter_tree, parameter_tvb, PE_CHECKSUM_OFFSET, hf_pe_checksum, -1, NULL, NULL, 0, ENC_BIG_ENDIAN, PROTO_CHECKSUM_NO_FLAGS);
402   proto_item_append_text(parameter_item, " (0x%x)", tvb_get_ntohs(parameter_tvb, PE_CHECKSUM_OFFSET));
403 }
404 
405 static void
406 dissect_handle_resolution_option_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
407 {
408   proto_tree_add_item(parameter_tree, hf_hropt_items, parameter_tvb, HROPT_ITEMS_OFFSET, HROPT_ITEMS_LENGTH, ENC_BIG_ENDIAN);
409 }
410 
411 static void
412 dissect_unknown_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
413 {
414   guint16 type, parameter_value_length;
415 
416   type                   = tvb_get_ntohs(parameter_tvb, PARAMETER_TYPE_OFFSET);
417   parameter_value_length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET) - PARAMETER_HEADER_LENGTH;
418 
419   if (parameter_value_length > 0)
420     proto_tree_add_item(parameter_tree, hf_parameter_value, parameter_tvb, PARAMETER_VALUE_OFFSET, parameter_value_length, ENC_NA);
421 
422   proto_item_append_text(parameter_item, " (type %u and %u byte%s value)", type, parameter_value_length, plurality(parameter_value_length, "", "s"));
423 }
424 
425 static void
426 dissect_parameter(tvbuff_t *parameter_tvb, proto_tree *asap_tree)
427 {
428   guint16 type, length, padding_length;
429   proto_item *parameter_item;
430   proto_tree *parameter_tree;
431 
432   /* extract tag and length from the parameter */
433   type           = tvb_get_ntohs(parameter_tvb, PARAMETER_TYPE_OFFSET);
434   length         = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
435   padding_length = tvb_reported_length(parameter_tvb) - length;
436 
437   /* create proto_tree stuff */
438   parameter_tree = proto_tree_add_subtree(asap_tree, parameter_tvb, PARAMETER_HEADER_OFFSET, -1,
439       ett_asap_parameter, &parameter_item, val_to_str_const(type, parameter_type_values, "Unknown Parameter"));
440 
441   /* add tag and length to the asap tree */
442   proto_tree_add_item(parameter_tree, hf_parameter_type,   parameter_tvb, PARAMETER_TYPE_OFFSET,   PARAMETER_TYPE_LENGTH,   ENC_BIG_ENDIAN);
443   proto_tree_add_item(parameter_tree, hf_parameter_length, parameter_tvb, PARAMETER_LENGTH_OFFSET, PARAMETER_LENGTH_LENGTH, ENC_BIG_ENDIAN);
444 
445   switch(type) {
446   case IPV4_ADDRESS_PARAMETER_TYPE:
447     dissect_ipv4_parameter(parameter_tvb, parameter_tree, parameter_item);
448     break;
449   case IPV6_ADDRESS_PARAMETER_TYPE:
450     dissect_ipv6_parameter(parameter_tvb, parameter_tree, parameter_item);
451     break;
452   case DCCP_TRANSPORT_PARAMETER_TYPE:
453     dissect_dccp_transport_parameter(parameter_tvb, parameter_tree);
454     break;
455   case SCTP_TRANSPORT_PARAMETER_TYPE:
456     dissect_sctp_transport_parameter(parameter_tvb, parameter_tree);
457     break;
458   case TCP_TRANSPORT_PARAMETER_TYPE:
459     dissect_tcp_transport_parameter(parameter_tvb, parameter_tree);
460     break;
461   case UDP_TRANSPORT_PARAMETER_TYPE:
462     dissect_udp_transport_parameter(parameter_tvb, parameter_tree);
463     break;
464   case UDP_LITE_TRANSPORT_PARAMETER_TYPE:
465     dissect_udp_lite_transport_parameter(parameter_tvb, parameter_tree);
466     break;
467   case POOL_MEMBER_SELECTION_POLICY_PARAMETER_TYPE:
468     dissect_pool_member_selection_policy_parameter(parameter_tvb, parameter_tree);
469     break;
470   case POOL_HANDLE_PARAMETER_TYPE:
471     dissect_pool_handle_parameter(parameter_tvb, parameter_tree);
472     break;
473   case POOL_ELEMENT_PARAMETER_TYPE:
474     dissect_pool_element_parameter(parameter_tvb, parameter_tree);
475     break;
476   case SERVER_INFORMATION_PARAMETER_TYPE:
477     dissect_server_information_parameter(parameter_tvb, parameter_tree);
478     break;
479   case OPERATION_ERROR_PARAMETER_TYPE:
480     dissect_operation_error_parameter(parameter_tvb, parameter_tree);
481     break;
482   case COOKIE_PARAMETER_TYPE:
483     dissect_cookie_parameter(parameter_tvb, parameter_tree, parameter_item);
484     break;
485   case PE_IDENTIFIER_PARAMETER_TYPE:
486     dissect_pe_identifier_parameter(parameter_tvb, parameter_tree, parameter_item);
487     break;
488   case PE_CHECKSUM_PARAMETER_TYPE:
489     dissect_pe_checksum_parameter(parameter_tvb, parameter_tree, parameter_item);
490     break;
491   case HANDLE_RESOLUTION_OPTION_PARAMETER_TYPE:
492     dissect_handle_resolution_option_parameter(parameter_tvb, parameter_tree);
493     break;
494   default:
495     dissect_unknown_parameter(parameter_tvb, parameter_tree, parameter_item);
496     break;
497   };
498 
499   if (padding_length > 0)
500     proto_tree_add_item(parameter_tree, hf_parameter_padding, parameter_tvb, PARAMETER_HEADER_OFFSET + length, padding_length, ENC_NA);
501 }
502 
503 static void
504 dissect_parameters(tvbuff_t *parameters_tvb, proto_tree *tree)
505 {
506   gint offset, length, total_length, remaining_length;
507   tvbuff_t *parameter_tvb;
508 
509   offset = 0;
510   while((remaining_length = tvb_reported_length_remaining(parameters_tvb, offset)) > 0) {
511     length       = tvb_get_ntohs(parameters_tvb, offset + PARAMETER_LENGTH_OFFSET);
512     total_length = ADD_PADDING(length);
513     if (remaining_length >= length)
514       total_length = MIN(total_length, remaining_length);
515     /* create a tvb for the parameter including the padding bytes */
516     parameter_tvb  = tvb_new_subset_length(parameters_tvb, offset, total_length);
517     dissect_parameter(parameter_tvb, tree);
518     /* get rid of the handled parameter */
519     offset += total_length;
520   }
521 }
522 
523 /* Dissectors for messages. This is specific to ASAP */
524 
525 #define REGISTRATION_MESSAGE_TYPE               0x01
526 #define DEREGISTRATION_MESSAGE_TYPE             0x02
527 #define REGISTRATION_RESPONSE_MESSAGE_TYPE      0x03
528 #define DEREGISTRATION_RESPONSE_MESSAGE_TYPE    0x04
529 #define HANDLE_RESOLUTION_MESSAGE_TYPE          0x05
530 #define HANDLE_RESOLUTION_RESPONSE_MESSAGE_TYPE 0x06
531 #define ENDPOINT_KEEP_ALIVE_MESSAGE_TYPE        0x07
532 #define ENDPOINT_KEEP_ALIVE_ACK_MESSAGE_TYPE    0x08
533 #define ENDPOINT_UNREACHABLE_MESSAGE_TYPE       0x09
534 #define SERVER_ANNOUNCE_MESSAGE_TYPE            0x0a
535 #define COOKIE_MESSAGE_TYPE                     0x0b
536 #define COOKIE_ECHO_MESSAGE_TYPE                0x0c
537 #define BUSINESS_CARD_MESSAGE_TYPE              0x0d
538 #define ERROR_MESSAGE_TYPE                      0x0e
539 
540 static const value_string message_type_values[] = {
541   { REGISTRATION_MESSAGE_TYPE,               "ASAP Registration" },
542   { DEREGISTRATION_MESSAGE_TYPE,             "ASAP Deregistration" },
543   { REGISTRATION_RESPONSE_MESSAGE_TYPE,      "ASAP Registration Response" },
544   { DEREGISTRATION_RESPONSE_MESSAGE_TYPE,    "ASAP Deregistration Response" },
545   { HANDLE_RESOLUTION_MESSAGE_TYPE,          "ASAP Handle Resolution" },
546   { HANDLE_RESOLUTION_RESPONSE_MESSAGE_TYPE, "ASAP Handle Resolution Response" },
547   { ENDPOINT_KEEP_ALIVE_MESSAGE_TYPE,        "ASAP Endpoint Keep-Alive" },
548   { ENDPOINT_KEEP_ALIVE_ACK_MESSAGE_TYPE,    "ASAP Endpoint Keep-Alive Acknowledgement" },
549   { ENDPOINT_UNREACHABLE_MESSAGE_TYPE,       "ASAP Endpoint Unreachable" },
550   { SERVER_ANNOUNCE_MESSAGE_TYPE,            "ASAP Server Announce" },
551   { COOKIE_MESSAGE_TYPE,                     "ASAP Cookie" },
552   { COOKIE_ECHO_MESSAGE_TYPE,                "ASAP Cookie Echo" },
553   { BUSINESS_CARD_MESSAGE_TYPE,              "ASAP Business Card" },
554   { ERROR_MESSAGE_TYPE,                      "ASAP Error" },
555   { 0,                                       NULL } };
556 
557 #define SERVER_IDENTIFIER_OFFSET MESSAGE_VALUE_OFFSET
558 #define SERVER_IDENTIFIER_LENGTH 4
559 
560 #define HOME_ENRP_SERVER_BIT_MASK 0x01
561 #define REJECT_BIT_MASK           0x01
562 
563 static const true_false_string home_enrp_server_bit_value = {
564   "Want to be new ENRP server",
565   "Do not want to be new ENRP server"
566 };
567 
568 static const true_false_string reject_bit_value = {
569   "Rejected",
570   "Accepted"
571 };
572 
573 static void
574 dissect_asap_message(tvbuff_t *message_tvb, packet_info *pinfo, proto_tree *asap_tree)
575 {
576   asap_tap_rec_t *tap_rec;
577   tvbuff_t       *parameters_tvb;
578   proto_item     *flags_item;
579   proto_tree     *flags_tree;
580   guint8          type;
581 
582   type = tvb_get_guint8(message_tvb, MESSAGE_TYPE_OFFSET);
583   /* pinfo is NULL only if dissect_asap_message is called via dissect_error_cause */
584   if (pinfo) {
585     tap_rec = wmem_new0(pinfo->pool, asap_tap_rec_t);
586     tap_rec->type        = type;
587     tap_rec->size        = tvb_get_ntohs(message_tvb, MESSAGE_LENGTH_OFFSET);
588     tap_rec->type_string = val_to_str_const(tap_rec->type, message_type_values, "Unknown ASAP type");
589     tap_queue_packet(asap_tap, pinfo, tap_rec);
590 
591     col_add_fstr(pinfo->cinfo, COL_INFO, "%s ", val_to_str_const(type, message_type_values, "Unknown ASAP type"));
592   }
593 
594   if (asap_tree) {
595     proto_tree_add_item(asap_tree, hf_message_type,   message_tvb, MESSAGE_TYPE_OFFSET,   MESSAGE_TYPE_LENGTH,   ENC_BIG_ENDIAN);
596     flags_item = proto_tree_add_item(asap_tree, hf_message_flags,  message_tvb, MESSAGE_FLAGS_OFFSET,  MESSAGE_FLAGS_LENGTH,  ENC_BIG_ENDIAN);
597     flags_tree = proto_item_add_subtree(flags_item, ett_asap_flags);
598     if (type == REGISTRATION_RESPONSE_MESSAGE_TYPE) {
599       proto_tree_add_item(flags_tree, hf_reject_bit, message_tvb, MESSAGE_FLAGS_OFFSET, MESSAGE_FLAGS_LENGTH, ENC_BIG_ENDIAN);
600     }
601     if (type == ENDPOINT_KEEP_ALIVE_MESSAGE_TYPE) {
602       proto_tree_add_item(flags_tree, hf_home_enrp_server_bit, message_tvb, MESSAGE_FLAGS_OFFSET, MESSAGE_FLAGS_LENGTH, ENC_BIG_ENDIAN);
603     }
604     proto_tree_add_item(asap_tree, hf_message_length, message_tvb, MESSAGE_LENGTH_OFFSET, MESSAGE_LENGTH_LENGTH, ENC_BIG_ENDIAN);
605     if ((type == SERVER_ANNOUNCE_MESSAGE_TYPE) || (type == ENDPOINT_KEEP_ALIVE_MESSAGE_TYPE)) {
606       proto_tree_add_item(asap_tree, hf_server_identifier, message_tvb, SERVER_IDENTIFIER_OFFSET, SERVER_IDENTIFIER_LENGTH, ENC_BIG_ENDIAN);
607       parameters_tvb = tvb_new_subset_remaining(message_tvb, MESSAGE_VALUE_OFFSET + SERVER_IDENTIFIER_LENGTH);
608     } else {
609       parameters_tvb = tvb_new_subset_remaining(message_tvb, MESSAGE_VALUE_OFFSET);
610     }
611     dissect_parameters(parameters_tvb, asap_tree);
612     }
613 }
614 
615 static int
616 dissect_asap(tvbuff_t *message_tvb, packet_info *pinfo, proto_tree *tree, void* data _U_)
617 {
618   proto_item *asap_item;
619   proto_tree *asap_tree;
620 
621   /* pinfo is NULL only if dissect_asap is called from dissect_error_cause */
622   if (pinfo)
623     col_set_str(pinfo->cinfo, COL_PROTOCOL, "ASAP");
624 
625   /* create the asap protocol tree */
626   asap_item = proto_tree_add_item(tree, proto_asap, message_tvb, 0, -1, ENC_NA);
627   asap_tree = proto_item_add_subtree(asap_item, ett_asap);
628 
629   /* dissect the message */
630   dissect_asap_message(message_tvb, pinfo, asap_tree);
631   return tvb_captured_length(message_tvb);
632 }
633 
634 /* TAP STAT INFO */
635 typedef enum
636 {
637   MESSAGE_TYPE_COLUMN = 0,
638   MESSAGES_COLUMN,
639   MESSAGES_SHARE_COLUMN,
640   BYTES_COLUMN,
641   BYTES_SHARE_COLUMN,
642   FIRST_SEEN_COLUMN,
643   LAST_SEEN_COLUMN,
644   INTERVAL_COLUMN,
645   MESSAGE_RATE_COLUMN,
646   BYTE_RATE_COLUMN
647 } asap_stat_columns;
648 
649 static stat_tap_table_item asap_stat_fields[] = {
650   { TABLE_ITEM_STRING, TAP_ALIGN_LEFT,  "ASAP Message Type",    "%-25s"    },
651   { TABLE_ITEM_UINT,   TAP_ALIGN_RIGHT, "Messages ",            "%u"       },
652   { TABLE_ITEM_UINT,   TAP_ALIGN_RIGHT, "Messages Share (%)"  , "%1.3f %%" },
653   { TABLE_ITEM_UINT,   TAP_ALIGN_RIGHT, "Bytes (B)",            "%u"       },
654   { TABLE_ITEM_UINT,   TAP_ALIGN_RIGHT, "Bytes Share (%) ",     "%1.3f %%" },
655   { TABLE_ITEM_FLOAT,  TAP_ALIGN_LEFT,  "First Seen (s)",       "%1.6f"    },
656   { TABLE_ITEM_FLOAT,  TAP_ALIGN_LEFT,  "Last Seen (s)",        "%1.6f"    },
657   { TABLE_ITEM_FLOAT,  TAP_ALIGN_LEFT,  "Interval (s)",         "%1.6f"    },
658   { TABLE_ITEM_FLOAT,  TAP_ALIGN_LEFT,  "Message Rate (Msg/s)", "%1.2f"    },
659   { TABLE_ITEM_FLOAT,  TAP_ALIGN_LEFT,  "Byte Rate (B/s)",      "%1.2f"    }
660 };
661 
662 static void asap_stat_init(stat_tap_table_ui* new_stat)
663 {
664   const char *table_name = "ASAP Statistics";
665   int num_fields = sizeof(asap_stat_fields)/sizeof(stat_tap_table_item);
666   stat_tap_table *table;
667   int i = 0;
668   stat_tap_table_item_type items[sizeof(asap_stat_fields)/sizeof(stat_tap_table_item)];
669 
670   table = stat_tap_find_table(new_stat, table_name);
671   if (table) {
672     if (new_stat->stat_tap_reset_table_cb) {
673       new_stat->stat_tap_reset_table_cb(table);
674     }
675     return;
676   }
677 
678   table = stat_tap_init_table(table_name, num_fields, 0, NULL);
679   stat_tap_add_table(new_stat, table);
680 
681   /* Add a row for each value type */
682   while (message_type_values[i].strptr) {
683     items[MESSAGE_TYPE_COLUMN].type                = TABLE_ITEM_STRING;
684     items[MESSAGE_TYPE_COLUMN].value.string_value  = message_type_values[i].strptr;
685     items[MESSAGES_COLUMN].type                    = TABLE_ITEM_UINT;
686     items[MESSAGES_COLUMN].value.uint_value        = 0;
687     items[MESSAGES_SHARE_COLUMN].type              = TABLE_ITEM_NONE;
688     items[MESSAGES_SHARE_COLUMN].value.float_value = -1.0;
689     items[BYTES_COLUMN].type                       = TABLE_ITEM_UINT;
690     items[BYTES_COLUMN].value.uint_value           = 0;
691     items[BYTES_SHARE_COLUMN].type                 = TABLE_ITEM_NONE;
692     items[BYTES_SHARE_COLUMN].value.float_value    = -1.0;
693     items[FIRST_SEEN_COLUMN].type                  = TABLE_ITEM_NONE;
694     items[FIRST_SEEN_COLUMN].value.float_value     = DBL_MAX;
695     items[LAST_SEEN_COLUMN].type                   = TABLE_ITEM_NONE;
696     items[LAST_SEEN_COLUMN].value.float_value      = DBL_MIN;
697     items[INTERVAL_COLUMN].type                    = TABLE_ITEM_NONE;
698     items[INTERVAL_COLUMN].value.float_value       = -1.0;
699     items[MESSAGE_RATE_COLUMN].type                = TABLE_ITEM_NONE;
700     items[MESSAGE_RATE_COLUMN].value.float_value   = -1.0;
701     items[BYTE_RATE_COLUMN].type                   = TABLE_ITEM_NONE;
702     items[BYTE_RATE_COLUMN].value.float_value      = -1.0;
703     stat_tap_init_table_row(table, i, num_fields, items);
704     i++;
705   }
706 }
707 
708 static tap_packet_status
709 asap_stat_packet(void* tapdata, packet_info* pinfo _U_, epan_dissect_t* edt _U_, const void* data)
710 {
711   stat_data_t*              stat_data = (stat_data_t*)tapdata;
712   const asap_tap_rec_t*     tap_rec   = (const asap_tap_rec_t*)data;
713   stat_tap_table*           table;
714   stat_tap_table_item_type* msg_data;
715   gint                      idx;
716   guint64                   messages;
717   guint64                   bytes;
718   int                       i         = 0;
719   double                    firstSeen = -1.0;
720   double                    lastSeen  = -1.0;
721 
722   idx = str_to_val_idx(tap_rec->type_string, message_type_values);
723   if (idx < 0)
724     return TAP_PACKET_DONT_REDRAW;
725 
726   table = g_array_index(stat_data->stat_tap_data->tables, stat_tap_table*, 0);
727 
728   /* Update packets counter */
729   asap_total_msgs++;
730   msg_data = stat_tap_get_field_data(table, idx, MESSAGES_COLUMN);
731   msg_data->value.uint_value++;
732   messages = msg_data->value.uint_value;
733   stat_tap_set_field_data(table, idx, MESSAGES_COLUMN, msg_data);
734 
735   /* Update bytes counter */
736   asap_total_bytes += tap_rec->size;
737   msg_data = stat_tap_get_field_data(table, idx, BYTES_COLUMN);
738   msg_data->value.uint_value += tap_rec->size;
739   bytes = msg_data->value.uint_value;
740   stat_tap_set_field_data(table, idx, BYTES_COLUMN, msg_data);
741 
742   /* Update messages and bytes share */
743   while (message_type_values[i].strptr) {
744     msg_data = stat_tap_get_field_data(table, i, MESSAGES_COLUMN);
745     const guint m = msg_data->value.uint_value;
746     msg_data = stat_tap_get_field_data(table, i, BYTES_COLUMN);
747     const guint b = msg_data->value.uint_value;
748 
749     msg_data = stat_tap_get_field_data(table, i, MESSAGES_SHARE_COLUMN);
750     msg_data->type = TABLE_ITEM_FLOAT;
751     msg_data->value.float_value = 100.0 * m / (double)asap_total_msgs;
752     stat_tap_set_field_data(table, i, MESSAGES_SHARE_COLUMN, msg_data);
753 
754     msg_data = stat_tap_get_field_data(table, i, BYTES_SHARE_COLUMN);
755     msg_data->type = TABLE_ITEM_FLOAT;
756     msg_data->value.float_value = 100.0 * b / (double)asap_total_bytes;
757     stat_tap_set_field_data(table, i, BYTES_SHARE_COLUMN, msg_data);
758     i++;
759   }
760 
761   /* Update first seen time */
762   if (pinfo->presence_flags & PINFO_HAS_TS) {
763     msg_data = stat_tap_get_field_data(table, idx, FIRST_SEEN_COLUMN);
764     msg_data->type = TABLE_ITEM_FLOAT;
765     msg_data->value.float_value = MIN(msg_data->value.float_value, nstime_to_sec(&pinfo->rel_ts));
766     firstSeen = msg_data->value.float_value;
767     stat_tap_set_field_data(table, idx, FIRST_SEEN_COLUMN, msg_data);
768   }
769 
770   /* Update last seen time */
771   if (pinfo->presence_flags & PINFO_HAS_TS) {
772     msg_data = stat_tap_get_field_data(table, idx, LAST_SEEN_COLUMN);
773     msg_data->type = TABLE_ITEM_FLOAT;
774     msg_data->value.float_value = MAX(msg_data->value.float_value, nstime_to_sec(&pinfo->rel_ts));
775     lastSeen = msg_data->value.float_value;
776     stat_tap_set_field_data(table, idx, LAST_SEEN_COLUMN, msg_data);
777   }
778 
779   if ((lastSeen - firstSeen) > 0.0) {
780     /* Update interval */
781     msg_data = stat_tap_get_field_data(table, idx, INTERVAL_COLUMN);
782     msg_data->type = TABLE_ITEM_FLOAT;
783     msg_data->value.float_value = lastSeen - firstSeen;
784     stat_tap_set_field_data(table, idx, INTERVAL_COLUMN, msg_data);
785 
786     /* Update message rate */
787     msg_data = stat_tap_get_field_data(table, idx, MESSAGE_RATE_COLUMN);
788     msg_data->type = TABLE_ITEM_FLOAT;
789     msg_data->value.float_value = messages / (lastSeen - firstSeen);
790     stat_tap_set_field_data(table, idx, MESSAGE_RATE_COLUMN, msg_data);
791 
792     /* Update byte rate */
793     msg_data = stat_tap_get_field_data(table, idx, BYTE_RATE_COLUMN);
794     msg_data->type = TABLE_ITEM_FLOAT;
795     msg_data->value.float_value = bytes / (lastSeen - firstSeen);
796     stat_tap_set_field_data(table, idx, BYTE_RATE_COLUMN, msg_data);
797   }
798 
799   return TAP_PACKET_REDRAW;
800 }
801 
802 static void
803 asap_stat_reset(stat_tap_table* table)
804 {
805   guint element;
806   stat_tap_table_item_type* item_data;
807 
808   for (element = 0; element < table->num_elements; element++) {
809     item_data = stat_tap_get_field_data(table, element, MESSAGES_COLUMN);
810     item_data->value.uint_value = 0;
811     stat_tap_set_field_data(table, element, MESSAGES_COLUMN, item_data);
812 
813     item_data = stat_tap_get_field_data(table, element, MESSAGES_SHARE_COLUMN);
814     item_data->type = TABLE_ITEM_NONE;
815     item_data->value.float_value = -1.0;
816     stat_tap_set_field_data(table, element, MESSAGES_SHARE_COLUMN, item_data);
817 
818     item_data = stat_tap_get_field_data(table, element, BYTES_COLUMN);
819     item_data->value.uint_value = 0;
820     stat_tap_set_field_data(table, element, BYTES_COLUMN, item_data);
821 
822     item_data = stat_tap_get_field_data(table, element, BYTES_SHARE_COLUMN);
823     item_data->type = TABLE_ITEM_NONE;
824     item_data->value.float_value = -1.0;
825     stat_tap_set_field_data(table, element, BYTES_SHARE_COLUMN, item_data);
826 
827     item_data = stat_tap_get_field_data(table, element, FIRST_SEEN_COLUMN);
828     item_data->type = TABLE_ITEM_NONE;
829     item_data->value.float_value = DBL_MAX;
830     stat_tap_set_field_data(table, element, FIRST_SEEN_COLUMN, item_data);
831 
832     item_data = stat_tap_get_field_data(table, element, LAST_SEEN_COLUMN);
833     item_data->type = TABLE_ITEM_NONE;
834     item_data->value.float_value = DBL_MIN;
835     stat_tap_set_field_data(table, element, LAST_SEEN_COLUMN, item_data);
836 
837     item_data = stat_tap_get_field_data(table, element, INTERVAL_COLUMN);
838     item_data->type = TABLE_ITEM_NONE;
839     item_data->value.float_value = -1.0;
840     stat_tap_set_field_data(table, element, INTERVAL_COLUMN, item_data);
841 
842     item_data = stat_tap_get_field_data(table, element, MESSAGE_RATE_COLUMN);
843     item_data->type = TABLE_ITEM_NONE;
844     item_data->value.float_value = -1.0;
845     stat_tap_set_field_data(table, element, MESSAGE_RATE_COLUMN, item_data);
846 
847     item_data = stat_tap_get_field_data(table, element, BYTE_RATE_COLUMN);
848     item_data->type = TABLE_ITEM_NONE;
849     item_data->value.float_value = -1.0;
850     stat_tap_set_field_data(table, element, BYTE_RATE_COLUMN, item_data);
851   }
852   asap_total_msgs  = 0;
853   asap_total_bytes = 0;
854 }
855 
856 /* Register the protocol with Wireshark */
857 void
858 proto_register_asap(void)
859 {
860 
861   /* Setup list of header fields */
862   static hf_register_info hf[] = {
863     { &hf_message_type,           { "Type",                        "asap.message_type",                             FT_UINT8,   BASE_DEC,  VALS(message_type_values),        0x0,                       NULL, HFILL } },
864     { &hf_message_flags,          { "Flags",                       "asap.message_flags",                            FT_UINT8,   BASE_HEX,  NULL,                             0x0,                       NULL, HFILL } },
865     { &hf_message_length,         { "Length",                      "asap.message_length",                           FT_UINT16,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
866     { &hf_cause_code,             { "Cause Code",                  "asap.cause_code",                               FT_UINT16,  BASE_HEX,  VALS(cause_code_values),          0x0,                       NULL, HFILL } },
867     { &hf_cause_length,           { "Cause Length",                "asap.cause_length",                             FT_UINT16,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
868     { &hf_cause_info,             { "Cause Info",                  "asap.cause_info",                               FT_BYTES,   BASE_NONE, NULL,                             0x0,                       NULL, HFILL } },
869     { &hf_cause_padding,          { "Padding",                     "asap.cause_padding",                            FT_BYTES,   BASE_NONE, NULL,                             0x0,                       NULL, HFILL } },
870     { &hf_parameter_type,         { "Parameter Type",              "asap.parameter_type",                           FT_UINT16,  BASE_HEX,  VALS(parameter_type_values),      0x0,                       NULL, HFILL } },
871     { &hf_parameter_length,       { "Parameter Length",            "asap.parameter_length",                         FT_UINT16,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
872     { &hf_parameter_value,        { "Parameter Value",             "asap.parameter_value",                          FT_BYTES,   BASE_NONE, NULL,                             0x0,                       NULL, HFILL } },
873     { &hf_parameter_padding,      { "Padding",                     "asap.parameter_padding",                        FT_BYTES,   BASE_NONE, NULL,                             0x0,                       NULL, HFILL } },
874     { &hf_parameter_ipv4_address, { "IP Version 4 Address",        "asap.ipv4_address",                             FT_IPv4,    BASE_NONE, NULL,                             0x0,                       NULL, HFILL } },
875     { &hf_parameter_ipv6_address, { "IP Version 6 Address",        "asap.ipv6_address",                             FT_IPv6,    BASE_NONE, NULL,                             0x0,                       NULL, HFILL } },
876     { &hf_dccp_port,              { "Port",                        "asap.dccp_transport_port",                      FT_UINT16,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
877     { &hf_dccp_reserved,          { "Reserved",                    "asap.dccp_transport_reserved",                  FT_UINT16,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
878     { &hf_dccp_service_code,      { "Service Code",                "asap.dccp_transport_service_code",              FT_UINT16,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
879     { &hf_sctp_port,              { "Port",                        "asap.sctp_transport_port",                      FT_UINT16,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
880     { &hf_transport_use,          { "Transport Use",               "asap.transport_use",                            FT_UINT16,  BASE_DEC,  VALS(transport_use_values),       0x0,                       NULL, HFILL } },
881     { &hf_tcp_port,               { "Port",                        "asap.tcp_transport_port",                       FT_UINT16,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
882     { &hf_udp_port,               { "Port",                        "asap.udp_transport_port",                       FT_UINT16,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
883     { &hf_udp_reserved,           { "Reserved",                    "asap.udp_transport_reserved",                   FT_UINT16,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
884     { &hf_udp_lite_port,          { "Port",                        "asap.udp_lite_transport_port",                  FT_UINT16,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
885     { &hf_udp_lite_reserved,      { "Reserved",                    "asap.udp_lite_transport_reserved",              FT_UINT16,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
886     { &hf_policy_type,            { "Policy Type",                 "asap.pool_member_selection_policy_type",        FT_UINT32,  BASE_HEX,  VALS(policy_type_values),         0x0,                       NULL, HFILL } },
887     { &hf_policy_weight,          { "Policy Weight",               "asap.pool_member_selection_policy_weight",      FT_UINT32,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
888     { &hf_policy_priority,        { "Policy Priority",             "asap.pool_member_selection_policy_priority",    FT_UINT32,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
889     { &hf_policy_load,            { "Policy Load",                 "asap.pool_member_selection_policy_load",        FT_DOUBLE,  BASE_NONE,  NULL,                             0x0,                       NULL, HFILL } },
890     { &hf_policy_degradation,     { "Policy Degradation",          "asap.pool_member_selection_policy_degradation", FT_DOUBLE,  BASE_NONE,  NULL,                             0x0,                       NULL, HFILL } },
891     { &hf_policy_loaddpf,         { "Policy Load DPF",             "asap.pool_member_selection_policy_load_dpf",    FT_DOUBLE,  BASE_NONE,  NULL,                             0x0,                       NULL, HFILL } },
892     { &hf_policy_weightdpf,       { "Policy Weight DPF",           "asap.pool_member_selection_policy_weight_dpf",  FT_DOUBLE,  BASE_NONE,  NULL,                             0x0,                       NULL, HFILL } },
893     { &hf_policy_distance,        { "Policy Distance",             "asap.pool_member_selection_policy_distance",    FT_UINT32,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
894     { &hf_policy_value,           { "Policy Value",                "asap.pool_member_selection_policy_value",       FT_BYTES,   BASE_NONE, NULL,                             0x0,                       NULL, HFILL } },
895     { &hf_pool_handle,            { "Pool Handle",                 "asap.pool_handle_pool_handle",                  FT_BYTES,   BASE_NONE,  NULL,                             0x0,                       NULL, HFILL } },
896     { &hf_pe_pe_identifier,       { "PE Identifier",               "asap.pool_element_pe_identifier",               FT_UINT32,  BASE_HEX,  NULL,                             0x0,                       NULL, HFILL } },
897     { &hf_home_enrp_id,           { "Home ENRP Server Identifier", "asap.pool_element_home_enrp_server_identifier", FT_UINT32,  BASE_HEX,  NULL,                             0x0,                       NULL, HFILL } },
898     { &hf_reg_life,               { "Registration Life",           "asap.pool_element_registration_life",           FT_INT32,   BASE_DEC|BASE_UNIT_STRING, &units_milliseconds, 0x0,                       NULL, HFILL } },
899     { &hf_cookie,                 { "Cookie",                      "asap.cookie",                                   FT_BYTES,   BASE_NONE,  NULL,                             0x0,                       NULL, HFILL } },
900     { &hf_pe_identifier,          { "PE Identifier",               "asap.pe_identifier",                            FT_UINT32,  BASE_HEX,  NULL,                             0x0,                       NULL, HFILL } },
901     { &hf_pe_checksum,            { "PE Checksum",                 "asap.pe_checksum",                              FT_UINT16,  BASE_HEX,  NULL,                             0x0,                       NULL, HFILL } },
902     { &hf_hropt_items,            { "Items",                       "asap.hropt_items",                              FT_UINT32,  BASE_DEC,  NULL,                             0x0,                       NULL, HFILL } },
903     { &hf_server_identifier,      { "Server Identifier",           "asap.server_identifier",                        FT_UINT32,  BASE_HEX,  NULL,                             0x0,                       NULL, HFILL } },
904     { &hf_home_enrp_server_bit,   { "H Bit",                       "asap.h_bit",                                    FT_BOOLEAN, 8,         TFS(&home_enrp_server_bit_value), HOME_ENRP_SERVER_BIT_MASK, NULL, HFILL } },
905     { &hf_reject_bit,             { "R Bit",                       "asap.r_bit",                                    FT_BOOLEAN, 8,         TFS(&reject_bit_value),           REJECT_BIT_MASK,           NULL, HFILL } },
906   };
907 
908   /* Setup protocol subtree array */
909   static gint *ett[] = {
910     &ett_asap,
911     &ett_asap_flags,
912     &ett_asap_parameter,
913     &ett_asap_cause,
914   };
915 
916   static tap_param asap_stat_params[] = {
917     { PARAM_FILTER, "filter", "Filter", NULL, TRUE }
918   };
919 
920   static stat_tap_table_ui asap_stat_table = {
921     REGISTER_STAT_GROUP_RSERPOOL,
922     "ASAP Statistics",
923     "asap",
924     "asap,stat",
925     asap_stat_init,
926     asap_stat_packet,
927     asap_stat_reset,
928     NULL,
929     NULL,
930     sizeof(asap_stat_fields)/sizeof(stat_tap_table_item), asap_stat_fields,
931     sizeof(asap_stat_params)/sizeof(tap_param), asap_stat_params,
932     NULL,
933     0
934   };
935 
936   /* Register the protocol name and description */
937   proto_asap = proto_register_protocol("Aggregate Server Access Protocol", "ASAP",  "asap");
938 
939   /* Required function calls to register the header fields and subtrees used */
940   proto_register_field_array(proto_asap, hf, array_length(hf));
941   proto_register_subtree_array(ett, array_length(ett));
942   asap_tap = register_tap("asap");
943 
944   register_stat_tap_table_ui(&asap_stat_table);
945 }
946 
947 void
948 proto_reg_handoff_asap(void)
949 {
950   dissector_handle_t asap_handle;
951 
952   asap_handle = create_dissector_handle(dissect_asap, proto_asap);
953   dissector_add_uint("sctp.ppi",  ASAP_PAYLOAD_PROTOCOL_ID, asap_handle);
954   dissector_add_uint_with_preference("udp.port",  ASAP_UDP_PORT,  asap_handle);
955   dissector_add_uint_with_preference("tcp.port",  ASAP_TCP_PORT,  asap_handle);
956   dissector_add_uint("sctp.port", ASAP_SCTP_PORT, asap_handle);
957 }
958 
959 /*
960  * Editor modelines  -  https://www.wireshark.org/tools/modelines.html
961  *
962  * Local Variables:
963  * c-basic-offset: 2
964  * tab-width: 8
965  * indent-tabs-mode: nil
966  * End:
967  *
968  * ex: set shiftwidth=2 tabstop=8 expandtab:
969  * :indentSize=2:tabSize=8:noTabs=true:
970  */
971