?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
locate(1): Bring in some updates/fixes from FreeBSD
[dragonfly.git] / contrib / tcpdump / print-isoclns.c
blob57637055377b2c6c9c60f67e1b0ff076d08fee8e
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 if (caplen <= 1) { /* enough bytes on the wire ? */
622 printf("|OSI");
623 return;
624 }
625
626 if (eflag)
627 printf("OSI NLPID %s (0x%02x): ",
628 tok2str(nlpid_values,"Unknown",*p),
629 *p);
630
631 switch (*p) {
632
633 case NLPID_CLNP:
634 if (!clnp_print(p, length))
635 print_unknown_data(p,"\n\t",caplen);
636 break;
637
638 case NLPID_ESIS:
639 esis_print(p, length);
640 return;
641
642 case NLPID_ISIS:
643 if (!isis_print(p, length))
644 print_unknown_data(p,"\n\t",caplen);
645 break;
646
647 case NLPID_NULLNS:
648 (void)printf("%slength: %u",
649 eflag ? "" : ", ",
650 length);
651 break;
652
653 case NLPID_Q933:
654 q933_print(p+1, length-1);
655 break;
656
657 case NLPID_IP:
658 ip_print(gndo, p+1, length-1);
659 break;
660
661 #ifdef INET6
662 case NLPID_IP6:
663 ip6_print(gndo, p+1, length-1);
664 break;
665 #endif
666
667 case NLPID_PPP:
668 ppp_print(p+1, length-1);
669 break;
670
671 default:
672 if (!eflag)
673 printf("OSI NLPID 0x%02x unknown",*p);
674 (void)printf("%slength: %u",
675 eflag ? "" : ", ",
676 length);
677 if (caplen > 1)
678 print_unknown_data(p,"\n\t",caplen);
679 break;
680 }
681 }
682
683 #define CLNP_PDU_ER 1
684 #define CLNP_PDU_DT 28
685 #define CLNP_PDU_MD 29
686 #define CLNP_PDU_ERQ 30
687 #define CLNP_PDU_ERP 31
688
689 static struct tok clnp_pdu_values[] = {
690 { CLNP_PDU_ER, "Error Report"},
691 { CLNP_PDU_MD, "MD"},
692 { CLNP_PDU_DT, "Data"},
693 { CLNP_PDU_ERQ, "Echo Request"},
694 { CLNP_PDU_ERP, "Echo Response"},
695 { 0, NULL }
696 };
697
698 struct clnp_header_t {
699 u_int8_t nlpid;
700 u_int8_t length_indicator;
701 u_int8_t version;
702 u_int8_t lifetime; /* units of 500ms */
703 u_int8_t type;
704 u_int8_t segment_length[2];
705 u_int8_t cksum[2];
706 };
707
708 struct clnp_segment_header_t {
709 u_int8_t data_unit_id[2];
710 u_int8_t segment_offset[2];
711 u_int8_t total_length[2];
712 };
713
714 /*
715 * clnp_print
716 * Decode CLNP packets. Return 0 on error.
717 */
718
719 static int clnp_print (const u_int8_t *pptr, u_int length)
720 {
721 const u_int8_t *optr,*source_address,*dest_address;
722 u_int li,tlen,nsap_offset,source_address_length,dest_address_length, clnp_pdu_type, clnp_flags;
723 const struct clnp_header_t *clnp_header;
724 const struct clnp_segment_header_t *clnp_segment_header;
725 u_int8_t rfd_error_major,rfd_error_minor;
726
727 clnp_header = (const struct clnp_header_t *) pptr;
728 TCHECK(*clnp_header);
729
730 li = clnp_header->length_indicator;
731 optr = pptr;
732
733 if (!eflag)
734 printf("CLNP");
735
736 /*
737 * Sanity checking of the header.
738 */
739
740 if (clnp_header->version != CLNP_VERSION) {
741 printf("version %d packet not supported", clnp_header->version);
742 return (0);
743 }
744
745 /* FIXME further header sanity checking */
746
747 clnp_pdu_type = clnp_header->type & CLNP_PDU_TYPE_MASK;
748 clnp_flags = clnp_header->type & CLNP_FLAG_MASK;
749
750 pptr += sizeof(struct clnp_header_t);
751 li -= sizeof(struct clnp_header_t);
752 dest_address_length = *pptr;
753 dest_address = pptr + 1;
754
755 pptr += (1 + dest_address_length);
756 li -= (1 + dest_address_length);
757 source_address_length = *pptr;
758 source_address = pptr +1;
759
760 pptr += (1 + source_address_length);
761 li -= (1 + source_address_length);
762
763 if (vflag < 1) {
764 printf("%s%s > %s, %s, length %u",
765 eflag ? "" : ", ",
766 isonsap_string(source_address, source_address_length),
767 isonsap_string(dest_address, dest_address_length),
768 tok2str(clnp_pdu_values,"unknown (%u)",clnp_pdu_type),
769 length);
770 return (1);
771 }
772 printf("%slength %u",eflag ? "" : ", ",length);
773
774 printf("\n\t%s PDU, hlen: %u, v: %u, lifetime: %u.%us, Segment PDU length: %u, checksum: 0x%04x",
775 tok2str(clnp_pdu_values, "unknown (%u)",clnp_pdu_type),
776 clnp_header->length_indicator,
777 clnp_header->version,
778 clnp_header->lifetime/2,
779 (clnp_header->lifetime%2)*5,
780 EXTRACT_16BITS(clnp_header->segment_length),
781 EXTRACT_16BITS(clnp_header->cksum));
782
783 osi_print_cksum(optr, EXTRACT_16BITS(clnp_header->cksum), 7,
784 clnp_header->length_indicator);
785
786 printf("\n\tFlags [%s]",
787 bittok2str(clnp_flag_values,"none",clnp_flags));
788
789 printf("\n\tsource address (length %u): %s\n\tdest address (length %u): %s",
790 source_address_length,
791 isonsap_string(source_address, source_address_length),
792 dest_address_length,
793 isonsap_string(dest_address,dest_address_length));
794
795 if (clnp_flags & CLNP_SEGMENT_PART) {
796 clnp_segment_header = (const struct clnp_segment_header_t *) pptr;
797 TCHECK(*clnp_segment_header);
798 printf("\n\tData Unit ID: 0x%04x, Segment Offset: %u, Total PDU Length: %u",
799 EXTRACT_16BITS(clnp_segment_header->data_unit_id),
800 EXTRACT_16BITS(clnp_segment_header->segment_offset),
801 EXTRACT_16BITS(clnp_segment_header->total_length));
802 pptr+=sizeof(const struct clnp_segment_header_t);
803 li-=sizeof(const struct clnp_segment_header_t);
804 }
805
806 /* now walk the options */
807 while (li >= 2) {
808 u_int op, opli;
809 const u_int8_t *tptr;
810
811 TCHECK2(*pptr, 2);
812 if (li < 2) {
813 printf(", bad opts/li");
814 return (0);
815 }
816 op = *pptr++;
817 opli = *pptr++;
818 li -= 2;
819 TCHECK2(*pptr, opli);
820 if (opli > li) {
821 printf(", opt (%d) too long", op);
822 return (0);
823 }
824 li -= opli;
825 tptr = pptr;
826 tlen = opli;
827
828 printf("\n\t %s Option #%u, length %u, value: ",
829 tok2str(clnp_option_values,"Unknown",op),
830 op,
831 opli);
832
833 switch (op) {
834
835
836 case CLNP_OPTION_ROUTE_RECORDING: /* those two options share the format */
837 case CLNP_OPTION_SOURCE_ROUTING:
838 printf("%s %s",
839 tok2str(clnp_option_sr_rr_values,"Unknown",*tptr),
840 tok2str(clnp_option_sr_rr_string_values,"Unknown Option %u",op));
841 nsap_offset=*(tptr+1);
842 if (nsap_offset == 0) {
843 printf(" Bad NSAP offset (0)");
844 break;
845 }
846 nsap_offset-=1; /* offset to nsap list */
847 if (nsap_offset > tlen) {
848 printf(" Bad NSAP offset (past end of option)");
849 break;
850 }
851 tptr+=nsap_offset;
852 tlen-=nsap_offset;
853 while (tlen > 0) {
854 source_address_length=*tptr;
855 if (tlen < source_address_length+1) {
856 printf("\n\t NSAP address goes past end of option");
857 break;
858 }
859 if (source_address_length > 0) {
860 source_address=(tptr+1);
861 TCHECK2(*source_address, source_address_length);
862 printf("\n\t NSAP address (length %u): %s",
863 source_address_length,
864 isonsap_string(source_address, source_address_length));
865 }
866 tlen-=source_address_length+1;
867 }
868 break;
869
870 case CLNP_OPTION_PRIORITY:
871 printf("0x%1x", *tptr&0x0f);
872 break;
873
874 case CLNP_OPTION_QOS_MAINTENANCE:
875 printf("\n\t Format Code: %s",
876 tok2str(clnp_option_scope_values,"Reserved",*tptr&CLNP_OPTION_SCOPE_MASK));
877
878 if ((*tptr&CLNP_OPTION_SCOPE_MASK) == CLNP_OPTION_SCOPE_GLOBAL)
879 printf("\n\t QoS Flags [%s]",
880 bittok2str(clnp_option_qos_global_values,
881 "none",
882 *tptr&CLNP_OPTION_OPTION_QOS_MASK));
883 break;
884
885 case CLNP_OPTION_SECURITY:
886 printf("\n\t Format Code: %s, Security-Level %u",
887 tok2str(clnp_option_scope_values,"Reserved",*tptr&CLNP_OPTION_SCOPE_MASK),
888 *(tptr+1));
889 break;
890
891 case CLNP_OPTION_DISCARD_REASON:
892 rfd_error_major = (*tptr&0xf0) >> 4;
893 rfd_error_minor = *tptr&0x0f;
894 printf("\n\t Class: %s Error (0x%01x), %s (0x%01x)",
895 tok2str(clnp_option_rfd_class_values,"Unknown",rfd_error_major),
896 rfd_error_major,
897 tok2str(clnp_option_rfd_error_class[rfd_error_major],"Unknown",rfd_error_minor),
898 rfd_error_minor);
899 break;
900
901 case CLNP_OPTION_PADDING:
902 printf("padding data");
903 break;
904
905 /*
906 * FIXME those are the defined Options that lack a decoder
907 * you are welcome to contribute code ;-)
908 */
909
910 default:
911 print_unknown_data(tptr,"\n\t ",opli);
912 break;
913 }
914 if (vflag > 1)
915 print_unknown_data(pptr,"\n\t ",opli);
916 pptr += opli;
917 }
918
919 switch (clnp_pdu_type) {
920
921 case CLNP_PDU_ER: /* fall through */
922 case CLNP_PDU_ERP:
923 TCHECK(*pptr);
924 if (*(pptr) == NLPID_CLNP) {
925 printf("\n\t-----original packet-----\n\t");
926 /* FIXME recursion protection */
927 clnp_print(pptr, length-clnp_header->length_indicator);
928 break;
929 }
930
931 case CLNP_PDU_DT:
932 case CLNP_PDU_MD:
933 case CLNP_PDU_ERQ:
934
935 default:
936 /* dump the PDU specific data */
937 if (length-(pptr-optr) > 0) {
938 printf("\n\t undecoded non-header data, length %u",length-clnp_header->length_indicator);
939 print_unknown_data(pptr,"\n\t ",length-(pptr-optr));
940 }
941 }
942
943 return (1);
944
945 trunc:
946 fputs("[|clnp]", stdout);
947 return (1);
948
949 }
950
951
952 #define ESIS_PDU_REDIRECT 6
953 #define ESIS_PDU_ESH 2
954 #define ESIS_PDU_ISH 4
955
956 static struct tok esis_pdu_values[] = {
957 { ESIS_PDU_REDIRECT, "redirect"},
958 { ESIS_PDU_ESH, "ESH"},
959 { ESIS_PDU_ISH, "ISH"},
960 { 0, NULL }
961 };
962
963 struct esis_header_t {
964 u_int8_t nlpid;
965 u_int8_t length_indicator;
966 u_int8_t version;
967 u_int8_t reserved;
968 u_int8_t type;
969 u_int8_t holdtime[2];
970 u_int8_t cksum[2];
971 };
972
973 static void
974 esis_print(const u_int8_t *pptr, u_int length)
975 {
976 const u_int8_t *optr;
977 u_int li,esis_pdu_type,source_address_length, source_address_number;
978 const struct esis_header_t *esis_header;
979
980 if (!eflag)
981 printf("ES-IS");
982
983 if (length <= 2) {
984 if (qflag)
985 printf("bad pkt!");
986 else
987 printf("no header at all!");
988 return;
989 }
990
991 esis_header = (const struct esis_header_t *) pptr;
992 TCHECK(*esis_header);
993 li = esis_header->length_indicator;
994 optr = pptr;
995
996 /*
997 * Sanity checking of the header.
998 */
999
1000 if (esis_header->nlpid != NLPID_ESIS) {
1001 printf(" nlpid 0x%02x packet not supported", esis_header->nlpid);
1002 return;
1003 }
1004
1005 if (esis_header->version != ESIS_VERSION) {
1006 printf(" version %d packet not supported", esis_header->version);
1007 return;
1008 }
1009
1010 if (li > length) {
1011 printf(" length indicator(%d) > PDU size (%d)!", li, length);
1012 return;
1013 }
1014
1015 if (li < sizeof(struct esis_header_t) + 2) {
1016 printf(" length indicator < min PDU size %d:", li);
1017 while (--length != 0)
1018 printf("%02X", *pptr++);
1019 return;
1020 }
1021
1022 esis_pdu_type = esis_header->type & ESIS_PDU_TYPE_MASK;
1023
1024 if (vflag < 1) {
1025 printf("%s%s, length %u",
1026 eflag ? "" : ", ",
1027 tok2str(esis_pdu_values,"unknown type (%u)",esis_pdu_type),
1028 length);
1029 return;
1030 } else
1031 printf("%slength %u\n\t%s (%u)",
1032 eflag ? "" : ", ",
1033 length,
1034 tok2str(esis_pdu_values,"unknown type: %u", esis_pdu_type),
1035 esis_pdu_type);
1036
1037 printf(", v: %u%s", esis_header->version, esis_header->version == ESIS_VERSION ? "" : "unsupported" );
1038 printf(", checksum: 0x%04x", EXTRACT_16BITS(esis_header->cksum));
1039
1040 osi_print_cksum(pptr, EXTRACT_16BITS(esis_header->cksum), 7, li);
1041
1042 printf(", holding time: %us, length indicator: %u",EXTRACT_16BITS(esis_header->holdtime),li);
1043
1044 if (vflag > 1)
1045 print_unknown_data(optr,"\n\t",sizeof(struct esis_header_t));
1046
1047 pptr += sizeof(struct esis_header_t);
1048 li -= sizeof(struct esis_header_t);
1049
1050 switch (esis_pdu_type) {
1051 case ESIS_PDU_REDIRECT: {
1052 const u_int8_t *dst, *snpa, *neta;
1053 u_int dstl, snpal, netal;
1054
1055 TCHECK(*pptr);
1056 if (li < 1) {
1057 printf(", bad redirect/li");
1058 return;
1059 }
1060 dstl = *pptr;
1061 pptr++;
1062 li--;
1063 TCHECK2(*pptr, dstl);
1064 if (li < dstl) {
1065 printf(", bad redirect/li");
1066 return;
1067 }
1068 dst = pptr;
1069 pptr += dstl;
1070 li -= dstl;
1071 printf("\n\t %s", isonsap_string(dst,dstl));
1072
1073 TCHECK(*pptr);
1074 if (li < 1) {
1075 printf(", bad redirect/li");
1076 return;
1077 }
1078 snpal = *pptr;
1079 pptr++;
1080 li--;
1081 TCHECK2(*pptr, snpal);
1082 if (li < snpal) {
1083 printf(", bad redirect/li");
1084 return;
1085 }
1086 snpa = pptr;
1087 pptr += snpal;
1088 li -= snpal;
1089 TCHECK(*pptr);
1090 if (li < 1) {
1091 printf(", bad redirect/li");
1092 return;
1093 }
1094 netal = *pptr;
1095 pptr++;
1096 TCHECK2(*pptr, netal);
1097 if (li < netal) {
1098 printf(", bad redirect/li");
1099 return;
1100 }
1101 neta = pptr;
1102 pptr += netal;
1103 li -= netal;
1104
1105 if (netal == 0)
1106 printf("\n\t %s", etheraddr_string(snpa));
1107 else
1108 printf("\n\t %s", isonsap_string(neta,netal));
1109 break;
1110 }
1111
1112 case ESIS_PDU_ESH:
1113 TCHECK(*pptr);
1114 if (li < 1) {
1115 printf(", bad esh/li");
1116 return;
1117 }
1118 source_address_number = *pptr;
1119 pptr++;
1120 li--;
1121
1122 printf("\n\t Number of Source Addresses: %u", source_address_number);
1123
1124 while (source_address_number > 0) {
1125 TCHECK(*pptr);
1126 if (li < 1) {
1127 printf(", bad esh/li");
1128 return;
1129 }
1130 source_address_length = *pptr;
1131 pptr++;
1132 li--;
1133
1134 TCHECK2(*pptr, source_address_length);
1135 if (li < source_address_length) {
1136 printf(", bad esh/li");
1137 return;
1138 }
1139 printf("\n\t NET (length: %u): %s",
1140 source_address_length,
1141 isonsap_string(pptr,source_address_length));
1142 pptr += source_address_length;
1143 li -= source_address_length;
1144 source_address_number--;
1145 }
1146
1147 break;
1148
1149 case ESIS_PDU_ISH: {
1150 TCHECK(*pptr);
1151 if (li < 1) {
1152 printf(", bad ish/li");
1153 return;
1154 }
1155 source_address_length = *pptr;
1156 pptr++;
1157 li--;
1158 TCHECK2(*pptr, source_address_length);
1159 if (li < source_address_length) {
1160 printf(", bad ish/li");
1161 return;
1162 }
1163 printf("\n\t NET (length: %u): %s", source_address_length, isonsap_string(pptr, source_address_length));
1164 pptr += source_address_length;
1165 li -= source_address_length;
1166 break;
1167 }
1168
1169 default:
1170 if (vflag <= 1) {
1171 if (pptr < snapend)
1172 print_unknown_data(pptr,"\n\t ",snapend-pptr);
1173 }
1174 return;
1175 }
1176
1177 /* now walk the options */
1178 while (li != 0) {
1179 u_int op, opli;
1180 const u_int8_t *tptr;
1181
1182 if (li < 2) {
1183 printf(", bad opts/li");
1184 return;
1185 }
1186 TCHECK2(*pptr, 2);
1187 op = *pptr++;
1188 opli = *pptr++;
1189 li -= 2;
1190 if (opli > li) {
1191 printf(", opt (%d) too long", op);
1192 return;
1193 }
1194 li -= opli;
1195 tptr = pptr;
1196
1197 printf("\n\t %s Option #%u, length %u, value: ",
1198 tok2str(esis_option_values,"Unknown",op),
1199 op,
1200 opli);
1201
1202 switch (op) {
1203
1204 case ESIS_OPTION_ES_CONF_TIME:
1205 if (opli == 2) {
1206 TCHECK2(*pptr, 2);
1207 printf("%us", EXTRACT_16BITS(tptr));
1208 } else
1209 printf("(bad length)");
1210 break;
1211
1212 case ESIS_OPTION_PROTOCOLS:
1213 while (opli>0) {
1214 TCHECK(*pptr);
1215 printf("%s (0x%02x)",
1216 tok2str(nlpid_values,
1217 "unknown",
1218 *tptr),
1219 *tptr);
1220 if (opli>1) /* further NPLIDs ? - put comma */
1221 printf(", ");
1222 tptr++;
1223 opli--;
1224 }
1225 break;
1226
1227 /*
1228 * FIXME those are the defined Options that lack a decoder
1229 * you are welcome to contribute code ;-)
1230 */
1231
1232 case ESIS_OPTION_QOS_MAINTENANCE:
1233 case ESIS_OPTION_SECURITY:
1234 case ESIS_OPTION_PRIORITY:
1235 case ESIS_OPTION_ADDRESS_MASK:
1236 case ESIS_OPTION_SNPA_MASK:
1237
1238 default:
1239 print_unknown_data(tptr,"\n\t ",opli);
1240 break;
1241 }
1242 if (vflag > 1)
1243 print_unknown_data(pptr,"\n\t ",opli);
1244 pptr += opli;
1245 }
1246 trunc:
1247 return;
1248 }
1249
1250 /* shared routine for printing system, node and lsp-ids */
1251 static char *
1252 isis_print_id(const u_int8_t *cp, int id_len)
1253 {
1254 int i;
1255 static char id[sizeof("xxxx.xxxx.xxxx.yy-zz")];
1256 char *pos = id;
1257
1258 for (i = 1; i <= SYSTEM_ID_LEN; i++) {
1259 snprintf(pos, sizeof(id) - (pos - id), "%02x", *cp++);
1260 pos += strlen(pos);
1261 if (i == 2 || i == 4)
1262 *pos++ = '.';
1263 }
1264 if (id_len >= NODE_ID_LEN) {
1265 snprintf(pos, sizeof(id) - (pos - id), ".%02x", *cp++);
1266 pos += strlen(pos);
1267 }
1268 if (id_len == LSP_ID_LEN)
1269 snprintf(pos, sizeof(id) - (pos - id), "-%02x", *cp);
1270 return (id);
1271 }
1272
1273 /* print the 4-byte metric block which is common found in the old-style TLVs */
1274 static int
1275 isis_print_metric_block (const struct isis_metric_block *isis_metric_block)
1276 {
1277 printf(", Default Metric: %d, %s",
1278 ISIS_LSP_TLV_METRIC_VALUE(isis_metric_block->metric_default),
1279 ISIS_LSP_TLV_METRIC_IE(isis_metric_block->metric_default) ? "External" : "Internal");
1280 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(isis_metric_block->metric_delay))
1281 printf("\n\t\t Delay Metric: %d, %s",
1282 ISIS_LSP_TLV_METRIC_VALUE(isis_metric_block->metric_delay),
1283 ISIS_LSP_TLV_METRIC_IE(isis_metric_block->metric_delay) ? "External" : "Internal");
1284 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(isis_metric_block->metric_expense))
1285 printf("\n\t\t Expense Metric: %d, %s",
1286 ISIS_LSP_TLV_METRIC_VALUE(isis_metric_block->metric_expense),
1287 ISIS_LSP_TLV_METRIC_IE(isis_metric_block->metric_expense) ? "External" : "Internal");
1288 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(isis_metric_block->metric_error))
1289 printf("\n\t\t Error Metric: %d, %s",
1290 ISIS_LSP_TLV_METRIC_VALUE(isis_metric_block->metric_error),
1291 ISIS_LSP_TLV_METRIC_IE(isis_metric_block->metric_error) ? "External" : "Internal");
1292
1293 return(1); /* everything is ok */
1294 }
1295
1296 static int
1297 isis_print_tlv_ip_reach (const u_int8_t *cp, const char *ident, int length)
1298 {
1299 int prefix_len;
1300 const struct isis_tlv_ip_reach *tlv_ip_reach;
1301
1302 tlv_ip_reach = (const struct isis_tlv_ip_reach *)cp;
1303
1304 while (length > 0) {
1305 if ((size_t)length < sizeof(*tlv_ip_reach)) {
1306 printf("short IPv4 Reachability (%d vs %lu)",
1307 length,
1308 (unsigned long)sizeof(*tlv_ip_reach));
1309 return (0);
1310 }
1311
1312 if (!TTEST(*tlv_ip_reach))
1313 return (0);
1314
1315 prefix_len = mask2plen(EXTRACT_32BITS(tlv_ip_reach->mask));
1316
1317 if (prefix_len == -1)
1318 printf("%sIPv4 prefix: %s mask %s",
1319 ident,
1320 ipaddr_string((tlv_ip_reach->prefix)),
1321 ipaddr_string((tlv_ip_reach->mask)));
1322 else
1323 printf("%sIPv4 prefix: %15s/%u",
1324 ident,
1325 ipaddr_string((tlv_ip_reach->prefix)),
1326 prefix_len);
1327
1328 printf(", Distribution: %s, Metric: %u, %s",
1329 ISIS_LSP_TLV_METRIC_UPDOWN(tlv_ip_reach->isis_metric_block.metric_default) ? "down" : "up",
1330 ISIS_LSP_TLV_METRIC_VALUE(tlv_ip_reach->isis_metric_block.metric_default),
1331 ISIS_LSP_TLV_METRIC_IE(tlv_ip_reach->isis_metric_block.metric_default) ? "External" : "Internal");
1332
1333 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(tlv_ip_reach->isis_metric_block.metric_delay))
1334 printf("%s Delay Metric: %u, %s",
1335 ident,
1336 ISIS_LSP_TLV_METRIC_VALUE(tlv_ip_reach->isis_metric_block.metric_delay),
1337 ISIS_LSP_TLV_METRIC_IE(tlv_ip_reach->isis_metric_block.metric_delay) ? "External" : "Internal");
1338
1339 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(tlv_ip_reach->isis_metric_block.metric_expense))
1340 printf("%s Expense Metric: %u, %s",
1341 ident,
1342 ISIS_LSP_TLV_METRIC_VALUE(tlv_ip_reach->isis_metric_block.metric_expense),
1343 ISIS_LSP_TLV_METRIC_IE(tlv_ip_reach->isis_metric_block.metric_expense) ? "External" : "Internal");
1344
1345 if (!ISIS_LSP_TLV_METRIC_SUPPORTED(tlv_ip_reach->isis_metric_block.metric_error))
1346 printf("%s Error Metric: %u, %s",
1347 ident,
1348 ISIS_LSP_TLV_METRIC_VALUE(tlv_ip_reach->isis_metric_block.metric_error),
1349 ISIS_LSP_TLV_METRIC_IE(tlv_ip_reach->isis_metric_block.metric_error) ? "External" : "Internal");
1350
1351 length -= sizeof(struct isis_tlv_ip_reach);
1352 tlv_ip_reach++;
1353 }
1354 return (1);
1355 }
1356
1357 /*
1358 * this is the common IP-REACH subTLV decoder it is called
1359 * from various EXTD-IP REACH TLVs (135,235,236,237)
1360 */
1361
1362 static int
1363 isis_print_ip_reach_subtlv (const u_int8_t *tptr,int subt,int subl,const char *ident) {
1364
1365 /* first lets see if we know the subTLVs name*/
1366 printf("%s%s subTLV #%u, length: %u",
1367 ident,
1368 tok2str(isis_ext_ip_reach_subtlv_values,
1369 "unknown",
1370 subt),
1371 subt,
1372 subl);
1373
1374 if (!TTEST2(*tptr,subl))
1375 goto trunctlv;
1376
1377 switch(subt) {
1378 case ISIS_SUBTLV_EXTD_IP_REACH_MGMT_PREFIX_COLOR: /* fall through */
1379 case ISIS_SUBTLV_EXTD_IP_REACH_ADMIN_TAG32:
1380 while (subl >= 4) {
1381 printf(", 0x%08x (=%u)",
1382 EXTRACT_32BITS(tptr),
1383 EXTRACT_32BITS(tptr));
1384 tptr+=4;
1385 subl-=4;
1386 }
1387 break;
1388 case ISIS_SUBTLV_EXTD_IP_REACH_ADMIN_TAG64:
1389 while (subl >= 8) {
1390 printf(", 0x%08x%08x",
1391 EXTRACT_32BITS(tptr),
1392 EXTRACT_32BITS(tptr+4));
1393 tptr+=8;
1394 subl-=8;
1395 }
1396 break;
1397 default:
1398 if(!print_unknown_data(tptr,"\n\t\t ",
1399 subl))
1400 return(0);
1401 break;
1402 }
1403 return(1);
1404
1405 trunctlv:
1406 printf("%spacket exceeded snapshot",ident);
1407 return(0);
1408 }
1409
1410 /*
1411 * this is the common IS-REACH subTLV decoder it is called
1412 * from isis_print_ext_is_reach()
1413 */
1414
1415 static int
1416 isis_print_is_reach_subtlv (const u_int8_t *tptr,u_int subt,u_int subl,const char *ident) {
1417
1418 u_int te_class,priority_level,gmpls_switch_cap;
1419 union { /* int to float conversion buffer for several subTLVs */
1420 float f;
1421 u_int32_t i;
1422 } bw;
1423
1424 /* first lets see if we know the subTLVs name*/
1425 printf("%s%s subTLV #%u, length: %u",
1426 ident,
1427 tok2str(isis_ext_is_reach_subtlv_values,
1428 "unknown",
1429 subt),
1430 subt,
1431 subl);
1432
1433 if (!TTEST2(*tptr,subl))
1434 goto trunctlv;
1435
1436 switch(subt) {
1437 case ISIS_SUBTLV_EXT_IS_REACH_ADMIN_GROUP:
1438 case ISIS_SUBTLV_EXT_IS_REACH_LINK_LOCAL_REMOTE_ID:
1439 case ISIS_SUBTLV_EXT_IS_REACH_LINK_REMOTE_ID:
1440 if (subl >= 4) {
1441 printf(", 0x%08x", EXTRACT_32BITS(tptr));
1442 if (subl == 8) /* rfc4205 */
1443 printf(", 0x%08x", EXTRACT_32BITS(tptr+4));
1444 }
1445 break;
1446 case ISIS_SUBTLV_EXT_IS_REACH_IPV4_INTF_ADDR:
1447 case ISIS_SUBTLV_EXT_IS_REACH_IPV4_NEIGHBOR_ADDR:
1448 if (subl >= sizeof(struct in_addr))
1449 printf(", %s", ipaddr_string(tptr));
1450 break;
1451 case ISIS_SUBTLV_EXT_IS_REACH_MAX_LINK_BW :
1452 case ISIS_SUBTLV_EXT_IS_REACH_RESERVABLE_BW:
1453 if (subl >= 4) {
1454 bw.i = EXTRACT_32BITS(tptr);
1455 printf(", %.3f Mbps", bw.f*8/1000000 );
1456 }
1457 break;
1458 case ISIS_SUBTLV_EXT_IS_REACH_UNRESERVED_BW :
1459 if (subl >= 32) {
1460 for (te_class = 0; te_class < 8; te_class++) {
1461 bw.i = EXTRACT_32BITS(tptr);
1462 printf("%s TE-Class %u: %.3f Mbps",
1463 ident,
1464 te_class,
1465 bw.f*8/1000000 );
1466 tptr+=4;
1467 }
1468 }
1469 break;
1470 case ISIS_SUBTLV_EXT_IS_REACH_BW_CONSTRAINTS: /* fall through */
1471 case ISIS_SUBTLV_EXT_IS_REACH_BW_CONSTRAINTS_OLD:
1472 printf("%sBandwidth Constraints Model ID: %s (%u)",
1473 ident,
1474 tok2str(diffserv_te_bc_values, "unknown", *tptr),
1475 *tptr);
1476 tptr++;
1477 /* decode BCs until the subTLV ends */
1478 for (te_class = 0; te_class < (subl-1)/4; te_class++) {
1479 bw.i = EXTRACT_32BITS(tptr);
1480 printf("%s Bandwidth constraint CT%u: %.3f Mbps",
1481 ident,
1482 te_class,
1483 bw.f*8/1000000 );
1484 tptr+=4;
1485 }
1486 break;
1487 case ISIS_SUBTLV_EXT_IS_REACH_TE_METRIC:
1488 if (subl >= 3)
1489 printf(", %u", EXTRACT_24BITS(tptr));
1490 break;
1491 case ISIS_SUBTLV_EXT_IS_REACH_LINK_ATTRIBUTE:
1492 if (subl == 2) {
1493 printf(", [ %s ] (0x%04x)",
1494 bittok2str(isis_subtlv_link_attribute_values,
1495 "Unknown",
1496 EXTRACT_16BITS(tptr)),
1497 EXTRACT_16BITS(tptr));
1498 }
1499 break;
1500 case ISIS_SUBTLV_EXT_IS_REACH_LINK_PROTECTION_TYPE:
1501 if (subl >= 2) {
1502 printf(", %s, Priority %u",
1503 bittok2str(gmpls_link_prot_values, "none", *tptr),
1504 *(tptr+1));
1505 }
1506 break;
1507 case ISIS_SUBTLV_EXT_IS_REACH_INTF_SW_CAP_DESCR:
1508 if (subl >= 36) {
1509 gmpls_switch_cap = *tptr;
1510 printf("%s Interface Switching Capability:%s",
1511 ident,
1512 tok2str(gmpls_switch_cap_values, "Unknown", gmpls_switch_cap));
1513 printf(", LSP Encoding: %s",
1514 tok2str(gmpls_encoding_values, "Unknown", *(tptr+1)));
1515 tptr+=4;
1516 printf("%s Max LSP Bandwidth:",ident);
1517 for (priority_level = 0; priority_level < 8; priority_level++) {
1518 bw.i = EXTRACT_32BITS(tptr);
1519 printf("%s priority level %d: %.3f Mbps",
1520 ident,
1521 priority_level,
1522 bw.f*8/1000000 );
1523 tptr+=4;
1524 }
1525 subl-=36;
1526 switch (gmpls_switch_cap) {
1527 case GMPLS_PSC1:
1528 case GMPLS_PSC2:
1529 case GMPLS_PSC3:
1530 case GMPLS_PSC4:
1531 bw.i = EXTRACT_32BITS(tptr);
1532 printf("%s Min LSP Bandwidth: %.3f Mbps", ident, bw.f*8/1000000);
1533 printf("%s Interface MTU: %u", ident, EXTRACT_16BITS(tptr+4));
1534 break;
1535 case GMPLS_TSC:
1536 bw.i = EXTRACT_32BITS(tptr);
1537 printf("%s Min LSP Bandwidth: %.3f Mbps", ident, bw.f*8/1000000);
1538 printf("%s Indication %s", ident,
1539 tok2str(gmpls_switch_cap_tsc_indication_values, "Unknown (%u)", *(tptr+4)));
1540 break;
1541 default:
1542 /* there is some optional stuff left to decode but this is as of yet
1543 not specified so just lets hexdump what is left */
1544 if(subl>0){
1545 if(!print_unknown_data(tptr,"\n\t\t ",
1546 subl))
1547 return(0);
1548 }
1549 }
1550 }
1551 break;
1552 default:
1553 if(!print_unknown_data(tptr,"\n\t\t ",
1554 subl))
1555 return(0);
1556 break;
1557 }
1558 return(1);
1559
1560 trunctlv:
1561 printf("%spacket exceeded snapshot",ident);
1562 return(0);
1563 }
1564
1565
1566 /*
1567 * this is the common IS-REACH decoder it is called
1568 * from various EXTD-IS REACH style TLVs (22,24,222)
1569 */
1570
1571 static int
1572 isis_print_ext_is_reach (const u_int8_t *tptr,const char *ident, int tlv_type) {
1573
1574 char ident_buffer[20];
1575 int subtlv_type,subtlv_len,subtlv_sum_len;
1576 int proc_bytes = 0; /* how many bytes did we process ? */
1577
1578 if (!TTEST2(*tptr, NODE_ID_LEN))
1579 return(0);
1580
1581 printf("%sIS Neighbor: %s", ident, isis_print_id(tptr, NODE_ID_LEN));
1582 tptr+=(NODE_ID_LEN);
1583
1584 if (tlv_type != ISIS_TLV_IS_ALIAS_ID) { /* the Alias TLV Metric field is implicit 0 */
1585 if (!TTEST2(*tptr, 3)) /* and is therefore skipped */
1586 return(0);
1587 printf(", Metric: %d",EXTRACT_24BITS(tptr));
1588 tptr+=3;
1589 }
1590
1591 if (!TTEST2(*tptr, 1))
1592 return(0);
1593 subtlv_sum_len=*(tptr++); /* read out subTLV length */
1594 proc_bytes=NODE_ID_LEN+3+1;
1595 printf(", %ssub-TLVs present",subtlv_sum_len ? "" : "no ");
1596 if (subtlv_sum_len) {
1597 printf(" (%u)",subtlv_sum_len);
1598 while (subtlv_sum_len>0) {
1599 if (!TTEST2(*tptr,2))
1600 return(0);
1601 subtlv_type=*(tptr++);
1602 subtlv_len=*(tptr++);
1603 /* prepend the ident string */
1604 snprintf(ident_buffer, sizeof(ident_buffer), "%s ",ident);
1605 if(!isis_print_is_reach_subtlv(tptr,subtlv_type,subtlv_len,ident_buffer))
1606 return(0);
1607 tptr+=subtlv_len;
1608 subtlv_sum_len-=(subtlv_len+2);
1609 proc_bytes+=(subtlv_len+2);
1610 }
1611 }
1612 return(proc_bytes);
1613 }
1614
1615 /*
1616 * this is the common Multi Topology ID decoder
1617 * it is called from various MT-TLVs (222,229,235,237)
1618 */
1619
1620 static int
1621 isis_print_mtid (const u_int8_t *tptr,const char *ident) {
1622
1623 if (!TTEST2(*tptr, 2))
1624 return(0);
1625
1626 printf("%s%s",
1627 ident,
1628 tok2str(isis_mt_values,
1629 "Reserved for IETF Consensus",
1630 ISIS_MASK_MTID(EXTRACT_16BITS(tptr))));
1631
1632 printf(" Topology (0x%03x), Flags: [%s]",
1633 ISIS_MASK_MTID(EXTRACT_16BITS(tptr)),
1634 bittok2str(isis_mt_flag_values, "none",ISIS_MASK_MTFLAGS(EXTRACT_16BITS(tptr))));
1635
1636 return(2);
1637 }
1638
1639 /*
1640 * this is the common extended IP reach decoder
1641 * it is called from TLVs (135,235,236,237)
1642 * we process the TLV and optional subTLVs and return
1643 * the amount of processed bytes
1644 */
1645
1646 static int
1647 isis_print_extd_ip_reach (const u_int8_t *tptr, const char *ident, u_int16_t afi) {
1648
1649 char ident_buffer[20];
1650 #ifdef INET6
1651 u_int8_t prefix[sizeof(struct in6_addr)]; /* shared copy buffer for IPv4 and IPv6 prefixes */
1652 #else
1653 u_int8_t prefix[sizeof(struct in_addr)]; /* shared copy buffer for IPv4 prefixes */
1654 #endif
1655 u_int metric, status_byte, bit_length, byte_length, sublen, processed, subtlvtype, subtlvlen;
1656
1657 if (!TTEST2(*tptr, 4))
1658 return (0);
1659 metric = EXTRACT_32BITS(tptr);
1660 processed=4;
1661 tptr+=4;
1662
1663 if (afi == AF_INET) {
1664 if (!TTEST2(*tptr, 1)) /* fetch status byte */
1665 return (0);
1666 status_byte=*(tptr++);
1667 bit_length = status_byte&0x3f;
1668 if (bit_length > 32) {
1669 printf("%sIPv4 prefix: bad bit length %u",
1670 ident,
1671 bit_length);
1672 return (0);
1673 }
1674 processed++;
1675 #ifdef INET6
1676 } else if (afi == AF_INET6) {
1677 if (!TTEST2(*tptr, 1)) /* fetch status & prefix_len byte */
1678 return (0);
1679 status_byte=*(tptr++);
1680 bit_length=*(tptr++);
1681 if (bit_length > 128) {
1682 printf("%sIPv6 prefix: bad bit length %u",
1683 ident,
1684 bit_length);
1685 return (0);
1686 }
1687 processed+=2;
1688 #endif
1689 } else
1690 return (0); /* somebody is fooling us */
1691
1692 byte_length = (bit_length + 7) / 8; /* prefix has variable length encoding */
1693
1694 if (!TTEST2(*tptr, byte_length))
1695 return (0);
1696 memset(prefix, 0, sizeof prefix); /* clear the copy buffer */
1697 memcpy(prefix,tptr,byte_length); /* copy as much as is stored in the TLV */
1698 tptr+=byte_length;
1699 processed+=byte_length;
1700
1701 if (afi == AF_INET)
1702 printf("%sIPv4 prefix: %15s/%u",
1703 ident,
1704 ipaddr_string(prefix),
1705 bit_length);
1706 #ifdef INET6
1707 if (afi == AF_INET6)
1708 printf("%sIPv6 prefix: %s/%u",
1709 ident,
1710 ip6addr_string(prefix),
1711 bit_length);
1712 #endif
1713
1714 printf(", Distribution: %s, Metric: %u",
1715 ISIS_MASK_TLV_EXTD_IP_UPDOWN(status_byte) ? "down" : "up",
1716 metric);
1717
1718 if (afi == AF_INET && ISIS_MASK_TLV_EXTD_IP_SUBTLV(status_byte))
1719 printf(", sub-TLVs present");
1720 #ifdef INET6
1721 if (afi == AF_INET6)
1722 printf(", %s%s",
1723 ISIS_MASK_TLV_EXTD_IP6_IE(status_byte) ? "External" : "Internal",
1724 ISIS_MASK_TLV_EXTD_IP6_SUBTLV(status_byte) ? ", sub-TLVs present" : "");
1725 #endif
1726
1727 if ((afi == AF_INET && ISIS_MASK_TLV_EXTD_IP_SUBTLV(status_byte))
1728 #ifdef INET6
1729 || (afi == AF_INET6 && ISIS_MASK_TLV_EXTD_IP6_SUBTLV(status_byte))
1730 #endif
1731 ) {
1732 /* assume that one prefix can hold more
1733 than one subTLV - therefore the first byte must reflect
1734 the aggregate bytecount of the subTLVs for this prefix
1735 */
1736 if (!TTEST2(*tptr, 1))
1737 return (0);
1738 sublen=*(tptr++);
1739 processed+=sublen+1;
1740 printf(" (%u)",sublen); /* print out subTLV length */
1741
1742 while (sublen>0) {
1743 if (!TTEST2(*tptr,2))
1744 return (0);
1745 subtlvtype=*(tptr++);
1746 subtlvlen=*(tptr++);
1747 /* prepend the ident string */
1748 snprintf(ident_buffer, sizeof(ident_buffer), "%s ",ident);
1749 if(!isis_print_ip_reach_subtlv(tptr,subtlvtype,subtlvlen,ident_buffer))
1750 return(0);
1751 tptr+=subtlvlen;
1752 sublen-=(subtlvlen+2);
1753 }
1754 }
1755 return (processed);
1756 }
1757
1758 /*
1759 * isis_print
1760 * Decode IS-IS packets. Return 0 on error.
1761 */
1762
1763 static int isis_print (const u_int8_t *p, u_int length)
1764 {
1765 const struct isis_common_header *isis_header;
1766
1767 const struct isis_iih_lan_header *header_iih_lan;
1768 const struct isis_iih_ptp_header *header_iih_ptp;
1769 struct isis_lsp_header *header_lsp;
1770 const struct isis_csnp_header *header_csnp;
1771 const struct isis_psnp_header *header_psnp;
1772
1773 const struct isis_tlv_lsp *tlv_lsp;
1774 const struct isis_tlv_ptp_adj *tlv_ptp_adj;
1775 const struct isis_tlv_is_reach *tlv_is_reach;
1776 const struct isis_tlv_es_reach *tlv_es_reach;
1777
1778 u_int8_t pdu_type, max_area, id_length, tlv_type, tlv_len, tmp, alen, lan_alen, prefix_len;
1779 u_int8_t ext_is_len, ext_ip_len, mt_len;
1780 const u_int8_t *optr, *pptr, *tptr;
1781 u_short packet_len,pdu_len, key_id;
1782 u_int i,vendor_id;
1783 int sigcheck;
1784
1785 packet_len=length;
1786 optr = p; /* initialize the _o_riginal pointer to the packet start -
1787 need it for parsing the checksum TLV and authentication
1788 TLV verification */
1789 isis_header = (const struct isis_common_header *)p;
1790 TCHECK(*isis_header);
1791 pptr = p+(ISIS_COMMON_HEADER_SIZE);
1792 header_iih_lan = (const struct isis_iih_lan_header *)pptr;
1793 header_iih_ptp = (const struct isis_iih_ptp_header *)pptr;
1794 header_lsp = (struct isis_lsp_header *)pptr;
1795 header_csnp = (const struct isis_csnp_header *)pptr;
1796 header_psnp = (const struct isis_psnp_header *)pptr;
1797
1798 if (!eflag)
1799 printf("IS-IS");
1800
1801 /*
1802 * Sanity checking of the header.
1803 */
1804
1805 if (isis_header->version != ISIS_VERSION) {
1806 printf("version %d packet not supported", isis_header->version);
1807 return (0);
1808 }
1809
1810 if ((isis_header->id_length != SYSTEM_ID_LEN) && (isis_header->id_length != 0)) {
1811 printf("system ID length of %d is not supported",
1812 isis_header->id_length);
1813 return (0);
1814 }
1815
1816 if (isis_header->pdu_version != ISIS_VERSION) {
1817 printf("version %d packet not supported", isis_header->pdu_version);
1818 return (0);
1819 }
1820
1821 max_area = isis_header->max_area;
1822 switch(max_area) {
1823 case 0:
1824 max_area = 3; /* silly shit */
1825 break;
1826 case 255:
1827 printf("bad packet -- 255 areas");
1828 return (0);
1829 default:
1830 break;
1831 }
1832
1833 id_length = isis_header->id_length;
1834 switch(id_length) {
1835 case 0:
1836 id_length = 6; /* silly shit again */
1837 break;
1838 case 1: /* 1-8 are valid sys-ID lenghts */
1839 case 2:
1840 case 3:
1841 case 4:
1842 case 5:
1843 case 6:
1844 case 7:
1845 case 8:
1846 break;
1847 case 255:
1848 id_length = 0; /* entirely useless */
1849 break;
1850 default:
1851 break;
1852 }
1853
1854 /* toss any non 6-byte sys-ID len PDUs */
1855 if (id_length != 6 ) {
1856 printf("bad packet -- illegal sys-ID length (%u)", id_length);
1857 return (0);
1858 }
1859
1860 pdu_type=isis_header->pdu_type;
1861
1862 /* in non-verbose mode print the basic PDU Type plus PDU specific brief information*/
1863 if (vflag < 1) {
1864 printf("%s%s",
1865 eflag ? "" : ", ",
1866 tok2str(isis_pdu_values,"unknown PDU-Type %u",pdu_type));
1867
1868 switch (pdu_type) {
1869
1870 case ISIS_PDU_L1_LAN_IIH:
1871 case ISIS_PDU_L2_LAN_IIH:
1872 printf(", src-id %s",
1873 isis_print_id(header_iih_lan->source_id,SYSTEM_ID_LEN));
1874 printf(", lan-id %s, prio %u",
1875 isis_print_id(header_iih_lan->lan_id,NODE_ID_LEN),
1876 header_iih_lan->priority);
1877 break;
1878 case ISIS_PDU_PTP_IIH:
1879 printf(", src-id %s", isis_print_id(header_iih_ptp->source_id,SYSTEM_ID_LEN));
1880 break;
1881 case ISIS_PDU_L1_LSP:
1882 case ISIS_PDU_L2_LSP:
1883 printf(", lsp-id %s, seq 0x%08x, lifetime %5us",
1884 isis_print_id(header_lsp->lsp_id, LSP_ID_LEN),
1885 EXTRACT_32BITS(header_lsp->sequence_number),
1886 EXTRACT_16BITS(header_lsp->remaining_lifetime));
1887 break;
1888 case ISIS_PDU_L1_CSNP:
1889 case ISIS_PDU_L2_CSNP:
1890 printf(", src-id %s", isis_print_id(header_csnp->source_id,NODE_ID_LEN));
1891 break;
1892 case ISIS_PDU_L1_PSNP:
1893 case ISIS_PDU_L2_PSNP:
1894 printf(", src-id %s", isis_print_id(header_psnp->source_id,NODE_ID_LEN));
1895 break;
1896
1897 }
1898 printf(", length %u", length);
1899
1900 return(1);
1901 }
1902
1903 /* ok they seem to want to know everything - lets fully decode it */
1904 printf("%slength %u", eflag ? "" : ", ",length);
1905
1906 printf("\n\t%s, hlen: %u, v: %u, pdu-v: %u, sys-id-len: %u (%u), max-area: %u (%u)",
1907 tok2str(isis_pdu_values,
1908 "unknown, type %u",
1909 pdu_type),
1910 isis_header->fixed_len,
1911 isis_header->version,
1912 isis_header->pdu_version,
1913 id_length,
1914 isis_header->id_length,
1915 max_area,
1916 isis_header->max_area);
1917
1918 if (vflag > 1) {
1919 if(!print_unknown_data(optr,"\n\t",8)) /* provide the _o_riginal pointer */
1920 return(0); /* for optionally debugging the common header */
1921 }
1922
1923 switch (pdu_type) {
1924
1925 case ISIS_PDU_L1_LAN_IIH:
1926 case ISIS_PDU_L2_LAN_IIH:
1927 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_LAN_HEADER_SIZE)) {
1928 printf(", bogus fixed header length %u should be %lu",
1929 isis_header->fixed_len, (unsigned long)ISIS_IIH_LAN_HEADER_SIZE);
1930 return (0);
1931 }
1932
1933 pdu_len=EXTRACT_16BITS(header_iih_lan->pdu_len);
1934 if (packet_len>pdu_len) {
1935 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
1936 length=pdu_len;
1937 }
1938
1939 TCHECK(*header_iih_lan);
1940 printf("\n\t source-id: %s, holding time: %us, Flags: [%s]",
1941 isis_print_id(header_iih_lan->source_id,SYSTEM_ID_LEN),
1942 EXTRACT_16BITS(header_iih_lan->holding_time),
1943 tok2str(isis_iih_circuit_type_values,
1944 "unknown circuit type 0x%02x",
1945 header_iih_lan->circuit_type));
1946
1947 printf("\n\t lan-id: %s, Priority: %u, PDU length: %u",
1948 isis_print_id(header_iih_lan->lan_id, NODE_ID_LEN),
1949 (header_iih_lan->priority) & ISIS_LAN_PRIORITY_MASK,
1950 pdu_len);
1951
1952 if (vflag > 1) {
1953 if(!print_unknown_data(pptr,"\n\t ",ISIS_IIH_LAN_HEADER_SIZE))
1954 return(0);
1955 }
1956
1957 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_LAN_HEADER_SIZE);
1958 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_LAN_HEADER_SIZE);
1959 break;
1960
1961 case ISIS_PDU_PTP_IIH:
1962 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_PTP_HEADER_SIZE)) {
1963 printf(", bogus fixed header length %u should be %lu",
1964 isis_header->fixed_len, (unsigned long)ISIS_IIH_PTP_HEADER_SIZE);
1965 return (0);
1966 }
1967
1968 pdu_len=EXTRACT_16BITS(header_iih_ptp->pdu_len);
1969 if (packet_len>pdu_len) {
1970 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
1971 length=pdu_len;
1972 }
1973
1974 TCHECK(*header_iih_ptp);
1975 printf("\n\t source-id: %s, holding time: %us, Flags: [%s]",
1976 isis_print_id(header_iih_ptp->source_id,SYSTEM_ID_LEN),
1977 EXTRACT_16BITS(header_iih_ptp->holding_time),
1978 tok2str(isis_iih_circuit_type_values,
1979 "unknown circuit type 0x%02x",
1980 header_iih_ptp->circuit_type));
1981
1982 printf("\n\t circuit-id: 0x%02x, PDU length: %u",
1983 header_iih_ptp->circuit_id,
1984 pdu_len);
1985
1986 if (vflag > 1) {
1987 if(!print_unknown_data(pptr,"\n\t ",ISIS_IIH_PTP_HEADER_SIZE))
1988 return(0);
1989 }
1990
1991 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_PTP_HEADER_SIZE);
1992 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_IIH_PTP_HEADER_SIZE);
1993 break;
1994
1995 case ISIS_PDU_L1_LSP:
1996 case ISIS_PDU_L2_LSP:
1997 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_LSP_HEADER_SIZE)) {
1998 printf(", bogus fixed header length %u should be %lu",
1999 isis_header->fixed_len, (unsigned long)ISIS_LSP_HEADER_SIZE);
2000 return (0);
2001 }
2002
2003 pdu_len=EXTRACT_16BITS(header_lsp->pdu_len);
2004 if (packet_len>pdu_len) {
2005 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
2006 length=pdu_len;
2007 }
2008
2009 TCHECK(*header_lsp);
2010 printf("\n\t lsp-id: %s, seq: 0x%08x, lifetime: %5us\n\t chksum: 0x%04x",
2011 isis_print_id(header_lsp->lsp_id, LSP_ID_LEN),
2012 EXTRACT_32BITS(header_lsp->sequence_number),
2013 EXTRACT_16BITS(header_lsp->remaining_lifetime),
2014 EXTRACT_16BITS(header_lsp->checksum));
2015
2016
2017 osi_print_cksum((u_int8_t *)header_lsp->lsp_id,
2018 EXTRACT_16BITS(header_lsp->checksum), 12, length-12);
2019
2020 /*
2021 * Clear checksum and lifetime prior to signature verification.
2022 */
2023 header_lsp->checksum[0] = 0;
2024 header_lsp->checksum[1] = 0;
2025 header_lsp->remaining_lifetime[0] = 0;
2026 header_lsp->remaining_lifetime[1] = 0;
2027
2028
2029 printf(", PDU length: %u, Flags: [ %s",
2030 pdu_len,
2031 ISIS_MASK_LSP_OL_BIT(header_lsp->typeblock) ? "Overload bit set, " : "");
2032
2033 if (ISIS_MASK_LSP_ATT_BITS(header_lsp->typeblock)) {
2034 printf("%s", ISIS_MASK_LSP_ATT_DEFAULT_BIT(header_lsp->typeblock) ? "default " : "");
2035 printf("%s", ISIS_MASK_LSP_ATT_DELAY_BIT(header_lsp->typeblock) ? "delay " : "");
2036 printf("%s", ISIS_MASK_LSP_ATT_EXPENSE_BIT(header_lsp->typeblock) ? "expense " : "");
2037 printf("%s", ISIS_MASK_LSP_ATT_ERROR_BIT(header_lsp->typeblock) ? "error " : "");
2038 printf("ATT bit set, ");
2039 }
2040 printf("%s", ISIS_MASK_LSP_PARTITION_BIT(header_lsp->typeblock) ? "P bit set, " : "");
2041 printf("%s ]", tok2str(isis_lsp_istype_values,"Unknown(0x%x)",ISIS_MASK_LSP_ISTYPE_BITS(header_lsp->typeblock)));
2042
2043 if (vflag > 1) {
2044 if(!print_unknown_data(pptr,"\n\t ",ISIS_LSP_HEADER_SIZE))
2045 return(0);
2046 }
2047
2048 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_LSP_HEADER_SIZE);
2049 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_LSP_HEADER_SIZE);
2050 break;
2051
2052 case ISIS_PDU_L1_CSNP:
2053 case ISIS_PDU_L2_CSNP:
2054 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_CSNP_HEADER_SIZE)) {
2055 printf(", bogus fixed header length %u should be %lu",
2056 isis_header->fixed_len, (unsigned long)ISIS_CSNP_HEADER_SIZE);
2057 return (0);
2058 }
2059
2060 pdu_len=EXTRACT_16BITS(header_csnp->pdu_len);
2061 if (packet_len>pdu_len) {
2062 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
2063 length=pdu_len;
2064 }
2065
2066 TCHECK(*header_csnp);
2067 printf("\n\t source-id: %s, PDU length: %u",
2068 isis_print_id(header_csnp->source_id, NODE_ID_LEN),
2069 pdu_len);
2070 printf("\n\t start lsp-id: %s",
2071 isis_print_id(header_csnp->start_lsp_id, LSP_ID_LEN));
2072 printf("\n\t end lsp-id: %s",
2073 isis_print_id(header_csnp->end_lsp_id, LSP_ID_LEN));
2074
2075 if (vflag > 1) {
2076 if(!print_unknown_data(pptr,"\n\t ",ISIS_CSNP_HEADER_SIZE))
2077 return(0);
2078 }
2079
2080 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_CSNP_HEADER_SIZE);
2081 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_CSNP_HEADER_SIZE);
2082 break;
2083
2084 case ISIS_PDU_L1_PSNP:
2085 case ISIS_PDU_L2_PSNP:
2086 if (isis_header->fixed_len != (ISIS_COMMON_HEADER_SIZE+ISIS_PSNP_HEADER_SIZE)) {
2087 printf("- bogus fixed header length %u should be %lu",
2088 isis_header->fixed_len, (unsigned long)ISIS_PSNP_HEADER_SIZE);
2089 return (0);
2090 }
2091
2092 pdu_len=EXTRACT_16BITS(header_psnp->pdu_len);
2093 if (packet_len>pdu_len) {
2094 packet_len=pdu_len; /* do TLV decoding as long as it makes sense */
2095 length=pdu_len;
2096 }
2097
2098 TCHECK(*header_psnp);
2099 printf("\n\t source-id: %s, PDU length: %u",
2100 isis_print_id(header_psnp->source_id, NODE_ID_LEN),
2101 pdu_len);
2102
2103 if (vflag > 1) {
2104 if(!print_unknown_data(pptr,"\n\t ",ISIS_PSNP_HEADER_SIZE))
2105 return(0);
2106 }
2107
2108 packet_len -= (ISIS_COMMON_HEADER_SIZE+ISIS_PSNP_HEADER_SIZE);
2109 pptr = p + (ISIS_COMMON_HEADER_SIZE+ISIS_PSNP_HEADER_SIZE);
2110 break;
2111
2112 default:
2113 if(!print_unknown_data(pptr,"\n\t ",length))
2114 return(0);
2115 return (0);
2116 }
2117
2118 /*
2119 * Now print the TLV's.
2120 */
2121
2122 while (packet_len >= 2) {
2123 if (pptr == snapend) {
2124 return (1);
2125 }
2126
2127 if (!TTEST2(*pptr, 2)) {
2128 printf("\n\t\t packet exceeded snapshot (%ld) bytes",
2129 (long)(pptr-snapend));
2130 return (1);
2131 }
2132 tlv_type = *pptr++;
2133 tlv_len = *pptr++;
2134 tmp =tlv_len; /* copy temporary len & pointer to packet data */
2135 tptr = pptr;
2136 packet_len -= 2;
2137 if (tlv_len > packet_len) {
2138 break;
2139 }
2140
2141 /* first lets see if we know the TLVs name*/
2142 printf("\n\t %s TLV #%u, length: %u",
2143 tok2str(isis_tlv_values,
2144 "unknown",
2145 tlv_type),
2146 tlv_type,
2147 tlv_len);
2148
2149 if (tlv_len == 0) /* something is malformed */
2150 continue;
2151
2152 /* now check if we have a decoder otherwise do a hexdump at the end*/
2153 switch (tlv_type) {
2154 case ISIS_TLV_AREA_ADDR:
2155 if (!TTEST2(*tptr, 1))
2156 goto trunctlv;
2157 alen = *tptr++;
2158 while (tmp && alen < tmp) {
2159 printf("\n\t Area address (length: %u): %s",
2160 alen,
2161 isonsap_string(tptr,alen));
2162 tptr += alen;
2163 tmp -= alen + 1;
2164 if (tmp==0) /* if this is the last area address do not attemt a boundary check */
2165 break;
2166 if (!TTEST2(*tptr, 1))
2167 goto trunctlv;
2168 alen = *tptr++;
2169 }
2170 break;
2171 case ISIS_TLV_ISNEIGH:
2172 while (tmp >= ETHER_ADDR_LEN) {
2173 if (!TTEST2(*tptr, ETHER_ADDR_LEN))
2174 goto trunctlv;
2175 printf("\n\t SNPA: %s",isis_print_id(tptr,ETHER_ADDR_LEN));
2176 tmp -= ETHER_ADDR_LEN;
2177 tptr += ETHER_ADDR_LEN;
2178 }
2179 break;
2180
2181 case ISIS_TLV_ISNEIGH_VARLEN:
2182 if (!TTEST2(*tptr, 1) || tmp < 3) /* min. TLV length */
2183 goto trunctlv;
2184 lan_alen = *tptr++; /* LAN address length */
2185 if (lan_alen == 0) {
2186 printf("\n\t LAN address length 0 bytes (invalid)");
2187 break;
2188 }
2189 tmp --;
2190 printf("\n\t LAN address length %u bytes ",lan_alen);
2191 while (tmp >= lan_alen) {
2192 if (!TTEST2(*tptr, lan_alen))
2193 goto trunctlv;
2194 printf("\n\t\tIS Neighbor: %s",isis_print_id(tptr,lan_alen));
2195 tmp -= lan_alen;
2196 tptr +=lan_alen;
2197 }
2198 break;
2199
2200 case ISIS_TLV_PADDING:
2201 break;
2202
2203 case ISIS_TLV_MT_IS_REACH:
2204 mt_len = isis_print_mtid(tptr, "\n\t ");
2205 if (mt_len == 0) /* did something go wrong ? */
2206 goto trunctlv;
2207 tptr+=mt_len;
2208 tmp-=mt_len;
2209 while (tmp >= 2+NODE_ID_LEN+3+1) {
2210 ext_is_len = isis_print_ext_is_reach(tptr,"\n\t ",tlv_type);
2211 if (ext_is_len == 0) /* did something go wrong ? */
2212 goto trunctlv;
2213
2214 tmp-=ext_is_len;
2215 tptr+=ext_is_len;
2216 }
2217 break;
2218
2219 case ISIS_TLV_IS_ALIAS_ID:
2220 while (tmp >= NODE_ID_LEN+1) { /* is it worth attempting a decode ? */
2221 ext_is_len = isis_print_ext_is_reach(tptr,"\n\t ",tlv_type);
2222 if (ext_is_len == 0) /* did something go wrong ? */
2223 goto trunctlv;
2224 tmp-=ext_is_len;
2225 tptr+=ext_is_len;
2226 }
2227 break;
2228
2229 case ISIS_TLV_EXT_IS_REACH:
2230 while (tmp >= NODE_ID_LEN+3+1) { /* is it worth attempting a decode ? */
2231 ext_is_len = isis_print_ext_is_reach(tptr,"\n\t ",tlv_type);
2232 if (ext_is_len == 0) /* did something go wrong ? */
2233 goto trunctlv;
2234 tmp-=ext_is_len;
2235 tptr+=ext_is_len;
2236 }
2237 break;
2238 case ISIS_TLV_IS_REACH:
2239 if (!TTEST2(*tptr,1)) /* check if there is one byte left to read out the virtual flag */
2240 goto trunctlv;
2241 printf("\n\t %s",
2242 tok2str(isis_is_reach_virtual_values,
2243 "bogus virtual flag 0x%02x",
2244 *tptr++));
2245 tlv_is_reach = (const struct isis_tlv_is_reach *)tptr;
2246 while (tmp >= sizeof(struct isis_tlv_is_reach)) {
2247 if (!TTEST(*tlv_is_reach))
2248 goto trunctlv;
2249 printf("\n\t IS Neighbor: %s",
2250 isis_print_id(tlv_is_reach->neighbor_nodeid, NODE_ID_LEN));
2251 isis_print_metric_block(&tlv_is_reach->isis_metric_block);
2252 tmp -= sizeof(struct isis_tlv_is_reach);
2253 tlv_is_reach++;
2254 }
2255 break;
2256
2257 case ISIS_TLV_ESNEIGH:
2258 tlv_es_reach = (const struct isis_tlv_es_reach *)tptr;
2259 while (tmp >= sizeof(struct isis_tlv_es_reach)) {
2260 if (!TTEST(*tlv_es_reach))
2261 goto trunctlv;
2262 printf("\n\t ES Neighbor: %s",
2263 isis_print_id(tlv_es_reach->neighbor_sysid,SYSTEM_ID_LEN));
2264 isis_print_metric_block(&tlv_es_reach->isis_metric_block);
2265 tmp -= sizeof(struct isis_tlv_es_reach);
2266 tlv_es_reach++;
2267 }
2268 break;
2269
2270 /* those two TLVs share the same format */
2271 case ISIS_TLV_INT_IP_REACH:
2272 case ISIS_TLV_EXT_IP_REACH:
2273 if (!isis_print_tlv_ip_reach(pptr, "\n\t ", tlv_len))
2274 return (1);
2275 break;
2276
2277 case ISIS_TLV_EXTD_IP_REACH:
2278 while (tmp>0) {
2279 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", AF_INET);
2280 if (ext_ip_len == 0) /* did something go wrong ? */
2281 goto trunctlv;
2282 tptr+=ext_ip_len;
2283 tmp-=ext_ip_len;
2284 }
2285 break;
2286
2287 case ISIS_TLV_MT_IP_REACH:
2288 mt_len = isis_print_mtid(tptr, "\n\t ");
2289 if (mt_len == 0) { /* did something go wrong ? */
2290 goto trunctlv;
2291 }
2292 tptr+=mt_len;
2293 tmp-=mt_len;
2294
2295 while (tmp>0) {
2296 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", AF_INET);
2297 if (ext_ip_len == 0) /* did something go wrong ? */
2298 goto trunctlv;
2299 tptr+=ext_ip_len;
2300 tmp-=ext_ip_len;
2301 }
2302 break;
2303
2304 #ifdef INET6
2305 case ISIS_TLV_IP6_REACH:
2306 while (tmp>0) {
2307 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", AF_INET6);
2308 if (ext_ip_len == 0) /* did something go wrong ? */
2309 goto trunctlv;
2310 tptr+=ext_ip_len;
2311 tmp-=ext_ip_len;
2312 }
2313 break;
2314
2315 case ISIS_TLV_MT_IP6_REACH:
2316 mt_len = isis_print_mtid(tptr, "\n\t ");
2317 if (mt_len == 0) { /* did something go wrong ? */
2318 goto trunctlv;
2319 }
2320 tptr+=mt_len;
2321 tmp-=mt_len;
2322
2323 while (tmp>0) {
2324 ext_ip_len = isis_print_extd_ip_reach(tptr, "\n\t ", AF_INET6);
2325 if (ext_ip_len == 0) /* did something go wrong ? */
2326 goto trunctlv;
2327 tptr+=ext_ip_len;
2328 tmp-=ext_ip_len;
2329 }
2330 break;
2331
2332 case ISIS_TLV_IP6ADDR:
2333 while (tmp>=sizeof(struct in6_addr)) {
2334 if (!TTEST2(*tptr, sizeof(struct in6_addr)))
2335 goto trunctlv;
2336
2337 printf("\n\t IPv6 interface address: %s",
2338 ip6addr_string(tptr));
2339
2340 tptr += sizeof(struct in6_addr);
2341 tmp -= sizeof(struct in6_addr);
2342 }
2343 break;
2344 #endif
2345 case ISIS_TLV_AUTH:
2346 if (!TTEST2(*tptr, 1))
2347 goto trunctlv;
2348
2349 printf("\n\t %s: ",
2350 tok2str(isis_subtlv_auth_values,
2351 "unknown Authentication type 0x%02x",
2352 *tptr));
2353
2354 switch (*tptr) {
2355 case ISIS_SUBTLV_AUTH_SIMPLE:
2356 for(i=1;i<tlv_len;i++) {
2357 if (!TTEST2(*(tptr+i), 1))
2358 goto trunctlv;
2359 printf("%c",*(tptr+i));
2360 }
2361 break;
2362 case ISIS_SUBTLV_AUTH_MD5:
2363 for(i=1;i<tlv_len;i++) {
2364 if (!TTEST2(*(tptr+i), 1))
2365 goto trunctlv;
2366 printf("%02x",*(tptr+i));
2367 }
2368 if (tlv_len != ISIS_SUBTLV_AUTH_MD5_LEN+1)
2369 printf(", (malformed subTLV) ");
2370
2371 #ifdef HAVE_LIBCRYPTO
2372 sigcheck = signature_verify(optr, length,
2373 (unsigned char *)tptr + 1);
2374 #else
2375 sigcheck = CANT_CHECK_SIGNATURE;
2376 #endif
2377 printf(" (%s)", tok2str(signature_check_values, "Unknown", sigcheck));
2378
2379 break;
2380 case ISIS_SUBTLV_AUTH_GENERIC:
2381 key_id = EXTRACT_16BITS((tptr+1));
2382 printf("%u, password: ", key_id);
2383 for(i=1 + sizeof(u_int16_t);i<tlv_len;i++) {
2384 if (!TTEST2(*(tptr+i), 1))
2385 goto trunctlv;
2386 printf("%02x",*(tptr+i));
2387 }
2388 break;
2389 case ISIS_SUBTLV_AUTH_PRIVATE:
2390 default:
2391 if(!print_unknown_data(tptr+1,"\n\t\t ",tlv_len-1))
2392 return(0);
2393 break;
2394 }
2395 break;
2396
2397 case ISIS_TLV_PTP_ADJ:
2398 tlv_ptp_adj = (const struct isis_tlv_ptp_adj *)tptr;
2399 if(tmp>=1) {
2400 if (!TTEST2(*tptr, 1))
2401 goto trunctlv;
2402 printf("\n\t Adjacency State: %s (%u)",
2403 tok2str(isis_ptp_adjancey_values, "unknown", *tptr),
2404 *tptr);
2405 tmp--;
2406 }
2407 if(tmp>sizeof(tlv_ptp_adj->extd_local_circuit_id)) {
2408 if (!TTEST2(tlv_ptp_adj->extd_local_circuit_id,
2409 sizeof(tlv_ptp_adj->extd_local_circuit_id)))
2410 goto trunctlv;
2411 printf("\n\t Extended Local circuit-ID: 0x%08x",
2412 EXTRACT_32BITS(tlv_ptp_adj->extd_local_circuit_id));
2413 tmp-=sizeof(tlv_ptp_adj->extd_local_circuit_id);
2414 }
2415 if(tmp>=SYSTEM_ID_LEN) {
2416 if (!TTEST2(tlv_ptp_adj->neighbor_sysid, SYSTEM_ID_LEN))
2417 goto trunctlv;
2418 printf("\n\t Neighbor System-ID: %s",
2419 isis_print_id(tlv_ptp_adj->neighbor_sysid,SYSTEM_ID_LEN));
2420 tmp-=SYSTEM_ID_LEN;
2421 }
2422 if(tmp>=sizeof(tlv_ptp_adj->neighbor_extd_local_circuit_id)) {
2423 if (!TTEST2(tlv_ptp_adj->neighbor_extd_local_circuit_id,
2424 sizeof(tlv_ptp_adj->neighbor_extd_local_circuit_id)))
2425 goto trunctlv;
2426 printf("\n\t Neighbor Extended Local circuit-ID: 0x%08x",
2427 EXTRACT_32BITS(tlv_ptp_adj->neighbor_extd_local_circuit_id));
2428 }
2429 break;
2430
2431 case ISIS_TLV_PROTOCOLS:
2432 printf("\n\t NLPID(s): ");
2433 while (tmp>0) {
2434 if (!TTEST2(*(tptr), 1))
2435 goto trunctlv;
2436 printf("%s (0x%02x)",
2437 tok2str(nlpid_values,
2438 "unknown",
2439 *tptr),
2440 *tptr);
2441 if (tmp>1) /* further NPLIDs ? - put comma */
2442 printf(", ");
2443 tptr++;
2444 tmp--;
2445 }
2446 break;
2447
2448 case ISIS_TLV_TE_ROUTER_ID:
2449 if (!TTEST2(*pptr, sizeof(struct in_addr)))
2450 goto trunctlv;
2451 printf("\n\t Traffic Engineering Router ID: %s", ipaddr_string(pptr));
2452 break;
2453
2454 case ISIS_TLV_IPADDR:
2455 while (tmp>=sizeof(struct in_addr)) {
2456 if (!TTEST2(*tptr, sizeof(struct in_addr)))
2457 goto trunctlv;
2458 printf("\n\t IPv4 interface address: %s", ipaddr_string(tptr));
2459 tptr += sizeof(struct in_addr);
2460 tmp -= sizeof(struct in_addr);
2461 }
2462 break;
2463
2464 case ISIS_TLV_HOSTNAME:
2465 printf("\n\t Hostname: ");
2466 while (tmp>0) {
2467 if (!TTEST2(*tptr, 1))
2468 goto trunctlv;
2469 printf("%c",*tptr++);
2470 tmp--;
2471 }
2472 break;
2473
2474 case ISIS_TLV_SHARED_RISK_GROUP:
2475 if (tmp < NODE_ID_LEN)
2476 break;
2477 if (!TTEST2(*tptr, NODE_ID_LEN))
2478 goto trunctlv;
2479 printf("\n\t IS Neighbor: %s", isis_print_id(tptr, NODE_ID_LEN));
2480 tptr+=(NODE_ID_LEN);
2481 tmp-=(NODE_ID_LEN);
2482
2483 if (tmp < 1)
2484 break;
2485 if (!TTEST2(*tptr, 1))
2486 goto trunctlv;
2487 printf(", Flags: [%s]", ISIS_MASK_TLV_SHARED_RISK_GROUP(*tptr++) ? "numbered" : "unnumbered");
2488 tmp--;
2489
2490 if (tmp < sizeof(struct in_addr))
2491 break;
2492 if (!TTEST2(*tptr,sizeof(struct in_addr)))
2493 goto trunctlv;
2494 printf("\n\t IPv4 interface address: %s", ipaddr_string(tptr));
2495 tptr+=sizeof(struct in_addr);
2496 tmp-=sizeof(struct in_addr);
2497
2498 if (tmp < sizeof(struct in_addr))
2499 break;
2500 if (!TTEST2(*tptr,sizeof(struct in_addr)))
2501 goto trunctlv;
2502 printf("\n\t IPv4 neighbor address: %s", ipaddr_string(tptr));
2503 tptr+=sizeof(struct in_addr);
2504 tmp-=sizeof(struct in_addr);
2505
2506 while (tmp>=4) {
2507 if (!TTEST2(*tptr, 4))
2508 goto trunctlv;
2509 printf("\n\t Link-ID: 0x%08x", EXTRACT_32BITS(tptr));
2510 tptr+=4;
2511 tmp-=4;
2512 }
2513 break;
2514
2515 case ISIS_TLV_LSP:
2516 tlv_lsp = (const struct isis_tlv_lsp *)tptr;
2517 while(tmp>=sizeof(struct isis_tlv_lsp)) {
2518 if (!TTEST((tlv_lsp->lsp_id)[LSP_ID_LEN-1]))
2519 goto trunctlv;
2520 printf("\n\t lsp-id: %s",
2521 isis_print_id(tlv_lsp->lsp_id, LSP_ID_LEN));
2522 if (!TTEST2(tlv_lsp->sequence_number, 4))
2523 goto trunctlv;
2524 printf(", seq: 0x%08x",EXTRACT_32BITS(tlv_lsp->sequence_number));
2525 if (!TTEST2(tlv_lsp->remaining_lifetime, 2))
2526 goto trunctlv;
2527 printf(", lifetime: %5ds",EXTRACT_16BITS(tlv_lsp->remaining_lifetime));
2528 if (!TTEST2(tlv_lsp->checksum, 2))
2529 goto trunctlv;
2530 printf(", chksum: 0x%04x",EXTRACT_16BITS(tlv_lsp->checksum));
2531 tmp-=sizeof(struct isis_tlv_lsp);
2532 tlv_lsp++;
2533 }
2534 break;
2535
2536 case ISIS_TLV_CHECKSUM:
2537 if (tmp < ISIS_TLV_CHECKSUM_MINLEN)
2538 break;
2539 if (!TTEST2(*tptr, ISIS_TLV_CHECKSUM_MINLEN))
2540 goto trunctlv;
2541 printf("\n\t checksum: 0x%04x ", EXTRACT_16BITS(tptr));
2542 /* do not attempt to verify the checksum if it is zero
2543 * most likely a HMAC-MD5 TLV is also present and
2544 * to avoid conflicts the checksum TLV is zeroed.
2545 * see rfc3358 for details
2546 */
2547 osi_print_cksum(optr, EXTRACT_16BITS(tptr), tptr-optr, length);
2548 break;
2549
2550 case ISIS_TLV_MT_SUPPORTED:
2551 if (tmp < ISIS_TLV_MT_SUPPORTED_MINLEN)
2552 break;
2553 while (tmp>1) {
2554 /* length can only be a multiple of 2, otherwise there is
2555 something broken -> so decode down until length is 1 */
2556 if (tmp!=1) {
2557 mt_len = isis_print_mtid(tptr, "\n\t ");
2558 if (mt_len == 0) /* did something go wrong ? */
2559 goto trunctlv;
2560 tptr+=mt_len;
2561 tmp-=mt_len;
2562 } else {
2563 printf("\n\t malformed MT-ID");
2564 break;
2565 }
2566 }
2567 break;
2568
2569 case ISIS_TLV_RESTART_SIGNALING:
2570 /* first attempt to decode the flags */
2571 if (tmp < ISIS_TLV_RESTART_SIGNALING_FLAGLEN)
2572 break;
2573 if (!TTEST2(*tptr, ISIS_TLV_RESTART_SIGNALING_FLAGLEN))
2574 goto trunctlv;
2575 printf("\n\t Flags [%s]",
2576 bittok2str(isis_restart_flag_values, "none", *tptr));
2577 tptr+=ISIS_TLV_RESTART_SIGNALING_FLAGLEN;
2578 tmp-=ISIS_TLV_RESTART_SIGNALING_FLAGLEN;
2579
2580 /* is there anything other than the flags field? */
2581 if (tmp == 0)
2582 break;
2583
2584 if (tmp < ISIS_TLV_RESTART_SIGNALING_HOLDTIMELEN)
2585 break;
2586 if (!TTEST2(*tptr, ISIS_TLV_RESTART_SIGNALING_HOLDTIMELEN))
2587 goto trunctlv;
2588
2589 printf(", Remaining holding time %us", EXTRACT_16BITS(tptr));
2590 tptr+=ISIS_TLV_RESTART_SIGNALING_HOLDTIMELEN;
2591 tmp-=ISIS_TLV_RESTART_SIGNALING_HOLDTIMELEN;
2592
2593 /* is there an additional sysid field present ?*/
2594 if (tmp == SYSTEM_ID_LEN) {
2595 if (!TTEST2(*tptr, SYSTEM_ID_LEN))
2596 goto trunctlv;
2597 printf(", for %s",isis_print_id(tptr,SYSTEM_ID_LEN));
2598 }
2599 break;
2600
2601 case ISIS_TLV_IDRP_INFO:
2602 if (tmp < ISIS_TLV_IDRP_INFO_MINLEN)
2603 break;
2604 if (!TTEST2(*tptr, ISIS_TLV_IDRP_INFO_MINLEN))
2605 goto trunctlv;
2606 printf("\n\t Inter-Domain Information Type: %s",
2607 tok2str(isis_subtlv_idrp_values,
2608 "Unknown (0x%02x)",
2609 *tptr));
2610 switch (*tptr++) {
2611 case ISIS_SUBTLV_IDRP_ASN:
2612 if (!TTEST2(*tptr, 2)) /* fetch AS number */
2613 goto trunctlv;
2614 printf("AS Number: %u",EXTRACT_16BITS(tptr));
2615 break;
2616 case ISIS_SUBTLV_IDRP_LOCAL:
2617 case ISIS_SUBTLV_IDRP_RES:
2618 default:
2619 if(!print_unknown_data(tptr,"\n\t ",tlv_len-1))
2620 return(0);
2621 break;
2622 }
2623 break;
2624
2625 case ISIS_TLV_LSP_BUFFERSIZE:
2626 if (tmp < ISIS_TLV_LSP_BUFFERSIZE_MINLEN)
2627 break;
2628 if (!TTEST2(*tptr, ISIS_TLV_LSP_BUFFERSIZE_MINLEN))
2629 goto trunctlv;
2630 printf("\n\t LSP Buffersize: %u",EXTRACT_16BITS(tptr));
2631 break;
2632
2633 case ISIS_TLV_PART_DIS:
2634 while (tmp >= SYSTEM_ID_LEN) {
2635 if (!TTEST2(*tptr, SYSTEM_ID_LEN))
2636 goto trunctlv;
2637 printf("\n\t %s",isis_print_id(tptr,SYSTEM_ID_LEN));
2638 tptr+=SYSTEM_ID_LEN;
2639 tmp-=SYSTEM_ID_LEN;
2640 }
2641 break;
2642
2643 case ISIS_TLV_PREFIX_NEIGH:
2644 if (tmp < sizeof(struct isis_metric_block))
2645 break;
2646 if (!TTEST2(*tptr, sizeof(struct isis_metric_block)))
2647 goto trunctlv;
2648 printf("\n\t Metric Block");
2649 isis_print_metric_block((const struct isis_metric_block *)tptr);
2650 tptr+=sizeof(struct isis_metric_block);
2651 tmp-=sizeof(struct isis_metric_block);
2652
2653 while(tmp>0) {
2654 if (!TTEST2(*tptr, 1))
2655 goto trunctlv;
2656 prefix_len=*tptr++; /* read out prefix length in semioctets*/
2657 if (prefix_len < 2) {
2658 printf("\n\t\tAddress: prefix length %u < 2", prefix_len);
2659 break;
2660 }
2661 tmp--;
2662 if (tmp < prefix_len/2)
2663 break;
2664 if (!TTEST2(*tptr, prefix_len/2))
2665 goto trunctlv;
2666 printf("\n\t\tAddress: %s/%u",
2667 isonsap_string(tptr,prefix_len/2),
2668 prefix_len*4);
2669 tptr+=prefix_len/2;
2670 tmp-=prefix_len/2;
2671 }
2672 break;
2673
2674 case ISIS_TLV_IIH_SEQNR:
2675 if (tmp < ISIS_TLV_IIH_SEQNR_MINLEN)
2676 break;
2677 if (!TTEST2(*tptr, ISIS_TLV_IIH_SEQNR_MINLEN)) /* check if four bytes are on the wire */
2678 goto trunctlv;
2679 printf("\n\t Sequence number: %u", EXTRACT_32BITS(tptr) );
2680 break;
2681
2682 case ISIS_TLV_VENDOR_PRIVATE:
2683 if (tmp < ISIS_TLV_VENDOR_PRIVATE_MINLEN)
2684 break;
2685 if (!TTEST2(*tptr, ISIS_TLV_VENDOR_PRIVATE_MINLEN)) /* check if enough byte for a full oui */
2686 goto trunctlv;
2687 vendor_id = EXTRACT_24BITS(tptr);
2688 printf("\n\t Vendor: %s (%u)",
2689 tok2str(oui_values,"Unknown",vendor_id),
2690 vendor_id);
2691 tptr+=3;
2692 tmp-=3;
2693 if (tmp > 0) /* hexdump the rest */
2694 if(!print_unknown_data(tptr,"\n\t\t",tmp))
2695 return(0);
2696 break;
2697 /*
2698 * FIXME those are the defined TLVs that lack a decoder
2699 * you are welcome to contribute code ;-)
2700 */
2701
2702 case ISIS_TLV_DECNET_PHASE4:
2703 case ISIS_TLV_LUCENT_PRIVATE:
2704 case ISIS_TLV_IPAUTH:
2705 case ISIS_TLV_NORTEL_PRIVATE1:
2706 case ISIS_TLV_NORTEL_PRIVATE2:
2707
2708 default:
2709 if (vflag <= 1) {
2710 if(!print_unknown_data(pptr,"\n\t\t",tlv_len))
2711 return(0);
2712 }
2713 break;
2714 }
2715 /* do we want to see an additionally hexdump ? */
2716 if (vflag> 1) {
2717 if(!print_unknown_data(pptr,"\n\t ",tlv_len))
2718 return(0);
2719 }
2720
2721 pptr += tlv_len;
2722 packet_len -= tlv_len;
2723 }
2724
2725 if (packet_len != 0) {
2726 printf("\n\t %u straggler bytes", packet_len);
2727 }
2728 return (1);
2729
2730 trunc:
2731 fputs("[|isis]", stdout);
2732 return (1);
2733
2734 trunctlv:
2735 printf("\n\t\t packet exceeded snapshot");
2736 return(1);
2737 }
2738
2739 static void
2740 osi_print_cksum (const u_int8_t *pptr, u_int16_t checksum,
2741 u_int checksum_offset, u_int length)
2742 {
2743 u_int16_t calculated_checksum;
2744
2745 /* do not attempt to verify the checksum if it is zero */
2746 if (!checksum) {
2747 printf("(unverified)");
2748 } else {
2749 calculated_checksum = create_osi_cksum(pptr, checksum_offset, length);
2750 if (checksum == calculated_checksum) {
2751 printf(" (correct)");
2752 } else {
2753 printf(" (incorrect should be 0x%04x)", calculated_checksum);
2754 }
2755 }
2756 }
2757
2758 /*
2759 * Local Variables:
2760 * c-style: whitesmith
2761 * c-basic-offset: 8
2762 * End:
2763 */
DragonFly BSD