2 * Routines for Aggregate Server Access Protocol
3 * It is hopefully (needs testing) compilant to
4 * http://www.ietf.org/internet-drafts/draft-ietf-rserpool-common-param-06.txt
5 * http://www.ietf.org/internet-drafts/draft-ietf-rserpool-asap-09.txt
7 * Copyright 2004, Michael Tuexen <tuexen [AT] fh-muenster.de>
11 * Ethereal - Network traffic analyzer
12 * By Gerald Combs <gerald@ethereal.com>
13 * Copyright 1998 Gerald Combs
15 * Copied from README.developer
17 * This program is free software; you can redistribute it and/or
18 * modify it under the terms of the GNU General Public License
19 * as published by the Free Software Foundation; either version 2
20 * of the License, or (at your option) any later version.
22 * This program is distributed in the hope that it will be useful,
23 * but WITHOUT ANY WARRANTY; without even the implied warranty of
24 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
25 * GNU General Public License for more details.
27 * You should have received a copy of the GNU General Public License
28 * along with this program; if not, write to the Free Software
29 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
36 #include <epan/packet.h>
37 #include "sctpppids.h"
39 /* Initialize the protocol and registered fields */
40 static int proto_asap = -1;
41 static int hf_cause_code = -1;
42 static int hf_cause_length = -1;
43 static int hf_cause_info = -1;
44 static int hf_cause_padding = -1;
45 static int hf_message_type = -1;
46 static int hf_message_flags = -1;
47 static int hf_message_length = -1;
48 static int hf_parameter_type = -1;
49 static int hf_parameter_length = -1;
50 static int hf_parameter_value = -1;
51 static int hf_parameter_padding = -1;
52 static int hf_parameter_ipv4_address = -1;
53 static int hf_parameter_ipv6_address = -1;
54 static int hf_sctp_port = -1;
55 static int hf_transport_use = -1;
56 static int hf_tcp_port = -1;
57 static int hf_udp_port = -1;
58 static int hf_udp_reserved = -1;
59 static int hf_policy_type = -1;
60 static int hf_policy_value = -1;
61 static int hf_pool_handle = -1;
62 static int hf_pe_pe_identifier = -1;
63 static int hf_home_enrp_id = -1;
64 static int hf_reg_life = -1;
65 static int hf_server_identifier = -1;
66 static int hf_m_bit = -1;
67 static int hf_reserved = -1;
68 static int hf_cookie = -1;
69 static int hf_pe_identifier = -1;
70 static int hf_pe_checksum = -1;
72 /* Initialize the subtree pointers */
73 static gint ett_asap = -1;
74 static gint ett_asap_parameter = -1;
75 static gint ett_asap_cause = -1;
78 dissect_parameters(tvbuff_t *, proto_tree *);
80 #define NETWORK_BYTE_ORDER FALSE
81 #define ADD_PADDING(x) ((((x) + 3) >> 2) << 2)
83 /* Dissectors for error causes */
84 #define CAUSE_CODE_LENGTH 2
85 #define CAUSE_LENGTH_LENGTH 2
86 #define CAUSE_HEADER_LENGTH (CAUSE_CODE_LENGTH + CAUSE_LENGTH_LENGTH)
88 #define CAUSE_HEADER_OFFSET 0
89 #define CAUSE_CODE_OFFSET CAUSE_HEADER_OFFSET
90 #define CAUSE_LENGTH_OFFSET (CAUSE_CODE_OFFSET + CAUSE_CODE_LENGTH)
91 #define CAUSE_INFO_OFFSET (CAUSE_LENGTH_OFFSET + CAUSE_LENGTH_LENGTH)
94 dissect_unknown_cause(tvbuff_t *cause_tvb, proto_tree *cause_tree, proto_item *cause_item)
96 guint16 code, length, cause_info_length;
98 code = tvb_get_ntohs(cause_tvb, CAUSE_CODE_OFFSET);
99 length = tvb_get_ntohs(cause_tvb, CAUSE_LENGTH_OFFSET);
100 cause_info_length = length - CAUSE_HEADER_LENGTH;
101 if (cause_info_length > 0)
102 proto_tree_add_bytes(cause_tree, hf_cause_info, cause_tvb, CAUSE_INFO_OFFSET, cause_info_length,
103 tvb_get_ptr(cause_tvb, CAUSE_INFO_OFFSET, cause_info_length));
104 proto_item_append_text(cause_item, " (code %u and %u byte%s information)", code, cause_info_length, plurality(cause_info_length, "", "s"));
107 #define UNRECOGNIZED_PARAMETER_CAUSE_CODE 1
108 #define UNRECONGNIZED_MESSAGE_CAUSE_CODE 2
109 #define INVALID_VALUES 3
110 #define NON_UNIQUE_PE_IDENTIFIER 4
111 #define POOLING_POLICY_INCONSISTENT_CAUSE_CODE 5
112 #define LACK_OF_RESOURCES_CAUSE_CODE 6
113 #define INCONSISTENT_TRANSPORT_TYPE_CAUSE_CODE 7
114 #define INCONSISTENT_DATA_CONTROL_CONFIGURATION_CAUSE_CODE 8
116 static const value_string cause_code_values[] = {
117 { UNRECOGNIZED_PARAMETER_CAUSE_CODE, "Unrecognized parameter" },
118 { UNRECONGNIZED_MESSAGE_CAUSE_CODE, "Unrecognized message" },
119 { INVALID_VALUES, "Invalid values" },
120 { NON_UNIQUE_PE_IDENTIFIER, "Non-unique PE identifier" },
121 { POOLING_POLICY_INCONSISTENT_CAUSE_CODE, "Pooling policy inconsistent" },
122 { LACK_OF_RESOURCES_CAUSE_CODE, "Lack of resources" },
123 { INCONSISTENT_TRANSPORT_TYPE_CAUSE_CODE, "Inconsistent transport type" },
124 { INCONSISTENT_DATA_CONTROL_CONFIGURATION_CAUSE_CODE, "Inconsistent data/control type" },
128 dissect_error_cause(tvbuff_t *cause_tvb, proto_tree *parameter_tree)
130 guint16 code, length, padding_length;
131 proto_item *cause_item;
132 proto_tree *cause_tree;
134 code = tvb_get_ntohs(cause_tvb, CAUSE_CODE_OFFSET);
135 length = tvb_get_ntohs(cause_tvb, CAUSE_LENGTH_OFFSET);
136 padding_length = tvb_length(cause_tvb) - length;
138 cause_item = proto_tree_add_text(parameter_tree, cause_tvb, CAUSE_HEADER_OFFSET, tvb_length(cause_tvb), val_to_str(code, cause_code_values, "Unknown error cause"));
139 cause_tree = proto_item_add_subtree(cause_item, ett_asap_cause);
141 proto_tree_add_item(cause_tree, hf_cause_code, cause_tvb, CAUSE_CODE_OFFSET, CAUSE_CODE_LENGTH, NETWORK_BYTE_ORDER);
142 proto_tree_add_item(cause_tree, hf_cause_length, cause_tvb, CAUSE_LENGTH_OFFSET, CAUSE_LENGTH_LENGTH, NETWORK_BYTE_ORDER);
146 dissect_unknown_cause(cause_tvb, cause_tree, cause_item);
149 if (padding_length > 0)
150 proto_tree_add_item(cause_tree, hf_cause_padding, cause_tvb, CAUSE_HEADER_OFFSET + length, padding_length, NETWORK_BYTE_ORDER);
154 dissect_error_causes(tvbuff_t *error_causes_tvb, proto_tree *parameter_tree)
156 guint16 length, total_length;
158 tvbuff_t *error_cause_tvb;
161 while(tvb_reported_length_remaining(error_causes_tvb, offset)) {
162 length = tvb_get_ntohs(error_causes_tvb, offset + CAUSE_LENGTH_OFFSET);
163 total_length = ADD_PADDING(length);
164 error_cause_tvb = tvb_new_subset(error_causes_tvb, offset , total_length, total_length);
165 dissect_error_cause(error_cause_tvb, parameter_tree);
166 offset += total_length;
170 /* Dissectors for parameters. This is common for ASAP and ENRP */
172 #define PARAMETER_TYPE_LENGTH 2
173 #define PARAMETER_LENGTH_LENGTH 2
174 #define PARAMETER_HEADER_LENGTH (PARAMETER_TYPE_LENGTH + PARAMETER_LENGTH_LENGTH)
176 #define PARAMETER_HEADER_OFFSET 0
177 #define PARAMETER_TYPE_OFFSET PARAMETER_HEADER_OFFSET
178 #define PARAMETER_LENGTH_OFFSET (PARAMETER_TYPE_OFFSET + PARAMETER_TYPE_LENGTH)
179 #define PARAMETER_VALUE_OFFSET (PARAMETER_LENGTH_OFFSET + PARAMETER_LENGTH_LENGTH)
181 #define IPV4_ADDRESS_LENGTH 4
182 #define IPV4_ADDRESS_OFFSET PARAMETER_VALUE_OFFSET
185 dissect_ipv4_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
187 proto_tree_add_item(parameter_tree, hf_parameter_ipv4_address, parameter_tvb, IPV4_ADDRESS_OFFSET, IPV4_ADDRESS_LENGTH, NETWORK_BYTE_ORDER);
188 proto_item_append_text(parameter_item, " (%s)", ip_to_str((const guint8 *)tvb_get_ptr(parameter_tvb, IPV4_ADDRESS_OFFSET, IPV4_ADDRESS_LENGTH)));
191 #define IPV6_ADDRESS_LENGTH 16
192 #define IPV6_ADDRESS_OFFSET PARAMETER_VALUE_OFFSET
195 dissect_ipv6_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
197 proto_tree_add_item(parameter_tree, hf_parameter_ipv6_address, parameter_tvb, IPV6_ADDRESS_OFFSET, IPV6_ADDRESS_LENGTH, NETWORK_BYTE_ORDER);
198 proto_item_append_text(parameter_item, " (%s)", ip6_to_str((const struct e_in6_addr *)tvb_get_ptr(parameter_tvb, IPV6_ADDRESS_OFFSET, IPV6_ADDRESS_LENGTH)));
201 #define TRANSPORT_USE_DATA_ONLY 0
202 #define TRANSPORT_USE_DATA_PLUS_CONTROL 1
204 static const value_string transport_use_values[] = {
205 { TRANSPORT_USE_DATA_ONLY, "Data only" },
206 { TRANSPORT_USE_DATA_PLUS_CONTROL, "Data plus control" },
209 #define SCTP_PORT_LENGTH 2
210 #define SCTP_TRANSPORT_USE_LENGTH 2
211 #define SCTP_PORT_OFFSET PARAMETER_VALUE_OFFSET
212 #define SCTP_TRANSPORT_USE_OFFSET (SCTP_PORT_OFFSET + SCTP_PORT_LENGTH)
213 #define SCTP_ADDRESS_OFFSET (SCTP_TRANSPORT_USE_OFFSET + SCTP_TRANSPORT_USE_LENGTH)
216 dissect_sctp_transport_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
218 tvbuff_t *parameters_tvb;
220 proto_tree_add_item(parameter_tree, hf_sctp_port, parameter_tvb, SCTP_PORT_OFFSET, SCTP_PORT_LENGTH, NETWORK_BYTE_ORDER);
221 proto_tree_add_item(parameter_tree, hf_transport_use, parameter_tvb, SCTP_TRANSPORT_USE_OFFSET, SCTP_TRANSPORT_USE_LENGTH, NETWORK_BYTE_ORDER);
223 parameters_tvb = tvb_new_subset(parameter_tvb, SCTP_ADDRESS_OFFSET, -1, -1);
224 dissect_parameters(parameters_tvb, parameter_tree);
227 #define TCP_PORT_LENGTH 2
228 #define TCP_TRANSPORT_USE_LENGTH 2
229 #define TCP_PORT_OFFSET PARAMETER_VALUE_OFFSET
230 #define TCP_TRANSPORT_USE_OFFSET (TCP_PORT_OFFSET + TCP_PORT_LENGTH)
231 #define TCP_ADDRESS_OFFSET (TCP_TRANSPORT_USE_OFFSET + TCP_TRANSPORT_USE_LENGTH)
234 dissect_tcp_transport_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
236 tvbuff_t *parameters_tvb;
238 proto_tree_add_item(parameter_tree, hf_tcp_port, parameter_tvb, TCP_PORT_OFFSET, TCP_PORT_LENGTH, NETWORK_BYTE_ORDER);
239 proto_tree_add_item(parameter_tree, hf_transport_use, parameter_tvb, TCP_TRANSPORT_USE_OFFSET, TCP_TRANSPORT_USE_LENGTH, NETWORK_BYTE_ORDER);
241 parameters_tvb = tvb_new_subset(parameter_tvb, TCP_ADDRESS_OFFSET, -1, -1);
242 dissect_parameters(parameters_tvb, parameter_tree);
245 #define UDP_PORT_LENGTH 2
246 #define UDP_RESERVED_LENGTH 2
247 #define UDP_PORT_OFFSET PARAMETER_VALUE_OFFSET
248 #define UDP_RESERVED_OFFSET (UDP_PORT_OFFSET + UDP_PORT_LENGTH)
249 #define UDP_ADDRESS_OFFSET (UDP_RESERVED_OFFSET + UDP_RESERVED_LENGTH)
252 dissect_udp_transport_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
254 tvbuff_t *parameters_tvb;
256 proto_tree_add_item(parameter_tree, hf_udp_port, parameter_tvb, UDP_PORT_OFFSET, UDP_PORT_LENGTH, NETWORK_BYTE_ORDER);
257 proto_tree_add_item(parameter_tree, hf_udp_reserved, parameter_tvb, UDP_RESERVED_OFFSET, UDP_RESERVED_LENGTH, NETWORK_BYTE_ORDER);
259 parameters_tvb = tvb_new_subset(parameter_tvb, UDP_ADDRESS_OFFSET, -1, -1);
260 dissect_parameters(parameters_tvb, parameter_tree);
263 #define POLICY_TYPE_LENGTH 1
264 #define POLICY_VALUE_LENGTH 3
266 #define POLICY_TYPE_OFFSET PARAMETER_VALUE_OFFSET
267 #define POLICY_VALUE_OFFSET (POLICY_TYPE_OFFSET + POLICY_TYPE_LENGTH)
269 #define ROUND_ROBIN_POLICY 1
270 #define LEAST_USED_POLICY 2
271 #define LEAST_USED_WITH_DEG 3
272 #define WEIGHTED_ROUND_ROBIN 4
274 static const value_string policy_type_values[] = {
275 { ROUND_ROBIN_POLICY, "Round robin" },
276 { LEAST_USED_POLICY, "Least used" },
277 { LEAST_USED_WITH_DEG, "Least used with degradation" },
278 { WEIGHTED_ROUND_ROBIN, "Weighted round robin" },
282 dissect_pool_member_selection_policy_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
284 proto_tree_add_item(parameter_tree, hf_policy_type, parameter_tvb, POLICY_TYPE_OFFSET, POLICY_TYPE_LENGTH, NETWORK_BYTE_ORDER);
285 proto_tree_add_item(parameter_tree, hf_policy_value, parameter_tvb, POLICY_VALUE_OFFSET, POLICY_VALUE_LENGTH, NETWORK_BYTE_ORDER);
288 #define POOL_HANDLE_OFFSET PARAMETER_VALUE_OFFSET
291 dissect_pool_handle_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
293 guint16 handle_length;
295 handle_length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET) - PARAMETER_HEADER_LENGTH;
296 proto_tree_add_item(parameter_tree, hf_pool_handle, parameter_tvb, POOL_HANDLE_OFFSET, handle_length, NETWORK_BYTE_ORDER);
299 #define PE_PE_IDENTIFIER_LENGTH 4
300 #define HOME_ENRP_INDENTIFIER_LENGTH 4
301 #define REGISTRATION_LIFE_LENGTH 4
303 #define PE_PE_IDENTIFIER_OFFSET PARAMETER_VALUE_OFFSET
304 #define HOME_ENRP_INDENTIFIER_OFFSET (PE_PE_IDENTIFIER_OFFSET + PE_PE_IDENTIFIER_LENGTH)
305 #define REGISTRATION_LIFE_OFFSET (HOME_ENRP_INDENTIFIER_OFFSET + HOME_ENRP_INDENTIFIER_LENGTH)
306 #define USER_TRANSPORT_PARAMETER_OFFSET (REGISTRATION_LIFE_OFFSET + REGISTRATION_LIFE_LENGTH)
309 dissect_pool_element_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
311 tvbuff_t *parameters_tvb;
313 proto_tree_add_item(parameter_tree, hf_pe_pe_identifier, parameter_tvb, PE_PE_IDENTIFIER_OFFSET, PE_PE_IDENTIFIER_LENGTH, NETWORK_BYTE_ORDER);
314 proto_tree_add_item(parameter_tree, hf_home_enrp_id, parameter_tvb, HOME_ENRP_INDENTIFIER_OFFSET, HOME_ENRP_INDENTIFIER_LENGTH, NETWORK_BYTE_ORDER);
315 proto_tree_add_item(parameter_tree, hf_reg_life, parameter_tvb, REGISTRATION_LIFE_OFFSET, REGISTRATION_LIFE_LENGTH, NETWORK_BYTE_ORDER);
317 parameters_tvb = tvb_new_subset(parameter_tvb, USER_TRANSPORT_PARAMETER_OFFSET, -1, -1);
318 dissect_parameters(parameters_tvb, parameter_tree);
321 #define SERVER_ID_LENGTH 4
322 #define RESERVED_LENGTH 4
324 #define SERVER_ID_OFFSET PARAMETER_VALUE_OFFSET
325 #define RESERVED_OFFSET (SERVER_ID_OFFSET + SERVER_ID_LENGTH)
326 #define SERVER_TRANSPORT_OFFSET (RESERVED_OFFSET + RESERVED_LENGTH)
328 #define M_BIT_MASK 0x80000000
329 #define RESERVED_MASK 0x7fffffff
332 dissect_server_information_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
334 tvbuff_t *parameters_tvb;
336 proto_tree_add_item(parameter_tree, hf_server_identifier, parameter_tvb, SERVER_ID_OFFSET, SERVER_ID_LENGTH, NETWORK_BYTE_ORDER);
337 proto_tree_add_item(parameter_tree, hf_m_bit, parameter_tvb, RESERVED_OFFSET, RESERVED_LENGTH, NETWORK_BYTE_ORDER);
338 proto_tree_add_item(parameter_tree, hf_reserved, parameter_tvb, RESERVED_OFFSET, RESERVED_LENGTH, NETWORK_BYTE_ORDER);
340 parameters_tvb = tvb_new_subset(parameter_tvb, SERVER_TRANSPORT_OFFSET, -1, -1);
341 dissect_parameters(parameters_tvb, parameter_tree);
344 #define ERROR_CAUSES_OFFSET PARAMETER_VALUE_OFFSET
347 dissect_operation_error_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree)
349 tvbuff_t *error_causes_tvb;
351 error_causes_tvb = tvb_new_subset(parameter_tvb, ERROR_CAUSES_OFFSET, -1,-1);
352 dissect_error_causes(error_causes_tvb, parameter_tree);
355 #define COOKIE_OFFSET PARAMETER_VALUE_OFFSET
358 dissect_cookie_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
360 guint16 cookie_length;
362 cookie_length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET) - PARAMETER_HEADER_LENGTH;
363 if (cookie_length > 0)
364 proto_tree_add_item(parameter_tree, hf_cookie, parameter_tvb, COOKIE_OFFSET, cookie_length, NETWORK_BYTE_ORDER);
365 proto_item_append_text(parameter_item, " (%u byte%s)", cookie_length, plurality(cookie_length, "", "s"));
368 #define PE_IDENTIFIER_LENGTH 4
369 #define PE_IDENTIFIER_OFFSET PARAMETER_VALUE_OFFSET
372 dissect_pe_identifier_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
374 proto_tree_add_item(parameter_tree, hf_pe_identifier, parameter_tvb, PE_IDENTIFIER_OFFSET, PE_IDENTIFIER_LENGTH, NETWORK_BYTE_ORDER);
375 proto_item_append_text(parameter_item, " (0x%x)", tvb_get_ntohl(parameter_tvb, PE_IDENTIFIER_OFFSET));
378 #define PE_CHECKSUM_LENGTH 4
379 #define PE_CHECKSUM_OFFSET PARAMETER_VALUE_OFFSET
382 dissect_pe_checksum_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
384 proto_tree_add_item(parameter_tree, hf_pe_checksum, parameter_tvb, PE_CHECKSUM_OFFSET, PE_CHECKSUM_LENGTH, NETWORK_BYTE_ORDER);
385 proto_item_append_text(parameter_item, " (0x%x)", tvb_get_ntohl(parameter_tvb, PE_CHECKSUM_OFFSET));
389 dissect_unknown_parameter(tvbuff_t *parameter_tvb, proto_tree *parameter_tree, proto_item *parameter_item)
391 guint16 type, parameter_value_length;
393 type = tvb_get_ntohs(parameter_tvb, PARAMETER_TYPE_OFFSET);
394 parameter_value_length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET) - PARAMETER_HEADER_LENGTH;
396 if (parameter_value_length > 0)
397 proto_tree_add_item(parameter_tree, hf_parameter_value, parameter_tvb, PARAMETER_VALUE_OFFSET, parameter_value_length, NETWORK_BYTE_ORDER);
399 proto_item_append_text(parameter_item, " (type %u and %u byte%s value)", type, parameter_value_length, plurality(parameter_value_length, "", "s"));
402 #define IPV4_ADDRESS_PARAMETER_TYPE 0x01
403 #define IPV6_ADDRESS_PARAMETER_TYPE 0x02
404 #define SCTP_TRANSPORT_PARAMETER_TYPE 0x03
405 #define TCP_TRANSPORT_PARAMETER_TYPE 0x04
406 #define UDP_TRANSPORT_PARAMETER_TYPE 0x05
407 #define POOL_MEMBER_SELECTION_POLICY_PARAMETER_TYPE 0x06
408 #define POOL_HANDLE_PARAMETER_TYPE 0x07
409 #define POOL_ELEMENT_PARAMETER_TYPE 0x08
410 #define SERVER_INFORMATION_PARAMETER_TYPE 0x09
411 #define OPERATION_ERROR_PARAMETER_TYPE 0x0a
412 #define COOKIE_PARAMETER_TYPE 0x0b
413 #define PE_IDENTIFIER_PARAMETER_TYPE 0x0c
414 #define PE_CHECKSUM_PARAMETER_TYPE 0x0d
416 static const value_string parameter_type_values[] = {
417 { IPV4_ADDRESS_PARAMETER_TYPE, "IPV4 address" },
418 { IPV6_ADDRESS_PARAMETER_TYPE, "IPV6 address" },
419 { SCTP_TRANSPORT_PARAMETER_TYPE, "SCTP transport address" },
420 { TCP_TRANSPORT_PARAMETER_TYPE, "TCP transport address" },
421 { UDP_TRANSPORT_PARAMETER_TYPE, "UDP transport address" },
422 { POOL_MEMBER_SELECTION_POLICY_PARAMETER_TYPE, "Pool member selection policy" },
423 { POOL_HANDLE_PARAMETER_TYPE, "Pool handle" },
424 { POOL_ELEMENT_PARAMETER_TYPE, "Pool element" },
425 { SERVER_INFORMATION_PARAMETER_TYPE, "Server Information" },
426 { OPERATION_ERROR_PARAMETER_TYPE, "Operation error" },
427 { COOKIE_PARAMETER_TYPE, "Cookie" },
428 { PE_IDENTIFIER_PARAMETER_TYPE, "Pool Element identifier" },
429 { PE_CHECKSUM_PARAMETER_TYPE, "PE checksum" },
434 dissect_parameter(tvbuff_t *parameter_tvb, proto_tree *asap_tree)
436 guint16 type, length, padding_length;
437 proto_item *parameter_item;
438 proto_tree *parameter_tree;
440 /* extract tag and length from the parameter */
441 type = tvb_get_ntohs(parameter_tvb, PARAMETER_TYPE_OFFSET);
442 length = tvb_get_ntohs(parameter_tvb, PARAMETER_LENGTH_OFFSET);
443 padding_length = tvb_length(parameter_tvb) - length;
445 /* create proto_tree stuff */
446 parameter_item = proto_tree_add_text(asap_tree, parameter_tvb, PARAMETER_HEADER_OFFSET, tvb_length(parameter_tvb), val_to_str(type, parameter_type_values, "Unknown parameter"));
447 parameter_tree = proto_item_add_subtree(parameter_item, ett_asap_parameter);
449 /* add tag and length to the asap tree */
450 proto_tree_add_item(parameter_tree, hf_parameter_type, parameter_tvb, PARAMETER_TYPE_OFFSET, PARAMETER_TYPE_LENGTH, NETWORK_BYTE_ORDER);
451 proto_tree_add_item(parameter_tree, hf_parameter_length, parameter_tvb, PARAMETER_LENGTH_OFFSET, PARAMETER_LENGTH_LENGTH, NETWORK_BYTE_ORDER);
454 case IPV4_ADDRESS_PARAMETER_TYPE:
455 dissect_ipv4_parameter(parameter_tvb, parameter_tree, parameter_item);
457 case IPV6_ADDRESS_PARAMETER_TYPE:
458 dissect_ipv6_parameter(parameter_tvb, parameter_tree, parameter_item);
460 case SCTP_TRANSPORT_PARAMETER_TYPE:
461 dissect_sctp_transport_parameter(parameter_tvb, parameter_tree);
463 case TCP_TRANSPORT_PARAMETER_TYPE:
464 dissect_tcp_transport_parameter(parameter_tvb, parameter_tree);
466 case UDP_TRANSPORT_PARAMETER_TYPE:
467 dissect_udp_transport_parameter(parameter_tvb, parameter_tree);
469 case POOL_MEMBER_SELECTION_POLICY_PARAMETER_TYPE:
470 dissect_pool_member_selection_policy_parameter(parameter_tvb, parameter_tree);
472 case POOL_HANDLE_PARAMETER_TYPE:
473 dissect_pool_handle_parameter(parameter_tvb, parameter_tree);
475 case POOL_ELEMENT_PARAMETER_TYPE:
476 dissect_pool_element_parameter(parameter_tvb, parameter_tree);
478 case SERVER_INFORMATION_PARAMETER_TYPE:
479 dissect_server_information_parameter(parameter_tvb, parameter_tree);
481 case OPERATION_ERROR_PARAMETER_TYPE:
482 dissect_operation_error_parameter(parameter_tvb, parameter_tree);
484 case COOKIE_PARAMETER_TYPE:
485 dissect_cookie_parameter(parameter_tvb, parameter_tree, parameter_item);
487 case PE_IDENTIFIER_PARAMETER_TYPE:
488 dissect_pe_identifier_parameter(parameter_tvb, parameter_tree, parameter_item);
490 case PE_CHECKSUM_PARAMETER_TYPE:
491 dissect_pe_checksum_parameter(parameter_tvb, parameter_tree, parameter_item);
494 dissect_unknown_parameter(parameter_tvb, parameter_tree, parameter_item);
498 if (padding_length > 0)
499 proto_tree_add_item(parameter_tree, hf_parameter_padding, parameter_tvb, PARAMETER_HEADER_OFFSET + length, padding_length, NETWORK_BYTE_ORDER);
503 dissect_parameters(tvbuff_t *parameters_tvb, proto_tree *tree)
505 gint offset, length, total_length, remaining_length;
506 tvbuff_t *parameter_tvb;
509 while((remaining_length = tvb_length_remaining(parameters_tvb, offset))) {
510 length = tvb_get_ntohs(parameters_tvb, offset + PARAMETER_LENGTH_OFFSET);
511 total_length = ADD_PADDING(length);
512 if (remaining_length >= length)
513 total_length = MIN(total_length, remaining_length);
514 /* create a tvb for the parameter including the padding bytes */
515 parameter_tvb = tvb_new_subset(parameters_tvb, offset, total_length, total_length);
516 dissect_parameter(parameter_tvb, tree);
517 /* get rid of the handled parameter */
518 offset += total_length;
522 #define MESSAGE_TYPE_LENGTH 1
523 #define MESSAGE_FLAGS_LENGTH 1
524 #define MESSAGE_LENGTH_LENGTH 2
526 #define MESSAGE_TYPE_OFFSET 0
527 #define MESSAGE_FLAGS_OFFSET (MESSAGE_TYPE_OFFSET + MESSAGE_TYPE_LENGTH)
528 #define MESSAGE_LENGTH_OFFSET (MESSAGE_FLAGS_OFFSET + MESSAGE_FLAGS_LENGTH)
529 #define MESSAGE_VALUE_OFFSET (MESSAGE_LENGTH_OFFSET + MESSAGE_LENGTH_LENGTH)
531 #define REGISTRATION_MESSAGE_TYPE 0x01
532 #define DEREGISTRATION_MESSAGE_TYPE 0x02
533 #define REGISTRATION_RESPONSE_MESSAGE_TYPE 0x03
534 #define DEREGISTRATION_RESPONSE_MESSAGE_TYPE 0x04
535 #define NAME_RESOLUTION_MESSAGE_TYPE 0x05
536 #define NAME_RESOLUTION_RESPONSE_MESSAGE_TYPE 0x06
537 #define ENDPOINT_KEEP_ALIVE_MESSAGE_TYPE 0x07
538 #define ENDPOINT_KEEP_ALIVE_ACK_MESSAGE_TYPE 0x08
539 #define ENDPOINT_UNREACHABLE_MESSAGE_TYPE 0x09
540 #define SERVER_ANNOUNCE_MESSAGE_TYPE 0x0a
541 #define COOKIE_MESSAGE_TYPE 0x0b
542 #define COOKIE_ECHO_MESSAGE_TYPE 0x0c
543 #define BUSINESS_CARD_MESSAGE_TYPE 0x0d
544 #define PEER_ERROR_MESSAGE_TYPE 0x0e
546 static const value_string message_type_values[] = {
547 { REGISTRATION_MESSAGE_TYPE, "Registration" },
548 { DEREGISTRATION_MESSAGE_TYPE, "Deregistration" },
549 { REGISTRATION_RESPONSE_MESSAGE_TYPE, "Registration response" },
550 { DEREGISTRATION_RESPONSE_MESSAGE_TYPE, "Deregistration response" },
551 { NAME_RESOLUTION_MESSAGE_TYPE, "Name resolution" },
552 { NAME_RESOLUTION_RESPONSE_MESSAGE_TYPE, "Name resolution response" },
553 { ENDPOINT_KEEP_ALIVE_MESSAGE_TYPE, "Endpoint keep alive" },
554 { ENDPOINT_KEEP_ALIVE_ACK_MESSAGE_TYPE, "Endpoint keep alive acknowledgement" },
555 { ENDPOINT_UNREACHABLE_MESSAGE_TYPE, "Endpoint unreachable" },
556 { SERVER_ANNOUNCE_MESSAGE_TYPE, "Server announce" },
557 { COOKIE_MESSAGE_TYPE, "Cookie" },
558 { COOKIE_ECHO_MESSAGE_TYPE, "Cookie echo" },
559 { BUSINESS_CARD_MESSAGE_TYPE, "Business card" },
560 { PEER_ERROR_MESSAGE_TYPE, "Peer error" },
564 dissect_asap_message(tvbuff_t *message_tvb, packet_info *pinfo, proto_tree *asap_tree)
566 tvbuff_t *parameters_tvb;
568 if (check_col(pinfo->cinfo, COL_INFO))
569 col_add_fstr(pinfo->cinfo, COL_INFO, "%s ", val_to_str(tvb_get_guint8(message_tvb, MESSAGE_TYPE_OFFSET), message_type_values, "Unknown ASAP type"));
572 proto_tree_add_item(asap_tree, hf_message_type, message_tvb, MESSAGE_TYPE_OFFSET, MESSAGE_TYPE_LENGTH, NETWORK_BYTE_ORDER);
573 proto_tree_add_item(asap_tree, hf_message_flags, message_tvb, MESSAGE_FLAGS_OFFSET, MESSAGE_FLAGS_LENGTH, NETWORK_BYTE_ORDER);
574 proto_tree_add_item(asap_tree, hf_message_length, message_tvb, MESSAGE_LENGTH_OFFSET, MESSAGE_LENGTH_LENGTH, NETWORK_BYTE_ORDER);
575 parameters_tvb = tvb_new_subset(message_tvb, MESSAGE_VALUE_OFFSET, -1, -1);
576 dissect_parameters(parameters_tvb, asap_tree);
581 dissect_asap(tvbuff_t *message_tvb, packet_info *pinfo, proto_tree *tree)
583 proto_item *asap_item;
584 proto_tree *asap_tree;
586 /* make entry in the Protocol column on summary display */
587 if (check_col(pinfo->cinfo, COL_PROTOCOL))
588 col_set_str(pinfo->cinfo, COL_PROTOCOL, "ASAP");
590 /* In the interest of speed, if "tree" is NULL, don't do any work not
591 necessary to generate protocol tree items. */
593 /* create the asap protocol tree */
594 asap_item = proto_tree_add_item(tree, proto_asap, message_tvb, 0, -1, FALSE);
595 asap_tree = proto_item_add_subtree(asap_item, ett_asap);
599 /* dissect the message */
600 dissect_asap_message(message_tvb, pinfo, asap_tree);
603 /* Register the protocol with Ethereal */
605 proto_register_asap(void)
608 /* Setup list of header fields */
609 static hf_register_info hf[] = {
610 { &hf_message_type, { "Type", "asap.message_type", FT_UINT8, BASE_DEC, VALS(message_type_values), 0x0, "", HFILL } },
611 { &hf_message_flags, { "Flags", "asap.message_flags", FT_UINT8, BASE_HEX, NULL, 0x0, "", HFILL } },
612 { &hf_message_length, { "Length", "asap.message_length", FT_UINT16, BASE_DEC, NULL, 0x0, "", HFILL } },
613 { &hf_cause_code, { "Cause code", "asap.cause_code", FT_UINT16, BASE_HEX, VALS(cause_code_values), 0x0, "", HFILL } },
614 { &hf_cause_length, { "Cause length", "asap.cause_length", FT_UINT16, BASE_DEC, NULL, 0x0, "", HFILL } },
615 { &hf_cause_info, { "Cause info", "asap.cause_info", FT_BYTES, BASE_NONE, NULL, 0x0, "", HFILL } },
616 { &hf_cause_padding, { "Padding", "asap.cause_padding", FT_BYTES, BASE_NONE, NULL, 0x0, "", HFILL } },
617 { &hf_parameter_type, { "Parameter Type", "asap.parameter_type", FT_UINT16, BASE_HEX, VALS(parameter_type_values), 0x0, "", HFILL } },
618 { &hf_parameter_length, { "Parameter length", "asap.parameter_length", FT_UINT16, BASE_DEC, NULL, 0x0, "", HFILL } },
619 { &hf_parameter_value, { "Parameter value", "asap.parameter_value", FT_BYTES, BASE_NONE, NULL, 0x0, "", HFILL } },
620 { &hf_parameter_padding, { "Padding", "asap.parameter_padding", FT_BYTES, BASE_NONE, NULL, 0x0, "", HFILL } },
621 { &hf_parameter_ipv4_address, { "IP Version 4 address", "asap.ipv4_address", FT_IPv4, BASE_NONE, NULL, 0x0, "", HFILL } },
622 { &hf_parameter_ipv6_address, { "IP Version 6 address", "asap.ipv6_address", FT_IPv6, BASE_NONE, NULL, 0x0, "", HFILL } },
623 { &hf_sctp_port, { "Port", "asap.sctp_transport_port", FT_UINT16, BASE_DEC, NULL, 0x0, "", HFILL } },
624 { &hf_transport_use, { "Transport use", "asap.transport_use", FT_UINT16, BASE_DEC, VALS(transport_use_values), 0x0, "", HFILL } },
625 { &hf_tcp_port, { "Port", "asap.tcp_transport_port", FT_UINT16, BASE_DEC, NULL, 0x0, "", HFILL } },
626 { &hf_udp_port, { "Port", "asap.udp_transport_port", FT_UINT16, BASE_DEC, NULL, 0x0, "", HFILL } },
627 { &hf_udp_reserved, { "Reserved", "asap.udp_transport_reserved", FT_UINT16, BASE_DEC, NULL, 0x0, "", HFILL } },
628 { &hf_policy_type, { "Policy type", "asap.pool_member_slection_policy_type", FT_UINT8, BASE_DEC, VALS(policy_type_values), 0x0, "", HFILL } },
629 { &hf_policy_value, { "Policy value", "asap.pool_member_slection_policy_value", FT_INT24, BASE_DEC, NULL, 0x0, "", HFILL } },
630 { &hf_pool_handle, { "Pool handle", "asap.pool_handle_pool_handle", FT_BYTES, BASE_HEX, NULL, 0x0, "", HFILL } },
631 { &hf_pe_pe_identifier, { "PE identifier", "asap.pool_element_pe_identifier", FT_UINT32, BASE_HEX, NULL, 0x0, "", HFILL } },
632 { &hf_home_enrp_id, { "Home ENRP server identifier", "asap.pool_element_home_enrp_server_identifier", FT_UINT32, BASE_HEX, NULL, 0x0, "", HFILL } },
633 { &hf_reg_life, { "Registration life", "asap.pool_element_registration_life", FT_INT32, BASE_DEC, NULL, 0x0, "", HFILL } },
634 { &hf_server_identifier, { "Server identifier", "asap.server_information_server_identifier", FT_UINT32, BASE_HEX, NULL, 0x0, "", HFILL } },
635 { &hf_m_bit, { "M-Bit", "asap.server_information_m_bit", FT_BOOLEAN, 32, NULL, M_BIT_MASK, "", HFILL } },
636 { &hf_reserved, { "Reserved", "asap.server_information_reserved", FT_UINT32, BASE_HEX, NULL, RESERVED_MASK, "", HFILL } },
637 { &hf_cookie, { "Cookie", "asap.cookie", FT_BYTES, BASE_HEX, NULL, 0x0, "", HFILL } },
638 { &hf_pe_identifier, { "PE identifier", "asap.pe_identifier", FT_UINT32, BASE_HEX, NULL, 0x0, "", HFILL } },
639 { &hf_pe_checksum, { "PE checksum", "asap.pe_checksum", FT_UINT32, BASE_HEX, NULL, 0x0, "", HFILL } },
642 /* Setup protocol subtree array */
643 static gint *ett[] = {
649 /* Register the protocol name and description */
650 proto_asap = proto_register_protocol("Aggregate Server Access Protocol", "ASAP", "asap");
652 /* Required function calls to register the header fields and subtrees used */
653 proto_register_field_array(proto_asap, hf, array_length(hf));
654 proto_register_subtree_array(ett, array_length(ett));
659 proto_reg_handoff_asap(void)
661 dissector_handle_t asap_handle;
663 asap_handle = create_dissector_handle(dissect_asap, proto_asap);
664 dissector_add("sctp.ppi", ASAP_PAYLOAD_PROTOCOL_ID, asap_handle);