]> The Tcpdump Group git mirrors - tcpdump/blob - print-ospf.c
Add support for Apple's IP-over-IEEE 1394 encapsulation.
[tcpdump] / print-ospf.c
1 /*
2 * Copyright (c) 1992, 1993, 1994, 1995, 1996, 1997
3 * The Regents of the University of California. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that: (1) source code distributions
7 * retain the above copyright notice and this paragraph in its entirety, (2)
8 * distributions including binary code include the above copyright notice and
9 * this paragraph in its entirety in the documentation or other materials
10 * provided with the distribution, and (3) all advertising materials mentioning
11 * features or use of this software display the following acknowledgement:
12 * ``This product includes software developed by the University of California,
13 * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
14 * the University nor the names of its contributors may be used to endorse
15 * or promote products derived from this software without specific prior
16 * written permission.
17 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
18 * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
19 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
20 *
21 * OSPF support contributed by Jeffrey Honig (jch@mitchell.cit.cornell.edu)
22 */
23
24 #ifndef lint
25 static const char rcsid[] _U_ =
26 "@(#) $Header: /tcpdump/master/tcpdump/print-ospf.c,v 1.45.2.3 2003-11-19 09:43:47 guy Exp $ (LBL)";
27 #endif
28
29 #ifdef HAVE_CONFIG_H
30 #include "config.h"
31 #endif
32
33 #include <tcpdump-stdinc.h>
34
35 #include <stdio.h>
36
37 #include "interface.h"
38 #include "addrtoname.h"
39 #include "extract.h"
40 #include "gmpls.h"
41
42 #include "ospf.h"
43
44 #include "ip.h"
45
46 static struct tok ospf_option_values[] = {
47 { OSPF_OPTION_T, "TOS" },
48 { OSPF_OPTION_E, "External" },
49 { OSPF_OPTION_MC, "Multicast" },
50 { OSPF_OPTION_NP, "NSSA" },
51 { OSPF_OPTION_EA, "Advertise External" },
52 { OSPF_OPTION_DC, "Demand Circuit" },
53 { OSPF_OPTION_O, "Opaque" },
54 { 0, NULL }
55 };
56
57 static struct tok ospf_authtype_values[] = {
58 { OSPF_AUTH_NONE, "none" },
59 { OSPF_AUTH_NONE, "simple" },
60 { OSPF_AUTH_MD5, "MD5" },
61 { 0, NULL }
62 };
63
64 static struct tok ospf_rla_flag_values[] = {
65 { RLA_FLAG_B, "ABR" },
66 { RLA_FLAG_E, "ASBR" },
67 { RLA_FLAG_W1, "Virtual" },
68 { RLA_FLAG_W2, "W2" },
69 { 0, NULL }
70 };
71
72 static struct tok type2str[] = {
73 { OSPF_TYPE_UMD, "UMD" },
74 { OSPF_TYPE_HELLO, "Hello" },
75 { OSPF_TYPE_DD, "Database Description" },
76 { OSPF_TYPE_LS_REQ, "LS-Request" },
77 { OSPF_TYPE_LS_UPDATE, "LS-Update" },
78 { OSPF_TYPE_LS_ACK, "LS-Ack" },
79 { 0, NULL }
80 };
81
82 static struct tok lsa_values[] = {
83 { LS_TYPE_ROUTER, "Router" },
84 { LS_TYPE_NETWORK, "Network" },
85 { LS_TYPE_SUM_IP, "Summary" },
86 { LS_TYPE_SUM_ABR, "ASBR Summary" },
87 { LS_TYPE_ASE, "External" },
88 { LS_TYPE_GROUP, "Multicast Group" },
89 { LS_TYPE_NSSA, "NSSA" },
90 { LS_TYPE_OPAQUE_LL, "Link Local Opaque" },
91 { LS_TYPE_OPAQUE_AL, "Area Local Opaque" },
92 { LS_TYPE_OPAQUE_DW, "Domain Wide Opaque" },
93 { 0, NULL }
94 };
95
96 static struct tok ospf_dd_flag_values[] = {
97 { OSPF_DB_INIT, "Init" },
98 { OSPF_DB_MORE, "More" },
99 { OSPF_DB_MASTER, "Master" },
100 { 0, NULL }
101 };
102
103 static struct tok lsa_opaque_values[] = {
104 { LS_OPAQUE_TYPE_TE, "Traffic Engineering" },
105 { LS_OPAQUE_TYPE_GRACE, "Graceful restart" },
106 { 0, NULL }
107 };
108
109 static struct tok lsa_opaque_te_tlv_values[] = {
110 { LS_OPAQUE_TE_TLV_ROUTER, "Router Address" },
111 { LS_OPAQUE_TE_TLV_LINK, "Link" },
112 { 0, NULL }
113 };
114
115 static struct tok lsa_opaque_te_link_tlv_subtlv_values[] = {
116 { LS_OPAQUE_TE_LINK_SUBTLV_LINK_TYPE, "Link Type" },
117 { LS_OPAQUE_TE_LINK_SUBTLV_LINK_ID, "Link ID" },
118 { LS_OPAQUE_TE_LINK_SUBTLV_LOCAL_IP, "Local Interface IP address" },
119 { LS_OPAQUE_TE_LINK_SUBTLV_REMOTE_IP, "Remote Interface IP address" },
120 { LS_OPAQUE_TE_LINK_SUBTLV_TE_METRIC, "Traffic Engineering Metric" },
121 { LS_OPAQUE_TE_LINK_SUBTLV_MAX_BW, "Maximum Bandwidth" },
122 { LS_OPAQUE_TE_LINK_SUBTLV_MAX_RES_BW, "Maximum Reservable Bandwidth" },
123 { LS_OPAQUE_TE_LINK_SUBTLV_UNRES_BW, "Unreserved Bandwidth" },
124 { LS_OPAQUE_TE_LINK_SUBTLV_ADMIN_GROUP, "Administrative Group" },
125 { LS_OPAQUE_TE_LINK_SUBTLV_LINK_LOCAL_REMOTE_ID, "Link Local/Remote Identifier" },
126 { LS_OPAQUE_TE_LINK_SUBTLV_LINK_PROTECTION_TYPE, "Link Protection Type" },
127 { LS_OPAQUE_TE_LINK_SUBTLV_INTF_SW_CAP_DESCR, "Interface Switching Capability" },
128 { LS_OPAQUE_TE_LINK_SUBTLV_SHARED_RISK_GROUP, "Shared Risk Link Group" },
129 { 0, NULL }
130 };
131
132 #define LS_OPAQUE_TE_LINK_SUBTLV_LINK_TYPE_PTP 1 /* rfc3630 */
133 #define LS_OPAQUE_TE_LINK_SUBTLV_LINK_TYPE_MA 2 /* rfc3630 */
134
135 static struct tok lsa_opaque_te_tlv_link_type_sub_tlv_values[] = {
136 { LS_OPAQUE_TE_LINK_SUBTLV_LINK_TYPE_PTP, "Point-to-point" },
137 { LS_OPAQUE_TE_LINK_SUBTLV_LINK_TYPE_MA, "Multi-Access" },
138 { 0, NULL }
139 };
140
141 static char tstr[] = " [|ospf]";
142
143 #ifdef WIN32
144 #define inline __inline
145 #endif /* WIN32 */
146
147 static int ospf_print_lshdr(const struct lsa_hdr *);
148 static const u_char *ospf_print_lsa(const struct lsa *);
149 static int ospf_decode_v2(const struct ospfhdr *, const u_char *);
150
151 static int
152 ospf_print_lshdr(register const struct lsa_hdr *lshp)
153 {
154 u_int ls_length;
155
156 TCHECK(lshp->ls_length);
157 ls_length = EXTRACT_16BITS(&lshp->ls_length);
158 if (ls_length < sizeof(struct lsa_hdr)) {
159 printf("\n\t Bogus length %u < %lu", ls_length,
160 (unsigned long)sizeof(struct lsa_hdr));
161 return(-1);
162 }
163
164 TCHECK(lshp->ls_seq); /* XXX - ls_length check checked this */
165 printf("\n\t Advertising Router: %s, seq 0x%08x, age %us, length: %u",
166 ipaddr_string(&lshp->ls_router),
167 EXTRACT_32BITS(&lshp->ls_seq),
168 EXTRACT_16BITS(&lshp->ls_age),
169 ls_length-(u_int)sizeof(struct lsa_hdr));
170
171 TCHECK(lshp->ls_type); /* XXX - ls_length check checked this */
172 switch (lshp->ls_type) {
173 /* the LSA header for opaque LSAs was slightly changed */
174 case LS_TYPE_OPAQUE_LL:
175 case LS_TYPE_OPAQUE_AL:
176 case LS_TYPE_OPAQUE_DW:
177 printf("\n\t %s LSA (%d), Opaque-Type: %s LSA (%u), Opaque-ID: %u",
178 tok2str(lsa_values,"unknown",lshp->ls_type),
179 lshp->ls_type,
180
181 tok2str(lsa_opaque_values,
182 "unknown",
183 *(&lshp->un_lsa_id.opaque_field.opaque_type)),
184 *(&lshp->un_lsa_id.opaque_field.opaque_type),
185 EXTRACT_24BITS(&lshp->un_lsa_id.opaque_field.opaque_id)
186
187 );
188 break;
189
190 /* all other LSA types use regular style LSA headers */
191 default:
192 printf("\n\t %s LSA (%d), LSA-ID: %s",
193 tok2str(lsa_values,"unknown",lshp->ls_type),
194 lshp->ls_type,
195 ipaddr_string(&lshp->un_lsa_id.lsa_id));
196 break;
197 }
198
199 TCHECK(lshp->ls_options); /* XXX - ls_length check checked this */
200 printf("\n\t Options: [%s]", bittok2str(ospf_option_values,"none",lshp->ls_options));
201
202 return (ls_length);
203 trunc:
204 return (-1);
205 }
206
207 /*
208 * Print a single link state advertisement. If truncated or if LSA length
209 * field is less than the length of the LSA header, return NULl, else
210 * return pointer to data past end of LSA.
211 */
212 static const u_int8_t *
213 ospf_print_lsa(register const struct lsa *lsap)
214 {
215 register const u_int8_t *ls_end;
216 register const struct rlalink *rlp;
217 register const struct tos_metric *tosp;
218 register const struct in_addr *ap;
219 register const struct aslametric *almp;
220 register const struct mcla *mcp;
221 register const u_int32_t *lp;
222 register int j, k, tlv_type, tlv_length, subtlv_type, subtlv_length, priority_level;
223 register int ls_length;
224 const u_int8_t *tptr;
225 int count_srlg;
226 union { /* int to float conversion buffer for several subTLVs */
227 float f;
228 u_int32_t i;
229 } bw;
230
231 tptr = (u_int8_t *)lsap->lsa_un.un_unknown; /* squelch compiler warnings */
232 ls_length = ospf_print_lshdr(&lsap->ls_hdr);
233 if (ls_length == -1)
234 return(NULL);
235 ls_end = (u_int8_t *)lsap + ls_length;
236 ls_length -= sizeof(struct lsa_hdr);
237
238 switch (lsap->ls_hdr.ls_type) {
239
240 case LS_TYPE_ROUTER:
241 TCHECK(lsap->lsa_un.un_rla.rla_flags);
242 printf("\n\t Router LSA Options: [%s]", bittok2str(ospf_rla_flag_values,"none",lsap->lsa_un.un_rla.rla_flags));
243
244 TCHECK(lsap->lsa_un.un_rla.rla_count);
245 j = EXTRACT_16BITS(&lsap->lsa_un.un_rla.rla_count);
246 TCHECK(lsap->lsa_un.un_rla.rla_link);
247 rlp = lsap->lsa_un.un_rla.rla_link;
248 while (j--) {
249 TCHECK(*rlp);
250 switch (rlp->link_type) {
251
252 case RLA_TYPE_VIRTUAL:
253 printf("\n\t Virtual Link: Neighbor Router-ID: %s, Interface Address: %s",
254 ipaddr_string(&rlp->link_id),
255 ipaddr_string(&rlp->link_data));
256 break;
257
258 case RLA_TYPE_ROUTER:
259 printf("\n\t Neighbor Router-ID: %s, Interface Address: %s",
260 ipaddr_string(&rlp->link_id),
261 ipaddr_string(&rlp->link_data));
262 break;
263
264 case RLA_TYPE_TRANSIT:
265 printf("\n\t Neighbor Network-ID: %s, Interface Address: %s",
266 ipaddr_string(&rlp->link_id),
267 ipaddr_string(&rlp->link_data));
268 break;
269
270 case RLA_TYPE_STUB:
271 printf("\n\t Stub Network: %s, Mask: %s",
272 ipaddr_string(&rlp->link_id),
273 ipaddr_string(&rlp->link_data));
274 break;
275
276 default:
277 printf("\n\t Unknown Router Link Type (%u)",
278 rlp->link_type);
279 return (ls_end);
280 }
281 printf(", tos 0, metric: %d", EXTRACT_16BITS(&rlp->link_tos0metric));
282 tosp = (struct tos_metric *)
283 ((sizeof rlp->link_tos0metric) + (u_char *) rlp);
284 for (k = 0; k < (int) rlp->link_toscount; ++k, ++tosp) {
285 TCHECK(*tosp);
286 printf(", tos %d, metric: %d",
287 tosp->tos_type,
288 EXTRACT_16BITS(&tosp->tos_metric));
289 }
290 rlp = (struct rlalink *)((u_char *)(rlp + 1) +
291 ((rlp->link_toscount) * sizeof(*tosp)));
292 }
293 break;
294
295 case LS_TYPE_NETWORK:
296 TCHECK(lsap->lsa_un.un_nla.nla_mask);
297 printf("\n\t Mask %s\n\t Connected Routers:",
298 ipaddr_string(&lsap->lsa_un.un_nla.nla_mask));
299 ap = lsap->lsa_un.un_nla.nla_router;
300 while ((u_char *)ap < ls_end) {
301 TCHECK(*ap);
302 printf("\n\t %s", ipaddr_string(ap));
303 ++ap;
304 }
305 break;
306
307 case LS_TYPE_SUM_IP:
308 TCHECK(lsap->lsa_un.un_nla.nla_mask);
309 printf("\n\t Mask %s",
310 ipaddr_string(&lsap->lsa_un.un_sla.sla_mask));
311 TCHECK(lsap->lsa_un.un_sla.sla_tosmetric);
312 lp = lsap->lsa_un.un_sla.sla_tosmetric;
313 /* suppress tos if its not supported */
314 if(!((lsap->ls_hdr.ls_options)&OSPF_OPTION_T)) {
315 printf(", metric: %u", EXTRACT_32BITS(lp)&SLA_MASK_METRIC);
316 break;
317 }
318 while ((u_char *)lp < ls_end) {
319 register u_int32_t ul;
320
321 TCHECK(*lp);
322 ul = EXTRACT_32BITS(lp);
323 printf(", tos %d metric %d",
324 (ul & SLA_MASK_TOS) >> SLA_SHIFT_TOS,
325 ul & SLA_MASK_METRIC);
326 ++lp;
327 }
328 break;
329
330 case LS_TYPE_SUM_ABR:
331 TCHECK(lsap->lsa_un.un_sla.sla_tosmetric);
332 lp = lsap->lsa_un.un_sla.sla_tosmetric;
333 /* suppress tos if its not supported */
334 if(!((lsap->ls_hdr.ls_options)&OSPF_OPTION_T)) {
335 printf(", metric: %u", EXTRACT_32BITS(lp)&SLA_MASK_METRIC);
336 break;
337 }
338 while ((u_char *)lp < ls_end) {
339 register u_int32_t ul;
340
341 TCHECK(*lp);
342 ul = EXTRACT_32BITS(lp);
343 printf(", tos %d metric %d",
344 (ul & SLA_MASK_TOS) >> SLA_SHIFT_TOS,
345 ul & SLA_MASK_METRIC);
346 ++lp;
347 }
348 break;
349
350 case LS_TYPE_ASE:
351 TCHECK(lsap->lsa_un.un_nla.nla_mask);
352 printf("\n\t Mask %s",
353 ipaddr_string(&lsap->lsa_un.un_asla.asla_mask));
354
355 TCHECK(lsap->lsa_un.un_sla.sla_tosmetric);
356 almp = lsap->lsa_un.un_asla.asla_metric;
357 while ((u_char *)almp < ls_end) {
358 register u_int32_t ul;
359
360 TCHECK(almp->asla_tosmetric);
361 ul = EXTRACT_32BITS(&almp->asla_tosmetric);
362 printf(", type %d, tos %d metric:",
363 (ul & ASLA_FLAG_EXTERNAL) ? 2 : 1,
364 (ul & ASLA_MASK_TOS) >> ASLA_SHIFT_TOS);
365 if ((ul & ASLA_MASK_METRIC)==0xffffff)
366 printf(" infinite");
367 else
368 printf(" %d", (ul & ASLA_MASK_METRIC));
369
370 TCHECK(almp->asla_forward);
371 if (almp->asla_forward.s_addr) {
372 printf(", forward %s",
373 ipaddr_string(&almp->asla_forward));
374 }
375 TCHECK(almp->asla_tag);
376 if (almp->asla_tag.s_addr) {
377 printf(", tag %s",
378 ipaddr_string(&almp->asla_tag));
379 }
380 ++almp;
381 }
382 break;
383
384 case LS_TYPE_GROUP:
385 /* Multicast extensions as of 23 July 1991 */
386 mcp = lsap->lsa_un.un_mcla;
387 while ((u_char *)mcp < ls_end) {
388 TCHECK(mcp->mcla_vid);
389 switch (EXTRACT_32BITS(&mcp->mcla_vtype)) {
390
391 case MCLA_VERTEX_ROUTER:
392 printf("\n\t Router Router-ID %s",
393 ipaddr_string(&mcp->mcla_vid));
394 break;
395
396 case MCLA_VERTEX_NETWORK:
397 printf("\n\t Network Designated Router %s",
398 ipaddr_string(&mcp->mcla_vid));
399 break;
400
401 default:
402 printf("\n\t unknown VertexType (%u)",
403 EXTRACT_32BITS(&mcp->mcla_vtype));
404 break;
405 }
406 ++mcp;
407 }
408 break;
409
410 case LS_TYPE_OPAQUE_LL: /* fall through */
411 case LS_TYPE_OPAQUE_AL:
412 case LS_TYPE_OPAQUE_DW:
413
414 switch (*(&lsap->ls_hdr.un_lsa_id.opaque_field.opaque_type)) {
415 case LS_OPAQUE_TYPE_TE:
416 tptr = (u_int8_t *)(&lsap->lsa_un.un_te_lsa_tlv.type);
417
418 while (ls_length != 0) {
419 if (!TTEST2(*tptr, 4))
420 goto trunc;
421 if (ls_length < 4) {
422 printf("\n\t Remaining LS length %u < 4", ls_length);
423 return(ls_end);
424 }
425 tlv_type = EXTRACT_16BITS(tptr);
426 tlv_length = EXTRACT_16BITS(tptr+2);
427 tptr+=4;
428 ls_length-=4;
429
430 printf("\n\t %s TLV (%u), length: %u",
431 tok2str(lsa_opaque_te_tlv_values,"unknown",tlv_type),
432 tlv_type,
433 tlv_length);
434
435 if (tlv_length > ls_length) {
436 printf("\n\t Bogus length %u > %u", tlv_length,
437 ls_length);
438 return(ls_end);
439 }
440 ls_length-=tlv_length;
441 switch(tlv_type) {
442 case LS_OPAQUE_TE_TLV_LINK:
443 while (tlv_length != 0) {
444 if (tlv_length < 4) {
445 printf("\n\t Remaining TLV length %u < 4",
446 tlv_length);
447 return(ls_end);
448 }
449 if (!TTEST2(*tptr, 4))
450 goto trunc;
451 subtlv_type = EXTRACT_16BITS(tptr);
452 subtlv_length = EXTRACT_16BITS(tptr+2);
453 tptr+=4;
454 tlv_length-=4;
455
456 printf("\n\t %s subTLV (%u), length: %u",
457 tok2str(lsa_opaque_te_link_tlv_subtlv_values,"unknown",subtlv_type),
458 subtlv_type,
459 subtlv_length);
460
461 if (!TTEST2(*tptr, subtlv_length))
462 goto trunc;
463 switch(subtlv_type) {
464 case LS_OPAQUE_TE_LINK_SUBTLV_ADMIN_GROUP:
465 printf(", 0x%08x", EXTRACT_32BITS(tptr));
466 break;
467 case LS_OPAQUE_TE_LINK_SUBTLV_LINK_ID:
468 case LS_OPAQUE_TE_LINK_SUBTLV_LINK_LOCAL_REMOTE_ID:
469 printf(", %s (0x%08x)",
470 ipaddr_string(tptr),
471 EXTRACT_32BITS(tptr));
472 if (subtlv_length == 8) /* draft-ietf-ccamp-ospf-gmpls-extensions */
473 printf(", %s (0x%08x)",
474 ipaddr_string(tptr+4),
475 EXTRACT_32BITS(tptr+4));
476 break;
477 case LS_OPAQUE_TE_LINK_SUBTLV_LOCAL_IP:
478 case LS_OPAQUE_TE_LINK_SUBTLV_REMOTE_IP:
479 printf(", %s", ipaddr_string(tptr));
480 break;
481 case LS_OPAQUE_TE_LINK_SUBTLV_MAX_BW:
482 case LS_OPAQUE_TE_LINK_SUBTLV_MAX_RES_BW:
483 bw.i = EXTRACT_32BITS(tptr);
484 printf(", %.3f Mbps", bw.f*8/1000000 );
485 break;
486 case LS_OPAQUE_TE_LINK_SUBTLV_UNRES_BW:
487 for (priority_level = 0; priority_level < 8; priority_level++) {
488 bw.i = EXTRACT_32BITS(tptr+priority_level*4);
489 printf("\n\t\tpriority level %d: %.3f Mbps",
490 priority_level,
491 bw.f*8/1000000 );
492 }
493 break;
494 case LS_OPAQUE_TE_LINK_SUBTLV_TE_METRIC:
495 printf(", Metric %u", EXTRACT_32BITS(tptr));
496 break;
497 case LS_OPAQUE_TE_LINK_SUBTLV_LINK_PROTECTION_TYPE:
498 printf(", %s, Priority %u",
499 bittok2str(gmpls_link_prot_values, "none", *tptr),
500 *(tptr+1));
501 break;
502 case LS_OPAQUE_TE_LINK_SUBTLV_INTF_SW_CAP_DESCR:
503 printf("\n\t\tInterface Switching Capability: %s",
504 tok2str(gmpls_switch_cap_values, "Unknown", *(tptr)));
505 printf("\n\t\tLSP Encoding: %s\n\t\tMax LSP Bandwidth:",
506 tok2str(gmpls_encoding_values, "Unknown", *(tptr+1)));
507 for (priority_level = 0; priority_level < 8; priority_level++) {
508 bw.i = EXTRACT_32BITS(tptr+4+(priority_level*4));
509 printf("\n\t\t priority level %d: %.3f Mbps",
510 priority_level,
511 bw.f*8/1000000 );
512 }
513 break;
514 case LS_OPAQUE_TE_LINK_SUBTLV_LINK_TYPE:
515 printf(", %s (%u)",
516 tok2str(lsa_opaque_te_tlv_link_type_sub_tlv_values,"unknown",*tptr),
517 *tptr);
518 break;
519
520 case LS_OPAQUE_TE_LINK_SUBTLV_SHARED_RISK_GROUP:
521 count_srlg = subtlv_length / 4;
522 if (count_srlg != 0)
523 printf("\n\t\t Shared risk group: ");
524 while (count_srlg > 0) {
525 bw.i = EXTRACT_32BITS(tptr);
526 printf("%d",bw.i);
527 tptr+=4;
528 count_srlg--;
529 if (count_srlg > 0)
530 printf(", ");
531 }
532 break;
533
534 default:
535 if (vflag <= 1) {
536 if(!print_unknown_data(tptr,"\n\t\t",subtlv_length))
537 return(ls_end);
538 }
539 break;
540 }
541 /* in OSPF everything has to be 32-bit aligned, including TLVs */
542 if (subtlv_length%4 != 0)
543 subtlv_length+=4-(subtlv_length%4);
544
545 tlv_length-=subtlv_length;
546 tptr+=subtlv_length;
547
548 }
549 break;
550
551 case LS_OPAQUE_TE_TLV_ROUTER:
552 printf(", %s", ipaddr_string(tptr));
553 break;
554
555 default:
556 if (vflag <= 1) {
557 if(!print_unknown_data(tptr,"\n\t ",tlv_length))
558 return(ls_end);
559 }
560 break;
561 }
562 tptr+=tlv_length;
563 }
564 break;
565 }
566 break;
567 default:
568 if (vflag <= 1) {
569 if(!print_unknown_data((u_int8_t *)lsap->lsa_un.un_unknown,
570 "\n\t ", ls_length))
571 return(ls_end);
572 }
573 break;
574 }
575
576 /* do we want to see an additionally hexdump ? */
577 if (vflag> 1)
578 if(!print_unknown_data((u_int8_t *)lsap->lsa_un.un_unknown,
579 "\n\t ", ls_length)) {
580 return(ls_end);
581 }
582
583 return (ls_end);
584 trunc:
585 return (NULL);
586 }
587
588 static int
589 ospf_decode_v2(register const struct ospfhdr *op,
590 register const u_char *dataend)
591 {
592 register const struct in_addr *ap;
593 register const struct lsr *lsrp;
594 register const struct lsa_hdr *lshp;
595 register const struct lsa *lsap;
596 register u_int32_t lsa_count,lsa_count_max;
597
598 switch (op->ospf_type) {
599
600 case OSPF_TYPE_UMD:
601 /*
602 * Rob Coltun's special monitoring packets;
603 * do nothing
604 */
605 break;
606
607 case OSPF_TYPE_HELLO:
608 printf("\n\tOptions: [%s]",
609 bittok2str(ospf_option_values,"none",op->ospf_hello.hello_options));
610
611 TCHECK(op->ospf_hello.hello_deadint);
612 printf("\n\t Hello Timer: %us, Dead Timer %us, Mask: %s, Priority: %u",
613 EXTRACT_16BITS(&op->ospf_hello.hello_helloint),
614 EXTRACT_32BITS(&op->ospf_hello.hello_deadint),
615 ipaddr_string(&op->ospf_hello.hello_mask),
616 op->ospf_hello.hello_priority);
617
618 TCHECK(op->ospf_hello.hello_dr);
619 if (op->ospf_hello.hello_dr.s_addr != 0)
620 printf("\n\t Designated Router %s",
621 ipaddr_string(&op->ospf_hello.hello_dr));
622
623 TCHECK(op->ospf_hello.hello_bdr);
624 if (op->ospf_hello.hello_bdr.s_addr != 0)
625 printf(", Backup Designated Router %s",
626 ipaddr_string(&op->ospf_hello.hello_bdr));
627
628 ap = op->ospf_hello.hello_neighbor;
629 if ((u_char *)ap < dataend)
630 printf("\n\t Neighbor List:");
631 while ((u_char *)ap < dataend) {
632 TCHECK(*ap);
633 printf("\n\t %s", ipaddr_string(ap));
634 ++ap;
635 }
636 break; /* HELLO */
637
638 case OSPF_TYPE_DD:
639 TCHECK(op->ospf_db.db_options);
640 printf("\n\tOptions: [%s]",
641 bittok2str(ospf_option_values,"none",op->ospf_db.db_options));
642 TCHECK(op->ospf_db.db_flags);
643 printf(", DD Flags: [%s]",
644 bittok2str(ospf_dd_flag_values,"none",op->ospf_db.db_flags));
645
646 if (vflag) {
647 /* Print all the LS adv's */
648 lshp = op->ospf_db.db_lshdr;
649 while (ospf_print_lshdr(lshp) != -1) {
650 ++lshp;
651 }
652 }
653 break;
654
655 case OSPF_TYPE_LS_REQ:
656 lsrp = op->ospf_lsr;
657 while ((u_char *)lsrp < dataend) {
658 TCHECK(*lsrp);
659
660 printf("\n\t Advertising Router: %s, %s LSA (%u)",
661 ipaddr_string(&lsrp->ls_router),
662 tok2str(lsa_values,"unknown",EXTRACT_32BITS(lsrp->ls_type)),
663 EXTRACT_32BITS(&lsrp->ls_type));
664
665 switch (EXTRACT_32BITS(lsrp->ls_type)) {
666 /* the LSA header for opaque LSAs was slightly changed */
667 case LS_TYPE_OPAQUE_LL:
668 case LS_TYPE_OPAQUE_AL:
669 case LS_TYPE_OPAQUE_DW:
670 printf(", Opaque-Type: %s LSA (%u), Opaque-ID: %u",
671 tok2str(lsa_opaque_values, "unknown",lsrp->un_ls_stateid.opaque_field.opaque_type),
672 lsrp->un_ls_stateid.opaque_field.opaque_type,
673 EXTRACT_24BITS(&lsrp->un_ls_stateid.opaque_field.opaque_id));
674 break;
675 default:
676 printf(", LSA-ID: %s",
677 ipaddr_string(&lsrp->un_ls_stateid.ls_stateid));
678 break;
679 }
680
681 ++lsrp;
682 }
683 break;
684
685 case OSPF_TYPE_LS_UPDATE:
686 lsap = op->ospf_lsu.lsu_lsa;
687 TCHECK(op->ospf_lsu.lsu_count);
688 lsa_count_max = EXTRACT_32BITS(&op->ospf_lsu.lsu_count);
689 printf(", %d LSA%s",lsa_count_max, lsa_count_max > 1 ? "s" : "");
690 for (lsa_count=1;lsa_count <= lsa_count_max;lsa_count++) {
691 printf("\n\t LSA #%u",lsa_count);
692 lsap = (const struct lsa *)ospf_print_lsa(lsap);
693 if (lsap == NULL)
694 goto trunc;
695 }
696 break;
697
698 case OSPF_TYPE_LS_ACK:
699 lshp = op->ospf_lsa.lsa_lshdr;
700 while (ospf_print_lshdr(lshp) != -1) {
701 ++lshp;
702 }
703 break;
704
705 default:
706 printf("v2 type (%d)", op->ospf_type);
707 break;
708 }
709 return (0);
710 trunc:
711 return (1);
712 }
713
714 void
715 ospf_print(register const u_char *bp, register u_int length,
716 register const u_char *bp2)
717 {
718 register const struct ospfhdr *op;
719 register const struct ip *ip;
720 register const u_char *dataend;
721 register const char *cp;
722
723 op = (struct ospfhdr *)bp;
724 ip = (struct ip *)bp2;
725
726 /* XXX Before we do anything else, strip off the MD5 trailer */
727 TCHECK(op->ospf_authtype);
728 if (EXTRACT_16BITS(&op->ospf_authtype) == OSPF_AUTH_MD5) {
729 length -= OSPF_AUTH_MD5_LEN;
730 snapend -= OSPF_AUTH_MD5_LEN;
731 }
732
733 /* If the type is valid translate it, or just print the type */
734 /* value. If it's not valid, say so and return */
735 TCHECK(op->ospf_type);
736 cp = tok2str(type2str, "unknown LS-type", op->ospf_type);
737 printf("OSPFv%u, %s (%u), length: %u",
738 op->ospf_version,
739 cp,
740 op->ospf_type,
741 length);
742 if (*cp == 'u')
743 return;
744
745 if(!vflag) /* non verbose - so lets bail out here */
746 return;
747
748 TCHECK(op->ospf_len);
749 if (length != EXTRACT_16BITS(&op->ospf_len)) {
750 printf(" [len %d]", EXTRACT_16BITS(&op->ospf_len));
751 return;
752 }
753 dataend = bp + length;
754
755 TCHECK(op->ospf_routerid);
756 printf("\n\tRouter-ID: %s", ipaddr_string(&op->ospf_routerid));
757
758 TCHECK(op->ospf_areaid);
759 if (op->ospf_areaid.s_addr != 0)
760 printf(", Area %s", ipaddr_string(&op->ospf_areaid));
761 else
762 printf(", Backbone Area");
763
764 if (vflag) {
765 /* Print authentication data (should we really do this?) */
766 TCHECK2(op->ospf_authdata[0], sizeof(op->ospf_authdata));
767
768 printf(", Authentication Type: %s (%u)",
769 tok2str(ospf_authtype_values,"unknown",EXTRACT_16BITS(&op->ospf_authtype)),
770 EXTRACT_16BITS(&op->ospf_authtype));
771
772 switch (EXTRACT_16BITS(&op->ospf_authtype)) {
773
774 case OSPF_AUTH_NONE:
775 break;
776
777 case OSPF_AUTH_SIMPLE:
778 (void)fn_printn(op->ospf_authdata,
779 sizeof(op->ospf_authdata), NULL);
780 printf("\"");
781 break;
782
783 case OSPF_AUTH_MD5:
784 printf("\n\tKey-ID: %u, Auth-Length: %u, Crypto Sequence Number: 0x%08x",
785 *((op->ospf_authdata)+2),
786 *((op->ospf_authdata)+3),
787 EXTRACT_32BITS((op->ospf_authdata)+4));
788 break;
789
790 default:
791 return;
792 }
793 }
794 /* Do rest according to version. */
795 switch (op->ospf_version) {
796
797 case 2:
798 /* ospf version 2 */
799 if (ospf_decode_v2(op, dataend))
800 goto trunc;
801 break;
802
803 default:
804 printf(" ospf [version %d]", op->ospf_version);
805 break;
806 } /* end switch on version */
807
808 return;
809 trunc:
810 fputs(tstr, stdout);
811 }