Home | History | Annotate | Download | only in tcpdump
      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 (at) juniper.net)
     14  *  and Steinar Haug (sthaug (at) 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
    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
    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
    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