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