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 & CLNP support.
25 */
26
27 #ifndef lint
28 static const char rcsid[] _U_ =
29 "@(#) $Header: /tcpdump/master/tcpdump/print-isoclns.c,v 1.133.2.25 2007/03/02 09:20:27 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 "nlpid.h"
46 #include "extract.h"
47 #include "gmpls.h"
48 #include "oui.h"
49
50 #define IPV4 1 /* AFI value */
51 #define IPV6 2 /* AFI value */
52
53 /*
54 * IS-IS is defined in ISO 10589. Look there for protocol definitions.
55 */
56
57 #define SYSTEM_ID_LEN ETHER_ADDR_LEN
58 #define NODE_ID_LEN SYSTEM_ID_LEN+1
59 #define LSP_ID_LEN SYSTEM_ID_LEN+2
60
61 #define ISIS_VERSION 1
62 #define ESIS_VERSION 1
63 #define CLNP_VERSION 1
64
65 #define ISIS_PDU_TYPE_MASK 0x1F
66 #define ESIS_PDU_TYPE_MASK 0x1F
67 #define CLNP_PDU_TYPE_MASK 0x1F
68 #define CLNP_FLAG_MASK 0xE0
69 #define ISIS_LAN_PRIORITY_MASK 0x7F
70
71 #define ISIS_PDU_L1_LAN_IIH 15
72 #define ISIS_PDU_L2_LAN_IIH 16
73 #define ISIS_PDU_PTP_IIH 17
74 #define ISIS_PDU_L1_LSP 18
75 #define ISIS_PDU_L2_LSP 20
76 #define ISIS_PDU_L1_CSNP 24
77 #define ISIS_PDU_L2_CSNP 25
78 #define ISIS_PDU_L1_PSNP 26
79 #define ISIS_PDU_L2_PSNP 27
80
81 static struct tok isis_pdu_values[] = {
82 { ISIS_PDU_L1_LAN_IIH, "L1 Lan IIH"},
83 { ISIS_PDU_L2_LAN_IIH, "L2 Lan IIH"},
84 { ISIS_PDU_PTP_IIH, "p2p IIH"},
85 { ISIS_PDU_L1_LSP, "L1 LSP"},
86 { ISIS_PDU_L2_LSP, "L2 LSP"},
87 { ISIS_PDU_L1_CSNP, "L1 CSNP"},
88 { ISIS_PDU_L2_CSNP, "L2 CSNP"},
89 { ISIS_PDU_L1_PSNP, "L1 PSNP"},
90 { ISIS_PDU_L2_PSNP, "L2 PSNP"},
91 { 0, NULL}
92 };
93
94 /*
95 * A TLV is a tuple of a type, length and a value and is normally used for
96 * encoding information in all sorts of places. This is an enumeration of
97 * the well known types.
98 *
99 * list taken from rfc3359 plus some memory from veterans ;-)
100 */
101
102 #define ISIS_TLV_AREA_ADDR 1 /* iso10589 */
103 #define ISIS_TLV_IS_REACH 2 /* iso10589 */
104 #define ISIS_TLV_ESNEIGH 3 /* iso10589 */
105 #define ISIS_TLV_PART_DIS 4 /* iso10589 */
106 #define ISIS_TLV_PREFIX_NEIGH 5 /* iso10589 */
107 #define ISIS_TLV_ISNEIGH 6 /* iso10589 */
108 #define ISIS_TLV_ISNEIGH_VARLEN 7 /* iso10589 */
109 #define ISIS_TLV_PADDING 8 /* iso10589 */
110 #define ISIS_TLV_LSP 9 /* iso10589 */
111 #define ISIS_TLV_AUTH 10 /* iso10589, rfc3567 */
112 #define ISIS_TLV_CHECKSUM 12 /* rfc3358 */
113 #define ISIS_TLV_CHECKSUM_MINLEN 2
114 #define ISIS_TLV_LSP_BUFFERSIZE 14 /* iso10589 rev2 */
115 #define ISIS_TLV_LSP_BUFFERSIZE_MINLEN 2
116 #define ISIS_TLV_EXT_IS_REACH 22 /* draft-ietf-isis-traffic-05 */
117 #define ISIS_TLV_IS_ALIAS_ID 24 /* draft-ietf-isis-ext-lsp-frags-02 */
118 #define ISIS_TLV_DECNET_PHASE4 42
119 #define ISIS_TLV_LUCENT_PRIVATE 66
120 #define ISIS_TLV_INT_IP_REACH 128 /* rfc1195, rfc2966 */
121 #define ISIS_TLV_PROTOCOLS 129 /* rfc1195 */
122 #define ISIS_TLV_EXT_IP_REACH 130 /* rfc1195, rfc2966 */
123 #define ISIS_TLV_IDRP_INFO 131 /* rfc1195 */
124 #define ISIS_TLV_IDRP_INFO_MINLEN 1
125 #define ISIS_TLV_IPADDR 132 /* rfc1195 */
126 #define ISIS_TLV_IPAUTH 133 /* rfc1195 */
127 #define ISIS_TLV_TE_ROUTER_ID 134 /* draft-ietf-isis-traffic-05 */
128 #define ISIS_TLV_EXTD_IP_REACH 135 /* draft-ietf-isis-traffic-05 */
129 #define ISIS_TLV_HOSTNAME 137 /* rfc2763 */
130 #define ISIS_TLV_SHARED_RISK_GROUP 138 /* draft-ietf-isis-gmpls-extensions */
131 #define ISIS_TLV_NORTEL_PRIVATE1 176
132 #define ISIS_TLV_NORTEL_PRIVATE2 177
133 #define ISIS_TLV_RESTART_SIGNALING 211 /* rfc3847 */
134 #define ISIS_TLV_RESTART_SIGNALING_FLAGLEN 1
135 #define ISIS_TLV_RESTART_SIGNALING_HOLDTIMELEN 2
136 #define ISIS_TLV_MT_IS_REACH 222 /* draft-ietf-isis-wg-multi-topology-05 */
137 #define ISIS_TLV_MT_SUPPORTED 229 /* draft-ietf-isis-wg-multi-topology-05 */
138 #define ISIS_TLV_MT_SUPPORTED_MINLEN 2
139 #define ISIS_TLV_IP6ADDR 232 /* draft-ietf-isis-ipv6-02 */
140 #define ISIS_TLV_MT_IP_REACH 235 /* draft-ietf-isis-wg-multi-topology-05 */
141 #define ISIS_TLV_IP6_REACH 236 /* draft-ietf-isis-ipv6-02 */
142 #define ISIS_TLV_MT_IP6_REACH 237 /* draft-ietf-isis-wg-multi-topology-05 */
143 #define ISIS_TLV_PTP_ADJ 240 /* rfc3373 */
144 #define ISIS_TLV_IIH_SEQNR 241 /* draft-shen-isis-iih-sequence-00 */
145 #define ISIS_TLV_IIH_SEQNR_MINLEN 4
146 #define ISIS_TLV_VENDOR_PRIVATE 250 /* draft-ietf-isis-experimental-tlv-01 */
147 #define ISIS_TLV_VENDOR_PRIVATE_MINLEN 3
148
149 static struct tok isis_tlv_values[] = {
150 { ISIS_TLV_AREA_ADDR, "Area address(es)"},
151 { ISIS_TLV_IS_REACH, "IS Reachability"},
152 { ISIS_TLV_ESNEIGH, "ES Neighbor(s)"},
153 { ISIS_TLV_PART_DIS, "Partition DIS"},
154 { ISIS_TLV_PREFIX_NEIGH, "Prefix Neighbors"},
155 { ISIS_TLV_ISNEIGH, "IS Neighbor(s)"},
156 { ISIS_TLV_ISNEIGH_VARLEN, "IS Neighbor(s) (variable length)"},
157 { ISIS_TLV_PADDING, "Padding"},
158 { ISIS_TLV_LSP, "LSP entries"},
159 { ISIS_TLV_AUTH, "Authentication"},
160 { ISIS_TLV_CHECKSUM, "Checksum"},
161 { ISIS_TLV_LSP_BUFFERSIZE, "LSP Buffersize"},
162 { ISIS_TLV_EXT_IS_REACH, "Extended IS Reachability"},
163 { ISIS_TLV_IS_ALIAS_ID, "IS Alias ID"},
164 { ISIS_TLV_DECNET_PHASE4, "DECnet Phase IV"},
165 { ISIS_TLV_LUCENT_PRIVATE, "Lucent Proprietary"},
166 { ISIS_TLV_INT_IP_REACH, "IPv4 Internal Reachability"},
167 { ISIS_TLV_PROTOCOLS, "Protocols supported"},
168 { ISIS_TLV_EXT_IP_REACH, "IPv4 External Reachability"},
169 { ISIS_TLV_IDRP_INFO, "Inter-Domain Information Type"},
170 { ISIS_TLV_IPADDR, "IPv4 Interface address(es)"},
171 { ISIS_TLV_IPAUTH, "IPv4 authentication (deprecated)"},
172 { ISIS_TLV_TE_ROUTER_ID, "Traffic Engineering Router ID"},
173 { ISIS_TLV_EXTD_IP_REACH, "Extended IPv4 Reachability"},
174 { ISIS_TLV_SHARED_RISK_GROUP, "Shared Risk Link Group"},
175 { ISIS_TLV_NORTEL_PRIVATE1, "Nortel Proprietary"},
176 { ISIS_TLV_NORTEL_PRIVATE2, "Nortel Proprietary"},
177 { ISIS_TLV_HOSTNAME, "Hostname"},
178 { ISIS_TLV_RESTART_SIGNALING, "Restart Signaling"},
179 { ISIS_TLV_MT_IS_REACH, "Multi Topology IS Reachability"},
180 { ISIS_TLV_MT_SUPPORTED, "Multi Topology"},
181 { ISIS_TLV_IP6ADDR, "IPv6 Interface address(es)"},
182 { ISIS_TLV_MT_IP_REACH, "Multi-Topology IPv4 Reachability"},
183 { ISIS_TLV_IP6_REACH, "IPv6 reachability"},
184 { ISIS_TLV_MT_IP6_REACH, "Multi-Topology IP6 Reachability"},
185 { ISIS_TLV_PTP_ADJ, "Point-to-point Adjacency State"},
186 { ISIS_TLV_IIH_SEQNR, "Hello PDU Sequence Number"},
187 { ISIS_TLV_VENDOR_PRIVATE, "Vendor Private"},
188 { 0, NULL }
189 };
190
191 #define ESIS_OPTION_PROTOCOLS 129
192 #define ESIS_OPTION_QOS_MAINTENANCE 195 /* iso9542 */
193 #define ESIS_OPTION_SECURITY 197 /* iso9542 */
194 #define ESIS_OPTION_ES_CONF_TIME 198 /* iso9542 */
195 #define ESIS_OPTION_PRIORITY 205 /* iso9542 */
196 #define ESIS_OPTION_ADDRESS_MASK 225 /* iso9542 */
197 #define ESIS_OPTION_SNPA_MASK 226 /* iso9542 */
198
199 static struct tok esis_option_values[] = {
200 { ESIS_OPTION_PROTOCOLS, "Protocols supported"},
201 { ESIS_OPTION_QOS_MAINTENANCE, "QoS Maintenance" },
202 { ESIS_OPTION_SECURITY, "Security" },
203 { ESIS_OPTION_ES_CONF_TIME, "ES Configuration Time" },
204 { ESIS_OPTION_PRIORITY, "Priority" },
205 { ESIS_OPTION_ADDRESS_MASK, "Addressk Mask" },
206 { ESIS_OPTION_SNPA_MASK, "SNPA Mask" },
207 { 0, NULL }
208 };
209
210 #define CLNP_OPTION_DISCARD_REASON 193
211 #define CLNP_OPTION_QOS_MAINTENANCE 195 /* iso8473 */
212 #define CLNP_OPTION_SECURITY 197 /* iso8473 */
213 #define CLNP_OPTION_SOURCE_ROUTING 200 /* iso8473 */
214 #define CLNP_OPTION_ROUTE_RECORDING 203 /* iso8473 */
215 #define CLNP_OPTION_PADDING 204 /* iso8473 */
216 #define CLNP_OPTION_PRIORITY 205 /* iso8473 */
217
218 static struct tok clnp_option_values[] = {
219 { CLNP_OPTION_DISCARD_REASON, "Discard Reason"},
220 { CLNP_OPTION_PRIORITY, "Priority"},
221 { CLNP_OPTION_QOS_MAINTENANCE, "QoS Maintenance"},
222 { CLNP_OPTION_SECURITY, "Security"},
223 { CLNP_OPTION_SOURCE_ROUTING, "Source Routing"},
224 { CLNP_OPTION_ROUTE_RECORDING, "Route Recording"},
225 { CLNP_OPTION_PADDING, "Padding"},
226 { 0, NULL }
227 };
228
229 static struct tok clnp_option_rfd_class_values[] = {
230 { 0x0, "General"},
231 { 0x8, "Address"},
232 { 0x9, "Source Routeing"},
233 { 0xa, "Lifetime"},
234 { 0xb, "PDU Discarded"},
235 { 0xc, "Reassembly"},
236 { 0, NULL }
237 };
238
239 static struct tok clnp_option_rfd_general_values[] = {
240 { 0x0, "Reason not specified"},
241 { 0x1, "Protocol procedure error"},
242 { 0x2, "Incorrect checksum"},
243 { 0x3, "PDU discarded due to congestion"},
244 { 0x4, "Header syntax error (cannot be parsed)"},
245 { 0x5, "Segmentation needed but not permitted"},
246 { 0x6, "Incomplete PDU received"},
247 { 0x7, "Duplicate option"},
248 { 0, NULL }
249 };
250
251 static struct tok clnp_option_rfd_address_values[] = {
252 { 0x0, "Destination address unreachable"},
253 { 0x1, "Destination address unknown"},
254 { 0, NULL }
255 };
256
257 static struct tok clnp_option_rfd_source_routeing_values[] = {
258 { 0x0, "Unspecified source routeing error"},
259 { 0x1, "Syntax error in source routeing field"},
260 { 0x2, "Unknown address in source routeing field"},
261 { 0x3, "Path not acceptable"},
262 { 0, NULL }
263 };
264
265 static struct tok clnp_option_rfd_lifetime_values[] = {
266 { 0x0, "Lifetime expired while data unit in transit"},
267 { 0x1, "Lifetime expired during reassembly"},
268 { 0, NULL }
269 };
270
271 static struct tok clnp_option_rfd_pdu_discard_values[] = {
272 { 0x0, "Unsupported option not specified"},
273 { 0x1, "Unsupported protocol version"},
274 { 0x2, "Unsupported security option"},
275 { 0x3, "Unsupported source routeing option"},
276 { 0x4, "Unsupported recording of route option"},
277 { 0, NULL }
278 };
279
280 static struct tok clnp_option_rfd_reassembly_values[] = {
281 { 0x0, "Reassembly interference"},
282 { 0, NULL }
283 };
284
285 /* array of 16 error-classes */
286 static struct tok *clnp_option_rfd_error_class[] = {
287 clnp_option_rfd_general_values,
288 NULL,
289 NULL,
290 NULL,
291 NULL,
292 NULL,
293 NULL,
294 NULL,
295 clnp_option_rfd_address_values,
296 clnp_option_rfd_source_routeing_values,
297 clnp_option_rfd_lifetime_values,
298 clnp_option_rfd_pdu_discard_values,
299 clnp_option_rfd_reassembly_values,
300 NULL,
301 NULL,
302 NULL
303 };
304
305 #define CLNP_OPTION_OPTION_QOS_MASK 0x3f
306 #define CLNP_OPTION_SCOPE_MASK 0xc0
307 #define CLNP_OPTION_SCOPE_SA_SPEC 0x40
308 #define CLNP_OPTION_SCOPE_DA_SPEC 0x80
309 #define CLNP_OPTION_SCOPE_GLOBAL 0xc0
310
311 static struct tok clnp_option_scope_values[] = {
312 { CLNP_OPTION_SCOPE_SA_SPEC, "Source Address Specific"},
313 { CLNP_OPTION_SCOPE_DA_SPEC, "Destination Address Specific"},
314 { CLNP_OPTION_SCOPE_GLOBAL, "Globally unique"},
315 { 0, NULL }
316 };
317
318 static struct tok clnp_option_sr_rr_values[] = {
319 { 0x0, "partial"},
320 { 0x1, "complete"},
321 { 0, NULL }
322 };
323
324 static struct tok clnp_option_sr_rr_string_values[] = {
325 { CLNP_OPTION_SOURCE_ROUTING, "source routing"},
326 { CLNP_OPTION_ROUTE_RECORDING, "recording of route in progress"},
327 { 0, NULL }
328 };
329
330 static struct tok clnp_option_qos_global_values[] = {
331 { 0x20, "reserved"},
332 { 0x10, "sequencing vs. delay"},
333 { 0x08, "congested"},
334 { 0x04, "delay vs. cost"},
335 { 0x02, "error vs. delay"},
336 { 0x01, "error vs. cost"},
337 { 0, NULL }
338 };
339
340 #define ISIS_SUBTLV_EXT_IS_REACH_ADMIN_GROUP 3 /* draft-ietf-isis-traffic-05 */
341 #define ISIS_SUBTLV_EXT_IS_REACH_LINK_LOCAL_REMOTE_ID 4 /* draft-ietf-isis-gmpls-extensions */
342 #define ISIS_SUBTLV_EXT_IS_REACH_LINK_REMOTE_ID 5 /* draft-ietf-isis-traffic-05 */
343 #define ISIS_SUBTLV_EXT_IS_REACH_IPV4_INTF_ADDR 6 /* draft-ietf-isis-traffic-05 */
344 #define ISIS_SUBTLV_EXT_IS_REACH_IPV4_NEIGHBOR_ADDR 8 /* draft-ietf-isis-traffic-05 */
345 #define ISIS_SUBTLV_EXT_IS_REACH_MAX_LINK_BW 9 /* draft-ietf-isis-traffic-05 */
346 #define ISIS_SUBTLV_EXT_IS_REACH_RESERVABLE_BW 10 /* draft-ietf-isis-traffic-05 */
347 #define ISIS_SUBTLV_EXT_IS_REACH_UNRESERVED_BW 11 /* rfc4124 */
348 #define ISIS_SUBTLV_EXT_IS_REACH_BW_CONSTRAINTS_OLD 12 /* draft-ietf-tewg-diff-te-proto-06 */
349 #define ISIS_SUBTLV_EXT_IS_REACH_TE_METRIC 18 /* draft-ietf-isis-traffic-05 */
350 #define ISIS_SUBTLV_EXT_IS_REACH_LINK_PROTECTION_TYPE 20 /* draft-ietf-isis-gmpls-extensions */
351 #define ISIS_SUBTLV_EXT_IS_REACH_INTF_SW_CAP_DESCR 21 /* draft-ietf-isis-gmpls-extensions */
352 #define ISIS_SUBTLV_EXT_IS_REACH_BW_CONSTRAINTS 22 /* rfc4124 */
353
354 static struct tok isis_ext_is_reach_subtlv_values[] = {
355 { ISIS_SUBTLV_EXT_IS_REACH_ADMIN_GROUP, "Administrative groups" },
356 { ISIS_SUBTLV_EXT_IS_REACH_LINK_LOCAL_REMOTE_ID, "Link Local/Remote Identifier" },
357 { ISIS_SUBTLV_EXT_IS_REACH_LINK_REMOTE_ID, "Link Remote Identifier" },
358 { ISIS_SUBTLV_EXT_IS_REACH_IPV4_INTF_ADDR, "IPv4 interface address" },
359 { ISIS_SUBTLV_EXT_IS_REACH_IPV4_NEIGHBOR_ADDR, "IPv4 neighbor address" },
360 { ISIS_SUBTLV_EXT_IS_REACH_MAX_LINK_BW, "Maximum link bandwidth" },
361 { ISIS_SUBTLV_EXT_IS_REACH_RESERVABLE_BW, "Reservable link bandwidth" },
362 { ISIS_SUBTLV_EXT_IS_REACH_UNRESERVED_BW, "Unreserved bandwidth" },
363 { ISIS_SUBTLV_EXT_IS_REACH_TE_METRIC, "Traffic Engineering Metric" },
364 { ISIS_SUBTLV_EXT_IS_REACH_LINK_PROTECTION_TYPE, "Link Protection Type" },
365 { ISIS_SUBTLV_EXT_IS_REACH_INTF_SW_CAP_DESCR, "Interface Switching Capability" },
366 { ISIS_SUBTLV_EXT_IS_REACH_BW_CONSTRAINTS_OLD, "Bandwidth Constraints (old)" },
367 { ISIS_SUBTLV_EXT_IS_REACH_BW_CONSTRAINTS, "Bandwidth Constraints" },
368 { 250, "Reserved for cisco specific extensions" },
369 { 251, "Reserved for cisco specific extensions" },
370 { 252, "Reserved for cisco specific extensions" },
371 { 253, "Reserved for cisco specific extensions" },
372 { 254, "Reserved for cisco specific extensions" },
373 { 255, "Reserved for future expansion" },
374 { 0, NULL }
375 };
376
377 #define ISIS_SUBTLV_EXTD_IP_REACH_ADMIN_TAG32 1 /* draft-ietf-isis-admin-tags-01 */
378 #define ISIS_SUBTLV_EXTD_IP_REACH_ADMIN_TAG64 2 /* draft-ietf-isis-admin-tags-01 */
379 #define ISIS_SUBTLV_EXTD_IP_REACH_MGMT_PREFIX_COLOR 117 /* draft-ietf-isis-wg-multi-topology-05 */
380
381 static struct tok isis_ext_ip_reach_subtlv_values[] = {
382 { ISIS_SUBTLV_EXTD_IP_REACH_ADMIN_TAG32, "32-Bit Administrative tag" },
383 { ISIS_SUBTLV_EXTD_IP_REACH_ADMIN_TAG64, "64-Bit Administrative tag" },
384 { ISIS_SUBTLV_EXTD_IP_REACH_MGMT_PREFIX_COLOR, "Management Prefix Color" },
385 { 0, NULL }
386 };
387
388 #define ISIS_SUBTLV_AUTH_SIMPLE 1
389 #define ISIS_SUBTLV_AUTH_MD5 54
390 #define ISIS_SUBTLV_AUTH_MD5_LEN 16
391 #define ISIS_SUBTLV_AUTH_PRIVATE 255
392
393 static struct tok isis_subtlv_auth_values[] = {
394 { ISIS_SUBTLV_AUTH_SIMPLE, "simple text password"},
395 { ISIS_SUBTLV_AUTH_MD5, "HMAC-MD5 password"},
396 { ISIS_SUBTLV_AUTH_PRIVATE, "Routing Domain private password"},
397 { 0, NULL }
398 };
399
400 #define ISIS_SUBTLV_IDRP_RES 0
401 #define ISIS_SUBTLV_IDRP_LOCAL 1
402 #define ISIS_SUBTLV_IDRP_ASN 2
403
404 static struct tok isis_subtlv_idrp_values[] = {
405 { ISIS_SUBTLV_IDRP_RES, "Reserved"},
406 { ISIS_SUBTLV_IDRP_LOCAL, "Routing-Domain Specific"},
407 { ISIS_SUBTLV_IDRP_ASN, "AS Number Tag"},
408 { 0, NULL}
409 };
410
411 #define CLNP_SEGMENT_PART 0x80
412 #define CLNP_MORE_SEGMENTS 0x40
413 #define CLNP_REQUEST_ER 0x20
414
415 static struct tok clnp_flag_values[] = {
416 { CLNP_SEGMENT_PART, "Segmentation permitted"},
417 { CLNP_MORE_SEGMENTS, "more Segments"},
418 { CLNP_REQUEST_ER, "request Error Report"},
419 { 0, NULL}
420 };
421
422 #define ISIS_MASK_LSP_OL_BIT(x) ((x)&0x4)
423 #define ISIS_MASK_LSP_ISTYPE_BITS(x) ((x)&0x3)
424 #define ISIS_MASK_LSP_PARTITION_BIT(x) ((x)&0x80)
425 #define ISIS_MASK_LSP_ATT_BITS(x) ((x)&0x78)
426 #define ISIS_MASK_LSP_ATT_ERROR_BIT(x) ((x)&0x40)
427 #define ISIS_MASK_LSP_ATT_EXPENSE_BIT(x) ((x)&0x20)
428 #define ISIS_MASK_LSP_ATT_DELAY_BIT(x) ((x)&0x10)
429 #define ISIS_MASK_LSP_ATT_DEFAULT_BIT(x) ((x)&0x8)
430
431 #define ISIS_MASK_MTID(x) ((x)&0x0fff)
432 #define ISIS_MASK_MTFLAGS(x) ((x)&0xf000)
433
434 static struct tok isis_mt_flag_values[] = {
435 { 0x4000, "sub-TLVs present"},
436 { 0x8000, "ATT bit set"},
437 { 0, NULL}
438 };
439
440 #define ISIS_MASK_TLV_EXTD_IP_UPDOWN(x) ((x)&0x80)
441 #define ISIS_MASK_TLV_EXTD_IP_SUBTLV(x) ((x)&0x40)
442
443 #define ISIS_MASK_TLV_EXTD_IP6_IE(x) ((x)&0x40)
444 #define ISIS_MASK_TLV_EXTD_IP6_SUBTLV(x) ((x)&0x20)
445
446 #define ISIS_LSP_TLV_METRIC_SUPPORTED(x) ((x)&0x80)
447 #define ISIS_LSP_TLV_METRIC_IE(x) ((x)&0x40)
448 #define ISIS_LSP_TLV_METRIC_UPDOWN(x) ((x)&0x80)
449 #define ISIS_LSP_TLV_METRIC_VALUE(x) ((x)&0x3f)
450
451 #define ISIS_MASK_TLV_SHARED_RISK_GROUP(x) ((x)&0x1)
452
453 static struct tok isis_mt_values[] = {
454 { 0, "IPv4 unicast"},
455 { 1, "In-Band Management"},
456 { 2, "IPv6 unicast"},
457 { 3, "Multicast"},
458 { 4095, "Development, Experimental or Proprietary"},
459 { 0, NULL }
460 };
461
462 static struct tok isis_iih_circuit_type_values[] = {
463 { 1, "Level 1 only"},
464 { 2, "Level 2 only"},
465 { 3, "Level 1, Level 2"},
466 { 0, NULL}
467 };
468
469 #define ISIS_LSP_TYPE_UNUSED0 0
470 #define ISIS_LSP_TYPE_LEVEL_1 1
471 #define ISIS_LSP_TYPE_UNUSED2 2
472 #define ISIS_LSP_TYPE_LEVEL_2 3
473
474 static struct tok isis_lsp_istype_values[] = {
475 { ISIS_LSP_TYPE_UNUSED0, "Unused 0x0 (invalid)"},
476 { ISIS_LSP_TYPE_LEVEL_1, "L1 IS"},
477 { ISIS_LSP_TYPE_UNUSED2, "Unused 0x2 (invalid)"},
478 { ISIS_LSP_TYPE_LEVEL_2, "L2 IS"},
479 { 0, NULL }
480 };
481
482 /*
483 * Katz's point to point adjacency TLV uses codes to tell us the state of
484 * the remote adjacency. Enumerate them.
485 */
486
487 #define ISIS_PTP_ADJ_UP 0
488 #define ISIS_PTP_ADJ_INIT 1
489 #define ISIS_PTP_ADJ_DOWN 2
490
491 static struct tok isis_ptp_adjancey_values[] = {
492 { ISIS_PTP_ADJ_UP, "Up" },
493 { ISIS_PTP_ADJ_INIT, "Initializing" },
494 { ISIS_PTP_ADJ_DOWN, "Down" },
495 { 0, NULL}
496 };
497
498 struct isis_tlv_ptp_adj {
499 u_int8_t adjacency_state;
500 u_int8_t extd_local_circuit_id[4];
501 u_int8_t neighbor_sysid[SYSTEM_ID_LEN];
502 u_int8_t neighbor_extd_local_circuit_id[4];
503 };
504
505 static int osi_cksum(const u_int8_t *, u_int);
506 static int clnp_print(const u_int8_t *, u_int);
507 static void esis_print(const u_int8_t *, u_int);
508 static int isis_print(const u_int8_t *, u_int);
509
510 struct isis_metric_block {
511 u_int8_t metric_default;
512 u_int8_t metric_delay;
513 u_int8_t metric_expense;
514 u_int8_t metric_error;
515 };
516
517 struct isis_tlv_is_reach {
518 struct isis_metric_block isis_metric_block;
519 u_int8_t neighbor_nodeid[NODE_ID_LEN];
520 };
521
522 struct isis_tlv_es_reach {
523 struct isis_metric_block isis_metric_block;
524 u_int8_t neighbor_sysid[SYSTEM_ID_LEN];
525 };
526
527 struct isis_tlv_ip_reach {
528 struct isis_metric_block isis_metric_block;
529 u_int8_t prefix[4];
530 u_int8_t mask[4];
531 };
532
533 static struct tok isis_is_reach_virtual_values[] = {
534 { 0, "IsNotVirtual"},
535 { 1, "IsVirtual"},
536 { 0, NULL }
537 };
538
539 static struct tok isis_restart_flag_values[] = {
540 { 0x1, "Restart Request"},
541 { 0x2, "Restart Acknowledgement"},
542 { 0x4, "Suppress adjacency advertisement"},
543 { 0, NULL }
544 };
545
546 struct isis_common_header {
547 u_int8_t nlpid;
548 u_int8_t fixed_len;
549 u_int8_t version; /* Protocol version */
550 u_int8_t id_length;
551 u_int8_t pdu_type; /* 3 MSbits are reserved */
552 u_int8_t pdu_version; /* Packet format version */
553 u_int8_t reserved;
554 u_int8_t max_area;
555 };
556
557 struct isis_iih_lan_header {
558 u_int8_t circuit_type;
559 u_int8_t source_id[SYSTEM_ID_LEN];
560 u_int8_t holding_time[2];
561 u_int8_t pdu_len[2];
562 u_int8_t priority;
563 u_int8_t lan_id[NODE_ID_LEN];
564 };
565
566 struct isis_iih_ptp_header {
567 u_int8_t circuit_type;
568 u_int8_t source_id[SYSTEM_ID_LEN];
569 u_int8_t holding_time[2];
570 u_int8_t pdu_len[2];
571 u_int8_t circuit_id;
572 };
573
574 struct isis_lsp_header {
575 u_int8_t pdu_len[2];
576 u_int8_t remaining_lifetime[2];
577 u_int8_t lsp_id[LSP_ID_LEN];
578 u_int8_t sequence_number[4];
579 u_int8_t checksum[2];
580 u_int8_t typeblock;
581 };
582
583 struct isis_csnp_header {
584 u_int8_t pdu_len[2];
585 u_int8_t source_id[NODE_ID_LEN];
586 u_int8_t start_lsp_id[LSP_ID_LEN];
587 u_int8_t end_lsp_id[LSP_ID_LEN];
588 };
589
590 struct isis_psnp_header {
591 u_int8_t pdu_len[2];
592 u_int8_t source_id[NODE_ID_LEN];
593 };
594
595 struct isis_tlv_lsp {
596 u_int8_t remaining_lifetime[2];
597 u_int8_t lsp_id[LSP_ID_LEN];
598 u_int8_t sequence_number[4];
599 u_int8_t checksum[2];
600 };
601
602 #define ISIS_COMMON_HEADER_SIZE (sizeof(struct isis_common_header))
603 #define ISIS_IIH_LAN_HEADER_SIZE (sizeof(struct isis_iih_lan_header))
604 #define ISIS_IIH_PTP_HEADER_SIZE (sizeof(struct isis_iih_ptp_header))
605 #define ISIS_LSP_HEADER_SIZE (sizeof(struct isis_lsp_header))
606 #define ISIS_CSNP_HEADER_SIZE (sizeof(struct isis_csnp_header))
607 #define ISIS_PSNP_HEADER_SIZE (sizeof(struct isis_psnp_header))
608
isoclns_print(const u_int8_t * p,u_int length,u_int caplen)609 void isoclns_print(const u_int8_t *p, u_int length, u_int caplen)
610 {
611 const struct isis_common_header *header;
612
613 header = (const struct isis_common_header *)p;
614
615 if (caplen <= 1) { /* enough bytes on the wire ? */
616 printf("|OSI");
617 return;
618 }
619
620 if (eflag)
621 printf("OSI NLPID %s (0x%02x): ",
622 tok2str(nlpid_values,"Unknown",*p),
623 *p);
624
625 switch (*p) {
626
627 case NLPID_CLNP:
628 if (!clnp_print(p, length))
629 print_unknown_data(p,"\n\t",caplen);
630 break;
631
632 case NLPID_ESIS:
633 esis_print(p, length);
634 return;
635
636 case NLPID_ISIS:
637 if (!isis_print(p, length))
638 print_unknown_data(p,"\n\t",caplen);
639 break;
640
641 case NLPID_NULLNS:
642 (void)printf("%slength: %u",
643 eflag ? "" : ", ",
644 length);
645 break;
646
647 case NLPID_Q933:
648 q933_print(p+1, length-1);
649 break;
650
651 case NLPID_IP:
652 ip_print(gndo, p+1, length-1);
653 break;
654
655 #ifdef INET6
656 case NLPID_IP6:
657 ip6_print(p+1, length-1);
658 break;
659 #endif
660
661 case NLPID_PPP:
662 ppp_print(p+1, length-1);
663 break;
664
665 default:
666 if (!eflag)
667 printf("OSI NLPID 0x%02x unknown",*p);
668 (void)printf("%slength: %u",
669 eflag ? "" : ", ",
670 length);
671 if (caplen > 1)
672 print_unknown_data(p,"\n\t",caplen);
673 break;
674 }
675 }
676
677 #define CLNP_PDU_ER 1
678 #define CLNP_PDU_DT 28
679 #define CLNP_PDU_MD 29
680 #define CLNP_PDU_ERQ 30
681 #define CLNP_PDU_ERP 31
682
683 static struct tok clnp_pdu_values[] = {
684 { CLNP_PDU_ER, "Error Report"},
685 { CLNP_PDU_MD, "MD"},
686 { CLNP_PDU_DT, "Data"},
687 { CLNP_PDU_ERQ, "Echo Request"},
688 { CLNP_PDU_ERP, "Echo Response"},
689 { 0, NULL }
690 };
691
692 struct clnp_header_t {
693 u_int8_t nlpid;
694 u_int8_t length_indicator;
695 u_int8_t version;
696 u_int8_t lifetime; /* units of 500ms */
697 u_int8_t type;
698 u_int8_t segment_length[2];
699 u_int8_t cksum[2];
700 };
701
702 struct clnp_segment_header_t {
703 u_int8_t data_unit_id[2];
704 u_int8_t segment_offset[2];
705 u_int8_t total_length[2];
706 };
707
708 /*
709 * clnp_print
710 * Decode CLNP packets. Return 0 on error.
711 */
712
clnp_print(const u_int8_t * pptr,u_int length)713 static int clnp_print (const u_int8_t *pptr, u_int length)
714 {
715 const u_int8_t *optr,*source_address,*dest_address;
716 u_int li,tlen,nsap_offset,source_address_length,dest_address_length, clnp_pdu_type, clnp_flags;
717 const struct clnp_header_t *clnp_header;
718 const struct clnp_segment_header_t *clnp_segment_header;
719 u_int8_t rfd_error_major,rfd_error_minor;
720
721 clnp_header = (const struct clnp_header_t *) pptr;
722 TCHECK(*clnp_header);
723
724 li = clnp_header->length_indicator;
725 optr = pptr;
726
727 if (!eflag)
728 printf("CLNP");
729
730 /*
731 * Sanity checking of the header.
732 */
733
734 if (clnp_header->version != CLNP_VERSION) {
735 printf("version %d packet not supported", clnp_header->version);
736 return (0);
737 }
738
739 /* FIXME further header sanity checking */
740
741 clnp_pdu_type = clnp_header->type & CLNP_PDU_TYPE_MASK;
742 clnp_flags = clnp_header->type & CLNP_FLAG_MASK;
743
744 pptr += sizeof(struct clnp_header_t);
745 li -= sizeof(struct clnp_header_t);
746 dest_address_length = *pptr;
747 dest_address = pptr + 1;
748
749 pptr += (1 + dest_address_length);
750 li -= (1 + dest_address_length);
751 source_address_length = *pptr;
752 source_address = pptr +1;
753
754 pptr += (1 + source_address_length);
755 li -= (1 + source_address_length);
756
757 if (vflag < 1) {
758 printf("%s%s > %s, %s, length %u",
759 eflag ? "" : ", ",
760 isonsap_string(source_address, source_address_length),
761 isonsap_string(dest_address, dest_address_length),
762 tok2str(clnp_pdu_values,"unknown (%u)",clnp_pdu_type),
763 length);
764 return (1);
765 }
766 printf("%slength %u",eflag ? "" : ", ",length);
767
768 printf("\n\t%s PDU, hlen: %u, v: %u, lifetime: %u.%us, Segment PDU length: %u, checksum: 0x%04x ",
769 tok2str(clnp_pdu_values, "unknown (%u)",clnp_pdu_type),
770 clnp_header->length_indicator,
771 clnp_header->version,
772 clnp_header->lifetime/2,
773 (clnp_header->lifetime%2)*5,
774 EXTRACT_16BITS(clnp_header->segment_length),
775 EXTRACT_16BITS(clnp_header->cksum));
776
777 /* do not attempt to verify the checksum if it is zero */
778 if (EXTRACT_16BITS(clnp_header->cksum) == 0)
779 printf("(unverified)");
780 else printf("(%s)", osi_cksum(optr, clnp_header->length_indicator) ? "incorrect" : "correct");
781
782 printf("\n\tFlags [%s]",
783 bittok2str(clnp_flag_values,"none",clnp_flags));
784
785 printf("\n\tsource address (length %u): %s\n\tdest address (length %u): %s",
786 source_address_length,
787 isonsap_string(source_address, source_address_length),
788 dest_address_length,
789 isonsap_string(dest_address,dest_address_length));
790
791 if (clnp_flags & CLNP_SEGMENT_PART) {
792 clnp_segment_header = (const struct clnp_segment_header_t *) pptr;
793 TCHECK(*clnp_segment_header);
794 printf("\n\tData Unit ID: 0x%04x, Segment Offset: %u, Total PDU Length: %u",
795 EXTRACT_16BITS(clnp_segment_header->data_unit_id),
796 EXTRACT_16BITS(clnp_segment_header->segment_offset),
797 EXTRACT_16BITS(clnp_segment_header->total_length));
798 pptr+=sizeof(const struct clnp_segment_header_t);
799 li-=sizeof(const struct clnp_segment_header_t);
800 }
801
802 /* now walk the options */
803 while (li >= 2) {
804 u_int op, opli;
805 const u_int8_t *tptr;
806
807 TCHECK2(*pptr, 2);
808 if (li < 2) {
809 printf(", bad opts/li");
810 return (0);
811 }
812 op = *pptr++;
813 opli = *pptr++;
814 li -= 2;
815 TCHECK2(*pptr, opli);
816 if (opli > li) {
817 printf(", opt (%d) too long", op);
818 return (0);
819 }
820 li -= opli;
821 tptr = pptr;
822 tlen = opli;
823
824 printf("\n\t %s Option #%u, length %u, value: ",
825 tok2str(clnp_option_values,"Unknown",op),
826 op,
827 opli);
828
829 switch (op) {
830
831
832 case CLNP_OPTION_ROUTE_RECORDING: /* those two options share the format */
833 case CLNP_OPTION_SOURCE_ROUTING:
834 printf("%s %s",
835 tok2str(clnp_option_sr_rr_values,"Unknown",*tptr),
836 tok2str(clnp_option_sr_rr_string_values,"Unknown Option %u",op));
837 nsap_offset=*(tptr+1);
838 if (nsap_offset == 0) {
839 printf(" Bad NSAP offset (0)");
840 break;
841 }
842 nsap_offset-=1; /* offset to nsap list */
843 if (nsap_offset > tlen) {
844 printf(" Bad NSAP offset (past end of option)");
845 break;
846 }
847 tptr+=nsap_offset;
848 tlen-=nsap_offset;
849 while (tlen > 0) {
850 source_address_length=*tptr;
851 if (tlen < source_address_length+1) {
852 printf("\n\t NSAP address goes past end of option");
853 break;
854 }
855 if (source_address_length > 0) {
856 source_address=(tptr+1);
857 TCHECK2(*source_address, source_address_length);
858 printf("\n\t NSAP address (length %u): %s",
859 source_address_length,
860 isonsap_string(source_address, source_address_length));
861 }
862 tlen-=source_address_length+1;
863 }
864 break;
865
866 case CLNP_OPTION_PRIORITY:
867 printf("0x%1x", *tptr&0x0f);
868 break;
869
870 case CLNP_OPTION_QOS_MAINTENANCE:
871 printf("\n\t Format Code: %s",
872 tok2str(clnp_option_scope_values,"Reserved",*tptr&CLNP_OPTION_SCOPE_MASK));
873
874 if ((*tptr&CLNP_OPTION_SCOPE_MASK) == CLNP_OPTION_SCOPE_GLOBAL)
875 printf("\n\t QoS Flags [%s]",
876 bittok2str(clnp_option_qos_global_values,
877 "none",
878 *tptr&CLNP_OPTION_OPTION_QOS_MASK));
879 break;
880
881 case CLNP_OPTION_SECURITY:
882 printf("\n\t Format Code: %s, Security-Level %u",
883 tok2str(clnp_option_scope_values,"Reserved",*tptr&CLNP_OPTION_SCOPE_MASK),
884 *(tptr+1));
885 break;
886
887 case CLNP_OPTION_DISCARD_REASON:
888 rfd_error_major = (*tptr&0xf0) >> 4;
889 rfd_error_minor = *tptr&0x0f;
890 printf("\n\t Class: %s Error (0x%01x), %s (0x%01x)",
891 tok2str(clnp_option_rfd_class_values,"Unknown",rfd_error_major),
892 rfd_error_major,
893 tok2str(clnp_option_rfd_error_class[rfd_error_major],"Unknown",rfd_error_minor),
894 rfd_error_minor);
895 break;
896
897 case CLNP_OPTION_PADDING:
898 printf("padding data");
899 break;
900
901 /*
902 * FIXME those are the defined Options that lack a decoder
903 * you are welcome to contribute code ;-)
904 */
905
906 default:
907 print_unknown_data(tptr,"\n\t ",opli);
908 break;
909 }
910 if (vflag > 1)
911 print_unknown_data(pptr,"\n\t ",opli);
912 pptr += opli;
913 }
914
915 switch (clnp_pdu_type) {
916
917 case CLNP_PDU_ER: /* fall through */
918 case CLNP_PDU_ERP:
919 TCHECK(*pptr);
920 if (*(pptr) == NLPID_CLNP) {
921 printf("\n\t-----original packet-----\n\t");
922 /* FIXME recursion protection */
923 clnp_print(pptr, length-clnp_header->length_indicator);
924 break;
925 }
926
927 case CLNP_PDU_DT:
928 case CLNP_PDU_MD:
929 case CLNP_PDU_ERQ:
930
931 default:
932 /* dump the PDU specific data */
933 if (length-(pptr-optr) > 0) {
934 printf("\n\t undecoded non-header data, length %u",length-clnp_header->length_indicator);
935 print_unknown_data(pptr,"\n\t ",length-(pptr-optr));
936 }
937 }
938
939 return (1);
940
941 trunc:
942 fputs("[|clnp]", stdout);
943 return (1);
944
945 }
946
947
948 #define ESIS_PDU_REDIRECT 6
949 #define ESIS_PDU_ESH 2
950 #define ESIS_PDU_ISH 4
951
952 static struct tok esis_pdu_values[] = {
953 { ESIS_PDU_REDIRECT, "redirect"},
954 { ESIS_PDU_ESH, "ESH"},
955 { ESIS_PDU_ISH, "ISH"},
956 { 0, NULL }
957 };
958
959 struct esis_header_t {
960 u_int8_t nlpid;
961 u_int8_t length_indicator;
962 u_int8_t version;
963 u_int8_t reserved;
964 u_int8_t type;
965 u_int8_t holdtime[2];
966 u_int8_t cksum[2];
967 };
968
969 static void
esis_print(const u_int8_t * pptr,u_int length)970 esis_print(const u_int8_t *pptr, u_int length)
971 {
972 const u_int8_t *optr;
973 u_int li,esis_pdu_type,source_address_length, source_address_number;
974 const struct esis_header_t *esis_header;
975
976 if (!eflag)
977 printf("ES-IS");
978
979 if (length <= 2) {
980 if (qflag)
981 printf("bad pkt!");
982 else
983 printf("no header at all!");
984 return;
985 }
986
987 esis_header = (const struct esis_header_t *) pptr;
988 TCHECK(*esis_header);
989 li = esis_header->length_indicator;
990 optr = pptr;
991
992 /*
993 * Sanity checking of the header.
994 */
995
996 if (esis_header->nlpid != NLPID_ESIS) {
997 printf(" nlpid 0x%02x packet not supported", esis_header->nlpid);
998 return;
999 }
1000
1001 if (esis_header->version != ESIS_VERSION) {
1002 printf(" version %d packet not supported", esis_header->version);
1003 return;
1004 }
1005
1006 if (li > length) {
1007 printf(" length indicator(%d) > PDU size (%d)!", li, length);
1008 return;
1009 }
1010
1011 if (li < sizeof(struct esis_header_t) + 2) {
1012 printf(" length indicator < min PDU size %d:", li);
1013 while (--length != 0)
1014 printf("%02X", *pptr++);
1015 return;
1016 }
1017
1018 esis_pdu_type = esis_header->type & ESIS_PDU_TYPE_MASK;
1019
1020 if (vflag < 1) {
1021 printf("%s%s, length %u",
1022 eflag ? "" : ", ",
1023 tok2str(esis_pdu_values,"unknown type (%u)",esis_pdu_type),
1024 length);
1025 return;
1026 } else
1027 printf("%slength %u\n\t%s (%u)",
1028 eflag ? "" : ", ",
1029 length,
1030 tok2str(esis_pdu_values,"unknown type: %u", esis_pdu_type),
1031 esis_pdu_type);
1032
1033 printf(", v: %u%s", esis_header->version, esis_header->version == ESIS_VERSION ? "" : "unsupported" );
1034 printf(", checksum: 0x%04x ", EXTRACT_16BITS(esis_header->cksum));
1035 /* do not attempt to verify the checksum if it is zero */
1036 if (EXTRACT_16BITS(esis_header->cksum) == 0)
1037 printf("(unverified)");
1038 else
1039 printf("(%s)", osi_cksum(pptr, li) ? "incorrect" : "correct");
1040
1041 printf(", holding time: %us, length indicator: %u",EXTRACT_16BITS(esis_header->holdtime),li);
1042
1043 if (vflag > 1)
1044 print_unknown_data(optr,"\n\t",sizeof(struct esis_header_t));
1045
1046 pptr += sizeof(struct esis_header_t);
1047 li -= sizeof(struct esis_header_t);
1048
1049 switch (esis_pdu_type) {
1050 case ESIS_PDU_REDIRECT: {
1051 const u_int8_t *dst, *snpa, *neta;
1052 u_int dstl, snpal, netal;
1053
1054 TCHECK(*pptr);
1055 if (li < 1) {
1056 printf(", bad redirect/li");
1057 return;
1058 }
1059 dstl = *pptr;
1060 pptr++;
1061 li--;
1062 TCHECK2(*pptr, dstl);
1063 if (li < dstl) {
1064 printf(", bad redirect/li");
1065 return;
1066 }
1067 dst = pptr;
1068 pptr += dstl;
1069 li -= dstl;
1070 printf("\n\t %s", isonsap_string(dst,dstl));
1071
1072 TCHECK(*pptr);
1073 if (li < 1) {
1074 printf(", bad redirect/li");
1075 return;
1076 }
1077 snpal = *pptr;
1078 pptr++;
1079 li--;
1080 TCHECK2(*pptr, snpal);
1081 if (li < snpal) {
1082 printf(", bad redirect/li");
1083 return;
1084 }
1085 snpa = pptr;
1086 pptr += snpal;
1087 li -= snpal;
1088 TCHECK(*pptr);
1089 if (li < 1) {
1090 printf(", bad redirect/li");
1091 return;
1092 }
1093 netal = *pptr;
1094 pptr++;
1095 TCHECK2(*pptr, netal);
1096 if (li < netal) {
1097 printf(", bad redirect/li");
1098 return;
1099 }
1100 neta = pptr;
1101 pptr += netal;
1102 li -= netal;
1103
1104 if (netal == 0)
1105 printf("\n\t %s", etheraddr_string(snpa));
1106 else
1107 printf("\n\t %s", isonsap_string(neta,netal));
1108 break;
1109 }
1110
1111 case ESIS_PDU_ESH:
1112 TCHECK(*pptr);
1113 if (li < 1) {
1114 printf(", bad esh/li");
1115 return;
1116 }
1117 source_address_number = *pptr;
1118 pptr++;
1119 li--;
1120
1121 printf("\n\t Number of Source Addresses: %u", source_address_number);
1122
1123 while (source_address_number > 0) {
1124 TCHECK(*pptr);
1125 if (li < 1) {
1126 printf(", bad esh/li");
1127 return;
1128 }
1129 source_address_length = *pptr;
1130 pptr++;
1131 li--;
1132
1133 TCHECK2(*pptr, source_address_length);
1134 if (li < source_address_length) {
1135 printf(", bad esh/li");
1136 return;
1137 }
1138 printf("\n\t NET (length: %u): %s",
1139 source_address_length,
1140 isonsap_string(pptr,source_address_length));
1141 pptr += source_address_length;
1142 li -= source_address_length;
1143 source_address_number--;
1144 }
1145
1146 break;
1147
1148 case ESIS_PDU_ISH: {
1149 TCHECK(*pptr);
1150 if (li < 1) {
1151 printf(", bad ish/li");
1152 return;
1153 }
1154 source_address_length = *pptr;
1155 pptr++;
1156 li--;
1157 TCHECK2(*pptr, source_address_length);
1158 if (li < source_address_length) {
1159 printf(", bad ish/li");
1160 return;
1161 }
1162 printf("\n\t NET (length: %u): %s", source_address_length, isonsap_string(pptr, source_address_length));
1163 pptr += source_address_length;
1164 li -= source_address_length;
1165 break;
1166 }
1167
1168 default:
1169 if (vflag <= 1) {
1170 if (pptr < snapend)
1171 print_unknown_data(pptr,"\n\t ",snapend-pptr);
1172 }
1173 return;
1174 }
1175
1176 /* now walk the options */
1177 while (li >= 2) {
1178 u_int op, opli;
1179 const u_int8_t *tptr;
1180
1181 TCHECK2(*pptr, 2);
1182 if (li < 2) {
1183 printf(", bad opts/li");
1184 return;
1185 }
1186 op = *pptr++;
1187 opli = *pptr++;
1188 li -= 2;
1189 if (opli > li) {
1190 printf(", opt (%d) too long", op);
1191 return;
1192 }
1193 li -= opli;
1194 tptr = pptr;
1195
1196 printf("\n\t %s Option #%u, length %u, value: ",
1197 tok2str(esis_option_values,"Unknown",op),
1198 op,
1199 opli);
1200
1201 switch (op) {
1202
1203 case ESIS_OPTION_ES_CONF_TIME:
1204 TCHECK2(*pptr, 2);
1205 printf("%us", EXTRACT_16BITS(tptr));
1206 break;
1207
1208 case ESIS_OPTION_PROTOCOLS:
1209 while (opli>0) {
1210 TCHECK(*pptr);
1211 printf("%s (0x%02x)",
1212 tok2str(nlpid_values,
1213 "unknown",
1214 *tptr),
1215 *tptr);
1216 if (opli>1) /* further NPLIDs ? - put comma */
1217 printf(", ");
1218 tptr++;
1219 opli--;
1220 }
1221 break;
1222
1223 /*
1224 * FIXME those are the defined Options that lack a decoder
1225 * you are welcome to contribute code ;-)
1226 */
1227
1228 case ESIS_OPTION_QOS_MAINTENANCE:
1229 case ESIS_OPTION_SECURITY:
1230 case ESIS_OPTION_PRIORITY:
1231 case ESIS_OPTION_ADDRESS_MASK:
1232 case ESIS_OPTION_SNPA_MASK:
1233
1234 default:
1235 print_unknown_data(tptr,"\n\t ",opli);
1236 break;
1237 }
1238 if (vflag > 1)
1239 print_unknown_data(pptr,"\n\t ",opli);
1240 pptr += opli;
1241 }
1242 trunc:
1243 return;
1244 }
1245
1246 /* shared routine for printing system, node and lsp-ids */
1247 static char *
isis_print_id(const u_int8_t * cp,int id_len)1248 isis_print_id(const u_int8_t *cp, int id_len)
1249 {
1250 int i;
1251 static char id[sizeof("xxxx.xxxx.xxxx.yy-zz")];
1252 char *pos = id;
1253
1254 for (i = 1; i <= SYSTEM_ID_LEN; i++) {
1255 snprintf(pos, sizeof(id) - (pos - id), "%02x", *cp++);
1256 pos += strlen(pos);
1257 if (i == 2 || i == 4)
1258 *pos++ = '.';
1259 }
1260 if (id_len >= NODE_ID_LEN) {
1261 snprintf(pos, sizeof(id) - (pos - id), ".%02x", *cp++);
1262 pos += strlen(pos);
1263 }
1264 if (id_len == LSP_ID_LEN)
1265 snprintf(pos, sizeof(id) - (pos - id), "-%02x", *cp);
1266 return (id);
1267 }
1268
1269 /* print the 4-byte metric block which is common found in the old-style TLVs */
1270 static int
isis_print_metric_block(const struct isis_metric_block * isis_metric_block)1271 isis_print_metric_block (const struct isis_metric_block *isis_metric_block)
1272 {
1273 printf(", Default Metric: %d, %s",
1274 ISIS_LSP_TLV_METRIC_VALUE(isis_metric_block->metric_default),
1275 ISIS_LSP_TLV_METRIC_IE(isis_metric_block->metric_default) ? "External" : "Internal");
1276 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(isis_metric_block->metric_delay))
1277 printf("\n\t\t Delay Metric: %d, %s",
1278 ISIS_LSP_TLV_METRIC_VALUE(isis_metric_block->metric_delay),
1279 ISIS_LSP_TLV_METRIC_IE(isis_metric_block->metric_delay) ? "External" : "Internal");
1280 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(isis_metric_block->metric_expense))
1281 printf("\n\t\t Expense Metric: %d, %s",
1282 ISIS_LSP_TLV_METRIC_VALUE(isis_metric_block->metric_expense),
1283 ISIS_LSP_TLV_METRIC_IE(isis_metric_block->metric_expense) ? "External" : "Internal");
1284 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(isis_metric_block->metric_error))
1285 printf("\n\t\t Error Metric: %d, %s",
1286 ISIS_LSP_TLV_METRIC_VALUE(isis_metric_block->metric_error),
1287 ISIS_LSP_TLV_METRIC_IE(isis_metric_block->metric_error) ? "External" : "Internal");
1288
1289 return(1); /* everything is ok */
1290 }
1291
1292 static int
isis_print_tlv_ip_reach(const u_int8_t * cp,const char * ident,int length)1293 isis_print_tlv_ip_reach (const u_int8_t *cp, const char *ident, int length)
1294 {
1295 int prefix_len;
1296 const struct isis_tlv_ip_reach *tlv_ip_reach;
1297
1298 tlv_ip_reach = (const struct isis_tlv_ip_reach *)cp;
1299
1300 while (length > 0) {
1301 if ((size_t)length < sizeof(*tlv_ip_reach)) {
1302 printf("short IPv4 Reachability (%d vs %lu)",
1303 length,
1304 (unsigned long)sizeof(*tlv_ip_reach));
1305 return (0);
1306 }
1307
1308 if (!TTEST(*tlv_ip_reach))
1309 return (0);
1310
1311 prefix_len = mask2plen(EXTRACT_32BITS(tlv_ip_reach->mask));
1312
1313 if (prefix_len == -1)
1314 printf("%sIPv4 prefix: %s mask %s",
1315 ident,
1316 ipaddr_string((tlv_ip_reach->prefix)),
1317 ipaddr_string((tlv_ip_reach->mask)));
1318 else
1319 printf("%sIPv4 prefix: %15s/%u",
1320 ident,
1321 ipaddr_string((tlv_ip_reach->prefix)),
1322 prefix_len);
1323
1324 printf(", Distribution: %s, Metric: %u, %s",
1325 ISIS_LSP_TLV_METRIC_UPDOWN(tlv_ip_reach->isis_metric_block.metric_default) ? "down" : "up",
1326 ISIS_LSP_TLV_METRIC_VALUE(tlv_ip_reach->isis_metric_block.metric_default),
1327 ISIS_LSP_TLV_METRIC_IE(tlv_ip_reach->isis_metric_block.metric_default) ? "External" : "Internal");
1328
1329 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(tlv_ip_reach->isis_metric_block.metric_delay))
1330 printf("%s Delay Metric: %u, %s",
1331 ident,
1332 ISIS_LSP_TLV_METRIC_VALUE(tlv_ip_reach->isis_metric_block.metric_delay),
1333 ISIS_LSP_TLV_METRIC_IE(tlv_ip_reach->isis_metric_block.metric_delay) ? "External" : "Internal");
1334
1335 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(tlv_ip_reach->isis_metric_block.metric_expense))
1336 printf("%s Expense Metric: %u, %s",
1337 ident,
1338 ISIS_LSP_TLV_METRIC_VALUE(tlv_ip_reach->isis_metric_block.metric_expense),
1339 ISIS_LSP_TLV_METRIC_IE(tlv_ip_reach->isis_metric_block.metric_expense) ? "External" : "Internal");
1340
1341 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(tlv_ip_reach->isis_metric_block.metric_error))
1342 printf("%s Error Metric: %u, %s",
1343 ident,
1344 ISIS_LSP_TLV_METRIC_VALUE(tlv_ip_reach->isis_metric_block.metric_error),
1345 ISIS_LSP_TLV_METRIC_IE(tlv_ip_reach->isis_metric_block.metric_error) ? "External" : "Internal");
1346
1347 length -= sizeof(struct isis_tlv_ip_reach);
1348 tlv_ip_reach++;
1349 }
1350 return (1);
1351 }
1352
1353 /*
1354 * this is the common IP-REACH subTLV decoder it is called
1355 * from various EXTD-IP REACH TLVs (135,235,236,237)
1356 */
1357
1358 static int
isis_print_ip_reach_subtlv(const u_int8_t * tptr,int subt,int subl,const char * ident)1359 isis_print_ip_reach_subtlv (const u_int8_t *tptr,int subt,int subl,const char *ident) {
1360
1361 /* first lets see if we know the subTLVs name*/
1362 printf("%s%s subTLV #%u, length: %u",
1363 ident,
1364 tok2str(isis_ext_ip_reach_subtlv_values,
1365 "unknown",
1366 subt),
1367 subt,
1368 subl);
1369
1370 if (!TTEST2(*tptr,subl))
1371 goto trunctlv;
1372
1373 switch(subt) {
1374 case ISIS_SUBTLV_EXTD_IP_REACH_MGMT_PREFIX_COLOR: /* fall through */
1375 case ISIS_SUBTLV_EXTD_IP_REACH_ADMIN_TAG32:
1376 while (subl >= 4) {
1377 printf(", 0x%08x (=%u)",
1378 EXTRACT_32BITS(tptr),
1379 EXTRACT_32BITS(tptr));
1380 tptr+=4;
1381 subl-=4;
1382 }
1383 break;
1384 case ISIS_SUBTLV_EXTD_IP_REACH_ADMIN_TAG64:
1385 while (subl >= 8) {
1386 printf(", 0x%08x%08x",
1387 EXTRACT_32BITS(tptr),
1388 EXTRACT_32BITS(tptr+4));
1389 tptr+=8;
1390 subl-=8;
1391 }
1392 break;
1393 default:
1394 if(!print_unknown_data(tptr,"\n\t\t ",
1395 subl))
1396 return(0);
1397 break;
1398 }
1399 return(1);
1400
1401 trunctlv:
1402 printf("%spacket exceeded snapshot",ident);
1403 return(0);
1404 }
1405
1406 /*
1407 * this is the common IS-REACH subTLV decoder it is called
1408 * from isis_print_ext_is_reach()
1409 */
1410
1411 static int
isis_print_is_reach_subtlv(const u_int8_t * tptr,u_int subt,u_int subl,const char * ident)1412 isis_print_is_reach_subtlv (const u_int8_t *tptr,u_int subt,u_int subl,const char *ident) {
1413
1414 u_int te_class,priority_level;
1415 union { /* int to float conversion buffer for several subTLVs */
1416 float f;
1417 u_int32_t i;
1418 } bw;
1419
1420 /* first lets see if we know the subTLVs name*/
1421 printf("%s%s subTLV #%u, length: %u",
1422 ident,
1423 tok2str(isis_ext_is_reach_subtlv_values,
1424 "unknown",
1425 subt),
1426 subt,
1427 subl);
1428
1429 if (!TTEST2(*tptr,subl))
1430 goto trunctlv;
1431
1432 switch(subt) {
1433 case ISIS_SUBTLV_EXT_IS_REACH_ADMIN_GROUP:
1434 case ISIS_SUBTLV_EXT_IS_REACH_LINK_LOCAL_REMOTE_ID:
1435 case ISIS_SUBTLV_EXT_IS_REACH_LINK_REMOTE_ID:
1436 if (subl >= 4) {
1437 printf(", 0x%08x", EXTRACT_32BITS(tptr));
1438 if (subl == 8) /* draft-ietf-isis-gmpls-extensions */
1439 printf(", 0x%08x", EXTRACT_32BITS(tptr+4));
1440 }
1441 break;
1442 case ISIS_SUBTLV_EXT_IS_REACH_IPV4_INTF_ADDR:
1443 case ISIS_SUBTLV_EXT_IS_REACH_IPV4_NEIGHBOR_ADDR:
1444 if (subl >= sizeof(struct in_addr))
1445 printf(", %s", ipaddr_string(tptr));
1446 break;
1447 case ISIS_SUBTLV_EXT_IS_REACH_MAX_LINK_BW :
1448 case ISIS_SUBTLV_EXT_IS_REACH_RESERVABLE_BW:
1449 if (subl >= 4) {
1450 bw.i = EXTRACT_32BITS(tptr);
1451 printf(", %.3f Mbps", bw.f*8/1000000 );
1452 }
1453 break;
1454 case ISIS_SUBTLV_EXT_IS_REACH_UNRESERVED_BW :
1455 if (subl >= 32) {
1456 for (te_class = 0; te_class < 8; te_class++) {
1457 bw.i = EXTRACT_32BITS(tptr);
1458 printf("%s TE-Class %u: %.3f Mbps",
1459 ident,
1460 te_class,
1461 bw.f*8/1000000 );
1462 tptr+=4;
1463 }
1464 }
1465 break;
1466 case ISIS_SUBTLV_EXT_IS_REACH_BW_CONSTRAINTS: /* fall through */
1467 case ISIS_SUBTLV_EXT_IS_REACH_BW_CONSTRAINTS_OLD:
1468 printf("%sBandwidth Constraints Model ID: %s (%u)",
1469 ident,
1470 tok2str(diffserv_te_bc_values, "unknown", *tptr),
1471 *tptr);
1472 tptr++;
1473 /* decode BCs until the subTLV ends */
1474 for (te_class = 0; te_class < (subl-1)/4; te_class++) {
1475 bw.i = EXTRACT_32BITS(tptr);
1476 printf("%s Bandwidth constraint CT%u: %.3f Mbps",
1477 ident,
1478 te_class,
1479 bw.f*8/1000000 );
1480 tptr+=4;
1481 }
1482 break;
1483 case ISIS_SUBTLV_EXT_IS_REACH_TE_METRIC:
1484 if (subl >= 3)
1485 printf(", %u", EXTRACT_24BITS(tptr));
1486 break;
1487 case ISIS_SUBTLV_EXT_IS_REACH_LINK_PROTECTION_TYPE:
1488 if (subl >= 2) {
1489 printf(", %s, Priority %u",
1490 bittok2str(gmpls_link_prot_values, "none", *tptr),
1491 *(tptr+1));
1492 }
1493 break;
1494 case ISIS_SUBTLV_EXT_IS_REACH_INTF_SW_CAP_DESCR:
1495 if (subl >= 36) {
1496 printf("%s Interface Switching Capability:%s",
1497 ident,
1498 tok2str(gmpls_switch_cap_values, "Unknown", *(tptr)));
1499 printf(", LSP Encoding: %s",
1500 tok2str(gmpls_encoding_values, "Unknown", *(tptr+1)));
1501 tptr+=4;
1502 printf("%s Max LSP Bandwidth:",ident);
1503 for (priority_level = 0; priority_level < 8; priority_level++) {
1504 bw.i = EXTRACT_32BITS(tptr);
1505 printf("%s priority level %d: %.3f Mbps",
1506 ident,
1507 priority_level,
1508 bw.f*8/1000000 );
1509 tptr+=4;
1510 }
1511 subl-=36;
1512 /* there is some optional stuff left to decode but this is as of yet
1513 not specified so just lets hexdump what is left */
1514 if(subl>0){
1515 if(!print_unknown_data(tptr,"\n\t\t ",
1516 subl))
1517 return(0);
1518 }
1519 }
1520 break;
1521 default:
1522 if(!print_unknown_data(tptr,"\n\t\t ",
1523 subl))
1524 return(0);
1525 break;
1526 }
1527 return(1);
1528
1529 trunctlv:
1530 printf("%spacket exceeded snapshot",ident);
1531 return(0);
1532 }
1533
1534
1535 /*
1536 * this is the common IS-REACH decoder it is called
1537 * from various EXTD-IS REACH style TLVs (22,24,222)
1538 */
1539
1540 static int
isis_print_ext_is_reach(const u_int8_t * tptr,const char * ident,int tlv_type)1541 isis_print_ext_is_reach (const u_int8_t *tptr,const char *ident, int tlv_type) {
1542
1543 char ident_buffer[20];
1544 int subtlv_type,subtlv_len,subtlv_sum_len;
1545 int proc_bytes = 0; /* how many bytes did we process ? */
1546
1547 if (!TTEST2(*tptr, NODE_ID_LEN))
1548 return(0);
1549
1550 printf("%sIS Neighbor: %s", ident, isis_print_id(tptr, NODE_ID_LEN));
1551 tptr+=(NODE_ID_LEN);
1552
1553 if (tlv_type != ISIS_TLV_IS_ALIAS_ID) { /* the Alias TLV Metric field is implicit 0 */
1554 if (!TTEST2(*tptr, 3)) /* and is therefore skipped */
1555 return(0);
1556 printf(", Metric: %d",EXTRACT_24BITS(tptr));
1557 tptr+=3;
1558 }
1559
1560 if (!TTEST2(*tptr, 1))
1561 return(0);
1562 subtlv_sum_len=*(tptr++); /* read out subTLV length */
1563 proc_bytes=NODE_ID_LEN+3+1;
1564 printf(", %ssub-TLVs present",subtlv_sum_len ? "" : "no ");
1565 if (subtlv_sum_len) {
1566 printf(" (%u)",subtlv_sum_len);
1567 while (subtlv_sum_len>0) {
1568 if (!TTEST2(*tptr,2))
1569 return(0);
1570 subtlv_type=*(tptr++);
1571 subtlv_len=*(tptr++);
1572 /* prepend the ident string */
1573 snprintf(ident_buffer, sizeof(ident_buffer), "%s ",ident);
1574 if(!isis_print_is_reach_subtlv(tptr,subtlv_type,subtlv_len,ident_buffer))
1575 return(0);
1576 tptr+=subtlv_len;
1577 subtlv_sum_len-=(subtlv_len+2);
1578 proc_bytes+=(subtlv_len+2);
1579 }
1580 }
1581 return(proc_bytes);
1582 }
1583
1584 /*
1585 * this is the common Multi Topology ID decoder
1586 * it is called from various MT-TLVs (222,229,235,237)
1587 */
1588
1589 static int
isis_print_mtid(const u_int8_t * tptr,const char * ident)1590 isis_print_mtid (const u_int8_t *tptr,const char *ident) {
1591
1592 if (!TTEST2(*tptr, 2))
1593 return(0);
1594
1595 printf("%s%s",
1596 ident,
1597 tok2str(isis_mt_values,
1598 "Reserved for IETF Consensus",
1599 ISIS_MASK_MTID(EXTRACT_16BITS(tptr))));
1600
1601 printf(" Topology (0x%03x), Flags: [%s]",
1602 ISIS_MASK_MTID(EXTRACT_16BITS(tptr)),
1603 bittok2str(isis_mt_flag_values, "none",ISIS_MASK_MTFLAGS(EXTRACT_16BITS(tptr))));
1604
1605 return(2);
1606 }
1607
1608 /*
1609 * this is the common extended IP reach decoder
1610 * it is called from TLVs (135,235,236,237)
1611 * we process the TLV and optional subTLVs and return
1612 * the amount of processed bytes
1613 */
1614
1615 static int
isis_print_extd_ip_reach(const u_int8_t * tptr,const char * ident,u_int16_t afi)1616 isis_print_extd_ip_reach (const u_int8_t *tptr, const char *ident, u_int16_t afi) {
1617
1618 char ident_buffer[20];
1619 #ifdef INET6
1620 u_int8_t prefix[sizeof(struct in6_addr)]; /* shared copy buffer for IPv4 and IPv6 prefixes */
1621 #else
1622 u_int8_t prefix[sizeof(struct in_addr)]; /* shared copy buffer for IPv4 prefixes */
1623 #endif
1624 u_int metric, status_byte, bit_length, byte_length, sublen, processed, subtlvtype, subtlvlen;
1625
1626 if (!TTEST2(*tptr, 4))
1627 return (0);
1628 metric = EXTRACT_32BITS(tptr);
1629 processed=4;
1630 tptr+=4;
1631
1632 if (afi == IPV4) {
1633 if (!TTEST2(*tptr, 1)) /* fetch status byte */
1634 return (0);
1635 status_byte=*(tptr++);
1636 bit_length = status_byte&0x3f;
1637 if (bit_length > 32) {
1638 printf("%sIPv4 prefix: bad bit length %u",
1639 ident,
1640 bit_length);
1641 return (0);
1642 }
1643 processed++;
1644 #ifdef INET6
1645 } else if (afi == IPV6) {
1646 if (!TTEST2(*tptr, 1)) /* fetch status & prefix_len byte */
1647 return (0);
1648 status_byte=*(tptr++);
1649 bit_length=*(tptr++);
1650 if (bit_length > 128) {
1651 printf("%sIPv6 prefix: bad bit length %u",
1652 ident,
1653 bit_length);
1654 return (0);
1655 }
1656 processed+=2;
1657 #endif
1658 } else
1659 return (0); /* somebody is fooling us */
1660
1661 byte_length = (bit_length + 7) / 8; /* prefix has variable length encoding */
1662
1663 if (!TTEST2(*tptr, byte_length))
1664 return (0);
1665 memset(prefix, 0, sizeof prefix); /* clear the copy buffer */
1666 memcpy(prefix,tptr,byte_length); /* copy as much as is stored in the TLV */
1667 tptr+=byte_length;
1668 processed+=byte_length;
1669
1670 if (afi == IPV4)
1671 printf("%sIPv4 prefix: %15s/%u",
1672 ident,
1673 ipaddr_string(prefix),
1674 bit_length);
1675 #ifdef INET6
1676 if (afi == IPV6)
1677 printf("%sIPv6 prefix: %s/%u",
1678 ident,
1679 ip6addr_string(prefix),
1680 bit_length);
1681 #endif
1682
1683 printf(", Distribution: %s, Metric: %u",
1684 ISIS_MASK_TLV_EXTD_IP_UPDOWN(status_byte) ? "down" : "up",
1685 metric);
1686
1687 if (afi == IPV4 && ISIS_MASK_TLV_EXTD_IP_SUBTLV(status_byte))
1688 printf(", sub-TLVs present");
1689 #ifdef INET6
1690 if (afi == IPV6)
1691 printf(", %s%s",
1692 ISIS_MASK_TLV_EXTD_IP6_IE(status_byte) ? "External" : "Internal",
1693 ISIS_MASK_TLV_EXTD_IP6_SUBTLV(status_byte) ? ", sub-TLVs present" : "");
1694 #endif
1695
1696 if ((ISIS_MASK_TLV_EXTD_IP_SUBTLV(status_byte) && afi == IPV4) ||
1697 (ISIS_MASK_TLV_EXTD_IP6_SUBTLV(status_byte) && afi == IPV6)) {
1698 /* assume that one prefix can hold more
1699 than one subTLV - therefore the first byte must reflect
1700 the aggregate bytecount of the subTLVs for this prefix
1701 */
1702 if (!TTEST2(*tptr, 1))
1703 return (0);
1704 sublen=*(tptr++);
1705 processed+=sublen+1;
1706 printf(" (%u)",sublen); /* print out subTLV length */
1707
1708 while (sublen>0) {
1709 if (!TTEST2(*tptr,2))
1710 return (0);
1711 subtlvtype=*(tptr++);
1712 subtlvlen=*(tptr++);
1713 /* prepend the ident string */
1714 snprintf(ident_buffer, sizeof(ident_buffer), "%s ",ident);
1715 if(!isis_print_ip_reach_subtlv(tptr,subtlvtype,subtlvlen,ident_buffer))
1716 return(0);
1717 tptr+=subtlvlen;
1718 sublen-=(subtlvlen+2);
1719 }
1720 }
1721 return (processed);
1722 }
1723
1724 /*
1725 * isis_print
1726 * Decode IS-IS packets. Return 0 on error.
1727 */
1728
isis_print(const u_int8_t * p,u_int length)1729 static int isis_print (const u_int8_t *p, u_int length)
1730 {
1731 const struct isis_common_header *isis_header;
1732
1733 const struct isis_iih_lan_header *header_iih_lan;
1734 const struct isis_iih_ptp_header *header_iih_ptp;
1735 const struct isis_lsp_header *header_lsp;
1736 const struct isis_csnp_header *header_csnp;
1737 const struct isis_psnp_header *header_psnp;
1738
1739 const struct isis_tlv_lsp *tlv_lsp;
1740 const struct isis_tlv_ptp_adj *tlv_ptp_adj;
1741 const struct isis_tlv_is_reach *tlv_is_reach;
1742 const struct isis_tlv_es_reach *tlv_es_reach;
1743
1744 u_int8_t pdu_type, max_area, id_length, tlv_type, tlv_len, tmp, alen, lan_alen, prefix_len;
1745 u_int8_t ext_is_len, ext_ip_len, mt_len;
1746 const u_int8_t *optr, *pptr, *tptr;
1747 u_short packet_len,pdu_len;
1748 u_int i,vendor_id;
1749
1750 packet_len=length;
1751 optr = p; /* initialize the _o_riginal pointer to the packet start -
1752 need it for parsing the checksum TLV */
1753 isis_header = (const struct isis_common_header *)p;
1754 TCHECK(*isis_header);
1755 pptr = p+(ISIS_COMMON_HEADER_SIZE);
1756 header_iih_lan = (const struct isis_iih_lan_header *)pptr;
1757 header_iih_ptp = (const struct isis_iih_ptp_header *)pptr;
1758 header_lsp = (const struct isis_lsp_header *)pptr;
1759 header_csnp = (const struct isis_csnp_header *)pptr;
1760 header_psnp = (const struct isis_psnp_header *)pptr;
1761
1762 if (!eflag)
1763 printf("IS-IS");
1764
1765 /*
1766 * Sanity checking of the header.
1767 */
1768
1769 if (isis_header->version != ISIS_VERSION) {
1770 printf("version %d packet not supported", isis_header->version);
1771 return (0);
1772 }
1773
1774 if ((isis_header->id_length != SYSTEM_ID_LEN) && (isis_header->id_length != 0)) {
1775 printf("system ID length of %d is not supported",
1776 isis_header->id_length);
1777 return (0);
1778 }
1779
1780 if (isis_header->pdu_version != ISIS_VERSION) {
1781 printf("version %d packet not supported", isis_header->pdu_version);
1782 return (0);
1783 }
1784
1785 max_area = isis_header->max_area;
1786 switch(max_area) {
1787 case 0:
1788 max_area = 3; /* silly shit */
1789 break;
1790 case 255:
1791 printf("bad packet -- 255 areas");
1792 return (0);
1793 default:
1794 break;
1795 }
1796
1797 id_length = isis_header->id_length;
1798 switch(id_length) {
1799 case 0:
1800 id_length = 6; /* silly shit again */
1801 break;
1802 case 1: /* 1-8 are valid sys-ID lenghts */
1803 case 2:
1804 case 3:
1805 case 4:
1806 case 5:
1807 case 6:
1808 case 7:
1809 case 8:
1810 break;
1811 case 255:
1812 id_length = 0; /* entirely useless */
1813 break;
1814 default:
1815 break;
1816 }
1817
1818 /* toss any non 6-byte sys-ID len PDUs */
1819 if (id_length != 6 ) {
1820 printf("bad packet -- illegal sys-ID length (%u)", id_length);
1821 return (0);
1822 }
1823
1824 pdu_type=isis_header->pdu_type;
1825
1826 /* in non-verbose mode print the basic PDU Type plus PDU specific brief information*/
1827 if (vflag < 1) {
1828 printf("%s%s",
1829 eflag ? "" : ", ",
1830 tok2str(isis_pdu_values,"unknown PDU-Type %u",pdu_type));
1831
1832 switch (pdu_type) {
1833
1834 case ISIS_PDU_L1_LAN_IIH:
1835 case ISIS_PDU_L2_LAN_IIH:
1836 printf(", src-id %s",
1837 isis_print_id(header_iih_lan->source_id,SYSTEM_ID_LEN));
1838 printf(", lan-id %s, prio %u",
1839 isis_print_id(header_iih_lan->lan_id,NODE_ID_LEN),
1840 header_iih_lan->priority);
1841 break;
1842 case ISIS_PDU_PTP_IIH:
1843 printf(", src-id %s", isis_print_id(header_iih_ptp->source_id,SYSTEM_ID_LEN));
1844 break;
1845 case ISIS_PDU_L1_LSP:
1846 case ISIS_PDU_L2_LSP:
1847 printf(", lsp-id %s, seq 0x%08x, lifetime %5us",
1848 isis_print_id(header_lsp->lsp_id, LSP_ID_LEN),
1849 EXTRACT_32BITS(header_lsp->sequence_number),
1850 EXTRACT_16BITS(header_lsp->remaining_lifetime));
1851 break;
1852 case ISIS_PDU_L1_CSNP:
1853 case ISIS_PDU_L2_CSNP:
1854 printf(", src-id %s", isis_print_id(header_csnp->source_id,NODE_ID_LEN));
1855 break;
1856 case ISIS_PDU_L1_PSNP:
1857 case ISIS_PDU_L2_PSNP:
1858 printf(", src-id %s", isis_print_id(header_psnp->source_id,NODE_ID_LEN));
1859 break;
1860
1861 }
1862 printf(", length %u", length);
1863
1864 return(1);
1865 }
1866
1867 /* ok they seem to want to know everything - lets fully decode it */
1868 printf("%slength %u", eflag ? "" : ", ",length);
1869
1870 printf("\n\t%s, hlen: %u, v: %u, pdu-v: %u, sys-id-len: %u (%u), max-area: %u (%u)",
1871 tok2str(isis_pdu_values,
1872 "unknown, type %u",
1873 pdu_type),
1874 isis_header->fixed_len,
1875 isis_header->version,
1876 isis_header->pdu_version,
1877 id_length,
1878 isis_header->id_length,
1879 max_area,
1880 isis_header->max_area);
1881
1882 if (vflag > 1) {
1883 if(!print_unknown_data(optr,"\n\t",8)) /* provide the _o_riginal pointer */
1884 return(0); /* for optionally debugging the common header */
1885 }
1886
1887 switch (pdu_type) {
1888
1889 case ISIS_PDU_L1_LAN_IIH:
1890 case ISIS_PDU_L2_LAN_IIH:
1891 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_LAN_HEADER_SIZE)) {
1892 printf(", bogus fixed header length %u should be %lu",
1893 isis_header->fixed_len, (unsigned long)ISIS_IIH_LAN_HEADER_SIZE);
1894 return (0);
1895 }
1896
1897 pdu_len=EXTRACT_16BITS(header_iih_lan->pdu_len);
1898 if (packet_len>pdu_len) {
1899 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
1900 length=pdu_len;
1901 }
1902
1903 TCHECK(*header_iih_lan);
1904 printf("\n\t source-id: %s, holding time: %us, Flags: [%s]",
1905 isis_print_id(header_iih_lan->source_id,SYSTEM_ID_LEN),
1906 EXTRACT_16BITS(header_iih_lan->holding_time),
1907 tok2str(isis_iih_circuit_type_values,
1908 "unknown circuit type 0x%02x",
1909 header_iih_lan->circuit_type));
1910
1911 printf("\n\t lan-id: %s, Priority: %u, PDU length: %u",
1912 isis_print_id(header_iih_lan->lan_id, NODE_ID_LEN),
1913 (header_iih_lan->priority) & ISIS_LAN_PRIORITY_MASK,
1914 pdu_len);
1915
1916 if (vflag > 1) {
1917 if(!print_unknown_data(pptr,"\n\t ",ISIS_IIH_LAN_HEADER_SIZE))
1918 return(0);
1919 }
1920
1921 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_LAN_HEADER_SIZE);
1922 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_LAN_HEADER_SIZE);
1923 break;
1924
1925 case ISIS_PDU_PTP_IIH:
1926 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_PTP_HEADER_SIZE)) {
1927 printf(", bogus fixed header length %u should be %lu",
1928 isis_header->fixed_len, (unsigned long)ISIS_IIH_PTP_HEADER_SIZE);
1929 return (0);
1930 }
1931
1932 pdu_len=EXTRACT_16BITS(header_iih_ptp->pdu_len);
1933 if (packet_len>pdu_len) {
1934 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
1935 length=pdu_len;
1936 }
1937
1938 TCHECK(*header_iih_ptp);
1939 printf("\n\t source-id: %s, holding time: %us, Flags: [%s]",
1940 isis_print_id(header_iih_ptp->source_id,SYSTEM_ID_LEN),
1941 EXTRACT_16BITS(header_iih_ptp->holding_time),
1942 tok2str(isis_iih_circuit_type_values,
1943 "unknown circuit type 0x%02x",
1944 header_iih_ptp->circuit_type));
1945
1946 printf("\n\t circuit-id: 0x%02x, PDU length: %u",
1947 header_iih_ptp->circuit_id,
1948 pdu_len);
1949
1950 if (vflag > 1) {
1951 if(!print_unknown_data(pptr,"\n\t ",ISIS_IIH_PTP_HEADER_SIZE))
1952 return(0);
1953 }
1954
1955 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_PTP_HEADER_SIZE);
1956 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_PTP_HEADER_SIZE);
1957 break;
1958
1959 case ISIS_PDU_L1_LSP:
1960 case ISIS_PDU_L2_LSP:
1961 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_LSP_HEADER_SIZE)) {
1962 printf(", bogus fixed header length %u should be %lu",
1963 isis_header->fixed_len, (unsigned long)ISIS_LSP_HEADER_SIZE);
1964 return (0);
1965 }
1966
1967 pdu_len=EXTRACT_16BITS(header_lsp->pdu_len);
1968 if (packet_len>pdu_len) {
1969 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
1970 length=pdu_len;
1971 }
1972
1973 TCHECK(*header_lsp);
1974 printf("\n\t lsp-id: %s, seq: 0x%08x, lifetime: %5us\n\t chksum: 0x%04x",
1975 isis_print_id(header_lsp->lsp_id, LSP_ID_LEN),
1976 EXTRACT_32BITS(header_lsp->sequence_number),
1977 EXTRACT_16BITS(header_lsp->remaining_lifetime),
1978 EXTRACT_16BITS(header_lsp->checksum));
1979
1980 /* if this is a purge do not attempt to verify the checksum */
1981 if ( EXTRACT_16BITS(header_lsp->remaining_lifetime) == 0 &&
1982 EXTRACT_16BITS(header_lsp->checksum) == 0)
1983 printf(" (purged)");
1984 else
1985 /* verify the checksum -
1986 * checking starts at the lsp-id field at byte position [12]
1987 * hence the length needs to be reduced by 12 bytes */
1988 printf(" (%s)", (osi_cksum((u_int8_t *)header_lsp->lsp_id, length-12)) ? "incorrect" : "correct");
1989
1990 printf(", PDU length: %u, Flags: [ %s",
1991 pdu_len,
1992 ISIS_MASK_LSP_OL_BIT(header_lsp->typeblock) ? "Overload bit set, " : "");
1993
1994 if (ISIS_MASK_LSP_ATT_BITS(header_lsp->typeblock)) {
1995 printf("%s", ISIS_MASK_LSP_ATT_DEFAULT_BIT(header_lsp->typeblock) ? "default " : "");
1996 printf("%s", ISIS_MASK_LSP_ATT_DELAY_BIT(header_lsp->typeblock) ? "delay " : "");
1997 printf("%s", ISIS_MASK_LSP_ATT_EXPENSE_BIT(header_lsp->typeblock) ? "expense " : "");
1998 printf("%s", ISIS_MASK_LSP_ATT_ERROR_BIT(header_lsp->typeblock) ? "error " : "");
1999 printf("ATT bit set, ");
2000 }
2001 printf("%s", ISIS_MASK_LSP_PARTITION_BIT(header_lsp->typeblock) ? "P bit set, " : "");
2002 printf("%s ]", tok2str(isis_lsp_istype_values,"Unknown(0x%x)",ISIS_MASK_LSP_ISTYPE_BITS(header_lsp->typeblock)));
2003
2004 if (vflag > 1) {
2005 if(!print_unknown_data(pptr,"\n\t ",ISIS_LSP_HEADER_SIZE))
2006 return(0);
2007 }
2008
2009 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_LSP_HEADER_SIZE);
2010 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_LSP_HEADER_SIZE);
2011 break;
2012
2013 case ISIS_PDU_L1_CSNP:
2014 case ISIS_PDU_L2_CSNP:
2015 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_CSNP_HEADER_SIZE)) {
2016 printf(", bogus fixed header length %u should be %lu",
2017 isis_header->fixed_len, (unsigned long)ISIS_CSNP_HEADER_SIZE);
2018 return (0);
2019 }
2020
2021 pdu_len=EXTRACT_16BITS(header_csnp->pdu_len);
2022 if (packet_len>pdu_len) {
2023 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
2024 length=pdu_len;
2025 }
2026
2027 TCHECK(*header_csnp);
2028 printf("\n\t source-id: %s, PDU length: %u",
2029 isis_print_id(header_csnp->source_id, NODE_ID_LEN),
2030 pdu_len);
2031 printf("\n\t start lsp-id: %s",
2032 isis_print_id(header_csnp->start_lsp_id, LSP_ID_LEN));
2033 printf("\n\t end lsp-id: %s",
2034 isis_print_id(header_csnp->end_lsp_id, LSP_ID_LEN));
2035
2036 if (vflag > 1) {
2037 if(!print_unknown_data(pptr,"\n\t ",ISIS_CSNP_HEADER_SIZE))
2038 return(0);
2039 }
2040
2041 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_CSNP_HEADER_SIZE);
2042 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_CSNP_HEADER_SIZE);
2043 break;
2044
2045 case ISIS_PDU_L1_PSNP:
2046 case ISIS_PDU_L2_PSNP:
2047 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_PSNP_HEADER_SIZE)) {
2048 printf("- bogus fixed header length %u should be %lu",
2049 isis_header->fixed_len, (unsigned long)ISIS_PSNP_HEADER_SIZE);
2050 return (0);
2051 }
2052
2053 pdu_len=EXTRACT_16BITS(header_psnp->pdu_len);
2054 if (packet_len>pdu_len) {
2055 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
2056 length=pdu_len;
2057 }
2058
2059 TCHECK(*header_psnp);
2060 printf("\n\t source-id: %s, PDU length: %u",
2061 isis_print_id(header_psnp->source_id, NODE_ID_LEN),
2062 pdu_len);
2063
2064 if (vflag > 1) {
2065 if(!print_unknown_data(pptr,"\n\t ",ISIS_PSNP_HEADER_SIZE))
2066 return(0);
2067 }
2068
2069 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_PSNP_HEADER_SIZE);
2070 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_PSNP_HEADER_SIZE);
2071 break;
2072
2073 default:
2074 if(!print_unknown_data(pptr,"\n\t ",length))
2075 return(0);
2076 return (0);
2077 }
2078
2079 /*
2080 * Now print the TLV's.
2081 */
2082
2083 while (packet_len >= 2) {
2084 if (pptr == snapend) {
2085 return (1);
2086 }
2087
2088 if (!TTEST2(*pptr, 2)) {
2089 printf("\n\t\t packet exceeded snapshot (%ld) bytes",
2090 (long)(pptr-snapend));
2091 return (1);
2092 }
2093 tlv_type = *pptr++;
2094 tlv_len = *pptr++;
2095 tmp =tlv_len; /* copy temporary len & pointer to packet data */
2096 tptr = pptr;
2097 packet_len -= 2;
2098 if (tlv_len > packet_len) {
2099 break;
2100 }
2101
2102 /* first lets see if we know the TLVs name*/
2103 printf("\n\t %s TLV #%u, length: %u",
2104 tok2str(isis_tlv_values,
2105 "unknown",
2106 tlv_type),
2107 tlv_type,
2108 tlv_len);
2109
2110 if (tlv_len == 0) /* something is malformed */
2111 continue;
2112
2113 /* now check if we have a decoder otherwise do a hexdump at the end*/
2114 switch (tlv_type) {
2115 case ISIS_TLV_AREA_ADDR:
2116 if (!TTEST2(*tptr, 1))
2117 goto trunctlv;
2118 alen = *tptr++;
2119 while (tmp && alen < tmp) {
2120 printf("\n\t Area address (length: %u): %s",
2121 alen,
2122 isonsap_string(tptr,alen));
2123 tptr += alen;
2124 tmp -= alen + 1;
2125 if (tmp==0) /* if this is the last area address do not attemt a boundary check */
2126 break;
2127 if (!TTEST2(*tptr, 1))
2128 goto trunctlv;
2129 alen = *tptr++;
2130 }
2131 break;
2132 case ISIS_TLV_ISNEIGH:
2133 while (tmp >= ETHER_ADDR_LEN) {
2134 if (!TTEST2(*tptr, ETHER_ADDR_LEN))
2135 goto trunctlv;
2136 printf("\n\t SNPA: %s",isis_print_id(tptr,ETHER_ADDR_LEN));
2137 tmp -= ETHER_ADDR_LEN;
2138 tptr += ETHER_ADDR_LEN;
2139 }
2140 break;
2141
2142 case ISIS_TLV_ISNEIGH_VARLEN:
2143 if (!TTEST2(*tptr, 1) || tmp < 3) /* min. TLV length */
2144 goto trunctlv;
2145 lan_alen = *tptr++; /* LAN address length */
2146 if (lan_alen == 0) {
2147 printf("\n\t LAN address length 0 bytes (invalid)");
2148 break;
2149 }
2150 tmp --;
2151 printf("\n\t LAN address length %u bytes ",lan_alen);
2152 while (tmp >= lan_alen) {
2153 if (!TTEST2(*tptr, lan_alen))
2154 goto trunctlv;
2155 printf("\n\t\tIS Neighbor: %s",isis_print_id(tptr,lan_alen));
2156 tmp -= lan_alen;
2157 tptr +=lan_alen;
2158 }
2159 break;
2160
2161 case ISIS_TLV_PADDING:
2162 break;
2163
2164 case ISIS_TLV_MT_IS_REACH:
2165 while (tmp >= 2+NODE_ID_LEN+3+1) {
2166 mt_len = isis_print_mtid(tptr, "\n\t ");
2167 if (mt_len == 0) /* did something go wrong ? */
2168 goto trunctlv;
2169 tptr+=mt_len;
2170 tmp-=mt_len;
2171
2172 ext_is_len = isis_print_ext_is_reach(tptr,"\n\t ",tlv_type);
2173 if (ext_is_len == 0) /* did something go wrong ? */
2174 goto trunctlv;
2175
2176 tmp-=ext_is_len;
2177 tptr+=ext_is_len;
2178 }
2179 break;
2180
2181 case ISIS_TLV_IS_ALIAS_ID:
2182 while (tmp >= NODE_ID_LEN+1) { /* is it worth attempting a decode ? */
2183 ext_is_len = isis_print_ext_is_reach(tptr,"\n\t ",tlv_type);
2184 if (ext_is_len == 0) /* did something go wrong ? */
2185 goto trunctlv;
2186 tmp-=ext_is_len;
2187 tptr+=ext_is_len;
2188 }
2189 break;
2190
2191 case ISIS_TLV_EXT_IS_REACH:
2192 while (tmp >= NODE_ID_LEN+3+1) { /* is it worth attempting a decode ? */
2193 ext_is_len = isis_print_ext_is_reach(tptr,"\n\t ",tlv_type);
2194 if (ext_is_len == 0) /* did something go wrong ? */
2195 goto trunctlv;
2196 tmp-=ext_is_len;
2197 tptr+=ext_is_len;
2198 }
2199 break;
2200 case ISIS_TLV_IS_REACH:
2201 if (!TTEST2(*tptr,1)) /* check if there is one byte left to read out the virtual flag */
2202 goto trunctlv;
2203 printf("\n\t %s",
2204 tok2str(isis_is_reach_virtual_values,
2205 "bogus virtual flag 0x%02x",
2206 *tptr++));
2207 tlv_is_reach = (const struct isis_tlv_is_reach *)tptr;
2208 while (tmp >= sizeof(struct isis_tlv_is_reach)) {
2209 if (!TTEST(*tlv_is_reach))
2210 goto trunctlv;
2211 printf("\n\t IS Neighbor: %s",
2212 isis_print_id(tlv_is_reach->neighbor_nodeid, NODE_ID_LEN));
2213 isis_print_metric_block(&tlv_is_reach->isis_metric_block);
2214 tmp -= sizeof(struct isis_tlv_is_reach);
2215 tlv_is_reach++;
2216 }
2217 break;
2218
2219 case ISIS_TLV_ESNEIGH:
2220 tlv_es_reach = (const struct isis_tlv_es_reach *)tptr;
2221 while (tmp >= sizeof(struct isis_tlv_es_reach)) {
2222 if (!TTEST(*tlv_es_reach))
2223 goto trunctlv;
2224 printf("\n\t ES Neighbor: %s",
2225 isis_print_id(tlv_es_reach->neighbor_sysid,SYSTEM_ID_LEN));
2226 isis_print_metric_block(&tlv_es_reach->isis_metric_block);
2227 tmp -= sizeof(struct isis_tlv_es_reach);
2228 tlv_es_reach++;
2229 }
2230 break;
2231
2232 /* those two TLVs share the same format */
2233 case ISIS_TLV_INT_IP_REACH:
2234 case ISIS_TLV_EXT_IP_REACH:
2235 if (!isis_print_tlv_ip_reach(pptr, "\n\t ", tlv_len))
2236 return (1);
2237 break;
2238
2239 case ISIS_TLV_EXTD_IP_REACH:
2240 while (tmp>0) {
2241 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", IPV4);
2242 if (ext_ip_len == 0) /* did something go wrong ? */
2243 goto trunctlv;
2244 tptr+=ext_ip_len;
2245 tmp-=ext_ip_len;
2246 }
2247 break;
2248
2249 case ISIS_TLV_MT_IP_REACH:
2250 mt_len = isis_print_mtid(tptr, "\n\t ");
2251 if (mt_len == 0) { /* did something go wrong ? */
2252 goto trunctlv;
2253 }
2254 tptr+=mt_len;
2255 tmp-=mt_len;
2256
2257 while (tmp>0) {
2258 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", IPV4);
2259 if (ext_ip_len == 0) /* did something go wrong ? */
2260 goto trunctlv;
2261 tptr+=ext_ip_len;
2262 tmp-=ext_ip_len;
2263 }
2264 break;
2265
2266 #ifdef INET6
2267 case ISIS_TLV_IP6_REACH:
2268 while (tmp>0) {
2269 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", IPV6);
2270 if (ext_ip_len == 0) /* did something go wrong ? */
2271 goto trunctlv;
2272 tptr+=ext_ip_len;
2273 tmp-=ext_ip_len;
2274 }
2275 break;
2276
2277 case ISIS_TLV_MT_IP6_REACH:
2278 mt_len = isis_print_mtid(tptr, "\n\t ");
2279 if (mt_len == 0) { /* did something go wrong ? */
2280 goto trunctlv;
2281 }
2282 tptr+=mt_len;
2283 tmp-=mt_len;
2284
2285 while (tmp>0) {
2286 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", IPV6);
2287 if (ext_ip_len == 0) /* did something go wrong ? */
2288 goto trunctlv;
2289 tptr+=ext_ip_len;
2290 tmp-=ext_ip_len;
2291 }
2292 break;
2293
2294 case ISIS_TLV_IP6ADDR:
2295 while (tmp>=sizeof(struct in6_addr)) {
2296 if (!TTEST2(*tptr, sizeof(struct in6_addr)))
2297 goto trunctlv;
2298
2299 printf("\n\t IPv6 interface address: %s",
2300 ip6addr_string(tptr));
2301
2302 tptr += sizeof(struct in6_addr);
2303 tmp -= sizeof(struct in6_addr);
2304 }
2305 break;
2306 #endif
2307 case ISIS_TLV_AUTH:
2308 if (!TTEST2(*tptr, 1))
2309 goto trunctlv;
2310
2311 printf("\n\t %s: ",
2312 tok2str(isis_subtlv_auth_values,
2313 "unknown Authentication type 0x%02x",
2314 *tptr));
2315
2316 switch (*tptr) {
2317 case ISIS_SUBTLV_AUTH_SIMPLE:
2318 for(i=1;i<tlv_len;i++) {
2319 if (!TTEST2(*(tptr+i), 1))
2320 goto trunctlv;
2321 printf("%c",*(tptr+i));
2322 }
2323 break;
2324 case ISIS_SUBTLV_AUTH_MD5:
2325 for(i=1;i<tlv_len;i++) {
2326 if (!TTEST2(*(tptr+i), 1))
2327 goto trunctlv;
2328 printf("%02x",*(tptr+i));
2329 }
2330 if (tlv_len != ISIS_SUBTLV_AUTH_MD5_LEN+1)
2331 printf(", (malformed subTLV) ");
2332 break;
2333 case ISIS_SUBTLV_AUTH_PRIVATE:
2334 default:
2335 if(!print_unknown_data(tptr+1,"\n\t\t ",tlv_len-1))
2336 return(0);
2337 break;
2338 }
2339 break;
2340
2341 case ISIS_TLV_PTP_ADJ:
2342 tlv_ptp_adj = (const struct isis_tlv_ptp_adj *)tptr;
2343 if(tmp>=1) {
2344 if (!TTEST2(*tptr, 1))
2345 goto trunctlv;
2346 printf("\n\t Adjacency State: %s (%u)",
2347 tok2str(isis_ptp_adjancey_values, "unknown", *tptr),
2348 *tptr);
2349 tmp--;
2350 }
2351 if(tmp>sizeof(tlv_ptp_adj->extd_local_circuit_id)) {
2352 if (!TTEST2(tlv_ptp_adj->extd_local_circuit_id,
2353 sizeof(tlv_ptp_adj->extd_local_circuit_id)))
2354 goto trunctlv;
2355 printf("\n\t Extended Local circuit-ID: 0x%08x",
2356 EXTRACT_32BITS(tlv_ptp_adj->extd_local_circuit_id));
2357 tmp-=sizeof(tlv_ptp_adj->extd_local_circuit_id);
2358 }
2359 if(tmp>=SYSTEM_ID_LEN) {
2360 if (!TTEST2(tlv_ptp_adj->neighbor_sysid, SYSTEM_ID_LEN))
2361 goto trunctlv;
2362 printf("\n\t Neighbor System-ID: %s",
2363 isis_print_id(tlv_ptp_adj->neighbor_sysid,SYSTEM_ID_LEN));
2364 tmp-=SYSTEM_ID_LEN;
2365 }
2366 if(tmp>=sizeof(tlv_ptp_adj->neighbor_extd_local_circuit_id)) {
2367 if (!TTEST2(tlv_ptp_adj->neighbor_extd_local_circuit_id,
2368 sizeof(tlv_ptp_adj->neighbor_extd_local_circuit_id)))
2369 goto trunctlv;
2370 printf("\n\t Neighbor Extended Local circuit-ID: 0x%08x",
2371 EXTRACT_32BITS(tlv_ptp_adj->neighbor_extd_local_circuit_id));
2372 }
2373 break;
2374
2375 case ISIS_TLV_PROTOCOLS:
2376 printf("\n\t NLPID(s): ");
2377 while (tmp>0) {
2378 if (!TTEST2(*(tptr), 1))
2379 goto trunctlv;
2380 printf("%s (0x%02x)",
2381 tok2str(nlpid_values,
2382 "unknown",
2383 *tptr),
2384 *tptr);
2385 if (tmp>1) /* further NPLIDs ? - put comma */
2386 printf(", ");
2387 tptr++;
2388 tmp--;
2389 }
2390 break;
2391
2392 case ISIS_TLV_TE_ROUTER_ID:
2393 if (!TTEST2(*pptr, sizeof(struct in_addr)))
2394 goto trunctlv;
2395 printf("\n\t Traffic Engineering Router ID: %s", ipaddr_string(pptr));
2396 break;
2397
2398 case ISIS_TLV_IPADDR:
2399 while (tmp>=sizeof(struct in_addr)) {
2400 if (!TTEST2(*tptr, sizeof(struct in_addr)))
2401 goto trunctlv;
2402 printf("\n\t IPv4 interface address: %s", ipaddr_string(tptr));
2403 tptr += sizeof(struct in_addr);
2404 tmp -= sizeof(struct in_addr);
2405 }
2406 break;
2407
2408 case ISIS_TLV_HOSTNAME:
2409 printf("\n\t Hostname: ");
2410 while (tmp>0) {
2411 if (!TTEST2(*tptr, 1))
2412 goto trunctlv;
2413 printf("%c",*tptr++);
2414 tmp--;
2415 }
2416 break;
2417
2418 case ISIS_TLV_SHARED_RISK_GROUP:
2419 if (tmp < NODE_ID_LEN)
2420 break;
2421 if (!TTEST2(*tptr, NODE_ID_LEN))
2422 goto trunctlv;
2423 printf("\n\t IS Neighbor: %s", isis_print_id(tptr, NODE_ID_LEN));
2424 tptr+=(NODE_ID_LEN);
2425 tmp-=(NODE_ID_LEN);
2426
2427 if (tmp < 1)
2428 break;
2429 if (!TTEST2(*tptr, 1))
2430 goto trunctlv;
2431 printf(", Flags: [%s]", ISIS_MASK_TLV_SHARED_RISK_GROUP(*tptr++) ? "numbered" : "unnumbered");
2432 tmp--;
2433
2434 if (tmp < sizeof(struct in_addr))
2435 break;
2436 if (!TTEST2(*tptr,sizeof(struct in_addr)))
2437 goto trunctlv;
2438 printf("\n\t IPv4 interface address: %s", ipaddr_string(tptr));
2439 tptr+=sizeof(struct in_addr);
2440 tmp-=sizeof(struct in_addr);
2441
2442 if (tmp < sizeof(struct in_addr))
2443 break;
2444 if (!TTEST2(*tptr,sizeof(struct in_addr)))
2445 goto trunctlv;
2446 printf("\n\t IPv4 neighbor address: %s", ipaddr_string(tptr));
2447 tptr+=sizeof(struct in_addr);
2448 tmp-=sizeof(struct in_addr);
2449
2450 while (tmp>=4) {
2451 if (!TTEST2(*tptr, 4))
2452 goto trunctlv;
2453 printf("\n\t Link-ID: 0x%08x", EXTRACT_32BITS(tptr));
2454 tptr+=4;
2455 tmp-=4;
2456 }
2457 break;
2458
2459 case ISIS_TLV_LSP:
2460 tlv_lsp = (const struct isis_tlv_lsp *)tptr;
2461 while(tmp>=sizeof(struct isis_tlv_lsp)) {
2462 if (!TTEST((tlv_lsp->lsp_id)[LSP_ID_LEN-1]))
2463 goto trunctlv;
2464 printf("\n\t lsp-id: %s",
2465 isis_print_id(tlv_lsp->lsp_id, LSP_ID_LEN));
2466 if (!TTEST2(tlv_lsp->sequence_number, 4))
2467 goto trunctlv;
2468 printf(", seq: 0x%08x",EXTRACT_32BITS(tlv_lsp->sequence_number));
2469 if (!TTEST2(tlv_lsp->remaining_lifetime, 2))
2470 goto trunctlv;
2471 printf(", lifetime: %5ds",EXTRACT_16BITS(tlv_lsp->remaining_lifetime));
2472 if (!TTEST2(tlv_lsp->checksum, 2))
2473 goto trunctlv;
2474 printf(", chksum: 0x%04x",EXTRACT_16BITS(tlv_lsp->checksum));
2475 tmp-=sizeof(struct isis_tlv_lsp);
2476 tlv_lsp++;
2477 }
2478 break;
2479
2480 case ISIS_TLV_CHECKSUM:
2481 if (tmp < ISIS_TLV_CHECKSUM_MINLEN)
2482 break;
2483 if (!TTEST2(*tptr, ISIS_TLV_CHECKSUM_MINLEN))
2484 goto trunctlv;
2485 printf("\n\t checksum: 0x%04x ", EXTRACT_16BITS(tptr));
2486 /* do not attempt to verify the checksum if it is zero
2487 * most likely a HMAC-MD5 TLV is also present and
2488 * to avoid conflicts the checksum TLV is zeroed.
2489 * see rfc3358 for details
2490 */
2491 if (EXTRACT_16BITS(tptr) == 0)
2492 printf("(unverified)");
2493 else printf("(%s)", osi_cksum(optr, length) ? "incorrect" : "correct");
2494 break;
2495
2496 case ISIS_TLV_MT_SUPPORTED:
2497 if (tmp < ISIS_TLV_MT_SUPPORTED_MINLEN)
2498 break;
2499 while (tmp>1) {
2500 /* length can only be a multiple of 2, otherwise there is
2501 something broken -> so decode down until length is 1 */
2502 if (tmp!=1) {
2503 mt_len = isis_print_mtid(tptr, "\n\t ");
2504 if (mt_len == 0) /* did something go wrong ? */
2505 goto trunctlv;
2506 tptr+=mt_len;
2507 tmp-=mt_len;
2508 } else {
2509 printf("\n\t malformed MT-ID");
2510 break;
2511 }
2512 }
2513 break;
2514
2515 case ISIS_TLV_RESTART_SIGNALING:
2516 /* first attempt to decode the flags */
2517 if (tmp < ISIS_TLV_RESTART_SIGNALING_FLAGLEN)
2518 break;
2519 if (!TTEST2(*tptr, ISIS_TLV_RESTART_SIGNALING_FLAGLEN))
2520 goto trunctlv;
2521 printf("\n\t Flags [%s]",
2522 bittok2str(isis_restart_flag_values, "none", *tptr));
2523 tptr+=ISIS_TLV_RESTART_SIGNALING_FLAGLEN;
2524 tmp-=ISIS_TLV_RESTART_SIGNALING_FLAGLEN;
2525
2526 /* is there anything other than the flags field? */
2527 if (tmp == 0)
2528 break;
2529
2530 if (tmp < ISIS_TLV_RESTART_SIGNALING_HOLDTIMELEN)
2531 break;
2532 if (!TTEST2(*tptr, ISIS_TLV_RESTART_SIGNALING_HOLDTIMELEN))
2533 goto trunctlv;
2534
2535 printf(", Remaining holding time %us", EXTRACT_16BITS(tptr));
2536 tptr+=ISIS_TLV_RESTART_SIGNALING_HOLDTIMELEN;
2537 tmp-=ISIS_TLV_RESTART_SIGNALING_HOLDTIMELEN;
2538
2539 /* is there an additional sysid field present ?*/
2540 if (tmp == SYSTEM_ID_LEN) {
2541 if (!TTEST2(*tptr, SYSTEM_ID_LEN))
2542 goto trunctlv;
2543 printf(", for %s",isis_print_id(tptr,SYSTEM_ID_LEN));
2544 }
2545 break;
2546
2547 case ISIS_TLV_IDRP_INFO:
2548 if (tmp < ISIS_TLV_IDRP_INFO_MINLEN)
2549 break;
2550 if (!TTEST2(*tptr, ISIS_TLV_IDRP_INFO_MINLEN))
2551 goto trunctlv;
2552 printf("\n\t Inter-Domain Information Type: %s",
2553 tok2str(isis_subtlv_idrp_values,
2554 "Unknown (0x%02x)",
2555 *tptr));
2556 switch (*tptr++) {
2557 case ISIS_SUBTLV_IDRP_ASN:
2558 if (!TTEST2(*tptr, 2)) /* fetch AS number */
2559 goto trunctlv;
2560 printf("AS Number: %u",EXTRACT_16BITS(tptr));
2561 break;
2562 case ISIS_SUBTLV_IDRP_LOCAL:
2563 case ISIS_SUBTLV_IDRP_RES:
2564 default:
2565 if(!print_unknown_data(tptr,"\n\t ",tlv_len-1))
2566 return(0);
2567 break;
2568 }
2569 break;
2570
2571 case ISIS_TLV_LSP_BUFFERSIZE:
2572 if (tmp < ISIS_TLV_LSP_BUFFERSIZE_MINLEN)
2573 break;
2574 if (!TTEST2(*tptr, ISIS_TLV_LSP_BUFFERSIZE_MINLEN))
2575 goto trunctlv;
2576 printf("\n\t LSP Buffersize: %u",EXTRACT_16BITS(tptr));
2577 break;
2578
2579 case ISIS_TLV_PART_DIS:
2580 while (tmp >= SYSTEM_ID_LEN) {
2581 if (!TTEST2(*tptr, SYSTEM_ID_LEN))
2582 goto trunctlv;
2583 printf("\n\t %s",isis_print_id(tptr,SYSTEM_ID_LEN));
2584 tptr+=SYSTEM_ID_LEN;
2585 tmp-=SYSTEM_ID_LEN;
2586 }
2587 break;
2588
2589 case ISIS_TLV_PREFIX_NEIGH:
2590 if (tmp < sizeof(struct isis_metric_block))
2591 break;
2592 if (!TTEST2(*tptr, sizeof(struct isis_metric_block)))
2593 goto trunctlv;
2594 printf("\n\t Metric Block");
2595 isis_print_metric_block((const struct isis_metric_block *)tptr);
2596 tptr+=sizeof(struct isis_metric_block);
2597 tmp-=sizeof(struct isis_metric_block);
2598
2599 while(tmp>0) {
2600 if (!TTEST2(*tptr, 1))
2601 goto trunctlv;
2602 prefix_len=*tptr++; /* read out prefix length in semioctets*/
2603 if (prefix_len < 2) {
2604 printf("\n\t\tAddress: prefix length %u < 2", prefix_len);
2605 break;
2606 }
2607 tmp--;
2608 if (tmp < prefix_len/2)
2609 break;
2610 if (!TTEST2(*tptr, prefix_len/2))
2611 goto trunctlv;
2612 printf("\n\t\tAddress: %s/%u",
2613 isonsap_string(tptr,prefix_len/2),
2614 prefix_len*4);
2615 tptr+=prefix_len/2;
2616 tmp-=prefix_len/2;
2617 }
2618 break;
2619
2620 case ISIS_TLV_IIH_SEQNR:
2621 if (tmp < ISIS_TLV_IIH_SEQNR_MINLEN)
2622 break;
2623 if (!TTEST2(*tptr, ISIS_TLV_IIH_SEQNR_MINLEN)) /* check if four bytes are on the wire */
2624 goto trunctlv;
2625 printf("\n\t Sequence number: %u", EXTRACT_32BITS(tptr) );
2626 break;
2627
2628 case ISIS_TLV_VENDOR_PRIVATE:
2629 if (tmp < ISIS_TLV_VENDOR_PRIVATE_MINLEN)
2630 break;
2631 if (!TTEST2(*tptr, ISIS_TLV_VENDOR_PRIVATE_MINLEN)) /* check if enough byte for a full oui */
2632 goto trunctlv;
2633 vendor_id = EXTRACT_24BITS(tptr);
2634 printf("\n\t Vendor: %s (%u)",
2635 tok2str(oui_values,"Unknown",vendor_id),
2636 vendor_id);
2637 tptr+=3;
2638 tmp-=3;
2639 if (tmp > 0) /* hexdump the rest */
2640 if(!print_unknown_data(tptr,"\n\t\t",tmp))
2641 return(0);
2642 break;
2643 /*
2644 * FIXME those are the defined TLVs that lack a decoder
2645 * you are welcome to contribute code ;-)
2646 */
2647
2648 case ISIS_TLV_DECNET_PHASE4:
2649 case ISIS_TLV_LUCENT_PRIVATE:
2650 case ISIS_TLV_IPAUTH:
2651 case ISIS_TLV_NORTEL_PRIVATE1:
2652 case ISIS_TLV_NORTEL_PRIVATE2:
2653
2654 default:
2655 if (vflag <= 1) {
2656 if(!print_unknown_data(pptr,"\n\t\t",tlv_len))
2657 return(0);
2658 }
2659 break;
2660 }
2661 /* do we want to see an additionally hexdump ? */
2662 if (vflag> 1) {
2663 if(!print_unknown_data(pptr,"\n\t ",tlv_len))
2664 return(0);
2665 }
2666
2667 pptr += tlv_len;
2668 packet_len -= tlv_len;
2669 }
2670
2671 if (packet_len != 0) {
2672 printf("\n\t %u straggler bytes", packet_len);
2673 }
2674 return (1);
2675
2676 trunc:
2677 fputs("[|isis]", stdout);
2678 return (1);
2679
2680 trunctlv:
2681 printf("\n\t\t packet exceeded snapshot");
2682 return(1);
2683 }
2684
2685 /*
2686 * Verify the checksum. See 8473-1, Appendix C, section C.4.
2687 */
2688
2689 static int
osi_cksum(const u_int8_t * tptr,u_int len)2690 osi_cksum(const u_int8_t *tptr, u_int len)
2691 {
2692 int32_t c0 = 0, c1 = 0;
2693
2694 while ((int)--len >= 0) {
2695 c0 += *tptr++;
2696 c0 %= 255;
2697 c1 += c0;
2698 c1 %= 255;
2699 }
2700 return (c0 | c1);
2701 }
2702
2703
2704 /*
2705 * Local Variables:
2706 * c-style: whitesmith
2707 * c-basic-offset: 8
2708 * End:
2709 */
2710