xref: /freebsd/contrib/tcpdump/print-ldp.c (revision 2a63c3be158216222d89a073dcbd6a72ee4aab5a)
1 /*
2  * Redistribution and use in source and binary forms, with or without
3  * modification, are permitted provided that: (1) source code
4  * distributions retain the above copyright notice and this paragraph
5  * in its entirety, and (2) distributions including binary code include
6  * the above copyright notice and this paragraph in its entirety in
7  * the documentation or other materials provided with the distribution.
8  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND
9  * WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT
10  * LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
11  * FOR A PARTICULAR PURPOSE.
12  *
13  * Original code by Hannes Gredler (hannes@gredler.at)
14  *  and Steinar Haug (sthaug@nethelp.no)
15  */
16 
17 /* \summary: Label Distribution Protocol (LDP) printer */
18 
19 #ifdef HAVE_CONFIG_H
20 #include <config.h>
21 #endif
22 
23 #include "netdissect-stdinc.h"
24 
25 #include "netdissect.h"
26 #include "extract.h"
27 #include "addrtoname.h"
28 
29 #include "l2vpn.h"
30 #include "af.h"
31 
32 
33 /*
34  * ldp common header
35  *
36  *  0                   1                   2                   3
37  *  0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1
38  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
39  * |  Version                      |         PDU Length            |
40  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
41  * |                         LDP Identifier                        |
42  * +                               +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
43  * |                               |
44  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
45  *
46  */
47 
48 struct ldp_common_header {
49     nd_uint16_t version;
50     nd_uint16_t pdu_length;
51     nd_ipv4     lsr_id;
52     nd_uint16_t label_space;
53 };
54 
55 #define LDP_VERSION 1
56 
57 /*
58  * ldp message header
59  *
60  *  0                   1                   2                   3
61  *  0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1
62  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
63  * |U|   Message Type              |      Message Length           |
64  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
65  * |                     Message ID                                |
66  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
67  * |                                                               |
68  * +                                                               +
69  * |                     Mandatory Parameters                      |
70  * +                                                               +
71  * |                                                               |
72  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
73  * |                                                               |
74  * +                                                               +
75  * |                     Optional Parameters                       |
76  * +                                                               +
77  * |                                                               |
78  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
79  */
80 
81 struct ldp_msg_header {
82     nd_uint16_t type;
83     nd_uint16_t length;
84     nd_uint32_t id;
85 };
86 
87 #define	LDP_MASK_MSG_TYPE(x)  ((x)&0x7fff)
88 #define	LDP_MASK_U_BIT(x)     ((x)&0x8000)
89 
90 #define	LDP_MSG_NOTIF                0x0001
91 #define	LDP_MSG_HELLO                0x0100
92 #define	LDP_MSG_INIT                 0x0200
93 #define	LDP_MSG_KEEPALIVE            0x0201
94 #define	LDP_MSG_ADDRESS              0x0300
95 #define	LDP_MSG_ADDRESS_WITHDRAW     0x0301
96 #define	LDP_MSG_LABEL_MAPPING        0x0400
97 #define	LDP_MSG_LABEL_REQUEST        0x0401
98 #define	LDP_MSG_LABEL_WITHDRAW       0x0402
99 #define	LDP_MSG_LABEL_RELEASE        0x0403
100 #define	LDP_MSG_LABEL_ABORT_REQUEST  0x0404
101 
102 #define	LDP_VENDOR_PRIVATE_MIN       0x3e00
103 #define	LDP_VENDOR_PRIVATE_MAX       0x3eff
104 #define	LDP_EXPERIMENTAL_MIN         0x3f00
105 #define	LDP_EXPERIMENTAL_MAX         0x3fff
106 
107 static const struct tok ldp_msg_values[] = {
108     { LDP_MSG_NOTIF,	             "Notification" },
109     { LDP_MSG_HELLO,	             "Hello" },
110     { LDP_MSG_INIT,	             "Initialization" },
111     { LDP_MSG_KEEPALIVE,             "Keepalive" },
112     { LDP_MSG_ADDRESS,	             "Address" },
113     { LDP_MSG_ADDRESS_WITHDRAW,	     "Address Withdraw" },
114     { LDP_MSG_LABEL_MAPPING,	     "Label Mapping" },
115     { LDP_MSG_LABEL_REQUEST,	     "Label Request" },
116     { LDP_MSG_LABEL_WITHDRAW,	     "Label Withdraw" },
117     { LDP_MSG_LABEL_RELEASE,	     "Label Release" },
118     { LDP_MSG_LABEL_ABORT_REQUEST,   "Label Abort Request" },
119     { 0, NULL}
120 };
121 
122 #define	LDP_MASK_TLV_TYPE(x)  ((x)&0x3fff)
123 #define	LDP_MASK_F_BIT(x) ((x)&0x4000)
124 
125 #define	LDP_TLV_FEC                  0x0100
126 #define	LDP_TLV_ADDRESS_LIST         0x0101
127 #define LDP_TLV_ADDRESS_LIST_AFNUM_LEN 2
128 #define	LDP_TLV_HOP_COUNT            0x0103
129 #define	LDP_TLV_PATH_VECTOR          0x0104
130 #define	LDP_TLV_GENERIC_LABEL        0x0200
131 #define	LDP_TLV_ATM_LABEL            0x0201
132 #define	LDP_TLV_FR_LABEL             0x0202
133 #define	LDP_TLV_STATUS               0x0300
134 #define	LDP_TLV_EXTD_STATUS          0x0301
135 #define	LDP_TLV_RETURNED_PDU         0x0302
136 #define	LDP_TLV_RETURNED_MSG         0x0303
137 #define	LDP_TLV_COMMON_HELLO         0x0400
138 #define	LDP_TLV_IPV4_TRANSPORT_ADDR  0x0401
139 #define	LDP_TLV_CONFIG_SEQ_NUMBER    0x0402
140 #define	LDP_TLV_IPV6_TRANSPORT_ADDR  0x0403
141 #define	LDP_TLV_COMMON_SESSION       0x0500
142 #define	LDP_TLV_ATM_SESSION_PARM     0x0501
143 #define	LDP_TLV_FR_SESSION_PARM      0x0502
144 #define LDP_TLV_FT_SESSION	     0x0503
145 #define	LDP_TLV_LABEL_REQUEST_MSG_ID 0x0600
146 #define LDP_TLV_MTU                  0x0601 /* rfc 3988 */
147 
148 static const struct tok ldp_tlv_values[] = {
149     { LDP_TLV_FEC,	             "FEC" },
150     { LDP_TLV_ADDRESS_LIST,          "Address List" },
151     { LDP_TLV_HOP_COUNT,             "Hop Count" },
152     { LDP_TLV_PATH_VECTOR,           "Path Vector" },
153     { LDP_TLV_GENERIC_LABEL,         "Generic Label" },
154     { LDP_TLV_ATM_LABEL,             "ATM Label" },
155     { LDP_TLV_FR_LABEL,              "Frame-Relay Label" },
156     { LDP_TLV_STATUS,                "Status" },
157     { LDP_TLV_EXTD_STATUS,           "Extended Status" },
158     { LDP_TLV_RETURNED_PDU,          "Returned PDU" },
159     { LDP_TLV_RETURNED_MSG,          "Returned Message" },
160     { LDP_TLV_COMMON_HELLO,          "Common Hello Parameters" },
161     { LDP_TLV_IPV4_TRANSPORT_ADDR,   "IPv4 Transport Address" },
162     { LDP_TLV_CONFIG_SEQ_NUMBER,     "Configuration Sequence Number" },
163     { LDP_TLV_IPV6_TRANSPORT_ADDR,   "IPv6 Transport Address" },
164     { LDP_TLV_COMMON_SESSION,        "Common Session Parameters" },
165     { LDP_TLV_ATM_SESSION_PARM,      "ATM Session Parameters" },
166     { LDP_TLV_FR_SESSION_PARM,       "Frame-Relay Session Parameters" },
167     { LDP_TLV_FT_SESSION,            "Fault-Tolerant Session Parameters" },
168     { LDP_TLV_LABEL_REQUEST_MSG_ID,  "Label Request Message ID" },
169     { LDP_TLV_MTU,                   "MTU" },
170     { 0, NULL}
171 };
172 
173 #define LDP_FEC_WILDCARD	0x01
174 #define LDP_FEC_PREFIX		0x02
175 #define LDP_FEC_HOSTADDRESS	0x03
176 /* From RFC 4906; should probably be updated to RFC 4447 (e.g., VC -> PW) */
177 #define LDP_FEC_MARTINI_VC	0x80
178 
179 static const struct tok ldp_fec_values[] = {
180     { LDP_FEC_WILDCARD,		"Wildcard" },
181     { LDP_FEC_PREFIX,		"Prefix" },
182     { LDP_FEC_HOSTADDRESS,	"Host address" },
183     { LDP_FEC_MARTINI_VC,	"Martini VC" },
184     { 0, NULL}
185 };
186 
187 #define LDP_FEC_MARTINI_IFPARM_MTU  0x01
188 #define LDP_FEC_MARTINI_IFPARM_DESC 0x03
189 #define LDP_FEC_MARTINI_IFPARM_VCCV 0x0c
190 
191 static const struct tok ldp_fec_martini_ifparm_values[] = {
192     { LDP_FEC_MARTINI_IFPARM_MTU, "MTU" },
193     { LDP_FEC_MARTINI_IFPARM_DESC, "Description" },
194     { LDP_FEC_MARTINI_IFPARM_VCCV, "VCCV" },
195     { 0, NULL}
196 };
197 
198 /* draft-ietf-pwe3-vccv-04.txt */
199 static const struct tok ldp_fec_martini_ifparm_vccv_cc_values[] = {
200     { 0x01, "PWE3 control word" },
201     { 0x02, "MPLS Router Alert Label" },
202     { 0x04, "MPLS inner label TTL = 1" },
203     { 0, NULL}
204 };
205 
206 /* draft-ietf-pwe3-vccv-04.txt */
207 static const struct tok ldp_fec_martini_ifparm_vccv_cv_values[] = {
208     { 0x01, "ICMP Ping" },
209     { 0x02, "LSP Ping" },
210     { 0x04, "BFD" },
211     { 0, NULL}
212 };
213 
214 static u_int ldp_pdu_print(netdissect_options *, const u_char *);
215 
216 /*
217  * ldp tlv header
218  *
219  *  0                   1                   2                   3
220  *  0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1
221  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
222  * |U|F|        Type               |            Length             |
223  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
224  * |                                                               |
225  * |                             Value                             |
226  * ~                                                               ~
227  * |                                                               |
228  * |                               +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
229  * |                               |
230  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
231  */
232 
233 #define TLV_TCHECK(minlen) \
234     if (tlv_tlen < minlen) { \
235         ND_PRINT(" [tlv length %u < %u]", tlv_tlen, minlen); \
236         nd_print_invalid(ndo); \
237         goto invalid; \
238     }
239 
240 static u_int
241 ldp_tlv_print(netdissect_options *ndo,
242               const u_char *tptr,
243               u_int msg_tlen)
244 {
245     struct ldp_tlv_header {
246         nd_uint16_t type;
247         nd_uint16_t length;
248     };
249 
250     const struct ldp_tlv_header *ldp_tlv_header;
251     u_short tlv_type,tlv_len,tlv_tlen,af,ft_flags;
252     u_char fec_type;
253     u_int ui,vc_info_len, vc_info_tlv_type, vc_info_tlv_len,idx;
254     char buf[100];
255     int i;
256 
257     ldp_tlv_header = (const struct ldp_tlv_header *)tptr;
258     ND_TCHECK_SIZE(ldp_tlv_header);
259     tlv_len=GET_BE_U_2(ldp_tlv_header->length);
260     if (tlv_len + 4U > msg_tlen) {
261         ND_PRINT("\n\t\t TLV contents go past end of message");
262         return 0;
263     }
264     tlv_tlen=tlv_len;
265     tlv_type=LDP_MASK_TLV_TYPE(GET_BE_U_2(ldp_tlv_header->type));
266 
267     /* FIXME vendor private / experimental check */
268     ND_PRINT("\n\t    %s TLV (0x%04x), length: %u, Flags: [%s and %s forward if unknown]",
269            tok2str(ldp_tlv_values,
270                    "Unknown",
271                    tlv_type),
272            tlv_type,
273            tlv_len,
274            LDP_MASK_U_BIT(GET_BE_U_2(ldp_tlv_header->type)) ? "continue processing" : "ignore",
275            LDP_MASK_F_BIT(GET_BE_U_2(ldp_tlv_header->type)) ? "do" : "don't");
276 
277     tptr+=sizeof(struct ldp_tlv_header);
278 
279     switch(tlv_type) {
280 
281     case LDP_TLV_COMMON_HELLO:
282         TLV_TCHECK(4);
283         ND_PRINT("\n\t      Hold Time: %us, Flags: [%s Hello%s]",
284                GET_BE_U_2(tptr),
285                (GET_BE_U_2(tptr + 2)&0x8000) ? "Targeted" : "Link",
286                (GET_BE_U_2(tptr + 2)&0x4000) ? ", Request for targeted Hellos" : "");
287         break;
288 
289     case LDP_TLV_IPV4_TRANSPORT_ADDR:
290         TLV_TCHECK(4);
291         ND_PRINT("\n\t      IPv4 Transport Address: %s", GET_IPADDR_STRING(tptr));
292         break;
293     case LDP_TLV_IPV6_TRANSPORT_ADDR:
294         TLV_TCHECK(16);
295         ND_PRINT("\n\t      IPv6 Transport Address: %s", GET_IP6ADDR_STRING(tptr));
296         break;
297     case LDP_TLV_CONFIG_SEQ_NUMBER:
298         TLV_TCHECK(4);
299         ND_PRINT("\n\t      Sequence Number: %u", GET_BE_U_4(tptr));
300         break;
301 
302     case LDP_TLV_ADDRESS_LIST:
303         TLV_TCHECK(LDP_TLV_ADDRESS_LIST_AFNUM_LEN);
304 	af = GET_BE_U_2(tptr);
305 	tptr+=LDP_TLV_ADDRESS_LIST_AFNUM_LEN;
306         tlv_tlen -= LDP_TLV_ADDRESS_LIST_AFNUM_LEN;
307 	ND_PRINT("\n\t      Address Family: %s, addresses",
308                tok2str(af_values, "Unknown (%u)", af));
309         switch (af) {
310         case AFNUM_INET:
311 	    while(tlv_tlen >= sizeof(nd_ipv4)) {
312 		ND_PRINT(" %s", GET_IPADDR_STRING(tptr));
313 		tlv_tlen-=sizeof(nd_ipv4);
314 		tptr+=sizeof(nd_ipv4);
315 	    }
316             break;
317         case AFNUM_INET6:
318 	    while(tlv_tlen >= sizeof(nd_ipv6)) {
319 		ND_PRINT(" %s", GET_IP6ADDR_STRING(tptr));
320 		tlv_tlen-=sizeof(nd_ipv6);
321 		tptr+=sizeof(nd_ipv6);
322 	    }
323             break;
324         default:
325             /* unknown AF */
326             break;
327         }
328 	break;
329 
330     case LDP_TLV_COMMON_SESSION:
331 	TLV_TCHECK(8);
332 	ND_PRINT("\n\t      Version: %u, Keepalive: %us, Flags: [Downstream %s, Loop Detection %s]",
333 	       GET_BE_U_2(tptr), GET_BE_U_2(tptr + 2),
334 	       (GET_BE_U_2(tptr + 6)&0x8000) ? "On Demand" : "Unsolicited",
335 	       (GET_BE_U_2(tptr + 6)&0x4000) ? "Enabled" : "Disabled"
336 	       );
337 	break;
338 
339     case LDP_TLV_FEC:
340         TLV_TCHECK(1);
341         fec_type = GET_U_1(tptr);
342 	ND_PRINT("\n\t      %s FEC (0x%02x)",
343 	       tok2str(ldp_fec_values, "Unknown", fec_type),
344 	       fec_type);
345 
346 	tptr+=1;
347 	tlv_tlen-=1;
348 	switch(fec_type) {
349 
350 	case LDP_FEC_WILDCARD:
351 	    break;
352 	case LDP_FEC_PREFIX:
353 	    TLV_TCHECK(2);
354 	    af = GET_BE_U_2(tptr);
355 	    tptr+=2;
356 	    tlv_tlen-=2;
357 	    if (af == AFNUM_INET) {
358 		i=decode_prefix4(ndo, tptr, tlv_tlen, buf, sizeof(buf));
359 		if (i == -2)
360 		    goto trunc;
361 		if (i == -3)
362 		    ND_PRINT(": IPv4 prefix (goes past end of TLV)");
363 		else if (i == -1)
364 		    ND_PRINT(": IPv4 prefix (invalid length)");
365 		else
366 		    ND_PRINT(": IPv4 prefix %s", buf);
367 	    }
368 	    else if (af == AFNUM_INET6) {
369 		i=decode_prefix6(ndo, tptr, tlv_tlen, buf, sizeof(buf));
370 		if (i == -2)
371 		    goto trunc;
372 		if (i == -3)
373 		    ND_PRINT(": IPv4 prefix (goes past end of TLV)");
374 		else if (i == -1)
375 		    ND_PRINT(": IPv6 prefix (invalid length)");
376 		else
377 		    ND_PRINT(": IPv6 prefix %s", buf);
378 	    }
379 	    else
380 		ND_PRINT(": Address family %u prefix", af);
381 	    break;
382 	case LDP_FEC_HOSTADDRESS:
383 	    break;
384 	case LDP_FEC_MARTINI_VC:
385             /*
386              * We assume the type was supposed to be one of the MPLS
387              * Pseudowire Types.
388              */
389             TLV_TCHECK(7);
390             vc_info_len = GET_U_1(tptr + 2);
391 
392             /*
393 	     * According to RFC 4908, the VC info Length field can be zero,
394 	     * in which case not only are there no interface parameters,
395 	     * there's no VC ID.
396 	     */
397             if (vc_info_len == 0) {
398                 ND_PRINT(": %s, %scontrol word, group-ID %u, VC-info-length: %u",
399                        tok2str(mpls_pw_types_values, "Unknown", GET_BE_U_2(tptr)&0x7fff),
400                        GET_BE_U_2(tptr)&0x8000 ? "" : "no ",
401                        GET_BE_U_4(tptr + 3),
402                        vc_info_len);
403                 break;
404             }
405 
406             /* Make sure we have the VC ID as well */
407             TLV_TCHECK(11);
408 	    ND_PRINT(": %s, %scontrol word, group-ID %u, VC-ID %u, VC-info-length: %u",
409 		   tok2str(mpls_pw_types_values, "Unknown", GET_BE_U_2(tptr)&0x7fff),
410 		   GET_BE_U_2(tptr)&0x8000 ? "" : "no ",
411 		   GET_BE_U_4(tptr + 3),
412 		   GET_BE_U_4(tptr + 7),
413 		   vc_info_len);
414             if (vc_info_len < 4) {
415                 /* minimum 4, for the VC ID */
416                 ND_PRINT(" (invalid, < 4");
417                 return(tlv_len+4); /* Type & Length fields not included */
418 	    }
419             vc_info_len -= 4; /* subtract out the VC ID, giving the length of the interface parameters */
420 
421             /* Skip past the fixed information and the VC ID */
422             tptr+=11;
423             tlv_tlen-=11;
424             TLV_TCHECK(vc_info_len);
425 
426             while (vc_info_len > 2) {
427                 vc_info_tlv_type = GET_U_1(tptr);
428                 vc_info_tlv_len = GET_U_1(tptr + 1);
429                 if (vc_info_tlv_len < 2)
430                     break;
431                 if (vc_info_len < vc_info_tlv_len)
432                     break;
433 
434                 ND_PRINT("\n\t\tInterface Parameter: %s (0x%02x), len %u",
435                        tok2str(ldp_fec_martini_ifparm_values,"Unknown",vc_info_tlv_type),
436                        vc_info_tlv_type,
437                        vc_info_tlv_len);
438 
439                 switch(vc_info_tlv_type) {
440                 case LDP_FEC_MARTINI_IFPARM_MTU:
441                     ND_PRINT(": %u", GET_BE_U_2(tptr + 2));
442                     break;
443 
444                 case LDP_FEC_MARTINI_IFPARM_DESC:
445                     ND_PRINT(": ");
446                     for (idx = 2; idx < vc_info_tlv_len; idx++)
447                         fn_print_char(ndo, GET_U_1(tptr + idx));
448                     break;
449 
450                 case LDP_FEC_MARTINI_IFPARM_VCCV:
451                     ND_PRINT("\n\t\t  Control Channels (0x%02x) = [%s]",
452                            GET_U_1((tptr + 2)),
453                            bittok2str(ldp_fec_martini_ifparm_vccv_cc_values, "none", GET_U_1((tptr + 2))));
454                     ND_PRINT("\n\t\t  CV Types (0x%02x) = [%s]",
455                            GET_U_1((tptr + 3)),
456                            bittok2str(ldp_fec_martini_ifparm_vccv_cv_values, "none", GET_U_1((tptr + 3))));
457                     break;
458 
459                 default:
460                     print_unknown_data(ndo, tptr+2, "\n\t\t  ", vc_info_tlv_len-2);
461                     break;
462                 }
463 
464                 vc_info_len -= vc_info_tlv_len;
465                 tptr += vc_info_tlv_len;
466             }
467 	    break;
468 	}
469 
470 	break;
471 
472     case LDP_TLV_GENERIC_LABEL:
473 	TLV_TCHECK(4);
474 	ND_PRINT("\n\t      Label: %u", GET_BE_U_4(tptr) & 0xfffff);
475 	break;
476 
477     case LDP_TLV_STATUS:
478 	TLV_TCHECK(8);
479 	ui = GET_BE_U_4(tptr);
480 	tptr+=4;
481 	ND_PRINT("\n\t      Status: 0x%02x, Flags: [%s and %s forward]",
482 	       ui&0x3fffffff,
483 	       ui&0x80000000 ? "Fatal error" : "Advisory Notification",
484 	       ui&0x40000000 ? "do" : "don't");
485 	ui = GET_BE_U_4(tptr);
486 	tptr+=4;
487 	if (ui)
488 	    ND_PRINT(", causing Message ID: 0x%08x", ui);
489 	break;
490 
491     case LDP_TLV_FT_SESSION:
492 	TLV_TCHECK(12);
493 	ft_flags = GET_BE_U_2(tptr);
494 	ND_PRINT("\n\t      Flags: [%sReconnect, %sSave State, %sAll-Label Protection, %s Checkpoint, %sRe-Learn State]",
495 	       ft_flags&0x8000 ? "" : "No ",
496 	       ft_flags&0x8 ? "" : "Don't ",
497 	       ft_flags&0x4 ? "" : "No ",
498 	       ft_flags&0x2 ? "Sequence Numbered Label" : "All Labels",
499 	       ft_flags&0x1 ? "" : "Don't ");
500 	/* 16 bits (FT Flags) + 16 bits (Reserved) */
501 	tptr+=4;
502 	ui = GET_BE_U_4(tptr);
503 	if (ui)
504 	    ND_PRINT(", Reconnect Timeout: %ums", ui);
505 	tptr+=4;
506 	ui = GET_BE_U_4(tptr);
507 	if (ui)
508 	    ND_PRINT(", Recovery Time: %ums", ui);
509 	break;
510 
511     case LDP_TLV_MTU:
512 	TLV_TCHECK(2);
513 	ND_PRINT("\n\t      MTU: %u", GET_BE_U_2(tptr));
514 	break;
515 
516 
517     /*
518      *  FIXME those are the defined TLVs that lack a decoder
519      *  you are welcome to contribute code ;-)
520      */
521 
522     case LDP_TLV_HOP_COUNT:
523     case LDP_TLV_PATH_VECTOR:
524     case LDP_TLV_ATM_LABEL:
525     case LDP_TLV_FR_LABEL:
526     case LDP_TLV_EXTD_STATUS:
527     case LDP_TLV_RETURNED_PDU:
528     case LDP_TLV_RETURNED_MSG:
529     case LDP_TLV_ATM_SESSION_PARM:
530     case LDP_TLV_FR_SESSION_PARM:
531     case LDP_TLV_LABEL_REQUEST_MSG_ID:
532 
533     default:
534         if (ndo->ndo_vflag <= 1)
535             print_unknown_data(ndo, tptr, "\n\t      ", tlv_tlen);
536         break;
537     }
538     return(tlv_len+4); /* Type & Length fields not included */
539 
540 trunc:
541     nd_trunc_longjmp(ndo);
542 
543 invalid:
544     return(tlv_len+4); /* Type & Length fields not included */
545 }
546 
547 void
548 ldp_print(netdissect_options *ndo,
549           const u_char *pptr, u_int len)
550 {
551     u_int processed;
552 
553     ndo->ndo_protocol = "ldp";
554     while (len > (sizeof(struct ldp_common_header) + sizeof(struct ldp_msg_header))) {
555         processed = ldp_pdu_print(ndo, pptr);
556         if (processed == 0)
557             return;
558         if (len < processed) {
559             ND_PRINT(" [remaining length %u < %u]", len, processed);
560             nd_print_invalid(ndo);
561             break;
562         }
563         len -= processed;
564         pptr += processed;
565     }
566 }
567 
568 static u_int
569 ldp_pdu_print(netdissect_options *ndo,
570               const u_char *pptr)
571 {
572     const struct ldp_common_header *ldp_com_header;
573     const struct ldp_msg_header *ldp_msg_header;
574     const u_char *tptr,*msg_tptr;
575     u_short tlen;
576     u_short pdu_len,msg_len,msg_type;
577     u_int msg_tlen;
578     int hexdump,processed;
579 
580     ldp_com_header = (const struct ldp_common_header *)pptr;
581     ND_TCHECK_SIZE(ldp_com_header);
582 
583     /*
584      * Sanity checking of the header.
585      */
586     if (GET_BE_U_2(ldp_com_header->version) != LDP_VERSION) {
587 	ND_PRINT("%sLDP version %u packet not supported",
588                (ndo->ndo_vflag < 1) ? "" : "\n\t",
589                GET_BE_U_2(ldp_com_header->version));
590 	return 0;
591     }
592 
593     pdu_len = GET_BE_U_2(ldp_com_header->pdu_length);
594     if (pdu_len < sizeof(struct ldp_common_header)-4) {
595         /* length too short */
596         ND_PRINT("%sLDP, pdu-length: %u (too short, < %zu)",
597                  (ndo->ndo_vflag < 1) ? "" : "\n\t",
598                  pdu_len,
599                  sizeof(struct ldp_common_header)-4);
600         return 0;
601     }
602 
603     /* print the LSR-ID, label-space & length */
604     ND_PRINT("%sLDP, Label-Space-ID: %s:%u, pdu-length: %u",
605            (ndo->ndo_vflag < 1) ? "" : "\n\t",
606            GET_IPADDR_STRING(ldp_com_header->lsr_id),
607            GET_BE_U_2(ldp_com_header->label_space),
608            pdu_len);
609 
610     /* bail out if non-verbose */
611     if (ndo->ndo_vflag < 1)
612         return 0;
613 
614     /* ok they seem to want to know everything - lets fully decode it */
615     tptr = pptr + sizeof(struct ldp_common_header);
616     tlen = pdu_len - (sizeof(struct ldp_common_header)-4);	/* Type & Length fields not included */
617 
618     while(tlen>0) {
619         /* did we capture enough for fully decoding the msg header ? */
620         ND_TCHECK_LEN(tptr, sizeof(struct ldp_msg_header));
621 
622         ldp_msg_header = (const struct ldp_msg_header *)tptr;
623         msg_len=GET_BE_U_2(ldp_msg_header->length);
624         msg_type=LDP_MASK_MSG_TYPE(GET_BE_U_2(ldp_msg_header->type));
625 
626         if (msg_len < sizeof(struct ldp_msg_header)-4) {
627             /* length too short */
628             /* FIXME vendor private / experimental check */
629             ND_PRINT("\n\t  %s Message (0x%04x), length: %u (too short, < %zu)",
630                      tok2str(ldp_msg_values,
631                              "Unknown",
632                              msg_type),
633                      msg_type,
634                      msg_len,
635                      sizeof(struct ldp_msg_header)-4);
636             return 0;
637         }
638 
639         /* FIXME vendor private / experimental check */
640         ND_PRINT("\n\t  %s Message (0x%04x), length: %u, Message ID: 0x%08x, Flags: [%s if unknown]",
641                tok2str(ldp_msg_values,
642                        "Unknown",
643                        msg_type),
644                msg_type,
645                msg_len,
646                GET_BE_U_4(ldp_msg_header->id),
647                LDP_MASK_U_BIT(GET_BE_U_2(ldp_msg_header->type)) ? "continue processing" : "ignore");
648 
649         msg_tptr=tptr+sizeof(struct ldp_msg_header);
650         msg_tlen=msg_len-(sizeof(struct ldp_msg_header)-4); /* Type & Length fields not included */
651 
652         /* did we capture enough for fully decoding the message ? */
653         ND_TCHECK_LEN(tptr, msg_len);
654         hexdump=FALSE;
655 
656         switch(msg_type) {
657 
658         case LDP_MSG_NOTIF:
659         case LDP_MSG_HELLO:
660         case LDP_MSG_INIT:
661         case LDP_MSG_KEEPALIVE:
662         case LDP_MSG_ADDRESS:
663         case LDP_MSG_LABEL_MAPPING:
664         case LDP_MSG_ADDRESS_WITHDRAW:
665         case LDP_MSG_LABEL_WITHDRAW:
666             while(msg_tlen >= 4) {
667                 processed = ldp_tlv_print(ndo, msg_tptr, msg_tlen);
668                 if (processed == 0)
669                     break;
670                 msg_tlen-=processed;
671                 msg_tptr+=processed;
672             }
673             break;
674 
675         /*
676          *  FIXME those are the defined messages that lack a decoder
677          *  you are welcome to contribute code ;-)
678          */
679 
680         case LDP_MSG_LABEL_REQUEST:
681         case LDP_MSG_LABEL_RELEASE:
682         case LDP_MSG_LABEL_ABORT_REQUEST:
683 
684         default:
685             if (ndo->ndo_vflag <= 1)
686                 print_unknown_data(ndo, msg_tptr, "\n\t  ", msg_tlen);
687             break;
688         }
689         /* do we want to see an additionally hexdump ? */
690         if (ndo->ndo_vflag > 1 || hexdump==TRUE)
691             print_unknown_data(ndo, tptr+sizeof(struct ldp_msg_header), "\n\t  ",
692                                msg_len);
693 
694         tptr += msg_len+4;
695         tlen -= msg_len+4;
696     }
697     return pdu_len+4;
698 trunc:
699     nd_trunc_longjmp(ndo);
700 }
701