]> The Tcpdump Group git mirrors - tcpdump/blob - print-isoclns.c
projects / tcpdump / blob
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
From Markus Schoepflin: don't use "struct in6_addr" if INET6 isn't
[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 & 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.20 2005-10-16 08:18:18 guy 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, "L1L2 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
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
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
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 *
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
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
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
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
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
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
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
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 #ifdef INET6
1666 memset(prefix, 0, sizeof(struct in6_addr)); /* clear the copy buffer */
1667 #else
1668 memset(prefix, 0, sizeof(struct in_addr)); /* clear the copy buffer */
1669 #endif
1670 memcpy(prefix,tptr,byte_length); /* copy as much as is stored in the TLV */
1671 tptr+=byte_length;
1672 processed+=byte_length;
1673
1674 if (afi == IPV4)
1675 printf("%sIPv4 prefix: %15s/%u",
1676 ident,
1677 ipaddr_string(prefix),
1678 bit_length);
1679 #ifdef INET6
1680 if (afi == IPV6)
1681 printf("%sIPv6 prefix: %s/%u",
1682 ident,
1683 ip6addr_string(prefix),
1684 bit_length);
1685 #endif
1686
1687 printf(", Distribution: %s, Metric: %u",
1688 ISIS_MASK_TLV_EXTD_IP_UPDOWN(status_byte) ? "down" : "up",
1689 metric);
1690
1691 if (afi == IPV4 && ISIS_MASK_TLV_EXTD_IP_SUBTLV(status_byte))
1692 printf(", sub-TLVs present");
1693 #ifdef INET6
1694 if (afi == IPV6)
1695 printf(", %s%s",
1696 ISIS_MASK_TLV_EXTD_IP6_IE(status_byte) ? "External" : "Internal",
1697 ISIS_MASK_TLV_EXTD_IP6_SUBTLV(status_byte) ? ", sub-TLVs present" : "");
1698 #endif
1699
1700 if ((ISIS_MASK_TLV_EXTD_IP_SUBTLV(status_byte) && afi == IPV4) ||
1701 (ISIS_MASK_TLV_EXTD_IP6_SUBTLV(status_byte) && afi == IPV6)) {
1702 /* assume that one prefix can hold more
1703 than one subTLV - therefore the first byte must reflect
1704 the aggregate bytecount of the subTLVs for this prefix
1705 */
1706 if (!TTEST2(*tptr, 1))
1707 return (0);
1708 sublen=*(tptr++);
1709 processed+=sublen+1;
1710 printf(" (%u)",sublen); /* print out subTLV length */
1711
1712 while (sublen>0) {
1713 if (!TTEST2(*tptr,2))
1714 return (0);
1715 subtlvtype=*(tptr++);
1716 subtlvlen=*(tptr++);
1717 /* prepend the ident string */
1718 snprintf(ident_buffer, sizeof(ident_buffer), "%s ",ident);
1719 if(!isis_print_ip_reach_subtlv(tptr,subtlvtype,subtlvlen,ident_buffer))
1720 return(0);
1721 tptr+=subtlvlen;
1722 sublen-=(subtlvlen+2);
1723 }
1724 }
1725 return (processed);
1726 }
1727
1728 /*
1729 * isis_print
1730 * Decode IS-IS packets. Return 0 on error.
1731 */
1732
1733 static int isis_print (const u_int8_t *p, u_int length)
1734 {
1735 const struct isis_common_header *isis_header;
1736
1737 const struct isis_iih_lan_header *header_iih_lan;
1738 const struct isis_iih_ptp_header *header_iih_ptp;
1739 const struct isis_lsp_header *header_lsp;
1740 const struct isis_csnp_header *header_csnp;
1741 const struct isis_psnp_header *header_psnp;
1742
1743 const struct isis_tlv_lsp *tlv_lsp;
1744 const struct isis_tlv_ptp_adj *tlv_ptp_adj;
1745 const struct isis_tlv_is_reach *tlv_is_reach;
1746 const struct isis_tlv_es_reach *tlv_es_reach;
1747
1748 u_int8_t pdu_type, max_area, id_length, tlv_type, tlv_len, tmp, alen, lan_alen, prefix_len;
1749 u_int8_t ext_is_len, ext_ip_len, mt_len;
1750 const u_int8_t *optr, *pptr, *tptr;
1751 u_short packet_len,pdu_len;
1752 u_int i,vendor_id;
1753
1754 packet_len=length;
1755 optr = p; /* initialize the _o_riginal pointer to the packet start -
1756 need it for parsing the checksum TLV */
1757 isis_header = (const struct isis_common_header *)p;
1758 TCHECK(*isis_header);
1759 pptr = p+(ISIS_COMMON_HEADER_SIZE);
1760 header_iih_lan = (const struct isis_iih_lan_header *)pptr;
1761 header_iih_ptp = (const struct isis_iih_ptp_header *)pptr;
1762 header_lsp = (const struct isis_lsp_header *)pptr;
1763 header_csnp = (const struct isis_csnp_header *)pptr;
1764 header_psnp = (const struct isis_psnp_header *)pptr;
1765
1766 if (!eflag)
1767 printf("IS-IS");
1768
1769 /*
1770 * Sanity checking of the header.
1771 */
1772
1773 if (isis_header->version != ISIS_VERSION) {
1774 printf("version %d packet not supported", isis_header->version);
1775 return (0);
1776 }
1777
1778 if ((isis_header->id_length != SYSTEM_ID_LEN) && (isis_header->id_length != 0)) {
1779 printf("system ID length of %d is not supported",
1780 isis_header->id_length);
1781 return (0);
1782 }
1783
1784 if (isis_header->pdu_version != ISIS_VERSION) {
1785 printf("version %d packet not supported", isis_header->pdu_version);
1786 return (0);
1787 }
1788
1789 max_area = isis_header->max_area;
1790 switch(max_area) {
1791 case 0:
1792 max_area = 3; /* silly shit */
1793 break;
1794 case 255:
1795 printf("bad packet -- 255 areas");
1796 return (0);
1797 default:
1798 break;
1799 }
1800
1801 id_length = isis_header->id_length;
1802 switch(id_length) {
1803 case 0:
1804 id_length = 6; /* silly shit again */
1805 break;
1806 case 1: /* 1-8 are valid sys-ID lenghts */
1807 case 2:
1808 case 3:
1809 case 4:
1810 case 5:
1811 case 6:
1812 case 7:
1813 case 8:
1814 break;
1815 case 255:
1816 id_length = 0; /* entirely useless */
1817 break;
1818 default:
1819 break;
1820 }
1821
1822 /* toss any non 6-byte sys-ID len PDUs */
1823 if (id_length != 6 ) {
1824 printf("bad packet -- illegal sys-ID length (%u)", id_length);
1825 return (0);
1826 }
1827
1828 pdu_type=isis_header->pdu_type;
1829
1830 /* in non-verbose mode print the basic PDU Type plus PDU specific brief information*/
1831 if (vflag < 1) {
1832 printf("%s%s",
1833 eflag ? "" : ", ",
1834 tok2str(isis_pdu_values,"unknown PDU-Type %u",pdu_type));
1835
1836 switch (pdu_type) {
1837
1838 case ISIS_PDU_L1_LAN_IIH:
1839 case ISIS_PDU_L2_LAN_IIH:
1840 printf(", src-id %s",
1841 isis_print_id(header_iih_lan->source_id,SYSTEM_ID_LEN));
1842 printf(", lan-id %s, prio %u",
1843 isis_print_id(header_iih_lan->lan_id,NODE_ID_LEN),
1844 header_iih_lan->priority);
1845 break;
1846 case ISIS_PDU_PTP_IIH:
1847 printf(", src-id %s", isis_print_id(header_iih_ptp->source_id,SYSTEM_ID_LEN));
1848 break;
1849 case ISIS_PDU_L1_LSP:
1850 case ISIS_PDU_L2_LSP:
1851 printf(", lsp-id %s, seq 0x%08x, lifetime %5us",
1852 isis_print_id(header_lsp->lsp_id, LSP_ID_LEN),
1853 EXTRACT_32BITS(header_lsp->sequence_number),
1854 EXTRACT_16BITS(header_lsp->remaining_lifetime));
1855 break;
1856 case ISIS_PDU_L1_CSNP:
1857 case ISIS_PDU_L2_CSNP:
1858 printf(", src-id %s", isis_print_id(header_csnp->source_id,NODE_ID_LEN));
1859 break;
1860 case ISIS_PDU_L1_PSNP:
1861 case ISIS_PDU_L2_PSNP:
1862 printf(", src-id %s", isis_print_id(header_psnp->source_id,NODE_ID_LEN));
1863 break;
1864
1865 }
1866 printf(", length %u", length);
1867
1868 return(1);
1869 }
1870
1871 /* ok they seem to want to know everything - lets fully decode it */
1872 printf("%slength %u", eflag ? "" : ", ",length);
1873
1874 printf("\n\t%s, hlen: %u, v: %u, pdu-v: %u, sys-id-len: %u (%u), max-area: %u (%u)",
1875 tok2str(isis_pdu_values,
1876 "unknown, type %u",
1877 pdu_type),
1878 isis_header->fixed_len,
1879 isis_header->version,
1880 isis_header->pdu_version,
1881 id_length,
1882 isis_header->id_length,
1883 max_area,
1884 isis_header->max_area);
1885
1886 if (vflag > 1) {
1887 if(!print_unknown_data(optr,"\n\t",8)) /* provide the _o_riginal pointer */
1888 return(0); /* for optionally debugging the common header */
1889 }
1890
1891 switch (pdu_type) {
1892
1893 case ISIS_PDU_L1_LAN_IIH:
1894 case ISIS_PDU_L2_LAN_IIH:
1895 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_LAN_HEADER_SIZE)) {
1896 printf(", bogus fixed header length %u should be %lu",
1897 isis_header->fixed_len, (unsigned long)ISIS_IIH_LAN_HEADER_SIZE);
1898 return (0);
1899 }
1900
1901 pdu_len=EXTRACT_16BITS(header_iih_lan->pdu_len);
1902 if (packet_len>pdu_len) {
1903 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
1904 length=pdu_len;
1905 }
1906
1907 TCHECK(*header_iih_lan);
1908 printf("\n\t source-id: %s, holding time: %us, Flags: [%s]",
1909 isis_print_id(header_iih_lan->source_id,SYSTEM_ID_LEN),
1910 EXTRACT_16BITS(header_iih_lan->holding_time),
1911 tok2str(isis_iih_circuit_type_values,
1912 "unknown circuit type 0x%02x",
1913 header_iih_lan->circuit_type));
1914
1915 printf("\n\t lan-id: %s, Priority: %u, PDU length: %u",
1916 isis_print_id(header_iih_lan->lan_id, NODE_ID_LEN),
1917 (header_iih_lan->priority) & ISIS_LAN_PRIORITY_MASK,
1918 pdu_len);
1919
1920 if (vflag > 1) {
1921 if(!print_unknown_data(pptr,"\n\t ",ISIS_IIH_LAN_HEADER_SIZE))
1922 return(0);
1923 }
1924
1925 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_LAN_HEADER_SIZE);
1926 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_LAN_HEADER_SIZE);
1927 break;
1928
1929 case ISIS_PDU_PTP_IIH:
1930 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_PTP_HEADER_SIZE)) {
1931 printf(", bogus fixed header length %u should be %lu",
1932 isis_header->fixed_len, (unsigned long)ISIS_IIH_PTP_HEADER_SIZE);
1933 return (0);
1934 }
1935
1936 pdu_len=EXTRACT_16BITS(header_iih_ptp->pdu_len);
1937 if (packet_len>pdu_len) {
1938 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
1939 length=pdu_len;
1940 }
1941
1942 TCHECK(*header_iih_ptp);
1943 printf("\n\t source-id: %s, holding time: %us, Flags: [%s]",
1944 isis_print_id(header_iih_ptp->source_id,SYSTEM_ID_LEN),
1945 EXTRACT_16BITS(header_iih_ptp->holding_time),
1946 tok2str(isis_iih_circuit_type_values,
1947 "unknown circuit type 0x%02x",
1948 header_iih_ptp->circuit_type));
1949
1950 printf("\n\t circuit-id: 0x%02x, PDU length: %u",
1951 header_iih_ptp->circuit_id,
1952 pdu_len);
1953
1954 if (vflag > 1) {
1955 if(!print_unknown_data(pptr,"\n\t ",ISIS_IIH_PTP_HEADER_SIZE))
1956 return(0);
1957 }
1958
1959 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_PTP_HEADER_SIZE);
1960 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_PTP_HEADER_SIZE);
1961 break;
1962
1963 case ISIS_PDU_L1_LSP:
1964 case ISIS_PDU_L2_LSP:
1965 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_LSP_HEADER_SIZE)) {
1966 printf(", bogus fixed header length %u should be %lu",
1967 isis_header->fixed_len, (unsigned long)ISIS_LSP_HEADER_SIZE);
1968 return (0);
1969 }
1970
1971 pdu_len=EXTRACT_16BITS(header_lsp->pdu_len);
1972 if (packet_len>pdu_len) {
1973 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
1974 length=pdu_len;
1975 }
1976
1977 TCHECK(*header_lsp);
1978 printf("\n\t lsp-id: %s, seq: 0x%08x, lifetime: %5us\n\t chksum: 0x%04x",
1979 isis_print_id(header_lsp->lsp_id, LSP_ID_LEN),
1980 EXTRACT_32BITS(header_lsp->sequence_number),
1981 EXTRACT_16BITS(header_lsp->remaining_lifetime),
1982 EXTRACT_16BITS(header_lsp->checksum));
1983
1984 /* if this is a purge do not attempt to verify the checksum */
1985 if ( EXTRACT_16BITS(header_lsp->remaining_lifetime) == 0 &&
1986 EXTRACT_16BITS(header_lsp->checksum) == 0)
1987 printf(" (purged)");
1988 else
1989 /* verify the checksum -
1990 * checking starts at the lsp-id field at byte position [12]
1991 * hence the length needs to be reduced by 12 bytes */
1992 printf(" (%s)", (osi_cksum((u_int8_t *)header_lsp->lsp_id, length-12)) ? "incorrect" : "correct");
1993
1994 printf(", PDU length: %u, Flags: [ %s",
1995 pdu_len,
1996 ISIS_MASK_LSP_OL_BIT(header_lsp->typeblock) ? "Overload bit set, " : "");
1997
1998 if (ISIS_MASK_LSP_ATT_BITS(header_lsp->typeblock)) {
1999 printf("%s", ISIS_MASK_LSP_ATT_DEFAULT_BIT(header_lsp->typeblock) ? "default " : "");
2000 printf("%s", ISIS_MASK_LSP_ATT_DELAY_BIT(header_lsp->typeblock) ? "delay " : "");
2001 printf("%s", ISIS_MASK_LSP_ATT_EXPENSE_BIT(header_lsp->typeblock) ? "expense " : "");
2002 printf("%s", ISIS_MASK_LSP_ATT_ERROR_BIT(header_lsp->typeblock) ? "error " : "");
2003 printf("ATT bit set, ");
2004 }
2005 printf("%s", ISIS_MASK_LSP_PARTITION_BIT(header_lsp->typeblock) ? "P bit set, " : "");
2006 printf("%s ]", tok2str(isis_lsp_istype_values,"Unknown(0x%x)",ISIS_MASK_LSP_ISTYPE_BITS(header_lsp->typeblock)));
2007
2008 if (vflag > 1) {
2009 if(!print_unknown_data(pptr,"\n\t ",ISIS_LSP_HEADER_SIZE))
2010 return(0);
2011 }
2012
2013 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_LSP_HEADER_SIZE);
2014 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_LSP_HEADER_SIZE);
2015 break;
2016
2017 case ISIS_PDU_L1_CSNP:
2018 case ISIS_PDU_L2_CSNP:
2019 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_CSNP_HEADER_SIZE)) {
2020 printf(", bogus fixed header length %u should be %lu",
2021 isis_header->fixed_len, (unsigned long)ISIS_CSNP_HEADER_SIZE);
2022 return (0);
2023 }
2024
2025 pdu_len=EXTRACT_16BITS(header_csnp->pdu_len);
2026 if (packet_len>pdu_len) {
2027 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
2028 length=pdu_len;
2029 }
2030
2031 TCHECK(*header_csnp);
2032 printf("\n\t source-id: %s, PDU length: %u",
2033 isis_print_id(header_csnp->source_id, NODE_ID_LEN),
2034 pdu_len);
2035 printf("\n\t start lsp-id: %s",
2036 isis_print_id(header_csnp->start_lsp_id, LSP_ID_LEN));
2037 printf("\n\t end lsp-id: %s",
2038 isis_print_id(header_csnp->end_lsp_id, LSP_ID_LEN));
2039
2040 if (vflag > 1) {
2041 if(!print_unknown_data(pptr,"\n\t ",ISIS_CSNP_HEADER_SIZE))
2042 return(0);
2043 }
2044
2045 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_CSNP_HEADER_SIZE);
2046 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_CSNP_HEADER_SIZE);
2047 break;
2048
2049 case ISIS_PDU_L1_PSNP:
2050 case ISIS_PDU_L2_PSNP:
2051 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_PSNP_HEADER_SIZE)) {
2052 printf("- bogus fixed header length %u should be %lu",
2053 isis_header->fixed_len, (unsigned long)ISIS_PSNP_HEADER_SIZE);
2054 return (0);
2055 }
2056
2057 pdu_len=EXTRACT_16BITS(header_psnp->pdu_len);
2058 if (packet_len>pdu_len) {
2059 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
2060 length=pdu_len;
2061 }
2062
2063 TCHECK(*header_psnp);
2064 printf("\n\t source-id: %s, PDU length: %u",
2065 isis_print_id(header_psnp->source_id, NODE_ID_LEN),
2066 pdu_len);
2067
2068 if (vflag > 1) {
2069 if(!print_unknown_data(pptr,"\n\t ",ISIS_PSNP_HEADER_SIZE))
2070 return(0);
2071 }
2072
2073 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_PSNP_HEADER_SIZE);
2074 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_PSNP_HEADER_SIZE);
2075 break;
2076
2077 default:
2078 if(!print_unknown_data(pptr,"\n\t ",length))
2079 return(0);
2080 return (0);
2081 }
2082
2083 /*
2084 * Now print the TLV's.
2085 */
2086
2087 while (packet_len >= 2) {
2088 if (pptr == snapend) {
2089 return (1);
2090 }
2091
2092 if (!TTEST2(*pptr, 2)) {
2093 printf("\n\t\t packet exceeded snapshot (%ld) bytes",
2094 (long)(pptr-snapend));
2095 return (1);
2096 }
2097 tlv_type = *pptr++;
2098 tlv_len = *pptr++;
2099 tmp =tlv_len; /* copy temporary len & pointer to packet data */
2100 tptr = pptr;
2101 packet_len -= 2;
2102 if (tlv_len > packet_len) {
2103 break;
2104 }
2105
2106 /* first lets see if we know the TLVs name*/
2107 printf("\n\t %s TLV #%u, length: %u",
2108 tok2str(isis_tlv_values,
2109 "unknown",
2110 tlv_type),
2111 tlv_type,
2112 tlv_len);
2113
2114 if (tlv_len == 0) /* something is malformed */
2115 break;
2116
2117 /* now check if we have a decoder otherwise do a hexdump at the end*/
2118 switch (tlv_type) {
2119 case ISIS_TLV_AREA_ADDR:
2120 if (!TTEST2(*tptr, 1))
2121 goto trunctlv;
2122 alen = *tptr++;
2123 while (tmp && alen < tmp) {
2124 printf("\n\t Area address (length: %u): %s",
2125 alen,
2126 isonsap_string(tptr,alen));
2127 tptr += alen;
2128 tmp -= alen + 1;
2129 if (tmp==0) /* if this is the last area address do not attemt a boundary check */
2130 break;
2131 if (!TTEST2(*tptr, 1))
2132 goto trunctlv;
2133 alen = *tptr++;
2134 }
2135 break;
2136 case ISIS_TLV_ISNEIGH:
2137 while (tmp >= ETHER_ADDR_LEN) {
2138 if (!TTEST2(*tptr, ETHER_ADDR_LEN))
2139 goto trunctlv;
2140 printf("\n\t SNPA: %s",isis_print_id(tptr,ETHER_ADDR_LEN));
2141 tmp -= ETHER_ADDR_LEN;
2142 tptr += ETHER_ADDR_LEN;
2143 }
2144 break;
2145
2146 case ISIS_TLV_ISNEIGH_VARLEN:
2147 if (!TTEST2(*tptr, 1) || tmp < 3) /* min. TLV length */
2148 goto trunctlv;
2149 lan_alen = *tptr++; /* LAN address length */
2150 if (lan_alen == 0) {
2151 printf("\n\t LAN address length 0 bytes (invalid)");
2152 break;
2153 }
2154 tmp --;
2155 printf("\n\t LAN address length %u bytes ",lan_alen);
2156 while (tmp >= lan_alen) {
2157 if (!TTEST2(*tptr, lan_alen))
2158 goto trunctlv;
2159 printf("\n\t\tIS Neighbor: %s",isis_print_id(tptr,lan_alen));
2160 tmp -= lan_alen;
2161 tptr +=lan_alen;
2162 }
2163 break;
2164
2165 case ISIS_TLV_PADDING:
2166 break;
2167
2168 case ISIS_TLV_MT_IS_REACH:
2169 while (tmp >= 2+NODE_ID_LEN+3+1) {
2170 mt_len = isis_print_mtid(tptr, "\n\t ");
2171 if (mt_len == 0) /* did something go wrong ? */
2172 goto trunctlv;
2173 tptr+=mt_len;
2174 tmp-=mt_len;
2175
2176 ext_is_len = isis_print_ext_is_reach(tptr,"\n\t ",tlv_type);
2177 if (ext_is_len == 0) /* did something go wrong ? */
2178 goto trunctlv;
2179
2180 tmp-=ext_is_len;
2181 tptr+=ext_is_len;
2182 }
2183 break;
2184
2185 case ISIS_TLV_IS_ALIAS_ID:
2186 while (tmp >= NODE_ID_LEN+1) { /* is it worth attempting a decode ? */
2187 ext_is_len = isis_print_ext_is_reach(tptr,"\n\t ",tlv_type);
2188 if (ext_is_len == 0) /* did something go wrong ? */
2189 goto trunctlv;
2190 tmp-=ext_is_len;
2191 tptr+=ext_is_len;
2192 }
2193 break;
2194
2195 case ISIS_TLV_EXT_IS_REACH:
2196 while (tmp >= NODE_ID_LEN+3+1) { /* is it worth attempting a decode ? */
2197 ext_is_len = isis_print_ext_is_reach(tptr,"\n\t ",tlv_type);
2198 if (ext_is_len == 0) /* did something go wrong ? */
2199 goto trunctlv;
2200 tmp-=ext_is_len;
2201 tptr+=ext_is_len;
2202 }
2203 break;
2204 case ISIS_TLV_IS_REACH:
2205 if (!TTEST2(*tptr,1)) /* check if there is one byte left to read out the virtual flag */
2206 goto trunctlv;
2207 printf("\n\t %s",
2208 tok2str(isis_is_reach_virtual_values,
2209 "bogus virtual flag 0x%02x",
2210 *tptr++));
2211 tlv_is_reach = (const struct isis_tlv_is_reach *)tptr;
2212 while (tmp >= sizeof(struct isis_tlv_is_reach)) {
2213 if (!TTEST(*tlv_is_reach))
2214 goto trunctlv;
2215 printf("\n\t IS Neighbor: %s",
2216 isis_print_id(tlv_is_reach->neighbor_nodeid, NODE_ID_LEN));
2217 isis_print_metric_block(&tlv_is_reach->isis_metric_block);
2218 tmp -= sizeof(struct isis_tlv_is_reach);
2219 tlv_is_reach++;
2220 }
2221 break;
2222
2223 case ISIS_TLV_ESNEIGH:
2224 tlv_es_reach = (const struct isis_tlv_es_reach *)tptr;
2225 while (tmp >= sizeof(struct isis_tlv_es_reach)) {
2226 if (!TTEST(*tlv_es_reach))
2227 goto trunctlv;
2228 printf("\n\t ES Neighbor: %s",
2229 isis_print_id(tlv_es_reach->neighbor_sysid,SYSTEM_ID_LEN));
2230 isis_print_metric_block(&tlv_es_reach->isis_metric_block);
2231 tmp -= sizeof(struct isis_tlv_es_reach);
2232 tlv_es_reach++;
2233 }
2234 break;
2235
2236 /* those two TLVs share the same format */
2237 case ISIS_TLV_INT_IP_REACH:
2238 case ISIS_TLV_EXT_IP_REACH:
2239 if (!isis_print_tlv_ip_reach(pptr, "\n\t ", tlv_len))
2240 return (1);
2241 break;
2242
2243 case ISIS_TLV_EXTD_IP_REACH:
2244 while (tmp>0) {
2245 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", IPV4);
2246 if (ext_ip_len == 0) /* did something go wrong ? */
2247 goto trunctlv;
2248 tptr+=ext_ip_len;
2249 tmp-=ext_ip_len;
2250 }
2251 break;
2252
2253 case ISIS_TLV_MT_IP_REACH:
2254 while (tmp>0) {
2255 mt_len = isis_print_mtid(tptr, "\n\t ");
2256 if (mt_len == 0) /* did something go wrong ? */
2257 goto trunctlv;
2258 tptr+=mt_len;
2259 tmp-=mt_len;
2260
2261 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", IPV4);
2262 if (ext_ip_len == 0) /* did something go wrong ? */
2263 goto trunctlv;
2264 tptr+=ext_ip_len;
2265 tmp-=ext_ip_len;
2266 }
2267 break;
2268
2269 #ifdef INET6
2270 case ISIS_TLV_IP6_REACH:
2271 while (tmp>0) {
2272 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", IPV6);
2273 if (ext_ip_len == 0) /* did something go wrong ? */
2274 goto trunctlv;
2275 tptr+=ext_ip_len;
2276 tmp-=ext_ip_len;
2277 }
2278 break;
2279
2280 case ISIS_TLV_MT_IP6_REACH:
2281 while (tmp>0) {
2282 mt_len = isis_print_mtid(tptr, "\n\t ");
2283 if (mt_len == 0) /* did something go wrong ? */
2284 goto trunctlv;
2285 tptr+=mt_len;
2286 tmp-=mt_len;
2287
2288 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", IPV6);
2289 if (ext_ip_len == 0) /* did something go wrong ? */
2290 goto trunctlv;
2291 tptr+=ext_ip_len;
2292 tmp-=ext_ip_len;
2293 }
2294 break;
2295
2296 case ISIS_TLV_IP6ADDR:
2297 while (tmp>=sizeof(struct in6_addr)) {
2298 if (!TTEST2(*tptr, sizeof(struct in6_addr)))
2299 goto trunctlv;
2300
2301 printf("\n\t IPv6 interface address: %s",
2302 ip6addr_string(tptr));
2303
2304 tptr += sizeof(struct in6_addr);
2305 tmp -= sizeof(struct in6_addr);
2306 }
2307 break;
2308 #endif
2309 case ISIS_TLV_AUTH:
2310 if (!TTEST2(*tptr, 1))
2311 goto trunctlv;
2312
2313 printf("\n\t %s: ",
2314 tok2str(isis_subtlv_auth_values,
2315 "unknown Authentication type 0x%02x",
2316 *tptr));
2317
2318 switch (*tptr) {
2319 case ISIS_SUBTLV_AUTH_SIMPLE:
2320 for(i=1;i<tlv_len;i++) {
2321 if (!TTEST2(*(tptr+i), 1))
2322 goto trunctlv;
2323 printf("%c",*(tptr+i));
2324 }
2325 break;
2326 case ISIS_SUBTLV_AUTH_MD5:
2327 for(i=1;i<tlv_len;i++) {
2328 if (!TTEST2(*(tptr+i), 1))
2329 goto trunctlv;
2330 printf("%02x",*(tptr+i));
2331 }
2332 if (tlv_len != ISIS_SUBTLV_AUTH_MD5_LEN+1)
2333 printf(", (malformed subTLV) ");
2334 break;
2335 case ISIS_SUBTLV_AUTH_PRIVATE:
2336 default:
2337 if(!print_unknown_data(tptr+1,"\n\t\t ",tlv_len-1))
2338 return(0);
2339 break;
2340 }
2341 break;
2342
2343 case ISIS_TLV_PTP_ADJ:
2344 tlv_ptp_adj = (const struct isis_tlv_ptp_adj *)tptr;
2345 if(tmp>=1) {
2346 if (!TTEST2(*tptr, 1))
2347 goto trunctlv;
2348 printf("\n\t Adjacency State: %s (%u)",
2349 tok2str(isis_ptp_adjancey_values, "unknown", *tptr),
2350 *tptr);
2351 tmp--;
2352 }
2353 if(tmp>sizeof(tlv_ptp_adj->extd_local_circuit_id)) {
2354 if (!TTEST2(tlv_ptp_adj->extd_local_circuit_id,
2355 sizeof(tlv_ptp_adj->extd_local_circuit_id)))
2356 goto trunctlv;
2357 printf("\n\t Extended Local circuit-ID: 0x%08x",
2358 EXTRACT_32BITS(tlv_ptp_adj->extd_local_circuit_id));
2359 tmp-=sizeof(tlv_ptp_adj->extd_local_circuit_id);
2360 }
2361 if(tmp>=SYSTEM_ID_LEN) {
2362 if (!TTEST2(tlv_ptp_adj->neighbor_sysid, SYSTEM_ID_LEN))
2363 goto trunctlv;
2364 printf("\n\t Neighbor System-ID: %s",
2365 isis_print_id(tlv_ptp_adj->neighbor_sysid,SYSTEM_ID_LEN));
2366 tmp-=SYSTEM_ID_LEN;
2367 }
2368 if(tmp>=sizeof(tlv_ptp_adj->neighbor_extd_local_circuit_id)) {
2369 if (!TTEST2(tlv_ptp_adj->neighbor_extd_local_circuit_id,
2370 sizeof(tlv_ptp_adj->neighbor_extd_local_circuit_id)))
2371 goto trunctlv;
2372 printf("\n\t Neighbor Extended Local circuit-ID: 0x%08x",
2373 EXTRACT_32BITS(tlv_ptp_adj->neighbor_extd_local_circuit_id));
2374 }
2375 break;
2376
2377 case ISIS_TLV_PROTOCOLS:
2378 printf("\n\t NLPID(s): ");
2379 while (tmp>0) {
2380 if (!TTEST2(*(tptr), 1))
2381 goto trunctlv;
2382 printf("%s (0x%02x)",
2383 tok2str(nlpid_values,
2384 "unknown",
2385 *tptr),
2386 *tptr);
2387 if (tmp>1) /* further NPLIDs ? - put comma */
2388 printf(", ");
2389 tptr++;
2390 tmp--;
2391 }
2392 break;
2393
2394 case ISIS_TLV_TE_ROUTER_ID:
2395 if (!TTEST2(*pptr, sizeof(struct in_addr)))
2396 goto trunctlv;
2397 printf("\n\t Traffic Engineering Router ID: %s", ipaddr_string(pptr));
2398 break;
2399
2400 case ISIS_TLV_IPADDR:
2401 while (tmp>=sizeof(struct in_addr)) {
2402 if (!TTEST2(*tptr, sizeof(struct in_addr)))
2403 goto trunctlv;
2404 printf("\n\t IPv4 interface address: %s", ipaddr_string(tptr));
2405 tptr += sizeof(struct in_addr);
2406 tmp -= sizeof(struct in_addr);
2407 }
2408 break;
2409
2410 case ISIS_TLV_HOSTNAME:
2411 printf("\n\t Hostname: ");
2412 while (tmp>0) {
2413 if (!TTEST2(*tptr, 1))
2414 goto trunctlv;
2415 printf("%c",*tptr++);
2416 tmp--;
2417 }
2418 break;
2419
2420 case ISIS_TLV_SHARED_RISK_GROUP:
2421 if (tmp < NODE_ID_LEN)
2422 break;
2423 if (!TTEST2(*tptr, NODE_ID_LEN))
2424 goto trunctlv;
2425 printf("\n\t IS Neighbor: %s", isis_print_id(tptr, NODE_ID_LEN));
2426 tptr+=(NODE_ID_LEN);
2427 tmp-=(NODE_ID_LEN);
2428
2429 if (tmp < 1)
2430 break;
2431 if (!TTEST2(*tptr, 1))
2432 goto trunctlv;
2433 printf(", Flags: [%s]", ISIS_MASK_TLV_SHARED_RISK_GROUP(*tptr++) ? "numbered" : "unnumbered");
2434 tmp--;
2435
2436 if (tmp < sizeof(struct in_addr))
2437 break;
2438 if (!TTEST2(*tptr,sizeof(struct in_addr)))
2439 goto trunctlv;
2440 printf("\n\t IPv4 interface address: %s", ipaddr_string(tptr));
2441 tptr+=sizeof(struct in_addr);
2442 tmp-=sizeof(struct in_addr);
2443
2444 if (tmp < sizeof(struct in_addr))
2445 break;
2446 if (!TTEST2(*tptr,sizeof(struct in_addr)))
2447 goto trunctlv;
2448 printf("\n\t IPv4 neighbor address: %s", ipaddr_string(tptr));
2449 tptr+=sizeof(struct in_addr);
2450 tmp-=sizeof(struct in_addr);
2451
2452 while (tmp>=4) {
2453 if (!TTEST2(*tptr, 4))
2454 goto trunctlv;
2455 printf("\n\t Link-ID: 0x%08x", EXTRACT_32BITS(tptr));
2456 tptr+=4;
2457 tmp-=4;
2458 }
2459 break;
2460
2461 case ISIS_TLV_LSP:
2462 tlv_lsp = (const struct isis_tlv_lsp *)tptr;
2463 while(tmp>=sizeof(struct isis_tlv_lsp)) {
2464 if (!TTEST((tlv_lsp->lsp_id)[LSP_ID_LEN-1]))
2465 goto trunctlv;
2466 printf("\n\t lsp-id: %s",
2467 isis_print_id(tlv_lsp->lsp_id, LSP_ID_LEN));
2468 if (!TTEST2(tlv_lsp->sequence_number, 4))
2469 goto trunctlv;
2470 printf(", seq: 0x%08x",EXTRACT_32BITS(tlv_lsp->sequence_number));
2471 if (!TTEST2(tlv_lsp->remaining_lifetime, 2))
2472 goto trunctlv;
2473 printf(", lifetime: %5ds",EXTRACT_16BITS(tlv_lsp->remaining_lifetime));
2474 if (!TTEST2(tlv_lsp->checksum, 2))
2475 goto trunctlv;
2476 printf(", chksum: 0x%04x",EXTRACT_16BITS(tlv_lsp->checksum));
2477 tmp-=sizeof(struct isis_tlv_lsp);
2478 tlv_lsp++;
2479 }
2480 break;
2481
2482 case ISIS_TLV_CHECKSUM:
2483 if (tmp < ISIS_TLV_CHECKSUM_MINLEN)
2484 break;
2485 if (!TTEST2(*tptr, ISIS_TLV_CHECKSUM_MINLEN))
2486 goto trunctlv;
2487 printf("\n\t checksum: 0x%04x ", EXTRACT_16BITS(tptr));
2488 /* do not attempt to verify the checksum if it is zero
2489 * most likely a HMAC-MD5 TLV is also present and
2490 * to avoid conflicts the checksum TLV is zeroed.
2491 * see rfc3358 for details
2492 */
2493 if (EXTRACT_16BITS(tptr) == 0)
2494 printf("(unverified)");
2495 else printf("(%s)", osi_cksum(optr, length) ? "incorrect" : "correct");
2496 break;
2497
2498 case ISIS_TLV_MT_SUPPORTED:
2499 if (tmp < ISIS_TLV_MT_SUPPORTED_MINLEN)
2500 break;
2501 while (tmp>1) {
2502 /* length can only be a multiple of 2, otherwise there is
2503 something broken -> so decode down until length is 1 */
2504 if (tmp!=1) {
2505 mt_len = isis_print_mtid(tptr, "\n\t ");
2506 if (mt_len == 0) /* did something go wrong ? */
2507 goto trunctlv;
2508 tptr+=mt_len;
2509 tmp-=mt_len;
2510 } else {
2511 printf("\n\t malformed MT-ID");
2512 break;
2513 }
2514 }
2515 break;
2516
2517 case ISIS_TLV_RESTART_SIGNALING:
2518 /* first attempt to decode the flags */
2519 if (tmp < ISIS_TLV_RESTART_SIGNALING_FLAGLEN)
2520 break;
2521 if (!TTEST2(*tptr, ISIS_TLV_RESTART_SIGNALING_FLAGLEN))
2522 goto trunctlv;
2523 printf("\n\t Flags [%s]",
2524 bittok2str(isis_restart_flag_values, "none", *tptr));
2525 tptr+=ISIS_TLV_RESTART_SIGNALING_FLAGLEN;
2526 tmp-=ISIS_TLV_RESTART_SIGNALING_FLAGLEN;
2527
2528 /* is there anything other than the flags field? */
2529 if (tmp == 0)
2530 break;
2531
2532 if (tmp < ISIS_TLV_RESTART_SIGNALING_HOLDTIMELEN)
2533 break;
2534 if (!TTEST2(*tptr, ISIS_TLV_RESTART_SIGNALING_HOLDTIMELEN))
2535 goto trunctlv;
2536
2537 printf(", Remaining holding time %us", EXTRACT_16BITS(tptr+1));
2538 tptr+=ISIS_TLV_RESTART_SIGNALING_HOLDTIMELEN;
2539 tmp-=ISIS_TLV_RESTART_SIGNALING_HOLDTIMELEN;
2540
2541 /* is there an additional sysid field present ?*/
2542 if (tmp == SYSTEM_ID_LEN) {
2543 if (!TTEST2(*tptr, SYSTEM_ID_LEN))
2544 goto trunctlv;
2545 printf(", for %s",isis_print_id(tptr,SYSTEM_ID_LEN));
2546 }
2547 break;
2548
2549 case ISIS_TLV_IDRP_INFO:
2550 if (tmp < ISIS_TLV_IDRP_INFO_MINLEN)
2551 break;
2552 if (!TTEST2(*tptr, ISIS_TLV_IDRP_INFO_MINLEN))
2553 goto trunctlv;
2554 printf("\n\t Inter-Domain Information Type: %s",
2555 tok2str(isis_subtlv_idrp_values,
2556 "Unknown (0x%02x)",
2557 *tptr));
2558 switch (*tptr++) {
2559 case ISIS_SUBTLV_IDRP_ASN:
2560 if (!TTEST2(*tptr, 2)) /* fetch AS number */
2561 goto trunctlv;
2562 printf("AS Number: %u",EXTRACT_16BITS(tptr));
2563 break;
2564 case ISIS_SUBTLV_IDRP_LOCAL:
2565 case ISIS_SUBTLV_IDRP_RES:
2566 default:
2567 if(!print_unknown_data(tptr,"\n\t ",tlv_len-1))
2568 return(0);
2569 break;
2570 }
2571 break;
2572
2573 case ISIS_TLV_LSP_BUFFERSIZE:
2574 if (tmp < ISIS_TLV_LSP_BUFFERSIZE_MINLEN)
2575 break;
2576 if (!TTEST2(*tptr, ISIS_TLV_LSP_BUFFERSIZE_MINLEN))
2577 goto trunctlv;
2578 printf("\n\t LSP Buffersize: %u",EXTRACT_16BITS(tptr));
2579 break;
2580
2581 case ISIS_TLV_PART_DIS:
2582 while (tmp >= SYSTEM_ID_LEN) {
2583 if (!TTEST2(*tptr, SYSTEM_ID_LEN))
2584 goto trunctlv;
2585 printf("\n\t %s",isis_print_id(tptr,SYSTEM_ID_LEN));
2586 tptr+=SYSTEM_ID_LEN;
2587 tmp-=SYSTEM_ID_LEN;
2588 }
2589 break;
2590
2591 case ISIS_TLV_PREFIX_NEIGH:
2592 if (tmp < sizeof(struct isis_metric_block))
2593 break;
2594 if (!TTEST2(*tptr, sizeof(struct isis_metric_block)))
2595 goto trunctlv;
2596 printf("\n\t Metric Block");
2597 isis_print_metric_block((const struct isis_metric_block *)tptr);
2598 tptr+=sizeof(struct isis_metric_block);
2599 tmp-=sizeof(struct isis_metric_block);
2600
2601 while(tmp>0) {
2602 if (!TTEST2(*tptr, 1))
2603 goto trunctlv;
2604 prefix_len=*tptr++; /* read out prefix length in semioctets*/
2605 if (prefix_len < 2) {
2606 printf("\n\t\tAddress: prefix length %u < 2", prefix_len);
2607 break;
2608 }
2609 tmp--;
2610 if (tmp < prefix_len/2)
2611 break;
2612 if (!TTEST2(*tptr, prefix_len/2))
2613 goto trunctlv;
2614 printf("\n\t\tAddress: %s/%u",
2615 isonsap_string(tptr,prefix_len/2),
2616 prefix_len*4);
2617 tptr+=prefix_len/2;
2618 tmp-=prefix_len/2;
2619 }
2620 break;
2621
2622 case ISIS_TLV_IIH_SEQNR:
2623 if (tmp < ISIS_TLV_IIH_SEQNR_MINLEN)
2624 break;
2625 if (!TTEST2(*tptr, ISIS_TLV_IIH_SEQNR_MINLEN)) /* check if four bytes are on the wire */
2626 goto trunctlv;
2627 printf("\n\t Sequence number: %u", EXTRACT_32BITS(tptr) );
2628 break;
2629
2630 case ISIS_TLV_VENDOR_PRIVATE:
2631 if (tmp < ISIS_TLV_VENDOR_PRIVATE_MINLEN)
2632 break;
2633 if (!TTEST2(*tptr, ISIS_TLV_VENDOR_PRIVATE_MINLEN)) /* check if enough byte for a full oui */
2634 goto trunctlv;
2635 vendor_id = EXTRACT_24BITS(tptr);
2636 printf("\n\t Vendor: %s (%u)",
2637 tok2str(oui_values,"Unknown",vendor_id),
2638 vendor_id);
2639 tptr+=3;
2640 tmp-=3;
2641 if (tmp > 0) /* hexdump the rest */
2642 if(!print_unknown_data(tptr,"\n\t\t",tmp))
2643 return(0);
2644 break;
2645 /*
2646 * FIXME those are the defined TLVs that lack a decoder
2647 * you are welcome to contribute code ;-)
2648 */
2649
2650 case ISIS_TLV_DECNET_PHASE4:
2651 case ISIS_TLV_LUCENT_PRIVATE:
2652 case ISIS_TLV_IPAUTH:
2653 case ISIS_TLV_NORTEL_PRIVATE1:
2654 case ISIS_TLV_NORTEL_PRIVATE2:
2655
2656 default:
2657 if (vflag <= 1) {
2658 if(!print_unknown_data(pptr,"\n\t\t",tlv_len))
2659 return(0);
2660 }
2661 break;
2662 }
2663 /* do we want to see an additionally hexdump ? */
2664 if (vflag> 1) {
2665 if(!print_unknown_data(pptr,"\n\t ",tlv_len))
2666 return(0);
2667 }
2668
2669 pptr += tlv_len;
2670 packet_len -= tlv_len;
2671 }
2672
2673 if (packet_len != 0) {
2674 printf("\n\t %u straggler bytes", packet_len);
2675 }
2676 return (1);
2677
2678 trunc:
2679 fputs("[|isis]", stdout);
2680 return (1);
2681
2682 trunctlv:
2683 printf("\n\t\t packet exceeded snapshot");
2684 return(1);
2685 }
2686
2687 /*
2688 * Verify the checksum. See 8473-1, Appendix C, section C.4.
2689 */
2690
2691 static int
2692 osi_cksum(const u_int8_t *tptr, u_int len)
2693 {
2694 int32_t c0 = 0, c1 = 0;
2695
2696 while ((int)--len >= 0) {
2697 c0 += *tptr++;
2698 c0 %= 255;
2699 c1 += c0;
2700 c1 %= 255;
2701 }
2702 return (c0 | c1);
2703 }
2704
2705
2706 /*
2707 * Local Variables:
2708 * c-style: whitesmith
2709 * c-basic-offset: 8
2710 * End:
2711 */
[mirror] the TCPdump network dissector