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