]> The Tcpdump Group git mirrors - tcpdump/blob - print-bgp.c
from Gino Barille <[email protected]>:
[tcpdump] / print-bgp.c
1 /*
2 * Copyright (C) 1999 WIDE Project.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. Neither the name of the project nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 *
29 * Extensively modified by Hannes Gredler (hannes@juniper.net) for more
30 * complete BGP support.
31 */
32
33 #ifdef HAVE_CONFIG_H
34 #include "config.h"
35 #endif
36
37 #ifndef lint
38 static const char rcsid[] _U_ =
39 "@(#) $Header: /tcpdump/master/tcpdump/print-bgp.c,v 1.102 2006-06-13 17:15:28 hannes Exp $";
40 #endif
41
42 #include <tcpdump-stdinc.h>
43
44 #include <stdio.h>
45 #include <string.h>
46
47 #include "interface.h"
48 #include "decode_prefix.h"
49 #include "addrtoname.h"
50 #include "extract.h"
51 #include "bgp.h"
52 #include "af.h"
53 #include "l2vpn.h"
54
55 struct bgp {
56 u_int8_t bgp_marker[16];
57 u_int16_t bgp_len;
58 u_int8_t bgp_type;
59 };
60 #define BGP_SIZE 19 /* unaligned */
61
62 #define BGP_OPEN 1
63 #define BGP_UPDATE 2
64 #define BGP_NOTIFICATION 3
65 #define BGP_KEEPALIVE 4
66 #define BGP_ROUTE_REFRESH 5
67
68 static struct tok bgp_msg_values[] = {
69 { BGP_OPEN, "Open"},
70 { BGP_UPDATE, "Update"},
71 { BGP_NOTIFICATION, "Notification"},
72 { BGP_KEEPALIVE, "Keepalive"},
73 { BGP_ROUTE_REFRESH, "Route Refresh"},
74 { 0, NULL}
75 };
76
77 struct bgp_open {
78 u_int8_t bgpo_marker[16];
79 u_int16_t bgpo_len;
80 u_int8_t bgpo_type;
81 u_int8_t bgpo_version;
82 u_int16_t bgpo_myas;
83 u_int16_t bgpo_holdtime;
84 u_int32_t bgpo_id;
85 u_int8_t bgpo_optlen;
86 /* options should follow */
87 };
88 #define BGP_OPEN_SIZE 29 /* unaligned */
89
90 struct bgp_opt {
91 u_int8_t bgpopt_type;
92 u_int8_t bgpopt_len;
93 /* variable length */
94 };
95 #define BGP_OPT_SIZE 2 /* some compilers may pad to 4 bytes */
96
97 #define BGP_UPDATE_MINSIZE 23
98
99 struct bgp_notification {
100 u_int8_t bgpn_marker[16];
101 u_int16_t bgpn_len;
102 u_int8_t bgpn_type;
103 u_int8_t bgpn_major;
104 u_int8_t bgpn_minor;
105 };
106 #define BGP_NOTIFICATION_SIZE 21 /* unaligned */
107
108 struct bgp_route_refresh {
109 u_int8_t bgp_marker[16];
110 u_int16_t len;
111 u_int8_t type;
112 u_int8_t afi[2]; /* the compiler messes this structure up */
113 u_int8_t res; /* when doing misaligned sequences of int8 and int16 */
114 u_int8_t safi; /* afi should be int16 - so we have to access it using */
115 }; /* EXTRACT_16BITS(&bgp_route_refresh->afi) (sigh) */
116 #define BGP_ROUTE_REFRESH_SIZE 23
117
118 struct bgp_attr {
119 u_int8_t bgpa_flags;
120 u_int8_t bgpa_type;
121 union {
122 u_int8_t len;
123 u_int16_t elen;
124 } bgpa_len;
125 #define bgp_attr_len(p) \
126 (((p)->bgpa_flags & 0x10) ? \
127 EXTRACT_16BITS(&(p)->bgpa_len.elen) : (p)->bgpa_len.len)
128 #define bgp_attr_off(p) \
129 (((p)->bgpa_flags & 0x10) ? 4 : 3)
130 };
131
132 #define BGPTYPE_ORIGIN 1
133 #define BGPTYPE_AS_PATH 2
134 #define BGPTYPE_NEXT_HOP 3
135 #define BGPTYPE_MULTI_EXIT_DISC 4
136 #define BGPTYPE_LOCAL_PREF 5
137 #define BGPTYPE_ATOMIC_AGGREGATE 6
138 #define BGPTYPE_AGGREGATOR 7
139 #define BGPTYPE_COMMUNITIES 8 /* RFC1997 */
140 #define BGPTYPE_ORIGINATOR_ID 9 /* RFC1998 */
141 #define BGPTYPE_CLUSTER_LIST 10 /* RFC1998 */
142 #define BGPTYPE_DPA 11 /* draft-ietf-idr-bgp-dpa */
143 #define BGPTYPE_ADVERTISERS 12 /* RFC1863 */
144 #define BGPTYPE_RCID_PATH 13 /* RFC1863 */
145 #define BGPTYPE_MP_REACH_NLRI 14 /* RFC2283 */
146 #define BGPTYPE_MP_UNREACH_NLRI 15 /* RFC2283 */
147 #define BGPTYPE_EXTD_COMMUNITIES 16 /* draft-ietf-idr-bgp-ext-communities */
148 #define BGPTYPE_ATTR_SET 128 /* draft-marques-ppvpn-ibgp */
149
150 #define BGP_MP_NLRI_MINSIZE 3 /* End of RIB Marker detection */
151
152 static struct tok bgp_attr_values[] = {
153 { BGPTYPE_ORIGIN, "Origin"},
154 { BGPTYPE_AS_PATH, "AS Path"},
155 { BGPTYPE_NEXT_HOP, "Next Hop"},
156 { BGPTYPE_MULTI_EXIT_DISC, "Multi Exit Discriminator"},
157 { BGPTYPE_LOCAL_PREF, "Local Preference"},
158 { BGPTYPE_ATOMIC_AGGREGATE, "Atomic Aggregate"},
159 { BGPTYPE_AGGREGATOR, "Aggregator"},
160 { BGPTYPE_COMMUNITIES, "Community"},
161 { BGPTYPE_ORIGINATOR_ID, "Originator ID"},
162 { BGPTYPE_CLUSTER_LIST, "Cluster List"},
163 { BGPTYPE_DPA, "DPA"},
164 { BGPTYPE_ADVERTISERS, "Advertisers"},
165 { BGPTYPE_RCID_PATH, "RCID Path / Cluster ID"},
166 { BGPTYPE_MP_REACH_NLRI, "Multi-Protocol Reach NLRI"},
167 { BGPTYPE_MP_UNREACH_NLRI, "Multi-Protocol Unreach NLRI"},
168 { BGPTYPE_EXTD_COMMUNITIES, "Extended Community"},
169 { BGPTYPE_ATTR_SET, "Attribute Set"},
170 { 255, "Reserved for development"},
171 { 0, NULL}
172 };
173
174 #define BGP_AS_SET 1
175 #define BGP_AS_SEQUENCE 2
176 #define BGP_CONFED_AS_SEQUENCE 3 /* draft-ietf-idr-rfc3065bis-01 */
177 #define BGP_CONFED_AS_SET 4 /* draft-ietf-idr-rfc3065bis-01 */
178
179 static struct tok bgp_as_path_segment_open_values[] = {
180 { BGP_AS_SEQUENCE, ""},
181 { BGP_AS_SET, "{ "},
182 { BGP_CONFED_AS_SEQUENCE, "( "},
183 { BGP_CONFED_AS_SET, "({ "},
184 { 0, NULL}
185 };
186
187 static struct tok bgp_as_path_segment_close_values[] = {
188 { BGP_AS_SEQUENCE, ""},
189 { BGP_AS_SET, "}"},
190 { BGP_CONFED_AS_SEQUENCE, ")"},
191 { BGP_CONFED_AS_SET, "})"},
192 { 0, NULL}
193 };
194
195 #define BGP_OPT_AUTH 1
196 #define BGP_OPT_CAP 2
197
198
199 static struct tok bgp_opt_values[] = {
200 { BGP_OPT_AUTH, "Authentication Information"},
201 { BGP_OPT_CAP, "Capabilities Advertisement"},
202 { 0, NULL}
203 };
204
205 #define BGP_CAPCODE_MP 1
206 #define BGP_CAPCODE_RR 2
207 #define BGP_CAPCODE_ORF 3 /* XXX */
208 #define BGP_CAPCODE_RESTART 64 /* draft-ietf-idr-restart-05 */
209 #define BGP_CAPCODE_AS_NEW 65 /* XXX */
210 #define BGP_CAPCODE_DYN_CAP 67 /* XXX */
211 #define BGP_CAPCODE_RR_CISCO 128
212
213 static struct tok bgp_capcode_values[] = {
214 { BGP_CAPCODE_MP, "Multiprotocol Extensions"},
215 { BGP_CAPCODE_RR, "Route Refresh"},
216 { BGP_CAPCODE_ORF, "Cooperative Route Filtering"},
217 { BGP_CAPCODE_RESTART, "Graceful Restart"},
218 { BGP_CAPCODE_AS_NEW, "32-Bit AS Number"},
219 { BGP_CAPCODE_DYN_CAP, "Dynamic Capability"},
220 { BGP_CAPCODE_RR_CISCO, "Route Refresh (Cisco)"},
221 { 0, NULL}
222 };
223
224 #define BGP_NOTIFY_MAJOR_MSG 1
225 #define BGP_NOTIFY_MAJOR_OPEN 2
226 #define BGP_NOTIFY_MAJOR_UPDATE 3
227 #define BGP_NOTIFY_MAJOR_HOLDTIME 4
228 #define BGP_NOTIFY_MAJOR_FSM 5
229 #define BGP_NOTIFY_MAJOR_CEASE 6
230 #define BGP_NOTIFY_MAJOR_CAP 7
231
232 static struct tok bgp_notify_major_values[] = {
233 { BGP_NOTIFY_MAJOR_MSG, "Message Header Error"},
234 { BGP_NOTIFY_MAJOR_OPEN, "OPEN Message Error"},
235 { BGP_NOTIFY_MAJOR_UPDATE, "UPDATE Message Error"},
236 { BGP_NOTIFY_MAJOR_HOLDTIME,"Hold Timer Expired"},
237 { BGP_NOTIFY_MAJOR_FSM, "Finite State Machine Error"},
238 { BGP_NOTIFY_MAJOR_CEASE, "Cease"},
239 { BGP_NOTIFY_MAJOR_CAP, "Capability Message Error"},
240 { 0, NULL}
241 };
242
243 /* draft-ietf-idr-cease-subcode-02 */
244 #define BGP_NOTIFY_MINOR_CEASE_MAXPRFX 1
245 static struct tok bgp_notify_minor_cease_values[] = {
246 { BGP_NOTIFY_MINOR_CEASE_MAXPRFX, "Maximum Number of Prefixes Reached"},
247 { 2, "Administratively Shutdown"},
248 { 3, "Peer Unconfigured"},
249 { 4, "Administratively Reset"},
250 { 5, "Connection Rejected"},
251 { 6, "Other Configuration Change"},
252 { 7, "Connection Collision Resolution"},
253 { 0, NULL}
254 };
255
256 static struct tok bgp_notify_minor_msg_values[] = {
257 { 1, "Connection Not Synchronized"},
258 { 2, "Bad Message Length"},
259 { 3, "Bad Message Type"},
260 { 0, NULL}
261 };
262
263 static struct tok bgp_notify_minor_open_values[] = {
264 { 1, "Unsupported Version Number"},
265 { 2, "Bad Peer AS"},
266 { 3, "Bad BGP Identifier"},
267 { 4, "Unsupported Optional Parameter"},
268 { 5, "Authentication Failure"},
269 { 6, "Unacceptable Hold Time"},
270 { 7, "Capability Message Error"},
271 { 0, NULL}
272 };
273
274 static struct tok bgp_notify_minor_update_values[] = {
275 { 1, "Malformed Attribute List"},
276 { 2, "Unrecognized Well-known Attribute"},
277 { 3, "Missing Well-known Attribute"},
278 { 4, "Attribute Flags Error"},
279 { 5, "Attribute Length Error"},
280 { 6, "Invalid ORIGIN Attribute"},
281 { 7, "AS Routing Loop"},
282 { 8, "Invalid NEXT_HOP Attribute"},
283 { 9, "Optional Attribute Error"},
284 { 10, "Invalid Network Field"},
285 { 11, "Malformed AS_PATH"},
286 { 0, NULL}
287 };
288
289 static struct tok bgp_notify_minor_cap_values[] = {
290 { 1, "Invalid Action Value" },
291 { 2, "Invalid Capability Length" },
292 { 3, "Malformed Capability Value" },
293 { 4, "Unsupported Capability Code" },
294 { 0, NULL }
295 };
296
297 static struct tok bgp_origin_values[] = {
298 { 0, "IGP"},
299 { 1, "EGP"},
300 { 2, "Incomplete"},
301 { 0, NULL}
302 };
303
304 /* Subsequent address family identifier, RFC2283 section 7 */
305 #define SAFNUM_RES 0
306 #define SAFNUM_UNICAST 1
307 #define SAFNUM_MULTICAST 2
308 #define SAFNUM_UNIMULTICAST 3
309 /* labeled BGP RFC3107 */
310 #define SAFNUM_LABUNICAST 4
311 #define SAFNUM_TUNNEL 64 /* XXX */
312 #define SAFNUM_VPLS 65 /* XXX */
313 #define SAFNUM_MDT 66 /* XXX */
314 /* Section 4.3.4 of draft-rosen-rfc2547bis-03.txt */
315 #define SAFNUM_VPNUNICAST 128
316 #define SAFNUM_VPNMULTICAST 129
317 #define SAFNUM_VPNUNIMULTICAST 130
318 /* draft-marques-ppvpn-rt-constrain-01.txt */
319 #define SAFNUM_RT_ROUTING_INFO 132
320
321 #define BGP_VPN_RD_LEN 8
322
323 static struct tok bgp_safi_values[] = {
324 { SAFNUM_RES, "Reserved"},
325 { SAFNUM_UNICAST, "Unicast"},
326 { SAFNUM_MULTICAST, "Multicast"},
327 { SAFNUM_UNIMULTICAST, "Unicast+Multicast"},
328 { SAFNUM_LABUNICAST, "labeled Unicast"},
329 { SAFNUM_TUNNEL, "Tunnel"},
330 { SAFNUM_VPLS, "VPLS"},
331 { SAFNUM_MDT, "MDT"},
332 { SAFNUM_VPNUNICAST, "labeled VPN Unicast"},
333 { SAFNUM_VPNMULTICAST, "labeled VPN Multicast"},
334 { SAFNUM_VPNUNIMULTICAST, "labeled VPN Unicast+Multicast"},
335 { SAFNUM_RT_ROUTING_INFO, "Route Target Routing Information"}, /* draft-marques-ppvpn-rt-constrain-01.txt */
336 { 0, NULL }
337 };
338
339 /* well-known community */
340 #define BGP_COMMUNITY_NO_EXPORT 0xffffff01
341 #define BGP_COMMUNITY_NO_ADVERT 0xffffff02
342 #define BGP_COMMUNITY_NO_EXPORT_SUBCONFED 0xffffff03
343
344 /* Extended community type - draft-ietf-idr-bgp-ext-communities-05 */
345 #define BGP_EXT_COM_RT_0 0x0002 /* Route Target,Format AS(2bytes):AN(4bytes) */
346 #define BGP_EXT_COM_RT_1 0x0102 /* Route Target,Format IP address:AN(2bytes) */
347 #define BGP_EXT_COM_RT_2 0x0202 /* Route Target,Format AN(4bytes):local(2bytes) */
348 #define BGP_EXT_COM_RO_0 0x0003 /* Route Origin,Format AS(2bytes):AN(4bytes) */
349 #define BGP_EXT_COM_RO_1 0x0103 /* Route Origin,Format IP address:AN(2bytes) */
350 #define BGP_EXT_COM_RO_2 0x0203 /* Route Origin,Format AN(4bytes):local(2bytes) */
351 #define BGP_EXT_COM_LINKBAND 0x4004 /* Link Bandwidth,Format AS(2B):Bandwidth(4B) */
352 /* rfc2547 bgp-mpls-vpns */
353 #define BGP_EXT_COM_CISCO_MCAST 0x0009 /* cisco proprietary */
354
355 #define BGP_EXT_COM_VPN_ORIGIN 0x0005 /* OSPF Domain ID / VPN of Origin - draft-rosen-vpns-ospf-bgp-mpls */
356 #define BGP_EXT_COM_VPN_ORIGIN2 0x0105 /* duplicate - keep for backwards compatability */
357 #define BGP_EXT_COM_VPN_ORIGIN3 0x0205 /* duplicate - keep for backwards compatability */
358 #define BGP_EXT_COM_VPN_ORIGIN4 0x8005 /* duplicate - keep for backwards compatability */
359
360 #define BGP_EXT_COM_OSPF_RTYPE 0x0306 /* OSPF Route Type,Format Area(4B):RouteType(1B):Options(1B) */
361 #define BGP_EXT_COM_OSPF_RTYPE2 0x8000 /* duplicate - keep for backwards compatability */
362
363 #define BGP_EXT_COM_OSPF_RID 0x0107 /* OSPF Router ID,Format RouterID(4B):Unused(2B) */
364 #define BGP_EXT_COM_OSPF_RID2 0x8001 /* duplicate - keep for backwards compatability */
365
366 #define BGP_EXT_COM_L2INFO 0x800a /* draft-kompella-ppvpn-l2vpn */
367
368 /* http://www.cisco.com/en/US/tech/tk436/tk428/technologies_tech_note09186a00801eb09a.shtml */
369 #define BGP_EXT_COM_EIGRP_GEN 0x8800
370 #define BGP_EXT_COM_EIGRP_METRIC_AS_DELAY 0x8801
371 #define BGP_EXT_COM_EIGRP_METRIC_REL_NH_BW 0x8802
372 #define BGP_EXT_COM_EIGRP_METRIC_LOAD_MTU 0x8803
373 #define BGP_EXT_COM_EIGRP_EXT_REMAS_REMID 0x8804
374 #define BGP_EXT_COM_EIGRP_EXT_REMPROTO_REMMETRIC 0x8805
375
376 static struct tok bgp_extd_comm_flag_values[] = {
377 { 0x8000, "vendor-specific"},
378 { 0x4000, "non-transitive"},
379 { 0, NULL},
380 };
381
382 static struct tok bgp_extd_comm_subtype_values[] = {
383 { BGP_EXT_COM_RT_0, "target"},
384 { BGP_EXT_COM_RT_1, "target"},
385 { BGP_EXT_COM_RT_2, "target"},
386 { BGP_EXT_COM_RO_0, "origin"},
387 { BGP_EXT_COM_RO_1, "origin"},
388 { BGP_EXT_COM_RO_2, "origin"},
389 { BGP_EXT_COM_LINKBAND, "link-BW"},
390 { BGP_EXT_COM_CISCO_MCAST, "mdt-group"},
391 { BGP_EXT_COM_VPN_ORIGIN, "ospf-domain"},
392 { BGP_EXT_COM_VPN_ORIGIN2, "ospf-domain"},
393 { BGP_EXT_COM_VPN_ORIGIN3, "ospf-domain"},
394 { BGP_EXT_COM_VPN_ORIGIN4, "ospf-domain"},
395 { BGP_EXT_COM_OSPF_RTYPE, "ospf-route-type"},
396 { BGP_EXT_COM_OSPF_RTYPE2, "ospf-route-type"},
397 { BGP_EXT_COM_OSPF_RID, "ospf-router-id"},
398 { BGP_EXT_COM_OSPF_RID2, "ospf-router-id"},
399 { BGP_EXT_COM_L2INFO, "layer2-info"},
400 { BGP_EXT_COM_EIGRP_GEN , "eigrp-general-route (flag, tag)" },
401 { BGP_EXT_COM_EIGRP_METRIC_AS_DELAY , "eigrp-route-metric (AS, delay)" },
402 { BGP_EXT_COM_EIGRP_METRIC_REL_NH_BW , "eigrp-route-metric (reliability, nexthop, bandwidth)" },
403 { BGP_EXT_COM_EIGRP_METRIC_LOAD_MTU , "eigrp-route-metric (load, MTU)" },
404 { BGP_EXT_COM_EIGRP_EXT_REMAS_REMID , "eigrp-external-route (remote-AS, remote-ID)" },
405 { BGP_EXT_COM_EIGRP_EXT_REMPROTO_REMMETRIC , "eigrp-external-route (remote-proto, remote-metric)" },
406 { 0, NULL},
407 };
408
409 /* OSPF codes for BGP_EXT_COM_OSPF_RTYPE draft-rosen-vpns-ospf-bgp-mpls */
410 #define BGP_OSPF_RTYPE_RTR 1 /* OSPF Router LSA */
411 #define BGP_OSPF_RTYPE_NET 2 /* OSPF Network LSA */
412 #define BGP_OSPF_RTYPE_SUM 3 /* OSPF Summary LSA */
413 #define BGP_OSPF_RTYPE_EXT 5 /* OSPF External LSA, note that ASBR doesn't apply to MPLS-VPN */
414 #define BGP_OSPF_RTYPE_NSSA 7 /* OSPF NSSA External*/
415 #define BGP_OSPF_RTYPE_SHAM 129 /* OSPF-MPLS-VPN Sham link */
416 #define BGP_OSPF_RTYPE_METRIC_TYPE 0x1 /* LSB of RTYPE Options Field */
417
418 static struct tok bgp_extd_comm_ospf_rtype_values[] = {
419 { BGP_OSPF_RTYPE_RTR, "Router" },
420 { BGP_OSPF_RTYPE_NET, "Network" },
421 { BGP_OSPF_RTYPE_SUM, "Summary" },
422 { BGP_OSPF_RTYPE_EXT, "External" },
423 { BGP_OSPF_RTYPE_NSSA,"NSSA External" },
424 { BGP_OSPF_RTYPE_SHAM,"MPLS-VPN Sham" },
425 { 0, NULL },
426 };
427
428 int
429 decode_prefix4(const u_char *pptr, char *buf, u_int buflen)
430 {
431 struct in_addr addr;
432 u_int plen;
433
434 TCHECK(pptr[0]);
435 plen = pptr[0];
436 if (32 < plen)
437 return -1;
438
439 memset(&addr, 0, sizeof(addr));
440 TCHECK2(pptr[1], (plen + 7) / 8);
441 memcpy(&addr, &pptr[1], (plen + 7) / 8);
442 if (plen % 8) {
443 ((u_char *)&addr)[(plen + 7) / 8 - 1] &=
444 ((0xff00 >> (plen % 8)) & 0xff);
445 }
446 snprintf(buf, buflen, "%s/%d", getname((u_char *)&addr), plen);
447 return 1 + (plen + 7) / 8;
448
449 trunc:
450 return -2;
451 }
452
453 static int
454 decode_labeled_prefix4(const u_char *pptr, char *buf, u_int buflen)
455 {
456 struct in_addr addr;
457 u_int plen;
458
459 TCHECK(pptr[0]);
460 plen = pptr[0]; /* get prefix length */
461
462 /* this is one of the weirdnesses of rfc3107
463 the label length (actually the label + COS bits)
464 is added to the prefix length;
465 we also do only read out just one label -
466 there is no real application for advertisement of
467 stacked labels in a a single BGP message
468 */
469
470 if (24 > plen)
471 return -1;
472
473 plen-=24; /* adjust prefixlen - labellength */
474
475 if (32 < plen)
476 return -1;
477
478 memset(&addr, 0, sizeof(addr));
479 TCHECK2(pptr[4], (plen + 7) / 8);
480 memcpy(&addr, &pptr[4], (plen + 7) / 8);
481 if (plen % 8) {
482 ((u_char *)&addr)[(plen + 7) / 8 - 1] &=
483 ((0xff00 >> (plen % 8)) & 0xff);
484 }
485 /* the label may get offsetted by 4 bits so lets shift it right */
486 snprintf(buf, buflen, "%s/%d, label:%u %s",
487 getname((u_char *)&addr),
488 plen,
489 EXTRACT_24BITS(pptr+1)>>4,
490 ((pptr[3]&1)==0) ? "(BOGUS: Bottom of Stack NOT set!)" : "(bottom)" );
491
492 return 4 + (plen + 7) / 8;
493
494 trunc:
495 return -2;
496 }
497
498 /* RDs and RTs share the same semantics
499 * we use bgp_vpn_rd_print for
500 * printing route targets inside a NLRI */
501 char *
502 bgp_vpn_rd_print (const u_char *pptr) {
503
504 /* allocate space for the largest possible string */
505 static char rd[sizeof("xxxxxxxxxx:xxxxx (xxx.xxx.xxx.xxx:xxxxx)")];
506 char *pos = rd;
507
508 /* ok lets load the RD format */
509 switch (EXTRACT_16BITS(pptr)) {
510
511 /* AS:IP-address fmt*/
512 case 0:
513 snprintf(pos, sizeof(rd) - (pos - rd), "%u:%u.%u.%u.%u",
514 EXTRACT_16BITS(pptr+2), *(pptr+4), *(pptr+5), *(pptr+6), *(pptr+7));
515 break;
516 /* IP-address:AS fmt*/
517
518 case 1:
519 snprintf(pos, sizeof(rd) - (pos - rd), "%u.%u.%u.%u:%u",
520 *(pptr+2), *(pptr+3), *(pptr+4), *(pptr+5), EXTRACT_16BITS(pptr+6));
521 break;
522
523 /* 4-byte-AS:number fmt*/
524 case 2:
525 snprintf(pos, sizeof(rd) - (pos - rd), "%u:%u (%u.%u.%u.%u:%u)",
526 EXTRACT_32BITS(pptr+2), EXTRACT_16BITS(pptr+6),
527 *(pptr+2), *(pptr+3), *(pptr+4), *(pptr+5), EXTRACT_16BITS(pptr+6));
528 break;
529 default:
530 snprintf(pos, sizeof(rd) - (pos - rd), "unknown RD format");
531 break;
532 }
533 pos += strlen(pos);
534 *(pos) = '\0';
535 return (rd);
536 }
537
538 static int
539 decode_rt_routing_info(const u_char *pptr, char *buf, u_int buflen)
540 {
541 u_int8_t route_target[8];
542 u_int plen;
543
544 TCHECK(pptr[0]);
545 plen = pptr[0]; /* get prefix length */
546
547 if (0 == plen)
548 return 1; /* default route target */
549
550 if (32 > plen)
551 return -1;
552
553 plen-=32; /* adjust prefix length */
554
555 if (64 < plen)
556 return -1;
557
558 memset(&route_target, 0, sizeof(route_target));
559 TCHECK2(pptr[1], (plen + 7) / 8);
560 memcpy(&route_target, &pptr[1], (plen + 7) / 8);
561 if (plen % 8) {
562 ((u_char *)&route_target)[(plen + 7) / 8 - 1] &=
563 ((0xff00 >> (plen % 8)) & 0xff);
564 }
565 snprintf(buf, buflen, "origin AS: %u, route target %s",
566 EXTRACT_32BITS(pptr+1),
567 bgp_vpn_rd_print((u_char *)&route_target));
568
569 return 5 + (plen + 7) / 8;
570
571 trunc:
572 return -2;
573 }
574
575 static int
576 decode_labeled_vpn_prefix4(const u_char *pptr, char *buf, u_int buflen)
577 {
578 struct in_addr addr;
579 u_int plen;
580
581 TCHECK(pptr[0]);
582 plen = pptr[0]; /* get prefix length */
583
584 if ((24+64) > plen)
585 return -1;
586
587 plen-=(24+64); /* adjust prefixlen - labellength - RD len*/
588
589 if (32 < plen)
590 return -1;
591
592 memset(&addr, 0, sizeof(addr));
593 TCHECK2(pptr[12], (plen + 7) / 8);
594 memcpy(&addr, &pptr[12], (plen + 7) / 8);
595 if (plen % 8) {
596 ((u_char *)&addr)[(plen + 7) / 8 - 1] &=
597 ((0xff00 >> (plen % 8)) & 0xff);
598 }
599 /* the label may get offsetted by 4 bits so lets shift it right */
600 snprintf(buf, buflen, "RD: %s, %s/%d, label:%u %s",
601 bgp_vpn_rd_print(pptr+4),
602 getname((u_char *)&addr),
603 plen,
604 EXTRACT_24BITS(pptr+1)>>4,
605 ((pptr[3]&1)==0) ? "(BOGUS: Bottom of Stack NOT set!)" : "(bottom)" );
606
607 return 12 + (plen + 7) / 8;
608
609 trunc:
610 return -2;
611 }
612
613 static int
614 decode_labeled_vpn_l2(const u_char *pptr, char *buf, u_int buflen)
615 {
616 int plen,tlen,strlen,tlv_type,tlv_len,ttlv_len;
617
618 TCHECK2(pptr[0], 2);
619 plen=EXTRACT_16BITS(pptr);
620 tlen=plen;
621 pptr+=2;
622 TCHECK2(pptr[0],15);
623 strlen=snprintf(buf, buflen, "RD: %s, CE-ID: %u, Label-Block Offset: %u, Label Base %u",
624 bgp_vpn_rd_print(pptr),
625 EXTRACT_16BITS(pptr+8),
626 EXTRACT_16BITS(pptr+10),
627 EXTRACT_24BITS(pptr+12)>>4); /* the label is offsetted by 4 bits so lets shift it right */
628 pptr+=15;
629 tlen-=15;
630
631 /* ok now the variable part - lets read out TLVs*/
632 while (tlen>0) {
633 if (tlen < 3)
634 return -1;
635 TCHECK2(pptr[0], 3);
636 tlv_type=*pptr++;
637 tlv_len=EXTRACT_16BITS(pptr);
638 ttlv_len=tlv_len;
639 pptr+=2;
640
641 switch(tlv_type) {
642 case 1:
643 strlen+=snprintf(buf+strlen,buflen-strlen, "\n\t\tcircuit status vector (%u) length: %u: 0x",
644 tlv_type,
645 tlv_len);
646 ttlv_len=ttlv_len/8+1; /* how many bytes do we need to read ? */
647 while (ttlv_len>0) {
648 TCHECK(pptr[0]);
649 strlen+=snprintf(buf+strlen,buflen-strlen, "%02x",*pptr++);
650 ttlv_len--;
651 }
652 break;
653 default:
654 snprintf(buf+strlen,buflen-strlen, "\n\t\tunknown TLV #%u, length: %u",
655 tlv_type,
656 tlv_len);
657 break;
658 }
659 tlen-=(tlv_len<<3); /* the tlv-length is expressed in bits so lets shift it tright */
660 }
661 return plen+2;
662
663 trunc:
664 return -2;
665 }
666
667 #ifdef INET6
668 int
669 decode_prefix6(const u_char *pd, char *buf, u_int buflen)
670 {
671 struct in6_addr addr;
672 u_int plen;
673
674 TCHECK(pd[0]);
675 plen = pd[0];
676 if (128 < plen)
677 return -1;
678
679 memset(&addr, 0, sizeof(addr));
680 TCHECK2(pd[1], (plen + 7) / 8);
681 memcpy(&addr, &pd[1], (plen + 7) / 8);
682 if (plen % 8) {
683 addr.s6_addr[(plen + 7) / 8 - 1] &=
684 ((0xff00 >> (plen % 8)) & 0xff);
685 }
686 snprintf(buf, buflen, "%s/%d", getname6((u_char *)&addr), plen);
687 return 1 + (plen + 7) / 8;
688
689 trunc:
690 return -2;
691 }
692
693 static int
694 decode_labeled_prefix6(const u_char *pptr, char *buf, u_int buflen)
695 {
696 struct in6_addr addr;
697 u_int plen;
698
699 TCHECK(pptr[0]);
700 plen = pptr[0]; /* get prefix length */
701
702 if (24 > plen)
703 return -1;
704
705 plen-=24; /* adjust prefixlen - labellength */
706
707 if (128 < plen)
708 return -1;
709
710 memset(&addr, 0, sizeof(addr));
711 TCHECK2(pptr[4], (plen + 7) / 8);
712 memcpy(&addr, &pptr[4], (plen + 7) / 8);
713 if (plen % 8) {
714 addr.s6_addr[(plen + 7) / 8 - 1] &=
715 ((0xff00 >> (plen % 8)) & 0xff);
716 }
717 /* the label may get offsetted by 4 bits so lets shift it right */
718 snprintf(buf, buflen, "%s/%d, label:%u %s",
719 getname6((u_char *)&addr),
720 plen,
721 EXTRACT_24BITS(pptr+1)>>4,
722 ((pptr[3]&1)==0) ? "(BOGUS: Bottom of Stack NOT set!)" : "(bottom)" );
723
724 return 4 + (plen + 7) / 8;
725
726 trunc:
727 return -2;
728 }
729
730 static int
731 decode_labeled_vpn_prefix6(const u_char *pptr, char *buf, u_int buflen)
732 {
733 struct in6_addr addr;
734 u_int plen;
735
736 TCHECK(pptr[0]);
737 plen = pptr[0]; /* get prefix length */
738
739 if ((24+64) > plen)
740 return -1;
741
742 plen-=(24+64); /* adjust prefixlen - labellength - RD len*/
743
744 if (128 < plen)
745 return -1;
746
747 memset(&addr, 0, sizeof(addr));
748 TCHECK2(pptr[12], (plen + 7) / 8);
749 memcpy(&addr, &pptr[12], (plen + 7) / 8);
750 if (plen % 8) {
751 addr.s6_addr[(plen + 7) / 8 - 1] &=
752 ((0xff00 >> (plen % 8)) & 0xff);
753 }
754 /* the label may get offsetted by 4 bits so lets shift it right */
755 snprintf(buf, buflen, "RD: %s, %s/%d, label:%u %s",
756 bgp_vpn_rd_print(pptr+4),
757 getname6((u_char *)&addr),
758 plen,
759 EXTRACT_24BITS(pptr+1)>>4,
760 ((pptr[3]&1)==0) ? "(BOGUS: Bottom of Stack NOT set!)" : "(bottom)" );
761
762 return 12 + (plen + 7) / 8;
763
764 trunc:
765 return -2;
766 }
767 #endif
768
769 static int
770 decode_clnp_prefix(const u_char *pptr, char *buf, u_int buflen)
771 {
772 u_int8_t addr[19];
773 u_int plen;
774
775 TCHECK(pptr[0]);
776 plen = pptr[0]; /* get prefix length */
777
778 if (152 < plen)
779 return -1;
780
781 memset(&addr, 0, sizeof(addr));
782 TCHECK2(pptr[4], (plen + 7) / 8);
783 memcpy(&addr, &pptr[4], (plen + 7) / 8);
784 if (plen % 8) {
785 addr[(plen + 7) / 8 - 1] &=
786 ((0xff00 >> (plen % 8)) & 0xff);
787 }
788 snprintf(buf, buflen, "%s/%d",
789 isonsap_string(addr,(plen + 7) / 8),
790 plen);
791
792 return 1 + (plen + 7) / 8;
793
794 trunc:
795 return -2;
796 }
797
798 static int
799 decode_labeled_vpn_clnp_prefix(const u_char *pptr, char *buf, u_int buflen)
800 {
801 u_int8_t addr[19];
802 u_int plen;
803
804 TCHECK(pptr[0]);
805 plen = pptr[0]; /* get prefix length */
806
807 if ((24+64) > plen)
808 return -1;
809
810 plen-=(24+64); /* adjust prefixlen - labellength - RD len*/
811
812 if (152 < plen)
813 return -1;
814
815 memset(&addr, 0, sizeof(addr));
816 TCHECK2(pptr[12], (plen + 7) / 8);
817 memcpy(&addr, &pptr[12], (plen + 7) / 8);
818 if (plen % 8) {
819 addr[(plen + 7) / 8 - 1] &=
820 ((0xff00 >> (plen % 8)) & 0xff);
821 }
822 /* the label may get offsetted by 4 bits so lets shift it right */
823 snprintf(buf, buflen, "RD: %s, %s/%d, label:%u %s",
824 bgp_vpn_rd_print(pptr+4),
825 isonsap_string(addr,(plen + 7) / 8),
826 plen,
827 EXTRACT_24BITS(pptr+1)>>4,
828 ((pptr[3]&1)==0) ? "(BOGUS: Bottom of Stack NOT set!)" : "(bottom)" );
829
830 return 12 + (plen + 7) / 8;
831
832 trunc:
833 return -2;
834 }
835
836 static int
837 bgp_attr_print(const struct bgp_attr *attr, const u_char *pptr, int len)
838 {
839 int i;
840 u_int16_t af;
841 u_int8_t safi, snpa, nhlen;
842 union { /* copy buffer for bandwidth values */
843 float f;
844 u_int32_t i;
845 } bw;
846 int advance;
847 int tlen;
848 const u_char *tptr;
849 char buf[MAXHOSTNAMELEN + 100];
850 char tokbuf[TOKBUFSIZE];
851
852 tptr = pptr;
853 tlen=len;
854
855 switch (attr->bgpa_type) {
856 case BGPTYPE_ORIGIN:
857 if (len != 1)
858 printf("invalid len");
859 else {
860 TCHECK(*tptr);
861 printf("%s", tok2strbuf(bgp_origin_values,
862 "Unknown Origin Typecode",
863 tptr[0],
864 tokbuf, sizeof(tokbuf)));
865 }
866 break;
867
868 case BGPTYPE_AS_PATH:
869 if (len % 2) {
870 printf("invalid len");
871 break;
872 }
873 if (!len) {
874 printf("empty");
875 break;
876 }
877
878 while (tptr < pptr + len) {
879 TCHECK(tptr[0]);
880 printf("%s", tok2strbuf(bgp_as_path_segment_open_values,
881 "?", tptr[0],
882 tokbuf, sizeof(tokbuf)));
883 for (i = 0; i < tptr[1] * 2; i += 2) {
884 TCHECK2(tptr[2 + i], 2);
885 printf("%u ", EXTRACT_16BITS(&tptr[2 + i]));
886 }
887 TCHECK(tptr[0]);
888 printf("%s", tok2strbuf(bgp_as_path_segment_close_values,
889 "?", tptr[0],
890 tokbuf, sizeof(tokbuf)));
891 TCHECK(tptr[1]);
892 tptr += 2 + tptr[1] * 2;
893 }
894 break;
895 case BGPTYPE_NEXT_HOP:
896 if (len != 4)
897 printf("invalid len");
898 else {
899 TCHECK2(tptr[0], 4);
900 printf("%s", getname(tptr));
901 }
902 break;
903 case BGPTYPE_MULTI_EXIT_DISC:
904 case BGPTYPE_LOCAL_PREF:
905 if (len != 4)
906 printf("invalid len");
907 else {
908 TCHECK2(tptr[0], 4);
909 printf("%u", EXTRACT_32BITS(tptr));
910 }
911 break;
912 case BGPTYPE_ATOMIC_AGGREGATE:
913 if (len != 0)
914 printf("invalid len");
915 break;
916 case BGPTYPE_AGGREGATOR:
917 if (len != 6) {
918 printf("invalid len");
919 break;
920 }
921 TCHECK2(tptr[0], 6);
922 printf(" AS #%u, origin %s", EXTRACT_16BITS(tptr),
923 getname(tptr + 2));
924 break;
925 case BGPTYPE_COMMUNITIES:
926 if (len % 4) {
927 printf("invalid len");
928 break;
929 }
930 while (tlen>0) {
931 u_int32_t comm;
932 TCHECK2(tptr[0], 4);
933 comm = EXTRACT_32BITS(tptr);
934 switch (comm) {
935 case BGP_COMMUNITY_NO_EXPORT:
936 printf(" NO_EXPORT");
937 break;
938 case BGP_COMMUNITY_NO_ADVERT:
939 printf(" NO_ADVERTISE");
940 break;
941 case BGP_COMMUNITY_NO_EXPORT_SUBCONFED:
942 printf(" NO_EXPORT_SUBCONFED");
943 break;
944 default:
945 printf("%u:%u%s",
946 (comm >> 16) & 0xffff,
947 comm & 0xffff,
948 (tlen>4) ? ", " : "");
949 break;
950 }
951 tlen -=4;
952 tptr +=4;
953 }
954 break;
955 case BGPTYPE_ORIGINATOR_ID:
956 if (len != 4) {
957 printf("invalid len");
958 break;
959 }
960 TCHECK2(tptr[0], 4);
961 printf("%s",getname(tptr));
962 break;
963 case BGPTYPE_CLUSTER_LIST:
964 if (len % 4) {
965 printf("invalid len");
966 break;
967 }
968 while (tlen>0) {
969 TCHECK2(tptr[0], 4);
970 printf("%s%s",
971 getname(tptr),
972 (tlen>4) ? ", " : "");
973 tlen -=4;
974 tptr +=4;
975 }
976 break;
977 case BGPTYPE_MP_REACH_NLRI:
978 TCHECK2(tptr[0], 3);
979 af = EXTRACT_16BITS(tptr);
980 safi = tptr[2];
981
982 printf("\n\t AFI: %s (%u), %sSAFI: %s (%u)",
983 tok2strbuf(af_values, "Unknown AFI", af,
984 tokbuf, sizeof(tokbuf)),
985 af,
986 (safi>128) ? "vendor specific " : "", /* 128 is meanwhile wellknown */
987 tok2strbuf(bgp_safi_values, "Unknown SAFI", safi,
988 tokbuf, sizeof(tokbuf)),
989 safi);
990
991 switch(af<<8 | safi) {
992 case (AFNUM_INET<<8 | SAFNUM_UNICAST):
993 case (AFNUM_INET<<8 | SAFNUM_MULTICAST):
994 case (AFNUM_INET<<8 | SAFNUM_UNIMULTICAST):
995 case (AFNUM_INET<<8 | SAFNUM_LABUNICAST):
996 case (AFNUM_INET<<8 | SAFNUM_RT_ROUTING_INFO):
997 case (AFNUM_INET<<8 | SAFNUM_VPNUNICAST):
998 case (AFNUM_INET<<8 | SAFNUM_VPNMULTICAST):
999 case (AFNUM_INET<<8 | SAFNUM_VPNUNIMULTICAST):
1000 #ifdef INET6
1001 case (AFNUM_INET6<<8 | SAFNUM_UNICAST):
1002 case (AFNUM_INET6<<8 | SAFNUM_MULTICAST):
1003 case (AFNUM_INET6<<8 | SAFNUM_UNIMULTICAST):
1004 case (AFNUM_INET6<<8 | SAFNUM_LABUNICAST):
1005 case (AFNUM_INET6<<8 | SAFNUM_RT_ROUTING_INFO):
1006 case (AFNUM_INET6<<8 | SAFNUM_VPNUNICAST):
1007 case (AFNUM_INET6<<8 | SAFNUM_VPNMULTICAST):
1008 case (AFNUM_INET6<<8 | SAFNUM_VPNUNIMULTICAST):
1009 #endif
1010 case (AFNUM_NSAP<<8 | SAFNUM_UNICAST):
1011 case (AFNUM_NSAP<<8 | SAFNUM_MULTICAST):
1012 case (AFNUM_NSAP<<8 | SAFNUM_UNIMULTICAST):
1013 case (AFNUM_NSAP<<8 | SAFNUM_VPNUNICAST):
1014 case (AFNUM_NSAP<<8 | SAFNUM_VPNMULTICAST):
1015 case (AFNUM_NSAP<<8 | SAFNUM_VPNUNIMULTICAST):
1016 case (AFNUM_L2VPN<<8 | SAFNUM_VPNUNICAST):
1017 case (AFNUM_L2VPN<<8 | SAFNUM_VPNMULTICAST):
1018 case (AFNUM_L2VPN<<8 | SAFNUM_VPNUNIMULTICAST):
1019 case (AFNUM_VPLS<<8 | SAFNUM_VPLS):
1020 break;
1021 default:
1022 TCHECK2(tptr[0], tlen);
1023 printf("\n\t no AFI %u / SAFI %u decoder",af,safi);
1024 if (vflag <= 1)
1025 print_unknown_data(tptr,"\n\t ",tlen);
1026 goto done;
1027 break;
1028 }
1029
1030 tptr +=3;
1031
1032 TCHECK(tptr[0]);
1033 nhlen = tptr[0];
1034 tlen = nhlen;
1035 tptr++;
1036
1037 if (tlen) {
1038 printf("\n\t nexthop: ");
1039 while (tlen > 0) {
1040 switch(af<<8 | safi) {
1041 case (AFNUM_INET<<8 | SAFNUM_UNICAST):
1042 case (AFNUM_INET<<8 | SAFNUM_MULTICAST):
1043 case (AFNUM_INET<<8 | SAFNUM_UNIMULTICAST):
1044 case (AFNUM_INET<<8 | SAFNUM_LABUNICAST):
1045 case (AFNUM_INET<<8 | SAFNUM_RT_ROUTING_INFO):
1046 if (tlen < (int)sizeof(struct in_addr)) {
1047 printf("invalid len");
1048 tlen = 0;
1049 } else {
1050 TCHECK2(tptr[0], sizeof(struct in_addr));
1051 printf("%s",getname(tptr));
1052 tlen -= sizeof(struct in_addr);
1053 tptr += sizeof(struct in_addr);
1054 }
1055 break;
1056 case (AFNUM_INET<<8 | SAFNUM_VPNUNICAST):
1057 case (AFNUM_INET<<8 | SAFNUM_VPNMULTICAST):
1058 case (AFNUM_INET<<8 | SAFNUM_VPNUNIMULTICAST):
1059 if (tlen < (int)(sizeof(struct in_addr)+BGP_VPN_RD_LEN)) {
1060 printf("invalid len");
1061 tlen = 0;
1062 } else {
1063 TCHECK2(tptr[0], sizeof(struct in_addr)+BGP_VPN_RD_LEN);
1064 printf("RD: %s, %s",
1065 bgp_vpn_rd_print(tptr),
1066 getname(tptr+BGP_VPN_RD_LEN));
1067 tlen -= (sizeof(struct in_addr)+BGP_VPN_RD_LEN);
1068 tptr += (sizeof(struct in_addr)+BGP_VPN_RD_LEN);
1069 }
1070 break;
1071 #ifdef INET6
1072 case (AFNUM_INET6<<8 | SAFNUM_UNICAST):
1073 case (AFNUM_INET6<<8 | SAFNUM_MULTICAST):
1074 case (AFNUM_INET6<<8 | SAFNUM_UNIMULTICAST):
1075 case (AFNUM_INET6<<8 | SAFNUM_LABUNICAST):
1076 case (AFNUM_INET6<<8 | SAFNUM_RT_ROUTING_INFO):
1077 if (tlen < (int)sizeof(struct in6_addr)) {
1078 printf("invalid len");
1079 tlen = 0;
1080 } else {
1081 TCHECK2(tptr[0], sizeof(struct in6_addr));
1082 printf("%s", getname6(tptr));
1083 tlen -= sizeof(struct in6_addr);
1084 tptr += sizeof(struct in6_addr);
1085 }
1086 break;
1087 case (AFNUM_INET6<<8 | SAFNUM_VPNUNICAST):
1088 case (AFNUM_INET6<<8 | SAFNUM_VPNMULTICAST):
1089 case (AFNUM_INET6<<8 | SAFNUM_VPNUNIMULTICAST):
1090 if (tlen < (int)(sizeof(struct in6_addr)+BGP_VPN_RD_LEN)) {
1091 printf("invalid len");
1092 tlen = 0;
1093 } else {
1094 TCHECK2(tptr[0], sizeof(struct in6_addr)+BGP_VPN_RD_LEN);
1095 printf("RD: %s, %s",
1096 bgp_vpn_rd_print(tptr),
1097 getname6(tptr+BGP_VPN_RD_LEN));
1098 tlen -= (sizeof(struct in6_addr)+BGP_VPN_RD_LEN);
1099 tptr += (sizeof(struct in6_addr)+BGP_VPN_RD_LEN);
1100 }
1101 break;
1102 #endif
1103 case (AFNUM_VPLS<<8 | SAFNUM_VPLS):
1104 case (AFNUM_L2VPN<<8 | SAFNUM_VPNUNICAST):
1105 case (AFNUM_L2VPN<<8 | SAFNUM_VPNMULTICAST):
1106 case (AFNUM_L2VPN<<8 | SAFNUM_VPNUNIMULTICAST):
1107 if (tlen < (int)sizeof(struct in_addr)) {
1108 printf("invalid len");
1109 tlen = 0;
1110 } else {
1111 TCHECK2(tptr[0], sizeof(struct in_addr));
1112 printf("%s", getname(tptr));
1113 tlen -= (sizeof(struct in_addr));
1114 tptr += (sizeof(struct in_addr));
1115 }
1116 break;
1117 case (AFNUM_NSAP<<8 | SAFNUM_UNICAST):
1118 case (AFNUM_NSAP<<8 | SAFNUM_MULTICAST):
1119 case (AFNUM_NSAP<<8 | SAFNUM_UNIMULTICAST):
1120 TCHECK2(tptr[0], tlen);
1121 printf("%s",isonsap_string(tptr,tlen));
1122 tptr += tlen;
1123 tlen = 0;
1124 break;
1125
1126 case (AFNUM_NSAP<<8 | SAFNUM_VPNUNICAST):
1127 case (AFNUM_NSAP<<8 | SAFNUM_VPNMULTICAST):
1128 case (AFNUM_NSAP<<8 | SAFNUM_VPNUNIMULTICAST):
1129 if (tlen < BGP_VPN_RD_LEN+1) {
1130 printf("invalid len");
1131 tlen = 0;
1132 } else {
1133 TCHECK2(tptr[0], tlen);
1134 printf("RD: %s, %s",
1135 bgp_vpn_rd_print(tptr),
1136 isonsap_string(tptr+BGP_VPN_RD_LEN,tlen-BGP_VPN_RD_LEN));
1137 /* rfc986 mapped IPv4 address ? */
1138 if (EXTRACT_32BITS(tptr+BGP_VPN_RD_LEN) == 0x47000601)
1139 printf(" = %s", getname(tptr+BGP_VPN_RD_LEN+4));
1140 #ifdef INET6
1141 /* rfc1888 mapped IPv6 address ? */
1142 else if (EXTRACT_24BITS(tptr+BGP_VPN_RD_LEN) == 0x350000)
1143 printf(" = %s", getname6(tptr+BGP_VPN_RD_LEN+3));
1144 #endif
1145 tptr += tlen;
1146 tlen = 0;
1147 }
1148 break;
1149 default:
1150 TCHECK2(tptr[0], tlen);
1151 printf("no AFI %u/SAFI %u decoder",af,safi);
1152 if (vflag <= 1)
1153 print_unknown_data(tptr,"\n\t ",tlen);
1154 tptr += tlen;
1155 tlen = 0;
1156 goto done;
1157 break;
1158 }
1159 }
1160 }
1161 printf(", nh-length: %u", nhlen);
1162 tptr += tlen;
1163
1164 TCHECK(tptr[0]);
1165 snpa = tptr[0];
1166 tptr++;
1167
1168 if (snpa) {
1169 printf("\n\t %u SNPA", snpa);
1170 for (/*nothing*/; snpa > 0; snpa--) {
1171 TCHECK(tptr[0]);
1172 printf("\n\t %d bytes", tptr[0]);
1173 tptr += tptr[0] + 1;
1174 }
1175 } else {
1176 printf(", no SNPA");
1177 }
1178
1179 while (len - (tptr - pptr) > 0) {
1180 switch (af<<8 | safi) {
1181 case (AFNUM_INET<<8 | SAFNUM_UNICAST):
1182 case (AFNUM_INET<<8 | SAFNUM_MULTICAST):
1183 case (AFNUM_INET<<8 | SAFNUM_UNIMULTICAST):
1184 advance = decode_prefix4(tptr, buf, sizeof(buf));
1185 if (advance == -1)
1186 printf("\n\t (illegal prefix length)");
1187 else if (advance == -2)
1188 goto trunc;
1189 else
1190 printf("\n\t %s", buf);
1191 break;
1192 case (AFNUM_INET<<8 | SAFNUM_LABUNICAST):
1193 advance = decode_labeled_prefix4(tptr, buf, sizeof(buf));
1194 if (advance == -1)
1195 printf("\n\t (illegal prefix length)");
1196 else if (advance == -2)
1197 goto trunc;
1198 else
1199 printf("\n\t %s", buf);
1200 break;
1201 case (AFNUM_INET<<8 | SAFNUM_VPNUNICAST):
1202 case (AFNUM_INET<<8 | SAFNUM_VPNMULTICAST):
1203 case (AFNUM_INET<<8 | SAFNUM_VPNUNIMULTICAST):
1204 advance = decode_labeled_vpn_prefix4(tptr, buf, sizeof(buf));
1205 if (advance == -1)
1206 printf("\n\t (illegal prefix length)");
1207 else if (advance == -2)
1208 goto trunc;
1209 else
1210 printf("\n\t %s", buf);
1211 break;
1212 case (AFNUM_INET<<8 | SAFNUM_RT_ROUTING_INFO):
1213 advance = decode_rt_routing_info(tptr, buf, sizeof(buf));
1214 if (advance == -1)
1215 printf("\n\t (illegal prefix length)");
1216 else if (advance == -2)
1217 goto trunc;
1218 else
1219 printf("\n\t %s", buf);
1220 break;
1221 #ifdef INET6
1222 case (AFNUM_INET6<<8 | SAFNUM_UNICAST):
1223 case (AFNUM_INET6<<8 | SAFNUM_MULTICAST):
1224 case (AFNUM_INET6<<8 | SAFNUM_UNIMULTICAST):
1225 advance = decode_prefix6(tptr, buf, sizeof(buf));
1226 if (advance == -1)
1227 printf("\n\t (illegal prefix length)");
1228 else if (advance == -2)
1229 goto trunc;
1230 else
1231 printf("\n\t %s", buf);
1232 break;
1233 case (AFNUM_INET6<<8 | SAFNUM_LABUNICAST):
1234 advance = decode_labeled_prefix6(tptr, buf, sizeof(buf));
1235 if (advance == -1)
1236 printf("\n\t (illegal prefix length)");
1237 else if (advance == -2)
1238 goto trunc;
1239 else
1240 printf("\n\t %s", buf);
1241 break;
1242 case (AFNUM_INET6<<8 | SAFNUM_VPNUNICAST):
1243 case (AFNUM_INET6<<8 | SAFNUM_VPNMULTICAST):
1244 case (AFNUM_INET6<<8 | SAFNUM_VPNUNIMULTICAST):
1245 advance = decode_labeled_vpn_prefix6(tptr, buf, sizeof(buf));
1246 if (advance == -1)
1247 printf("\n\t (illegal prefix length)");
1248 else if (advance == -2)
1249 goto trunc;
1250 else
1251 printf("\n\t %s", buf);
1252 break;
1253 case (AFNUM_INET6<<8 | SAFNUM_RT_ROUTING_INFO):
1254 advance = decode_rt_routing_info(tptr, buf, sizeof(buf));
1255 if (advance == -1)
1256 printf("\n\t (illegal prefix length)");
1257 else if (advance == -2)
1258 goto trunc;
1259 else
1260 printf("\n\t %s", buf);
1261 break;
1262 #endif
1263 case (AFNUM_VPLS<<8 | SAFNUM_VPLS):
1264 case (AFNUM_L2VPN<<8 | SAFNUM_VPNUNICAST):
1265 case (AFNUM_L2VPN<<8 | SAFNUM_VPNMULTICAST):
1266 case (AFNUM_L2VPN<<8 | SAFNUM_VPNUNIMULTICAST):
1267 advance = decode_labeled_vpn_l2(tptr, buf, sizeof(buf));
1268 if (advance == -1)
1269 printf("\n\t (illegal length)");
1270 else if (advance == -2)
1271 goto trunc;
1272 else
1273 printf("\n\t %s", buf);
1274 break;
1275 case (AFNUM_NSAP<<8 | SAFNUM_UNICAST):
1276 case (AFNUM_NSAP<<8 | SAFNUM_MULTICAST):
1277 case (AFNUM_NSAP<<8 | SAFNUM_UNIMULTICAST):
1278 advance = decode_clnp_prefix(tptr, buf, sizeof(buf));
1279 if (advance == -1)
1280 printf("\n\t (illegal prefix length)");
1281 else if (advance == -2)
1282 goto trunc;
1283 else
1284 printf("\n\t %s", buf);
1285 break;
1286 case (AFNUM_NSAP<<8 | SAFNUM_VPNUNICAST):
1287 case (AFNUM_NSAP<<8 | SAFNUM_VPNMULTICAST):
1288 case (AFNUM_NSAP<<8 | SAFNUM_VPNUNIMULTICAST):
1289 advance = decode_labeled_vpn_clnp_prefix(tptr, buf, sizeof(buf));
1290 if (advance == -1)
1291 printf("\n\t (illegal prefix length)");
1292 else if (advance == -2)
1293 goto trunc;
1294 else
1295 printf("\n\t %s", buf);
1296 break;
1297 default:
1298 TCHECK2(*tptr,tlen);
1299 printf("\n\t no AFI %u / SAFI %u decoder",af,safi);
1300 if (vflag <= 1)
1301 print_unknown_data(tptr,"\n\t ",tlen);
1302 advance = 0;
1303 tptr = pptr + len;
1304 break;
1305 }
1306 if (advance < 0)
1307 break;
1308 tptr += advance;
1309 }
1310 done:
1311 break;
1312
1313 case BGPTYPE_MP_UNREACH_NLRI:
1314 TCHECK2(tptr[0], BGP_MP_NLRI_MINSIZE);
1315 af = EXTRACT_16BITS(tptr);
1316 safi = tptr[2];
1317
1318 printf("\n\t AFI: %s (%u), %sSAFI: %s (%u)",
1319 tok2strbuf(af_values, "Unknown AFI", af,
1320 tokbuf, sizeof(tokbuf)),
1321 af,
1322 (safi>128) ? "vendor specific " : "", /* 128 is meanwhile wellknown */
1323 tok2strbuf(bgp_safi_values, "Unknown SAFI", safi,
1324 tokbuf, sizeof(tokbuf)),
1325 safi);
1326
1327 if (len == BGP_MP_NLRI_MINSIZE)
1328 printf("\n\t End-of-Rib Marker (empty NLRI)");
1329
1330 tptr += 3;
1331
1332 while (len - (tptr - pptr) > 0) {
1333 switch (af<<8 | safi) {
1334 case (AFNUM_INET<<8 | SAFNUM_UNICAST):
1335 case (AFNUM_INET<<8 | SAFNUM_MULTICAST):
1336 case (AFNUM_INET<<8 | SAFNUM_UNIMULTICAST):
1337 advance = decode_prefix4(tptr, buf, sizeof(buf));
1338 if (advance == -1)
1339 printf("\n\t (illegal prefix length)");
1340 else if (advance == -2)
1341 goto trunc;
1342 else
1343 printf("\n\t %s", buf);
1344 break;
1345 case (AFNUM_INET<<8 | SAFNUM_LABUNICAST):
1346 advance = decode_labeled_prefix4(tptr, buf, sizeof(buf));
1347 if (advance == -1)
1348 printf("\n\t (illegal prefix length)");
1349 else if (advance == -2)
1350 goto trunc;
1351 else
1352 printf("\n\t %s", buf);
1353 break;
1354 case (AFNUM_INET<<8 | SAFNUM_VPNUNICAST):
1355 case (AFNUM_INET<<8 | SAFNUM_VPNMULTICAST):
1356 case (AFNUM_INET<<8 | SAFNUM_VPNUNIMULTICAST):
1357 advance = decode_labeled_vpn_prefix4(tptr, buf, sizeof(buf));
1358 if (advance == -1)
1359 printf("\n\t (illegal prefix length)");
1360 else if (advance == -2)
1361 goto trunc;
1362 else
1363 printf("\n\t %s", buf);
1364 break;
1365 #ifdef INET6
1366 case (AFNUM_INET6<<8 | SAFNUM_UNICAST):
1367 case (AFNUM_INET6<<8 | SAFNUM_MULTICAST):
1368 case (AFNUM_INET6<<8 | SAFNUM_UNIMULTICAST):
1369 advance = decode_prefix6(tptr, buf, sizeof(buf));
1370 if (advance == -1)
1371 printf("\n\t (illegal prefix length)");
1372 else if (advance == -2)
1373 goto trunc;
1374 else
1375 printf("\n\t %s", buf);
1376 break;
1377 case (AFNUM_INET6<<8 | SAFNUM_LABUNICAST):
1378 advance = decode_labeled_prefix6(tptr, buf, sizeof(buf));
1379 if (advance == -1)
1380 printf("\n\t (illegal prefix length)");
1381 else if (advance == -2)
1382 goto trunc;
1383 else
1384 printf("\n\t %s", buf);
1385 break;
1386 case (AFNUM_INET6<<8 | SAFNUM_VPNUNICAST):
1387 case (AFNUM_INET6<<8 | SAFNUM_VPNMULTICAST):
1388 case (AFNUM_INET6<<8 | SAFNUM_VPNUNIMULTICAST):
1389 advance = decode_labeled_vpn_prefix6(tptr, buf, sizeof(buf));
1390 if (advance == -1)
1391 printf("\n\t (illegal prefix length)");
1392 else if (advance == -2)
1393 goto trunc;
1394 else
1395 printf("\n\t %s", buf);
1396 break;
1397 #endif
1398 case (AFNUM_VPLS<<8 | SAFNUM_VPLS):
1399 case (AFNUM_L2VPN<<8 | SAFNUM_VPNUNICAST):
1400 case (AFNUM_L2VPN<<8 | SAFNUM_VPNMULTICAST):
1401 case (AFNUM_L2VPN<<8 | SAFNUM_VPNUNIMULTICAST):
1402 advance = decode_labeled_vpn_l2(tptr, buf, sizeof(buf));
1403 if (advance == -1)
1404 printf("\n\t (illegal length)");
1405 else if (advance == -2)
1406 goto trunc;
1407 else
1408 printf("\n\t %s", buf);
1409 break;
1410 case (AFNUM_NSAP<<8 | SAFNUM_UNICAST):
1411 case (AFNUM_NSAP<<8 | SAFNUM_MULTICAST):
1412 case (AFNUM_NSAP<<8 | SAFNUM_UNIMULTICAST):
1413 advance = decode_clnp_prefix(tptr, buf, sizeof(buf));
1414 if (advance == -1)
1415 printf("\n\t (illegal prefix length)");
1416 else if (advance == -2)
1417 goto trunc;
1418 else
1419 printf("\n\t %s", buf);
1420 break;
1421 case (AFNUM_NSAP<<8 | SAFNUM_VPNUNICAST):
1422 case (AFNUM_NSAP<<8 | SAFNUM_VPNMULTICAST):
1423 case (AFNUM_NSAP<<8 | SAFNUM_VPNUNIMULTICAST):
1424 advance = decode_labeled_vpn_clnp_prefix(tptr, buf, sizeof(buf));
1425 if (advance == -1)
1426 printf("\n\t (illegal prefix length)");
1427 else if (advance == -2)
1428 goto trunc;
1429 else
1430 printf("\n\t %s", buf);
1431 break;
1432 default:
1433 TCHECK2(*(tptr-3),tlen);
1434 printf("no AFI %u / SAFI %u decoder",af,safi);
1435 if (vflag <= 1)
1436 print_unknown_data(tptr-3,"\n\t ",tlen);
1437 advance = 0;
1438 tptr = pptr + len;
1439 break;
1440 }
1441 if (advance < 0)
1442 break;
1443 tptr += advance;
1444 }
1445 break;
1446 case BGPTYPE_EXTD_COMMUNITIES:
1447 if (len % 8) {
1448 printf("invalid len");
1449 break;
1450 }
1451 while (tlen>0) {
1452 u_int16_t extd_comm;
1453
1454 TCHECK2(tptr[0], 2);
1455 extd_comm=EXTRACT_16BITS(tptr);
1456
1457 printf("\n\t %s (0x%04x), Flags [%s]",
1458 tok2strbuf(bgp_extd_comm_subtype_values,
1459 "unknown extd community typecode",
1460 extd_comm, tokbuf, sizeof(tokbuf)),
1461 extd_comm,
1462 bittok2str(bgp_extd_comm_flag_values, "none", extd_comm));
1463
1464 TCHECK2(*(tptr+2), 6);
1465 switch(extd_comm) {
1466 case BGP_EXT_COM_RT_0:
1467 case BGP_EXT_COM_RO_0:
1468 printf(": %u:%s",
1469 EXTRACT_16BITS(tptr+2),
1470 getname(tptr+4));
1471 break;
1472 case BGP_EXT_COM_RT_1:
1473 case BGP_EXT_COM_RO_1:
1474 printf(": %s:%u",
1475 getname(tptr+2),
1476 EXTRACT_16BITS(tptr+6));
1477 break;
1478 case BGP_EXT_COM_RT_2:
1479 case BGP_EXT_COM_RO_2:
1480 printf(": %u:%u",
1481 EXTRACT_32BITS(tptr+2),
1482 EXTRACT_16BITS(tptr+6));
1483 break;
1484 case BGP_EXT_COM_LINKBAND:
1485 bw.i = EXTRACT_32BITS(tptr+2);
1486 printf(": bandwidth: %.3f Mbps",
1487 bw.f*8/1000000);
1488 break;
1489 case BGP_EXT_COM_CISCO_MCAST:
1490 printf(": AS %u, group %s",
1491 EXTRACT_16BITS(tptr+2),
1492 getname(tptr+4));
1493 break;
1494 case BGP_EXT_COM_VPN_ORIGIN:
1495 case BGP_EXT_COM_VPN_ORIGIN2:
1496 case BGP_EXT_COM_VPN_ORIGIN3:
1497 case BGP_EXT_COM_VPN_ORIGIN4:
1498 case BGP_EXT_COM_OSPF_RID:
1499 case BGP_EXT_COM_OSPF_RID2:
1500 printf("%s", getname(tptr+2));
1501 break;
1502 case BGP_EXT_COM_OSPF_RTYPE:
1503 case BGP_EXT_COM_OSPF_RTYPE2:
1504 printf(": area:%s, router-type:%s, metric-type:%s%s",
1505 getname(tptr+2),
1506 tok2strbuf(bgp_extd_comm_ospf_rtype_values,
1507 "unknown (0x%02x)",
1508 *(tptr+6),
1509 tokbuf, sizeof(tokbuf)),
1510 (*(tptr+7) & BGP_OSPF_RTYPE_METRIC_TYPE) ? "E2" : "",
1511 (*(tptr+6) == (BGP_OSPF_RTYPE_EXT ||BGP_OSPF_RTYPE_NSSA )) ? "E1" : "");
1512 break;
1513 case BGP_EXT_COM_L2INFO:
1514 printf(": %s Control Flags [0x%02x]:MTU %u",
1515 tok2strbuf(l2vpn_encaps_values,
1516 "unknown encaps",
1517 *(tptr+2),
1518 tokbuf, sizeof(tokbuf)),
1519 *(tptr+3),
1520 EXTRACT_16BITS(tptr+4));
1521 break;
1522 default:
1523 TCHECK2(*tptr,8);
1524 print_unknown_data(tptr,"\n\t ",8);
1525 break;
1526 }
1527 tlen -=8;
1528 tptr +=8;
1529 }
1530 break;
1531
1532 case BGPTYPE_ATTR_SET:
1533 TCHECK2(tptr[0], 4);
1534 printf("\n\t Origin AS: %u", EXTRACT_32BITS(tptr));
1535 tptr+=4;
1536 len -=4;
1537
1538 while (len >= 2 ) {
1539 int alen;
1540 struct bgp_attr bgpa;
1541
1542 TCHECK2(tptr[0], sizeof(bgpa));
1543 memcpy(&bgpa, tptr, sizeof(bgpa));
1544 alen = bgp_attr_len(&bgpa);
1545 tptr += bgp_attr_off(&bgpa);
1546 len -= bgp_attr_off(&bgpa);
1547
1548 printf("\n\t %s (%u), length: %u",
1549 tok2strbuf(bgp_attr_values,
1550 "Unknown Attribute", bgpa.bgpa_type,
1551 tokbuf, sizeof(tokbuf)),
1552 bgpa.bgpa_type,
1553 alen);
1554
1555 if (bgpa.bgpa_flags) {
1556 printf(", Flags [%s%s%s%s",
1557 bgpa.bgpa_flags & 0x80 ? "O" : "",
1558 bgpa.bgpa_flags & 0x40 ? "T" : "",
1559 bgpa.bgpa_flags & 0x20 ? "P" : "",
1560 bgpa.bgpa_flags & 0x10 ? "E" : "");
1561 if (bgpa.bgpa_flags & 0xf)
1562 printf("+%x", bgpa.bgpa_flags & 0xf);
1563 printf("]: ");
1564 }
1565 /* FIXME check for recursion */
1566 if (!bgp_attr_print(&bgpa, tptr, alen))
1567 return 0;
1568 tptr += alen;
1569 len -= alen;
1570 }
1571 break;
1572
1573
1574 default:
1575 TCHECK2(*pptr,len);
1576 printf("\n\t no Attribute %u decoder",attr->bgpa_type); /* we have no decoder for the attribute */
1577 if (vflag <= 1)
1578 print_unknown_data(pptr,"\n\t ",len);
1579 break;
1580 }
1581 if (vflag > 1 && len) { /* omit zero length attributes*/
1582 TCHECK2(*pptr,len);
1583 print_unknown_data(pptr,"\n\t ",len);
1584 }
1585 return 1;
1586
1587 trunc:
1588 return 0;
1589 }
1590
1591 static void
1592 bgp_open_print(const u_char *dat, int length)
1593 {
1594 struct bgp_open bgpo;
1595 struct bgp_opt bgpopt;
1596 const u_char *opt;
1597 int i,cap_type,cap_len,tcap_len,cap_offset;
1598 char tokbuf[TOKBUFSIZE];
1599 char tokbuf2[TOKBUFSIZE];
1600
1601 TCHECK2(dat[0], BGP_OPEN_SIZE);
1602 memcpy(&bgpo, dat, BGP_OPEN_SIZE);
1603
1604 printf("\n\t Version %d, ", bgpo.bgpo_version);
1605 printf("my AS %u, ", ntohs(bgpo.bgpo_myas));
1606 printf("Holdtime %us, ", ntohs(bgpo.bgpo_holdtime));
1607 printf("ID %s", getname((u_char *)&bgpo.bgpo_id));
1608 printf("\n\t Optional parameters, length: %u", bgpo.bgpo_optlen);
1609
1610 /* some little sanity checking */
1611 if (length < bgpo.bgpo_optlen+BGP_OPEN_SIZE)
1612 return;
1613
1614 /* ugly! */
1615 opt = &((const struct bgp_open *)dat)->bgpo_optlen;
1616 opt++;
1617
1618 i = 0;
1619 while (i < bgpo.bgpo_optlen) {
1620 TCHECK2(opt[i], BGP_OPT_SIZE);
1621 memcpy(&bgpopt, &opt[i], BGP_OPT_SIZE);
1622 if (i + 2 + bgpopt.bgpopt_len > bgpo.bgpo_optlen) {
1623 printf("\n\t Option %d, length: %u", bgpopt.bgpopt_type, bgpopt.bgpopt_len);
1624 break;
1625 }
1626
1627 printf("\n\t Option %s (%u), length: %u",
1628 tok2strbuf(bgp_opt_values,"Unknown",
1629 bgpopt.bgpopt_type,
1630 tokbuf, sizeof(tokbuf)),
1631 bgpopt.bgpopt_type,
1632 bgpopt.bgpopt_len);
1633
1634 /* now lets decode the options we know*/
1635 switch(bgpopt.bgpopt_type) {
1636 case BGP_OPT_CAP:
1637 cap_type=opt[i+BGP_OPT_SIZE];
1638 cap_len=opt[i+BGP_OPT_SIZE+1];
1639 tcap_len=cap_len;
1640 printf("\n\t %s (%u), length: %u",
1641 tok2strbuf(bgp_capcode_values, "Unknown",
1642 cap_type, tokbuf, sizeof(tokbuf)),
1643 cap_type,
1644 cap_len);
1645 switch(cap_type) {
1646 case BGP_CAPCODE_MP:
1647 printf("\n\t\tAFI %s (%u), SAFI %s (%u)",
1648 tok2strbuf(af_values, "Unknown",
1649 EXTRACT_16BITS(opt+i+BGP_OPT_SIZE+2),
1650 tokbuf, sizeof(tokbuf)),
1651 EXTRACT_16BITS(opt+i+BGP_OPT_SIZE+2),
1652 tok2strbuf(bgp_safi_values, "Unknown",
1653 opt[i+BGP_OPT_SIZE+5],
1654 tokbuf, sizeof(tokbuf)),
1655 opt[i+BGP_OPT_SIZE+5]);
1656 break;
1657 case BGP_CAPCODE_RESTART:
1658 printf("\n\t\tRestart Flags: [%s], Restart Time %us",
1659 ((opt[i+BGP_OPT_SIZE+2])&0x80) ? "R" : "none",
1660 EXTRACT_16BITS(opt+i+BGP_OPT_SIZE+2)&0xfff);
1661 tcap_len-=2;
1662 cap_offset=4;
1663 while(tcap_len>=4) {
1664 printf("\n\t\t AFI %s (%u), SAFI %s (%u), Forwarding state preserved: %s",
1665 tok2strbuf(af_values,"Unknown",
1666 EXTRACT_16BITS(opt+i+BGP_OPT_SIZE+cap_offset),
1667 tokbuf, sizeof(tokbuf)),
1668 EXTRACT_16BITS(opt+i+BGP_OPT_SIZE+cap_offset),
1669 tok2strbuf(bgp_safi_values,"Unknown",
1670 opt[i+BGP_OPT_SIZE+cap_offset+2],
1671 tokbuf2, sizeof(tokbuf2)),
1672 opt[i+BGP_OPT_SIZE+cap_offset+2],
1673 ((opt[i+BGP_OPT_SIZE+cap_offset+3])&0x80) ? "yes" : "no" );
1674 tcap_len-=4;
1675 cap_offset+=4;
1676 }
1677 break;
1678 case BGP_CAPCODE_RR:
1679 case BGP_CAPCODE_RR_CISCO:
1680 break;
1681 default:
1682 TCHECK2(opt[i+BGP_OPT_SIZE+2],cap_len);
1683 printf("\n\t\tno decoder for Capability %u",
1684 cap_type);
1685 if (vflag <= 1)
1686 print_unknown_data(&opt[i+BGP_OPT_SIZE+2],"\n\t\t",cap_len);
1687 break;
1688 }
1689 if (vflag > 1) {
1690 TCHECK2(opt[i+BGP_OPT_SIZE+2],cap_len);
1691 print_unknown_data(&opt[i+BGP_OPT_SIZE+2],"\n\t\t",cap_len);
1692 }
1693 break;
1694 case BGP_OPT_AUTH:
1695 default:
1696 printf("\n\t no decoder for option %u",
1697 bgpopt.bgpopt_type);
1698 break;
1699 }
1700
1701 i += BGP_OPT_SIZE + bgpopt.bgpopt_len;
1702 }
1703 return;
1704 trunc:
1705 printf("[|BGP]");
1706 }
1707
1708 static void
1709 bgp_update_print(const u_char *dat, int length)
1710 {
1711 struct bgp bgp;
1712 struct bgp_attr bgpa;
1713 const u_char *p;
1714 int len;
1715 int i;
1716 char tokbuf[TOKBUFSIZE];
1717
1718 TCHECK2(dat[0], BGP_SIZE);
1719 memcpy(&bgp, dat, BGP_SIZE);
1720 p = dat + BGP_SIZE; /*XXX*/
1721
1722 /* Unfeasible routes */
1723 len = EXTRACT_16BITS(p);
1724 if (len) {
1725 /*
1726 * Without keeping state from the original NLRI message,
1727 * it's not possible to tell if this a v4 or v6 route,
1728 * so only try to decode it if we're not v6 enabled.
1729 */
1730 #ifdef INET6
1731 printf("\n\t Withdrawn routes: %d bytes", len);
1732 #else
1733 char buf[MAXHOSTNAMELEN + 100];
1734 int wpfx;
1735
1736 TCHECK2(p[2], len);
1737 i = 2;
1738
1739 printf("\n\t Withdrawn routes:");
1740
1741 while(i < 2 + len) {
1742 wpfx = decode_prefix4(&p[i], buf, sizeof(buf));
1743 if (wpfx == -1) {
1744 printf("\n\t (illegal prefix length)");
1745 break;
1746 } else if (wpfx == -2)
1747 goto trunc;
1748 else {
1749 i += wpfx;
1750 printf("\n\t %s", buf);
1751 }
1752 }
1753 #endif
1754 }
1755 p += 2 + len;
1756
1757 TCHECK2(p[0], 2);
1758 len = EXTRACT_16BITS(p);
1759
1760 if (len == 0 && length == BGP_UPDATE_MINSIZE) {
1761 printf("\n\t End-of-Rib Marker (empty NLRI)");
1762 return;
1763 }
1764
1765 if (len) {
1766 /* do something more useful!*/
1767 i = 2;
1768 while (i < 2 + len) {
1769 int alen, aoff;
1770
1771 TCHECK2(p[i], sizeof(bgpa));
1772 memcpy(&bgpa, &p[i], sizeof(bgpa));
1773 alen = bgp_attr_len(&bgpa);
1774 aoff = bgp_attr_off(&bgpa);
1775
1776 printf("\n\t %s (%u), length: %u",
1777 tok2strbuf(bgp_attr_values, "Unknown Attribute",
1778 bgpa.bgpa_type,
1779 tokbuf, sizeof(tokbuf)),
1780 bgpa.bgpa_type,
1781 alen);
1782
1783 if (bgpa.bgpa_flags) {
1784 printf(", Flags [%s%s%s%s",
1785 bgpa.bgpa_flags & 0x80 ? "O" : "",
1786 bgpa.bgpa_flags & 0x40 ? "T" : "",
1787 bgpa.bgpa_flags & 0x20 ? "P" : "",
1788 bgpa.bgpa_flags & 0x10 ? "E" : "");
1789 if (bgpa.bgpa_flags & 0xf)
1790 printf("+%x", bgpa.bgpa_flags & 0xf);
1791 printf("]: ");
1792 }
1793 if (!bgp_attr_print(&bgpa, &p[i + aoff], alen))
1794 goto trunc;
1795 i += aoff + alen;
1796 }
1797 }
1798 p += 2 + len;
1799
1800 if (dat + length > p) {
1801 printf("\n\t Updated routes:");
1802 while (dat + length > p) {
1803 char buf[MAXHOSTNAMELEN + 100];
1804 i = decode_prefix4(p, buf, sizeof(buf));
1805 if (i == -1) {
1806 printf("\n\t (illegal prefix length)");
1807 break;
1808 } else if (i == -2)
1809 goto trunc;
1810 else {
1811 printf("\n\t %s", buf);
1812 p += i;
1813 }
1814 }
1815 }
1816 return;
1817 trunc:
1818 printf("[|BGP]");
1819 }
1820
1821 static void
1822 bgp_notification_print(const u_char *dat, int length)
1823 {
1824 struct bgp_notification bgpn;
1825 const u_char *tptr;
1826 char tokbuf[TOKBUFSIZE];
1827 char tokbuf2[TOKBUFSIZE];
1828
1829 TCHECK2(dat[0], BGP_NOTIFICATION_SIZE);
1830 memcpy(&bgpn, dat, BGP_NOTIFICATION_SIZE);
1831
1832 /* some little sanity checking */
1833 if (length<BGP_NOTIFICATION_SIZE)
1834 return;
1835
1836 printf(", %s (%u)",
1837 tok2strbuf(bgp_notify_major_values, "Unknown Error",
1838 bgpn.bgpn_major, tokbuf, sizeof(tokbuf)),
1839 bgpn.bgpn_major);
1840
1841 switch (bgpn.bgpn_major) {
1842
1843 case BGP_NOTIFY_MAJOR_MSG:
1844 printf(", subcode %s (%u)",
1845 tok2strbuf(bgp_notify_minor_msg_values, "Unknown",
1846 bgpn.bgpn_minor, tokbuf, sizeof(tokbuf)),
1847 bgpn.bgpn_minor);
1848 break;
1849 case BGP_NOTIFY_MAJOR_OPEN:
1850 printf(", subcode %s (%u)",
1851 tok2strbuf(bgp_notify_minor_open_values, "Unknown",
1852 bgpn.bgpn_minor, tokbuf, sizeof(tokbuf)),
1853 bgpn.bgpn_minor);
1854 break;
1855 case BGP_NOTIFY_MAJOR_UPDATE:
1856 printf(", subcode %s (%u)",
1857 tok2strbuf(bgp_notify_minor_update_values, "Unknown",
1858 bgpn.bgpn_minor, tokbuf, sizeof(tokbuf)),
1859 bgpn.bgpn_minor);
1860 break;
1861 case BGP_NOTIFY_MAJOR_CAP:
1862 printf(" subcode %s (%u)",
1863 tok2strbuf(bgp_notify_minor_cap_values, "Unknown",
1864 bgpn.bgpn_minor, tokbuf, sizeof(tokbuf)),
1865 bgpn.bgpn_minor);
1866 case BGP_NOTIFY_MAJOR_CEASE:
1867 printf(", subcode %s (%u)",
1868 tok2strbuf(bgp_notify_minor_cease_values, "Unknown",
1869 bgpn.bgpn_minor, tokbuf, sizeof(tokbuf)),
1870 bgpn.bgpn_minor);
1871
1872 /* draft-ietf-idr-cease-subcode-02 mentions optionally 7 bytes
1873 * for the maxprefix subtype, which may contain AFI, SAFI and MAXPREFIXES
1874 */
1875 if(bgpn.bgpn_minor == BGP_NOTIFY_MINOR_CEASE_MAXPRFX && length >= BGP_NOTIFICATION_SIZE + 7) {
1876 tptr = dat + BGP_NOTIFICATION_SIZE;
1877 TCHECK2(*tptr, 7);
1878 printf(", AFI %s (%u), SAFI %s (%u), Max Prefixes: %u",
1879 tok2strbuf(af_values, "Unknown",
1880 EXTRACT_16BITS(tptr), tokbuf, sizeof(tokbuf)),
1881 EXTRACT_16BITS(tptr),
1882 tok2strbuf(bgp_safi_values, "Unknown", *(tptr+2),
1883 tokbuf2, sizeof(tokbuf)),
1884 *(tptr+2),
1885 EXTRACT_32BITS(tptr+3));
1886 }
1887 break;
1888 default:
1889 break;
1890 }
1891
1892 return;
1893 trunc:
1894 printf("[|BGP]");
1895 }
1896
1897 static void
1898 bgp_route_refresh_print(const u_char *pptr, int len) {
1899
1900 const struct bgp_route_refresh *bgp_route_refresh_header;
1901 char tokbuf[TOKBUFSIZE];
1902 char tokbuf2[TOKBUFSIZE];
1903
1904 TCHECK2(pptr[0], BGP_ROUTE_REFRESH_SIZE);
1905
1906 /* some little sanity checking */
1907 if (len<BGP_ROUTE_REFRESH_SIZE)
1908 return;
1909
1910 bgp_route_refresh_header = (const struct bgp_route_refresh *)pptr;
1911
1912 printf("\n\t AFI %s (%u), SAFI %s (%u)",
1913 tok2strbuf(af_values,"Unknown",
1914 /* this stinks but the compiler pads the structure
1915 * weird */
1916 EXTRACT_16BITS(&bgp_route_refresh_header->afi),
1917 tokbuf, sizeof(tokbuf)),
1918 EXTRACT_16BITS(&bgp_route_refresh_header->afi),
1919 tok2strbuf(bgp_safi_values,"Unknown",
1920 bgp_route_refresh_header->safi,
1921 tokbuf2, sizeof(tokbuf2)),
1922 bgp_route_refresh_header->safi);
1923
1924 if (vflag > 1) {
1925 TCHECK2(*pptr, len);
1926 print_unknown_data(pptr,"\n\t ", len);
1927 }
1928
1929 return;
1930 trunc:
1931 printf("[|BGP]");
1932 }
1933
1934 static int
1935 bgp_header_print(const u_char *dat, int length)
1936 {
1937 struct bgp bgp;
1938 char tokbuf[TOKBUFSIZE];
1939
1940 TCHECK2(dat[0], BGP_SIZE);
1941 memcpy(&bgp, dat, BGP_SIZE);
1942 printf("\n\t%s Message (%u), length: %u",
1943 tok2strbuf(bgp_msg_values, "Unknown", bgp.bgp_type,
1944 tokbuf, sizeof(tokbuf)),
1945 bgp.bgp_type,
1946 length);
1947
1948 switch (bgp.bgp_type) {
1949 case BGP_OPEN:
1950 bgp_open_print(dat, length);
1951 break;
1952 case BGP_UPDATE:
1953 bgp_update_print(dat, length);
1954 break;
1955 case BGP_NOTIFICATION:
1956 bgp_notification_print(dat, length);
1957 break;
1958 case BGP_KEEPALIVE:
1959 break;
1960 case BGP_ROUTE_REFRESH:
1961 bgp_route_refresh_print(dat, length);
1962 break;
1963 default:
1964 /* we have no decoder for the BGP message */
1965 TCHECK2(*dat, length);
1966 printf("\n\t no Message %u decoder",bgp.bgp_type);
1967 print_unknown_data(dat,"\n\t ",length);
1968 break;
1969 }
1970 return 1;
1971 trunc:
1972 printf("[|BGP]");
1973 return 0;
1974 }
1975
1976 void
1977 bgp_print(const u_char *dat, int length)
1978 {
1979 const u_char *p;
1980 const u_char *ep;
1981 const u_char *start;
1982 const u_char marker[] = {
1983 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
1984 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
1985 };
1986 struct bgp bgp;
1987 u_int16_t hlen;
1988 char tokbuf[TOKBUFSIZE];
1989
1990 ep = dat + length;
1991 if (snapend < dat + length)
1992 ep = snapend;
1993
1994 printf(": BGP, length: %u",length);
1995
1996 if (vflag < 1) /* lets be less chatty */
1997 return;
1998
1999 p = dat;
2000 start = p;
2001 while (p < ep) {
2002 if (!TTEST2(p[0], 1))
2003 break;
2004 if (p[0] != 0xff) {
2005 p++;
2006 continue;
2007 }
2008
2009 if (!TTEST2(p[0], sizeof(marker)))
2010 break;
2011 if (memcmp(p, marker, sizeof(marker)) != 0) {
2012 p++;
2013 continue;
2014 }
2015
2016 /* found BGP header */
2017 TCHECK2(p[0], BGP_SIZE); /*XXX*/
2018 memcpy(&bgp, p, BGP_SIZE);
2019
2020 if (start != p)
2021 printf(" [|BGP]");
2022
2023 hlen = ntohs(bgp.bgp_len);
2024 if (hlen < BGP_SIZE) {
2025 printf("\n[|BGP Bogus header length %u < %u]", hlen,
2026 BGP_SIZE);
2027 break;
2028 }
2029
2030 if (TTEST2(p[0], hlen)) {
2031 if (!bgp_header_print(p, hlen))
2032 return;
2033 p += hlen;
2034 start = p;
2035 } else {
2036 printf("\n[|BGP %s]",
2037 tok2strbuf(bgp_msg_values,
2038 "Unknown Message Type",
2039 bgp.bgp_type,
2040 tokbuf, sizeof(tokbuf)));
2041 break;
2042 }
2043 }
2044
2045 return;
2046
2047 trunc:
2048 printf(" [|BGP]");
2049 }