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