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 Andy Heffernan (ahh (at) juniper.net)
     14  */
     15 
     16 #ifndef lint
     17 static const char rcsid[] _U_ =
     18     "@(#) $Header: /tcpdump/master/tcpdump/print-pgm.c,v 1.1.2.5 2005/06/07 22:06:16 guy Exp $";
     19 #endif
     20 
     21 #ifdef HAVE_CONFIG_H
     22 #include "config.h"
     23 #endif
     24 
     25 #include <tcpdump-stdinc.h>
     26 
     27 #include <stdio.h>
     28 #include <stdlib.h>
     29 #include <string.h>
     30 
     31 #include "interface.h"
     32 #include "extract.h"
     33 #include "addrtoname.h"
     34 
     35 #include "ip.h"
     36 #ifdef INET6
     37 #include "ip6.h"
     38 #endif
     39 #include "ipproto.h"
     40 
     41 /*
     42  * PGM header (RFC 3208)
     43  */
     44 struct pgm_header {
     45     u_int16_t	pgm_sport;
     46     u_int16_t	pgm_dport;
     47     u_int8_t	pgm_type;
     48     u_int8_t	pgm_options;
     49     u_int16_t	pgm_sum;
     50     u_int8_t	pgm_gsid[6];
     51     u_int16_t	pgm_length;
     52 };
     53 
     54 struct pgm_spm {
     55     u_int32_t	pgms_seq;
     56     u_int32_t	pgms_trailseq;
     57     u_int32_t	pgms_leadseq;
     58     u_int16_t	pgms_nla_afi;
     59     u_int16_t	pgms_reserved;
     60     /* ... u_int8_t	pgms_nla[0]; */
     61     /* ... options */
     62 };
     63 
     64 struct pgm_nak {
     65     u_int32_t	pgmn_seq;
     66     u_int16_t	pgmn_source_afi;
     67     u_int16_t	pgmn_reserved;
     68     /* ... u_int8_t	pgmn_source[0]; */
     69     /* ... u_int16_t	pgmn_group_afi */
     70     /* ... u_int16_t	pgmn_reserved2; */
     71     /* ... u_int8_t	pgmn_group[0]; */
     72     /* ... options */
     73 };
     74 
     75 struct pgm_poll {
     76     u_int32_t	pgmp_seq;
     77     u_int16_t	pgmp_round;
     78     u_int16_t	pgmp_reserved;
     79     /* ... options */
     80 };
     81 
     82 struct pgm_polr {
     83     u_int32_t	pgmp_seq;
     84     u_int16_t	pgmp_round;
     85     u_int16_t	pgmp_subtype;
     86     u_int16_t	pgmp_nla_afi;
     87     u_int16_t	pgmp_reserved;
     88     /* ... u_int8_t	pgmp_nla[0]; */
     89     /* ... options */
     90 };
     91 
     92 struct pgm_data {
     93     u_int32_t	pgmd_seq;
     94     u_int32_t	pgmd_trailseq;
     95     /* ... options */
     96 };
     97 
     98 typedef enum _pgm_type {
     99     PGM_SPM = 0,		/* source path message */
    100     PGM_POLL = 1,		/* POLL Request */
    101     PGM_POLR = 2,		/* POLL Response */
    102     PGM_ODATA = 4,		/* original data */
    103     PGM_RDATA = 5,		/* repair data */
    104     PGM_NAK = 8,		/* NAK */
    105     PGM_NULLNAK = 9,		/* Null NAK */
    106     PGM_NCF = 10,		/* NAK Confirmation */
    107     PGM_ACK = 11,		/* ACK for congestion control */
    108     PGM_SPMR = 12,		/* SPM request */
    109     PGM_MAX = 255
    110 } pgm_type;
    111 
    112 #define PGM_OPT_BIT_PRESENT	0x01
    113 #define PGM_OPT_BIT_NETWORK	0x02
    114 #define PGM_OPT_BIT_VAR_PKTLEN	0x40
    115 #define PGM_OPT_BIT_PARITY	0x80
    116 
    117 #define PGM_OPT_LENGTH		0x00
    118 #define PGM_OPT_FRAGMENT        0x01
    119 #define PGM_OPT_NAK_LIST        0x02
    120 #define PGM_OPT_JOIN            0x03
    121 #define PGM_OPT_NAK_BO_IVL	0x04
    122 #define PGM_OPT_NAK_BO_RNG	0x05
    123 
    124 #define PGM_OPT_REDIRECT        0x07
    125 #define PGM_OPT_PARITY_PRM      0x08
    126 #define PGM_OPT_PARITY_GRP      0x09
    127 #define PGM_OPT_CURR_TGSIZE     0x0A
    128 #define PGM_OPT_NBR_UNREACH	0x0B
    129 #define PGM_OPT_PATH_NLA	0x0C
    130 
    131 #define PGM_OPT_SYN             0x0D
    132 #define PGM_OPT_FIN             0x0E
    133 #define PGM_OPT_RST             0x0F
    134 #define PGM_OPT_CR		0x10
    135 #define PGM_OPT_CRQST		0x11
    136 
    137 #define PGM_OPT_MASK		0x7f
    138 
    139 #define PGM_OPT_END		0x80    /* end of options marker */
    140 
    141 #define PGM_MIN_OPT_LEN		4
    142 
    143 #ifndef AFI_IP
    144 #define AFI_IP		1
    145 #define AFI_IP6	        2
    146 #endif
    147 
    148 void
    149 pgm_print(register const u_char *bp, register u_int length,
    150 	  register const u_char *bp2)
    151 {
    152 	register const struct pgm_header *pgm;
    153 	register const struct ip *ip;
    154 	register char ch;
    155 	u_int16_t sport, dport;
    156 	int addr_size;
    157 	const void *nla;
    158 	int nla_af;
    159 #ifdef INET6
    160 	char nla_buf[INET6_ADDRSTRLEN];
    161 	register const struct ip6_hdr *ip6;
    162 #else
    163 	char nla_buf[INET_ADDRSTRLEN];
    164 #endif
    165 	u_int8_t opt_type, opt_len, flags1, flags2;
    166 	u_int32_t seq, opts_len, len, offset;
    167 
    168 	pgm = (struct pgm_header *)bp;
    169 	ip = (struct ip *)bp2;
    170 #ifdef INET6
    171 	if (IP_V(ip) == 6)
    172 		ip6 = (struct ip6_hdr *)bp2;
    173 	else
    174 		ip6 = NULL;
    175 #else /* INET6 */
    176 	if (IP_V(ip) == 6) {
    177 		(void)printf("Can't handle IPv6");
    178 		return;
    179 	}
    180 #endif /* INET6 */
    181 	ch = '\0';
    182 	if (!TTEST(pgm->pgm_dport)) {
    183 #ifdef INET6
    184 		if (ip6) {
    185 			(void)printf("%s > %s: [|pgm]",
    186 				ip6addr_string(&ip6->ip6_src),
    187 				ip6addr_string(&ip6->ip6_dst));
    188 			return;
    189 		} else
    190 #endif /* INET6 */
    191 		{
    192 			(void)printf("%s > %s: [|pgm]",
    193 				ipaddr_string(&ip->ip_src),
    194 				ipaddr_string(&ip->ip_dst));
    195 			return;
    196 		}
    197 	}
    198 
    199 	sport = EXTRACT_16BITS(&pgm->pgm_sport);
    200 	dport = EXTRACT_16BITS(&pgm->pgm_dport);
    201 
    202 #ifdef INET6
    203 	if (ip6) {
    204 		if (ip6->ip6_nxt == IPPROTO_PGM) {
    205 			(void)printf("%s.%s > %s.%s: ",
    206 				ip6addr_string(&ip6->ip6_src),
    207 				tcpport_string(sport),
    208 				ip6addr_string(&ip6->ip6_dst),
    209 				tcpport_string(dport));
    210 		} else {
    211 			(void)printf("%s > %s: ",
    212 				tcpport_string(sport), tcpport_string(dport));
    213 		}
    214 	} else
    215 #endif /*INET6*/
    216 	{
    217 		if (ip->ip_p == IPPROTO_PGM) {
    218 			(void)printf("%s.%s > %s.%s: ",
    219 				ipaddr_string(&ip->ip_src),
    220 				tcpport_string(sport),
    221 				ipaddr_string(&ip->ip_dst),
    222 				tcpport_string(dport));
    223 		} else {
    224 			(void)printf("%s > %s: ",
    225 				tcpport_string(sport), tcpport_string(dport));
    226 		}
    227 	}
    228 
    229 	TCHECK(*pgm);
    230 
    231         (void)printf("PGM, length %u", pgm->pgm_length);
    232 
    233         if (!vflag)
    234             return;
    235 
    236         if (length > pgm->pgm_length)
    237             length = pgm->pgm_length;
    238 
    239 	(void)printf(" 0x%02x%02x%02x%02x%02x%02x ",
    240 		     pgm->pgm_gsid[0],
    241                      pgm->pgm_gsid[1],
    242                      pgm->pgm_gsid[2],
    243 		     pgm->pgm_gsid[3],
    244                      pgm->pgm_gsid[4],
    245                      pgm->pgm_gsid[5]);
    246 	switch (pgm->pgm_type) {
    247 	case PGM_SPM: {
    248 	    struct pgm_spm *spm;
    249 
    250 	    spm = (struct pgm_spm *)(pgm + 1);
    251 	    TCHECK(*spm);
    252 
    253 	    switch (EXTRACT_16BITS(&spm->pgms_nla_afi)) {
    254 	    case AFI_IP:
    255 		addr_size = sizeof(struct in_addr);
    256 		nla_af = AF_INET;
    257 		break;
    258 #ifdef INET6
    259 	    case AFI_IP6:
    260 		addr_size = sizeof(struct in6_addr);
    261 		nla_af = AF_INET6;
    262 		break;
    263 #endif
    264 	    default:
    265 		goto trunc;
    266 		break;
    267 	    }
    268 	    bp = (u_char *) (spm + 1);
    269 	    TCHECK2(*bp, addr_size);
    270 	    nla = bp;
    271 	    bp += addr_size;
    272 
    273 	    inet_ntop(nla_af, nla, nla_buf, sizeof(nla_buf));
    274 	    (void)printf("SPM seq %u trail %u lead %u nla %s",
    275 			 EXTRACT_32BITS(&spm->pgms_seq),
    276                          EXTRACT_32BITS(&spm->pgms_trailseq),
    277 			 EXTRACT_32BITS(&spm->pgms_leadseq),
    278                          nla_buf);
    279 	    break;
    280 	}
    281 
    282 	case PGM_POLL: {
    283 	    struct pgm_poll *poll;
    284 
    285 	    poll = (struct pgm_poll *)(pgm + 1);
    286 	    TCHECK(*poll);
    287 	    (void)printf("POLL seq %u round %u",
    288 			 EXTRACT_32BITS(&poll->pgmp_seq),
    289                          EXTRACT_16BITS(&poll->pgmp_round));
    290 	    bp = (u_char *) (poll + 1);
    291 	    break;
    292 	}
    293 	case PGM_POLR: {
    294 	    struct pgm_polr *polr;
    295 	    u_int32_t ivl, rnd, mask;
    296 
    297 	    polr = (struct pgm_polr *)(pgm + 1);
    298 	    TCHECK(*polr);
    299 
    300 	    switch (EXTRACT_16BITS(&polr->pgmp_nla_afi)) {
    301 	    case AFI_IP:
    302 		addr_size = sizeof(struct in_addr);
    303 		nla_af = AF_INET;
    304 		break;
    305 #ifdef INET6
    306 	    case AFI_IP6:
    307 		addr_size = sizeof(struct in6_addr);
    308 		nla_af = AF_INET6;
    309 		break;
    310 #endif
    311 	    default:
    312 		goto trunc;
    313 		break;
    314 	    }
    315 	    bp = (u_char *) (polr + 1);
    316 	    TCHECK2(*bp, addr_size);
    317 	    nla = bp;
    318 	    bp += addr_size;
    319 
    320 	    inet_ntop(nla_af, nla, nla_buf, sizeof(nla_buf));
    321 
    322 	    TCHECK2(*bp, sizeof(u_int32_t));
    323 	    ivl = EXTRACT_32BITS(bp);
    324 	    bp += sizeof(u_int32_t);
    325 
    326 	    TCHECK2(*bp, sizeof(u_int32_t));
    327 	    rnd = EXTRACT_32BITS(bp);
    328 	    bp += sizeof(u_int32_t);
    329 
    330 	    TCHECK2(*bp, sizeof(u_int32_t));
    331 	    mask = EXTRACT_32BITS(bp);
    332 	    bp += sizeof(u_int32_t);
    333 
    334 	    (void)printf("POLR seq %u round %u nla %s ivl %u rnd 0x%08x "
    335 			 "mask 0x%08x", EXTRACT_32BITS(&polr->pgmp_seq),
    336 			 EXTRACT_16BITS(&polr->pgmp_round), nla_buf, ivl, rnd, mask);
    337 	    break;
    338 	}
    339 	case PGM_ODATA: {
    340 	    struct pgm_data *odata;
    341 
    342 	    odata = (struct pgm_data *)(pgm + 1);
    343 	    TCHECK(*odata);
    344 	    (void)printf("ODATA trail %u seq %u",
    345 			 EXTRACT_32BITS(&odata->pgmd_trailseq),
    346 			 EXTRACT_32BITS(&odata->pgmd_seq));
    347 	    bp = (u_char *) (odata + 1);
    348 	    break;
    349 	}
    350 
    351 	case PGM_RDATA: {
    352 	    struct pgm_data *rdata;
    353 
    354 	    rdata = (struct pgm_data *)(pgm + 1);
    355 	    TCHECK(*rdata);
    356 	    (void)printf("RDATA trail %u seq %u",
    357 			 EXTRACT_32BITS(&rdata->pgmd_trailseq),
    358 			 EXTRACT_32BITS(&rdata->pgmd_seq));
    359 	    bp = (u_char *) (rdata + 1);
    360 	    break;
    361 	}
    362 
    363 	case PGM_NAK:
    364 	case PGM_NULLNAK:
    365 	case PGM_NCF: {
    366 	    struct pgm_nak *nak;
    367 	    const void *source, *group;
    368 	    int source_af, group_af;
    369 #ifdef INET6
    370 	    char source_buf[INET6_ADDRSTRLEN], group_buf[INET6_ADDRSTRLEN];
    371 #else
    372 	    char source_buf[INET_ADDRSTRLEN], group_buf[INET_ADDRSTRLEN];
    373 #endif
    374 
    375 	    nak = (struct pgm_nak *)(pgm + 1);
    376 	    TCHECK(*nak);
    377 
    378 	    /*
    379 	     * Skip past the source, saving info along the way
    380 	     * and stopping if we don't have enough.
    381 	     */
    382 	    switch (EXTRACT_16BITS(&nak->pgmn_source_afi)) {
    383 	    case AFI_IP:
    384 		addr_size = sizeof(struct in_addr);
    385 		source_af = AF_INET;
    386 		break;
    387 #ifdef INET6
    388 	    case AFI_IP6:
    389 		addr_size = sizeof(struct in6_addr);
    390 		source_af = AF_INET6;
    391 		break;
    392 #endif
    393 	    default:
    394 		goto trunc;
    395 		break;
    396 	    }
    397 	    bp = (u_char *) (nak + 1);
    398 	    TCHECK2(*bp, addr_size);
    399 	    source = bp;
    400 	    bp += addr_size;
    401 
    402 	    /*
    403 	     * Skip past the group, saving info along the way
    404 	     * and stopping if we don't have enough.
    405 	     */
    406 	    switch (EXTRACT_16BITS(bp)) {
    407 	    case AFI_IP:
    408 		addr_size = sizeof(struct in_addr);
    409 		group_af = AF_INET;
    410 		break;
    411 #ifdef INET6
    412 	    case AFI_IP6:
    413 		addr_size = sizeof(struct in6_addr);
    414 		group_af = AF_INET6;
    415 		break;
    416 #endif
    417 	    default:
    418 		goto trunc;
    419 		break;
    420 	    }
    421 	    bp += (2 * sizeof(u_int16_t));
    422 	    TCHECK2(*bp, addr_size);
    423 	    group = bp;
    424 	    bp += addr_size;
    425 
    426 	    /*
    427 	     * Options decoding can go here.
    428 	     */
    429 	    inet_ntop(source_af, source, source_buf, sizeof(source_buf));
    430 	    inet_ntop(group_af, group, group_buf, sizeof(group_buf));
    431 	    switch (pgm->pgm_type) {
    432 		case PGM_NAK:
    433 		    (void)printf("NAK ");
    434 		    break;
    435 		case PGM_NULLNAK:
    436 		    (void)printf("NNAK ");
    437 		    break;
    438 		case PGM_NCF:
    439 		    (void)printf("NCF ");
    440 		    break;
    441 		default:
    442                     break;
    443 	    }
    444 	    (void)printf("(%s -> %s), seq %u",
    445 			 source_buf, group_buf, EXTRACT_32BITS(&nak->pgmn_seq));
    446 	    break;
    447 	}
    448 
    449 	case PGM_SPMR:
    450 	    (void)printf("SPMR");
    451 	    break;
    452 
    453 	default:
    454 	    (void)printf("UNKNOWN type %0x02x", pgm->pgm_type);
    455 	    break;
    456 
    457 	}
    458 	if (pgm->pgm_options & PGM_OPT_BIT_PRESENT) {
    459 
    460 	    /*
    461 	     * make sure there's enough for the first option header
    462 	     */
    463 	    if (!TTEST2(*bp, PGM_MIN_OPT_LEN)) {
    464 		(void)printf("[|OPT]");
    465 		return;
    466 	    }
    467 
    468 	    /*
    469 	     * That option header MUST be an OPT_LENGTH option
    470 	     * (see the first paragraph of section 9.1 in RFC 3208).
    471 	     */
    472 	    opt_type = *bp++;
    473 	    if ((opt_type & PGM_OPT_MASK) != PGM_OPT_LENGTH) {
    474 		(void)printf("[First option bad, should be PGM_OPT_LENGTH, is %u]", opt_type & PGM_OPT_MASK);
    475 		return;
    476 	    }
    477 	    opt_len = *bp++;
    478 	    if (opt_len != 4) {
    479 		(void)printf("[Bad OPT_LENGTH option, length %u != 4]", opt_len);
    480 		return;
    481 	    }
    482 	    opts_len = EXTRACT_16BITS(bp);
    483 	    if (opts_len < 4) {
    484 		(void)printf("[Bad total option length %u < 4]", opts_len);
    485 		return;
    486 	    }
    487 	    bp += sizeof(u_int16_t);
    488 	    (void)printf(" OPTS LEN %d", opts_len);
    489 	    opts_len -= 4;
    490 
    491 	    while (opts_len) {
    492 		if (opts_len < PGM_MIN_OPT_LEN) {
    493 		    (void)printf("[Total option length leaves no room for final option]");
    494 		    return;
    495 		}
    496 		opt_type = *bp++;
    497 		opt_len = *bp++;
    498 		if (opt_len < PGM_MIN_OPT_LEN) {
    499 		    (void)printf("[Bad option, length %u < %u]", opt_len,
    500 		        PGM_MIN_OPT_LEN);
    501 		    break;
    502 		}
    503 		if (opts_len < opt_len) {
    504 		    (void)printf("[Total option length leaves no room for final option]");
    505 		    return;
    506 		}
    507 		if (!TTEST2(*bp, opt_len - 2)) {
    508 		    (void)printf(" [|OPT]");
    509 		    return;
    510 		}
    511 
    512 		switch (opt_type & PGM_OPT_MASK) {
    513 		case PGM_OPT_LENGTH:
    514 		    if (opt_len != 4) {
    515 			(void)printf("[Bad OPT_LENGTH option, length %u != 4]", opt_len);
    516 			return;
    517 		    }
    518 		    (void)printf(" OPTS LEN (extra?) %d", EXTRACT_16BITS(bp));
    519 		    bp += sizeof(u_int16_t);
    520 		    opts_len -= 4;
    521 		    break;
    522 
    523 		case PGM_OPT_FRAGMENT:
    524 		    if (opt_len != 16) {
    525 			(void)printf("[Bad OPT_FRAGMENT option, length %u != 16]", opt_len);
    526 			return;
    527 		    }
    528 		    flags1 = *bp++;
    529 		    flags2 = *bp++;
    530 		    seq = EXTRACT_32BITS(bp);
    531 		    bp += sizeof(u_int32_t);
    532 		    offset = EXTRACT_32BITS(bp);
    533 		    bp += sizeof(u_int32_t);
    534 		    len = EXTRACT_32BITS(bp);
    535 		    bp += sizeof(u_int32_t);
    536 		    (void)printf(" FRAG seq %u off %u len %u", seq, offset, len);
    537 		    opts_len -= 16;
    538 		    break;
    539 
    540 		case PGM_OPT_NAK_LIST:
    541 		    flags1 = *bp++;
    542 		    flags2 = *bp++;
    543 		    opt_len -= sizeof(u_int32_t);	/* option header */
    544 		    (void)printf(" NAK LIST");
    545 		    while (opt_len) {
    546 			if (opt_len < sizeof(u_int32_t)) {
    547 			    (void)printf("[Option length not a multiple of 4]");
    548 			    return;
    549 			}
    550 			TCHECK2(*bp, sizeof(u_int32_t));
    551 			(void)printf(" %u", EXTRACT_32BITS(bp));
    552 			bp += sizeof(u_int32_t);
    553 			opt_len -= sizeof(u_int32_t);
    554 			opts_len -= sizeof(u_int32_t);
    555 		    }
    556 		    break;
    557 
    558 		case PGM_OPT_JOIN:
    559 		    if (opt_len != 8) {
    560 			(void)printf("[Bad OPT_JOIN option, length %u != 8]", opt_len);
    561 			return;
    562 		    }
    563 		    flags1 = *bp++;
    564 		    flags2 = *bp++;
    565 		    seq = EXTRACT_32BITS(bp);
    566 		    bp += sizeof(u_int32_t);
    567 		    (void)printf(" JOIN %u", seq);
    568 		    opts_len -= 8;
    569 		    break;
    570 
    571 		case PGM_OPT_NAK_BO_IVL:
    572 		    if (opt_len != 12) {
    573 			(void)printf("[Bad OPT_NAK_BO_IVL option, length %u != 12]", opt_len);
    574 			return;
    575 		    }
    576 		    flags1 = *bp++;
    577 		    flags2 = *bp++;
    578 		    offset = EXTRACT_32BITS(bp);
    579 		    bp += sizeof(u_int32_t);
    580 		    seq = EXTRACT_32BITS(bp);
    581 		    bp += sizeof(u_int32_t);
    582 		    (void)printf(" BACKOFF ivl %u ivlseq %u", offset, seq);
    583 		    opts_len -= 12;
    584 		    break;
    585 
    586 		case PGM_OPT_NAK_BO_RNG:
    587 		    if (opt_len != 12) {
    588 			(void)printf("[Bad OPT_NAK_BO_RNG option, length %u != 12]", opt_len);
    589 			return;
    590 		    }
    591 		    flags1 = *bp++;
    592 		    flags2 = *bp++;
    593 		    offset = EXTRACT_32BITS(bp);
    594 		    bp += sizeof(u_int32_t);
    595 		    seq = EXTRACT_32BITS(bp);
    596 		    bp += sizeof(u_int32_t);
    597 		    (void)printf(" BACKOFF max %u min %u", offset, seq);
    598 		    opts_len -= 12;
    599 		    break;
    600 
    601 		case PGM_OPT_REDIRECT:
    602 		    flags1 = *bp++;
    603 		    flags2 = *bp++;
    604 		    switch (EXTRACT_16BITS(bp)) {
    605 		    case AFI_IP:
    606 			addr_size = sizeof(struct in_addr);
    607 			nla_af = AF_INET;
    608 			break;
    609 #ifdef INET6
    610 		    case AFI_IP6:
    611 			addr_size = sizeof(struct in6_addr);
    612 			nla_af = AF_INET6;
    613 			break;
    614 #endif
    615 		    default:
    616 			goto trunc;
    617 			break;
    618 		    }
    619 		    bp += (2 * sizeof(u_int16_t));
    620 		    if (opt_len != 4 + addr_size) {
    621 			(void)printf("[Bad OPT_REDIRECT option, length %u != 4 + address size]", opt_len);
    622 			return;
    623 		    }
    624 		    TCHECK2(*bp, addr_size);
    625 		    nla = bp;
    626 		    bp += addr_size;
    627 
    628 		    inet_ntop(nla_af, nla, nla_buf, sizeof(nla_buf));
    629 		    (void)printf(" REDIRECT %s",  (char *)nla);
    630 		    opts_len -= 4 + addr_size;
    631 		    break;
    632 
    633 		case PGM_OPT_PARITY_PRM:
    634 		    if (opt_len != 8) {
    635 			(void)printf("[Bad OPT_PARITY_PRM option, length %u != 8]", opt_len);
    636 			return;
    637 		    }
    638 		    flags1 = *bp++;
    639 		    flags2 = *bp++;
    640 		    len = EXTRACT_32BITS(bp);
    641 		    bp += sizeof(u_int32_t);
    642 		    (void)printf(" PARITY MAXTGS %u", len);
    643 		    opts_len -= 8;
    644 		    break;
    645 
    646 		case PGM_OPT_PARITY_GRP:
    647 		    if (opt_len != 8) {
    648 			(void)printf("[Bad OPT_PARITY_GRP option, length %u != 8]", opt_len);
    649 			return;
    650 		    }
    651 		    flags1 = *bp++;
    652 		    flags2 = *bp++;
    653 		    seq = EXTRACT_32BITS(bp);
    654 		    bp += sizeof(u_int32_t);
    655 		    (void)printf(" PARITY GROUP %u", seq);
    656 		    opts_len -= 8;
    657 		    break;
    658 
    659 		case PGM_OPT_CURR_TGSIZE:
    660 		    if (opt_len != 8) {
    661 			(void)printf("[Bad OPT_CURR_TGSIZE option, length %u != 8]", opt_len);
    662 			return;
    663 		    }
    664 		    flags1 = *bp++;
    665 		    flags2 = *bp++;
    666 		    len = EXTRACT_32BITS(bp);
    667 		    bp += sizeof(u_int32_t);
    668 		    (void)printf(" PARITY ATGS %u", len);
    669 		    opts_len -= 8;
    670 		    break;
    671 
    672 		case PGM_OPT_NBR_UNREACH:
    673 		    if (opt_len != 4) {
    674 			(void)printf("[Bad OPT_NBR_UNREACH option, length %u != 4]", opt_len);
    675 			return;
    676 		    }
    677 		    flags1 = *bp++;
    678 		    flags2 = *bp++;
    679 		    (void)printf(" NBR_UNREACH");
    680 		    opts_len -= 4;
    681 		    break;
    682 
    683 		case PGM_OPT_PATH_NLA:
    684 		    (void)printf(" PATH_NLA [%d]", opt_len);
    685 		    bp += opt_len;
    686 		    opts_len -= opt_len;
    687 		    break;
    688 
    689 		case PGM_OPT_SYN:
    690 		    if (opt_len != 4) {
    691 			(void)printf("[Bad OPT_SYN option, length %u != 4]", opt_len);
    692 			return;
    693 		    }
    694 		    flags1 = *bp++;
    695 		    flags2 = *bp++;
    696 		    (void)printf(" SYN");
    697 		    opts_len -= 4;
    698 		    break;
    699 
    700 		case PGM_OPT_FIN:
    701 		    if (opt_len != 4) {
    702 			(void)printf("[Bad OPT_FIN option, length %u != 4]", opt_len);
    703 			return;
    704 		    }
    705 		    flags1 = *bp++;
    706 		    flags2 = *bp++;
    707 		    (void)printf(" FIN");
    708 		    opts_len -= 4;
    709 		    break;
    710 
    711 		case PGM_OPT_RST:
    712 		    if (opt_len != 4) {
    713 			(void)printf("[Bad OPT_RST option, length %u != 4]", opt_len);
    714 			return;
    715 		    }
    716 		    flags1 = *bp++;
    717 		    flags2 = *bp++;
    718 		    (void)printf(" RST");
    719 		    opts_len -= 4;
    720 		    break;
    721 
    722 		case PGM_OPT_CR:
    723 		    (void)printf(" CR");
    724 		    bp += opt_len;
    725 		    opts_len -= opt_len;
    726 		    break;
    727 
    728 		case PGM_OPT_CRQST:
    729 		    if (opt_len != 4) {
    730 			(void)printf("[Bad OPT_CRQST option, length %u != 4]", opt_len);
    731 			return;
    732 		    }
    733 		    flags1 = *bp++;
    734 		    flags2 = *bp++;
    735 		    (void)printf(" CRQST");
    736 		    opts_len -= 4;
    737 		    break;
    738 
    739 		default:
    740 		    (void)printf(" OPT_%02X [%d] ", opt_type, opt_len);
    741 		    bp += opt_len;
    742 		    opts_len -= opt_len;
    743 		    break;
    744 		}
    745 
    746 		if (opt_type & PGM_OPT_END)
    747 		    break;
    748 	     }
    749 	}
    750 
    751 	(void)printf(" [%u]", EXTRACT_16BITS(&pgm->pgm_length));
    752 
    753 	return;
    754 
    755 trunc:
    756 	fputs("[|pgm]", stdout);
    757 	if (ch != '\0')
    758 		putchar('>');
    759 }
    760