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