Our pf includes are in /usr/include/net/pf/, so adjust the appropriate
[dragonfly.git] / contrib / tcpdump-3.9 / 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.14 2007/02/26 13:32:36 hannes 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     while(tlen>=sizeof(struct rsvp_object_header)) {
635         /* did we capture enough for fully decoding the object header ? */
636         if (!TTEST2(*tptr, sizeof(struct rsvp_object_header)))
637             goto trunc;
638
639         rsvp_obj_header = (const struct rsvp_object_header *)tptr;
640         rsvp_obj_len=EXTRACT_16BITS(rsvp_obj_header->length);
641         rsvp_obj_ctype=rsvp_obj_header->ctype;
642
643         if(rsvp_obj_len % 4) {
644             printf("%sERROR: object header size %u not a multiple of 4", ident, rsvp_obj_len);
645             return -1;
646         }
647         if(rsvp_obj_len < sizeof(struct rsvp_object_header)) {
648             printf("%sERROR: object header too short %u < %lu", ident, rsvp_obj_len,
649                    (unsigned long)sizeof(const struct rsvp_object_header));
650             return -1;
651         }
652
653         printf("%s%s Object (%u) Flags: [%s",
654                ident,
655                tok2str(rsvp_obj_values,
656                        "Unknown",
657                        rsvp_obj_header->class_num),
658                rsvp_obj_header->class_num,
659                ((rsvp_obj_header->class_num)&0x80) ? "ignore" : "reject");
660
661         if (rsvp_obj_header->class_num > 128)
662             printf(" %s",
663                    ((rsvp_obj_header->class_num)&0x40) ? "and forward" : "silently");
664
665         printf(" if unknown], Class-Type: %s (%u), length: %u",
666                tok2str(rsvp_ctype_values,
667                        "Unknown",
668                        ((rsvp_obj_header->class_num)<<8)+rsvp_obj_ctype),
669                rsvp_obj_ctype,
670                rsvp_obj_len);
671     
672         if(tlen < rsvp_obj_len) {
673             printf("%sERROR: object goes past end of objects TLV", ident);
674             return -1;
675         }
676
677         obj_tptr=tptr+sizeof(struct rsvp_object_header);
678         obj_tlen=rsvp_obj_len-sizeof(struct rsvp_object_header);
679
680         /* did we capture enough for fully decoding the object ? */
681         if (!TTEST2(*tptr, rsvp_obj_len))
682             return -1;
683         hexdump=FALSE;
684
685         switch(rsvp_obj_header->class_num) {
686         case RSVP_OBJ_SESSION:
687             switch(rsvp_obj_ctype) {
688             case RSVP_CTYPE_IPV4:
689                 if (obj_tlen < 8)
690                     return -1;
691                 printf("%s  IPv4 DestAddress: %s, Protocol ID: 0x%02x",
692                        ident,
693                        ipaddr_string(obj_tptr),
694                        *(obj_tptr+sizeof(struct in_addr)));
695                 printf("%s  Flags: [0x%02x], DestPort %u",
696                        ident,
697                        *(obj_tptr+5),
698                        EXTRACT_16BITS(obj_tptr+6));
699                 obj_tlen-=8;
700                 obj_tptr+=8;                
701                 break;
702 #ifdef INET6
703             case RSVP_CTYPE_IPV6:
704                 if (obj_tlen < 20)
705                     return -1;
706                 printf("%s  IPv6 DestAddress: %s, Protocol ID: 0x%02x",
707                        ident,
708                        ip6addr_string(obj_tptr),
709                        *(obj_tptr+sizeof(struct in6_addr)));
710                 printf("%s  Flags: [0x%02x], DestPort %u",
711                        ident,
712                        *(obj_tptr+sizeof(struct in6_addr)+1),
713                        EXTRACT_16BITS(obj_tptr+sizeof(struct in6_addr)+2));
714                 obj_tlen-=20;
715                 obj_tptr+=20;                
716                 break;
717
718             case RSVP_CTYPE_TUNNEL_IPV6:
719                 if (obj_tlen < 36)
720                     return -1;
721                 printf("%s  IPv6 Tunnel EndPoint: %s, Tunnel ID: 0x%04x, Extended Tunnel ID: %s",
722                        ident,
723                        ip6addr_string(obj_tptr),
724                        EXTRACT_16BITS(obj_tptr+18),
725                        ip6addr_string(obj_tptr+20));
726                 obj_tlen-=36;
727                 obj_tptr+=36;                
728                 break;
729 #endif
730             case RSVP_CTYPE_TUNNEL_IPV4:
731             case RSVP_CTYPE_UNI_IPV4:
732                 if (obj_tlen < 12)
733                     return -1;
734                 printf("%s  IPv4 Tunnel EndPoint: %s, Tunnel ID: 0x%04x, Extended Tunnel ID: %s",
735                        ident,
736                        ipaddr_string(obj_tptr),
737                        EXTRACT_16BITS(obj_tptr+6),
738                        ipaddr_string(obj_tptr+8));
739                 obj_tlen-=12;
740                 obj_tptr+=12;                
741                 break;
742             default:
743                 hexdump=TRUE;
744             }
745             break;
746
747         case RSVP_OBJ_CONFIRM:
748             switch(rsvp_obj_ctype) {
749             case RSVP_CTYPE_IPV4:
750                 if (obj_tlen < sizeof(struct in_addr))
751                     return -1;
752                 printf("%s  IPv4 Receiver Address: %s",
753                        ident,
754                        ipaddr_string(obj_tptr));
755                 obj_tlen-=sizeof(struct in_addr);
756                 obj_tptr+=sizeof(struct in_addr);                
757                 break;
758 #ifdef INET6
759             case RSVP_CTYPE_IPV6:
760                 if (obj_tlen < sizeof(struct in6_addr))
761                     return -1;
762                 printf("%s  IPv6 Receiver Address: %s",
763                        ident,
764                        ip6addr_string(obj_tptr));
765                 obj_tlen-=sizeof(struct in6_addr);
766                 obj_tptr+=sizeof(struct in6_addr);                
767                 break;
768 #endif
769             default:
770                 hexdump=TRUE;
771             }
772             break;
773
774         case RSVP_OBJ_NOTIFY_REQ:
775             switch(rsvp_obj_ctype) {
776             case RSVP_CTYPE_IPV4:
777                 if (obj_tlen < sizeof(struct in_addr))
778                     return -1;
779                 printf("%s  IPv4 Notify Node Address: %s",
780                        ident,
781                        ipaddr_string(obj_tptr));
782                 obj_tlen-=sizeof(struct in_addr);
783                 obj_tptr+=sizeof(struct in_addr);                
784                 break;
785 #ifdef INET6
786             case RSVP_CTYPE_IPV6:
787                 if (obj_tlen < sizeof(struct in6_addr))
788                     return-1;
789                 printf("%s  IPv6 Notify Node Address: %s",
790                        ident,
791                        ip6addr_string(obj_tptr));
792                 obj_tlen-=sizeof(struct in6_addr);
793                 obj_tptr+=sizeof(struct in6_addr);                
794                 break;
795 #endif
796             default:
797                 hexdump=TRUE;
798             }
799             break;
800
801         case RSVP_OBJ_SUGGESTED_LABEL: /* fall through */
802         case RSVP_OBJ_UPSTREAM_LABEL:  /* fall through */
803         case RSVP_OBJ_RECOVERY_LABEL:  /* fall through */
804         case RSVP_OBJ_LABEL:
805             switch(rsvp_obj_ctype) {
806             case RSVP_CTYPE_1:
807                 while(obj_tlen >= 4 ) {
808                     printf("%s  Label: %u", ident, EXTRACT_32BITS(obj_tptr));
809                     obj_tlen-=4;
810                     obj_tptr+=4;
811                 }
812                 break;
813             case RSVP_CTYPE_2:
814                 if (obj_tlen < 4)
815                     return-1;
816                 printf("%s  Generalized Label: %u",
817                        ident,
818                        EXTRACT_32BITS(obj_tptr));
819                 obj_tlen-=4;
820                 obj_tptr+=4;
821                 break;
822             case RSVP_CTYPE_3:
823                 if (obj_tlen < 12)
824                     return-1;
825                 printf("%s  Waveband ID: %u%s  Start Label: %u, Stop Label: %u",
826                        ident,
827                        EXTRACT_32BITS(obj_tptr),
828                        ident,
829                        EXTRACT_32BITS(obj_tptr+4),
830                        EXTRACT_32BITS(obj_tptr+8));
831                 obj_tlen-=12;
832                 obj_tptr+=12;
833                 break;
834             default:
835                 hexdump=TRUE;
836             }
837             break;
838
839         case RSVP_OBJ_STYLE:
840             switch(rsvp_obj_ctype) {
841             case RSVP_CTYPE_1:
842                 if (obj_tlen < 4)
843                     return-1;
844                 printf("%s  Reservation Style: %s, Flags: [0x%02x]",
845                        ident,
846                        tok2str(rsvp_resstyle_values,
847                                "Unknown",
848                                EXTRACT_24BITS(obj_tptr+1)),
849                        *(obj_tptr));
850                 obj_tlen-=4;
851                 obj_tptr+=4;
852                 break;
853             default:
854                 hexdump=TRUE;
855             }
856             break;
857
858         case RSVP_OBJ_SENDER_TEMPLATE:
859             switch(rsvp_obj_ctype) {
860             case RSVP_CTYPE_IPV4:
861                 if (obj_tlen < 8)
862                     return-1;
863                 printf("%s  Source Address: %s, Source Port: %u",
864                        ident,
865                        ipaddr_string(obj_tptr),
866                        EXTRACT_16BITS(obj_tptr+6));
867                 obj_tlen-=8;
868                 obj_tptr+=8;
869                 break;
870 #ifdef INET6
871             case RSVP_CTYPE_IPV6:
872                 if (obj_tlen < 20)
873                     return-1;
874                 printf("%s  Source Address: %s, Source Port: %u",
875                        ident,
876                        ip6addr_string(obj_tptr),
877                        EXTRACT_16BITS(obj_tptr+18));
878                 obj_tlen-=20;
879                 obj_tptr+=20;
880                 break;
881 #endif
882             case RSVP_CTYPE_TUNNEL_IPV4:
883                 if (obj_tlen < 8)
884                     return-1;
885                 printf("%s  IPv4 Tunnel Sender Address: %s, LSP-ID: 0x%04x",
886                        ident,
887                        ipaddr_string(obj_tptr),
888                        EXTRACT_16BITS(obj_tptr+6));
889                 obj_tlen-=8;
890                 obj_tptr+=8;
891                 break;
892             default:
893                 hexdump=TRUE;
894             }
895             break;
896
897         case RSVP_OBJ_LABEL_REQ:
898             switch(rsvp_obj_ctype) {
899             case RSVP_CTYPE_1:
900                 while(obj_tlen >= 4 ) {
901                     printf("%s  L3 Protocol ID: %s",
902                            ident,
903                            tok2str(ethertype_values,
904                                    "Unknown Protocol (0x%04x)",
905                                    EXTRACT_16BITS(obj_tptr+2)));
906                     obj_tlen-=4;
907                     obj_tptr+=4;
908                 }
909                 break;
910             case RSVP_CTYPE_2:
911                 if (obj_tlen < 12)
912                     return-1;
913                 printf("%s  L3 Protocol ID: %s",
914                        ident,
915                        tok2str(ethertype_values,
916                                "Unknown Protocol (0x%04x)",
917                                EXTRACT_16BITS(obj_tptr+2)));
918                 printf(",%s merge capability",((*(obj_tptr+4))&0x80) ? "no" : "" );
919                 printf("%s  Minimum VPI/VCI: %u/%u",
920                        ident,
921                        (EXTRACT_16BITS(obj_tptr+4))&0xfff,
922                        (EXTRACT_16BITS(obj_tptr+6))&0xfff);
923                 printf("%s  Maximum VPI/VCI: %u/%u",
924                        ident,
925                        (EXTRACT_16BITS(obj_tptr+8))&0xfff,
926                        (EXTRACT_16BITS(obj_tptr+10))&0xfff);
927                 obj_tlen-=12;
928                 obj_tptr+=12;
929                 break;
930             case RSVP_CTYPE_3:
931                 if (obj_tlen < 12)
932                     return-1;
933                 printf("%s  L3 Protocol ID: %s",
934                        ident,
935                        tok2str(ethertype_values,
936                                "Unknown Protocol (0x%04x)",
937                                EXTRACT_16BITS(obj_tptr+2)));
938                 printf("%s  Minimum/Maximum DLCI: %u/%u, %s%s bit DLCI",
939                        ident,
940                        (EXTRACT_32BITS(obj_tptr+4))&0x7fffff,
941                        (EXTRACT_32BITS(obj_tptr+8))&0x7fffff,
942                        (((EXTRACT_16BITS(obj_tptr+4)>>7)&3) == 0 ) ? "10" : "",
943                        (((EXTRACT_16BITS(obj_tptr+4)>>7)&3) == 2 ) ? "23" : "");
944                 obj_tlen-=12;
945                 obj_tptr+=12;
946                 break;
947             case RSVP_CTYPE_4:
948                 if (obj_tlen < 4)
949                     return-1;
950                 printf("%s  LSP Encoding Type: %s (%u)",
951                        ident,
952                        tok2str(gmpls_encoding_values,
953                                "Unknown",
954                                *obj_tptr),
955                        *obj_tptr);
956                 printf("%s  Switching Type: %s (%u), Payload ID: %s (0x%04x)",
957                        ident,
958                        tok2str(gmpls_switch_cap_values,
959                                "Unknown",
960                                *(obj_tptr+1)),
961                        *(obj_tptr+1),
962                        tok2str(gmpls_payload_values,
963                                "Unknown",
964                                EXTRACT_16BITS(obj_tptr+2)),
965                        EXTRACT_16BITS(obj_tptr+2));
966                 obj_tlen-=4;
967                 obj_tptr+=4;
968                 break;
969             default:
970                 hexdump=TRUE;
971             }
972             break;
973
974         case RSVP_OBJ_RRO:
975         case RSVP_OBJ_ERO:
976             switch(rsvp_obj_ctype) {
977             case RSVP_CTYPE_IPV4:
978                 while(obj_tlen >= 4 ) {
979                     printf("%s  Subobject Type: %s, length %u",
980                            ident,
981                            tok2str(rsvp_obj_xro_values,
982                                    "Unknown %u",
983                                    RSVP_OBJ_XRO_MASK_SUBOBJ(*obj_tptr)),
984                            *(obj_tptr+1));                
985
986                     if (*(obj_tptr+1) == 0) { /* prevent infinite loops */
987                         printf("%s  ERROR: zero length ERO subtype",ident);
988                         break;
989                     }
990
991                     switch(RSVP_OBJ_XRO_MASK_SUBOBJ(*obj_tptr)) {
992                     case RSVP_OBJ_XRO_IPV4:
993                         printf(", %s, %s/%u, Flags: [%s]",
994                                RSVP_OBJ_XRO_MASK_LOOSE(*obj_tptr) ? "Loose" : "Strict",
995                                ipaddr_string(obj_tptr+2),
996                                *(obj_tptr+6),
997                                bittok2str(rsvp_obj_rro_flag_values,
998                                    "none",
999                                    *(obj_tptr+7))); /* rfc3209 says that this field is rsvd. */
1000                     }
1001                     obj_tlen-=*(obj_tptr+1);
1002                     obj_tptr+=*(obj_tptr+1);
1003                 }
1004                 break;
1005             default:
1006                 hexdump=TRUE;
1007             }
1008             break;
1009
1010         case RSVP_OBJ_HELLO:
1011             switch(rsvp_obj_ctype) {
1012             case RSVP_CTYPE_1:
1013             case RSVP_CTYPE_2:
1014                 if (obj_tlen < 8)
1015                     return-1;
1016                 printf("%s  Source Instance: 0x%08x, Destination Instance: 0x%08x",
1017                        ident,
1018                        EXTRACT_32BITS(obj_tptr),
1019                        EXTRACT_32BITS(obj_tptr+4));
1020                 obj_tlen-=8;
1021                 obj_tptr+=8;
1022                 break;
1023             default:
1024                 hexdump=TRUE;
1025             }
1026             break;
1027
1028         case RSVP_OBJ_RESTART_CAPABILITY:
1029             switch(rsvp_obj_ctype) {
1030             case RSVP_CTYPE_1:
1031                 if (obj_tlen < 8)
1032                     return-1;
1033                 printf("%s  Restart  Time: %ums, Recovery Time: %ums",
1034                        ident,
1035                        EXTRACT_32BITS(obj_tptr),
1036                        EXTRACT_32BITS(obj_tptr+4));
1037                 obj_tlen-=8;
1038                 obj_tptr+=8;
1039                 break;
1040             default:
1041                 hexdump=TRUE;
1042             }
1043             break;
1044
1045         case RSVP_OBJ_SESSION_ATTRIBUTE:
1046             switch(rsvp_obj_ctype) {
1047             case RSVP_CTYPE_TUNNEL_IPV4:
1048                 if (obj_tlen < 4)
1049                     return-1;
1050                 namelen = *(obj_tptr+3);
1051                 if (obj_tlen < 4+namelen)
1052                     return-1;
1053                 printf("%s  Session Name: ", ident);
1054                 for (i = 0; i < namelen; i++)
1055                     safeputchar(*(obj_tptr+4+i));
1056                 printf("%s  Setup Priority: %u, Holding Priority: %u, Flags: [%s]",
1057                        ident,
1058                        (int)*obj_tptr,
1059                        (int)*(obj_tptr+1),
1060                        tok2str(rsvp_session_attribute_flag_values,
1061                                   "none",
1062                                   *(obj_tptr+2)));
1063
1064                 obj_tlen-=4+*(obj_tptr+3);
1065                 obj_tptr+=4+*(obj_tptr+3);
1066                 break;
1067             default:
1068                 hexdump=TRUE;
1069             }
1070             break;
1071
1072         case RSVP_OBJ_GENERALIZED_UNI:
1073             switch(rsvp_obj_ctype) {
1074                 int subobj_type,af,subobj_len,total_subobj_len;
1075
1076             case RSVP_CTYPE_1: 
1077
1078                 if (obj_tlen < 4)
1079                     return-1;
1080
1081                 /* read variable length subobjects */
1082                 total_subobj_len = obj_tlen;
1083                 while(total_subobj_len > 0) {
1084                     subobj_len  = EXTRACT_16BITS(obj_tptr);
1085                     subobj_type = (EXTRACT_16BITS(obj_tptr+2))>>8;
1086                     af = (EXTRACT_16BITS(obj_tptr+2))&0x00FF;
1087
1088                     printf("%s  Subobject Type: %s (%u), AF: %s (%u), length: %u",
1089                            ident,
1090                            tok2str(rsvp_obj_generalized_uni_values, "Unknown", subobj_type),
1091                            subobj_type,
1092                            tok2str(af_values, "Unknown", af), af,
1093                            subobj_len);
1094
1095                     switch(subobj_type) {
1096                     case RSVP_GEN_UNI_SUBOBJ_SOURCE_TNA_ADDRESS:
1097                     case RSVP_GEN_UNI_SUBOBJ_DESTINATION_TNA_ADDRESS:
1098
1099                         switch(af) {
1100                         case AFNUM_INET:
1101                             if (subobj_len < 8)
1102                                 return -1;
1103                             printf("%s    UNI IPv4 TNA address: %s",
1104                                    ident, ipaddr_string(obj_tptr+4));
1105                             break;
1106 #ifdef INET6
1107                         case AFNUM_INET6:
1108                             if (subobj_len < 20)
1109                                 return -1;
1110                             printf("%s    UNI IPv6 TNA address: %s",
1111                                    ident, ip6addr_string(obj_tptr+4));
1112                             break;
1113 #endif
1114                         case AFNUM_NSAP:
1115                             if (subobj_len) {
1116                                 /* unless we have a TLV parser lets just hexdump */
1117                                 hexdump=TRUE;
1118                             }
1119                             break;
1120                         }
1121                         break;
1122
1123                     case RSVP_GEN_UNI_SUBOBJ_DIVERSITY:
1124                         if (subobj_len) {
1125                             /* unless we have a TLV parser lets just hexdump */
1126                             hexdump=TRUE;
1127                         }
1128                         break;
1129
1130                     case RSVP_GEN_UNI_SUBOBJ_EGRESS_LABEL:
1131                         if (subobj_len < 16) {
1132                             return -1;
1133                         }
1134
1135                         printf("%s    U-bit: %x, Label type: %u, Logical port id: %u, Label: %u",
1136                                ident,
1137                                ((EXTRACT_32BITS(obj_tptr+4))>>31),
1138                                ((EXTRACT_32BITS(obj_tptr+4))&0xFF),
1139                                EXTRACT_32BITS(obj_tptr+8),
1140                                EXTRACT_32BITS(obj_tptr+12));
1141                         break;
1142
1143                     case RSVP_GEN_UNI_SUBOBJ_SERVICE_LEVEL:
1144                         if (subobj_len < 8) {
1145                             return -1;
1146                         }
1147
1148                         printf("%s    Service level: %u",
1149                                ident, (EXTRACT_32BITS(obj_tptr+4))>>24);
1150                         break;
1151
1152                     default:
1153                         hexdump=TRUE;
1154                         break;
1155                     }
1156                     total_subobj_len-=subobj_len;
1157                     obj_tptr+=subobj_len;
1158                     obj_tlen+=subobj_len;
1159                 }
1160
1161                 if (total_subobj_len) {
1162                     /* unless we have a TLV parser lets just hexdump */
1163                     hexdump=TRUE;
1164                 }
1165                 break;
1166
1167             default:
1168                 hexdump=TRUE;
1169             }
1170             break;
1171
1172         case RSVP_OBJ_RSVP_HOP:
1173             switch(rsvp_obj_ctype) {
1174             case RSVP_CTYPE_3: /* fall through - FIXME add TLV parser */
1175             case RSVP_CTYPE_IPV4:
1176                 if (obj_tlen < 8)
1177                     return-1;
1178                 printf("%s  Previous/Next Interface: %s, Logical Interface Handle: 0x%08x",
1179                        ident,
1180                        ipaddr_string(obj_tptr),
1181                        EXTRACT_32BITS(obj_tptr+4));
1182                 obj_tlen-=8;
1183                 obj_tptr+=8;
1184                 if (obj_tlen)
1185                     hexdump=TRUE; /* unless we have a TLV parser lets just hexdump */
1186                 break;
1187 #ifdef INET6
1188             case RSVP_CTYPE_4: /* fall through - FIXME add TLV parser */
1189             case RSVP_CTYPE_IPV6:
1190                 if (obj_tlen < 20)
1191                     return-1;
1192                 printf("%s  Previous/Next Interface: %s, Logical Interface Handle: 0x%08x",
1193                        ident,
1194                        ip6addr_string(obj_tptr),
1195                        EXTRACT_32BITS(obj_tptr+16));
1196                 obj_tlen-=20;
1197                 obj_tptr+=20;
1198                 hexdump=TRUE; /* unless we have a TLV parser lets just hexdump */
1199                 break;
1200 #endif
1201             default:
1202                 hexdump=TRUE;
1203             }
1204             break;
1205
1206         case RSVP_OBJ_TIME_VALUES:
1207             switch(rsvp_obj_ctype) {
1208             case RSVP_CTYPE_1:
1209                 if (obj_tlen < 4)
1210                     return-1;
1211                 printf("%s  Refresh Period: %ums",
1212                        ident,
1213                        EXTRACT_32BITS(obj_tptr));
1214                 obj_tlen-=4;
1215                 obj_tptr+=4;
1216                 break;
1217             default:
1218                 hexdump=TRUE;
1219             }
1220             break;
1221
1222         /* those three objects do share the same semantics */
1223         case RSVP_OBJ_SENDER_TSPEC:
1224         case RSVP_OBJ_ADSPEC:
1225         case RSVP_OBJ_FLOWSPEC:
1226             switch(rsvp_obj_ctype) {
1227             case RSVP_CTYPE_2:
1228                 if (obj_tlen < 4)
1229                     return-1;
1230                 printf("%s  Msg-Version: %u, length: %u",
1231                        ident,
1232                        (*obj_tptr & 0xf0) >> 4,
1233                        EXTRACT_16BITS(obj_tptr+2)<<2);
1234                 obj_tptr+=4; /* get to the start of the service header */
1235                 obj_tlen-=4;
1236
1237                 while (obj_tlen >= 4) {
1238                     intserv_serv_tlen=EXTRACT_16BITS(obj_tptr+2)<<2;
1239                     printf("%s  Service Type: %s (%u), break bit %s set, Service length: %u",
1240                            ident,
1241                            tok2str(rsvp_intserv_service_type_values,"unknown",*(obj_tptr)),
1242                            *(obj_tptr),
1243                            (*(obj_tptr+1)&0x80) ? "" : "not",
1244                            intserv_serv_tlen);
1245                     
1246                     obj_tptr+=4; /* get to the start of the parameter list */
1247                     obj_tlen-=4;
1248
1249                     while (intserv_serv_tlen>=4) {
1250                         processed = rsvp_intserv_print(obj_tptr, obj_tlen);
1251                         if (processed == 0)
1252                             break;
1253                         obj_tlen-=processed;
1254                         intserv_serv_tlen-=processed;
1255                         obj_tptr+=processed;
1256                     }
1257                 }
1258                 break;
1259             default:
1260                 hexdump=TRUE;
1261             }
1262             break;
1263
1264         case RSVP_OBJ_FILTERSPEC:
1265             switch(rsvp_obj_ctype) {
1266             case RSVP_CTYPE_IPV4:
1267                 if (obj_tlen < 8)
1268                     return-1;
1269                 printf("%s  Source Address: %s, Source Port: %u",
1270                        ident,
1271                        ipaddr_string(obj_tptr),
1272                        EXTRACT_16BITS(obj_tptr+6));
1273                 obj_tlen-=8;
1274                 obj_tptr+=8;
1275                 break;
1276 #ifdef INET6
1277             case RSVP_CTYPE_IPV6:
1278                 if (obj_tlen < 20)
1279                     return-1;
1280                 printf("%s  Source Address: %s, Source Port: %u",
1281                        ident,
1282                        ip6addr_string(obj_tptr),
1283                        EXTRACT_16BITS(obj_tptr+18));
1284                 obj_tlen-=20;
1285                 obj_tptr+=20;
1286                 break;
1287             case RSVP_CTYPE_3:
1288                 if (obj_tlen < 20)
1289                     return-1;
1290                 printf("%s  Source Address: %s, Flow Label: %u",
1291                        ident,
1292                        ip6addr_string(obj_tptr),
1293                        EXTRACT_24BITS(obj_tptr+17));
1294                 obj_tlen-=20;
1295                 obj_tptr+=20;
1296                 break;
1297             case RSVP_CTYPE_TUNNEL_IPV6:
1298                 if (obj_tlen < 20)
1299                     return-1;
1300                 printf("%s  Source Address: %s, LSP-ID: 0x%04x",
1301                        ident,
1302                        ipaddr_string(obj_tptr),
1303                        EXTRACT_16BITS(obj_tptr+18));
1304                 obj_tlen-=20;
1305                 obj_tptr+=20;
1306                 break;
1307 #endif
1308             case RSVP_CTYPE_TUNNEL_IPV4:
1309                 if (obj_tlen < 8)
1310                     return-1;
1311                 printf("%s  Source Address: %s, LSP-ID: 0x%04x",
1312                        ident,
1313                        ipaddr_string(obj_tptr),
1314                        EXTRACT_16BITS(obj_tptr+6));
1315                 obj_tlen-=8;
1316                 obj_tptr+=8;
1317                 break;
1318             default:
1319                 hexdump=TRUE;
1320             }
1321             break;
1322
1323         case RSVP_OBJ_FASTREROUTE:
1324             /* the differences between c-type 1 and 7 are minor */
1325             obj_ptr.rsvp_obj_frr = (const struct rsvp_obj_frr_t *)obj_tptr;
1326             bw.i = EXTRACT_32BITS(obj_ptr.rsvp_obj_frr->bandwidth);
1327
1328             switch(rsvp_obj_ctype) {
1329             case RSVP_CTYPE_1: /* new style */
1330                 if (obj_tlen < sizeof(struct rsvp_obj_frr_t))
1331                     return-1;
1332                 printf("%s  Setup Priority: %u, Holding Priority: %u, Hop-limit: %u, Bandwidth: %.10g Mbps",
1333                        ident,
1334                        (int)obj_ptr.rsvp_obj_frr->setup_prio,
1335                        (int)obj_ptr.rsvp_obj_frr->hold_prio,
1336                        (int)obj_ptr.rsvp_obj_frr->hop_limit,
1337                         bw.f*8/1000000);              
1338                 printf("%s  Include-any: 0x%08x, Exclude-any: 0x%08x, Include-all: 0x%08x",
1339                        ident,
1340                        EXTRACT_32BITS(obj_ptr.rsvp_obj_frr->include_any),
1341                        EXTRACT_32BITS(obj_ptr.rsvp_obj_frr->exclude_any),
1342                        EXTRACT_32BITS(obj_ptr.rsvp_obj_frr->include_all));
1343                 obj_tlen-=sizeof(struct rsvp_obj_frr_t);
1344                 obj_tptr+=sizeof(struct rsvp_obj_frr_t);
1345                 break;
1346
1347             case RSVP_CTYPE_TUNNEL_IPV4: /* old style */
1348                 if (obj_tlen < 16)
1349                     return-1;
1350                 printf("%s  Setup Priority: %u, Holding Priority: %u, Hop-limit: %u, Bandwidth: %.10g Mbps",
1351                        ident,
1352                        (int)obj_ptr.rsvp_obj_frr->setup_prio,
1353                        (int)obj_ptr.rsvp_obj_frr->hold_prio,
1354                        (int)obj_ptr.rsvp_obj_frr->hop_limit,
1355                         bw.f*8/1000000);              
1356                 printf("%s  Include Colors: 0x%08x, Exclude Colors: 0x%08x",
1357                        ident,
1358                        EXTRACT_32BITS(obj_ptr.rsvp_obj_frr->include_any),
1359                        EXTRACT_32BITS(obj_ptr.rsvp_obj_frr->exclude_any));
1360                 obj_tlen-=16;
1361                 obj_tptr+=16;
1362                 break;
1363
1364             default:
1365                 hexdump=TRUE;
1366             }
1367             break;
1368
1369         case RSVP_OBJ_DETOUR:
1370             switch(rsvp_obj_ctype) {
1371             case RSVP_CTYPE_TUNNEL_IPV4:
1372                 while(obj_tlen >= 8) {
1373                     printf("%s  PLR-ID: %s, Avoid-Node-ID: %s",
1374                            ident,
1375                            ipaddr_string(obj_tptr),
1376                            ipaddr_string(obj_tptr+4));              
1377                     obj_tlen-=8;
1378                     obj_tptr+=8;
1379                 }
1380                 break;
1381             default:
1382                 hexdump=TRUE;
1383             }
1384             break;
1385
1386         case RSVP_OBJ_CLASSTYPE:
1387         case RSVP_OBJ_CLASSTYPE_OLD: /* fall through */
1388             switch(rsvp_obj_ctype) {
1389             case RSVP_CTYPE_1:
1390                 printf("%s  CT: %u",
1391                        ident,
1392                        EXTRACT_32BITS(obj_tptr)&0x7);              
1393                 obj_tlen-=4;
1394                 obj_tptr+=4;
1395                 break;
1396             default:
1397                 hexdump=TRUE;
1398             }
1399             break;
1400
1401         case RSVP_OBJ_ERROR_SPEC:
1402             switch(rsvp_obj_ctype) {
1403             case RSVP_CTYPE_3: /* fall through - FIXME add TLV parser */
1404             case RSVP_CTYPE_IPV4:
1405                 if (obj_tlen < 8)
1406                     return-1;
1407                 error_code=*(obj_tptr+5);
1408                 error_value=EXTRACT_16BITS(obj_tptr+6);
1409                 printf("%s  Error Node Address: %s, Flags: [0x%02x]%s  Error Code: %s (%u)",
1410                        ident,
1411                        ipaddr_string(obj_tptr),
1412                        *(obj_tptr+4),
1413                        ident,
1414                        tok2str(rsvp_obj_error_code_values,"unknown",error_code),
1415                        error_code);
1416                 switch (error_code) {
1417                 case RSVP_OBJ_ERROR_SPEC_CODE_ROUTING:
1418                     printf(", Error Value: %s (%u)",
1419                            tok2str(rsvp_obj_error_code_routing_values,"unknown",error_value),
1420                            error_value);
1421                     break;
1422                 case RSVP_OBJ_ERROR_SPEC_CODE_DIFFSERV_TE: /* fall through */
1423                 case RSVP_OBJ_ERROR_SPEC_CODE_DIFFSERV_TE_OLD:
1424                     printf(", Error Value: %s (%u)",
1425                            tok2str(rsvp_obj_error_code_diffserv_te_values,"unknown",error_value),
1426                            error_value);
1427                     break;
1428                 default:
1429                     printf(", Unknown Error Value (%u)", error_value);
1430                     break;
1431                 }
1432                 obj_tlen-=8;
1433                 obj_tptr+=8;
1434                 break;
1435 #ifdef INET6
1436             case RSVP_CTYPE_4: /* fall through - FIXME add TLV parser */
1437             case RSVP_CTYPE_IPV6:
1438                 if (obj_tlen < 20)
1439                     return-1;
1440                 error_code=*(obj_tptr+17);
1441                 error_value=EXTRACT_16BITS(obj_tptr+18);
1442                 printf("%s  Error Node Address: %s, Flags: [0x%02x]%s  Error Code: %s (%u)",
1443                        ident,
1444                        ip6addr_string(obj_tptr),
1445                        *(obj_tptr+16),
1446                        ident,
1447                        tok2str(rsvp_obj_error_code_values,"unknown",error_code),
1448                        error_code);
1449
1450                 switch (error_code) {
1451                 case RSVP_OBJ_ERROR_SPEC_CODE_ROUTING:
1452                     printf(", Error Value: %s (%u)",
1453                            tok2str(rsvp_obj_error_code_routing_values,"unknown",error_value),
1454                            error_value);
1455                     break;
1456                 default:
1457                     break;
1458                 }
1459                 obj_tlen-=20;
1460                 obj_tptr+=20;
1461                 break;
1462 #endif
1463             default:
1464                 hexdump=TRUE;
1465             }
1466             break;
1467
1468         case RSVP_OBJ_PROPERTIES:
1469             switch(rsvp_obj_ctype) {
1470             case RSVP_CTYPE_1:
1471                 if (obj_tlen < 4)
1472                     return-1;
1473                 padbytes = EXTRACT_16BITS(obj_tptr+2);
1474                 printf("%s  TLV count: %u, padding bytes: %u",
1475                        ident,
1476                        EXTRACT_16BITS(obj_tptr),
1477                        padbytes);
1478                 obj_tlen-=4;
1479                 obj_tptr+=4;
1480                 /* loop through as long there is anything longer than the TLV header (2) */
1481                 while(obj_tlen >= 2 + padbytes) {
1482                     printf("%s    %s TLV (0x%02x), length: %u", /* length includes header */
1483                            ident,
1484                            tok2str(rsvp_obj_prop_tlv_values,"unknown",*obj_tptr),
1485                            *obj_tptr,
1486                            *(obj_tptr+1));
1487                     if (obj_tlen < *(obj_tptr+1))
1488                         return-1;
1489                     if (*(obj_tptr+1) < 2)
1490                         return -1;
1491                     print_unknown_data(obj_tptr+2,"\n\t\t",*(obj_tptr+1)-2);
1492                     obj_tlen-=*(obj_tptr+1);
1493                     obj_tptr+=*(obj_tptr+1);
1494                 }
1495                 break;
1496             default:
1497                 hexdump=TRUE;
1498             }
1499             break;
1500
1501         case RSVP_OBJ_MESSAGE_ID:     /* fall through */
1502         case RSVP_OBJ_MESSAGE_ID_ACK: /* fall through */
1503         case RSVP_OBJ_MESSAGE_ID_LIST:
1504             switch(rsvp_obj_ctype) {
1505             case RSVP_CTYPE_1:
1506             case RSVP_CTYPE_2:
1507                 if (obj_tlen < 8)
1508                     return-1;
1509                 printf("%s  Flags [0x%02x], epoch: %u",
1510                        ident,
1511                        *obj_tptr,
1512                        EXTRACT_24BITS(obj_tptr+1));
1513                 obj_tlen-=4;
1514                 obj_tptr+=4;
1515                 /* loop through as long there are no messages left */
1516                 while(obj_tlen >= 4) {
1517                     printf("%s    Message-ID 0x%08x (%u)",
1518                            ident,
1519                            EXTRACT_32BITS(obj_tptr),
1520                            EXTRACT_32BITS(obj_tptr));
1521                     obj_tlen-=4;
1522                     obj_tptr+=4;
1523                 }
1524                 break;
1525             default:
1526                 hexdump=TRUE;
1527             }
1528             break;
1529
1530         case RSVP_OBJ_INTEGRITY:
1531             switch(rsvp_obj_ctype) {
1532             case RSVP_CTYPE_1:
1533                 if (obj_tlen < sizeof(struct rsvp_obj_integrity_t))
1534                     return-1;
1535                 obj_ptr.rsvp_obj_integrity = (const struct rsvp_obj_integrity_t *)obj_tptr;
1536                 printf("%s  Key-ID 0x%04x%08x, Sequence 0x%08x%08x, Flags [%s]",
1537                        ident,
1538                        EXTRACT_16BITS(obj_ptr.rsvp_obj_integrity->key_id),
1539                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->key_id+2),
1540                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->sequence),
1541                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->sequence+4),
1542                        bittok2str(rsvp_obj_integrity_flag_values,
1543                                   "none",
1544                                   obj_ptr.rsvp_obj_integrity->flags));
1545                 printf("%s  MD5-sum 0x%08x%08x%08x%08x (unverified)",
1546                        ident,
1547                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->digest),
1548                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->digest+4),
1549                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->digest+8),
1550                        EXTRACT_32BITS(obj_ptr.rsvp_obj_integrity->digest+12));
1551                 obj_tlen+=sizeof(struct rsvp_obj_integrity_t);
1552                 obj_tptr+=sizeof(struct rsvp_obj_integrity_t);
1553                 break;
1554             default:
1555                 hexdump=TRUE;
1556             }
1557             break;           
1558
1559         case RSVP_OBJ_ADMIN_STATUS:
1560             switch(rsvp_obj_ctype) {
1561             case RSVP_CTYPE_1: 
1562                 if (obj_tlen < 4)
1563                     return-1;
1564                 printf("%s  Flags [%s]", ident,
1565                        bittok2str(rsvp_obj_admin_status_flag_values, "none",
1566                                   EXTRACT_32BITS(obj_tptr)));
1567                 obj_tlen-=4;
1568                 obj_tptr+=4;
1569                 break;
1570             default:
1571                 hexdump=TRUE;
1572             }
1573             break;
1574
1575         case RSVP_OBJ_LABEL_SET:
1576             switch(rsvp_obj_ctype) {
1577             case RSVP_CTYPE_1: 
1578                 if (obj_tlen < 4)
1579                     return-1;
1580
1581                 u_int action, subchannel;
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 }