]> The Tcpdump Group git mirrors - tcpdump/blob - print-isoclns.c
projects / tcpdump / blob
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
test of using "file" directive
[tcpdump] / print-isoclns.c
1 /*
2 * Copyright (c) 1992, 1993, 1994, 1995, 1996
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 * Original code by Matt Thomas, Digital Equipment Corporation
22 *
23 * Extensively modified by Hannes Gredler (hannes@juniper.net) for more
24 * complete IS-IS support.
25 */
26
27 #ifndef lint
28 static const char rcsid[] =
29 "@(#) $Header: /tcpdump/master/tcpdump/print-isoclns.c,v 1.77 2003-02-24 09:36:56 hannes Exp $ (LBL)";
30 #endif
31
32 #ifdef HAVE_CONFIG_H
33 #include "config.h"
34 #endif
35
36 #include <tcpdump-stdinc.h>
37
38 #include <stdio.h>
39 #include <string.h>
40
41 #include "interface.h"
42 #include "addrtoname.h"
43 #include "ethertype.h"
44 #include "ether.h"
45 #include "extract.h"
46
47 #define NLPID_CLNS 129 /* 0x81 */
48 #define NLPID_ESIS 130 /* 0x82 */
49 #define NLPID_ISIS 131 /* 0x83 */
50 #define NLPID_IP6 0x8e
51 #define NLPID_IP 0xcc
52 #define NLPID_NULLNS 0
53
54 #define IPV4 1 /* AFI value */
55 #define IPV6 2 /* AFI value */
56
57 /*
58 * IS-IS is defined in ISO 10589. Look there for protocol definitions.
59 */
60
61 #define SYSTEM_ID_LEN ETHER_ADDR_LEN
62 #define NODE_ID_LEN SYSTEM_ID_LEN+1
63 #define LSP_ID_LEN SYSTEM_ID_LEN+2
64
65 #define ISIS_VERSION 1
66 #define PDU_TYPE_MASK 0x1F
67 #define PRIORITY_MASK 0x7F
68
69 #define L1_LAN_IIH 15
70 #define L2_LAN_IIH 16
71 #define PTP_IIH 17
72 #define L1_LSP 18
73 #define L2_LSP 20
74 #define L1_CSNP 24
75 #define L2_CSNP 25
76 #define L1_PSNP 26
77 #define L2_PSNP 27
78
79 static struct tok isis_pdu_values[] = {
80 { L1_LAN_IIH, "L1 Lan IIH"},
81 { L2_LAN_IIH, "L2 Lan IIH"},
82 { PTP_IIH, "p2p IIH"},
83 { L1_LSP, "L1 LSP"},
84 { L2_LSP, "L2 LSP"},
85 { L1_CSNP, "L1 CSNP"},
86 { L2_CSNP, "L2 CSNP"},
87 { L1_PSNP, "L1 PSNP"},
88 { L2_PSNP, "L2 PSNP"},
89 { 0, NULL}
90 };
91
92 /*
93 * A TLV is a tuple of a type, length and a value and is normally used for
94 * encoding information in all sorts of places. This is an enumeration of
95 * the well known types.
96 *
97 * list taken from rfc3359 plus some memory from veterans ;-)
98 */
99
100 #define TLV_AREA_ADDR 1 /* iso10589 */
101 #define TLV_IS_REACH 2 /* iso10589 */
102 #define TLV_ESNEIGH 3 /* iso10589 */
103 #define TLV_PART_DIS 4 /* iso10589 */
104 #define TLV_PREFIX_NEIGH 5 /* iso10589 */
105 #define TLV_ISNEIGH 6 /* iso10589 */
106 #define TLV_ISNEIGH_VARLEN 7 /* iso10589 */
107 #define TLV_PADDING 8 /* iso10589 */
108 #define TLV_LSP 9 /* iso10589 */
109 #define TLV_AUTH 10 /* iso10589, draft-ietf-isis-hmac-03 */
110 #define TLV_CHECKSUM 12 /* rfc3358 */
111 #define TLV_LSP_BUFFERSIZE 14 /* iso10589 rev2 */
112 #define TLV_EXT_IS_REACH 22 /* draft-ietf-isis-traffic-04 */
113 #define TLV_IS_ALIAS_ID 24 /* draft-ietf-isis-ext-lsp-frags-02 */
114 #define TLV_DECNET_PHASE4 42
115 #define TLV_LUCENT_PRIVATE 66
116 #define TLV_IP_REACH 128 /* rfc1195, rfc2966 */
117 #define TLV_PROTOCOLS 129 /* rfc1195 */
118 #define TLV_IP_REACH_EXT 130 /* rfc1195, rfc2966 */
119 #define TLV_IDRP_INFO 131 /* rfc1195 */
120 #define TLV_IPADDR 132 /* rfc1195 */
121 #define TLV_IPAUTH 133 /* rfc1195 */
122 #define TLV_TE_ROUTER_ID 134 /* draft-ietf-isis-traffic-04 */
123 #define TLV_EXT_IP_REACH 135 /* draft-ietf-isis-traffic-04 */
124 #define TLV_HOSTNAME 137 /* rfc2763 */
125 #define TLV_SHARED_RISK_GROUP 138 /* draft-ietf-isis-gmpls-extensions-14 */
126 #define TLV_NORTEL_PRIVATE1 176
127 #define TLV_NORTEL_PRIVATE2 177
128 #define TLV_HOLDTIME 198 /* ES-IS */
129 #define TLV_RESTART_SIGNALING 211 /* draft-ietf-isis-restart-01 */
130 #define TLV_MT_IS_REACH 222 /* draft-ietf-isis-wg-multi-topology-05 */
131 #define TLV_MT_SUPPORTED 229 /* draft-ietf-isis-wg-multi-topology-05 */
132 #define TLV_IP6ADDR 232 /* draft-ietf-isis-ipv6-02 */
133 #define TLV_MT_IP_REACH 235 /* draft-ietf-isis-wg-multi-topology-05 */
134 #define TLV_IP6_REACH 236 /* draft-ietf-isis-ipv6-02 */
135 #define TLV_MT_IP6_REACH 237 /* draft-ietf-isis-wg-multi-topology-05 */
136 #define TLV_PTP_ADJ 240 /* rfc3373 */
137 #define TLV_IIH_SEQNR 241 /* draft-shen-isis-iih-sequence-00 */
138 #define TLV_VENDOR_PRIVATE 250 /* draft-ietf-isis-proprietary-tlv-00 */
139
140 static struct tok isis_tlv_values[] = {
141 { TLV_AREA_ADDR, "Area address(es)"},
142 { TLV_IS_REACH, "IS Reachability"},
143 { TLV_ESNEIGH, "ES Neighbor(s)"},
144 { TLV_PART_DIS, "Partition DIS"},
145 { TLV_PREFIX_NEIGH, "Prefix Neighbors"},
146 { TLV_ISNEIGH, "IS Neighbor(s)"},
147 { TLV_ISNEIGH_VARLEN, "IS Neighbor(s) (variable length)"},
148 { TLV_PADDING, "Padding"},
149 { TLV_LSP, "LSP entries"},
150 { TLV_AUTH, "Authentication"},
151 { TLV_CHECKSUM, "Checksum"},
152 { TLV_LSP_BUFFERSIZE, "LSP Buffersize"},
153 { TLV_EXT_IS_REACH, "Extended IS Reachability"},
154 { TLV_IS_ALIAS_ID, "IS Alias ID"},
155 { TLV_DECNET_PHASE4, "DECnet Phase IV"},
156 { TLV_LUCENT_PRIVATE, "Lucent Proprietary"},
157 { TLV_IP_REACH, "IPv4 Internal reachability"},
158 { TLV_PROTOCOLS, "Protocols supported"},
159 { TLV_IP_REACH_EXT, "IPv4 External reachability"},
160 { TLV_IDRP_INFO, "Inter-Domain Information Type"},
161 { TLV_IPADDR, "IPv4 Interface address(es)"},
162 { TLV_IPAUTH, "IPv4 authentication (deprecated)"},
163 { TLV_TE_ROUTER_ID, "Traffic Engineering Router ID"},
164 { TLV_EXT_IP_REACH, "Extended IPv4 reachability"},
165 { TLV_HOSTNAME, "Hostname"},
166 { TLV_SHARED_RISK_GROUP, "Shared Risk Link Group"},
167 { TLV_NORTEL_PRIVATE1, "Nortel Proprietary"},
168 { TLV_NORTEL_PRIVATE2, "Nortel Proprietary"},
169 { TLV_HOLDTIME, "Holdtime"},
170 { TLV_RESTART_SIGNALING, "Restart Signaling"},
171 { TLV_MT_IS_REACH, "Multi Topology IS Reachability"},
172 { TLV_MT_SUPPORTED, "Multi Topology"},
173 { TLV_IP6ADDR, "IPv6 Interface address(es)"},
174 { TLV_MT_IP_REACH, "Multi-Topology IPv4 reachability"},
175 { TLV_IP6_REACH, "IPv6 reachability"},
176 { TLV_MT_IP6_REACH, "Multi-Topology IP6 reachability"},
177 { TLV_PTP_ADJ, "Point-to-point Adjacency State"},
178 { TLV_IIH_SEQNR, "Hello PDU Sequence Number"},
179 { TLV_VENDOR_PRIVATE, "Vendor Private"},
180 { 0, NULL }
181 };
182
183 #define SUBTLV_EXT_IS_REACH_ADMIN_GROUP 3
184 #define SUBTLV_EXT_IS_REACH_LINK_LOCAL_ID 4
185 #define SUBTLV_EXT_IS_REACH_LINK_REMOTE_ID 5
186 #define SUBTLV_EXT_IS_REACH_IPV4_INTF_ADDR 6
187 #define SUBTLV_EXT_IS_REACH_IPV4_NEIGHBOR_ADDR 8
188 #define SUBTLV_EXT_IS_REACH_MAX_LINK_BW 9
189 #define SUBTLV_EXT_IS_REACH_RESERVABLE_BW 10
190 #define SUBTLV_EXT_IS_REACH_UNRESERVED_BW 11
191 #define SUBTLV_EXT_IS_REACH_TE_METRIC 18
192 #define SUBTLV_EXT_IS_REACH_LINK_PROTECTION_TYPE 20
193 #define SUBTLV_EXT_IS_REACH_INTF_SW_CAP_DESCR 21
194
195 #define SUBTLV_IP_REACH_ADMIN_TAG32 1
196 #define SUBTLV_IP_REACH_ADMIN_TAG64 2
197
198 #define SUBTLV_AUTH_SIMPLE 1
199 #define SUBTLV_AUTH_MD5 54
200 #define SUBTLV_AUTH_MD5_LEN 16
201 #define SUBTLV_AUTH_PRIVATE 255
202
203 static struct tok isis_subtlv_auth_values[] = {
204 { SUBTLV_AUTH_SIMPLE, "simple text password"},
205 { SUBTLV_AUTH_MD5, "HMAC-MD5 password"},
206 { SUBTLV_AUTH_PRIVATE, "Routing Domain private password"},
207 { 0, NULL }
208 };
209
210 #define SUBTLV_IDRP_RES 0
211 #define SUBTLV_IDRP_LOCAL 1
212 #define SUBTLV_IDRP_ASN 2
213
214 static struct tok isis_subtlv_idrp_values[] = {
215 { SUBTLV_IDRP_RES, "Reserved"},
216 { SUBTLV_IDRP_LOCAL, "Routing-Domain Specific"},
217 { SUBTLV_IDRP_ASN, "AS Number Tag"},
218 { 0, NULL}
219 };
220
221 #define ISIS_8BIT_MASK(x) ((x)&0xff)
222
223 #define ISIS_MASK_LSP_OL_BIT(x) ((x)&0x4)
224 #define ISIS_MASK_LSP_ISTYPE_BITS(x) ((x)&0x3)
225 #define ISIS_MASK_LSP_PARTITION_BIT(x) ((x)&0x80)
226 #define ISIS_MASK_LSP_ATT_BITS(x) ((x)&0x78)
227 #define ISIS_MASK_LSP_ATT_ERROR_BIT(x) ((x)&0x40)
228 #define ISIS_MASK_LSP_ATT_EXPENSE_BIT(x) ((x)&0x20)
229 #define ISIS_MASK_LSP_ATT_DELAY_BIT(x) ((x)&0x10)
230 #define ISIS_MASK_LSP_ATT_DEFAULT_BIT(x) ((x)&0x8)
231
232 #define ISIS_MASK_MTID(x) ((x)&0x0fff)
233 #define ISIS_MASK_MTFLAGS(x) ((x)&0xf000)
234
235 static struct tok isis_mt_flag_values[] = {
236 { 0x4000, "sub-TLVs present"},
237 { 0x8000, "ATT bit set"},
238 { 0, NULL}
239 };
240
241 #define ISIS_MASK_TLV_EXT_IP_UPDOWN(x) ((x)&0x80)
242 #define ISIS_MASK_TLV_EXT_IP_SUBTLV(x) ((x)&0x40)
243
244 #define ISIS_MASK_TLV_EXT_IP6_IE(x) ((x)&0x40)
245 #define ISIS_MASK_TLV_EXT_IP6_SUBTLV(x) ((x)&0x20)
246
247 #define ISIS_MASK_TLV_RESTART_RR(x) ((x)&0x1)
248 #define ISIS_MASK_TLV_RESTART_RA(x) ((x)&0x2)
249
250 #define ISIS_LSP_TLV_METRIC_SUPPORTED(x) ((x)&0x80)
251 #define ISIS_LSP_TLV_METRIC_IE(x) ((x)&0x40)
252 #define ISIS_LSP_TLV_METRIC_UPDOWN(x) ((x)&0x80)
253 #define ISIS_LSP_TLV_METRIC_VALUE(x) ((x)&0x3f)
254
255 #define ISIS_MASK_TLV_SHARED_RISK_GROUP(x) ((x)&0x1)
256
257 static struct tok isis_gmpls_link_prot_values[] = {
258 { 0x01, "Extra Traffic"},
259 { 0x02, "Unprotected"},
260 { 0x04, "Shared"},
261 { 0x08, "Dedicated 1:1"},
262 { 0x10, "Dedicated 1+1"},
263 { 0x20, "Enhanced"},
264 { 0x40, "Reserved"},
265 { 0x80, "Reserved"},
266 { 0, NULL }
267 };
268
269 static struct tok isis_gmpls_sw_cap_values[] = {
270 { 1, "Packet-Switch Capable-1"},
271 { 2, "Packet-Switch Capable-2"},
272 { 3, "Packet-Switch Capable-3"},
273 { 4, "Packet-Switch Capable-4"},
274 { 51, "Layer-2 Switch Capable"},
275 { 100, "Time-Division-Multiplex"},
276 { 150, "Lambda-Switch Capable"},
277 { 200, "Fiber-Switch Capable"},
278 { 0, NULL }
279 };
280
281 static struct tok isis_gmpls_lsp_enc_values[] = {
282 { 1, "Packet"},
283 { 2, "Ethernet V2/DIX"},
284 { 3, "ANSI PDH"},
285 { 4, "ETSI PDH"},
286 { 5, "SDH ITU-T G.707"},
287 { 6, "SONET ANSI T1.105"},
288 { 7, "Digital Wrapper"},
289 { 8, "Lambda (photonic)"},
290 { 9, "Fiber"},
291 { 10, "Ethernet 802.3"},
292 { 11, "FiberChannel"},
293 { 0, NULL }
294 };
295
296 static struct tok isis_mt_values[] = {
297 { 0, "IPv4 unicast"},
298 { 1, "In-Band Management"},
299 { 2, "IPv6 unicast"},
300 { 3, "Multicast"},
301 { 4095, "Development, Experimental or Proprietary"},
302 { 0, NULL }
303 };
304
305 static struct tok isis_iih_circuit_type_values[] = {
306 { 1, "Level 1 only"},
307 { 2, "Level 2 only"},
308 { 3, "Level 1, Level 2"},
309 { 0, NULL}
310 };
311
312 #define ISIS_LSP_TYPE_UNUSED0 0
313 #define ISIS_LSP_TYPE_LEVEL_1 1
314 #define ISIS_LSP_TYPE_UNUSED2 2
315 #define ISIS_LSP_TYPE_LEVEL_2 3
316
317 static struct tok isis_lsp_istype_values[] = {
318 { ISIS_LSP_TYPE_UNUSED0, "Unused 0x0 (invalid)"},
319 { ISIS_LSP_TYPE_LEVEL_1, "L1 IS"},
320 { ISIS_LSP_TYPE_UNUSED2, "Unused 0x2 (invalid)"},
321 { ISIS_LSP_TYPE_LEVEL_2, "L1L2 IS"},
322 { 0, NULL }
323 };
324
325 static struct tok osi_nlpid_values[] = {
326 { NLPID_CLNS, "CLNS"},
327 { NLPID_IP, "IPv4"},
328 { NLPID_IP6, "IPv6"},
329 { 0, NULL }
330 };
331
332 /*
333 * Katz's point to point adjacency TLV uses codes to tell us the state of
334 * the remote adjacency. Enumerate them.
335 */
336
337 #define ISIS_PTP_ADJ_UP 0
338 #define ISIS_PTP_ADJ_INIT 1
339 #define ISIS_PTP_ADJ_DOWN 2
340
341
342 static struct tok isis_ptp_adjancey_values[] = {
343 { ISIS_PTP_ADJ_UP, "Up" },
344 { ISIS_PTP_ADJ_INIT, "Initializing" },
345 { ISIS_PTP_ADJ_DOWN, "Down" },
346 { 0, NULL}
347 };
348
349 struct isis_tlv_ptp_adj {
350 u_int8_t adjacency_state;
351 u_int8_t extd_local_circuit_id[4];
352 u_int8_t neighbor_sysid[SYSTEM_ID_LEN];
353 u_int8_t neighbor_extd_local_circuit_id[4];
354 };
355
356 static int osi_cksum(const u_int8_t *, u_int);
357 static void esis_print(const u_int8_t *, u_int);
358 static int isis_print(const u_int8_t *, u_int);
359
360 struct isis_metric_block {
361 u_int8_t metric_default;
362 u_int8_t metric_delay;
363 u_int8_t metric_expense;
364 u_int8_t metric_error;
365 };
366
367 struct isis_tlv_is_reach {
368 struct isis_metric_block isis_metric_block;
369 u_int8_t neighbor_nodeid[NODE_ID_LEN];
370 };
371
372 struct isis_tlv_es_reach {
373 struct isis_metric_block isis_metric_block;
374 u_int8_t neighbor_sysid[SYSTEM_ID_LEN];
375 };
376
377 struct isis_tlv_ip_reach {
378 struct isis_metric_block isis_metric_block;
379 u_int8_t prefix[4];
380 u_int8_t mask[4];
381 };
382
383 static struct tok isis_is_reach_virtual_values[] = {
384 { 0, "IsNotVirtual"},
385 { 1, "IsVirtual"},
386 { 0, NULL }
387 };
388
389 struct isis_common_header {
390 u_int8_t nlpid;
391 u_int8_t fixed_len;
392 u_int8_t version; /* Protocol version */
393 u_int8_t id_length;
394 u_int8_t pdu_type; /* 3 MSbits are reserved */
395 u_int8_t pdu_version; /* Packet format version */
396 u_int8_t reserved;
397 u_int8_t max_area;
398 };
399
400 struct isis_iih_lan_header {
401 u_int8_t circuit_type;
402 u_int8_t source_id[SYSTEM_ID_LEN];
403 u_int8_t holding_time[2];
404 u_int8_t pdu_len[2];
405 u_int8_t priority;
406 u_int8_t lan_id[NODE_ID_LEN];
407 };
408
409 struct isis_iih_ptp_header {
410 u_int8_t circuit_type;
411 u_int8_t source_id[SYSTEM_ID_LEN];
412 u_int8_t holding_time[2];
413 u_int8_t pdu_len[2];
414 u_int8_t circuit_id;
415 };
416
417 struct isis_lsp_header {
418 u_int8_t pdu_len[2];
419 u_int8_t remaining_lifetime[2];
420 u_int8_t lsp_id[LSP_ID_LEN];
421 u_int8_t sequence_number[4];
422 u_int8_t checksum[2];
423 u_int8_t typeblock;
424 };
425
426 struct isis_csnp_header {
427 u_int8_t pdu_len[2];
428 u_int8_t source_id[NODE_ID_LEN];
429 u_int8_t start_lsp_id[LSP_ID_LEN];
430 u_int8_t end_lsp_id[LSP_ID_LEN];
431 };
432
433 struct isis_psnp_header {
434 u_int8_t pdu_len[2];
435 u_int8_t source_id[NODE_ID_LEN];
436 };
437
438 struct isis_tlv_lsp {
439 u_int8_t remaining_lifetime[2];
440 u_int8_t lsp_id[LSP_ID_LEN];
441 u_int8_t sequence_number[4];
442 u_int8_t checksum[2];
443 };
444
445
446 /* allocate space for the following string
447 * xx.xxxx.xxxx.xxxx.xxxx.xxxx.xxxx
448 * 32 bytes plus one termination byte */
449 static char *
450 print_nsap(register const u_int8_t *pptr, register int nsap_length)
451 {
452 int nsap_idx;
453 static char nsap_ascii_output[33];
454 char *junk_buf = nsap_ascii_output;
455
456 if (nsap_length < 1 || nsap_length > 13) {
457 sprintf(junk_buf, "illegal length");
458 return (nsap_ascii_output);
459 }
460
461 for (nsap_idx = 0; nsap_idx < nsap_length; nsap_idx++) {
462 if (!TTEST2(*pptr, 1))
463 return (0);
464 sprintf(junk_buf, "%02x", *pptr++);
465 junk_buf += strlen(junk_buf);
466 if (((nsap_idx & 1) == 0) &&
467 (nsap_idx + 1 < nsap_length)) {
468 *junk_buf++ = '.';
469 }
470 }
471 *(junk_buf) = '\0';
472 return (nsap_ascii_output);
473 }
474
475 #define ISIS_COMMON_HEADER_SIZE (sizeof(struct isis_common_header))
476 #define ISIS_IIH_LAN_HEADER_SIZE (sizeof(struct isis_iih_lan_header))
477 #define ISIS_IIH_PTP_HEADER_SIZE (sizeof(struct isis_iih_ptp_header))
478 #define ISIS_LSP_HEADER_SIZE (sizeof(struct isis_lsp_header))
479 #define ISIS_CSNP_HEADER_SIZE (sizeof(struct isis_csnp_header))
480 #define ISIS_PSNP_HEADER_SIZE (sizeof(struct isis_psnp_header))
481
482 void isoclns_print(const u_int8_t *p, u_int length, u_int caplen,
483 const u_int8_t *esrc, const u_int8_t *edst)
484 {
485 u_int8_t pdu_type;
486 const struct isis_common_header *header;
487
488 header = (const struct isis_common_header *)p;
489 pdu_type = header->pdu_type & PDU_TYPE_MASK;
490
491 printf("%sOSI ", caplen < 1 ? "|" : "");
492 if (!eflag && esrc != NULL && edst != NULL)
493 (void)printf("%s > %s, ",
494 etheraddr_string(esrc),
495 etheraddr_string(edst));
496
497 if (caplen < 1) /* enough bytes on the wire ? */
498 return;
499
500 switch (*p) {
501
502 case NLPID_CLNS:
503 (void)printf("CLNS, length: %u", length);
504 break;
505
506 case NLPID_ESIS:
507 esis_print(p, length);
508 return;
509
510 case NLPID_ISIS:
511 if (!isis_print(p, length))
512 print_unknown_data(p,"\n\t",caplen);
513 break;
514
515 case NLPID_NULLNS:
516 (void)printf("ISO NULLNS, length: %u", length);
517 break;
518
519 default:
520 (void)printf("Unknown NLPID 0x%02x, length: %u", p[0], length);
521 if (caplen > 1)
522 print_unknown_data(p,"\n\t",caplen);
523 break;
524 }
525 }
526
527 #define ESIS_REDIRECT 6
528 #define ESIS_ESH 2
529 #define ESIS_ISH 4
530
531 static struct tok esis_values[] = {
532 { ESIS_REDIRECT, "redirect"},
533 { ESIS_ESH, "ESH"},
534 { ESIS_ISH, "ISH"},
535 { 0, NULL }
536 };
537
538 struct esis_hdr {
539 u_int8_t version;
540 u_int8_t reserved;
541 u_int8_t type;
542 u_int8_t tmo[2];
543 u_int8_t cksum[2];
544 };
545
546 static void
547 esis_print(const u_int8_t *p, u_int length)
548 {
549 const u_int8_t *ep;
550 u_int li;
551 const struct esis_hdr *eh;
552
553 if (length <= 2) {
554 if (qflag)
555 printf(" bad pkt!");
556 else
557 printf(" no header at all!");
558 return;
559 }
560 li = p[1];
561 eh = (const struct esis_hdr *) &p[2];
562 ep = p + li;
563 if (li > length) {
564 if (qflag)
565 printf(" bad pkt!");
566 else
567 printf(" LI(%d) > PDU size (%d)!", li, length);
568 return;
569 }
570 if (li < sizeof(struct esis_hdr) + 2) {
571 if (qflag)
572 printf(" bad pkt!");
573 else {
574 printf(" too short for esis header %d:", li);
575 while (--length != 0)
576 printf("%02X", *p++);
577 }
578 return;
579 }
580
581 printf("ES-IS, %s, length: %u",
582 tok2str(esis_values,"unknown type: %u",eh->type & 0x1f),
583 length);
584
585 if(vflag < 1)
586 return;
587
588 if (vflag && osi_cksum(p, li)) {
589 printf(" bad cksum (got 0x%02x%02x)",
590 eh->cksum[1], eh->cksum[0]);
591 default_print(p, length);
592 return;
593 }
594 if (eh->version != 1) {
595 printf(" unsupported version %d", eh->version);
596 return;
597 }
598 p += sizeof(*eh) + 2;
599 li -= sizeof(*eh) + 2; /* protoid * li */
600
601 switch (eh->type & 0x1f) {
602 case ESIS_REDIRECT: {
603 const u_int8_t *dst, *snpa, *is;
604
605 dst = p; p += *p + 1;
606 if (p > snapend)
607 return;
608 printf("\n\t\t %s", isonsap_string(dst));
609 snpa = p; p += *p + 1;
610 is = p; p += *p + 1;
611 if (p > snapend)
612 return;
613 if (p > ep) {
614 printf(" [bad li]");
615 return;
616 }
617 if (is[0] == 0)
618 printf(" > %s", etheraddr_string(&snpa[1]));
619 else
620 printf(" > %s", isonsap_string(is));
621 li = ep - p;
622 break;
623 }
624
625 case ESIS_ESH:
626 break;
627
628 case ESIS_ISH: {
629 const u_int8_t *is;
630
631 is = p; p += *p + 1;
632 if (p > ep) {
633 printf(" [bad li]");
634 return;
635 }
636 if (p > snapend)
637 return;
638 if (!qflag)
639 printf("\n\tNET: %s", print_nsap(is+1,*is));
640 li = ep - p;
641 break;
642 }
643
644 default:
645 if (vflag <= 1) {
646 if (p < snapend)
647 print_unknown_data(p,"\n\t ",snapend-p);
648 }
649 return;
650 }
651
652 /* hexdump - FIXME ? */
653 if (vflag > 1) {
654 if (p < snapend)
655 print_unknown_data(p,"\n\t ",snapend-p);
656 }
657 if (vflag)
658 while (p < ep && li) {
659 u_int op, opli;
660 const u_int8_t *q;
661
662 if (snapend - p < 2)
663 return;
664 if (li < 2) {
665 printf(", bad opts/li");
666 return;
667 }
668 op = *p++;
669 opli = *p++;
670 li -= 2;
671 if (opli > li) {
672 printf(", opt (%d) too long", op);
673 return;
674 }
675 li -= opli;
676 q = p;
677 p += opli;
678
679 if (snapend < p)
680 return;
681
682 if (op == TLV_HOLDTIME && opli == 2) {
683 printf("\n\tholdtime: %us", EXTRACT_16BITS(q));
684 continue;
685 }
686
687 if (op == TLV_PROTOCOLS && opli >= 1) {
688 printf("\n\t%s (length: %u): %s",
689 tok2str(isis_tlv_values, "unknown", op),
690 opli,
691 tok2str(osi_nlpid_values,"Unknown 0x%02x",*q));
692 continue;
693 }
694
695 print_unknown_data(q,"\n\t ",opli);
696 }
697 }
698
699 /* allocate space for the following string
700 * xxxx.xxxx.xxxx
701 * 14 bytes plus one termination byte */
702 static char *
703 isis_print_sysid(const u_int8_t *cp, int sysid_len)
704 {
705 int i;
706 static char sysid[15];
707 char *pos = sysid;
708
709 for (i = 1; i <= sysid_len; i++) {
710 if (!TTEST2(*cp, 1))
711 return (0);
712 sprintf(pos, "%02x", *cp++);
713 pos += strlen(pos);
714 if ((i==2)^(i==4)) {
715 *pos++ = '.';
716 }
717 }
718 *(pos) = '\0';
719 return (sysid);
720 }
721
722
723 /* allocate space for the following string
724 * xxxx.xxxx.xxxx.yy
725 * 17 bytes plus one termination byte */
726 static char *
727 isis_print_nodeid(const u_int8_t *cp)
728 {
729 int i;
730 static char nodeid[18];
731 char *pos = nodeid;
732
733 for (i = 1; i <= 7; i++) {
734 if (!TTEST2(*cp, 1))
735 return (0);
736 sprintf(pos, "%02x", *cp++);
737 pos += strlen(pos);
738 if ((i & 1) == 0) {
739 *pos++ = '.';
740 }
741 }
742 *(pos) = '\0';
743 return (nodeid);
744 }
745
746 /* allocate space for the following string
747 * xxxx.xxxx.xxxx.yy-zz
748 * 20 bytes plus one termination byte */
749 static char *
750 isis_print_lspid(const u_int8_t *cp)
751 {
752 int i;
753 static char lspid[21];
754 char *pos = lspid;
755
756 for (i = 1; i <= 7; i++) {
757 sprintf(pos, "%02x", *cp++);
758 pos += strlen(pos);
759 if ((i & 1) == 0)
760 *pos++ = '.';
761 }
762 sprintf(pos, "-%02x", *cp);
763 return (lspid);
764 }
765
766 /* print the 4-byte metric block which is common found in the old-style TLVs */
767
768 static int
769 isis_print_metric_block (const struct isis_metric_block *isis_metric_block)
770 {
771 printf(", Default Metric: %d, %s",
772 ISIS_LSP_TLV_METRIC_VALUE(isis_metric_block->metric_default),
773 ISIS_LSP_TLV_METRIC_IE(isis_metric_block->metric_default) ? "External" : "Internal");
774 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(isis_metric_block->metric_delay))
775 printf("\n\t\t Delay Metric: %d, %s",
776 ISIS_LSP_TLV_METRIC_VALUE(isis_metric_block->metric_delay),
777 ISIS_LSP_TLV_METRIC_IE(isis_metric_block->metric_delay) ? "External" : "Internal");
778 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(isis_metric_block->metric_expense))
779 printf("\n\t\t Expense Metric: %d, %s",
780 ISIS_LSP_TLV_METRIC_VALUE(isis_metric_block->metric_expense),
781 ISIS_LSP_TLV_METRIC_IE(isis_metric_block->metric_expense) ? "External" : "Internal");
782 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(isis_metric_block->metric_error))
783 printf("\n\t\t Error Metric: %d, %s",
784 ISIS_LSP_TLV_METRIC_VALUE(isis_metric_block->metric_error),
785 ISIS_LSP_TLV_METRIC_IE(isis_metric_block->metric_error) ? "External" : "Internal");
786
787 return(1); /* everything is ok */
788 }
789
790 static int
791 isis_print_tlv_ip_reach (const u_int8_t *cp, const char *ident, int length)
792 {
793 int prefix_len;
794 const struct isis_tlv_ip_reach *tlv_ip_reach;
795
796 tlv_ip_reach = (const struct isis_tlv_ip_reach *)cp;
797
798 while (length > 0) {
799 if ((size_t)length < sizeof(*tlv_ip_reach)) {
800 printf("short IPv4 reachability (%d vs %lu)",
801 length,
802 (unsigned long)sizeof(*tlv_ip_reach));
803 return (0);
804 }
805
806 if (!TTEST(*tlv_ip_reach))
807 return (0);
808
809 prefix_len = mask2plen(EXTRACT_32BITS(tlv_ip_reach->mask));
810
811 if (prefix_len == -1)
812 printf("%sIPv4 prefix: %s mask %s",
813 ident,
814 ipaddr_string((tlv_ip_reach->prefix)),
815 ipaddr_string((tlv_ip_reach->mask)));
816 else
817 printf("%sIPv4 prefix: %15s/%u",
818 ident,
819 ipaddr_string((tlv_ip_reach->prefix)),
820 prefix_len);
821
822 printf(", Distribution: %s, Metric: %u, %s",
823 ISIS_LSP_TLV_METRIC_UPDOWN(tlv_ip_reach->isis_metric_block.metric_default) ? "down" : "up",
824 ISIS_LSP_TLV_METRIC_VALUE(tlv_ip_reach->isis_metric_block.metric_default),
825 ISIS_LSP_TLV_METRIC_IE(tlv_ip_reach->isis_metric_block.metric_default) ? "External" : "Internal");
826
827 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(tlv_ip_reach->isis_metric_block.metric_delay))
828 printf("%s Delay Metric: %u, %s",
829 ident,
830 ISIS_LSP_TLV_METRIC_VALUE(tlv_ip_reach->isis_metric_block.metric_delay),
831 ISIS_LSP_TLV_METRIC_IE(tlv_ip_reach->isis_metric_block.metric_delay) ? "External" : "Internal");
832
833 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(tlv_ip_reach->isis_metric_block.metric_expense))
834 printf("%s Expense Metric: %u, %s",
835 ident,
836 ISIS_LSP_TLV_METRIC_VALUE(tlv_ip_reach->isis_metric_block.metric_expense),
837 ISIS_LSP_TLV_METRIC_IE(tlv_ip_reach->isis_metric_block.metric_expense) ? "External" : "Internal");
838
839 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(tlv_ip_reach->isis_metric_block.metric_error))
840 printf("%s Error Metric: %u, %s",
841 ident,
842 ISIS_LSP_TLV_METRIC_VALUE(tlv_ip_reach->isis_metric_block.metric_error),
843 ISIS_LSP_TLV_METRIC_IE(tlv_ip_reach->isis_metric_block.metric_error) ? "External" : "Internal");
844
845 length -= sizeof(struct isis_tlv_ip_reach);
846 tlv_ip_reach++;
847 }
848 return (1);
849 }
850
851 /*
852 * this is the common IP-REACH subTLV decoder it is called
853 * from various EXTD-IP REACH TLVs (135,235,236,237)
854 */
855
856 static int
857 isis_print_ip_reach_subtlv (const u_int8_t *tptr,int subt,int subl,const char *ident) {
858
859 switch(subt) {
860 case SUBTLV_IP_REACH_ADMIN_TAG32:
861 if (!TTEST2(*tptr,4))
862 goto trunctlv;
863 printf("%s32-Bit Administrative tag: 0x%08x (=%u)",
864 ident,
865 EXTRACT_32BITS(tptr),
866 EXTRACT_32BITS(tptr));
867 break;
868 case SUBTLV_IP_REACH_ADMIN_TAG64:
869 if (!TTEST2(*tptr,8))
870 goto trunctlv;
871 printf("%s64-Bit Administrative tag: 0x%08x%08x",
872 ident,
873 EXTRACT_32BITS(tptr),
874 EXTRACT_32BITS(tptr+4));
875 break;
876 default:
877 printf("%sunknown subTLV, type %d, length %d",
878 ident,
879 subt,
880 subl);
881 if(!print_unknown_data(tptr,"\n\t\t ",
882 subl))
883 return(0);
884 break;
885 }
886 return(1);
887
888 trunctlv:
889 printf("%spacket exceeded snapshot",ident);
890 return(0);
891 }
892
893 /*
894 * this is the common IS-REACH subTLV decoder it is called
895 * from isis_print_ext_is_reach()
896 */
897
898 static int
899 isis_print_is_reach_subtlv (const u_int8_t *tptr,int subt,int subl,const char *ident) {
900
901 int i;
902 union { /* int to float conversion buffer for several subTLVs */
903 float f;
904 u_int32_t i;
905 } bw;
906
907 switch(subt) {
908 case SUBTLV_EXT_IS_REACH_ADMIN_GROUP:
909 if (!TTEST2(*tptr,4))
910 goto trunctlv;
911 printf("%sAdministrative groups: 0x%08x",
912 ident,
913 EXTRACT_32BITS(tptr));
914 break;
915 case SUBTLV_EXT_IS_REACH_LINK_LOCAL_ID:
916 if (!TTEST2(*tptr,4))
917 goto trunctlv;
918 printf("%sLink Local Identifier: 0x%08x",
919 ident,
920 EXTRACT_32BITS(tptr));
921 break;
922 case SUBTLV_EXT_IS_REACH_LINK_REMOTE_ID:
923 if (!TTEST2(*tptr,4))
924 goto trunctlv;
925 printf("%sLink Remote Identifier: 0x%08x",
926 ident,
927 EXTRACT_32BITS(tptr));
928 break;
929 case SUBTLV_EXT_IS_REACH_MAX_LINK_BW :
930 if (!TTEST2(*tptr,4))
931 goto trunctlv;
932 bw.i = EXTRACT_32BITS(tptr);
933 printf("%sMaximum link bandwidth : %.3f Mbps",
934 ident,
935 bw.f*8/1000000 );
936 break;
937 case SUBTLV_EXT_IS_REACH_RESERVABLE_BW :
938 if (!TTEST2(*tptr,4))
939 goto trunctlv;
940 bw.i = EXTRACT_32BITS(tptr);
941 printf("%sReservable link bandwidth: %.3f Mbps",
942 ident,
943 bw.f*8/1000000 );
944 break;
945 case SUBTLV_EXT_IS_REACH_UNRESERVED_BW :
946 printf("%sUnreserved bandwidth:",ident);
947 for (i = 0; i < 8; i++) {
948 if (!TTEST2(*(tptr+i*4),4))
949 goto trunctlv;
950 bw.i = EXTRACT_32BITS(tptr);
951 printf("%s priority level %d: %.3f Mbps",
952 ident,
953 i,
954 bw.f*8/1000000 );
955 }
956 break;
957 case SUBTLV_EXT_IS_REACH_TE_METRIC:
958 if (!TTEST2(*tptr,3))
959 goto trunctlv;
960 printf("%sTraffic Engineering Metric: %d",
961 ident,
962 EXTRACT_24BITS(tptr));
963 break;
964 case SUBTLV_EXT_IS_REACH_IPV4_INTF_ADDR:
965 if (!TTEST2(*tptr,4))
966 goto trunctlv;
967 printf("%sIPv4 interface address: %s",
968 ident,
969 ipaddr_string(tptr));
970 break;
971 case SUBTLV_EXT_IS_REACH_IPV4_NEIGHBOR_ADDR:
972 if (!TTEST2(*tptr,4))
973 goto trunctlv;
974 printf("%sIPv4 neighbor address: %s",
975 ident,
976 ipaddr_string(tptr));
977 break;
978 case SUBTLV_EXT_IS_REACH_LINK_PROTECTION_TYPE:
979 if (!TTEST2(*tptr,2))
980 goto trunctlv;
981 printf("%sLink Protection Type: %s, Priority %u",
982 ident,
983 bittok2str(isis_gmpls_link_prot_values, "none", *tptr),
984 *(tptr+1));
985 break;
986 case SUBTLV_EXT_IS_REACH_INTF_SW_CAP_DESCR:
987 printf("%sInterface Switching Capability",ident);
988
989 if (!TTEST2(*tptr,1))
990 goto trunctlv;
991 printf("%s Interface Switching Capability:%s",
992 ident,
993 tok2str(isis_gmpls_sw_cap_values, "Unknown", *(tptr)));
994
995 if (!TTEST2(*(tptr+1),1))
996 goto trunctlv;
997 printf(", LSP Encoding: %s",
998 tok2str(isis_gmpls_lsp_enc_values, "Unknown", *(tptr+1)));
999
1000 if (!TTEST2(*(tptr+2),2)) /* skip 2 res. bytes */
1001 goto trunctlv;
1002
1003 printf("%s Max LSP Bandwidth:",ident);
1004 for (i = 0; i < 8; i++) {
1005 if (!TTEST2(*(tptr+(i*4)+4),4))
1006 goto trunctlv;
1007 bw.i = EXTRACT_32BITS(tptr);
1008 printf("%s priority level %d: %.3f Mbps",
1009 ident,
1010 i,
1011 bw.f*8/1000000 );
1012 }
1013 subl-=36;
1014 /* there is some optional stuff left to decode but this is as of yet
1015 not specified so just lets hexdump what is left */
1016 if(subl>0){
1017 if(!print_unknown_data(tptr,"\n\t\t ",
1018 subl-36))
1019 return(0);
1020 }
1021 break;
1022 case 250:
1023 case 251:
1024 case 252:
1025 case 253:
1026 case 254:
1027 printf("%sReserved for cisco specific extensions, type %d, length %d",
1028 ident,
1029 subt,
1030 subl);
1031 break;
1032 case 255:
1033 printf("%sReserved for future expansion, type %d, length %d",
1034 ident,
1035 subt,
1036 subl);
1037 break;
1038 default:
1039 printf("%sunknown subTLV, type %d, length %d",
1040 ident,
1041 subt,
1042 subl);
1043 if(!print_unknown_data(tptr,"\n\t\t ",
1044 subl))
1045 return(0);
1046 break;
1047 }
1048 return(1);
1049
1050 trunctlv:
1051 printf("%spacket exceeded snapshot",ident);
1052 return(0);
1053 }
1054
1055
1056 /*
1057 * this is the common IS-REACH decoder it is called
1058 * from various EXTD-IS REACH style TLVs (22,24,222)
1059 */
1060
1061 static int
1062 isis_print_ext_is_reach (const u_int8_t *tptr,const char *ident) {
1063
1064 char ident_buffer[20];
1065 int subt,subl,tslen;
1066 int proc_bytes = 0; /* how many bytes did we process ? */
1067
1068 if (!TTEST2(*tptr, NODE_ID_LEN))
1069 return(0);
1070
1071 printf("%sIS Neighbor: %s", ident, isis_print_nodeid(tptr));
1072 tptr+=(NODE_ID_LEN);
1073
1074 if (!TTEST2(*tptr, 3))
1075 return(0);
1076 printf(", Metric: %d",EXTRACT_24BITS(tptr));
1077 tptr+=3;
1078
1079 if (!TTEST2(*tptr, 1))
1080 return(0);
1081 tslen=*(tptr++); /* read out subTLV length */
1082 proc_bytes=NODE_ID_LEN+3+1;
1083 printf(", %ssub-TLVs present",tslen ? "" : "no ");
1084 if (tslen) {
1085 printf(" (%u)",tslen);
1086 while (tslen>0) {
1087 if (!TTEST2(*tptr,2))
1088 return(0);
1089 subt=*(tptr++);
1090 subl=*(tptr++);
1091 /* prepend the ident string */
1092 snprintf(ident_buffer, sizeof(ident_buffer), "%s ",ident);
1093 if(!isis_print_is_reach_subtlv(tptr,subt,subl,ident_buffer))
1094 return(0);
1095 tptr+=subl;
1096 tslen-=(subl+2);
1097 proc_bytes+=(subl+2);
1098 }
1099 }
1100 return(proc_bytes);
1101 }
1102
1103 /*
1104 * this is the common Multi Topology ID decoder
1105 * it is called from various MT-TLVs (222,229,235,237)
1106 */
1107
1108 static int
1109 isis_print_mtid (const u_int8_t *tptr,const char *ident) {
1110
1111 if (!TTEST2(*tptr, 2))
1112 return(0);
1113
1114 printf("%s%s",
1115 ident,
1116 tok2str(isis_mt_values,
1117 "Reserved for IETF Consensus",
1118 ISIS_MASK_MTID(EXTRACT_16BITS(tptr))));
1119
1120 printf(" Topology (0x%03x), Flags: [%s]",
1121 ISIS_MASK_MTID(EXTRACT_16BITS(tptr)),
1122 bittok2str(isis_mt_flag_values, "none",ISIS_MASK_MTFLAGS(EXTRACT_16BITS(tptr))));
1123
1124 return(2);
1125 }
1126
1127 /*
1128 * this is the common extended IP reach decoder
1129 * it is called from TLVs (135,235,236,237)
1130 * we process the TLV and optional subTLVs and return
1131 * the amount of processed bytes
1132 */
1133
1134 static int
1135 isis_print_extd_ip_reach (const u_int8_t *tptr, const char *ident, u_int16_t afi) {
1136
1137 char ident_buffer[20];
1138 u_int8_t prefix[16]; /* shared copy buffer for IPv4 and IPv6 prefixes */
1139 u_int metric, status_byte, bit_length, byte_length, sublen, processed, subtlvtype, subtlvlen;
1140
1141 if (!TTEST2(*tptr, 4))
1142 return (0);
1143 metric = EXTRACT_32BITS(tptr);
1144 processed=4;
1145 tptr+=4;
1146
1147 if (afi == IPV4) {
1148 if (!TTEST2(*tptr, 1)) /* fetch status byte */
1149 return (0);
1150 status_byte=*(tptr++);
1151 bit_length = status_byte&0x3f;
1152 processed++;
1153 #ifdef INET6
1154 } else if (afi == IPV6) {
1155 if (!TTEST2(*tptr, 1)) /* fetch status & prefix_len byte */
1156 return (0);
1157 status_byte=*(tptr++);
1158 bit_length=*(tptr++);
1159 processed+=2;
1160 #endif
1161 } else
1162 return (0); /* somebody is fooling us */
1163
1164 byte_length = (bit_length + 7) / 8; /* prefix has variable length encoding */
1165
1166 if (!TTEST2(*tptr, byte_length))
1167 return (0);
1168 memset(prefix, 0, 16); /* clear the copy buffer */
1169 memcpy(prefix,tptr,byte_length); /* copy as much as is stored in the TLV */
1170 tptr+=byte_length;
1171 processed+=byte_length;
1172
1173 if (afi == IPV4)
1174 printf("%sIPv4 prefix: %15s/%u",
1175 ident,
1176 ipaddr_string(prefix),
1177 bit_length);
1178 #ifdef INET6
1179 if (afi == IPV6)
1180 printf("%sIPv6 prefix: %39s/%u",
1181 ident,
1182 ip6addr_string(prefix),
1183 bit_length);
1184 #endif
1185
1186 printf(", Distribution: %s, Metric: %u",
1187 ISIS_MASK_TLV_EXT_IP_UPDOWN(status_byte) ? "down" : "up",
1188 metric);
1189
1190 if (afi == IPV4 && ISIS_MASK_TLV_EXT_IP_SUBTLV(status_byte))
1191 printf(", sub-TLVs present");
1192 #ifdef INET6
1193 if (afi == IPV6)
1194 printf(", %s%s",
1195 ISIS_MASK_TLV_EXT_IP6_IE(status_byte) ? "External" : "Internal",
1196 ISIS_MASK_TLV_EXT_IP6_SUBTLV(status_byte) ? ", sub-TLVs present" : "");
1197 #endif
1198
1199 if ((ISIS_MASK_TLV_EXT_IP_SUBTLV(status_byte) && afi == IPV4) ||
1200 (ISIS_MASK_TLV_EXT_IP6_SUBTLV(status_byte) && afi == IPV6)) {
1201 /* assume that one prefix can hold more
1202 than one subTLV - therefore the first byte must reflect
1203 the aggregate bytecount of the subTLVs for this prefix
1204 */
1205 if (!TTEST2(*tptr, 1))
1206 return (0);
1207 sublen=*(tptr++);
1208 processed+=sublen+1;
1209 printf(" (%u)",sublen); /* print out subTLV length */
1210
1211 while (sublen>0) {
1212 if (!TTEST2(*tptr,2))
1213 return (0);
1214 subtlvtype=*(tptr++);
1215 subtlvlen=*(tptr++);
1216 /* prepend the ident string */
1217 snprintf(ident_buffer, sizeof(ident_buffer), "%s ",ident);
1218 if(!isis_print_ip_reach_subtlv(tptr,subtlvtype,subtlvlen,ident_buffer))
1219 return(0);
1220 tptr+=subtlvlen;
1221 sublen-=(subtlvlen+2);
1222 }
1223 }
1224 return (processed);
1225 }
1226
1227 /*
1228 * isis_print
1229 * Decode IS-IS packets. Return 0 on error.
1230 */
1231
1232 static int isis_print (const u_int8_t *p, u_int length)
1233 {
1234 const struct isis_common_header *header;
1235
1236 const struct isis_iih_lan_header *header_iih_lan;
1237 const struct isis_iih_ptp_header *header_iih_ptp;
1238 const struct isis_lsp_header *header_lsp;
1239 const struct isis_csnp_header *header_csnp;
1240 const struct isis_psnp_header *header_psnp;
1241
1242 const struct isis_tlv_lsp *tlv_lsp;
1243 const struct isis_tlv_ptp_adj *tlv_ptp_adj;
1244 const struct isis_tlv_is_reach *tlv_is_reach;
1245 const struct isis_tlv_es_reach *tlv_es_reach;
1246
1247 u_int8_t pdu_type, max_area, id_length, type, len, tmp, alen, lan_alen, prefix_len;
1248 u_int8_t ext_is_len, ext_ip_len, mt_len;
1249 const u_int8_t *optr, *pptr, *tptr;
1250 u_short packet_len,pdu_len,time_remain;
1251 u_int i,ra,rr;
1252
1253 packet_len=length;
1254 optr = p; /* initialize the _o_riginal pointer to the packet start -
1255 need it for parsing the checksum TLV */
1256 header = (const struct isis_common_header *)p;
1257 TCHECK(*header);
1258 pptr = p+(ISIS_COMMON_HEADER_SIZE);
1259 header_iih_lan = (const struct isis_iih_lan_header *)pptr;
1260 header_iih_ptp = (const struct isis_iih_ptp_header *)pptr;
1261 header_lsp = (const struct isis_lsp_header *)pptr;
1262 header_csnp = (const struct isis_csnp_header *)pptr;
1263 header_psnp = (const struct isis_psnp_header *)pptr;
1264
1265 /*
1266 * Sanity checking of the header.
1267 */
1268
1269 if (header->version != ISIS_VERSION) {
1270 printf(", version %d packet not supported", header->version);
1271 return (0);
1272 }
1273
1274 if ((header->id_length != SYSTEM_ID_LEN) && (header->id_length != 0)) {
1275 printf(", system ID length of %d is not supported",
1276 header->id_length);
1277 return (0);
1278 }
1279
1280 if (header->pdu_version != ISIS_VERSION) {
1281 printf(", version %d packet not supported", header->pdu_version);
1282 return (0);
1283 }
1284
1285 max_area = header->max_area;
1286 switch(max_area) {
1287 case 0:
1288 max_area = 3; /* silly shit */
1289 break;
1290 case 255:
1291 printf(", bad packet -- 255 areas");
1292 return (0);
1293 default:
1294 break;
1295 }
1296
1297 id_length = header->id_length;
1298 switch(id_length) {
1299 case 0:
1300 id_length = 6; /* silly shit again */
1301 break;
1302 case 1: /* 1-8 are valid sys-ID lenghts */
1303 case 2:
1304 case 3:
1305 case 4:
1306 case 5:
1307 case 6:
1308 case 7:
1309 case 8:
1310 break;
1311 case 255:
1312 id_length = 0; /* entirely useless */
1313 break;
1314 default:
1315 break;
1316 }
1317
1318 /* toss any non 6-byte sys-ID len PDUs */
1319 if (id_length != 6 ) {
1320 printf(", bad packet -- illegal sys-ID length (%u)", id_length);
1321 return (0);
1322 }
1323
1324 pdu_type=header->pdu_type;
1325
1326 /* in non-verbose mode just lets print the basic PDU Type*/
1327 if (vflag < 1) {
1328 printf("IS-IS, %s, length: %u",
1329 tok2str(isis_pdu_values,"unknown PDU-Type %u",pdu_type),
1330 length);
1331 return(1);
1332 }
1333
1334 /* ok they seem to want to know everything - lets fully decode it */
1335 printf("IS-IS, length: %u",length);
1336
1337 printf("\n\thlen: %u, v: %u, pdu-v: %u, sys-id-len: %u (%u), max-area: %u (%u)",
1338 header->fixed_len,
1339 header->version,
1340 header->pdu_version,
1341 id_length,
1342 header->id_length,
1343 max_area,
1344 header->max_area);
1345
1346 /* first lets see if we know the PDU name*/
1347 printf(", pdu-type: %s",
1348 tok2str(isis_pdu_values,
1349 "unknown, type %u",
1350 pdu_type));
1351
1352 if (vflag > 1) {
1353 if(!print_unknown_data(optr,"\n\t",8)) /* provide the _o_riginal pointer */
1354 return(0); /* for optionally debugging the common header */
1355 }
1356
1357 switch (pdu_type) {
1358
1359 case L1_LAN_IIH:
1360 case L2_LAN_IIH:
1361 if (header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_LAN_HEADER_SIZE)) {
1362 printf(", bogus fixed header length %u should be %lu",
1363 header->fixed_len, (unsigned long)ISIS_IIH_LAN_HEADER_SIZE);
1364 return (0);
1365 }
1366
1367 pdu_len=EXTRACT_16BITS(header_iih_lan->pdu_len);
1368 if (packet_len>pdu_len) {
1369 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
1370 length=pdu_len;
1371 }
1372
1373 TCHECK(*header_iih_lan);
1374 printf("\n\t source-id: %s, holding time: %us, Flags: [%s]",
1375 isis_print_sysid(header_iih_lan->source_id,SYSTEM_ID_LEN),
1376 EXTRACT_16BITS(header_iih_lan->holding_time),
1377 tok2str(isis_iih_circuit_type_values,
1378 "unknown circuit type 0x%02x",
1379 header_iih_lan->circuit_type));
1380
1381 printf("\n\t lan-id: %s, Priority: %u, PDU length: %u",
1382 isis_print_nodeid(header_iih_lan->lan_id),
1383 (header_iih_lan->priority) & PRIORITY_MASK,
1384 pdu_len);
1385
1386 if (vflag > 1) {
1387 if(!print_unknown_data(pptr,"\n\t ",ISIS_IIH_LAN_HEADER_SIZE))
1388 return(0);
1389 }
1390
1391 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_LAN_HEADER_SIZE);
1392 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_LAN_HEADER_SIZE);
1393 break;
1394
1395 case PTP_IIH:
1396 if (header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_PTP_HEADER_SIZE)) {
1397 printf(", bogus fixed header length %u should be %lu",
1398 header->fixed_len, (unsigned long)ISIS_IIH_PTP_HEADER_SIZE);
1399 return (0);
1400 }
1401
1402 pdu_len=EXTRACT_16BITS(header_iih_ptp->pdu_len);
1403 if (packet_len>pdu_len) {
1404 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
1405 length=pdu_len;
1406 }
1407
1408 TCHECK(*header_iih_ptp);
1409 printf("\n\t source-id: %s, holding time: %us, circuit-id: 0x%02x, %s, PDU length: %u",
1410 isis_print_sysid(header_iih_ptp->source_id,SYSTEM_ID_LEN),
1411 EXTRACT_16BITS(header_iih_ptp->holding_time),
1412 header_iih_ptp->circuit_id,
1413 tok2str(isis_iih_circuit_type_values,
1414 "unknown circuit type 0x%02x",
1415 header_iih_ptp->circuit_type),
1416 pdu_len);
1417
1418 if (vflag > 1) {
1419 if(!print_unknown_data(pptr,"\n\t ",ISIS_IIH_PTP_HEADER_SIZE))
1420 return(0);
1421 }
1422
1423 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_PTP_HEADER_SIZE);
1424 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_PTP_HEADER_SIZE);
1425 break;
1426
1427 case L1_LSP:
1428 case L2_LSP:
1429 if (header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_LSP_HEADER_SIZE)) {
1430 printf(", bogus fixed header length %u should be %lu",
1431 header->fixed_len, (unsigned long)ISIS_LSP_HEADER_SIZE);
1432 return (0);
1433 }
1434
1435 pdu_len=EXTRACT_16BITS(header_lsp->pdu_len);
1436 if (packet_len>pdu_len) {
1437 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
1438 length=pdu_len;
1439 }
1440
1441 TCHECK(*header_lsp);
1442 printf("\n\t lsp-id: %s, seq: 0x%08x, lifetime: %5us",
1443 isis_print_lspid(header_lsp->lsp_id),
1444 EXTRACT_32BITS(header_lsp->sequence_number),
1445 EXTRACT_16BITS(header_lsp->remaining_lifetime));
1446 /* verify the checksum -
1447 * checking starts at the lsp-id field
1448 * which is 12 bytes after the packet start*/
1449 printf("\n\t chksum: 0x%04x (%s), PDU length: %u",
1450 EXTRACT_16BITS(header_lsp->checksum),
1451 (osi_cksum(optr+12, length-12)) ? "incorrect" : "correct",
1452 pdu_len);
1453
1454 printf(", %s", ISIS_MASK_LSP_OL_BIT(header_lsp->typeblock) ? "Overload bit set, " : "");
1455
1456 if (ISIS_MASK_LSP_ATT_BITS(header_lsp->typeblock)) {
1457 printf("%s", ISIS_MASK_LSP_ATT_DEFAULT_BIT(header_lsp->typeblock) ? "default " : "");
1458 printf("%s", ISIS_MASK_LSP_ATT_DELAY_BIT(header_lsp->typeblock) ? "delay " : "");
1459 printf("%s", ISIS_MASK_LSP_ATT_EXPENSE_BIT(header_lsp->typeblock) ? "expense " : "");
1460 printf("%s", ISIS_MASK_LSP_ATT_ERROR_BIT(header_lsp->typeblock) ? "error " : "");
1461 printf("ATT bit set, ");
1462 }
1463 printf("%s", ISIS_MASK_LSP_PARTITION_BIT(header_lsp->typeblock) ? "P bit set, " : "");
1464 printf("%s", tok2str(isis_lsp_istype_values,"Unknown(0x%x)",ISIS_MASK_LSP_ISTYPE_BITS(header_lsp->typeblock)));
1465
1466 if (vflag > 1) {
1467 if(!print_unknown_data(pptr,"\n\t ",ISIS_LSP_HEADER_SIZE))
1468 return(0);
1469 }
1470
1471 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_LSP_HEADER_SIZE);
1472 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_LSP_HEADER_SIZE);
1473 break;
1474
1475 case L1_CSNP:
1476 case L2_CSNP:
1477 if (header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_CSNP_HEADER_SIZE)) {
1478 printf(", bogus fixed header length %u should be %lu",
1479 header->fixed_len, (unsigned long)ISIS_CSNP_HEADER_SIZE);
1480 return (0);
1481 }
1482
1483 pdu_len=EXTRACT_16BITS(header_csnp->pdu_len);
1484 if (packet_len>pdu_len) {
1485 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
1486 length=pdu_len;
1487 }
1488
1489 TCHECK(*header_csnp);
1490 printf("\n\t source-id: %s, PDU length: %u",
1491 isis_print_nodeid(header_csnp->source_id),
1492 pdu_len);
1493 printf("\n\t start lsp-id: %s",
1494 isis_print_lspid(header_csnp->start_lsp_id));
1495 printf("\n\t end lsp-id: %s",
1496 isis_print_lspid(header_csnp->end_lsp_id));
1497
1498 if (vflag > 1) {
1499 if(!print_unknown_data(pptr,"\n\t ",ISIS_CSNP_HEADER_SIZE))
1500 return(0);
1501 }
1502
1503 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_CSNP_HEADER_SIZE);
1504 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_CSNP_HEADER_SIZE);
1505 break;
1506
1507 case L1_PSNP:
1508 case L2_PSNP:
1509 if (header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_PSNP_HEADER_SIZE)) {
1510 printf("- bogus fixed header length %u should be %lu",
1511 header->fixed_len, (unsigned long)ISIS_PSNP_HEADER_SIZE);
1512 return (0);
1513 }
1514
1515 pdu_len=EXTRACT_16BITS(header_psnp->pdu_len);
1516 if (packet_len>pdu_len) {
1517 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
1518 length=pdu_len;
1519 }
1520
1521 TCHECK(*header_psnp);
1522 printf("\n\t source-id: %s",
1523 isis_print_nodeid(header_psnp->source_id));
1524
1525 if (vflag > 1) {
1526 if(!print_unknown_data(pptr,"\n\t ",ISIS_PSNP_HEADER_SIZE))
1527 return(0);
1528 }
1529
1530 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_PSNP_HEADER_SIZE);
1531 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_PSNP_HEADER_SIZE);
1532 break;
1533
1534 default:
1535 if(!print_unknown_data(pptr,"\n\t ",length))
1536 return(0);
1537 return (0);
1538 }
1539
1540 /*
1541 * Now print the TLV's.
1542 */
1543
1544 while (packet_len >= 2) {
1545 if (pptr == snapend) {
1546 return (1);
1547 }
1548
1549 if (!TTEST2(*pptr, 2)) {
1550 printf("\n\t\t packet exceeded snapshot (%ld) bytes",
1551 (long)(pptr-snapend));
1552 return (1);
1553 }
1554 type = *pptr++;
1555 len = *pptr++;
1556 tmp =len; /* copy temporary len & pointer to packet data */
1557 tptr = pptr;
1558 packet_len -= 2;
1559 if (len > packet_len) {
1560 break;
1561 }
1562
1563 /* first lets see if we know the TLVs name*/
1564 printf("\n\t %s TLV #%u, length: %u",
1565 tok2str(isis_tlv_values,
1566 "unknown",
1567 type),
1568 type,
1569 len);
1570
1571 /* now check if we have a decoder otherwise do a hexdump at the end*/
1572 switch (type) {
1573 case TLV_AREA_ADDR:
1574 if (!TTEST2(*tptr, 1))
1575 goto trunctlv;
1576 alen = *tptr++;
1577 while (tmp && alen < tmp) {
1578 printf("\n\t Area address (length: %u): %s",
1579 alen,
1580 print_nsap(tptr, alen));
1581 tptr += alen;
1582 tmp -= alen + 1;
1583 if (tmp==0) /* if this is the last area address do not attemt a boundary check */
1584 break;
1585 if (!TTEST2(*tptr, 1))
1586 goto trunctlv;
1587 alen = *tptr++;
1588 }
1589 break;
1590 case TLV_ISNEIGH:
1591 while (tmp >= ETHER_ADDR_LEN) {
1592 if (!TTEST2(*tptr, ETHER_ADDR_LEN))
1593 goto trunctlv;
1594 printf("\n\t IS Neighbor: %s",isis_print_sysid(tptr,ETHER_ADDR_LEN));
1595 tmp -= ETHER_ADDR_LEN;
1596 tptr += ETHER_ADDR_LEN;
1597 }
1598 break;
1599
1600 case TLV_ISNEIGH_VARLEN:
1601 if (!TTEST2(*tptr, 1))
1602 goto trunctlv;
1603 lan_alen = *tptr++; /* LAN adress length */
1604 tmp --;
1605 printf("\n\t LAN address length %u bytes ",lan_alen);
1606 while (tmp >= lan_alen) {
1607 if (!TTEST2(*tptr, lan_alen))
1608 goto trunctlv;
1609 printf("\n\t\tIS Neighbor: %s",isis_print_sysid(tptr,lan_alen));
1610 tmp -= lan_alen;
1611 tptr +=lan_alen;
1612 }
1613 break;
1614
1615 case TLV_PADDING:
1616 break;
1617
1618 case TLV_MT_IS_REACH:
1619 while (tmp >= 2+NODE_ID_LEN+3+1) {
1620 mt_len = isis_print_mtid(tptr, "\n\t ");
1621 if (mt_len == 0) /* did something go wrong ? */
1622 goto trunctlv;
1623 tptr+=mt_len;
1624 tmp-=mt_len;
1625
1626 ext_is_len = isis_print_ext_is_reach(tptr,"\n\t ");
1627 if (ext_is_len == 0) /* did something go wrong ? */
1628 goto trunctlv;
1629
1630 tmp-=ext_is_len;
1631 tptr+=ext_is_len;
1632 }
1633 break;
1634
1635 case TLV_IS_ALIAS_ID:
1636 while (tmp >= NODE_ID_LEN+3+1) { /* is it worth attempting a decode ? */
1637 ext_is_len = isis_print_ext_is_reach(tptr,"\n\t ");
1638 if (ext_is_len == 0) /* did something go wrong ? */
1639 goto trunctlv;
1640 tmp-=ext_is_len;
1641 tptr+=ext_is_len;
1642 }
1643 break;
1644
1645 case TLV_EXT_IS_REACH:
1646 while (tmp >= NODE_ID_LEN+3+1) { /* is it worth attempting a decode ? */
1647 ext_is_len = isis_print_ext_is_reach(tptr,"\n\t ");
1648 if (ext_is_len == 0) /* did something go wrong ? */
1649 goto trunctlv;
1650 tmp-=ext_is_len;
1651 tptr+=ext_is_len;
1652 }
1653 break;
1654 case TLV_IS_REACH:
1655 if (!TTEST2(*tptr,1)) /* check if there is one byte left to read out the virtual flag */
1656 goto trunctlv;
1657 printf("\n\t %s",
1658 tok2str(isis_is_reach_virtual_values,
1659 "bogus virtual flag 0x%02x",
1660 *tptr++));
1661 tlv_is_reach = (const struct isis_tlv_is_reach *)tptr;
1662 while (tmp >= sizeof(struct isis_tlv_is_reach)) {
1663 if (!TTEST(*tlv_is_reach))
1664 goto trunctlv;
1665 printf("\n\t IS Neighbor: %s", isis_print_nodeid(tlv_is_reach->neighbor_nodeid));
1666 isis_print_metric_block(&tlv_is_reach->isis_metric_block);
1667 tmp -= sizeof(struct isis_tlv_is_reach);
1668 tlv_is_reach++;
1669 }
1670 break;
1671
1672 case TLV_ESNEIGH:
1673 tlv_es_reach = (const struct isis_tlv_es_reach *)tptr;
1674 while (tmp >= sizeof(struct isis_tlv_es_reach)) {
1675 if (!TTEST(*tlv_es_reach))
1676 goto trunctlv;
1677 printf("\n\t ES Neighbor: %s",
1678 isis_print_sysid(tlv_es_reach->neighbor_sysid,SYSTEM_ID_LEN));
1679 isis_print_metric_block(&tlv_es_reach->isis_metric_block);
1680 tmp -= sizeof(struct isis_tlv_es_reach);
1681 tlv_es_reach++;
1682 }
1683 break;
1684
1685 /* those two TLVs share the same format */
1686 case TLV_IP_REACH:
1687 case TLV_IP_REACH_EXT:
1688 if (!isis_print_tlv_ip_reach(pptr, "\n\t ", len))
1689 return (1);
1690 break;
1691
1692 case TLV_EXT_IP_REACH:
1693 while (tmp>0) {
1694 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", IPV4);
1695 if (ext_ip_len == 0) /* did something go wrong ? */
1696 goto trunctlv;
1697 tptr+=ext_ip_len;
1698 tmp-=ext_ip_len;
1699 }
1700 break;
1701
1702 case TLV_MT_IP_REACH:
1703 while (tmp>0) {
1704 mt_len = isis_print_mtid(tptr, "\n\t ");
1705 if (mt_len == 0) /* did something go wrong ? */
1706 goto trunctlv;
1707 tptr+=mt_len;
1708 tmp-=mt_len;
1709
1710 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", IPV4);
1711 if (ext_ip_len == 0) /* did something go wrong ? */
1712 goto trunctlv;
1713 tptr+=ext_ip_len;
1714 tmp-=ext_ip_len;
1715 }
1716 break;
1717
1718 #ifdef INET6
1719 case TLV_IP6_REACH:
1720 while (tmp>0) {
1721 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", IPV6);
1722 if (ext_ip_len == 0) /* did something go wrong ? */
1723 goto trunctlv;
1724 tptr+=ext_ip_len;
1725 tmp-=ext_ip_len;
1726 }
1727 break;
1728
1729 case TLV_MT_IP6_REACH:
1730 while (tmp>0) {
1731 mt_len = isis_print_mtid(tptr, "\n\t ");
1732 if (mt_len == 0) /* did something go wrong ? */
1733 goto trunctlv;
1734 tptr+=mt_len;
1735 tmp-=mt_len;
1736
1737 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", IPV6);
1738 if (ext_ip_len == 0) /* did something go wrong ? */
1739 goto trunctlv;
1740 tptr+=ext_ip_len;
1741 tmp-=ext_ip_len;
1742 }
1743 break;
1744
1745 case TLV_IP6ADDR:
1746 while (tmp>0) {
1747 if (!TTEST2(*tptr, 16))
1748 goto trunctlv;
1749
1750 printf("\n\t IPv6 interface address: %s",
1751 ip6addr_string(tptr));
1752
1753 tptr += 16;
1754 tmp -= 16;
1755 }
1756 break;
1757 #endif
1758 case TLV_AUTH:
1759 if (!TTEST2(*tptr, 1))
1760 goto trunctlv;
1761
1762 printf("\n\t %s: ",
1763 tok2str(isis_subtlv_auth_values,
1764 "unknown Authentication type 0x%02x",
1765 *tptr));
1766
1767 switch (*tptr) {
1768 case SUBTLV_AUTH_SIMPLE:
1769 for(i=1;i<len;i++) {
1770 if (!TTEST2(*(tptr+i), 1))
1771 goto trunctlv;
1772 printf("%c",*(tptr+i));
1773 }
1774 break;
1775 case SUBTLV_AUTH_MD5:
1776 for(i=1;i<len;i++) {
1777 if (!TTEST2(*(tptr+i), 1))
1778 goto trunctlv;
1779 printf("%02x",*(tptr+i));
1780 }
1781 if (len != SUBTLV_AUTH_MD5_LEN+1)
1782 printf(", (malformed subTLV) ");
1783 break;
1784 case SUBTLV_AUTH_PRIVATE:
1785 default:
1786 if(!print_unknown_data(tptr+1,"\n\t\t ",len-1))
1787 return(0);
1788 break;
1789 }
1790 break;
1791
1792 case TLV_PTP_ADJ:
1793 tlv_ptp_adj = (const struct isis_tlv_ptp_adj *)tptr;
1794 if(tmp>=1) {
1795 if (!TTEST2(*tptr, 1))
1796 goto trunctlv;
1797 printf("\n\t Adjacency State: %s",
1798 tok2str(isis_ptp_adjancey_values, "0x%02x", *tptr));
1799 tmp--;
1800 }
1801 if(tmp>sizeof(tlv_ptp_adj->extd_local_circuit_id)) {
1802 if (!TTEST2(tlv_ptp_adj->extd_local_circuit_id,
1803 sizeof(tlv_ptp_adj->extd_local_circuit_id)))
1804 goto trunctlv;
1805 printf("\n\t Extended Local circuit ID: 0x%08x",
1806 EXTRACT_32BITS(tlv_ptp_adj->extd_local_circuit_id));
1807 tmp-=sizeof(tlv_ptp_adj->extd_local_circuit_id);
1808 }
1809 if(tmp>=SYSTEM_ID_LEN) {
1810 if (!TTEST2(tlv_ptp_adj->neighbor_sysid, SYSTEM_ID_LEN))
1811 goto trunctlv;
1812 printf("\n\t Neighbor SystemID: %s",
1813 isis_print_sysid(tlv_ptp_adj->neighbor_sysid,SYSTEM_ID_LEN));
1814 tmp-=SYSTEM_ID_LEN;
1815 }
1816 if(tmp>=sizeof(tlv_ptp_adj->neighbor_extd_local_circuit_id)) {
1817 if (!TTEST2(tlv_ptp_adj->neighbor_extd_local_circuit_id,
1818 sizeof(tlv_ptp_adj->neighbor_extd_local_circuit_id)))
1819 goto trunctlv;
1820 printf("\n\t Neighbor Extended Local circuit ID: 0x%08x",
1821 EXTRACT_32BITS(tlv_ptp_adj->neighbor_extd_local_circuit_id));
1822 }
1823 break;
1824
1825 case TLV_PROTOCOLS:
1826 printf("\n\t NLPID(s): ");
1827 while (tmp>0) {
1828 if (!TTEST2(*(tptr), 1))
1829 goto trunctlv;
1830 printf("%s",
1831 tok2str(osi_nlpid_values,
1832 "Unknown 0x%02x",
1833 *tptr++));
1834 if (tmp>1) /* further NPLIDs ? - put comma */
1835 printf(", ");
1836 tmp--;
1837 }
1838 break;
1839
1840 case TLV_TE_ROUTER_ID:
1841 if (!TTEST2(*pptr, 4))
1842 goto trunctlv;
1843 printf("\n\t Traffic Engineering Router ID: %s", ipaddr_string(pptr));
1844 break;
1845
1846 case TLV_IPADDR:
1847 while (tmp>0) {
1848 if (!TTEST2(*tptr, 4))
1849 goto trunctlv;
1850 printf("\n\t IPv4 interface address: %s", ipaddr_string(tptr));
1851 tptr += 4;
1852 tmp -= 4;
1853 }
1854 break;
1855
1856 case TLV_HOSTNAME:
1857 printf("\n\t Hostname: ");
1858 while (tmp>0) {
1859 if (!TTEST2(*tptr, 1))
1860 goto trunctlv;
1861 printf("%c",*tptr++);
1862 tmp--;
1863 }
1864 break;
1865
1866 case TLV_SHARED_RISK_GROUP:
1867 if (!TTEST2(*tptr, NODE_ID_LEN))
1868 goto trunctlv;
1869 printf("\n\t IS Neighbor: %s", isis_print_nodeid(tptr));
1870 tptr+=(NODE_ID_LEN);
1871 len-=(NODE_ID_LEN);
1872
1873 if (!TTEST2(*tptr, 1))
1874 goto trunctlv;
1875 printf(", %s", ISIS_MASK_TLV_SHARED_RISK_GROUP(*tptr++) ? "numbered" : "unnumbered");
1876 len--;
1877
1878 if (!TTEST2(*tptr,4))
1879 goto trunctlv;
1880 printf("\n\t IPv4 interface address: %s", ipaddr_string(tptr));
1881 tptr+=4;
1882 len-=4;
1883
1884 if (!TTEST2(*tptr,4))
1885 goto trunctlv;
1886 printf("\n\t IPv4 neighbor address: %s", ipaddr_string(tptr));
1887 tptr+=4;
1888 len-=4;
1889
1890 while (tmp>0) {
1891 if (!TTEST2(*tptr, 4))
1892 goto trunctlv;
1893 printf("\n\t Link-ID: 0x%08x", EXTRACT_32BITS(tptr));
1894 tptr+=4;
1895 len-=4;
1896 }
1897 break;
1898
1899 case TLV_LSP:
1900 tlv_lsp = (const struct isis_tlv_lsp *)tptr;
1901 while(tmp>0) {
1902 printf("\n\t lsp-id: %s",
1903 isis_print_nodeid(tlv_lsp->lsp_id));
1904 if (!TTEST((tlv_lsp->lsp_id)[NODE_ID_LEN]))
1905 goto trunctlv;
1906 printf("-%02x",(tlv_lsp->lsp_id)[NODE_ID_LEN]);
1907 if (!TTEST2(tlv_lsp->sequence_number, 4))
1908 goto trunctlv;
1909 printf(", seq: 0x%08x",EXTRACT_32BITS(tlv_lsp->sequence_number));
1910 if (!TTEST2(tlv_lsp->remaining_lifetime, 2))
1911 goto trunctlv;
1912 printf(", lifetime: %5ds",EXTRACT_16BITS(tlv_lsp->remaining_lifetime));
1913 if (!TTEST2(tlv_lsp->checksum, 2))
1914 goto trunctlv;
1915 printf(", chksum: 0x%04x",EXTRACT_16BITS(tlv_lsp->checksum));
1916 tmp-=sizeof(struct isis_tlv_lsp);
1917 tlv_lsp++;
1918 }
1919 break;
1920
1921 case TLV_CHECKSUM:
1922 if (!TTEST2(*tptr, 2))
1923 goto trunctlv;
1924 printf("\n\t checksum: 0x%04x (%s)",
1925 EXTRACT_16BITS(tptr),
1926 (osi_cksum(optr, length)) ? "incorrect" : "correct");
1927 break;
1928
1929 case TLV_MT_SUPPORTED:
1930 while (tmp>1) {
1931 /* length can only be a multiple of 2, otherwise there is
1932 something broken -> so decode down until length is 1 */
1933 if (tmp!=1) {
1934 mt_len = isis_print_mtid(tptr, "\n\t ");
1935 if (mt_len == 0) /* did something go wrong ? */
1936 goto trunctlv;
1937 tptr+=mt_len;
1938 tmp-=mt_len;
1939 } else {
1940 printf("\n\t malformed MT-ID");
1941 break;
1942 }
1943 }
1944 break;
1945
1946 case TLV_RESTART_SIGNALING:
1947 if (!TTEST2(*tptr, 3))
1948 goto trunctlv;
1949 rr = ISIS_MASK_TLV_RESTART_RR(*tptr);
1950 ra = ISIS_MASK_TLV_RESTART_RA(*tptr);
1951 tptr++;
1952 time_remain = EXTRACT_16BITS(tptr);
1953 printf("\n\t Restart Request bit %s, Restart Acknowledgement bit %s\n\t Remaining holding time: %us",
1954 rr ? "set" : "clear", ra ? "set" : "clear", time_remain);
1955 break;
1956
1957 case TLV_IDRP_INFO:
1958 if (!TTEST2(*tptr, 1))
1959 goto trunctlv;
1960 printf("\n\t Inter-Domain Information Type: %s",
1961 tok2str(isis_subtlv_idrp_values,
1962 "Unknown (0x%02x)",
1963 *tptr));
1964 switch (*tptr++) {
1965 case SUBTLV_IDRP_ASN:
1966 if (!TTEST2(*tptr, 2)) /* fetch AS number */
1967 goto trunctlv;
1968 printf("AS Number: %u",EXTRACT_16BITS(tptr));
1969 break;
1970 case SUBTLV_IDRP_LOCAL:
1971 case SUBTLV_IDRP_RES:
1972 default:
1973 if(!print_unknown_data(tptr,"\n\t ",len-1))
1974 return(0);
1975 break;
1976 }
1977 break;
1978
1979 case TLV_LSP_BUFFERSIZE:
1980 if (!TTEST2(*tptr, 2))
1981 goto trunctlv;
1982 printf("\n\t LSP Buffersize: %u",EXTRACT_16BITS(tptr));
1983 break;
1984
1985 case TLV_PART_DIS:
1986 while (tmp >= SYSTEM_ID_LEN) {
1987 if (!TTEST2(*tptr, SYSTEM_ID_LEN))
1988 goto trunctlv;
1989 printf("\n\t %s",isis_print_sysid(tptr,SYSTEM_ID_LEN));
1990 tptr+=SYSTEM_ID_LEN;
1991 tmp-=SYSTEM_ID_LEN;
1992 }
1993 break;
1994
1995 case TLV_PREFIX_NEIGH:
1996 if (!TTEST2(*tptr, sizeof(struct isis_metric_block)))
1997 goto trunctlv;
1998 printf("\n\t Metric Block");
1999 isis_print_metric_block((const struct isis_metric_block *)tptr);
2000 tptr+=sizeof(struct isis_metric_block);
2001 tmp-=sizeof(struct isis_metric_block);
2002
2003 while(tmp>0) {
2004 if (!TTEST2(*tptr, 1))
2005 goto trunctlv;
2006 prefix_len=*tptr++; /* read out prefix length in semioctets*/
2007 tmp--;
2008 if (!TTEST2(*tptr, prefix_len/2))
2009 goto trunctlv;
2010 printf("\n\t\tAddress: %s/%u",
2011 print_nsap(tptr,prefix_len/2),
2012 prefix_len*4);
2013 tptr+=prefix_len/2;
2014 tmp-=prefix_len/2;
2015 }
2016 break;
2017
2018 case TLV_IIH_SEQNR:
2019 if (!TTEST2(*tptr, 4)) /* check if four bytes are on the wire */
2020 goto trunctlv;
2021 printf("\n\t Sequence number: %u", EXTRACT_32BITS(tptr) );
2022 break;
2023
2024 case TLV_VENDOR_PRIVATE:
2025 if (!TTEST2(*tptr, 3)) /* check if enough byte for a full oui */
2026 goto trunctlv;
2027 printf("\n\t Vendor OUI Code: 0x%06x", EXTRACT_24BITS(tptr) );
2028 tptr+=3;
2029 tmp-=3;
2030 if (tmp > 0) /* hexdump the rest */
2031 if(!print_unknown_data(tptr,"\n\t\t",tmp))
2032 return(0);
2033 break;
2034 /*
2035 * FIXME those are the defined TLVs that lack a decoder
2036 * you are welcome to contribute code ;-)
2037 */
2038
2039 case TLV_DECNET_PHASE4:
2040 case TLV_LUCENT_PRIVATE:
2041 case TLV_IPAUTH:
2042 case TLV_NORTEL_PRIVATE1:
2043 case TLV_NORTEL_PRIVATE2:
2044
2045 default:
2046 if (vflag <= 1) {
2047 if(!print_unknown_data(pptr,"\n\t\t",len))
2048 return(0);
2049 }
2050 break;
2051 }
2052 /* do we want to see an additionally hexdump ? */
2053 if (vflag> 1) {
2054 if(!print_unknown_data(pptr,"\n\t ",len))
2055 return(0);
2056 }
2057
2058 pptr += len;
2059 packet_len -= len;
2060 }
2061
2062 if (packet_len != 0) {
2063 printf("\n\t %u straggler bytes", packet_len);
2064 }
2065 return (1);
2066
2067 trunc:
2068 fputs("[|isis]", stdout);
2069 return (1);
2070
2071 trunctlv:
2072 printf("\n\t\t packet exceeded snapshot");
2073 return(1);
2074 }
2075
2076 /*
2077 * Verify the checksum. See 8473-1, Appendix C, section C.4.
2078 */
2079
2080 static int
2081 osi_cksum(const u_int8_t *tptr, u_int len)
2082 {
2083 int32_t c0 = 0, c1 = 0;
2084
2085 while ((int)--len >= 0) {
2086 c0 += *tptr++;
2087 c0 %= 255;
2088 c1 += c0;
2089 c1 %= 255;
2090 }
2091 return (c0 | c1);
2092 }
[mirror] the TCPdump network dissector