contrib/tcpdump/print-rsvp.c

   1 /*
   2  * Copyright (c) 1998-2007 The TCPDUMP project
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that: (1) source code
   6  * distributions retain the above copyright notice and this paragraph
   7  * in its entirety, and (2) distributions including binary code include
   8  * the above copyright notice and this paragraph in its entirety in
   9  * the documentation or other materials provided with the distribution.
  10  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND
  11  * WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT
  12  * LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
  13  * FOR A PARTICULAR PURPOSE.
  14  *
  15  * Original code by Hannes Gredler (hannes@juniper.net)
  16  */
  17
  18 #ifndef lint
  19 static const char rcsid[] _U_ =
  20     "@(#) $Header: /tcpdump/master/tcpdump/print-rsvp.c,v 1.33.2.15 2007/09/13 17:33:54 guy Exp $";
  21 #endif
  22
  23 #ifdef HAVE_CONFIG_H
  24 #include "config.h"
  25 #endif
  26
  27 #include <tcpdump-stdinc.h>
  28
  29 #include <stdio.h>
  30 #include <stdlib.h>
  31 #include <string.h>
  32
  33 #include "interface.h"
  34 #include "extract.h"
  35 #include "addrtoname.h"
  36 #include "ethertype.h"
  37 #include "gmpls.h"
  38 #include "af.h"
  39
  40 /*
  41  * RFC 2205 common header
  42  *
  43  *               0             1              2             3
  44  *        +-------------+-------------+-------------+-------------+
  45  *        | Vers | Flags|  Msg Type   |       RSVP Checksum       |
  46  *        +-------------+-------------+-------------+-------------+
  47  *        |  Send_TTL   | (Reserved)  |        RSVP Length        |
  48  *        +-------------+-------------+-------------+-------------+
  49  *
  50  */
  51
  52 struct rsvp_common_header {
  53     u_int8_t version_flags;
  54     u_int8_t msg_type;
  55     u_int8_t checksum[2];
  56     u_int8_t ttl;
  57     u_int8_t reserved;
  58     u_int8_t length[2];
  59 };
  60
  61 /*
  62  * RFC2205 object header
  63  *
  64  *
  65  *               0             1              2             3
  66  *        +-------------+-------------+-------------+-------------+
  67  *        |       Length (bytes)      |  Class-Num  |   C-Type    |
  68  *        +-------------+-------------+-------------+-------------+
  69  *        |                                                       |
  70  *        //                  (Object contents)                   //
  71  *        |                                                       |
  72  *        +-------------+-------------+-------------+-------------+
  73  */
  74
  75 struct rsvp_object_header {
  76     u_int8_t length[2];
  77     u_int8_t class_num;
  78     u_int8_t ctype;
  79 };
  80
  81 #define RSVP_VERSION            1
  82 #define RSVP_EXTRACT_VERSION(x) (((x)&0xf0)>>4)
  83 #define RSVP_EXTRACT_FLAGS(x)   ((x)&0x0f)
  84
  85 #define RSVP_MSGTYPE_PATH       1
  86 #define RSVP_MSGTYPE_RESV       2
  87 #define RSVP_MSGTYPE_PATHERR    3
  88 #define RSVP_MSGTYPE_RESVERR    4
  89 #define RSVP_MSGTYPE_PATHTEAR   5
  90 #define RSVP_MSGTYPE_RESVTEAR   6
  91 #define RSVP_MSGTYPE_RESVCONF   7
  92 #define RSVP_MSGTYPE_AGGREGATE  12
  93 #define RSVP_MSGTYPE_ACK        13
  94 #define RSVP_MSGTYPE_HELLO_OLD  14      /* ancient Hellos */
  95 #define RSVP_MSGTYPE_SREFRESH   15
  96 #define RSVP_MSGTYPE_HELLO      20
  97
  98 static const struct tok rsvp_msg_type_values[] = {
  99     { RSVP_MSGTYPE_PATH,        "Path" },
 100     { RSVP_MSGTYPE_RESV,        "Resv" },
 101     { RSVP_MSGTYPE_PATHERR,     "PathErr" },
 102     { RSVP_MSGTYPE_RESVERR,     "ResvErr" },
 103     { RSVP_MSGTYPE_PATHTEAR,    "PathTear" },
 104     { RSVP_MSGTYPE_RESVTEAR,    "ResvTear" },
 105     { RSVP_MSGTYPE_RESVCONF,    "ResvConf" },
 106     { RSVP_MSGTYPE_AGGREGATE,   "Aggregate" },
 107     { RSVP_MSGTYPE_ACK,         "Acknowledgement" },
 108     { RSVP_MSGTYPE_HELLO_OLD,   "Hello (Old)" },
 109     { RSVP_MSGTYPE_SREFRESH,    "Refresh" },
 110     { RSVP_MSGTYPE_HELLO,       "Hello" },
 111     { 0, NULL}
 112 };
 113
 114 static const struct tok rsvp_header_flag_values[] = {
 115     { 0x01,                   "Refresh reduction capable" }, /* rfc2961 */
 116     { 0, NULL}
 117 };
 118
 119 #define RSVP_OBJ_SESSION            1   /* rfc2205 */
 120 #define RSVP_OBJ_RSVP_HOP           3   /* rfc2205, rfc3473 */
 121 #define RSVP_OBJ_INTEGRITY          4   /* rfc2747 */
 122 #define RSVP_OBJ_TIME_VALUES        5   /* rfc2205 */
 123 #define RSVP_OBJ_ERROR_SPEC         6
 124 #define RSVP_OBJ_SCOPE              7
 125 #define RSVP_OBJ_STYLE              8   /* rfc2205 */
 126 #define RSVP_OBJ_FLOWSPEC           9   /* rfc2215 */
 127 #define RSVP_OBJ_FILTERSPEC         10  /* rfc2215 */
 128 #define RSVP_OBJ_SENDER_TEMPLATE    11
 129 #define RSVP_OBJ_SENDER_TSPEC       12  /* rfc2215 */
 130 #define RSVP_OBJ_ADSPEC             13  /* rfc2215 */
 131 #define RSVP_OBJ_POLICY_DATA        14
 132 #define RSVP_OBJ_CONFIRM            15  /* rfc2205 */
 133 #define RSVP_OBJ_LABEL              16  /* rfc3209 */
 134 #define RSVP_OBJ_LABEL_REQ          19  /* rfc3209 */
 135 #define RSVP_OBJ_ERO                20  /* rfc3209 */
 136 #define RSVP_OBJ_RRO                21  /* rfc3209 */
 137 #define RSVP_OBJ_HELLO              22  /* rfc3209 */
 138 #define RSVP_OBJ_MESSAGE_ID         23  /* rfc2961 */
 139 #define RSVP_OBJ_MESSAGE_ID_ACK     24  /* rfc2961 */
 140 #define RSVP_OBJ_MESSAGE_ID_LIST    25  /* rfc2961 */
 141 #define RSVP_OBJ_RECOVERY_LABEL     34  /* rfc3473 */
 142 #define RSVP_OBJ_UPSTREAM_LABEL     35  /* rfc3473 */
 143 #define RSVP_OBJ_LABEL_SET          36  /* rfc3473 */
 144 #define RSVP_OBJ_PROTECTION         37  /* rfc3473 */
 145 #define RSVP_OBJ_DETOUR             63  /* draft-ietf-mpls-rsvp-lsp-fastreroute-07 */
 146 #define RSVP_OBJ_CLASSTYPE          66  /* rfc4124 */
 147 #define RSVP_OBJ_CLASSTYPE_OLD      125 /* draft-ietf-tewg-diff-te-proto-07 */
 148 #define RSVP_OBJ_SUGGESTED_LABEL    129 /* rfc3473 */
 149 #define RSVP_OBJ_ACCEPT_LABEL_SET   130 /* rfc3473 */
 150 #define RSVP_OBJ_RESTART_CAPABILITY 131 /* rfc3473 */
 151 #define RSVP_OBJ_NOTIFY_REQ         195 /* rfc3473 */
 152 #define RSVP_OBJ_ADMIN_STATUS       196 /* rfc3473 */
 153 #define RSVP_OBJ_PROPERTIES         204 /* juniper proprietary */
 154 #define RSVP_OBJ_FASTREROUTE        205 /* draft-ietf-mpls-rsvp-lsp-fastreroute-07 */
 155 #define RSVP_OBJ_SESSION_ATTRIBUTE  207 /* rfc3209 */
 156 #define RSVP_OBJ_GENERALIZED_UNI    229 /* OIF RSVP extensions UNI 1.0 Signaling, Rel. 2 */
 157 #define RSVP_OBJ_CALL_ID            230 /* rfc3474 */
 158 #define RSVP_OBJ_CALL_OPS           236 /* rfc3474 */
 159
 160 static const struct tok rsvp_obj_values[] = {
 161     { RSVP_OBJ_SESSION,            "Session" },
 162     { RSVP_OBJ_RSVP_HOP,           "RSVP Hop" },
 163     { RSVP_OBJ_INTEGRITY,          "Integrity" },
 164     { RSVP_OBJ_TIME_VALUES,        "Time Values" },
 165     { RSVP_OBJ_ERROR_SPEC,         "Error Spec" },
 166     { RSVP_OBJ_SCOPE,              "Scope" },
 167     { RSVP_OBJ_STYLE,              "Style" },
 168     { RSVP_OBJ_FLOWSPEC,           "Flowspec" },
 169     { RSVP_OBJ_FILTERSPEC,         "FilterSpec" },
 170     { RSVP_OBJ_SENDER_TEMPLATE,    "Sender Template" },
 171     { RSVP_OBJ_SENDER_TSPEC,       "Sender TSpec" },
 172     { RSVP_OBJ_ADSPEC,             "Adspec" },
 173     { RSVP_OBJ_POLICY_DATA,        "Policy Data" },
 174     { RSVP_OBJ_CONFIRM,            "Confirm" },
 175     { RSVP_OBJ_LABEL,              "Label" },
 176     { RSVP_OBJ_LABEL_REQ,          "Label Request" },
 177     { RSVP_OBJ_ERO,                "ERO" },
 178     { RSVP_OBJ_RRO,                "RRO" },
 179     { RSVP_OBJ_HELLO,              "Hello" },
 180     { RSVP_OBJ_MESSAGE_ID,         "Message ID" },
 181     { RSVP_OBJ_MESSAGE_ID_ACK,     "Message ID Ack" },
 182     { RSVP_OBJ_MESSAGE_ID_LIST,    "Message ID List" },
 183     { RSVP_OBJ_RECOVERY_LABEL,     "Recovery Label" },
 184     { RSVP_OBJ_UPSTREAM_LABEL,     "Upstream Label" },
 185     { RSVP_OBJ_LABEL_SET,          "Label Set" },
 186     { RSVP_OBJ_ACCEPT_LABEL_SET,   "Acceptable Label Set" },
 187     { RSVP_OBJ_DETOUR,             "Detour" },
 188     { RSVP_OBJ_CLASSTYPE,          "Class Type" },
 189     { RSVP_OBJ_CLASSTYPE_OLD,      "Class Type (old)" },
 190     { RSVP_OBJ_SUGGESTED_LABEL,    "Suggested Label" },
 191     { RSVP_OBJ_PROPERTIES,         "Properties" },
 192     { RSVP_OBJ_FASTREROUTE,        "Fast Re-Route" },
 193     { RSVP_OBJ_SESSION_ATTRIBUTE,  "Session Attribute" },
 194     { RSVP_OBJ_GENERALIZED_UNI,    "Generalized UNI" },
 195     { RSVP_OBJ_CALL_ID,            "Call-ID" },
 196     { RSVP_OBJ_CALL_OPS,           "Call Capability" },
 197     { RSVP_OBJ_RESTART_CAPABILITY, "Restart Capability" },
 198     { RSVP_OBJ_NOTIFY_REQ,         "Notify Request" },
 199     { RSVP_OBJ_PROTECTION,         "Protection" },
 200     { RSVP_OBJ_ADMIN_STATUS,       "Administrative Status" },
 201     { 0, NULL}
 202 };
 203
 204 #define RSVP_CTYPE_IPV4        1
 205 #define RSVP_CTYPE_IPV6        2
 206 #define RSVP_CTYPE_TUNNEL_IPV4 7
 207 #define RSVP_CTYPE_TUNNEL_IPV6 8
 208 #define RSVP_CTYPE_UNI_IPV4    11 /* OIF RSVP extensions UNI 1.0 Signaling Rel. 2 */
 209 #define RSVP_CTYPE_1           1
 210 #define RSVP_CTYPE_2           2
 211 #define RSVP_CTYPE_3           3
 212 #define RSVP_CTYPE_4           4
 213
 214 /*
 215  * the ctypes are not globally unique so for
 216  * translating it to strings we build a table based
 217  * on objects offsetted by the ctype
 218  */
 219
 220 static const struct tok rsvp_ctype_values[] = {
 221     { 256*RSVP_OBJ_RSVP_HOP+RSVP_CTYPE_IPV4,                 "IPv4" },
 222     { 256*RSVP_OBJ_RSVP_HOP+RSVP_CTYPE_IPV6,                 "IPv6" },
 223     { 256*RSVP_OBJ_RSVP_HOP+RSVP_CTYPE_3,                    "IPv4 plus opt. TLVs" },
 224     { 256*RSVP_OBJ_RSVP_HOP+RSVP_CTYPE_4,                    "IPv6 plus opt. TLVs" },
 225     { 256*RSVP_OBJ_NOTIFY_REQ+RSVP_CTYPE_IPV4,               "IPv4" },
 226     { 256*RSVP_OBJ_NOTIFY_REQ+RSVP_CTYPE_IPV6,               "IPv6" },
 227     { 256*RSVP_OBJ_CONFIRM+RSVP_CTYPE_IPV4,                  "IPv4" },
 228     { 256*RSVP_OBJ_CONFIRM+RSVP_CTYPE_IPV6,                  "IPv6" },
 229     { 256*RSVP_OBJ_TIME_VALUES+RSVP_CTYPE_1,                 "1" },
 230     { 256*RSVP_OBJ_FLOWSPEC+RSVP_CTYPE_1,                    "obsolete" },
 231     { 256*RSVP_OBJ_FLOWSPEC+RSVP_CTYPE_2,                    "IntServ" },
 232     { 256*RSVP_OBJ_SENDER_TSPEC+RSVP_CTYPE_2,                "IntServ" },
 233     { 256*RSVP_OBJ_ADSPEC+RSVP_CTYPE_2,                      "IntServ" },
 234     { 256*RSVP_OBJ_FILTERSPEC+RSVP_CTYPE_IPV4,               "IPv4" },
 235     { 256*RSVP_OBJ_FILTERSPEC+RSVP_CTYPE_IPV6,               "IPv6" },
 236     { 256*RSVP_OBJ_FILTERSPEC+RSVP_CTYPE_3,                  "IPv6 Flow-label" },
 237     { 256*RSVP_OBJ_FILTERSPEC+RSVP_CTYPE_TUNNEL_IPV4,        "Tunnel IPv4" },
 238     { 256*RSVP_OBJ_SESSION+RSVP_CTYPE_IPV4,                  "IPv4" },
 239     { 256*RSVP_OBJ_SESSION+RSVP_CTYPE_IPV6,                  "IPv6" },
 240     { 256*RSVP_OBJ_SESSION+RSVP_CTYPE_TUNNEL_IPV4,           "Tunnel IPv4" },
 241     { 256*RSVP_OBJ_SESSION+RSVP_CTYPE_UNI_IPV4,              "UNI IPv4" },
 242     { 256*RSVP_OBJ_SENDER_TEMPLATE+RSVP_CTYPE_IPV4,          "IPv4" },
 243     { 256*RSVP_OBJ_SENDER_TEMPLATE+RSVP_CTYPE_IPV6,          "IPv6" },
 244     { 256*RSVP_OBJ_SENDER_TEMPLATE+RSVP_CTYPE_TUNNEL_IPV4,   "Tunnel IPv4" },
 245     { 256*RSVP_OBJ_MESSAGE_ID+RSVP_CTYPE_1,                  "1" },
 246     { 256*RSVP_OBJ_MESSAGE_ID_ACK+RSVP_CTYPE_1,              "Message id ack" },
 247     { 256*RSVP_OBJ_MESSAGE_ID_ACK+RSVP_CTYPE_2,              "Message id nack" },
 248     { 256*RSVP_OBJ_MESSAGE_ID_LIST+RSVP_CTYPE_1,             "1" },
 249     { 256*RSVP_OBJ_STYLE+RSVP_CTYPE_1,                       "1" },
 250     { 256*RSVP_OBJ_HELLO+RSVP_CTYPE_1,                       "Hello Request" },
 251     { 256*RSVP_OBJ_HELLO+RSVP_CTYPE_2,                       "Hello Ack" },
 252     { 256*RSVP_OBJ_LABEL_REQ+RSVP_CTYPE_1,                   "without label range" },
 253     { 256*RSVP_OBJ_LABEL_REQ+RSVP_CTYPE_2,                   "with ATM label range" },
 254     { 256*RSVP_OBJ_LABEL_REQ+RSVP_CTYPE_3,                   "with FR label range" },
 255     { 256*RSVP_OBJ_LABEL_REQ+RSVP_CTYPE_4,                   "Generalized Label" },
 256     { 256*RSVP_OBJ_LABEL+RSVP_CTYPE_1,                       "Label" },
 257     { 256*RSVP_OBJ_LABEL+RSVP_CTYPE_2,                       "Generalized Label" },
 258     { 256*RSVP_OBJ_LABEL+RSVP_CTYPE_3,                       "Waveband Switching" },
 259     { 256*RSVP_OBJ_SUGGESTED_LABEL+RSVP_CTYPE_1,             "Label" },
 260     { 256*RSVP_OBJ_SUGGESTED_LABEL+RSVP_CTYPE_2,             "Generalized Label" },
 261     { 256*RSVP_OBJ_SUGGESTED_LABEL+RSVP_CTYPE_3,             "Waveband Switching" },
 262     { 256*RSVP_OBJ_UPSTREAM_LABEL+RSVP_CTYPE_1,              "Label" },
 263     { 256*RSVP_OBJ_UPSTREAM_LABEL+RSVP_CTYPE_2,              "Generalized Label" },
 264     { 256*RSVP_OBJ_UPSTREAM_LABEL+RSVP_CTYPE_3,              "Waveband Switching" },
 265     { 256*RSVP_OBJ_RECOVERY_LABEL+RSVP_CTYPE_1,              "Label" },
 266     { 256*RSVP_OBJ_RECOVERY_LABEL+RSVP_CTYPE_2,              "Generalized Label" },
 267     { 256*RSVP_OBJ_RECOVERY_LABEL+RSVP_CTYPE_3,              "Waveband Switching" },
 268     { 256*RSVP_OBJ_ERO+RSVP_CTYPE_IPV4,                      "IPv4" },
 269     { 256*RSVP_OBJ_RRO+RSVP_CTYPE_IPV4,                      "IPv4" },
 270     { 256*RSVP_OBJ_ERROR_SPEC+RSVP_CTYPE_IPV4,               "IPv4" },
 271     { 256*RSVP_OBJ_ERROR_SPEC+RSVP_CTYPE_IPV6,               "IPv6" },
 272     { 256*RSVP_OBJ_ERROR_SPEC+RSVP_CTYPE_3,                  "IPv4 plus opt. TLVs" },
 273     { 256*RSVP_OBJ_ERROR_SPEC+RSVP_CTYPE_4,                  "IPv6 plus opt. TLVs" },
 274     { 256*RSVP_OBJ_RESTART_CAPABILITY+RSVP_CTYPE_1,          "IPv4" },
 275     { 256*RSVP_OBJ_SESSION_ATTRIBUTE+RSVP_CTYPE_TUNNEL_IPV4, "Tunnel IPv4" },
 276     { 256*RSVP_OBJ_FASTREROUTE+RSVP_CTYPE_TUNNEL_IPV4,       "Tunnel IPv4" }, /* old style*/
 277     { 256*RSVP_OBJ_FASTREROUTE+RSVP_CTYPE_1,                 "1" }, /* new style */
 278     { 256*RSVP_OBJ_DETOUR+RSVP_CTYPE_TUNNEL_IPV4,            "Tunnel IPv4" },
 279     { 256*RSVP_OBJ_PROPERTIES+RSVP_CTYPE_1,                  "1" },
 280     { 256*RSVP_OBJ_ADMIN_STATUS+RSVP_CTYPE_1,                "1" },
 281     { 256*RSVP_OBJ_CLASSTYPE+RSVP_CTYPE_1,                   "1" },
 282     { 256*RSVP_OBJ_CLASSTYPE_OLD+RSVP_CTYPE_1,               "1" },
 283     { 256*RSVP_OBJ_LABEL_SET+RSVP_CTYPE_1,                   "1" },
 284     { 256*RSVP_OBJ_GENERALIZED_UNI+RSVP_CTYPE_1,             "1" },
 285     { 0, NULL}
 286 };
 287
 288 struct rsvp_obj_integrity_t {
 289     u_int8_t flags;
 290     u_int8_t res;
 291     u_int8_t key_id[6];
 292     u_int8_t sequence[8];
 293     u_int8_t digest[16];
 294 };
 295
 296 static const struct tok rsvp_obj_integrity_flag_values[] = {
 297     { 0x80, "Handshake" },
 298     { 0, NULL}
 299 };
 300
 301 struct rsvp_obj_frr_t {
 302     u_int8_t setup_prio;
 303     u_int8_t hold_prio;
 304     u_int8_t hop_limit;
 305     u_int8_t flags;
 306     u_int8_t bandwidth[4];
 307     u_int8_t include_any[4];
 308     u_int8_t exclude_any[4];
 309     u_int8_t include_all[4];
 310 };
 311
 312
 313 #define RSVP_OBJ_XRO_MASK_SUBOBJ(x)   ((x)&0x7f)
 314 #define RSVP_OBJ_XRO_MASK_LOOSE(x)    ((x)&0x80)
 315
 316 #define RSVP_OBJ_XRO_RES       0
 317 #define RSVP_OBJ_XRO_IPV4      1
 318 #define RSVP_OBJ_XRO_IPV6      2
 319 #define RSVP_OBJ_XRO_ASN       32
 320 #define RSVP_OBJ_XRO_MPLS      64
 321
 322 static const struct tok rsvp_obj_xro_values[] = {
 323     { RSVP_OBJ_XRO_RES,       "Reserved" },
 324     { RSVP_OBJ_XRO_IPV4,      "IPv4 prefix" },
 325     { RSVP_OBJ_XRO_IPV6,      "IPv6 prefix" },
 326     { RSVP_OBJ_XRO_ASN,       "Autonomous system number" },
 327     { RSVP_OBJ_XRO_MPLS,      "MPLS label switched path termination" },
 328     { 0, NULL}
 329 };
 330
 331 /* draft-ietf-mpls-rsvp-lsp-fastreroute-07.txt */
 332 static const struct tok rsvp_obj_rro_flag_values[] = {
 333     { 0x01,                   "Local protection available" },
 334     { 0x02,                   "Local protection in use" },
 335     { 0x04,                   "Bandwidth protection" },
 336     { 0x08,                   "Node protection" },
 337     { 0, NULL}
 338 };
 339
 340 static const struct tok rsvp_resstyle_values[] = {
 341     { 17,                     "Wildcard Filter" },
 342     { 10,                     "Fixed Filter" },
 343     { 18,                     "Shared Explicit" },
 344     { 0, NULL}
 345 };
 346
 347 #define RSVP_OBJ_INTSERV_GUARANTEED_SERV 2
 348 #define RSVP_OBJ_INTSERV_CONTROLLED_LOAD 5
 349
 350 static const struct tok rsvp_intserv_service_type_values[] = {
 351     { 1,                                "Default/Global Information" },
 352     { RSVP_OBJ_INTSERV_GUARANTEED_SERV, "Guaranteed Service" },
 353     { RSVP_OBJ_INTSERV_CONTROLLED_LOAD, "Controlled Load" },
 354     { 0, NULL}
 355 };
 356
 357 static const struct tok rsvp_intserv_parameter_id_values[] = {
 358     { 4,                     "IS hop cnt" },
 359     { 6,                     "Path b/w estimate" },
 360     { 8,                     "Minimum path latency" },
 361     { 10,                    "Composed MTU" },
 362     { 127,                   "Token Bucket TSpec" },
 363     { 130,                   "Guaranteed Service RSpec" },
 364     { 133,                   "End-to-end composed value for C" },
 365     { 134,                   "End-to-end composed value for D" },
 366     { 135,                   "Since-last-reshaping point composed C" },
 367     { 136,                   "Since-last-reshaping point composed D" },
 368     { 0, NULL}
 369 };
 370
 371 static struct tok rsvp_session_attribute_flag_values[] = {
 372     { 0x01,                   "Local Protection desired" },
 373     { 0x02,                   "Label Recording desired" },
 374     { 0x04,                   "SE Style desired" },
 375     { 0x08,                   "Bandwidth protection desired" }, /* draft-ietf-mpls-rsvp-lsp-fastreroute-02.txt */
 376     { 0x10,                   "Node protection desired" },      /* draft-ietf-mpls-rsvp-lsp-fastreroute-02.txt */
 377     { 0, NULL}
 378 };
 379
 380 static struct tok rsvp_obj_prop_tlv_values[] = {
 381     { 0x01,                   "Cos" },
 382     { 0x02,                   "Metric 1" },
 383     { 0x04,                   "Metric 2" },
 384     { 0x08,                   "CCC Status" },
 385     { 0x10,                   "Path Type" },
 386     { 0, NULL}
 387 };
 388
 389 #define RSVP_OBJ_ERROR_SPEC_CODE_ROUTING 24
 390 #define RSVP_OBJ_ERROR_SPEC_CODE_NOTIFY  25
 391 #define RSVP_OBJ_ERROR_SPEC_CODE_DIFFSERV_TE 28
 392 #define RSVP_OBJ_ERROR_SPEC_CODE_DIFFSERV_TE_OLD 125
 393
 394 static struct tok rsvp_obj_error_code_values[] = {
 395     { RSVP_OBJ_ERROR_SPEC_CODE_ROUTING, "Routing Problem" },
 396     { RSVP_OBJ_ERROR_SPEC_CODE_NOTIFY,  "Notify Error" },
 397     { RSVP_OBJ_ERROR_SPEC_CODE_DIFFSERV_TE, "Diffserv TE Error" },
 398     { RSVP_OBJ_ERROR_SPEC_CODE_DIFFSERV_TE_OLD, "Diffserv TE Error (Old)" },
 399     { 0, NULL}
 400 };
 401
 402 static struct tok rsvp_obj_error_code_routing_values[] = {
 403     { 1,                      "Bad EXPLICIT_ROUTE object" },
 404     { 2,                      "Bad strict node" },
 405     { 3,                      "Bad loose node" },
 406     { 4,                      "Bad initial subobject" },
 407     { 5,                      "No route available toward destination" },
 408     { 6,                      "Unacceptable label value" },
 409     { 7,                      "RRO indicated routing loops" },
 410     { 8,                      "non-RSVP-capable router in the path" },
 411     { 9,                      "MPLS label allocation failure" },
 412     { 10,                     "Unsupported L3PID" },
 413     { 0, NULL}
 414 };
 415
 416 static struct tok rsvp_obj_error_code_diffserv_te_values[] = {
 417     { 1,                      "Unexpected CT object" },
 418     { 2,                      "Unsupported CT" },
 419     { 3,                      "Invalid CT value" },
 420     { 4,                      "CT/setup priority do not form a configured TE-Class" },
 421     { 5,                      "CT/holding priority do not form a configured TE-Class" },
 422     { 6,                      "CT/setup priority and CT/holding priority do not form a configured TE-Class" },
 423     { 7,                      "Inconsistency between signaled PSC and signaled CT" },
 424     { 8,                      "Inconsistency between signaled PHBs and signaled CT" },
 425    { 0, NULL}
 426 };
 427
 428 /* rfc3473 / rfc 3471 */
 429 static const struct tok rsvp_obj_admin_status_flag_values[] = {
 430     { 0x80000000, "Reflect" },
 431     { 0x00000004, "Testing" },
 432     { 0x00000002, "Admin-down" },
 433     { 0x00000001, "Delete-in-progress" },
 434     { 0, NULL}
 435 };
 436
 437 /* label set actions - rfc3471 */
 438 #define LABEL_SET_INCLUSIVE_LIST  0
 439 #define LABEL_SET_EXCLUSIVE_LIST  1
 440 #define LABEL_SET_INCLUSIVE_RANGE 2
 441 #define LABEL_SET_EXCLUSIVE_RANGE 3
 442
 443 static const struct tok rsvp_obj_label_set_action_values[] = {
 444     { LABEL_SET_INCLUSIVE_LIST, "Inclusive list" },
 445     { LABEL_SET_EXCLUSIVE_LIST, "Exclusive list" },
 446     { LABEL_SET_INCLUSIVE_RANGE, "Inclusive range" },
 447     { LABEL_SET_EXCLUSIVE_RANGE, "Exclusive range" },
 448     { 0, NULL}
 449 };
 450
 451 /* OIF RSVP extensions UNI 1.0 Signaling, release 2 */
 452 #define RSVP_GEN_UNI_SUBOBJ_SOURCE_TNA_ADDRESS      1
 453 #define RSVP_GEN_UNI_SUBOBJ_DESTINATION_TNA_ADDRESS 2
 454 #define RSVP_GEN_UNI_SUBOBJ_DIVERSITY               3
 455 #define RSVP_GEN_UNI_SUBOBJ_EGRESS_LABEL            4
 456 #define RSVP_GEN_UNI_SUBOBJ_SERVICE_LEVEL           5
 457
 458 static const struct tok rsvp_obj_generalized_uni_values[] = {
 459     { RSVP_GEN_UNI_SUBOBJ_SOURCE_TNA_ADDRESS, "Source TNA address" },
 460     { RSVP_GEN_UNI_SUBOBJ_DESTINATION_TNA_ADDRESS, "Destination TNA address" },
 461     { RSVP_GEN_UNI_SUBOBJ_DIVERSITY, "Diversity" },
 462     { RSVP_GEN_UNI_SUBOBJ_EGRESS_LABEL, "Egress label" },
 463     { RSVP_GEN_UNI_SUBOBJ_SERVICE_LEVEL, "Service level" },
 464     { 0, NULL}
 465 };
 466
 467 static int rsvp_intserv_print(const u_char *, u_short);
 468
 469 /*
 470  * this is a dissector for all the intserv defined
 471  * specs as defined per rfc2215
 472  * it is called from various rsvp objects;
 473  * returns the amount of bytes being processed
 474  */
 475 static int
 476 rsvp_intserv_print(const u_char *tptr, u_short obj_tlen) {
 477
 478     int parameter_id,parameter_length;
 479     union {
 480         float f;
 481         u_int32_t i;
 482     } bw;
 483
 484     if (obj_tlen < 4)
 485         return 0;
 486     parameter_id = *(tptr);
 487     parameter_length = EXTRACT_16BITS(tptr+2)<<2; /* convert wordcount to bytecount */
 488
 489     printf("\n\t      Parameter ID: %s (%u), length: %u, Flags: [0x%02x]",
 490            tok2str(rsvp_intserv_parameter_id_values,"unknown",parameter_id),
 491            parameter_id,
 492            parameter_length,
 493            *(tptr+1));
 494
 495     if (obj_tlen < parameter_length+4)
 496         return 0;
 497     switch(parameter_id) { /* parameter_id */
 498
 499     case 4:
 500        /*
 501         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 502         * |    4 (e)      |    (f)        |           1 (g)               |
 503         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 504         * |        IS hop cnt (32-bit unsigned integer)                   |
 505         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 506         */
 507         if (parameter_length == 4)
 508             printf("\n\t\tIS hop count: %u", EXTRACT_32BITS(tptr+4));
 509         break;
 510
 511     case 6:
 512        /*
 513         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 514         * |    6 (h)      |    (i)        |           1 (j)               |
 515         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 516         * |  Path b/w estimate  (32-bit IEEE floating point number)       |
 517         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 518         */
 519         if (parameter_length == 4) {
 520             bw.i = EXTRACT_32BITS(tptr+4);
 521             printf("\n\t\tPath b/w estimate: %.10g Mbps", bw.f/125000);
 522         }
 523         break;
 524
 525     case 8:
 526        /*
 527         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 528         * |     8 (k)     |    (l)        |           1 (m)               |
 529         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 530         * |        Minimum path latency (32-bit integer)                  |
 531         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 532         */
 533         if (parameter_length == 4) {
 534             printf("\n\t\tMinimum path latency: ");
 535             if (EXTRACT_32BITS(tptr+4) == 0xffffffff)
 536                 printf("don't care");
 537             else
 538                 printf("%u", EXTRACT_32BITS(tptr+4));
 539         }
 540         break;
 541
 542     case 10:
 543
 544        /*
 545         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 546         * |     10 (n)    |      (o)      |           1 (p)               |
 547         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 548         * |      Composed MTU (32-bit unsigned integer)                   |
 549         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 550         */
 551         if (parameter_length == 4)
 552             printf("\n\t\tComposed MTU: %u bytes", EXTRACT_32BITS(tptr+4));
 553         break;
 554     case 127:
 555        /*
 556         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 557         * |   127 (e)     |    0 (f)      |             5 (g)             |
 558         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 559         * |  Token Bucket Rate [r] (32-bit IEEE floating point number)    |
 560         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 561         * |  Token Bucket Size [b] (32-bit IEEE floating point number)    |
 562         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 563         * |  Peak Data Rate [p] (32-bit IEEE floating point number)       |
 564         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 565         * |  Minimum Policed Unit [m] (32-bit integer)                    |
 566         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 567         * |  Maximum Packet Size [M]  (32-bit integer)                    |
 568         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 569         */
 570
 571         if (parameter_length == 20) {
 572             bw.i = EXTRACT_32BITS(tptr+4);
 573             printf("\n\t\tToken Bucket Rate: %.10g Mbps", bw.f/125000);
 574             bw.i = EXTRACT_32BITS(tptr+8);
 575             printf("\n\t\tToken Bucket Size: %.10g bytes", bw.f);
 576             bw.i = EXTRACT_32BITS(tptr+12);
 577             printf("\n\t\tPeak Data Rate: %.10g Mbps", bw.f/125000);
 578             printf("\n\t\tMinimum Policed Unit: %u bytes", EXTRACT_32BITS(tptr+16));
 579             printf("\n\t\tMaximum Packet Size: %u bytes", EXTRACT_32BITS(tptr+20));
 580         }
 581         break;
 582
 583     case 130:
 584        /*
 585         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 586         * |     130 (h)   |    0 (i)      |            2 (j)              |
 587         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 588         * |  Rate [R]  (32-bit IEEE floating point number)                |
 589         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 590         * |  Slack Term [S]  (32-bit integer)                             |
 591         * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 592         */
 593
 594         if (parameter_length == 8) {
 595             bw.i = EXTRACT_32BITS(tptr+4);
 596             printf("\n\t\tRate: %.10g Mbps", bw.f/125000);
 597             printf("\n\t\tSlack Term: %u", EXTRACT_32BITS(tptr+8));
 598         }
 599         break;
 600
 601     case 133:
 602     case 134:
 603     case 135:
 604     case 136:
 605         if (parameter_length == 4)
 606             printf("\n\t\tValue: %u", EXTRACT_32BITS(tptr+4));
 607         break;
 608
 609     default:
 610         if (vflag <= 1)
 611             print_unknown_data(tptr+4,"\n\t\t",parameter_length);
 612     }
 613     return (parameter_length+4); /* header length 4 bytes */
 614 }
 615
 616 static int
 617 rsvp_obj_print (const u_char *tptr, const char *ident, u_int tlen) {
 618
 619     const struct rsvp_object_header *rsvp_obj_header;
 620     const u_char *obj_tptr;
 621     union {
 622         const struct rsvp_obj_integrity_t *rsvp_obj_integrity;
 623         const struct rsvp_obj_frr_t *rsvp_obj_frr;
 624     } obj_ptr;
 625
 626     u_short rsvp_obj_len,rsvp_obj_ctype,obj_tlen,intserv_serv_tlen;
 627     int hexdump,processed,padbytes,error_code,error_value,i;
 628     union {
 629         float f;
 630         u_int32_t i;
 631     } bw;
 632     u_int8_t namelen;
 633
 634     u_int action, subchannel;
 635
 636     while(tlen>=sizeof(struct rsvp_object_header)) {
 637         /* did we capture enough for fully decoding the object header ? */
 638         if (!TTEST2(*tptr, sizeof(struct rsvp_object_header)))
 639             goto trunc;
 640
 641         rsvp_obj_header = (const struct rsvp_object_header *)tptr;
 642         rsvp_obj_len=EXTRACT_16BITS(rsvp_obj_header->length);
 643         rsvp_obj_ctype=rsvp_obj_header->ctype;
 644
 645         if(rsvp_obj_len % 4) {
 646             printf("%sERROR: object header size %u not a multiple of 4", ident, rsvp_obj_len);
 647             return -1;
 648         }
 649         if(rsvp_obj_len < sizeof(struct rsvp_object_header)) {
 650             printf("%sERROR: object header too short %u < %lu", ident, rsvp_obj_len,
 651                    (unsigned long)sizeof(const struct rsvp_object_header));
 652             return -1;
 653         }
 654
 655         printf("%s%s Object (%u) Flags: [%s",
 656                ident,
 657                tok2str(rsvp_obj_values,
 658                        "Unknown",
 659                        rsvp_obj_header->class_num),
 660                rsvp_obj_header->class_num,
 661                ((rsvp_obj_header->class_num)&0x80) ? "ignore" : "reject");
 662
 663         if (rsvp_obj_header->class_num > 128)
 664             printf(" %s",
 665                    ((rsvp_obj_header->class_num)&0x40) ? "and forward" : "silently");
 666
 667         printf(" if unknown], Class-Type: %s (%u), length: %u",
 668                tok2str(rsvp_ctype_values,
 669                        "Unknown",
 670                        ((rsvp_obj_header->class_num)<<8)+rsvp_obj_ctype),
 671                rsvp_obj_ctype,
 672                rsvp_obj_len);
 673
 674         if(tlen < rsvp_obj_len) {
 675             printf("%sERROR: object goes past end of objects TLV", ident);
 676             return -1;
 677         }
 678
 679         obj_tptr=tptr+sizeof(struct rsvp_object_header);
 680         obj_tlen=rsvp_obj_len-sizeof(struct rsvp_object_header);
 681
 682         /* did we capture enough for fully decoding the object ? */
 683         if (!TTEST2(*tptr, rsvp_obj_len))
 684             return -1;
 685         hexdump=FALSE;
 686
 687         switch(rsvp_obj_header->class_num) {
 688         case RSVP_OBJ_SESSION:
 689             switch(rsvp_obj_ctype) {
 690             case RSVP_CTYPE_IPV4:
 691                 if (obj_tlen < 8)
 692                     return -1;
 693                 printf("%s  IPv4 DestAddress: %s, Protocol ID: 0x%02x",
 694                        ident,
 695                        ipaddr_string(obj_tptr),
 696                        *(obj_tptr+sizeof(struct in_addr)));
 697                 printf("%s  Flags: [0x%02x], DestPort %u",
 698                        ident,
 699                        *(obj_tptr+5),
 700                        EXTRACT_16BITS(obj_tptr+6));
 701                 obj_tlen-=8;
 702                 obj_tptr+=8;
 703                 break;
 704 #ifdef INET6
 705             case RSVP_CTYPE_IPV6:
 706                 if (obj_tlen < 20)
 707                     return -1;
 708                 printf("%s  IPv6 DestAddress: %s, Protocol ID: 0x%02x",
 709                        ident,
 710                        ip6addr_string(obj_tptr),
 711                        *(obj_tptr+sizeof(struct in6_addr)));
 712                 printf("%s  Flags: [0x%02x], DestPort %u",
 713                        ident,
 714                        *(obj_tptr+sizeof(struct in6_addr)+1),
 715                        EXTRACT_16BITS(obj_tptr+sizeof(struct in6_addr)+2));
 716                 obj_tlen-=20;
 717                 obj_tptr+=20;
 718                 break;
 719
 720             case RSVP_CTYPE_TUNNEL_IPV6:
 721                 if (obj_tlen < 36)
 722                     return -1;
 723                 printf("%s  IPv6 Tunnel EndPoint: %s, Tunnel ID: 0x%04x, Extended Tunnel ID: %s",
 724                        ident,
 725                        ip6addr_string(obj_tptr),
 726                        EXTRACT_16BITS(obj_tptr+18),
 727                        ip6addr_string(obj_tptr+20));
 728                 obj_tlen-=36;
 729                 obj_tptr+=36;
 730                 break;
 731 #endif
 732             case RSVP_CTYPE_TUNNEL_IPV4:
 733             case RSVP_CTYPE_UNI_IPV4:
 734                 if (obj_tlen < 12)
 735                     return -1;
 736                 printf("%s  IPv4 Tunnel EndPoint: %s, Tunnel ID: 0x%04x, Extended Tunnel ID: %s",
 737                        ident,
 738                        ipaddr_string(obj_tptr),
 739                        EXTRACT_16BITS(obj_tptr+6),
 740                        ipaddr_string(obj_tptr+8));
 741                 obj_tlen-=12;
 742                 obj_tptr+=12;
 743                 break;
 744             default:
 745                 hexdump=TRUE;
 746             }
 747             break;
 748
 749         case RSVP_OBJ_CONFIRM:
 750             switch(rsvp_obj_ctype) {
 751             case RSVP_CTYPE_IPV4:
 752                 if (obj_tlen < sizeof(struct in_addr))
 753                     return -1;
 754                 printf("%s  IPv4 Receiver Address: %s",
 755                        ident,
 756                        ipaddr_string(obj_tptr));
 757                 obj_tlen-=sizeof(struct in_addr);
 758                 obj_tptr+=sizeof(struct in_addr);
 759                 break;
 760 #ifdef INET6
 761             case RSVP_CTYPE_IPV6:
 762                 if (obj_tlen < sizeof(struct in6_addr))
 763                     return -1;
 764                 printf("%s  IPv6 Receiver Address: %s",
 765                        ident,
 766                        ip6addr_string(obj_tptr));
 767                 obj_tlen-=sizeof(struct in6_addr);
 768                 obj_tptr+=sizeof(struct in6_addr);
 769                 break;
 770 #endif
 771             default:
 772                 hexdump=TRUE;
 773             }
 774             break;
 775
 776         case RSVP_OBJ_NOTIFY_REQ:
 777             switch(rsvp_obj_ctype) {
 778             case RSVP_CTYPE_IPV4:
 779                 if (obj_tlen < sizeof(struct in_addr))
 780                     return -1;
 781                 printf("%s  IPv4 Notify Node Address: %s",
 782                        ident,
 783                        ipaddr_string(obj_tptr));
 784                 obj_tlen-=sizeof(struct in_addr);
 785                 obj_tptr+=sizeof(struct in_addr);
 786                 break;
 787 #ifdef INET6
 788             case RSVP_CTYPE_IPV6:
 789                 if (obj_tlen < sizeof(struct in6_addr))
 790                     return-1;
 791                 printf("%s  IPv6 Notify Node Address: %s",
 792                        ident,
 793                        ip6addr_string(obj_tptr));
 794                 obj_tlen-=sizeof(struct in6_addr);
 795                 obj_tptr+=sizeof(struct in6_addr);
 796                 break;
 797 #endif
 798             default:
 799                 hexdump=TRUE;
 800             }
 801             break;
 802
 803         case RSVP_OBJ_SUGGESTED_LABEL: /* fall through */
 804         case RSVP_OBJ_UPSTREAM_LABEL:  /* fall through */
 805         case RSVP_OBJ_RECOVERY_LABEL:  /* fall through */
 806         case RSVP_OBJ_LABEL:
 807             switch(rsvp_obj_ctype) {
 808             case RSVP_CTYPE_1:
 809                 while(obj_tlen >= 4 ) {
 810                     printf("%s  Label: %u", ident, EXTRACT_32BITS(obj_tptr));
 811                     obj_tlen-=4;
 812                     obj_tptr+=4;
 813                 }
 814                 break;
 815             case RSVP_CTYPE_2:
 816                 if (obj_tlen < 4)
 817                     return-1;
 818                 printf("%s  Generalized Label: %u",
 819                        ident,
 820                        EXTRACT_32BITS(obj_tptr));
 821                 obj_tlen-=4;
 822                 obj_tptr+=4;
 823                 break;
 824             case RSVP_CTYPE_3:
 825                 if (obj_tlen < 12)
 826                     return-1;
 827                 printf("%s  Waveband ID: %u%s  Start Label: %u, Stop Label: %u",
 828                        ident,
 829                        EXTRACT_32BITS(obj_tptr),
 830                        ident,
 831                        EXTRACT_32BITS(obj_tptr+4),
 832                        EXTRACT_32BITS(obj_tptr+8));
 833                 obj_tlen-=12;
 834                 obj_tptr+=12;
 835                 break;
 836             default:
 837                 hexdump=TRUE;
 838             }
 839             break;
 840
 841         case RSVP_OBJ_STYLE:
 842             switch(rsvp_obj_ctype) {
 843             case RSVP_CTYPE_1:
 844                 if (obj_tlen < 4)
 845                     return-1;
 846                 printf("%s  Reservation Style: %s, Flags: [0x%02x]",
 847                        ident,
 848                        tok2str(rsvp_resstyle_values,
 849                                "Unknown",
 850                                EXTRACT_24BITS(obj_tptr+1)),
 851                        *(obj_tptr));
 852                 obj_tlen-=4;
 853                 obj_tptr+=4;
 854                 break;
 855             default:
 856                 hexdump=TRUE;
 857             }
 858             break;
 859
 860         case RSVP_OBJ_SENDER_TEMPLATE:
 861             switch(rsvp_obj_ctype) {
 862             case RSVP_CTYPE_IPV4:
 863                 if (obj_tlen < 8)
 864                     return-1;
 865                 printf("%s  Source Address: %s, Source Port: %u",
 866                        ident,
 867                        ipaddr_string(obj_tptr),
 868                        EXTRACT_16BITS(obj_tptr+6));
 869                 obj_tlen-=8;
 870                 obj_tptr+=8;
 871                 break;
 872 #ifdef INET6
 873             case RSVP_CTYPE_IPV6:
 874                 if (obj_tlen < 20)
 875                     return-1;
 876                 printf("%s  Source Address: %s, Source Port: %u",
 877                        ident,
 878                        ip6addr_string(obj_tptr),
 879                        EXTRACT_16BITS(obj_tptr+18));
 880                 obj_tlen-=20;
 881                 obj_tptr+=20;
 882                 break;
 883 #endif
 884             case RSVP_CTYPE_TUNNEL_IPV4:
 885                 if (obj_tlen < 8)
 886                     return-1;
 887                 printf("%s  IPv4 Tunnel Sender Address: %s, LSP-ID: 0x%04x",
 888                        ident,
 889                        ipaddr_string(obj_tptr),
 890                        EXTRACT_16BITS(obj_tptr+6));
 891                 obj_tlen-=8;
 892                 obj_tptr+=8;
 893                 break;
 894             default:
 895                 hexdump=TRUE;
 896             }
 897             break;
 898
 899         case RSVP_OBJ_LABEL_REQ:
 900             switch(rsvp_obj_ctype) {
 901             case RSVP_CTYPE_1:
 902                 while(obj_tlen >= 4 ) {
 903                     printf("%s  L3 Protocol ID: %s",
 904                            ident,
 905                            tok2str(ethertype_values,
 906                                    "Unknown Protocol (0x%04x)",
 907                                    EXTRACT_16BITS(obj_tptr+2)));
 908                     obj_tlen-=4;
 909                     obj_tptr+=4;
 910                 }
 911                 break;
 912             case RSVP_CTYPE_2:
 913                 if (obj_tlen < 12)
 914                     return-1;
 915                 printf("%s  L3 Protocol ID: %s",
 916                        ident,
 917                        tok2str(ethertype_values,
 918                                "Unknown Protocol (0x%04x)",
 919                                EXTRACT_16BITS(obj_tptr+2)));
 920                 printf(",%s merge capability",((*(obj_tptr+4))&0x80) ? "no" : "" );
 921                 printf("%s  Minimum VPI/VCI: %u/%u",
 922                        ident,
 923                        (EXTRACT_16BITS(obj_tptr+4))&0xfff,
 924                        (EXTRACT_16BITS(obj_tptr+6))&0xfff);
 925                 printf("%s  Maximum VPI/VCI: %u/%u",
 926                        ident,
 927                        (EXTRACT_16BITS(obj_tptr+8))&0xfff,
 928                        (EXTRACT_16BITS(obj_tptr+10))&0xfff);
 929                 obj_tlen-=12;
 930                 obj_tptr+=12;
 931                 break;
 932             case RSVP_CTYPE_3:
 933                 if (obj_tlen < 12)
 934                     return-1;
 935                 printf("%s  L3 Protocol ID: %s",
 936                        ident,
 937                        tok2str(ethertype_values,
 938                                "Unknown Protocol (0x%04x)",
 939                                EXTRACT_16BITS(obj_tptr+2)));
 940                 printf("%s  Minimum/Maximum DLCI: %u/%u, %s%s bit DLCI",
 941                        ident,
 942                        (EXTRACT_32BITS(obj_tptr+4))&0x7fffff,
 943                        (EXTRACT_32BITS(obj_tptr+8))&0x7fffff,
 944                        (((EXTRACT_16BITS(obj_tptr+4)>>7)&3) == 0 ) ? "10" : "",
 945                        (((EXTRACT_16BITS(obj_tptr+4)>>7)&3) == 2 ) ? "23" : "");
 946                 obj_tlen-=12;
 947                 obj_tptr+=12;
 948                 break;
 949             case RSVP_CTYPE_4:
 950                 if (obj_tlen < 4)
 951                     return-1;
 952                 printf("%s  LSP Encoding Type: %s (%u)",
 953                        ident,
 954                        tok2str(gmpls_encoding_values,
 955                                "Unknown",
 956                                *obj_tptr),
 957                        *obj_tptr);
 958                 printf("%s  Switching Type: %s (%u), Payload ID: %s (0x%04x)",
 959                        ident,
 960                        tok2str(gmpls_switch_cap_values,
 961                                "Unknown",
 962                                *(obj_tptr+1)),
 963                        *(obj_tptr+1),
 964                        tok2str(gmpls_payload_values,
 965                                "Unknown",
 966                                EXTRACT_16BITS(obj_tptr+2)),
 967                        EXTRACT_16BITS(obj_tptr+2));
 968                 obj_tlen-=4;
 969                 obj_tptr+=4;
 970                 break;
 971             default:
 972                 hexdump=TRUE;
 973             }
 974             break;
 975
 976         case RSVP_OBJ_RRO:
 977         case RSVP_OBJ_ERO:
 978             switch(rsvp_obj_ctype) {
 979             case RSVP_CTYPE_IPV4:
 980                 while(obj_tlen >= 4 ) {
 981                     printf("%s  Subobject Type: %s, length %u",
 982                            ident,
 983                            tok2str(rsvp_obj_xro_values,
 984                                    "Unknown %u",
 985                                    RSVP_OBJ_XRO_MASK_SUBOBJ(*obj_tptr)),
 986                            *(obj_tptr+1));
 987
 988                     if (*(obj_tptr+1) == 0) { /* prevent infinite loops */
 989                         printf("%s  ERROR: zero length ERO subtype",ident);
 990                         break;
 991                     }
 992
 993                     switch(RSVP_OBJ_XRO_MASK_SUBOBJ(*obj_tptr)) {
 994                     case RSVP_OBJ_XRO_IPV4:
 995                         printf(", %s, %s/%u, Flags: [%s]",
 996                                RSVP_OBJ_XRO_MASK_LOOSE(*obj_tptr) ? "Loose" : "Strict",
 997                                ipaddr_string(obj_tptr+2),
 998                                *(obj_tptr+6),
 999                                bittok2str(rsvp_obj_rro_flag_values,
1000                                    "none",
1001                                    *(obj_tptr+7))); /* rfc3209 says that this field is rsvd. */
1002                     }
1003                     obj_tlen-=*(obj_tptr+1);
1004                     obj_tptr+=*(obj_tptr+1);
1005                 }
1006                 break;
1007             default:
1008                 hexdump=TRUE;
1009             }
1010             break;
1011
1012         case RSVP_OBJ_HELLO:
1013             switch(rsvp_obj_ctype) {
1014             case RSVP_CTYPE_1:
1015             case RSVP_CTYPE_2:
1016                 if (obj_tlen < 8)
1017                     return-1;
1018                 printf("%s  Source Instance: 0x%08x, Destination Instance: 0x%08x",
1019                        ident,
1020                        EXTRACT_32BITS(obj_tptr),
1021                        EXTRACT_32BITS(obj_tptr+4));
1022                 obj_tlen-=8;
1023                 obj_tptr+=8;
1024                 break;
1025             default:
1026                 hexdump=TRUE;
1027             }
1028             break;
1029
1030         case RSVP_OBJ_RESTART_CAPABILITY:
1031             switch(rsvp_obj_ctype) {
1032             case RSVP_CTYPE_1:
1033                 if (obj_tlen < 8)
1034                     return-1;
1035                 printf("%s  Restart  Time: %ums, Recovery Time: %ums",
1036                        ident,
1037                        EXTRACT_32BITS(obj_tptr),
1038                        EXTRACT_32BITS(obj_tptr+4));
1039                 obj_tlen-=8;
1040                 obj_tptr+=8;
1041                 break;
1042             default:
1043                 hexdump=TRUE;
1044             }
1045             break;
1046
1047         case RSVP_OBJ_SESSION_ATTRIBUTE:
1048             switch(rsvp_obj_ctype) {
1049             case RSVP_CTYPE_TUNNEL_IPV4:
1050                 if (obj_tlen < 4)
1051                     return-1;
1052                 namelen = *(obj_tptr+3);
1053                 if (obj_tlen < 4+namelen)
1054                     return-1;
1055                 printf("%s  Session Name: ", ident);
1056                 for (i = 0; i < namelen; i++)
1057                     safeputchar(*(obj_tptr+4+i));
1058                 printf("%s  Setup Priority: %u, Holding Priority: %u, Flags: [%s]",
1059                        ident,
1060                        (int)*obj_tptr,
1061                        (int)*(obj_tptr+1),
1062                        tok2str(rsvp_session_attribute_flag_values,
1063                                   "none",
1064                                   *(obj_tptr+2)));
1065
1066                 obj_tlen-=4+*(obj_tptr+3);
1067                 obj_tptr+=4+*(obj_tptr+3);
1068                 break;
1069             default:
1070                 hexdump=TRUE;
1071             }
1072             break;
1073
1074         case RSVP_OBJ_GENERALIZED_UNI:
1075             switch(rsvp_obj_ctype) {
1076                 int subobj_type,af,subobj_len,total_subobj_len;
1077
1078             case RSVP_CTYPE_1:
1079
1080                 if (obj_tlen < 4)
1081                     return-1;
1082
1083                 /* read variable length subobjects */
1084                 total_subobj_len = obj_tlen;
1085                 while(total_subobj_len > 0) {
1086                     subobj_len  = EXTRACT_16BITS(obj_tptr);
1087                     subobj_type = (EXTRACT_16BITS(obj_tptr+2))>>8;
1088                     af = (EXTRACT_16BITS(obj_tptr+2))&0x00FF;
1089
1090                     printf("%s  Subobject Type: %s (%u), AF: %s (%u), length: %u",
1091                            ident,
1092                            tok2str(rsvp_obj_generalized_uni_values, "Unknown", subobj_type),
1093                            subobj_type,
1094                            tok2str(af_values, "Unknown", af), af,
1095                            subobj_len);
1096
1097                     switch(subobj_type) {
1098                     case RSVP_GEN_UNI_SUBOBJ_SOURCE_TNA_ADDRESS:
1099                     case RSVP_GEN_UNI_SUBOBJ_DESTINATION_TNA_ADDRESS:
1100
1101                         switch(af) {
1102                         case AFNUM_INET:
1103                             if (subobj_len < 8)
1104                                 return -1;
1105                             printf("%s    UNI IPv4 TNA address: %s",
1106                                    ident, ipaddr_string(obj_tptr+4));
1107                             break;
1108 #ifdef INET6
1109                         case AFNUM_INET6:
1110                             if (subobj_len < 20)
1111                                 return -1;
1112                             printf("%s    UNI IPv6 TNA address: %s",
1113                                    ident, ip6addr_string(obj_tptr+4));
1114                             break;
1115 #endif
1116                         case AFNUM_NSAP:
1117                             if (subobj_len) {
1118                                 /* unless we have a TLV parser lets just hexdump */
1119                                 hexdump=TRUE;
1120                             }
1121                             break;
1122                         }
1123                         break;
1124
1125                     case RSVP_GEN_UNI_SUBOBJ_DIVERSITY:
1126                         if (subobj_len) {
1127                             /* unless we have a TLV parser lets just hexdump */
1128                             hexdump=TRUE;
1129                         }
1130                         break;
1131
1132                     case RSVP_GEN_UNI_SUBOBJ_EGRESS_LABEL:
1133                         if (subobj_len < 16) {
1134                             return -1;
1135                         }
1136
1137                         printf("%s    U-bit: %x, Label type: %u, Logical port id: %u, Label: %u",
1138                                ident,
1139                                ((EXTRACT_32BITS(obj_tptr+4))>>31),
1140                                ((EXTRACT_32BITS(obj_tptr+4))&0xFF),
1141                                EXTRACT_32BITS(obj_tptr+8),
1142                                EXTRACT_32BITS(obj_tptr+12));
1143                         break;
1144
1145                     case RSVP_GEN_UNI_SUBOBJ_SERVICE_LEVEL:
1146                         if (subobj_len < 8) {
1147                             return -1;
1148                         }
1149
1150                         printf("%s    Service level: %u",
1151                                ident, (EXTRACT_32BITS(obj_tptr+4))>>24);
1152                         break;
1153
1154                     default:
1155                         hexdump=TRUE;
1156                         break;
1157                     }
1158                     total_subobj_len-=subobj_len;
1159                     obj_tptr+=subobj_len;
1160                     obj_tlen+=subobj_len;
1161                 }
1162
1163                 if (total_subobj_len) {
1164                     /* unless we have a TLV parser lets just hexdump */
1165                     hexdump=TRUE;
1166                 }
1167                 break;
1168
1169             default:
1170                 hexdump=TRUE;
1171             }
1172             break;
1173
1174         case RSVP_OBJ_RSVP_HOP:
1175             switch(rsvp_obj_ctype) {
1176             case RSVP_CTYPE_3: /* fall through - FIXME add TLV parser */
1177             case RSVP_CTYPE_IPV4:
1178                 if (obj_tlen < 8)
1179                     return-1;
1180                 printf("%s  Previous/Next Interface: %s, Logical Interface Handle: 0x%08x",
1181                        ident,
1182                        ipaddr_string(obj_tptr),
1183                        EXTRACT_32BITS(obj_tptr+4));
1184                 obj_tlen-=8;
1185                 obj_tptr+=8;
1186                 if (obj_tlen)
1187                     hexdump=TRUE; /* unless we have a TLV parser lets just hexdump */
1188                 break;
1189 #ifdef INET6
1190             case RSVP_CTYPE_4: /* fall through - FIXME add TLV parser */
1191             case RSVP_CTYPE_IPV6:
1192                 if (obj_tlen < 20)
1193                     return-1;
1194                 printf("%s  Previous/Next Interface: %s, Logical Interface Handle: 0x%08x",
1195                        ident,
1196                        ip6addr_string(obj_tptr),
1197                        EXTRACT_32BITS(obj_tptr+16));
1198                 obj_tlen-=20;
1199                 obj_tptr+=20;
1200                 hexdump=TRUE; /* unless we have a TLV parser lets just hexdump */
1201                 break;
1202 #endif
1203             default:
1204                 hexdump=TRUE;
1205             }
1206             break;
1207
1208         case RSVP_OBJ_TIME_VALUES:
1209             switch(rsvp_obj_ctype) {
1210             case RSVP_CTYPE_1:
1211                 if (obj_tlen < 4)
1212                     return-1;
1213                 printf("%s  Refresh Period: %ums",
1214                        ident,
1215                        EXTRACT_32BITS(obj_tptr));
1216                 obj_tlen-=4;
1217                 obj_tptr+=4;
1218                 break;
1219             default:
1220                 hexdump=TRUE;
1221             }
1222             break;
1223
1224         /* those three objects do share the same semantics */
1225         case RSVP_OBJ_SENDER_TSPEC:
1226         case RSVP_OBJ_ADSPEC:
1227         case RSVP_OBJ_FLOWSPEC:
1228             switch(rsvp_obj_ctype) {
1229             case RSVP_CTYPE_2:
1230                 if (obj_tlen < 4)
1231                     return-1;
1232                 printf("%s  Msg-Version: %u, length: %u",
1233                        ident,
1234                        (*obj_tptr & 0xf0) >> 4,
1235                        EXTRACT_16BITS(obj_tptr+2)<<2);
1236                 obj_tptr+=4; /* get to the start of the service header */
1237                 obj_tlen-=4;
1238
1239                 while (obj_tlen >= 4) {
1240                     intserv_serv_tlen=EXTRACT_16BITS(obj_tptr+2)<<2;
1241                     printf("%s  Service Type: %s (%u), break bit %s set, Service length: %u",
1242                            ident,
1243                            tok2str(rsvp_intserv_service_type_values,"unknown",*(obj_tptr)),
1244                            *(obj_tptr),
1245                            (*(obj_tptr+1)&0x80) ? "" : "not",
1246                            intserv_serv_tlen);
1247
1248                     obj_tptr+=4; /* get to the start of the parameter list */
1249                     obj_tlen-=4;
1250
1251                     while (intserv_serv_tlen>=4) {
1252                         processed = rsvp_intserv_print(obj_tptr, obj_tlen);
1253                         if (processed == 0)
1254                             break;
1255                         obj_tlen-=processed;
1256                         intserv_serv_tlen-=processed;
1257                         obj_tptr+=processed;
1258                     }
1259                 }
1260                 break;
1261             default:
1262                 hexdump=TRUE;
1263             }
1264             break;
1265
1266         case RSVP_OBJ_FILTERSPEC:
1267             switch(rsvp_obj_ctype) {
1268             case RSVP_CTYPE_IPV4:
1269                 if (obj_tlen < 8)
1270                     return-1;
1271                 printf("%s  Source Address: %s, Source Port: %u",
1272                        ident,
1273                        ipaddr_string(obj_tptr),
1274                        EXTRACT_16BITS(obj_tptr+6));
1275                 obj_tlen-=8;
1276                 obj_tptr+=8;
1277                 break;
1278 #ifdef INET6
1279             case RSVP_CTYPE_IPV6:
1280                 if (obj_tlen < 20)
1281                     return-1;
1282                 printf("%s  Source Address: %s, Source Port: %u",
1283                        ident,
1284                        ip6addr_string(obj_tptr),
1285                        EXTRACT_16BITS(obj_tptr+18));
1286                 obj_tlen-=20;
1287                 obj_tptr+=20;
1288                 break;
1289             case RSVP_CTYPE_3:
1290                 if (obj_tlen < 20)
1291                     return-1;
1292                 printf("%s  Source Address: %s, Flow Label: %u",
1293                        ident,
1294                        ip6addr_string(obj_tptr),
1295                        EXTRACT_24BITS(obj_tptr+17));
1296                 obj_tlen-=20;
1297                 obj_tptr+=20;
1298                 break;
1299             case RSVP_CTYPE_TUNNEL_IPV6:
1300                 if (obj_tlen < 20)
1301                     return-1;
1302                 printf("%s  Source Address: %s, LSP-ID: 0x%04x",
1303                        ident,
1304                        ipaddr_string(obj_tptr),
1305                        EXTRACT_16BITS(obj_tptr+18));
1306                 obj_tlen-=20;
1307                 obj_tptr+=20;
1308                 break;
1309 #endif
1310             case RSVP_CTYPE_TUNNEL_IPV4:
1311                 if (obj_tlen < 8)
1312                     return-1;
1313                 printf("%s  Source Address: %s, LSP-ID: 0x%04x",
1314                        ident,
1315                        ipaddr_string(obj_tptr),
1316                        EXTRACT_16BITS(obj_tptr+6));
1317                 obj_tlen-=8;
1318                 obj_tptr+=8;
1319                 break;
1320             default:
1321                 hexdump=TRUE;
1322             }
1323             break;
1324
1325         case RSVP_OBJ_FASTREROUTE:
1326             /* the differences between c-type 1 and 7 are minor */
1327             obj_ptr.rsvp_obj_frr = (const struct rsvp_obj_frr_t *)obj_tptr;
1328             bw.i = EXTRACT_32BITS(obj_ptr.rsvp_obj_frr->bandwidth);
1329
1330             switch(rsvp_obj_ctype) {
1331             case RSVP_CTYPE_1: /* new style */
1332                 if (obj_tlen < sizeof(struct rsvp_obj_frr_t))
1333                     return-1;
1334                 printf("%s  Setup Priority: %u, Holding Priority: %u, Hop-limit: %u, Bandwidth: %.10g Mbps",
1335                        ident,
1336                        (int)obj_ptr.rsvp_obj_frr->setup_prio,
1337                        (int)obj_ptr.rsvp_obj_frr->hold_prio,
1338                        (int)obj_ptr.rsvp_obj_frr->hop_limit,
1339                         bw.f*8/1000000);
1340                 printf("%s  Include-any: 0x%08x, Exclude-any: 0x%08x, Include-all: 0x%08x",
1341                        ident,
1342                        EXTRACT_32BITS(obj_ptr.rsvp_obj_frr->include_any),
1343                        EXTRACT_32BITS(obj_ptr.rsvp_obj_frr->exclude_any),
1344                        EXTRACT_32BITS(obj_ptr.rsvp_obj_frr->include_all));
1345                 obj_tlen-=sizeof(struct rsvp_obj_frr_t);
1346                 obj_tptr+=sizeof(struct rsvp_obj_frr_t);
1347                 break;
1348
1349             case RSVP_CTYPE_TUNNEL_IPV4: /* old style */
1350                 if (obj_tlen < 16)
1351                     return-1;
1352                 printf("%s  Setup Priority: %u, Holding Priority: %u, Hop-limit: %u, Bandwidth: %.10g Mbps",
1353                        ident,
1354                        (int)obj_ptr.rsvp_obj_frr->setup_prio,
1355                        (int)obj_ptr.rsvp_obj_frr->hold_prio,
1356                        (int)obj_ptr.rsvp_obj_frr->hop_limit,
1357                         bw.f*8/1000000);
1358                 printf("%s  Include Colors: 0x%08x, Exclude Colors: 0x%08x",
1359                        ident,
1360                        EXTRACT_32BITS(obj_ptr.rsvp_obj_frr->include_any),
1361                        EXTRACT_32BITS(obj_ptr.rsvp_obj_frr->exclude_any));
1362                 obj_tlen-=16;
1363                 obj_tptr+=16;
1364                 break;
1365
1366             default:
1367                 hexdump=TRUE;
1368             }
1369             break;
1370
1371         case RSVP_OBJ_DETOUR:
1372             switch(rsvp_obj_ctype) {
1373             case RSVP_CTYPE_TUNNEL_IPV4:
1374                 while(obj_tlen >= 8) {
1375                     printf("%s  PLR-ID: %s, Avoid-Node-ID: %s",
1376                            ident,
1377                            ipaddr_string(obj_tptr),
1378                            ipaddr_string(obj_tptr+4));
1379                     obj_tlen-=8;
1380                     obj_tptr+=8;
1381                 }
1382                 break;
1383             default:
1384                 hexdump=TRUE;
1385             }
1386             break;
1387
1388         case RSVP_OBJ_CLASSTYPE:
1389         case RSVP_OBJ_CLASSTYPE_OLD: /* fall through */
1390             switch(rsvp_obj_ctype) {
1391             case RSVP_CTYPE_1:
1392                 printf("%s  CT: %u",
1393                        ident,
1394                        EXTRACT_32BITS(obj_tptr)&0x7);
1395                 obj_tlen-=4;
1396                 obj_tptr+=4;
1397                 break;
1398             default:
1399                 hexdump=TRUE;
1400             }
1401             break;
1402
1403         case RSVP_OBJ_ERROR_SPEC:
1404             switch(rsvp_obj_ctype) {
1405             case RSVP_CTYPE_3: /* fall through - FIXME add TLV parser */
1406             case RSVP_CTYPE_IPV4:
1407                 if (obj_tlen < 8)
1408                     return-1;
1409                 error_code=*(obj_tptr+5);
1410                 error_value=EXTRACT_16BITS(obj_tptr+6);
1411                 printf("%s  Error Node Address: %s, Flags: [0x%02x]%s  Error Code: %s (%u)",
1412                        ident,
1413                        ipaddr_string(obj_tptr),
1414                        *(obj_tptr+4),
1415                        ident,
1416                        tok2str(rsvp_obj_error_code_values,"unknown",error_code),
1417                        error_code);
1418                 switch (error_code) {
1419                 case RSVP_OBJ_ERROR_SPEC_CODE_ROUTING:
1420                     printf(", Error Value: %s (%u)",
1421                            tok2str(rsvp_obj_error_code_routing_values,"unknown",error_value),
1422                            error_value);
1423                     break;
1424                 case RSVP_OBJ_ERROR_SPEC_CODE_DIFFSERV_TE: /* fall through */
1425                 case RSVP_OBJ_ERROR_SPEC_CODE_DIFFSERV_TE_OLD:
1426                     printf(", Error Value: %s (%u)",
1427                            tok2str(rsvp_obj_error_code_diffserv_te_values,"unknown",error_value),
1428                            error_value);
1429                     break;
1430                 default:
1431                     printf(", Unknown Error Value (%u)", error_value);
1432                     break;
1433                 }
1434                 obj_tlen-=8;
1435                 obj_tptr+=8;
1436                 break;
1437 #ifdef INET6
1438             case RSVP_CTYPE_4: /* fall through - FIXME add TLV parser */
1439             case RSVP_CTYPE_IPV6:
1440                 if (obj_tlen < 20)
1441                     return-1;
1442                 error_code=*(obj_tptr+17);
1443                 error_value=EXTRACT_16BITS(obj_tptr+18);
1444                 printf("%s  Error Node Address: %s, Flags: [0x%02x]%s  Error Code: %s (%u)",
1445                        ident,
1446                        ip6addr_string(obj_tptr),
1447                        *(obj_tptr+16),
1448                        ident,
1449                        tok2str(rsvp_obj_error_code_values,"unknown",error_code),
1450                        error_code);
1451
1452                 switch (error_code) {
1453                 case RSVP_OBJ_ERROR_SPEC_CODE_ROUTING:
1454                     printf(", Error Value: %s (%u)",
1455                            tok2str(rsvp_obj_error_code_routing_values,"unknown",error_value),
1456                            error_value);
1457                     break;
1458                 default:
1459                     break;
1460                 }
1461                 obj_tlen-=20;
1462                 obj_tptr+=20;
1463                 break;
1464 #endif
1465             default:
1466                 hexdump=TRUE;
1467             }
1468             break;
1469
1470         case RSVP_OBJ_PROPERTIES:
1471             switch(rsvp_obj_ctype) {
1472             case RSVP_CTYPE_1:
1473                 if (obj_tlen < 4)
1474                     return-1;
1475                 padbytes = EXTRACT_16BITS(obj_tptr+2);
1476                 printf("%s  TLV count: %u, padding bytes: %u",
1477                        ident,
1478                        EXTRACT_16BITS(obj_tptr),
1479                        padbytes);
1480                 obj_tlen-=4;
1481                 obj_tptr+=4;
1482                 /* loop through as long there is anything longer than the TLV header (2) */
1483                 while(obj_tlen >= 2 + padbytes) {
1484                     printf("%s    %s TLV (0x%02x), length: %u", /* length includes header */
1485                            ident,
1486                            tok2str(rsvp_obj_prop_tlv_values,"unknown",*obj_tptr),
1487                            *obj_tptr,
1488                            *(obj_tptr+1));
1489                     if (obj_tlen < *(obj_tptr+1))
1490                         return-1;
1491                     if (*(obj_tptr+1) < 2)
1492                         return -1;
1493                     print_unknown_data(obj_tptr+2,"\n\t\t",*(obj_tptr+1)-2);
1494                     obj_tlen-=*(obj_tptr+1);
1495                     obj_tptr+=*(obj_tptr+1);
1496                 }
1497                 break;
1498             default:
1499                 hexdump=TRUE;
1500             }
1501             break;
1502
1503         case RSVP_OBJ_MESSAGE_ID:     /* fall through */
1504         case RSVP_OBJ_MESSAGE_ID_ACK: /* fall through */
1505         case RSVP_OBJ_MESSAGE_ID_LIST:
1506             switch(rsvp_obj_ctype) {
1507             case RSVP_CTYPE_1:
1508             case RSVP_CTYPE_2:
1509                 if (obj_tlen < 8)
1510                     return-1;
1511                 printf("%s  Flags [0x%02x], epoch: %u",
1512                        ident,
1513                        *obj_tptr,
1514                        EXTRACT_24BITS(obj_tptr+1));
1515                 obj_tlen-=4;
1516                 obj_tptr+=4;
1517                 /* loop through as long there are no messages left */
1518                 while(obj_tlen >= 4) {
1519                     printf("%s    Message-ID 0x%08x (%u)",
1520                            ident,
1521                            EXTRACT_32BITS(obj_tptr),
1522                            EXTRACT_32BITS(obj_tptr));
1523                     obj_tlen-=4;
1524                     obj_tptr+=4;
1525                 }
1526                 break;
1527             default:
1528                 hexdump=TRUE;
1529             }
1530             break;
1531
1532         case RSVP_OBJ_INTEGRITY:
1533             switch(rsvp_obj_ctype) {
1534             case RSVP_CTYPE_1:
1535                 if (obj_tlen < sizeof(struct rsvp_obj_integrity_t))
1536                     return-1;
1537                 obj_ptr.rsvp_obj_integrity = (const struct rsvp_obj_integrity_t *)obj_tptr;
1538                 printf("%s  Key-ID 0x%04x%08x, Sequence 0x%08x%08x, Flags [%s]",
1539                        ident,
1540                        EXTRACT_16BITS(obj_ptr.rsvp_obj_integrity->key_id),
1541                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->key_id+2),
1542                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->sequence),
1543                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->sequence+4),
1544                        bittok2str(rsvp_obj_integrity_flag_values,
1545                                   "none",
1546                                   obj_ptr.rsvp_obj_integrity->flags));
1547                 printf("%s  MD5-sum 0x%08x%08x%08x%08x (unverified)",
1548                        ident,
1549                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->digest),
1550                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->digest+4),
1551                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->digest+8),
1552                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->digest+12));
1553                 obj_tlen+=sizeof(struct rsvp_obj_integrity_t);
1554                 obj_tptr+=sizeof(struct rsvp_obj_integrity_t);
1555                 break;
1556             default:
1557                 hexdump=TRUE;
1558             }
1559             break;
1560
1561         case RSVP_OBJ_ADMIN_STATUS:
1562             switch(rsvp_obj_ctype) {
1563             case RSVP_CTYPE_1:
1564                 if (obj_tlen < 4)
1565                     return-1;
1566                 printf("%s  Flags [%s]", ident,
1567                        bittok2str(rsvp_obj_admin_status_flag_values, "none",
1568                                   EXTRACT_32BITS(obj_tptr)));
1569                 obj_tlen-=4;
1570                 obj_tptr+=4;
1571                 break;
1572             default:
1573                 hexdump=TRUE;
1574             }
1575             break;
1576
1577         case RSVP_OBJ_LABEL_SET:
1578             switch(rsvp_obj_ctype) {
1579             case RSVP_CTYPE_1:
1580                 if (obj_tlen < 4)
1581                     return-1;
1582                 action = (EXTRACT_16BITS(obj_tptr)>>8);
1583
1584                 printf("%s  Action: %s (%u), Label type: %u", ident,
1585                        tok2str(rsvp_obj_label_set_action_values, "Unknown", action),
1586                        action, ((EXTRACT_32BITS(obj_tptr) & 0x7F)));
1587
1588                 switch (action) {
1589                 case LABEL_SET_INCLUSIVE_RANGE:
1590                 case LABEL_SET_EXCLUSIVE_RANGE: /* fall through */
1591
1592                     /* only a couple of subchannels are expected */
1593                     if (obj_tlen < 12)
1594                         return -1;
1595                     printf("%s  Start range: %u, End range: %u", ident,
1596                            EXTRACT_32BITS(obj_tptr+4),
1597                            EXTRACT_32BITS(obj_tptr+8));
1598                     obj_tlen-=12;
1599                     obj_tptr+=12;
1600                     break;
1601
1602                 default:
1603                     obj_tlen-=4;
1604                     obj_tptr+=4;
1605                     subchannel = 1;
1606                     while(obj_tlen >= 4 ) {
1607                         printf("%s  Subchannel #%u: %u", ident, subchannel,
1608                                EXTRACT_32BITS(obj_tptr));
1609                         obj_tptr+=4;
1610                         obj_tlen-=4;
1611                         subchannel++;
1612                     }
1613                     break;
1614                 }
1615                 break;
1616
1617             default:
1618                 hexdump=TRUE;
1619             }
1620
1621         /*
1622          *  FIXME those are the defined objects that lack a decoder
1623          *  you are welcome to contribute code ;-)
1624          */
1625
1626         case RSVP_OBJ_SCOPE:
1627         case RSVP_OBJ_POLICY_DATA:
1628         case RSVP_OBJ_ACCEPT_LABEL_SET:
1629         case RSVP_OBJ_PROTECTION:
1630         default:
1631             if (vflag <= 1)
1632                 print_unknown_data(obj_tptr,"\n\t    ",obj_tlen); /* FIXME indentation */
1633             break;
1634         }
1635         /* do we also want to see a hex dump ? */
1636         if (vflag > 1 || hexdump==TRUE)
1637             print_unknown_data(tptr+sizeof(sizeof(struct rsvp_object_header)),"\n\t    ", /* FIXME indentation */
1638                                rsvp_obj_len-sizeof(struct rsvp_object_header));
1639
1640         tptr+=rsvp_obj_len;
1641         tlen-=rsvp_obj_len;
1642     }
1643     return 0;
1644 trunc:
1645     printf("\n\t\t packet exceeded snapshot");
1646     return -1;
1647 }
1648
1649
1650 void
1651 rsvp_print(register const u_char *pptr, register u_int len) {
1652
1653     const struct rsvp_common_header *rsvp_com_header;
1654     const u_char *tptr,*subtptr;
1655     u_short tlen,subtlen;
1656
1657     tptr=pptr;
1658
1659     rsvp_com_header = (const struct rsvp_common_header *)pptr;
1660     TCHECK(*rsvp_com_header);
1661
1662     /*
1663      * Sanity checking of the header.
1664      */
1665     if (RSVP_EXTRACT_VERSION(rsvp_com_header->version_flags) != RSVP_VERSION) {
1666         printf("ERROR: RSVP version %u packet not supported",
1667                RSVP_EXTRACT_VERSION(rsvp_com_header->version_flags));
1668         return;
1669     }
1670
1671     /* in non-verbose mode just lets print the basic Message Type*/
1672     if (vflag < 1) {
1673         printf("RSVPv%u %s Message, length: %u",
1674                RSVP_EXTRACT_VERSION(rsvp_com_header->version_flags),
1675                tok2str(rsvp_msg_type_values, "unknown (%u)",rsvp_com_header->msg_type),
1676                len);
1677         return;
1678     }
1679
1680     /* ok they seem to want to know everything - lets fully decode it */
1681
1682     tlen=EXTRACT_16BITS(rsvp_com_header->length);
1683
1684     printf("\n\tRSVPv%u %s Message (%u), Flags: [%s], length: %u, ttl: %u, checksum: 0x%04x",
1685            RSVP_EXTRACT_VERSION(rsvp_com_header->version_flags),
1686            tok2str(rsvp_msg_type_values, "unknown, type: %u",rsvp_com_header->msg_type),
1687            rsvp_com_header->msg_type,
1688            bittok2str(rsvp_header_flag_values,"none",RSVP_EXTRACT_FLAGS(rsvp_com_header->version_flags)),
1689            tlen,
1690            rsvp_com_header->ttl,
1691            EXTRACT_16BITS(rsvp_com_header->checksum));
1692
1693     if (tlen < sizeof(const struct rsvp_common_header)) {
1694         printf("ERROR: common header too short %u < %lu", tlen,
1695                (unsigned long)sizeof(const struct rsvp_common_header));
1696         return;
1697     }
1698
1699     tptr+=sizeof(const struct rsvp_common_header);
1700     tlen-=sizeof(const struct rsvp_common_header);
1701
1702     switch(rsvp_com_header->msg_type) {
1703
1704     case RSVP_MSGTYPE_AGGREGATE:
1705         while(tlen > 0) {
1706             subtptr=tptr;
1707             rsvp_com_header = (const struct rsvp_common_header *)subtptr;
1708             TCHECK(*rsvp_com_header);
1709
1710             /*
1711              * Sanity checking of the header.
1712              */
1713             if (RSVP_EXTRACT_VERSION(rsvp_com_header->version_flags) != RSVP_VERSION) {
1714                 printf("ERROR: RSVP version %u packet not supported",
1715                        RSVP_EXTRACT_VERSION(rsvp_com_header->version_flags));
1716                 return;
1717             }
1718             subtlen=EXTRACT_16BITS(rsvp_com_header->length);
1719
1720             printf("\n\t  RSVPv%u %s Message (%u), Flags: [%s], length: %u, ttl: %u, checksum: 0x%04x",
1721                    RSVP_EXTRACT_VERSION(rsvp_com_header->version_flags),
1722                    tok2str(rsvp_msg_type_values, "unknown, type: %u",rsvp_com_header->msg_type),
1723                    rsvp_com_header->msg_type,
1724                    bittok2str(rsvp_header_flag_values,"none",RSVP_EXTRACT_FLAGS(rsvp_com_header->version_flags)),
1725                    subtlen,
1726                    rsvp_com_header->ttl,
1727                    EXTRACT_16BITS(rsvp_com_header->checksum));
1728
1729             if (subtlen < sizeof(const struct rsvp_common_header)) {
1730                 printf("ERROR: common header too short %u < %lu", subtlen,
1731                        (unsigned long)sizeof(const struct rsvp_common_header));
1732                 return;
1733             }
1734
1735             if (tlen < subtlen) {
1736                 printf("ERROR: common header too large %u > %u", subtlen,
1737                        tlen);
1738                 return;
1739             }
1740
1741             subtptr+=sizeof(const struct rsvp_common_header);
1742             subtlen-=sizeof(const struct rsvp_common_header);
1743
1744             if (rsvp_obj_print(subtptr,"\n\t    ", subtlen) == -1)
1745                 return;
1746
1747             tptr+=subtlen+sizeof(const struct rsvp_common_header);
1748             tlen-=subtlen+sizeof(const struct rsvp_common_header);
1749         }
1750
1751         break;
1752
1753     case RSVP_MSGTYPE_PATH:
1754     case RSVP_MSGTYPE_RESV:
1755     case RSVP_MSGTYPE_PATHERR:
1756     case RSVP_MSGTYPE_RESVERR:
1757     case RSVP_MSGTYPE_PATHTEAR:
1758     case RSVP_MSGTYPE_RESVTEAR:
1759     case RSVP_MSGTYPE_RESVCONF:
1760     case RSVP_MSGTYPE_HELLO_OLD:
1761     case RSVP_MSGTYPE_HELLO:
1762     case RSVP_MSGTYPE_ACK:
1763     case RSVP_MSGTYPE_SREFRESH:
1764         if (rsvp_obj_print(tptr,"\n\t  ", tlen) == -1)
1765             return;
1766         break;
1767
1768     default:
1769         print_unknown_data(tptr,"\n\t    ",tlen);
1770         break;
1771     }
1772
1773     return;
1774 trunc:
1775     printf("\n\t\t packet exceeded snapshot");
1776 }