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