/* packet-rsvp.c * Routines for RSVP packet disassembly * * (c) Copyright Ashok Narayanan * * $Id: packet-rsvp.c,v 1.3 1999/07/13 02:52:55 gram Exp $ * * Ethereal - Network traffic analyzer * By Gerald Combs * Copyright 1998 Gerald Combs * * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License * as published by the Free Software Foundation; either version 2 * of the License, or (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /* * NOTES * * This module defines routines to disassemble RSVP packets, as defined in * RFC 2205. All objects from RC2205 are supported, in IPv4 and IPv6 mode. * In addition, the Integrated Services traffic specification objects * defined in RFC2210 are also supported. * * IPv6 support is not completely tested */ #ifdef HAVE_CONFIG_H # include "config.h" #endif #include #ifdef HAVE_UNISTD_H #include #endif #include #include #ifdef HAVE_SYS_TYPES_H # include #endif #ifdef HAVE_NETINET_IN_H # include #endif #ifdef NEED_SNPRINTF_H # ifdef HAVE_STDARG_H # include # else # include # endif # include "snprintf.h" #endif #include #include "packet.h" #include "packet-ipv6.h" #include "packet-rsvp.h" /* Stuff for IEEE float handling */ #define IEEE_NUMBER_WIDTH 32 /* bits in number */ #define IEEE_EXP_WIDTH 8 /* bits in exponent */ #define IEEE_MANTISSA_WIDTH 23 /* IEEE_NUMBER_WIDTH - 1 - IEEE_EXP_WIDTH */ #define IEEE_SIGN_MASK 0x80000000 #define IEEE_EXPONENT_MASK 0x7F800000 #define IEEE_MANTISSA_MASK 0x007FFFFF #define IEEE_INFINITY IEEE_EXPONENT_MASK #define IEEE_IMPLIED_BIT (1 << IEEE_MANTISSA_WIDTH) #define IEEE_INFINITE ((1 << IEEE_EXP_WIDTH) - 1) #define IEEE_BIAS ((1 << (IEEE_EXP_WIDTH - 1)) - 1) #define MINUS_INFINITY (signed)0x80000000L #define PLUS_INFINITY 0x7FFFFFFF static inline int ieee_float_is_zero (long number) { return(!(number & ~IEEE_SIGN_MASK)); } /* * simple conversion: ieee floating point to long */ static long ieee_to_long (const void *p) { long number; long sign; long exponent; long mantissa; number = pntohl(p); sign = number & IEEE_SIGN_MASK; exponent = number & IEEE_EXPONENT_MASK; mantissa = number & IEEE_MANTISSA_MASK; if (ieee_float_is_zero(number)) { /* number is zero, unnormalized, or not-a-number */ return 0; } if (IEEE_INFINITY == exponent) { /* number is positive or negative infinity, or a special value */ return (sign? MINUS_INFINITY: PLUS_INFINITY); } exponent = (exponent >> IEEE_MANTISSA_WIDTH) - IEEE_BIAS; if (exponent < 0) { /* number is between zero and one */ return 0; } mantissa |= IEEE_IMPLIED_BIT; if (exponent <= IEEE_MANTISSA_WIDTH) mantissa >>= IEEE_MANTISSA_WIDTH - exponent; else mantissa <<= exponent - IEEE_MANTISSA_WIDTH; if (sign) return -mantissa; else return mantissa; } void dissect_rsvp(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) { proto_tree *rsvp_tree = NULL, *ti; proto_tree *rsvp_header_tree; proto_tree *rsvp_object_tree; char *packet_type, *object_type; rsvp_header *hdr; rsvp_object *obj; int i, len, mylen; int msg_length; int obj_length; int offset2; hdr = (rsvp_header *)&pd[offset]; packet_type = match_strval(hdr->message_type, message_type_vals); if (check_col(fd, COL_PROTOCOL)) col_add_str(fd, COL_PROTOCOL, "RSVP"); if (check_col(fd, COL_INFO)) { if (packet_type != NULL) col_add_str(fd, COL_INFO, packet_type); else col_add_fstr(fd, COL_INFO, "Unknown (%d)", hdr->message_type); } if (tree) { msg_length = pntohs(pd+offset+6); ti = proto_tree_add_text(tree, offset, msg_length, "Resource ReserVation Protocol (RSVP)"); rsvp_tree = proto_item_add_subtree(ti, ETT_RSVP); ti = proto_tree_add_text(rsvp_tree, offset, sizeof(rsvp_header), "RSVP Header"); rsvp_header_tree = proto_item_add_subtree(ti, ETT_RSVP_HDR); proto_tree_add_text(rsvp_header_tree, offset, 1, "RSVP Version: %d", (hdr->ver_flags & 0xf0)>>4); proto_tree_add_text(rsvp_header_tree, offset, 1, "Flags: %02X", hdr->ver_flags & 0xf); proto_tree_add_text(rsvp_header_tree, offset+1, 1, "Message Type: %d - %s", hdr->message_type, packet_type?packet_type:"Unknown"); proto_tree_add_text(rsvp_header_tree, offset + 2 , 2, "Message Checksum"); proto_tree_add_text(rsvp_header_tree, offset + 4 , 1, "Sending TTL: %d", hdr->sending_ttl); proto_tree_add_text(rsvp_header_tree, offset + 6 , 2, "Message length: %d", msg_length); offset += sizeof(rsvp_header); len = 0; while (len + sizeof(rsvp_header) < msg_length) { obj = (rsvp_object *)&pd[offset]; obj_length = pntohs(pd+offset); if (offset + obj_length > fd->cap_len) { proto_tree_add_text(rsvp_tree, offset, 1, "Further data not captured"); break; } object_type = match_strval(obj->class, rsvp_class_vals); if (!object_type) object_type = "Unknown"; ti = proto_tree_add_text(rsvp_tree, offset, obj_length, "%s (%d)", object_type, obj->class); offset2 = offset + sizeof(rsvp_object); switch(obj->class) { case RSVP_CLASS_SESSION : rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_SESSION); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); switch(obj->type) { case 1: { rsvp_session_ipv4 *sess = (rsvp_session_ipv4 *)obj; proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 1 - IPv4"); proto_tree_add_text(rsvp_object_tree, offset2, 4, "Destination address: %s", ip_to_str((guint8 *) &(sess->destination))); proto_tree_add_text(rsvp_object_tree, offset2+4, 1, "Protocol: %d", sess->protocol); proto_tree_add_text(rsvp_object_tree, offset2+5, 1, "Flags: %d", sess->flags); proto_tree_add_text(rsvp_object_tree, offset2+6, 2, "Destination port: %d", pntohs(pd+offset2+6)); break; } case 2: { rsvp_session_ipv6 *sess = (rsvp_session_ipv6 *)obj; proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 2 - IPv6"); proto_tree_add_text(rsvp_object_tree, offset2, 4, "Destination address: %s", ip6_to_str(&(sess->destination))); proto_tree_add_text(rsvp_object_tree, offset2+16, 1, "Protocol: %d", sess->protocol); proto_tree_add_text(rsvp_object_tree, offset2+17, 1, "Flags: %d", sess->flags); proto_tree_add_text(rsvp_object_tree, offset2+18, 2, "Destination port: %d", pntohs(pd+offset2+18)); break; } default: { proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: Unknown (%d)", obj->type); i = obj_length - sizeof(rsvp_object); proto_tree_add_text(rsvp_object_tree, offset2, i, "Data (%d bytes)", i); } } break; case RSVP_CLASS_HOP : rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_HOP); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); switch(obj->type) { case 1: { rsvp_hop_ipv4 *hop = (rsvp_hop_ipv4 *)obj; proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 1 - IPv4"); proto_tree_add_text(rsvp_object_tree, offset2, 4, "Neighbor address: %s", ip_to_str((guint8 *) &(hop->neighbor))); proto_tree_add_text(rsvp_object_tree, offset2+4, 4, "Logical interface: %0x", pntohl(pd+offset2+4)); break; } case 2: { rsvp_hop_ipv6 *hop = (rsvp_hop_ipv6 *)obj; proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 2 - IPv6"); proto_tree_add_text(rsvp_object_tree, offset2, 4, "Neighbor address: %s", ip6_to_str(&(hop->neighbor))); proto_tree_add_text(rsvp_object_tree, offset2+16, 4, "Logical interface: %0x", pntohl(pd+offset2+16)); break; } default: { proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: Unknown (%d)", obj->type); i = obj_length - sizeof(rsvp_object); proto_tree_add_text(rsvp_object_tree, offset2, i, "Data (%d bytes)", i); } } break; case RSVP_CLASS_TIME_VALUES : rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_TIME_VALUES); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); switch(obj->type) { case 1: { proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 1"); proto_tree_add_text(rsvp_object_tree, offset2, 4, "Refresh interval: %u ms (%u seconds)", pntohl(pd+offset2), pntohl(pd+offset2)/1000); break; } default: { proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: Unknown (%d)", obj->type); i = obj_length - sizeof(rsvp_object); proto_tree_add_text(rsvp_object_tree, offset2, i, "Data (%d bytes)", i); break; } } break; case RSVP_CLASS_ERROR : rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_ERROR); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); switch(obj->type) { case 1: { rsvp_error_ipv4 *err = (rsvp_error_ipv4 *)obj; char *err_str = match_strval(err->error_code, rsvp_error_vals); if (!err_str) err_str = "Unknown"; proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 1 - IPv4"); proto_tree_add_text(rsvp_object_tree, offset2, 4, "Error node: %s", ip_to_str((guint8 *) &(err->error_node))); proto_tree_add_text(rsvp_object_tree, offset2+4, 1, "Flags: %02x", err->flags); proto_tree_add_text(rsvp_object_tree, offset2+5, 1, "Error code: %d - %s", err->error_code, err_str); proto_tree_add_text(rsvp_object_tree, offset2+6, 2, "Error value: %d", pntohs(pd+offset2+6)); break; } case 2: { rsvp_error_ipv6 *err = (rsvp_error_ipv6 *)obj; char *err_str = match_strval(err->error_code, rsvp_error_vals); if (!err_str) err_str = "Unknown"; proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 2 - IPv6"); proto_tree_add_text(rsvp_object_tree, offset2, 4, "Error node: %s", ip6_to_str(&(err->error_node))); proto_tree_add_text(rsvp_object_tree, offset2+16, 1, "Flags: %02x", err->flags); proto_tree_add_text(rsvp_object_tree, offset2+17, 1, "Error code: %d - %s", err->error_code, err_str); proto_tree_add_text(rsvp_object_tree, offset2+18, 2, "Error value: %d", pntohs(pd+offset2+18)); break; } default: { proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: Unknown (%d)", obj->type); i = obj_length - sizeof(rsvp_object); proto_tree_add_text(rsvp_object_tree, offset2, i, "Data (%d bytes)", i); } } break; case RSVP_CLASS_SCOPE : mylen = obj_length; rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_SCOPE); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); switch(obj->type) { case 1: { unsigned long ip; proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 1 - IPv4"); while (mylen > sizeof(rsvp_object)) { ip = pntohl(pd+offset2); proto_tree_add_text(rsvp_object_tree, offset2, 4, "IPv4 Address: %s", ip_to_str((guint8 *) &ip)); offset2 += 4; mylen -= 4; } break; } case 2: { struct e_in6_addr *ip; proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 2 - IPv6"); while (mylen>sizeof(rsvp_object)) { ip = (struct e_in6_addr *)pd+offset2; proto_tree_add_text(rsvp_object_tree, offset2, 16, "IPv6 Address: %s", ip6_to_str(ip)); offset2 += 16; mylen -= 16; } break; } default: { proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: Unknown (%d)", obj->type); i = obj_length - sizeof(rsvp_object); proto_tree_add_text(rsvp_object_tree, offset2, i, "Data (%d bytes)", i); } } break; case RSVP_CLASS_STYLE : rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_STYLE); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); switch(obj->type) { case 1: { unsigned long ip = pntohl(pd+offset2); char *style_str = match_strval(ip, style_vals); if (!style_str) style_str = "Unknown"; proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 1"); proto_tree_add_text(rsvp_object_tree, offset2+5, 1, "Style: %ld - %s", ip, style_str); break; } default: { proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: Unknown (%d)", obj->type); i = obj_length - sizeof(rsvp_object); proto_tree_add_text(rsvp_object_tree, offset2, i, "Data (%d bytes)", i); break; } } break; case RSVP_CLASS_CONFIRM : rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_CONFIRM); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); switch(obj->type) { case 1: { rsvp_confirm_ipv4 *confirm = (rsvp_confirm_ipv4 *)obj; proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 1 - IPv4"); proto_tree_add_text(rsvp_object_tree, offset2, 4, "Receiver address: %s", ip_to_str((guint8 *) &(confirm->receiver))); break; } case 2: { rsvp_confirm_ipv6 *confirm = (rsvp_confirm_ipv6 *)obj; proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 2 - IPv6"); proto_tree_add_text(rsvp_object_tree, offset2, 16, "Receiver address: %s", ip6_to_str(&(confirm->receiver))); break; } default: { proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: Unknown (%d)", obj->type); i = obj_length - sizeof(rsvp_object); proto_tree_add_text(rsvp_object_tree, offset2, i, "Data (%d bytes)", i); } } break; case RSVP_CLASS_SENDER_TEMPLATE : rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_SENDER_TEMPLATE); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); goto common_template; case RSVP_CLASS_FILTER_SPEC : rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_FILTER_SPEC); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); common_template: switch(obj->type) { case 1: { rsvp_template_ipv4 *tem = (rsvp_template_ipv4 *)obj; proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 1 - IPv4"); proto_tree_add_text(rsvp_object_tree, offset2, 4, "Source address: %s", ip_to_str((guint8 *) &(tem->source))); proto_tree_add_text(rsvp_object_tree, offset2+6, 2, "Source port: %d", pntohs(pd+offset2+6)); break; } case 2: { rsvp_template_ipv6 *tem = (rsvp_template_ipv6 *)obj; proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: 2 - IPv6"); proto_tree_add_text(rsvp_object_tree, offset2, 16, "Source address: %s", ip6_to_str(&(tem->source))); proto_tree_add_text(rsvp_object_tree, offset2+18, 2, "Source port: %d", pntohs(pd+offset2+18)); break; } default: { proto_tree_add_text(rsvp_object_tree, offset+3, 1, "C-type: Unknown (%d)", obj->type); i = obj_length - sizeof(rsvp_object); proto_tree_add_text(rsvp_object_tree, offset2, i, "Data (%d bytes)", i); } } break; case RSVP_CLASS_SENDER_TSPEC : { IS_tspec *tspec = (IS_tspec *)obj; rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_SENDER_TSPEC); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); proto_tree_add_text(rsvp_object_tree, offset2, 1, "Message format version: %d", tspec->version>>4); proto_tree_add_text(rsvp_object_tree, offset2+2, 2, "Data length: %d words, not including header", pntohs(pd+offset2+2)); proto_tree_add_text(rsvp_object_tree, offset2+4, 1, "Service header: %d - %s", tspec->service_header, tspec->service_header==1 ? "Default/global information (INTSRV_GENERAL)" : "Unknown"); proto_tree_add_text(rsvp_object_tree, offset2+6, 2, "Length of service %d data: %d words, " "not including header", tspec->service_header, pntohs(pd+offset2+6)>>12); /* Token bucket TSPEC */ proto_tree_add_text(rsvp_object_tree, offset2+8, 1, "Parameter ID: %d - %s", tspec->param_id, tspec->param_id==127 ? "Token Bucket TSpec" : "Unknown"); proto_tree_add_text(rsvp_object_tree, offset2+9, 1, "Parameter %d flags: %d", tspec->param_id, tspec->flags_tspec); proto_tree_add_text(rsvp_object_tree, offset2+10, 2, "Length of parameter %d data: %d words, " "not including header", tspec->param_id, pntohs(pd+offset2+10)); proto_tree_add_text(rsvp_object_tree, offset2+12, 4, "Token bucket rate: %ld", ieee_to_long(pd+offset2+12)); proto_tree_add_text(rsvp_object_tree, offset2+16, 4, "Token bucket size: %ld", ieee_to_long(pd+offset2+16)); proto_tree_add_text(rsvp_object_tree, offset2+20, 4, "Peak data rate: %ld", ieee_to_long(pd+offset2+20)); proto_tree_add_text(rsvp_object_tree, offset2+24, 4, "Minimum policed unit: %d", pntohl(pd+offset2+24)); proto_tree_add_text(rsvp_object_tree, offset2+28, 4, "Maximum policed unit: %d", pntohl(pd+offset2+28)); break; } case RSVP_CLASS_FLOWSPEC : { IS_flowspec *flowspec = (IS_flowspec *)obj; char *qos_str = match_strval(flowspec->service_header, qos_vals); char *is_param_str = match_strval(flowspec->param_id, svc_vals); rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_FLOWSPEC); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); if (!qos_str) qos_str = "Unknown"; if (!is_param_str) is_param_str="Unknown"; proto_tree_add_text(rsvp_object_tree, offset2, 1, "Message format version: %d", flowspec->version>>4); proto_tree_add_text(rsvp_object_tree, offset2+2, 2, "Data length: %d words, not including header", pntohs(pd+offset2+2)); proto_tree_add_text(rsvp_object_tree, offset2+4, 1, "Service header: %d - %s", flowspec->service_header, qos_str); proto_tree_add_text(rsvp_object_tree, offset2+6, 2, "Length of service %d data: %d words, " "not including header", flowspec->service_header, pntohs(pd+offset2+6)>>12); proto_tree_add_text(rsvp_object_tree, offset2+8, 1, "Parameter ID: %d - %s", flowspec->param_id, is_param_str); proto_tree_add_text(rsvp_object_tree, offset2+9, 1, "Parameter %d flags: %d", flowspec->param_id, flowspec->flags_tspec); proto_tree_add_text(rsvp_object_tree, offset2+10, 2, "Length of parameter %d data: %d words, " "not including header", flowspec->param_id, pntohs(pd+offset2+10)); proto_tree_add_text(rsvp_object_tree, offset2+12, 4, "Token bucket rate: %ld", ieee_to_long(pd+offset2+12)); proto_tree_add_text(rsvp_object_tree, offset2+16, 4, "Token bucket size: %ld", ieee_to_long(pd+offset2+16)); proto_tree_add_text(rsvp_object_tree, offset2+20, 4, "Peak data rate: %ld", ieee_to_long(pd+offset2+20)); proto_tree_add_text(rsvp_object_tree, offset2+24, 4, "Minimum policed unit: %d", pntohl(pd+offset2+24)); proto_tree_add_text(rsvp_object_tree, offset2+28, 4, "Maximum policed unit: %d", pntohl(pd+offset2+28)); if (flowspec->service_header!=QOS_GUARANTEED) break; /* Guaranteed-rate RSpec */ is_param_str = match_strval(flowspec->param_id_rspec, svc_vals); if (!is_param_str) is_param_str="Unknown"; proto_tree_add_text(rsvp_object_tree, offset2+32, 1, "Parameter ID: %d - %s", flowspec->param_id, is_param_str); proto_tree_add_text(rsvp_object_tree, offset2+33, 1, "Parameter %d flags: %d", flowspec->param_id, flowspec->flags_rspec); proto_tree_add_text(rsvp_object_tree, offset2+34, 2, "Length of parameter %d data: %d words, " "not including header", flowspec->param_id, pntohs(pd+offset2+34)); proto_tree_add_text(rsvp_object_tree, offset2+36, 4, "Rate: %ld", ieee_to_long(pd+offset2+36)); proto_tree_add_text(rsvp_object_tree, offset2+40, 4, "Slack term: %d", pntohl(pd+offset2+40)); break; } case RSVP_CLASS_ADSPEC : { proto_tree *adspec_tree; service_hdr *shdr; param_hdr *phdr; char *str; int tree_num; mylen = obj_length; rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_ADSPEC); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); proto_tree_add_text(rsvp_object_tree, offset2, 1, "Message format version: %d", (*((unsigned char *)pd+offset2))>>4); proto_tree_add_text(rsvp_object_tree, offset2+2, 2, "Data length: %d words, not including header", pntohs(pd+offset2+2)); offset2+=4; tree_num=ETT_RSVP_ADSPEC_SUBTREE1; mylen -= 4; while (mylen > 4) { shdr = (service_hdr *)(pd + offset2); str = match_strval(shdr->service_num, adspec_services); ti = proto_tree_add_text(rsvp_object_tree, offset2, (pntohs(&shdr->length)+1)<<2, str?str:"Unknown"); adspec_tree = proto_item_add_subtree(ti, tree_num++); proto_tree_add_text(adspec_tree, offset2, 1, "Service header %d - %s", shdr->service_num, str); proto_tree_add_text(adspec_tree, offset2+1, 1, (shdr->break_bit&0x80)? "Break bit set":"Break bit not set"); proto_tree_add_text(adspec_tree, offset2+2, 2, "Data length: %d words, not including header", pntohs(&shdr->length)); offset2+=4; i=(pntohs(&shdr->length)+1)<<2; mylen-=4; while (i>4) { phdr = (param_hdr *)(pd + offset2); str = match_strval(phdr->id, adspec_params); if (str) { switch(phdr->id) { case 4: case 8: case 10: case 133: case 134: case 135: case 136: /* 32-bit unsigned integer */ proto_tree_add_text(adspec_tree, offset2, (pntohs(&phdr->length)+1)<<2, "%s - %lu (type %d, length %d)", str, (unsigned long)pntohl(&phdr->dataval), phdr->id, pntohs(&phdr->length)); break; case 6: /* IEEE float */ proto_tree_add_text(adspec_tree, offset2, (pntohs(&phdr->length)+1)<<2, "%s - %lu (type %d, length %d)", str, ieee_to_long(&phdr->dataval), phdr->id, pntohs(&phdr->length)); break; default: proto_tree_add_text(adspec_tree, offset2, (pntohs(&phdr->length)+1)<<2, "%s (type %d, length %d)", str, phdr->id, pntohs(&phdr->length)); } } else { proto_tree_add_text(adspec_tree, offset2, (pntohs(&phdr->length)+1)<<2, "Unknown (type %d, length %d)", phdr->id, pntohs(&phdr->length)); } offset2+=(pntohs(&phdr->length)+1)<<2; i-=(pntohs(&phdr->length)+1)<<2; mylen-=(pntohs(&phdr->length)+1)<<2; } } break; } case RSVP_CLASS_INTEGRITY : rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_INTEGRITY); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); goto default_class; case RSVP_CLASS_POLICY : rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_POLICY); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); goto default_class; default : rsvp_object_tree = proto_item_add_subtree(ti, ETT_RSVP_UNKNOWN_CLASS); proto_tree_add_text(rsvp_object_tree, offset, 2, "Length: %d", obj_length); proto_tree_add_text(rsvp_object_tree, offset+2, 1, "Class number: %d - %s", obj->class, object_type); default_class: i = obj_length - sizeof(rsvp_object); proto_tree_add_text(rsvp_object_tree, offset2, i, "Data (%d bytes)", i); break; case RSVP_CLASS_NULL : break; } offset += obj_length; len += obj_length; } } }