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