]> The Tcpdump Group git mirrors - tcpdump/blob - print-isoclns.c
projects / tcpdump / blob


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