Home | History | Annotate | Line # | Download | only in dist
print-ospf6.c revision 1.1.1.2
      1      1.1  christos /*
      2      1.1  christos  * Copyright (c) 1992, 1993, 1994, 1995, 1996, 1997
      3      1.1  christos  *	The Regents of the University of California.  All rights reserved.
      4      1.1  christos  *
      5      1.1  christos  * Redistribution and use in source and binary forms, with or without
      6      1.1  christos  * modification, are permitted provided that: (1) source code distributions
      7      1.1  christos  * retain the above copyright notice and this paragraph in its entirety, (2)
      8      1.1  christos  * distributions including binary code include the above copyright notice and
      9      1.1  christos  * this paragraph in its entirety in the documentation or other materials
     10      1.1  christos  * provided with the distribution, and (3) all advertising materials mentioning
     11      1.1  christos  * features or use of this software display the following acknowledgement:
     12      1.1  christos  * ``This product includes software developed by the University of California,
     13      1.1  christos  * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
     14      1.1  christos  * the University nor the names of its contributors may be used to endorse
     15      1.1  christos  * or promote products derived from this software without specific prior
     16      1.1  christos  * written permission.
     17      1.1  christos  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
     18      1.1  christos  * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
     19      1.1  christos  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
     20      1.1  christos  *
     21      1.1  christos  * OSPF support contributed by Jeffrey Honig (jch (at) mitchell.cit.cornell.edu)
     22      1.1  christos  */
     23      1.1  christos 
     24      1.1  christos #ifndef lint
     25      1.1  christos static const char rcsid[] _U_ =
     26  1.1.1.2  christos     "@(#) Header: /tcpdump/master/tcpdump/print-ospf6.c,v 1.15 2006-09-13 06:31:11 guy Exp  (LBL)";
     27      1.1  christos #endif
     28      1.1  christos 
     29      1.1  christos #ifdef HAVE_CONFIG_H
     30      1.1  christos #include "config.h"
     31      1.1  christos #endif
     32      1.1  christos 
     33      1.1  christos #include <tcpdump-stdinc.h>
     34      1.1  christos 
     35      1.1  christos #include <stdio.h>
     36      1.1  christos #include <string.h>
     37      1.1  christos 
     38      1.1  christos #include "interface.h"
     39      1.1  christos #include "addrtoname.h"
     40      1.1  christos #include "extract.h"
     41      1.1  christos 
     42      1.1  christos #include "ospf.h"
     43      1.1  christos #include "ospf6.h"
     44      1.1  christos 
     45      1.1  christos static const struct tok ospf6_option_values[] = {
     46      1.1  christos 	{ OSPF6_OPTION_V6,	"V6" },
     47      1.1  christos 	{ OSPF6_OPTION_E,	"External" },
     48      1.1  christos 	{ OSPF6_OPTION_MC,	"Multicast" },
     49      1.1  christos 	{ OSPF6_OPTION_N,	"NSSA" },
     50      1.1  christos 	{ OSPF6_OPTION_R,	"Router" },
     51      1.1  christos 	{ OSPF6_OPTION_DC,	"Demand Circuit" },
     52      1.1  christos 	{ 0,			NULL }
     53      1.1  christos };
     54      1.1  christos 
     55      1.1  christos static const struct tok ospf6_rla_flag_values[] = {
     56      1.1  christos 	{ RLA_FLAG_B,		"ABR" },
     57      1.1  christos 	{ RLA_FLAG_E,		"External" },
     58      1.1  christos 	{ RLA_FLAG_V,		"Virtual-Link Endpoint" },
     59      1.1  christos 	{ RLA_FLAG_W,		"Wildcard Receiver" },
     60      1.1  christos         { RLA_FLAG_N,           "NSSA Translator" },
     61      1.1  christos 	{ 0,			NULL }
     62      1.1  christos };
     63      1.1  christos 
     64      1.1  christos static const struct tok ospf6_asla_flag_values[] = {
     65      1.1  christos 	{ ASLA_FLAG_EXTERNAL,	"External Type 2" },
     66      1.1  christos 	{ ASLA_FLAG_FWDADDR,	"Fforwarding" },
     67      1.1  christos 	{ ASLA_FLAG_ROUTETAG,	"Tag" },
     68      1.1  christos 	{ 0,			NULL }
     69      1.1  christos };
     70      1.1  christos 
     71      1.1  christos static struct tok ospf6_type_values[] = {
     72      1.1  christos 	{ OSPF_TYPE_HELLO,	"Hello" },
     73      1.1  christos 	{ OSPF_TYPE_DD,		"Database Description" },
     74      1.1  christos 	{ OSPF_TYPE_LS_REQ,	"LS-Request" },
     75      1.1  christos 	{ OSPF_TYPE_LS_UPDATE,	"LS-Update" },
     76      1.1  christos 	{ OSPF_TYPE_LS_ACK,	"LS-Ack" },
     77      1.1  christos 	{ 0,			NULL }
     78      1.1  christos };
     79      1.1  christos 
     80      1.1  christos static struct tok ospf6_lsa_values[] = {
     81      1.1  christos 	{ LS_TYPE_ROUTER,       "Router" },
     82      1.1  christos 	{ LS_TYPE_NETWORK,      "Network" },
     83      1.1  christos 	{ LS_TYPE_INTER_AP,     "Inter-Area Prefix" },
     84      1.1  christos 	{ LS_TYPE_INTER_AR,     "Inter-Area Router" },
     85      1.1  christos 	{ LS_TYPE_ASE,          "External" },
     86      1.1  christos 	{ LS_TYPE_GROUP,        "Multicast Group" },
     87      1.1  christos 	{ LS_TYPE_NSSA,         "NSSA" },
     88      1.1  christos 	{ LS_TYPE_LINK,         "Link" },
     89      1.1  christos 	{ LS_TYPE_INTRA_AP,     "Intra-Area Prefix" },
     90      1.1  christos         { LS_TYPE_INTRA_ATE,    "Intra-Area TE" },
     91      1.1  christos         { LS_TYPE_GRACE,        "Grace" },
     92      1.1  christos 	{ 0,			NULL }
     93      1.1  christos };
     94      1.1  christos 
     95      1.1  christos static struct tok ospf6_ls_scope_values[] = {
     96      1.1  christos 	{ LS_SCOPE_LINKLOCAL,   "Link Local" },
     97      1.1  christos 	{ LS_SCOPE_AREA,        "Area Local" },
     98      1.1  christos 	{ LS_SCOPE_AS,          "Domain Wide" },
     99      1.1  christos 	{ 0,			NULL }
    100      1.1  christos };
    101      1.1  christos 
    102      1.1  christos static struct tok ospf6_dd_flag_values[] = {
    103      1.1  christos 	{ OSPF6_DB_INIT,	"Init" },
    104      1.1  christos 	{ OSPF6_DB_MORE,	"More" },
    105      1.1  christos 	{ OSPF6_DB_MASTER,	"Master" },
    106      1.1  christos 	{ 0,			NULL }
    107      1.1  christos };
    108      1.1  christos 
    109      1.1  christos static struct tok ospf6_lsa_prefix_option_values[] = {
    110      1.1  christos         { LSA_PREFIX_OPT_NU, "No Unicast" },
    111      1.1  christos         { LSA_PREFIX_OPT_LA, "Local address" },
    112      1.1  christos         { LSA_PREFIX_OPT_MC, "Multicast" },
    113      1.1  christos         { LSA_PREFIX_OPT_P, "Propagate" },
    114      1.1  christos         { LSA_PREFIX_OPT_DN, "Down" },
    115      1.1  christos 	{ 0, NULL }
    116      1.1  christos };
    117      1.1  christos 
    118      1.1  christos static char tstr[] = " [|ospf3]";
    119      1.1  christos 
    120      1.1  christos #ifdef WIN32
    121      1.1  christos #define inline __inline
    122      1.1  christos #endif /* WIN32 */
    123      1.1  christos 
    124      1.1  christos /* Forwards */
    125      1.1  christos static void ospf6_print_ls_type(u_int, const rtrid_t *);
    126      1.1  christos static int ospf6_print_lshdr(const struct lsa6_hdr *);
    127      1.1  christos static int ospf6_print_lsa(const struct lsa6 *);
    128      1.1  christos static int ospf6_decode_v3(const struct ospf6hdr *, const u_char *);
    129      1.1  christos 
    130      1.1  christos 
    131      1.1  christos static void
    132      1.1  christos ospf6_print_ls_type(register u_int ls_type, register const rtrid_t *ls_stateid)
    133      1.1  christos {
    134      1.1  christos         printf("\n\t    %s LSA (%d), %s Scope%s, LSA-ID %s",
    135      1.1  christos                tok2str(ospf6_lsa_values, "Unknown", ls_type & LS_TYPE_MASK),
    136      1.1  christos                ls_type & LS_TYPE_MASK,
    137      1.1  christos                tok2str(ospf6_ls_scope_values, "Unknown", ls_type & LS_SCOPE_MASK),
    138      1.1  christos                ls_type &0x8000 ? ", transitive" : "", /* U-bit */
    139      1.1  christos                ipaddr_string(ls_stateid));
    140      1.1  christos }
    141      1.1  christos 
    142      1.1  christos static int
    143      1.1  christos ospf6_print_lshdr(register const struct lsa6_hdr *lshp)
    144      1.1  christos {
    145      1.1  christos 
    146      1.1  christos 	TCHECK(lshp->ls_type);
    147      1.1  christos 	TCHECK(lshp->ls_seq);
    148      1.1  christos 
    149      1.1  christos 	printf("\n\t  Advertising Router %s, seq 0x%08x, age %us, length %u",
    150      1.1  christos                ipaddr_string(&lshp->ls_router),
    151      1.1  christos                EXTRACT_32BITS(&lshp->ls_seq),
    152      1.1  christos                EXTRACT_16BITS(&lshp->ls_age),
    153      1.1  christos                EXTRACT_16BITS(&lshp->ls_length)-(u_int)sizeof(struct lsa6_hdr));
    154      1.1  christos 
    155      1.1  christos 	ospf6_print_ls_type(EXTRACT_16BITS(&lshp->ls_type), &lshp->ls_stateid);
    156      1.1  christos 
    157      1.1  christos 	return (0);
    158      1.1  christos trunc:
    159      1.1  christos 	return (1);
    160      1.1  christos }
    161      1.1  christos 
    162      1.1  christos static int
    163  1.1.1.2  christos ospf6_print_lsaprefix(const u_int8_t *tptr, u_int lsa_length)
    164      1.1  christos {
    165  1.1.1.2  christos 	const struct lsa6_prefix *lsapp = (struct lsa6_prefix *)tptr;
    166      1.1  christos 	u_int wordlen;
    167      1.1  christos 	struct in6_addr prefix;
    168      1.1  christos 
    169  1.1.1.2  christos 	if (lsa_length < sizeof (*lsapp) - 4)
    170  1.1.1.2  christos 		goto trunc;
    171  1.1.1.2  christos 	lsa_length -= sizeof (*lsapp) - 4;
    172  1.1.1.2  christos 	TCHECK2(*lsapp, sizeof (*lsapp) - 4);
    173      1.1  christos 	wordlen = (lsapp->lsa_p_len + 31) / 32;
    174      1.1  christos 	if (wordlen * 4 > sizeof(struct in6_addr)) {
    175      1.1  christos 		printf(" bogus prefixlen /%d", lsapp->lsa_p_len);
    176      1.1  christos 		goto trunc;
    177      1.1  christos 	}
    178  1.1.1.2  christos 	if (lsa_length < wordlen * 4)
    179  1.1.1.2  christos 		goto trunc;
    180  1.1.1.2  christos 	lsa_length -= wordlen * 4;
    181  1.1.1.2  christos 	TCHECK2(lsapp->lsa_p_prefix, wordlen * 4);
    182      1.1  christos 	memset(&prefix, 0, sizeof(prefix));
    183      1.1  christos 	memcpy(&prefix, lsapp->lsa_p_prefix, wordlen * 4);
    184      1.1  christos 	printf("\n\t\t%s/%d", ip6addr_string(&prefix),
    185      1.1  christos 		lsapp->lsa_p_len);
    186      1.1  christos         if (lsapp->lsa_p_opt) {
    187      1.1  christos             printf(", Options [%s]",
    188      1.1  christos                    bittok2str(ospf6_lsa_prefix_option_values,
    189      1.1  christos                               "none", lsapp->lsa_p_opt));
    190      1.1  christos         }
    191      1.1  christos         printf(", metric %u", EXTRACT_16BITS(&lsapp->lsa_p_metric));
    192      1.1  christos 	return sizeof(*lsapp) - 4 + wordlen * 4;
    193      1.1  christos 
    194      1.1  christos trunc:
    195      1.1  christos 	return -1;
    196      1.1  christos }
    197      1.1  christos 
    198      1.1  christos 
    199      1.1  christos /*
    200      1.1  christos  * Print a single link state advertisement.  If truncated return 1, else 0.
    201      1.1  christos  */
    202      1.1  christos static int
    203      1.1  christos ospf6_print_lsa(register const struct lsa6 *lsap)
    204      1.1  christos {
    205      1.1  christos 	register const struct rlalink6 *rlp;
    206      1.1  christos #if 0
    207      1.1  christos 	register const struct tos_metric *tosp;
    208      1.1  christos #endif
    209      1.1  christos 	register const rtrid_t *ap;
    210      1.1  christos #if 0
    211      1.1  christos 	register const struct aslametric *almp;
    212      1.1  christos 	register const struct mcla *mcp;
    213      1.1  christos #endif
    214      1.1  christos 	register const struct llsa *llsap;
    215      1.1  christos 	register const struct lsa6_prefix *lsapp;
    216      1.1  christos #if 0
    217      1.1  christos 	register const u_int32_t *lp;
    218      1.1  christos #endif
    219      1.1  christos 	register u_int prefixes;
    220  1.1.1.2  christos 	register int bytelen;
    221  1.1.1.2  christos 	register u_int length, lsa_length;
    222      1.1  christos 	u_int32_t flags32;
    223  1.1.1.2  christos 	const u_int8_t *tptr;
    224      1.1  christos 
    225      1.1  christos 	if (ospf6_print_lshdr(&lsap->ls_hdr))
    226      1.1  christos 		return (1);
    227      1.1  christos 	TCHECK(lsap->ls_hdr.ls_length);
    228      1.1  christos         length = EXTRACT_16BITS(&lsap->ls_hdr.ls_length);
    229  1.1.1.2  christos 
    230  1.1.1.2  christos 	/*
    231  1.1.1.2  christos 	 * The LSA length includes the length of the header;
    232  1.1.1.2  christos 	 * it must have a value that's at least that length.
    233  1.1.1.2  christos 	 * If it does, find the length of what follows the
    234  1.1.1.2  christos 	 * header.
    235  1.1.1.2  christos 	 */
    236  1.1.1.2  christos         if (length < sizeof(struct lsa6_hdr))
    237  1.1.1.2  christos         	return (1);
    238      1.1  christos         lsa_length = length - sizeof(struct lsa6_hdr);
    239      1.1  christos         tptr = (u_int8_t *)lsap+sizeof(struct lsa6_hdr);
    240      1.1  christos 
    241      1.1  christos 	switch (EXTRACT_16BITS(&lsap->ls_hdr.ls_type)) {
    242      1.1  christos 	case LS_TYPE_ROUTER | LS_SCOPE_AREA:
    243  1.1.1.2  christos 		if (lsa_length < sizeof (lsap->lsa_un.un_rla.rla_options))
    244  1.1.1.2  christos 			return (1);
    245  1.1.1.2  christos 		lsa_length -= sizeof (lsap->lsa_un.un_rla.rla_options);
    246      1.1  christos 		TCHECK(lsap->lsa_un.un_rla.rla_options);
    247      1.1  christos                 printf("\n\t      Options [%s]",
    248      1.1  christos                        bittok2str(ospf6_option_values, "none",
    249      1.1  christos                                   EXTRACT_32BITS(&lsap->lsa_un.un_rla.rla_options)));
    250      1.1  christos                 printf(", RLA-Flags [%s]",
    251      1.1  christos                        bittok2str(ospf6_rla_flag_values, "none",
    252      1.1  christos                                   lsap->lsa_un.un_rla.rla_flags));
    253      1.1  christos 
    254      1.1  christos 		rlp = lsap->lsa_un.un_rla.rla_link;
    255  1.1.1.2  christos 		while (lsa_length != 0) {
    256  1.1.1.2  christos 			if (lsa_length < sizeof (*rlp))
    257  1.1.1.2  christos 				return (1);
    258  1.1.1.2  christos 			lsa_length -= sizeof (*rlp);
    259      1.1  christos 			TCHECK(*rlp);
    260      1.1  christos 			switch (rlp->link_type) {
    261      1.1  christos 
    262      1.1  christos 			case RLA_TYPE_VIRTUAL:
    263      1.1  christos 				printf("\n\t      Virtual Link: Neighbor Router-ID %s"
    264      1.1  christos                                        "\n\t      Neighbor Interface-ID %s, Interface %s",
    265      1.1  christos                                        ipaddr_string(&rlp->link_nrtid),
    266      1.1  christos                                        ipaddr_string(&rlp->link_nifid),
    267      1.1  christos                                        ipaddr_string(&rlp->link_ifid));
    268      1.1  christos                                 break;
    269      1.1  christos 
    270      1.1  christos 			case RLA_TYPE_ROUTER:
    271      1.1  christos 				printf("\n\t      Neighbor Router-ID %s"
    272      1.1  christos                                        "\n\t      Neighbor Interface-ID %s, Interface %s",
    273      1.1  christos                                        ipaddr_string(&rlp->link_nrtid),
    274      1.1  christos                                        ipaddr_string(&rlp->link_nifid),
    275      1.1  christos                                        ipaddr_string(&rlp->link_ifid));
    276      1.1  christos 				break;
    277      1.1  christos 
    278      1.1  christos 			case RLA_TYPE_TRANSIT:
    279      1.1  christos 				printf("\n\t      Neighbor Network-ID %s"
    280      1.1  christos                                        "\n\t      Neighbor Interface-ID %s, Interface %s",
    281      1.1  christos 				    ipaddr_string(&rlp->link_nrtid),
    282      1.1  christos 				    ipaddr_string(&rlp->link_nifid),
    283      1.1  christos 				    ipaddr_string(&rlp->link_ifid));
    284      1.1  christos 				break;
    285      1.1  christos 
    286      1.1  christos 			default:
    287      1.1  christos 				printf("\n\t      Unknown Router Links Type 0x%02x",
    288      1.1  christos 				    rlp->link_type);
    289      1.1  christos 				return (0);
    290      1.1  christos 			}
    291      1.1  christos 			printf(", metric %d", EXTRACT_16BITS(&rlp->link_metric));
    292      1.1  christos 			rlp++;
    293      1.1  christos 		}
    294      1.1  christos 		break;
    295      1.1  christos 
    296      1.1  christos 	case LS_TYPE_NETWORK | LS_SCOPE_AREA:
    297  1.1.1.2  christos 		if (lsa_length < sizeof (lsap->lsa_un.un_nla.nla_options))
    298  1.1.1.2  christos 			return (1);
    299  1.1.1.2  christos 		lsa_length -= sizeof (lsap->lsa_un.un_nla.nla_options);
    300      1.1  christos 		TCHECK(lsap->lsa_un.un_nla.nla_options);
    301      1.1  christos                 printf("\n\t      Options [%s]",
    302      1.1  christos                        bittok2str(ospf6_option_values, "none",
    303      1.1  christos                                   EXTRACT_32BITS(&lsap->lsa_un.un_nla.nla_options)));
    304  1.1.1.2  christos 
    305      1.1  christos 		printf("\n\t      Connected Routers:");
    306      1.1  christos 		ap = lsap->lsa_un.un_nla.nla_router;
    307  1.1.1.2  christos 		while (lsa_length != 0) {
    308  1.1.1.2  christos 			if (lsa_length < sizeof (*ap))
    309  1.1.1.2  christos 				return (1);
    310  1.1.1.2  christos 			lsa_length -= sizeof (*ap);
    311      1.1  christos 			TCHECK(*ap);
    312      1.1  christos 			printf("\n\t\t%s", ipaddr_string(ap));
    313      1.1  christos 			++ap;
    314      1.1  christos 		}
    315      1.1  christos 		break;
    316      1.1  christos 
    317      1.1  christos 	case LS_TYPE_INTER_AP | LS_SCOPE_AREA:
    318  1.1.1.2  christos 		if (lsa_length < sizeof (lsap->lsa_un.un_inter_ap.inter_ap_metric))
    319  1.1.1.2  christos 			return (1);
    320  1.1.1.2  christos 		lsa_length -= sizeof (lsap->lsa_un.un_inter_ap.inter_ap_metric);
    321      1.1  christos 		TCHECK(lsap->lsa_un.un_inter_ap.inter_ap_metric);
    322      1.1  christos 		printf(", metric %u",
    323      1.1  christos 			EXTRACT_32BITS(&lsap->lsa_un.un_inter_ap.inter_ap_metric) & SLA_MASK_METRIC);
    324  1.1.1.2  christos 
    325  1.1.1.2  christos 		tptr = (u_int8_t *)lsap->lsa_un.un_inter_ap.inter_ap_prefix;
    326  1.1.1.2  christos 		while (lsa_length != 0) {
    327  1.1.1.2  christos 			bytelen = ospf6_print_lsaprefix(tptr, lsa_length);
    328  1.1.1.2  christos 			if (bytelen < 0)
    329      1.1  christos 				goto trunc;
    330  1.1.1.2  christos 			lsa_length -= bytelen;
    331  1.1.1.2  christos 			tptr += bytelen;
    332      1.1  christos 		}
    333      1.1  christos 		break;
    334  1.1.1.2  christos 
    335  1.1.1.2  christos 	case LS_TYPE_ASE | LS_SCOPE_AS:
    336  1.1.1.2  christos 		if (lsa_length < sizeof (lsap->lsa_un.un_asla.asla_metric))
    337  1.1.1.2  christos 			return (1);
    338  1.1.1.2  christos 		lsa_length -= sizeof (lsap->lsa_un.un_asla.asla_metric);
    339      1.1  christos 		TCHECK(lsap->lsa_un.un_asla.asla_metric);
    340      1.1  christos 		flags32 = EXTRACT_32BITS(&lsap->lsa_un.un_asla.asla_metric);
    341      1.1  christos                 printf("\n\t     Flags [%s]",
    342      1.1  christos                        bittok2str(ospf6_asla_flag_values, "none", flags32));
    343      1.1  christos 		printf(" metric %u",
    344      1.1  christos 		       EXTRACT_32BITS(&lsap->lsa_un.un_asla.asla_metric) &
    345      1.1  christos 		       ASLA_MASK_METRIC);
    346  1.1.1.2  christos 
    347  1.1.1.2  christos 		tptr = (u_int8_t *)lsap->lsa_un.un_asla.asla_prefix;
    348  1.1.1.2  christos 		lsapp = (struct lsa6_prefix *)tptr;
    349  1.1.1.2  christos 		bytelen = ospf6_print_lsaprefix(tptr, lsa_length);
    350      1.1  christos 		if (bytelen < 0)
    351      1.1  christos 			goto trunc;
    352  1.1.1.2  christos 		lsa_length -= bytelen;
    353  1.1.1.2  christos 		tptr += bytelen;
    354      1.1  christos 
    355  1.1.1.2  christos 		if ((flags32 & ASLA_FLAG_FWDADDR) != 0) {
    356  1.1.1.2  christos 			struct in6_addr *fwdaddr6;
    357      1.1  christos 
    358  1.1.1.2  christos 			fwdaddr6 = (struct in6_addr *)tptr;
    359  1.1.1.2  christos 			if (lsa_length < sizeof (*fwdaddr6))
    360  1.1.1.2  christos 				return (1);
    361  1.1.1.2  christos 			lsa_length -= sizeof (*fwdaddr6);
    362  1.1.1.2  christos 			TCHECK(*fwdaddr6);
    363  1.1.1.2  christos 			printf(" forward %s",
    364  1.1.1.2  christos 			       ip6addr_string(fwdaddr6));
    365  1.1.1.2  christos 			tptr += sizeof(*fwdaddr6);
    366  1.1.1.2  christos 		}
    367      1.1  christos 
    368  1.1.1.2  christos 		if ((flags32 & ASLA_FLAG_ROUTETAG) != 0) {
    369  1.1.1.2  christos 			if (lsa_length < sizeof (u_int32_t))
    370  1.1.1.2  christos 				return (1);
    371  1.1.1.2  christos 			lsa_length -= sizeof (u_int32_t);
    372  1.1.1.2  christos 			TCHECK(*(u_int32_t *)tptr);
    373  1.1.1.2  christos 			printf(" tag %s",
    374  1.1.1.2  christos 			       ipaddr_string((u_int32_t *)tptr));
    375  1.1.1.2  christos 			tptr += sizeof(u_int32_t);
    376  1.1.1.2  christos 		}
    377      1.1  christos 
    378  1.1.1.2  christos 		if (lsapp->lsa_p_metric) {
    379  1.1.1.2  christos 			if (lsa_length < sizeof (u_int32_t))
    380  1.1.1.2  christos 				return (1);
    381  1.1.1.2  christos 			lsa_length -= sizeof (u_int32_t);
    382  1.1.1.2  christos 			TCHECK(*(u_int32_t *)tptr);
    383  1.1.1.2  christos 			printf(" RefLSID: %s",
    384  1.1.1.2  christos 			       ipaddr_string((u_int32_t *)tptr));
    385  1.1.1.2  christos 			tptr += sizeof(u_int32_t);
    386      1.1  christos 		}
    387      1.1  christos 		break;
    388      1.1  christos 
    389      1.1  christos 	case LS_TYPE_LINK:
    390      1.1  christos 		/* Link LSA */
    391      1.1  christos 		llsap = &lsap->lsa_un.un_llsa;
    392  1.1.1.2  christos 		if (lsa_length < sizeof (llsap->llsa_priandopt))
    393  1.1.1.2  christos 			return (1);
    394  1.1.1.2  christos 		lsa_length -= sizeof (llsap->llsa_priandopt);
    395  1.1.1.2  christos 		TCHECK(llsap->llsa_priandopt);
    396      1.1  christos                 printf("\n\t      Options [%s]",
    397      1.1  christos                        bittok2str(ospf6_option_values, "none",
    398      1.1  christos                                   EXTRACT_32BITS(&llsap->llsa_options)));
    399  1.1.1.2  christos 
    400  1.1.1.2  christos 		if (lsa_length < sizeof (llsap->llsa_lladdr) + sizeof (llsap->llsa_nprefix))
    401  1.1.1.2  christos 			return (1);
    402  1.1.1.2  christos 		lsa_length -= sizeof (llsap->llsa_lladdr) + sizeof (llsap->llsa_nprefix);
    403      1.1  christos                 prefixes = EXTRACT_32BITS(&llsap->llsa_nprefix);
    404      1.1  christos 		printf("\n\t      Priority %d, Link-local address %s, Prefixes %d:",
    405      1.1  christos                        llsap->llsa_priority,
    406      1.1  christos                        ip6addr_string(&llsap->llsa_lladdr),
    407      1.1  christos                        prefixes);
    408      1.1  christos 
    409      1.1  christos 		tptr = (u_int8_t *)llsap->llsa_prefix;
    410  1.1.1.2  christos 		while (prefixes > 0) {
    411  1.1.1.2  christos 			bytelen = ospf6_print_lsaprefix(tptr, lsa_length);
    412  1.1.1.2  christos 			if (bytelen < 0)
    413  1.1.1.2  christos 				goto trunc;
    414  1.1.1.2  christos 			prefixes--;
    415  1.1.1.2  christos 			lsa_length -= bytelen;
    416  1.1.1.2  christos 			tptr += bytelen;
    417  1.1.1.2  christos 		}
    418      1.1  christos 		break;
    419      1.1  christos 
    420      1.1  christos 	case LS_TYPE_INTRA_AP | LS_SCOPE_AREA:
    421      1.1  christos 		/* Intra-Area-Prefix LSA */
    422  1.1.1.2  christos 		if (lsa_length < sizeof (lsap->lsa_un.un_intra_ap.intra_ap_rtid))
    423  1.1.1.2  christos 			return (1);
    424  1.1.1.2  christos 		lsa_length -= sizeof (lsap->lsa_un.un_intra_ap.intra_ap_rtid);
    425      1.1  christos 		TCHECK(lsap->lsa_un.un_intra_ap.intra_ap_rtid);
    426      1.1  christos 		ospf6_print_ls_type(
    427      1.1  christos 			EXTRACT_16BITS(&lsap->lsa_un.un_intra_ap.intra_ap_lstype),
    428      1.1  christos 			&lsap->lsa_un.un_intra_ap.intra_ap_lsid);
    429  1.1.1.2  christos 
    430  1.1.1.2  christos 		if (lsa_length < sizeof (lsap->lsa_un.un_intra_ap.intra_ap_nprefix))
    431  1.1.1.2  christos 			return (1);
    432  1.1.1.2  christos 		lsa_length -= sizeof (lsap->lsa_un.un_intra_ap.intra_ap_nprefix);
    433      1.1  christos 		TCHECK(lsap->lsa_un.un_intra_ap.intra_ap_nprefix);
    434      1.1  christos                 prefixes = EXTRACT_16BITS(&lsap->lsa_un.un_intra_ap.intra_ap_nprefix);
    435      1.1  christos 		printf("\n\t      Prefixes %d:", prefixes);
    436      1.1  christos 
    437  1.1.1.2  christos 		tptr = (u_int8_t *)lsap->lsa_un.un_intra_ap.intra_ap_prefix;
    438  1.1.1.2  christos 		while (prefixes > 0) {
    439  1.1.1.2  christos 			bytelen = ospf6_print_lsaprefix(tptr, lsa_length);
    440  1.1.1.2  christos 			if (bytelen < 0)
    441  1.1.1.2  christos 				goto trunc;
    442  1.1.1.2  christos 			prefixes--;
    443  1.1.1.2  christos 			lsa_length -= bytelen;
    444  1.1.1.2  christos 			tptr += bytelen;
    445  1.1.1.2  christos 		}
    446      1.1  christos 		break;
    447      1.1  christos 
    448      1.1  christos         case LS_TYPE_GRACE | LS_SCOPE_LINKLOCAL:
    449      1.1  christos                 if (ospf_print_grace_lsa(tptr, lsa_length) == -1) {
    450      1.1  christos                     return 1;
    451      1.1  christos                 }
    452  1.1.1.2  christos                 break;
    453      1.1  christos 
    454      1.1  christos         case LS_TYPE_INTRA_ATE | LS_SCOPE_LINKLOCAL:
    455  1.1.1.2  christos                 if (ospf_print_te_lsa(tptr, lsa_length) == -1) {
    456  1.1.1.2  christos                     return 1;
    457  1.1.1.2  christos                 }
    458  1.1.1.2  christos                 break;
    459      1.1  christos 
    460      1.1  christos 	default:
    461  1.1.1.2  christos                 if(!print_unknown_data(tptr,
    462  1.1.1.2  christos                                        "\n\t      ",
    463  1.1.1.2  christos                                        lsa_length)) {
    464  1.1.1.2  christos                     return (1);
    465  1.1.1.2  christos                 }
    466  1.1.1.2  christos                 break;
    467      1.1  christos 	}
    468      1.1  christos 
    469      1.1  christos 	return (0);
    470      1.1  christos trunc:
    471      1.1  christos 	return (1);
    472      1.1  christos }
    473      1.1  christos 
    474      1.1  christos static int
    475      1.1  christos ospf6_decode_v3(register const struct ospf6hdr *op,
    476      1.1  christos     register const u_char *dataend)
    477      1.1  christos {
    478      1.1  christos 	register const rtrid_t *ap;
    479      1.1  christos 	register const struct lsr6 *lsrp;
    480      1.1  christos 	register const struct lsa6_hdr *lshp;
    481      1.1  christos 	register const struct lsa6 *lsap;
    482      1.1  christos 	register int i;
    483      1.1  christos 
    484      1.1  christos 	switch (op->ospf6_type) {
    485      1.1  christos 
    486      1.1  christos 	case OSPF_TYPE_HELLO:
    487      1.1  christos                 printf("\n\tOptions [%s]",
    488      1.1  christos                        bittok2str(ospf6_option_values, "none",
    489      1.1  christos                                   EXTRACT_32BITS(&op->ospf6_hello.hello_options)));
    490      1.1  christos 
    491      1.1  christos                 TCHECK(op->ospf6_hello.hello_deadint);
    492      1.1  christos                 printf("\n\t  Hello Timer %us, Dead Timer %us, Interface-ID %s, Priority %u",
    493      1.1  christos                        EXTRACT_16BITS(&op->ospf6_hello.hello_helloint),
    494      1.1  christos                        EXTRACT_16BITS(&op->ospf6_hello.hello_deadint),
    495      1.1  christos                        ipaddr_string(&op->ospf6_hello.hello_ifid),
    496      1.1  christos                        op->ospf6_hello.hello_priority);
    497      1.1  christos 
    498      1.1  christos 		TCHECK(op->ospf6_hello.hello_dr);
    499      1.1  christos 		if (op->ospf6_hello.hello_dr != 0)
    500      1.1  christos 			printf("\n\t  Designated Router %s",
    501      1.1  christos 			    ipaddr_string(&op->ospf6_hello.hello_dr));
    502      1.1  christos 		TCHECK(op->ospf6_hello.hello_bdr);
    503      1.1  christos 		if (op->ospf6_hello.hello_bdr != 0)
    504      1.1  christos 			printf(", Backup Designated Router %s",
    505      1.1  christos 			    ipaddr_string(&op->ospf6_hello.hello_bdr));
    506      1.1  christos 		if (vflag) {
    507      1.1  christos 			printf("\n\t  Neighbor List:");
    508      1.1  christos 			ap = op->ospf6_hello.hello_neighbor;
    509      1.1  christos 			while ((u_char *)ap < dataend) {
    510      1.1  christos 				TCHECK(*ap);
    511      1.1  christos 				printf("\n\t    %s", ipaddr_string(ap));
    512      1.1  christos 				++ap;
    513      1.1  christos 			}
    514      1.1  christos 		}
    515      1.1  christos 		break;	/* HELLO */
    516      1.1  christos 
    517      1.1  christos 	case OSPF_TYPE_DD:
    518      1.1  christos 		TCHECK(op->ospf6_db.db_options);
    519      1.1  christos                 printf("\n\tOptions [%s]",
    520      1.1  christos                        bittok2str(ospf6_option_values, "none",
    521      1.1  christos                                   EXTRACT_32BITS(&op->ospf6_db.db_options)));
    522      1.1  christos 		TCHECK(op->ospf6_db.db_flags);
    523      1.1  christos                 printf(", DD Flags [%s]",
    524      1.1  christos                        bittok2str(ospf6_dd_flag_values,"none",op->ospf6_db.db_flags));
    525      1.1  christos 
    526      1.1  christos 		TCHECK(op->ospf6_db.db_seq);
    527      1.1  christos 		printf(", MTU %u, DD-Sequence 0x%08x",
    528      1.1  christos                        EXTRACT_16BITS(&op->ospf6_db.db_mtu),
    529      1.1  christos                        EXTRACT_32BITS(&op->ospf6_db.db_seq));
    530      1.1  christos 
    531      1.1  christos                 /* Print all the LS adv's */
    532      1.1  christos                 lshp = op->ospf6_db.db_lshdr;
    533      1.1  christos                 while (!ospf6_print_lshdr(lshp)) {
    534      1.1  christos                     ++lshp;
    535      1.1  christos                 }
    536      1.1  christos 		break;
    537      1.1  christos 
    538      1.1  christos 	case OSPF_TYPE_LS_REQ:
    539      1.1  christos 		if (vflag) {
    540      1.1  christos 			lsrp = op->ospf6_lsr;
    541      1.1  christos 			while ((u_char *)lsrp < dataend) {
    542      1.1  christos 				TCHECK(*lsrp);
    543      1.1  christos                                 printf("\n\t  Advertising Router %s",
    544      1.1  christos                                        ipaddr_string(&lsrp->ls_router));
    545      1.1  christos 				ospf6_print_ls_type(EXTRACT_16BITS(&lsrp->ls_type),
    546      1.1  christos                                                     &lsrp->ls_stateid);
    547      1.1  christos 				++lsrp;
    548      1.1  christos 			}
    549      1.1  christos 		}
    550      1.1  christos 		break;
    551      1.1  christos 
    552      1.1  christos 	case OSPF_TYPE_LS_UPDATE:
    553      1.1  christos 		if (vflag) {
    554      1.1  christos 			lsap = op->ospf6_lsu.lsu_lsa;
    555      1.1  christos 			TCHECK(op->ospf6_lsu.lsu_count);
    556      1.1  christos 			i = EXTRACT_32BITS(&op->ospf6_lsu.lsu_count);
    557      1.1  christos 			while (i--) {
    558      1.1  christos 				if (ospf6_print_lsa(lsap))
    559      1.1  christos 					goto trunc;
    560      1.1  christos 				lsap = (struct lsa6 *)((u_char *)lsap +
    561      1.1  christos 				    EXTRACT_16BITS(&lsap->ls_hdr.ls_length));
    562      1.1  christos 			}
    563      1.1  christos 		}
    564      1.1  christos 		break;
    565      1.1  christos 
    566      1.1  christos 
    567      1.1  christos 	case OSPF_TYPE_LS_ACK:
    568      1.1  christos 		if (vflag) {
    569      1.1  christos 			lshp = op->ospf6_lsa.lsa_lshdr;
    570      1.1  christos 
    571      1.1  christos 			while (!ospf6_print_lshdr(lshp)) {
    572      1.1  christos 				++lshp;
    573      1.1  christos 			}
    574      1.1  christos 		}
    575      1.1  christos 		break;
    576      1.1  christos 
    577      1.1  christos 	default:
    578      1.1  christos 		break;
    579      1.1  christos 	}
    580      1.1  christos 	return (0);
    581      1.1  christos trunc:
    582      1.1  christos 	return (1);
    583      1.1  christos }
    584      1.1  christos 
    585      1.1  christos void
    586      1.1  christos ospf6_print(register const u_char *bp, register u_int length)
    587      1.1  christos {
    588      1.1  christos 	register const struct ospf6hdr *op;
    589      1.1  christos 	register const u_char *dataend;
    590      1.1  christos 	register const char *cp;
    591      1.1  christos 
    592      1.1  christos 	op = (struct ospf6hdr *)bp;
    593      1.1  christos 
    594      1.1  christos 	/* If the type is valid translate it, or just print the type */
    595      1.1  christos 	/* value.  If it's not valid, say so and return */
    596      1.1  christos 	TCHECK(op->ospf6_type);
    597      1.1  christos 	cp = tok2str(ospf6_type_values, "unknown LS-type", op->ospf6_type);
    598      1.1  christos 	printf("OSPFv%u, %s, length %d", op->ospf6_version, cp, length);
    599      1.1  christos 	if (*cp == 'u') {
    600      1.1  christos 		return;
    601      1.1  christos         }
    602      1.1  christos 
    603      1.1  christos         if(!vflag) { /* non verbose - so lets bail out here */
    604      1.1  christos                 return;
    605      1.1  christos         }
    606      1.1  christos 
    607      1.1  christos 	TCHECK(op->ospf6_len);
    608      1.1  christos 	if (length != EXTRACT_16BITS(&op->ospf6_len)) {
    609      1.1  christos 		printf(" [len %d]", EXTRACT_16BITS(&op->ospf6_len));
    610      1.1  christos 		return;
    611      1.1  christos 	}
    612      1.1  christos 	dataend = bp + length;
    613      1.1  christos 
    614      1.1  christos 	/* Print the routerid if it is not the same as the source */
    615      1.1  christos 	TCHECK(op->ospf6_routerid);
    616      1.1  christos 	printf("\n\tRouter-ID %s", ipaddr_string(&op->ospf6_routerid));
    617      1.1  christos 
    618      1.1  christos 	TCHECK(op->ospf6_areaid);
    619      1.1  christos 	if (op->ospf6_areaid != 0)
    620      1.1  christos 		printf(", Area %s", ipaddr_string(&op->ospf6_areaid));
    621      1.1  christos 	else
    622      1.1  christos 		printf(", Backbone Area");
    623      1.1  christos 	TCHECK(op->ospf6_instanceid);
    624      1.1  christos 	if (op->ospf6_instanceid)
    625      1.1  christos 		printf(", Instance %u", op->ospf6_instanceid);
    626      1.1  christos 
    627      1.1  christos 	/* Do rest according to version.	 */
    628      1.1  christos 	switch (op->ospf6_version) {
    629      1.1  christos 
    630      1.1  christos 	case 3:
    631      1.1  christos 		/* ospf version 3 */
    632      1.1  christos 		if (ospf6_decode_v3(op, dataend))
    633      1.1  christos 			goto trunc;
    634      1.1  christos 		break;
    635      1.1  christos 
    636      1.1  christos 	default:
    637      1.1  christos 		printf(" ospf [version %d]", op->ospf6_version);
    638      1.1  christos 		break;
    639      1.1  christos 	}			/* end switch on version */
    640      1.1  christos 
    641      1.1  christos 	return;
    642      1.1  christos trunc:
    643      1.1  christos 	fputs(tstr, stdout);
    644      1.1  christos }
    645