1 /* BGP routing information
2 Copyright (C) 1996, 97, 98, 99 Kunihiro Ishiguro
3 Copyright (C) 2016 Job Snijders <job@instituut.net>
5 This file is part of GNU Zebra.
7 GNU Zebra is free software; you can redistribute it and/or modify it
8 under the terms of the GNU General Public License as published by the
9 Free Software Foundation; either version 2, or (at your option) any
12 GNU Zebra is distributed in the hope that it will be useful, but
13 WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GNU Zebra; see the file COPYING. If not, write to the Free
19 Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
33 #include "sockunion.h"
36 #include "workqueue.h"
41 #include "bgpd/bgpd.h"
42 #include "bgpd/bgp_table.h"
43 #include "bgpd/bgp_route.h"
44 #include "bgpd/bgp_attr.h"
45 #include "bgpd/bgp_debug.h"
46 #include "bgpd/bgp_aspath.h"
47 #include "bgpd/bgp_regex.h"
48 #include "bgpd/bgp_community.h"
49 #include "bgpd/bgp_ecommunity.h"
50 #include "bgpd/bgp_lcommunity.h"
51 #include "bgpd/bgp_clist.h"
52 #include "bgpd/bgp_packet.h"
53 #include "bgpd/bgp_filter.h"
54 #include "bgpd/bgp_fsm.h"
55 #include "bgpd/bgp_mplsvpn.h"
56 #include "bgpd/bgp_encap.h"
57 #include "bgpd/bgp_nexthop.h"
58 #include "bgpd/bgp_damp.h"
59 #include "bgpd/bgp_advertise.h"
60 #include "bgpd/bgp_zebra.h"
61 #include "bgpd/bgp_vty.h"
62 #include "bgpd/bgp_mpath.h"
63 #include "bgpd/bgp_nht.h"
64 #include "bgpd/bgp_updgrp.h"
67 #include "bgpd/rfapi/rfapi_backend.h"
68 #include "bgpd/rfapi/vnc_import_bgp.h"
69 #include "bgpd/rfapi/vnc_export_bgp.h"
71 #include "bgpd/bgp_encap_types.h"
72 #include "bgpd/bgp_encap_tlv.h"
73 #include "bgpd/bgp_evpn.h"
74 #include "bgpd/bgp_evpn_vty.h"
77 /* Extern from bgp_dump.c */
78 extern const char *bgp_origin_str
[];
79 extern const char *bgp_origin_long_str
[];
82 bgp_afi_node_get (struct bgp_table
*table
, afi_t afi
, safi_t safi
, struct prefix
*p
,
83 struct prefix_rd
*prd
)
86 struct bgp_node
*prn
= NULL
;
92 if ((safi
== SAFI_MPLS_VPN
) || (safi
== SAFI_ENCAP
) ||
95 prn
= bgp_node_get (table
, (struct prefix
*) prd
);
97 if (prn
->info
== NULL
)
98 prn
->info
= bgp_table_init (afi
, safi
);
100 bgp_unlock_node (prn
);
104 rn
= bgp_node_get (table
, p
);
106 if ((safi
== SAFI_MPLS_VPN
) || (safi
== SAFI_ENCAP
) ||
113 /* Allocate bgp_info_extra */
114 static struct bgp_info_extra
*
115 bgp_info_extra_new (void)
117 struct bgp_info_extra
*new;
118 new = XCALLOC (MTYPE_BGP_ROUTE_EXTRA
, sizeof (struct bgp_info_extra
));
123 bgp_info_extra_free (struct bgp_info_extra
**extra
)
127 if ((*extra
)->damp_info
)
128 bgp_damp_info_free ((*extra
)->damp_info
, 0);
130 (*extra
)->damp_info
= NULL
;
132 XFREE (MTYPE_BGP_ROUTE_EXTRA
, *extra
);
138 /* Get bgp_info extra information for the given bgp_info, lazy allocated
141 struct bgp_info_extra
*
142 bgp_info_extra_get (struct bgp_info
*ri
)
145 ri
->extra
= bgp_info_extra_new();
149 /* Allocate new bgp info structure. */
153 return XCALLOC (MTYPE_BGP_ROUTE
, sizeof (struct bgp_info
));
156 /* Free bgp route information. */
158 bgp_info_free (struct bgp_info
*binfo
)
161 bgp_attr_unintern (&binfo
->attr
);
163 bgp_unlink_nexthop(binfo
);
164 bgp_info_extra_free (&binfo
->extra
);
165 bgp_info_mpath_free (&binfo
->mpath
);
167 peer_unlock (binfo
->peer
); /* bgp_info peer reference */
169 XFREE (MTYPE_BGP_ROUTE
, binfo
);
173 bgp_info_lock (struct bgp_info
*binfo
)
180 bgp_info_unlock (struct bgp_info
*binfo
)
182 assert (binfo
&& binfo
->lock
> 0);
185 if (binfo
->lock
== 0)
188 zlog_debug ("%s: unlocked and freeing", __func__
);
189 zlog_backtrace (LOG_DEBUG
);
191 bgp_info_free (binfo
);
196 if (binfo
->lock
== 1)
198 zlog_debug ("%s: unlocked to 1", __func__
);
199 zlog_backtrace (LOG_DEBUG
);
207 bgp_info_add (struct bgp_node
*rn
, struct bgp_info
*ri
)
209 struct bgp_info
*top
;
221 peer_lock (ri
->peer
); /* bgp_info peer reference */
224 /* Do the actual removal of info from RIB, for use by bgp_process
225 completion callback *only* */
227 bgp_info_reap (struct bgp_node
*rn
, struct bgp_info
*ri
)
230 ri
->next
->prev
= ri
->prev
;
232 ri
->prev
->next
= ri
->next
;
236 bgp_info_mpath_dequeue (ri
);
237 bgp_info_unlock (ri
);
238 bgp_unlock_node (rn
);
242 bgp_info_delete (struct bgp_node
*rn
, struct bgp_info
*ri
)
244 bgp_info_set_flag (rn
, ri
, BGP_INFO_REMOVED
);
245 /* set of previous already took care of pcount */
246 UNSET_FLAG (ri
->flags
, BGP_INFO_VALID
);
249 /* undo the effects of a previous call to bgp_info_delete; typically
250 called when a route is deleted and then quickly re-added before the
251 deletion has been processed */
253 bgp_info_restore (struct bgp_node
*rn
, struct bgp_info
*ri
)
255 bgp_info_unset_flag (rn
, ri
, BGP_INFO_REMOVED
);
256 /* unset of previous already took care of pcount */
257 SET_FLAG (ri
->flags
, BGP_INFO_VALID
);
260 /* Adjust pcount as required */
262 bgp_pcount_adjust (struct bgp_node
*rn
, struct bgp_info
*ri
)
264 struct bgp_table
*table
;
266 assert (rn
&& bgp_node_table (rn
));
267 assert (ri
&& ri
->peer
&& ri
->peer
->bgp
);
269 table
= bgp_node_table (rn
);
271 if (ri
->peer
== ri
->peer
->bgp
->peer_self
)
274 if (!BGP_INFO_COUNTABLE (ri
)
275 && CHECK_FLAG (ri
->flags
, BGP_INFO_COUNTED
))
278 UNSET_FLAG (ri
->flags
, BGP_INFO_COUNTED
);
280 /* slight hack, but more robust against errors. */
281 if (ri
->peer
->pcount
[table
->afi
][table
->safi
])
282 ri
->peer
->pcount
[table
->afi
][table
->safi
]--;
285 zlog_warn ("%s: Asked to decrement 0 prefix count for peer %s",
286 __func__
, ri
->peer
->host
);
287 zlog_backtrace (LOG_WARNING
);
288 zlog_warn ("%s: Please report to Quagga bugzilla", __func__
);
291 else if (BGP_INFO_COUNTABLE (ri
)
292 && !CHECK_FLAG (ri
->flags
, BGP_INFO_COUNTED
))
294 SET_FLAG (ri
->flags
, BGP_INFO_COUNTED
);
295 ri
->peer
->pcount
[table
->afi
][table
->safi
]++;
300 /* Set/unset bgp_info flags, adjusting any other state as needed.
301 * This is here primarily to keep prefix-count in check.
304 bgp_info_set_flag (struct bgp_node
*rn
, struct bgp_info
*ri
, u_int32_t flag
)
306 SET_FLAG (ri
->flags
, flag
);
308 /* early bath if we know it's not a flag that changes countability state */
309 if (!CHECK_FLAG (flag
, BGP_INFO_VALID
|BGP_INFO_HISTORY
|BGP_INFO_REMOVED
))
312 bgp_pcount_adjust (rn
, ri
);
316 bgp_info_unset_flag (struct bgp_node
*rn
, struct bgp_info
*ri
, u_int32_t flag
)
318 UNSET_FLAG (ri
->flags
, flag
);
320 /* early bath if we know it's not a flag that changes countability state */
321 if (!CHECK_FLAG (flag
, BGP_INFO_VALID
|BGP_INFO_HISTORY
|BGP_INFO_REMOVED
))
324 bgp_pcount_adjust (rn
, ri
);
327 /* Get MED value. If MED value is missing and "bgp bestpath
328 missing-as-worst" is specified, treat it as the worst value. */
330 bgp_med_value (struct attr
*attr
, struct bgp
*bgp
)
332 if (attr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_MULTI_EXIT_DISC
))
336 if (bgp_flag_check (bgp
, BGP_FLAG_MED_MISSING_AS_WORST
))
344 bgp_info_path_with_addpath_rx_str (struct bgp_info
*ri
, char *buf
)
346 if (ri
->addpath_rx_id
)
347 sprintf(buf
, "path %s (addpath rxid %d)", ri
->peer
->host
, ri
->addpath_rx_id
);
349 sprintf(buf
, "path %s", ri
->peer
->host
);
352 /* Compare two bgp route entity. If 'new' is preferable over 'exist' return 1. */
354 bgp_info_cmp (struct bgp
*bgp
, struct bgp_info
*new, struct bgp_info
*exist
,
355 int *paths_eq
, struct bgp_maxpaths_cfg
*mpath_cfg
, int debug
,
358 struct attr
*newattr
, *existattr
;
359 struct attr_extra
*newattre
, *existattre
;
360 bgp_peer_sort_t new_sort
;
361 bgp_peer_sort_t exist_sort
;
363 u_int32_t exist_pref
;
366 u_int32_t new_weight
;
367 u_int32_t exist_weight
;
368 uint32_t newm
, existm
;
369 struct in_addr new_id
;
370 struct in_addr exist_id
;
373 int internal_as_route
;
376 char new_buf
[PATH_ADDPATH_STR_BUFFER
];
377 char exist_buf
[PATH_ADDPATH_STR_BUFFER
];
385 zlog_debug("%s: new is NULL", pfx_buf
);
390 bgp_info_path_with_addpath_rx_str (new, new_buf
);
395 zlog_debug("%s: %s is the initial bestpath", pfx_buf
, new_buf
);
401 bgp_info_path_with_addpath_rx_str (exist
, exist_buf
);
402 zlog_debug("%s: Comparing %s flags 0x%x with %s flags 0x%x",
403 pfx_buf
, new_buf
, new->flags
, exist_buf
, exist
->flags
);
407 existattr
= exist
->attr
;
408 newattre
= newattr
->extra
;
409 existattre
= existattr
->extra
;
411 /* 1. Weight check. */
412 new_weight
= exist_weight
= 0;
415 new_weight
= newattre
->weight
;
417 exist_weight
= existattre
->weight
;
419 if (new_weight
> exist_weight
)
422 zlog_debug("%s: %s wins over %s due to weight %d > %d",
423 pfx_buf
, new_buf
, exist_buf
, new_weight
, exist_weight
);
427 if (new_weight
< exist_weight
)
430 zlog_debug("%s: %s loses to %s due to weight %d < %d",
431 pfx_buf
, new_buf
, exist_buf
, new_weight
, exist_weight
);
435 /* 2. Local preference check. */
436 new_pref
= exist_pref
= bgp
->default_local_pref
;
438 if (newattr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_LOCAL_PREF
))
439 new_pref
= newattr
->local_pref
;
440 if (existattr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_LOCAL_PREF
))
441 exist_pref
= existattr
->local_pref
;
443 if (new_pref
> exist_pref
)
446 zlog_debug("%s: %s wins over %s due to localpref %d > %d",
447 pfx_buf
, new_buf
, exist_buf
, new_pref
, exist_pref
);
451 if (new_pref
< exist_pref
)
454 zlog_debug("%s: %s loses to %s due to localpref %d < %d",
455 pfx_buf
, new_buf
, exist_buf
, new_pref
, exist_pref
);
459 /* 3. Local route check. We prefer:
461 * - BGP_ROUTE_AGGREGATE
462 * - BGP_ROUTE_REDISTRIBUTE
464 if (! (new->sub_type
== BGP_ROUTE_NORMAL
))
467 zlog_debug("%s: %s wins over %s due to preferred BGP_ROUTE type",
468 pfx_buf
, new_buf
, exist_buf
);
472 if (! (exist
->sub_type
== BGP_ROUTE_NORMAL
))
475 zlog_debug("%s: %s loses to %s due to preferred BGP_ROUTE type",
476 pfx_buf
, new_buf
, exist_buf
);
480 /* 4. AS path length check. */
481 if (! bgp_flag_check (bgp
, BGP_FLAG_ASPATH_IGNORE
))
483 int exist_hops
= aspath_count_hops (existattr
->aspath
);
484 int exist_confeds
= aspath_count_confeds (existattr
->aspath
);
486 if (bgp_flag_check (bgp
, BGP_FLAG_ASPATH_CONFED
))
490 aspath_hops
= aspath_count_hops (newattr
->aspath
);
491 aspath_hops
+= aspath_count_confeds (newattr
->aspath
);
493 if ( aspath_hops
< (exist_hops
+ exist_confeds
))
496 zlog_debug("%s: %s wins over %s due to aspath (with confeds) hopcount %d < %d",
497 pfx_buf
, new_buf
, exist_buf
,
498 aspath_hops
, (exist_hops
+ exist_confeds
));
502 if ( aspath_hops
> (exist_hops
+ exist_confeds
))
505 zlog_debug("%s: %s loses to %s due to aspath (with confeds) hopcount %d > %d",
506 pfx_buf
, new_buf
, exist_buf
,
507 aspath_hops
, (exist_hops
+ exist_confeds
));
513 int newhops
= aspath_count_hops (newattr
->aspath
);
515 if (newhops
< exist_hops
)
518 zlog_debug("%s: %s wins over %s due to aspath hopcount %d < %d",
519 pfx_buf
, new_buf
, exist_buf
, newhops
, exist_hops
);
523 if (newhops
> exist_hops
)
526 zlog_debug("%s: %s loses to %s due to aspath hopcount %d > %d",
527 pfx_buf
, new_buf
, exist_buf
, newhops
, exist_hops
);
533 /* 5. Origin check. */
534 if (newattr
->origin
< existattr
->origin
)
537 zlog_debug("%s: %s wins over %s due to ORIGIN %s < %s",
538 pfx_buf
, new_buf
, exist_buf
,
539 bgp_origin_long_str
[newattr
->origin
],
540 bgp_origin_long_str
[existattr
->origin
]);
544 if (newattr
->origin
> existattr
->origin
)
547 zlog_debug("%s: %s loses to %s due to ORIGIN %s > %s",
548 pfx_buf
, new_buf
, exist_buf
,
549 bgp_origin_long_str
[newattr
->origin
],
550 bgp_origin_long_str
[existattr
->origin
]);
555 internal_as_route
= (aspath_count_hops (newattr
->aspath
) == 0
556 && aspath_count_hops (existattr
->aspath
) == 0);
557 confed_as_route
= (aspath_count_confeds (newattr
->aspath
) > 0
558 && aspath_count_confeds (existattr
->aspath
) > 0
559 && aspath_count_hops (newattr
->aspath
) == 0
560 && aspath_count_hops (existattr
->aspath
) == 0);
562 if (bgp_flag_check (bgp
, BGP_FLAG_ALWAYS_COMPARE_MED
)
563 || (bgp_flag_check (bgp
, BGP_FLAG_MED_CONFED
)
565 || aspath_cmp_left (newattr
->aspath
, existattr
->aspath
)
566 || aspath_cmp_left_confed (newattr
->aspath
, existattr
->aspath
)
567 || internal_as_route
)
569 new_med
= bgp_med_value (new->attr
, bgp
);
570 exist_med
= bgp_med_value (exist
->attr
, bgp
);
572 if (new_med
< exist_med
)
575 zlog_debug("%s: %s wins over %s due to MED %d < %d",
576 pfx_buf
, new_buf
, exist_buf
, new_med
, exist_med
);
580 if (new_med
> exist_med
)
583 zlog_debug("%s: %s loses to %s due to MED %d > %d",
584 pfx_buf
, new_buf
, exist_buf
, new_med
, exist_med
);
589 /* 7. Peer type check. */
590 new_sort
= new->peer
->sort
;
591 exist_sort
= exist
->peer
->sort
;
593 if (new_sort
== BGP_PEER_EBGP
594 && (exist_sort
== BGP_PEER_IBGP
|| exist_sort
== BGP_PEER_CONFED
))
597 zlog_debug("%s: %s wins over %s due to eBGP peer > iBGP peer",
598 pfx_buf
, new_buf
, exist_buf
);
602 if (exist_sort
== BGP_PEER_EBGP
603 && (new_sort
== BGP_PEER_IBGP
|| new_sort
== BGP_PEER_CONFED
))
606 zlog_debug("%s: %s loses to %s due to iBGP peer < eBGP peer",
607 pfx_buf
, new_buf
, exist_buf
);
611 /* 8. IGP metric check. */
615 newm
= new->extra
->igpmetric
;
617 existm
= exist
->extra
->igpmetric
;
622 zlog_debug("%s: %s wins over %s due to IGP metric %d < %d",
623 pfx_buf
, new_buf
, exist_buf
, newm
, existm
);
630 zlog_debug("%s: %s loses to %s due to IGP metric %d > %d",
631 pfx_buf
, new_buf
, exist_buf
, newm
, existm
);
635 /* 9. Same IGP metric. Compare the cluster list length as
636 representative of IGP hops metric. Rewrite the metric value
637 pair (newm, existm) with the cluster list length. Prefer the
638 path with smaller cluster list length. */
641 if (peer_sort (new->peer
) == BGP_PEER_IBGP
642 && peer_sort (exist
->peer
) == BGP_PEER_IBGP
643 && (mpath_cfg
== NULL
||
644 CHECK_FLAG (mpath_cfg
->ibgp_flags
,
645 BGP_FLAG_IBGP_MULTIPATH_SAME_CLUSTERLEN
)))
647 newm
= BGP_CLUSTER_LIST_LENGTH(new->attr
);
648 existm
= BGP_CLUSTER_LIST_LENGTH(exist
->attr
);
653 zlog_debug("%s: %s wins over %s due to CLUSTER_LIST length %d < %d",
654 pfx_buf
, new_buf
, exist_buf
, newm
, existm
);
661 zlog_debug("%s: %s loses to %s due to CLUSTER_LIST length %d > %d",
662 pfx_buf
, new_buf
, exist_buf
, newm
, existm
);
668 /* 10. confed-external vs. confed-internal */
669 if (CHECK_FLAG(bgp
->config
, BGP_CONFIG_CONFEDERATION
))
671 if (new_sort
== BGP_PEER_CONFED
&& exist_sort
== BGP_PEER_IBGP
)
674 zlog_debug("%s: %s wins over %s due to confed-external peer > confed-internal peer",
675 pfx_buf
, new_buf
, exist_buf
);
679 if (exist_sort
== BGP_PEER_CONFED
&& new_sort
== BGP_PEER_IBGP
)
682 zlog_debug("%s: %s loses to %s due to confed-internal peer < confed-external peer",
683 pfx_buf
, new_buf
, exist_buf
);
688 /* 11. Maximum path check. */
691 if (bgp_flag_check(bgp
, BGP_FLAG_ASPATH_MULTIPATH_RELAX
))
695 * For the two paths, all comparison steps till IGP metric
696 * have succeeded - including AS_PATH hop count. Since 'bgp
697 * bestpath as-path multipath-relax' knob is on, we don't need
698 * an exact match of AS_PATH. Thus, mark the paths are equal.
699 * That will trigger both these paths to get into the multipath
705 zlog_debug("%s: %s and %s are equal via multipath-relax",
706 pfx_buf
, new_buf
, exist_buf
);
708 else if (new->peer
->sort
== BGP_PEER_IBGP
)
710 if (aspath_cmp (new->attr
->aspath
, exist
->attr
->aspath
))
715 zlog_debug("%s: %s and %s are equal via matching aspaths",
716 pfx_buf
, new_buf
, exist_buf
);
719 else if (new->peer
->as
== exist
->peer
->as
)
724 zlog_debug("%s: %s and %s are equal via same remote-as",
725 pfx_buf
, new_buf
, exist_buf
);
731 * TODO: If unequal cost ibgp multipath is enabled we can
732 * mark the paths as equal here instead of returning
737 zlog_debug("%s: %s wins over %s after IGP metric comparison",
738 pfx_buf
, new_buf
, exist_buf
);
740 zlog_debug("%s: %s loses to %s after IGP metric comparison",
741 pfx_buf
, new_buf
, exist_buf
);
746 /* 12. If both paths are external, prefer the path that was received
747 first (the oldest one). This step minimizes route-flap, since a
748 newer path won't displace an older one, even if it was the
749 preferred route based on the additional decision criteria below. */
750 if (! bgp_flag_check (bgp
, BGP_FLAG_COMPARE_ROUTER_ID
)
751 && new_sort
== BGP_PEER_EBGP
752 && exist_sort
== BGP_PEER_EBGP
)
754 if (CHECK_FLAG (new->flags
, BGP_INFO_SELECTED
))
757 zlog_debug("%s: %s wins over %s due to oldest external",
758 pfx_buf
, new_buf
, exist_buf
);
762 if (CHECK_FLAG (exist
->flags
, BGP_INFO_SELECTED
))
765 zlog_debug("%s: %s loses to %s due to oldest external",
766 pfx_buf
, new_buf
, exist_buf
);
771 /* 13. Router-ID comparision. */
772 /* If one of the paths is "stale", the corresponding peer router-id will
773 * be 0 and would always win over the other path. If originator id is
774 * used for the comparision, it will decide which path is better.
776 if (newattr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID
))
777 new_id
.s_addr
= newattre
->originator_id
.s_addr
;
779 new_id
.s_addr
= new->peer
->remote_id
.s_addr
;
780 if (existattr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID
))
781 exist_id
.s_addr
= existattre
->originator_id
.s_addr
;
783 exist_id
.s_addr
= exist
->peer
->remote_id
.s_addr
;
785 if (ntohl (new_id
.s_addr
) < ntohl (exist_id
.s_addr
))
788 zlog_debug("%s: %s wins over %s due to Router-ID comparison",
789 pfx_buf
, new_buf
, exist_buf
);
793 if (ntohl (new_id
.s_addr
) > ntohl (exist_id
.s_addr
))
796 zlog_debug("%s: %s loses to %s due to Router-ID comparison",
797 pfx_buf
, new_buf
, exist_buf
);
801 /* 14. Cluster length comparision. */
802 new_cluster
= BGP_CLUSTER_LIST_LENGTH(new->attr
);
803 exist_cluster
= BGP_CLUSTER_LIST_LENGTH(exist
->attr
);
805 if (new_cluster
< exist_cluster
)
808 zlog_debug("%s: %s wins over %s due to CLUSTER_LIST length %d < %d",
809 pfx_buf
, new_buf
, exist_buf
, new_cluster
, exist_cluster
);
813 if (new_cluster
> exist_cluster
)
816 zlog_debug("%s: %s loses to %s due to CLUSTER_LIST length %d > %d",
817 pfx_buf
, new_buf
, exist_buf
, new_cluster
, exist_cluster
);
821 /* 15. Neighbor address comparision. */
822 /* Do this only if neither path is "stale" as stale paths do not have
823 * valid peer information (as the connection may or may not be up).
825 if (CHECK_FLAG (exist
->flags
, BGP_INFO_STALE
))
828 zlog_debug("%s: %s wins over %s due to latter path being STALE",
829 pfx_buf
, new_buf
, exist_buf
);
833 if (CHECK_FLAG (new->flags
, BGP_INFO_STALE
))
836 zlog_debug("%s: %s loses to %s due to former path being STALE",
837 pfx_buf
, new_buf
, exist_buf
);
841 /* locally configured routes to advertise do not have su_remote */
842 if (new->peer
->su_remote
== NULL
)
844 if (exist
->peer
->su_remote
== NULL
)
847 ret
= sockunion_cmp (new->peer
->su_remote
, exist
->peer
->su_remote
);
852 zlog_debug("%s: %s loses to %s due to Neighor IP comparison",
853 pfx_buf
, new_buf
, exist_buf
);
860 zlog_debug("%s: %s wins over %s due to Neighor IP comparison",
861 pfx_buf
, new_buf
, exist_buf
);
866 zlog_debug("%s: %s wins over %s due to nothing left to compare",
867 pfx_buf
, new_buf
, exist_buf
);
872 /* Compare two bgp route entity. Return -1 if new is preferred, 1 if exist
873 * is preferred, or 0 if they are the same (usually will only occur if
874 * multipath is enabled
875 * This version is compatible with */
877 bgp_info_cmp_compatible (struct bgp
*bgp
, struct bgp_info
*new, struct bgp_info
*exist
,
878 afi_t afi
, safi_t safi
)
882 ret
= bgp_info_cmp (bgp
, new, exist
, &paths_eq
, NULL
, 0, __func__
);
896 static enum filter_type
897 bgp_input_filter (struct peer
*peer
, struct prefix
*p
, struct attr
*attr
,
898 afi_t afi
, safi_t safi
)
900 struct bgp_filter
*filter
;
902 filter
= &peer
->filter
[afi
][safi
];
904 #define FILTER_EXIST_WARN(F,f,filter) \
905 if (BGP_DEBUG (update, UPDATE_IN) \
906 && !(F ## _IN (filter))) \
907 zlog_warn ("%s: Could not find configured input %s-list %s!", \
908 peer->host, #f, F ## _IN_NAME(filter));
910 if (DISTRIBUTE_IN_NAME (filter
)) {
911 FILTER_EXIST_WARN(DISTRIBUTE
, distribute
, filter
);
913 if (access_list_apply (DISTRIBUTE_IN (filter
), p
) == FILTER_DENY
)
917 if (PREFIX_LIST_IN_NAME (filter
)) {
918 FILTER_EXIST_WARN(PREFIX_LIST
, prefix
, filter
);
920 if (prefix_list_apply (PREFIX_LIST_IN (filter
), p
) == PREFIX_DENY
)
924 if (FILTER_LIST_IN_NAME (filter
)) {
925 FILTER_EXIST_WARN(FILTER_LIST
, as
, filter
);
927 if (as_list_apply (FILTER_LIST_IN (filter
), attr
->aspath
)== AS_FILTER_DENY
)
931 return FILTER_PERMIT
;
932 #undef FILTER_EXIST_WARN
935 static enum filter_type
936 bgp_output_filter (struct peer
*peer
, struct prefix
*p
, struct attr
*attr
,
937 afi_t afi
, safi_t safi
)
939 struct bgp_filter
*filter
;
941 filter
= &peer
->filter
[afi
][safi
];
943 #define FILTER_EXIST_WARN(F,f,filter) \
944 if (BGP_DEBUG (update, UPDATE_OUT) \
945 && !(F ## _OUT (filter))) \
946 zlog_warn ("%s: Could not find configured output %s-list %s!", \
947 peer->host, #f, F ## _OUT_NAME(filter));
949 if (DISTRIBUTE_OUT_NAME (filter
)) {
950 FILTER_EXIST_WARN(DISTRIBUTE
, distribute
, filter
);
952 if (access_list_apply (DISTRIBUTE_OUT (filter
), p
) == FILTER_DENY
)
956 if (PREFIX_LIST_OUT_NAME (filter
)) {
957 FILTER_EXIST_WARN(PREFIX_LIST
, prefix
, filter
);
959 if (prefix_list_apply (PREFIX_LIST_OUT (filter
), p
) == PREFIX_DENY
)
963 if (FILTER_LIST_OUT_NAME (filter
)) {
964 FILTER_EXIST_WARN(FILTER_LIST
, as
, filter
);
966 if (as_list_apply (FILTER_LIST_OUT (filter
), attr
->aspath
) == AS_FILTER_DENY
)
970 return FILTER_PERMIT
;
971 #undef FILTER_EXIST_WARN
974 /* If community attribute includes no_export then return 1. */
976 bgp_community_filter (struct peer
*peer
, struct attr
*attr
)
980 /* NO_ADVERTISE check. */
981 if (community_include (attr
->community
, COMMUNITY_NO_ADVERTISE
))
984 /* NO_EXPORT check. */
985 if (peer
->sort
== BGP_PEER_EBGP
&&
986 community_include (attr
->community
, COMMUNITY_NO_EXPORT
))
989 /* NO_EXPORT_SUBCONFED check. */
990 if (peer
->sort
== BGP_PEER_EBGP
991 || peer
->sort
== BGP_PEER_CONFED
)
992 if (community_include (attr
->community
, COMMUNITY_NO_EXPORT_SUBCONFED
))
998 /* Route reflection loop check. */
1000 bgp_cluster_filter (struct peer
*peer
, struct attr
*attr
)
1002 struct in_addr cluster_id
;
1004 if (attr
->extra
&& attr
->extra
->cluster
)
1006 if (peer
->bgp
->config
& BGP_CONFIG_CLUSTER_ID
)
1007 cluster_id
= peer
->bgp
->cluster_id
;
1009 cluster_id
= peer
->bgp
->router_id
;
1011 if (cluster_loop_check (attr
->extra
->cluster
, cluster_id
))
1018 bgp_input_modifier (struct peer
*peer
, struct prefix
*p
, struct attr
*attr
,
1019 afi_t afi
, safi_t safi
, const char *rmap_name
)
1021 struct bgp_filter
*filter
;
1022 struct bgp_info info
;
1023 route_map_result_t ret
;
1024 struct route_map
*rmap
= NULL
;
1026 filter
= &peer
->filter
[afi
][safi
];
1028 /* Apply default weight value. */
1029 if (peer
->weight
[afi
][safi
])
1030 (bgp_attr_extra_get (attr
))->weight
= peer
->weight
[afi
][safi
];
1034 rmap
= route_map_lookup_by_name(rmap_name
);
1041 if (ROUTE_MAP_IN_NAME(filter
))
1043 rmap
= ROUTE_MAP_IN (filter
);
1050 /* Route map apply. */
1053 /* Duplicate current value to new strucutre for modification. */
1057 SET_FLAG (peer
->rmap_type
, PEER_RMAP_TYPE_IN
);
1059 /* Apply BGP route map to the attribute. */
1060 ret
= route_map_apply (rmap
, p
, RMAP_BGP
, &info
);
1062 peer
->rmap_type
= 0;
1064 if (ret
== RMAP_DENYMATCH
)
1066 /* Free newly generated AS path and community by route-map. */
1067 bgp_attr_flush (attr
);
1075 bgp_output_modifier (struct peer
*peer
, struct prefix
*p
, struct attr
*attr
,
1076 afi_t afi
, safi_t safi
, const char *rmap_name
)
1078 struct bgp_filter
*filter
;
1079 struct bgp_info info
;
1080 route_map_result_t ret
;
1081 struct route_map
*rmap
= NULL
;
1083 filter
= &peer
->filter
[afi
][safi
];
1085 /* Apply default weight value. */
1086 if (peer
->weight
[afi
][safi
])
1087 (bgp_attr_extra_get (attr
))->weight
= peer
->weight
[afi
][safi
];
1091 rmap
= route_map_lookup_by_name(rmap_name
);
1098 if (ROUTE_MAP_OUT_NAME(filter
))
1100 rmap
= ROUTE_MAP_OUT (filter
);
1107 /* Route map apply. */
1110 /* Duplicate current value to new strucutre for modification. */
1114 SET_FLAG (peer
->rmap_type
, PEER_RMAP_TYPE_OUT
);
1116 /* Apply BGP route map to the attribute. */
1117 ret
= route_map_apply (rmap
, p
, RMAP_BGP
, &info
);
1119 peer
->rmap_type
= 0;
1121 if (ret
== RMAP_DENYMATCH
)
1122 /* caller has multiple error paths with bgp_attr_flush() */
1128 /* If this is an EBGP peer with remove-private-AS */
1130 bgp_peer_remove_private_as(struct bgp
*bgp
, afi_t afi
, safi_t safi
,
1131 struct peer
*peer
, struct attr
*attr
)
1133 if (peer
->sort
== BGP_PEER_EBGP
&&
1134 (peer_af_flag_check (peer
, afi
, safi
, PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE
) ||
1135 peer_af_flag_check (peer
, afi
, safi
, PEER_FLAG_REMOVE_PRIVATE_AS_REPLACE
) ||
1136 peer_af_flag_check (peer
, afi
, safi
, PEER_FLAG_REMOVE_PRIVATE_AS_ALL
) ||
1137 peer_af_flag_check (peer
, afi
, safi
, PEER_FLAG_REMOVE_PRIVATE_AS
)))
1139 // Take action on the entire aspath
1140 if (peer_af_flag_check (peer
, afi
, safi
, PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE
) ||
1141 peer_af_flag_check (peer
, afi
, safi
, PEER_FLAG_REMOVE_PRIVATE_AS_ALL
))
1143 if (peer_af_flag_check (peer
, afi
, safi
, PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE
))
1144 attr
->aspath
= aspath_replace_private_asns (attr
->aspath
, bgp
->as
);
1146 // The entire aspath consists of private ASNs so create an empty aspath
1147 else if (aspath_private_as_check (attr
->aspath
))
1148 attr
->aspath
= aspath_empty_get ();
1150 // There are some public and some private ASNs, remove the private ASNs
1152 attr
->aspath
= aspath_remove_private_asns (attr
->aspath
);
1155 // 'all' was not specified so the entire aspath must be private ASNs
1156 // for us to do anything
1157 else if (aspath_private_as_check (attr
->aspath
))
1159 if (peer_af_flag_check (peer
, afi
, safi
, PEER_FLAG_REMOVE_PRIVATE_AS_REPLACE
))
1160 attr
->aspath
= aspath_replace_private_asns (attr
->aspath
, bgp
->as
);
1162 attr
->aspath
= aspath_empty_get ();
1167 /* If this is an EBGP peer with as-override */
1169 bgp_peer_as_override(struct bgp
*bgp
, afi_t afi
, safi_t safi
,
1170 struct peer
*peer
, struct attr
*attr
)
1172 if (peer
->sort
== BGP_PEER_EBGP
&&
1173 peer_af_flag_check (peer
, afi
, safi
, PEER_FLAG_AS_OVERRIDE
))
1175 if (aspath_single_asn_check (attr
->aspath
, peer
->as
))
1176 attr
->aspath
= aspath_replace_specific_asn (attr
->aspath
, peer
->as
, bgp
->as
);
1181 subgroup_announce_reset_nhop (u_char family
, struct attr
*attr
)
1183 if (family
== AF_INET
)
1184 attr
->nexthop
.s_addr
= 0;
1185 if (family
== AF_INET6
)
1186 memset (&attr
->extra
->mp_nexthop_global
, 0, IPV6_MAX_BYTELEN
);
1190 subgroup_announce_check (struct bgp_info
*ri
, struct update_subgroup
*subgrp
,
1191 struct prefix
*p
, struct attr
*attr
)
1193 struct bgp_filter
*filter
;
1196 struct peer
*onlypeer
;
1198 struct attr
*riattr
;
1199 struct peer_af
*paf
;
1200 char buf
[PREFIX_STRLEN
];
1206 int samepeer_safe
= 0; /* for synthetic mplsvpns routes */
1208 if (DISABLE_BGP_ANNOUNCE
)
1211 afi
= SUBGRP_AFI(subgrp
);
1212 safi
= SUBGRP_SAFI(subgrp
);
1213 peer
= SUBGRP_PEER(subgrp
);
1215 if (CHECK_FLAG (peer
->flags
, PEER_FLAG_LONESOUL
))
1216 onlypeer
= SUBGRP_PFIRST(subgrp
)->peer
;
1219 filter
= &peer
->filter
[afi
][safi
];
1220 bgp
= SUBGRP_INST(subgrp
);
1221 riattr
= bgp_info_mpath_count (ri
) ? bgp_info_mpath_attr (ri
) : ri
->attr
;
1224 if (((afi
== AFI_IP
) || (afi
== AFI_IP6
)) && (safi
== SAFI_MPLS_VPN
) &&
1225 ((ri
->type
== ZEBRA_ROUTE_BGP_DIRECT
) ||
1226 (ri
->type
== ZEBRA_ROUTE_BGP_DIRECT_EXT
))) {
1229 * direct and direct_ext type routes originate internally even
1230 * though they can have peer pointers that reference other systems
1232 prefix2str(p
, buf
, PREFIX_STRLEN
);
1233 zlog_debug("%s: pfx %s bgp_direct->vpn route peer safe", __func__
, buf
);
1238 /* With addpath we may be asked to TX all kinds of paths so make sure
1240 if (!CHECK_FLAG (ri
->flags
, BGP_INFO_VALID
) ||
1241 CHECK_FLAG (ri
->flags
, BGP_INFO_HISTORY
) ||
1242 CHECK_FLAG (ri
->flags
, BGP_INFO_REMOVED
))
1247 /* If this is not the bestpath then check to see if there is an enabled addpath
1248 * feature that requires us to advertise it */
1249 if (! CHECK_FLAG (ri
->flags
, BGP_INFO_SELECTED
))
1251 if (! bgp_addpath_tx_path(peer
, afi
, safi
, ri
))
1257 /* Aggregate-address suppress check. */
1258 if (ri
->extra
&& ri
->extra
->suppress
)
1259 if (! UNSUPPRESS_MAP_NAME (filter
))
1264 /* Do not send back route to sender. */
1265 if (onlypeer
&& from
== onlypeer
)
1270 /* Do not send the default route in the BGP table if the neighbor is
1271 * configured for default-originate */
1272 if (CHECK_FLAG (peer
->af_flags
[afi
][safi
], PEER_FLAG_DEFAULT_ORIGINATE
))
1274 if (p
->family
== AF_INET
&& p
->u
.prefix4
.s_addr
== INADDR_ANY
)
1276 else if (p
->family
== AF_INET6
&& p
->prefixlen
== 0)
1280 /* Transparency check. */
1281 if (CHECK_FLAG (peer
->af_flags
[afi
][safi
], PEER_FLAG_RSERVER_CLIENT
)
1282 && CHECK_FLAG (from
->af_flags
[afi
][safi
], PEER_FLAG_RSERVER_CLIENT
))
1287 /* If community is not disabled check the no-export and local. */
1288 if (! transparent
&& bgp_community_filter (peer
, riattr
))
1290 if (bgp_debug_update(NULL
, p
, subgrp
->update_group
, 0))
1291 zlog_debug ("subgrpannouncecheck: community filter check fail");
1295 /* If the attribute has originator-id and it is same as remote
1298 riattr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_ORIGINATOR_ID
) &&
1299 (IPV4_ADDR_SAME (&onlypeer
->remote_id
, &riattr
->extra
->originator_id
)))
1301 if (bgp_debug_update(NULL
, p
, subgrp
->update_group
, 0))
1302 zlog_debug ("%s [Update:SEND] %s originator-id is same as "
1304 onlypeer
->host
, prefix2str (p
, buf
, sizeof (buf
)));
1308 /* ORF prefix-list filter check */
1309 if (CHECK_FLAG (peer
->af_cap
[afi
][safi
], PEER_CAP_ORF_PREFIX_RM_ADV
)
1310 && (CHECK_FLAG (peer
->af_cap
[afi
][safi
], PEER_CAP_ORF_PREFIX_SM_RCV
)
1311 || CHECK_FLAG (peer
->af_cap
[afi
][safi
],
1312 PEER_CAP_ORF_PREFIX_SM_OLD_RCV
)))
1313 if (peer
->orf_plist
[afi
][safi
])
1315 if (prefix_list_apply (peer
->orf_plist
[afi
][safi
], p
) == PREFIX_DENY
)
1317 if (bgp_debug_update(NULL
, p
, subgrp
->update_group
, 0))
1318 zlog_debug ("%s [Update:SEND] %s is filtered via ORF",
1319 peer
->host
, prefix2str (p
, buf
, sizeof (buf
)));
1324 /* Output filter check. */
1325 if (bgp_output_filter (peer
, p
, riattr
, afi
, safi
) == FILTER_DENY
)
1327 if (bgp_debug_update(NULL
, p
, subgrp
->update_group
, 0))
1328 zlog_debug ("%s [Update:SEND] %s is filtered",
1329 peer
->host
, prefix2str (p
, buf
, sizeof (buf
)));
1333 #ifdef BGP_SEND_ASPATH_CHECK
1334 /* AS path loop check. */
1335 if (onlypeer
&& aspath_loop_check (riattr
->aspath
, onlypeer
->as
))
1337 if (bgp_debug_update(NULL
, p
, subgrp
->update_group
, 0))
1338 zlog_debug ("%s [Update:SEND] suppress announcement to peer AS %u "
1339 "that is part of AS path.",
1340 onlypeer
->host
, onlypeer
->as
);
1343 #endif /* BGP_SEND_ASPATH_CHECK */
1345 /* If we're a CONFED we need to loop check the CONFED ID too */
1346 if (CHECK_FLAG(bgp
->config
, BGP_CONFIG_CONFEDERATION
))
1348 if (aspath_loop_check(riattr
->aspath
, bgp
->confed_id
))
1350 if (bgp_debug_update(NULL
, p
, subgrp
->update_group
, 0))
1351 zlog_debug ("%s [Update:SEND] suppress announcement to peer AS %u"
1359 /* Route-Reflect check. */
1360 if (from
->sort
== BGP_PEER_IBGP
&& peer
->sort
== BGP_PEER_IBGP
)
1365 /* IBGP reflection check. */
1366 if (reflect
&& !samepeer_safe
)
1368 /* A route from a Client peer. */
1369 if (CHECK_FLAG (from
->af_flags
[afi
][safi
], PEER_FLAG_REFLECTOR_CLIENT
))
1371 /* Reflect to all the Non-Client peers and also to the
1372 Client peers other than the originator. Originator check
1373 is already done. So there is noting to do. */
1374 /* no bgp client-to-client reflection check. */
1375 if (bgp_flag_check (bgp
, BGP_FLAG_NO_CLIENT_TO_CLIENT
))
1376 if (CHECK_FLAG (peer
->af_flags
[afi
][safi
],
1377 PEER_FLAG_REFLECTOR_CLIENT
))
1382 /* A route from a Non-client peer. Reflect to all other
1384 if (! CHECK_FLAG (peer
->af_flags
[afi
][safi
],
1385 PEER_FLAG_REFLECTOR_CLIENT
))
1390 /* For modify attribute, copy it to temporary structure. */
1391 bgp_attr_dup (attr
, riattr
);
1393 /* If local-preference is not set. */
1394 if ((peer
->sort
== BGP_PEER_IBGP
1395 || peer
->sort
== BGP_PEER_CONFED
)
1396 && (! (attr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_LOCAL_PREF
))))
1398 attr
->flag
|= ATTR_FLAG_BIT (BGP_ATTR_LOCAL_PREF
);
1399 attr
->local_pref
= bgp
->default_local_pref
;
1402 /* If originator-id is not set and the route is to be reflected,
1403 set the originator id */
1404 if (reflect
&& (!(attr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID
))))
1406 attr
->extra
= bgp_attr_extra_get(attr
);
1407 IPV4_ADDR_COPY(&(attr
->extra
->originator_id
), &(from
->remote_id
));
1408 SET_FLAG(attr
->flag
, BGP_ATTR_ORIGINATOR_ID
);
1411 /* Remove MED if its an EBGP peer - will get overwritten by route-maps */
1412 if (peer
->sort
== BGP_PEER_EBGP
1413 && attr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_MULTI_EXIT_DISC
))
1415 if (from
!= bgp
->peer_self
&& ! transparent
1416 && ! CHECK_FLAG (peer
->af_flags
[afi
][safi
], PEER_FLAG_MED_UNCHANGED
))
1417 attr
->flag
&= ~(ATTR_FLAG_BIT (BGP_ATTR_MULTI_EXIT_DISC
));
1420 /* Since the nexthop attribute can vary per peer, it is not explicitly set
1421 * in announce check, only certain flags and length (or number of nexthops
1422 * -- for IPv6/MP_REACH) are set here in order to guide the update formation
1423 * code in setting the nexthop(s) on a per peer basis in reformat_peer().
1424 * Typically, the source nexthop in the attribute is preserved but in the
1425 * scenarios where we know it will always be overwritten, we reset the
1426 * nexthop to "0" in an attempt to achieve better Update packing. An
1427 * example of this is when a prefix from each of 2 IBGP peers needs to be
1428 * announced to an EBGP peer (and they have the same attributes barring
1432 SET_FLAG(attr
->rmap_change_flags
, BATTR_REFLECTED
);
1434 #define NEXTHOP_IS_V6 (\
1435 (safi != SAFI_ENCAP && safi != SAFI_MPLS_VPN &&\
1436 (p->family == AF_INET6 || peer_cap_enhe(peer))) || \
1437 ((safi == SAFI_ENCAP || safi == SAFI_MPLS_VPN) &&\
1438 attr->extra->mp_nexthop_len >= IPV6_MAX_BYTELEN))
1440 /* IPv6/MP starts with 1 nexthop. The link-local address is passed only if
1441 * the peer (group) is configured to receive link-local nexthop unchanged
1442 * and it is available in the prefix OR we're not reflecting the route and
1443 * the peer (group) to whom we're going to announce is on a shared network
1444 * and this is either a self-originated route or the peer is EBGP.
1448 attr
->extra
->mp_nexthop_len
= BGP_ATTR_NHLEN_IPV6_GLOBAL
;
1449 if ((CHECK_FLAG (peer
->af_flags
[afi
][safi
],
1450 PEER_FLAG_NEXTHOP_LOCAL_UNCHANGED
) &&
1451 IN6_IS_ADDR_LINKLOCAL (&attr
->extra
->mp_nexthop_local
)) ||
1452 (!reflect
&& peer
->shared_network
&&
1453 (from
== bgp
->peer_self
|| peer
->sort
== BGP_PEER_EBGP
)))
1455 attr
->extra
->mp_nexthop_len
= BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL
;
1458 /* Clear off link-local nexthop in source, whenever it is not needed to
1459 * ensure more prefixes share the same attribute for announcement.
1461 if (!(CHECK_FLAG (peer
->af_flags
[afi
][safi
],
1462 PEER_FLAG_NEXTHOP_LOCAL_UNCHANGED
)))
1463 memset (&attr
->extra
->mp_nexthop_local
, 0, IPV6_MAX_BYTELEN
);
1466 bgp_peer_remove_private_as(bgp
, afi
, safi
, peer
, attr
);
1467 bgp_peer_as_override(bgp
, afi
, safi
, peer
, attr
);
1469 /* Route map & unsuppress-map apply. */
1470 if (ROUTE_MAP_OUT_NAME (filter
)
1471 || (ri
->extra
&& ri
->extra
->suppress
) )
1473 struct bgp_info info
;
1474 struct attr dummy_attr
;
1475 struct attr_extra dummy_extra
;
1477 dummy_attr
.extra
= &dummy_extra
;
1481 /* don't confuse inbound and outbound setting */
1482 RESET_FLAG(attr
->rmap_change_flags
);
1485 * The route reflector is not allowed to modify the attributes
1486 * of the reflected IBGP routes unless explicitly allowed.
1488 if ((from
->sort
== BGP_PEER_IBGP
&& peer
->sort
== BGP_PEER_IBGP
)
1489 && !bgp_flag_check(bgp
, BGP_FLAG_RR_ALLOW_OUTBOUND_POLICY
))
1491 bgp_attr_dup (&dummy_attr
, attr
);
1492 info
.attr
= &dummy_attr
;
1495 SET_FLAG (peer
->rmap_type
, PEER_RMAP_TYPE_OUT
);
1497 if (ri
->extra
&& ri
->extra
->suppress
)
1498 ret
= route_map_apply (UNSUPPRESS_MAP (filter
), p
, RMAP_BGP
, &info
);
1500 ret
= route_map_apply (ROUTE_MAP_OUT (filter
), p
, RMAP_BGP
, &info
);
1502 peer
->rmap_type
= 0;
1504 if (ret
== RMAP_DENYMATCH
)
1506 bgp_attr_flush (attr
);
1511 /* After route-map has been applied, we check to see if the nexthop to
1512 * be carried in the attribute (that is used for the announcement) can
1513 * be cleared off or not. We do this in all cases where we would be
1514 * setting the nexthop to "ourselves". For IPv6, we only need to consider
1515 * the global nexthop here; the link-local nexthop would have been cleared
1516 * already, and if not, it is required by the update formation code.
1517 * Also see earlier comments in this function.
1520 * If route-map has performed some operation on the nexthop or the peer
1521 * configuration says to pass it unchanged, we cannot reset the nexthop
1522 * here, so only attempt to do it if these aren't true. Note that the
1523 * route-map handler itself might have cleared the nexthop, if for example,
1524 * it is configured as 'peer-address'.
1526 if (!bgp_rmap_nhop_changed(attr
->rmap_change_flags
,
1527 riattr
->rmap_change_flags
) &&
1529 !CHECK_FLAG (peer
->af_flags
[afi
][safi
], PEER_FLAG_NEXTHOP_UNCHANGED
))
1531 /* We can reset the nexthop, if setting (or forcing) it to 'self' */
1532 if (CHECK_FLAG (peer
->af_flags
[afi
][safi
], PEER_FLAG_NEXTHOP_SELF
) ||
1533 CHECK_FLAG (peer
->af_flags
[afi
][safi
], PEER_FLAG_FORCE_NEXTHOP_SELF
))
1536 CHECK_FLAG (peer
->af_flags
[afi
][safi
],
1537 PEER_FLAG_FORCE_NEXTHOP_SELF
))
1538 subgroup_announce_reset_nhop ((peer_cap_enhe(peer
) ?
1539 AF_INET6
: p
->family
), attr
);
1541 else if (peer
->sort
== BGP_PEER_EBGP
)
1543 /* Can also reset the nexthop if announcing to EBGP, but only if
1544 * no peer in the subgroup is on a shared subnet.
1545 * Note: 3rd party nexthop currently implemented for IPv4 only.
1547 SUBGRP_FOREACH_PEER (subgrp
, paf
)
1549 if (bgp_multiaccess_check_v4 (riattr
->nexthop
, paf
->peer
))
1553 subgroup_announce_reset_nhop ((peer_cap_enhe(peer
) ? AF_INET6
: p
->family
), attr
);
1555 /* If IPv6/MP and nexthop does not have any override and happens to
1556 * be a link-local address, reset it so that we don't pass along the
1557 * source's link-local IPv6 address to recipients who may not be on
1558 * the same interface.
1560 if (p
->family
== AF_INET6
|| peer_cap_enhe(peer
))
1562 if (IN6_IS_ADDR_LINKLOCAL (&attr
->extra
->mp_nexthop_global
))
1563 subgroup_announce_reset_nhop (AF_INET6
, attr
);
1570 struct bgp_info_pair
1572 struct bgp_info
*old
;
1573 struct bgp_info
*new;
1577 bgp_best_selection (struct bgp
*bgp
, struct bgp_node
*rn
,
1578 struct bgp_maxpaths_cfg
*mpath_cfg
,
1579 struct bgp_info_pair
*result
)
1581 struct bgp_info
*new_select
;
1582 struct bgp_info
*old_select
;
1583 struct bgp_info
*ri
;
1584 struct bgp_info
*ri1
;
1585 struct bgp_info
*ri2
;
1586 struct bgp_info
*nextri
= NULL
;
1587 int paths_eq
, do_mpath
, debug
;
1588 struct list mp_list
;
1589 char pfx_buf
[PREFIX2STR_BUFFER
];
1590 char path_buf
[PATH_ADDPATH_STR_BUFFER
];
1592 bgp_mp_list_init (&mp_list
);
1593 do_mpath
= (mpath_cfg
->maxpaths_ebgp
> 1 || mpath_cfg
->maxpaths_ibgp
> 1);
1595 debug
= bgp_debug_bestpath(&rn
->p
);
1598 prefix2str (&rn
->p
, pfx_buf
, sizeof (pfx_buf
));
1600 /* bgp deterministic-med */
1602 if (bgp_flag_check (bgp
, BGP_FLAG_DETERMINISTIC_MED
))
1605 /* Clear BGP_INFO_DMED_SELECTED for all paths */
1606 for (ri1
= rn
->info
; ri1
; ri1
= ri1
->next
)
1607 bgp_info_unset_flag (rn
, ri1
, BGP_INFO_DMED_SELECTED
);
1609 for (ri1
= rn
->info
; ri1
; ri1
= ri1
->next
)
1611 if (CHECK_FLAG (ri1
->flags
, BGP_INFO_DMED_CHECK
))
1613 if (BGP_INFO_HOLDDOWN (ri1
))
1615 if (ri1
->peer
&& ri1
->peer
!= bgp
->peer_self
)
1616 if (ri1
->peer
->status
!= Established
)
1622 for (ri2
= ri1
->next
; ri2
; ri2
= ri2
->next
)
1624 if (CHECK_FLAG (ri2
->flags
, BGP_INFO_DMED_CHECK
))
1626 if (BGP_INFO_HOLDDOWN (ri2
))
1629 ri2
->peer
!= bgp
->peer_self
&&
1630 !CHECK_FLAG (ri2
->peer
->sflags
, PEER_STATUS_NSF_WAIT
))
1631 if (ri2
->peer
->status
!= Established
)
1634 if (aspath_cmp_left (ri1
->attr
->aspath
, ri2
->attr
->aspath
)
1635 || aspath_cmp_left_confed (ri1
->attr
->aspath
,
1638 if (bgp_info_cmp (bgp
, ri2
, new_select
, &paths_eq
,
1639 mpath_cfg
, debug
, pfx_buf
))
1641 bgp_info_unset_flag (rn
, new_select
, BGP_INFO_DMED_SELECTED
);
1645 bgp_info_set_flag (rn
, ri2
, BGP_INFO_DMED_CHECK
);
1649 bgp_info_set_flag (rn
, new_select
, BGP_INFO_DMED_CHECK
);
1650 bgp_info_set_flag (rn
, new_select
, BGP_INFO_DMED_SELECTED
);
1654 bgp_info_path_with_addpath_rx_str (new_select
, path_buf
);
1655 zlog_debug("%s: %s is the bestpath from AS %d",
1656 pfx_buf
, path_buf
, aspath_get_first_as(new_select
->attr
->aspath
));
1661 /* Check old selected route and new selected route. */
1664 for (ri
= rn
->info
; (ri
!= NULL
) && (nextri
= ri
->next
, 1); ri
= nextri
)
1666 if (CHECK_FLAG (ri
->flags
, BGP_INFO_SELECTED
))
1669 if (BGP_INFO_HOLDDOWN (ri
))
1671 /* reap REMOVED routes, if needs be
1672 * selected route must stay for a while longer though
1674 if (CHECK_FLAG (ri
->flags
, BGP_INFO_REMOVED
)
1675 && (ri
!= old_select
))
1676 bgp_info_reap (rn
, ri
);
1682 ri
->peer
!= bgp
->peer_self
&&
1683 !CHECK_FLAG (ri
->peer
->sflags
, PEER_STATUS_NSF_WAIT
))
1684 if (ri
->peer
->status
!= Established
)
1687 if (bgp_flag_check (bgp
, BGP_FLAG_DETERMINISTIC_MED
)
1688 && (! CHECK_FLAG (ri
->flags
, BGP_INFO_DMED_SELECTED
)))
1690 bgp_info_unset_flag (rn
, ri
, BGP_INFO_DMED_CHECK
);
1694 bgp_info_unset_flag (rn
, ri
, BGP_INFO_DMED_CHECK
);
1696 if (bgp_info_cmp (bgp
, ri
, new_select
, &paths_eq
, mpath_cfg
, debug
, pfx_buf
))
1702 /* Now that we know which path is the bestpath see if any of the other paths
1703 * qualify as multipaths
1708 bgp_info_path_with_addpath_rx_str (new_select
, path_buf
);
1710 sprintf (path_buf
, "NONE");
1711 zlog_debug("%s: After path selection, newbest is %s oldbest was %s",
1713 old_select
? old_select
->peer
->host
: "NONE");
1716 if (do_mpath
&& new_select
)
1718 for (ri
= rn
->info
; (ri
!= NULL
) && (nextri
= ri
->next
, 1); ri
= nextri
)
1722 bgp_info_path_with_addpath_rx_str (ri
, path_buf
);
1724 if (ri
== new_select
)
1727 zlog_debug("%s: %s is the bestpath, add to the multipath list",
1729 bgp_mp_list_add (&mp_list
, ri
);
1733 if (BGP_INFO_HOLDDOWN (ri
))
1737 ri
->peer
!= bgp
->peer_self
&&
1738 !CHECK_FLAG (ri
->peer
->sflags
, PEER_STATUS_NSF_WAIT
))
1739 if (ri
->peer
->status
!= Established
)
1742 if (!bgp_info_nexthop_cmp (ri
, new_select
))
1745 zlog_debug("%s: %s has the same nexthop as the bestpath, skip it",
1750 bgp_info_cmp (bgp
, ri
, new_select
, &paths_eq
, mpath_cfg
, debug
, pfx_buf
);
1755 zlog_debug("%s: %s is equivalent to the bestpath, add to the multipath list",
1757 bgp_mp_list_add (&mp_list
, ri
);
1762 bgp_info_mpath_update (rn
, new_select
, old_select
, &mp_list
, mpath_cfg
);
1763 bgp_info_mpath_aggregate_update (new_select
, old_select
);
1764 bgp_mp_list_clear (&mp_list
);
1766 result
->old
= old_select
;
1767 result
->new = new_select
;
1773 * A new route/change in bestpath of an existing route. Evaluate the path
1774 * for advertisement to the subgroup.
1777 subgroup_process_announce_selected (struct update_subgroup
*subgrp
,
1778 struct bgp_info
*selected
,
1779 struct bgp_node
*rn
,
1780 u_int32_t addpath_tx_id
)
1783 struct peer
*onlypeer
;
1785 struct attr_extra extra
;
1790 afi
= SUBGRP_AFI(subgrp
);
1791 safi
= SUBGRP_SAFI(subgrp
);
1792 onlypeer
= ((SUBGRP_PCOUNT(subgrp
) == 1) ?
1793 (SUBGRP_PFIRST(subgrp
))->peer
: NULL
);
1795 /* First update is deferred until ORF or ROUTE-REFRESH is received */
1796 if (onlypeer
&& CHECK_FLAG (onlypeer
->af_sflags
[afi
][safi
],
1797 PEER_STATUS_ORF_WAIT_REFRESH
))
1800 memset(&extra
, 0, sizeof(struct attr_extra
));
1801 /* It's initialized in bgp_announce_check() */
1802 attr
.extra
= &extra
;
1804 /* Announcement to the subgroup. If the route is filtered withdraw it. */
1807 if (subgroup_announce_check(selected
, subgrp
, p
, &attr
))
1808 bgp_adj_out_set_subgroup(rn
, subgrp
, &attr
, selected
);
1810 bgp_adj_out_unset_subgroup(rn
, subgrp
, 1, selected
->addpath_tx_id
);
1813 /* If selected is NULL we must withdraw the path using addpath_tx_id */
1816 bgp_adj_out_unset_subgroup(rn
, subgrp
, 1, addpath_tx_id
);
1823 * Clear IGP changed flag and attribute changed flag for a route (all paths).
1824 * This is called at the end of route processing.
1827 bgp_zebra_clear_route_change_flags (struct bgp_node
*rn
)
1829 struct bgp_info
*ri
;
1831 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
1833 if (BGP_INFO_HOLDDOWN (ri
))
1835 UNSET_FLAG (ri
->flags
, BGP_INFO_IGP_CHANGED
);
1836 UNSET_FLAG (ri
->flags
, BGP_INFO_ATTR_CHANGED
);
1841 * Has the route changed from the RIB's perspective? This is invoked only
1842 * if the route selection returns the same best route as earlier - to
1843 * determine if we need to update zebra or not.
1846 bgp_zebra_has_route_changed (struct bgp_node
*rn
, struct bgp_info
*selected
)
1848 struct bgp_info
*mpinfo
;
1850 /* If this is multipath, check all selected paths for any nexthop change or
1851 * attribute change. Some attribute changes (e.g., community) aren't of
1852 * relevance to the RIB, but we'll update zebra to ensure we handle the
1853 * case of BGP nexthop change. This is the behavior when the best path has
1854 * an attribute change anyway.
1856 if (CHECK_FLAG (selected
->flags
, BGP_INFO_IGP_CHANGED
) ||
1857 CHECK_FLAG (selected
->flags
, BGP_INFO_MULTIPATH_CHG
))
1860 /* If this is multipath, check all selected paths for any nexthop change */
1861 for (mpinfo
= bgp_info_mpath_first (selected
); mpinfo
;
1862 mpinfo
= bgp_info_mpath_next (mpinfo
))
1864 if (CHECK_FLAG (mpinfo
->flags
, BGP_INFO_IGP_CHANGED
)
1865 || CHECK_FLAG (mpinfo
->flags
, BGP_INFO_ATTR_CHANGED
))
1869 /* Nothing has changed from the RIB's perspective. */
1873 struct bgp_process_queue
1876 struct bgp_node
*rn
;
1881 static wq_item_status
1882 bgp_process_main (struct work_queue
*wq
, void *data
)
1884 struct bgp_process_queue
*pq
= data
;
1885 struct bgp
*bgp
= pq
->bgp
;
1886 struct bgp_node
*rn
= pq
->rn
;
1887 afi_t afi
= pq
->afi
;
1888 safi_t safi
= pq
->safi
;
1889 struct prefix
*p
= &rn
->p
;
1890 struct bgp_info
*new_select
;
1891 struct bgp_info
*old_select
;
1892 struct bgp_info_pair old_and_new
;
1894 /* Is it end of initial update? (after startup) */
1897 quagga_timestamp(3, bgp
->update_delay_zebra_resume_time
,
1898 sizeof(bgp
->update_delay_zebra_resume_time
));
1900 bgp
->main_zebra_update_hold
= 0;
1901 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++)
1902 for (safi
= SAFI_UNICAST
; safi
< SAFI_MAX
; safi
++)
1904 bgp_zebra_announce_table(bgp
, afi
, safi
);
1906 bgp
->main_peers_update_hold
= 0;
1908 bgp_start_routeadv(bgp
);
1912 /* Best path selection. */
1913 bgp_best_selection (bgp
, rn
, &bgp
->maxpaths
[afi
][safi
], &old_and_new
);
1914 old_select
= old_and_new
.old
;
1915 new_select
= old_and_new
.new;
1917 /* Nothing to do. */
1918 if (old_select
&& old_select
== new_select
&&
1919 !CHECK_FLAG(rn
->flags
, BGP_NODE_USER_CLEAR
) &&
1920 !CHECK_FLAG(old_select
->flags
, BGP_INFO_ATTR_CHANGED
) &&
1921 !bgp
->addpath_tx_used
[afi
][safi
])
1923 if (bgp_zebra_has_route_changed (rn
, old_select
))
1926 vnc_import_bgp_add_route(bgp
, p
, old_select
);
1927 vnc_import_bgp_exterior_add_route(bgp
, p
, old_select
);
1929 bgp_zebra_announce (p
, old_select
, bgp
, afi
, safi
);
1931 UNSET_FLAG (old_select
->flags
, BGP_INFO_MULTIPATH_CHG
);
1932 bgp_zebra_clear_route_change_flags (rn
);
1933 UNSET_FLAG (rn
->flags
, BGP_NODE_PROCESS_SCHEDULED
);
1937 /* If the user did "clear ip bgp prefix x.x.x.x" this flag will be set */
1938 UNSET_FLAG(rn
->flags
, BGP_NODE_USER_CLEAR
);
1940 /* bestpath has changed; bump version */
1941 if (old_select
|| new_select
)
1943 bgp_bump_version(rn
);
1945 if (!bgp
->t_rmap_def_originate_eval
)
1948 THREAD_TIMER_ON(bm
->master
, bgp
->t_rmap_def_originate_eval
,
1949 update_group_refresh_default_originate_route_map
,
1950 bgp
, RMAP_DEFAULT_ORIGINATE_EVAL_TIMER
);
1955 bgp_info_unset_flag (rn
, old_select
, BGP_INFO_SELECTED
);
1958 bgp_info_set_flag (rn
, new_select
, BGP_INFO_SELECTED
);
1959 bgp_info_unset_flag (rn
, new_select
, BGP_INFO_ATTR_CHANGED
);
1960 UNSET_FLAG (new_select
->flags
, BGP_INFO_MULTIPATH_CHG
);
1964 if ((afi
== AFI_IP
|| afi
== AFI_IP6
) && (safi
== SAFI_UNICAST
)) {
1965 if (old_select
!= new_select
) {
1967 vnc_import_bgp_exterior_del_route(bgp
, p
, old_select
);
1968 vnc_import_bgp_del_route(bgp
, p
, old_select
);
1971 vnc_import_bgp_exterior_add_route(bgp
, p
, new_select
);
1972 vnc_import_bgp_add_route(bgp
, p
, new_select
);
1978 group_announce_route(bgp
, afi
, safi
, rn
, new_select
);
1981 if ((safi
== SAFI_UNICAST
|| safi
== SAFI_MULTICAST
) &&
1982 (bgp
->inst_type
!= BGP_INSTANCE_TYPE_VIEW
) &&
1983 !bgp_option_check (BGP_OPT_NO_FIB
))
1986 && new_select
->type
== ZEBRA_ROUTE_BGP
1987 && (new_select
->sub_type
== BGP_ROUTE_NORMAL
||
1988 new_select
->sub_type
== BGP_ROUTE_AGGREGATE
))
1989 bgp_zebra_announce (p
, new_select
, bgp
, afi
, safi
);
1992 /* Withdraw the route from the kernel. */
1994 && old_select
->type
== ZEBRA_ROUTE_BGP
1995 && (old_select
->sub_type
== BGP_ROUTE_NORMAL
||
1996 old_select
->sub_type
== BGP_ROUTE_AGGREGATE
))
1997 bgp_zebra_withdraw (p
, old_select
, safi
);
2001 /* Clear any route change flags. */
2002 bgp_zebra_clear_route_change_flags (rn
);
2004 /* Reap old select bgp_info, if it has been removed */
2005 if (old_select
&& CHECK_FLAG (old_select
->flags
, BGP_INFO_REMOVED
))
2006 bgp_info_reap (rn
, old_select
);
2008 UNSET_FLAG (rn
->flags
, BGP_NODE_PROCESS_SCHEDULED
);
2013 bgp_processq_del (struct work_queue
*wq
, void *data
)
2015 struct bgp_process_queue
*pq
= data
;
2016 struct bgp_table
*table
;
2018 bgp_unlock (pq
->bgp
);
2021 table
= bgp_node_table (pq
->rn
);
2022 bgp_unlock_node (pq
->rn
);
2023 bgp_table_unlock (table
);
2025 XFREE (MTYPE_BGP_PROCESS_QUEUE
, pq
);
2029 bgp_process_queue_init (void)
2031 if (!bm
->process_main_queue
)
2033 bm
->process_main_queue
2034 = work_queue_new (bm
->master
, "process_main_queue");
2036 if ( !bm
->process_main_queue
)
2038 zlog_err ("%s: Failed to allocate work queue", __func__
);
2043 bm
->process_main_queue
->spec
.workfunc
= &bgp_process_main
;
2044 bm
->process_main_queue
->spec
.del_item_data
= &bgp_processq_del
;
2045 bm
->process_main_queue
->spec
.max_retries
= 0;
2046 bm
->process_main_queue
->spec
.hold
= 50;
2047 /* Use a higher yield value of 50ms for main queue processing */
2048 bm
->process_main_queue
->spec
.yield
= 50 * 1000L;
2052 bgp_process (struct bgp
*bgp
, struct bgp_node
*rn
, afi_t afi
, safi_t safi
)
2054 struct bgp_process_queue
*pqnode
;
2056 /* already scheduled for processing? */
2057 if (CHECK_FLAG (rn
->flags
, BGP_NODE_PROCESS_SCHEDULED
))
2060 if (bm
->process_main_queue
== NULL
)
2061 bgp_process_queue_init ();
2063 pqnode
= XCALLOC (MTYPE_BGP_PROCESS_QUEUE
,
2064 sizeof (struct bgp_process_queue
));
2068 /* all unlocked in bgp_processq_del */
2069 bgp_table_lock (bgp_node_table (rn
));
2070 pqnode
->rn
= bgp_lock_node (rn
);
2074 pqnode
->safi
= safi
;
2075 work_queue_add (bm
->process_main_queue
, pqnode
);
2076 SET_FLAG (rn
->flags
, BGP_NODE_PROCESS_SCHEDULED
);
2081 bgp_add_eoiu_mark (struct bgp
*bgp
)
2083 struct bgp_process_queue
*pqnode
;
2085 if (bm
->process_main_queue
== NULL
)
2086 bgp_process_queue_init ();
2088 pqnode
= XCALLOC (MTYPE_BGP_PROCESS_QUEUE
,
2089 sizeof (struct bgp_process_queue
));
2096 work_queue_add (bm
->process_main_queue
, pqnode
);
2100 bgp_maximum_prefix_restart_timer (struct thread
*thread
)
2104 peer
= THREAD_ARG (thread
);
2105 peer
->t_pmax_restart
= NULL
;
2107 if (bgp_debug_neighbor_events(peer
))
2108 zlog_debug ("%s Maximum-prefix restart timer expired, restore peering",
2111 peer_clear (peer
, NULL
);
2117 bgp_maximum_prefix_overflow (struct peer
*peer
, afi_t afi
,
2118 safi_t safi
, int always
)
2123 if (!CHECK_FLAG (peer
->af_flags
[afi
][safi
], PEER_FLAG_MAX_PREFIX
))
2126 if (peer
->pcount
[afi
][safi
] > peer
->pmax
[afi
][safi
])
2128 if (CHECK_FLAG (peer
->af_sflags
[afi
][safi
], PEER_STATUS_PREFIX_LIMIT
)
2132 zlog_info ("%%MAXPFXEXCEED: No. of %s prefix received from %s %ld exceed, "
2133 "limit %ld", afi_safi_print (afi
, safi
), peer
->host
,
2134 peer
->pcount
[afi
][safi
], peer
->pmax
[afi
][safi
]);
2135 SET_FLAG (peer
->af_sflags
[afi
][safi
], PEER_STATUS_PREFIX_LIMIT
);
2137 if (CHECK_FLAG (peer
->af_flags
[afi
][safi
], PEER_FLAG_MAX_PREFIX_WARNING
))
2140 /* Convert AFI, SAFI to values for packet. */
2141 pkt_afi
= afi_int2iana (afi
);
2142 pkt_safi
= safi_int2iana (safi
);
2146 ndata
[0] = (pkt_afi
>> 8);
2148 ndata
[2] = pkt_safi
;
2149 ndata
[3] = (peer
->pmax
[afi
][safi
] >> 24);
2150 ndata
[4] = (peer
->pmax
[afi
][safi
] >> 16);
2151 ndata
[5] = (peer
->pmax
[afi
][safi
] >> 8);
2152 ndata
[6] = (peer
->pmax
[afi
][safi
]);
2154 SET_FLAG (peer
->sflags
, PEER_STATUS_PREFIX_OVERFLOW
);
2155 bgp_notify_send_with_data (peer
, BGP_NOTIFY_CEASE
,
2156 BGP_NOTIFY_CEASE_MAX_PREFIX
, ndata
, 7);
2159 /* Dynamic peers will just close their connection. */
2160 if (peer_dynamic_neighbor (peer
))
2163 /* restart timer start */
2164 if (peer
->pmax_restart
[afi
][safi
])
2166 peer
->v_pmax_restart
= peer
->pmax_restart
[afi
][safi
] * 60;
2168 if (bgp_debug_neighbor_events(peer
))
2169 zlog_debug ("%s Maximum-prefix restart timer started for %d secs",
2170 peer
->host
, peer
->v_pmax_restart
);
2172 BGP_TIMER_ON (peer
->t_pmax_restart
, bgp_maximum_prefix_restart_timer
,
2173 peer
->v_pmax_restart
);
2179 UNSET_FLAG (peer
->af_sflags
[afi
][safi
], PEER_STATUS_PREFIX_LIMIT
);
2181 if (peer
->pcount
[afi
][safi
] > (peer
->pmax
[afi
][safi
] * peer
->pmax_threshold
[afi
][safi
] / 100))
2183 if (CHECK_FLAG (peer
->af_sflags
[afi
][safi
], PEER_STATUS_PREFIX_THRESHOLD
)
2187 zlog_info ("%%MAXPFX: No. of %s prefix received from %s reaches %ld, max %ld",
2188 afi_safi_print (afi
, safi
), peer
->host
, peer
->pcount
[afi
][safi
],
2189 peer
->pmax
[afi
][safi
]);
2190 SET_FLAG (peer
->af_sflags
[afi
][safi
], PEER_STATUS_PREFIX_THRESHOLD
);
2193 UNSET_FLAG (peer
->af_sflags
[afi
][safi
], PEER_STATUS_PREFIX_THRESHOLD
);
2197 /* Unconditionally remove the route from the RIB, without taking
2198 * damping into consideration (eg, because the session went down)
2201 bgp_rib_remove (struct bgp_node
*rn
, struct bgp_info
*ri
, struct peer
*peer
,
2202 afi_t afi
, safi_t safi
)
2204 bgp_aggregate_decrement (peer
->bgp
, &rn
->p
, ri
, afi
, safi
);
2206 if (!CHECK_FLAG (ri
->flags
, BGP_INFO_HISTORY
))
2207 bgp_info_delete (rn
, ri
); /* keep historical info */
2209 bgp_process (peer
->bgp
, rn
, afi
, safi
);
2213 bgp_rib_withdraw (struct bgp_node
*rn
, struct bgp_info
*ri
, struct peer
*peer
,
2214 afi_t afi
, safi_t safi
, struct prefix_rd
*prd
)
2216 int status
= BGP_DAMP_NONE
;
2218 /* apply dampening, if result is suppressed, we'll be retaining
2219 * the bgp_info in the RIB for historical reference.
2221 if (CHECK_FLAG (peer
->bgp
->af_flags
[afi
][safi
], BGP_CONFIG_DAMPENING
)
2222 && peer
->sort
== BGP_PEER_EBGP
)
2223 if ( (status
= bgp_damp_withdraw (ri
, rn
, afi
, safi
, 0))
2224 == BGP_DAMP_SUPPRESSED
)
2226 bgp_aggregate_decrement (peer
->bgp
, &rn
->p
, ri
, afi
, safi
);
2231 if (safi
== SAFI_MPLS_VPN
) {
2232 struct bgp_node
*prn
= NULL
;
2233 struct bgp_table
*table
= NULL
;
2235 prn
= bgp_node_get(peer
->bgp
->rib
[afi
][safi
], (struct prefix
*) prd
);
2237 table
= (struct bgp_table
*)(prn
->info
);
2239 vnc_import_bgp_del_vnc_host_route_mode_resolve_nve(
2246 bgp_unlock_node(prn
);
2248 if ((afi
== AFI_IP
|| afi
== AFI_IP6
) && (safi
== SAFI_UNICAST
)) {
2249 if (CHECK_FLAG (ri
->flags
, BGP_INFO_SELECTED
)) {
2251 vnc_import_bgp_del_route(peer
->bgp
, &rn
->p
, ri
);
2252 vnc_import_bgp_exterior_del_route(peer
->bgp
, &rn
->p
, ri
);
2256 bgp_rib_remove (rn
, ri
, peer
, afi
, safi
);
2259 static struct bgp_info
*
2260 info_make (int type
, int sub_type
, u_short instance
, struct peer
*peer
, struct attr
*attr
,
2261 struct bgp_node
*rn
)
2263 struct bgp_info
*new;
2265 /* Make new BGP info. */
2266 new = XCALLOC (MTYPE_BGP_ROUTE
, sizeof (struct bgp_info
));
2268 new->instance
= instance
;
2269 new->sub_type
= sub_type
;
2272 new->uptime
= bgp_clock ();
2274 new->addpath_tx_id
= ++peer
->bgp
->addpath_tx_id
;
2279 overlay_index_update(struct attr
*attr
, struct eth_segment_id
*eth_s_id
, union gw_addr
*gw_ip
)
2281 struct attr_extra
*extra
;
2285 extra
= bgp_attr_extra_get(attr
);
2287 if(eth_s_id
== NULL
)
2289 memset(&(extra
->evpn_overlay
.eth_s_id
),0, sizeof(struct eth_segment_id
));
2293 memcpy(&(extra
->evpn_overlay
.eth_s_id
), eth_s_id
, sizeof(struct eth_segment_id
));
2297 memset(&(extra
->evpn_overlay
.gw_ip
), 0, sizeof(union gw_addr
));
2301 memcpy(&(extra
->evpn_overlay
.gw_ip
),gw_ip
, sizeof(union gw_addr
));
2306 overlay_index_equal(afi_t afi
, struct bgp_info
*info
, struct eth_segment_id
*eth_s_id
, union gw_addr
*gw_ip
)
2308 struct eth_segment_id
*info_eth_s_id
, *info_eth_s_id_remote
;
2309 union gw_addr
*info_gw_ip
, *info_gw_ip_remote
;
2312 if(afi
!= AFI_L2VPN
)
2314 if (!info
->attr
|| !info
->attr
->extra
)
2316 memset(&temp
, 0, 16);
2317 info_eth_s_id
= (struct eth_segment_id
*)&temp
;
2318 info_gw_ip
= (union gw_addr
*)&temp
;
2319 if(eth_s_id
== NULL
&& gw_ip
== NULL
)
2324 info_eth_s_id
= &(info
->attr
->extra
->evpn_overlay
.eth_s_id
);
2325 info_gw_ip
= &(info
->attr
->extra
->evpn_overlay
.gw_ip
);
2328 info_gw_ip_remote
= (union gw_addr
*)&temp
;
2330 info_gw_ip_remote
= gw_ip
;
2331 if(eth_s_id
== NULL
)
2332 info_eth_s_id_remote
= (struct eth_segment_id
*)&temp
;
2334 info_eth_s_id_remote
= eth_s_id
;
2335 if(!memcmp(info_gw_ip
, info_gw_ip_remote
, sizeof(union gw_addr
)))
2337 return !memcmp(info_eth_s_id
, info_eth_s_id_remote
, sizeof(struct eth_segment_id
));
2340 /* Check if received nexthop is valid or not. */
2342 bgp_update_martian_nexthop (struct bgp
*bgp
, afi_t afi
, safi_t safi
, struct attr
*attr
)
2344 struct attr_extra
*attre
= attr
->extra
;
2347 /* Only validated for unicast and multicast currently. */
2348 if (safi
!= SAFI_UNICAST
&& safi
!= SAFI_MULTICAST
)
2351 /* If NEXT_HOP is present, validate it. */
2352 if (attr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_NEXT_HOP
))
2354 if (attr
->nexthop
.s_addr
== 0 ||
2355 IPV4_CLASS_DE (ntohl (attr
->nexthop
.s_addr
)) ||
2356 bgp_nexthop_self (bgp
, attr
))
2360 /* If MP_NEXTHOP is present, validate it. */
2361 /* Note: For IPv6 nexthops, we only validate the global (1st) nexthop;
2362 * there is code in bgp_attr.c to ignore the link-local (2nd) nexthop if
2363 * it is not an IPv6 link-local address.
2365 if (attre
&& attre
->mp_nexthop_len
)
2367 switch (attre
->mp_nexthop_len
)
2369 case BGP_ATTR_NHLEN_IPV4
:
2370 case BGP_ATTR_NHLEN_VPNV4
:
2371 ret
= (attre
->mp_nexthop_global_in
.s_addr
== 0 ||
2372 IPV4_CLASS_DE (ntohl (attre
->mp_nexthop_global_in
.s_addr
)));
2375 case BGP_ATTR_NHLEN_IPV6_GLOBAL
:
2376 case BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL
:
2377 case BGP_ATTR_NHLEN_VPNV6_GLOBAL
:
2378 ret
= (IN6_IS_ADDR_UNSPECIFIED(&attre
->mp_nexthop_global
) ||
2379 IN6_IS_ADDR_LOOPBACK(&attre
->mp_nexthop_global
) ||
2380 IN6_IS_ADDR_MULTICAST(&attre
->mp_nexthop_global
));
2393 bgp_update (struct peer
*peer
, struct prefix
*p
, u_int32_t addpath_id
,
2394 struct attr
*attr
, afi_t afi
, safi_t safi
, int type
,
2395 int sub_type
, struct prefix_rd
*prd
, u_char
*tag
,
2396 int soft_reconfig
, struct bgp_route_evpn
* evpn
)
2399 int aspath_loop_count
= 0;
2400 struct bgp_node
*rn
;
2402 struct attr new_attr
;
2403 struct attr_extra new_extra
;
2404 struct attr
*attr_new
;
2405 struct bgp_info
*ri
;
2406 struct bgp_info
*new;
2408 char pfx_buf
[BGP_PRD_PATH_STRLEN
];
2410 int do_loop_check
= 1;
2412 int vnc_implicit_withdraw
= 0;
2415 memset (&new_attr
, 0, sizeof(struct attr
));
2416 memset (&new_extra
, 0, sizeof(struct attr_extra
));
2419 rn
= bgp_afi_node_get (bgp
->rib
[afi
][safi
], afi
, safi
, p
, prd
);
2421 /* When peer's soft reconfiguration enabled. Record input packet in
2423 if (! soft_reconfig
&& CHECK_FLAG (peer
->af_flags
[afi
][safi
], PEER_FLAG_SOFT_RECONFIG
)
2424 && peer
!= bgp
->peer_self
)
2425 bgp_adj_in_set (rn
, peer
, attr
, addpath_id
);
2427 /* Check previously received route. */
2428 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
2429 if (ri
->peer
== peer
&& ri
->type
== type
&& ri
->sub_type
== sub_type
&&
2430 ri
->addpath_rx_id
== addpath_id
)
2433 /* AS path local-as loop check. */
2434 if (peer
->change_local_as
)
2436 if (! CHECK_FLAG (peer
->flags
, PEER_FLAG_LOCAL_AS_NO_PREPEND
))
2437 aspath_loop_count
= 1;
2439 if (aspath_loop_check (attr
->aspath
, peer
->change_local_as
) > aspath_loop_count
)
2441 reason
= "as-path contains our own AS;";
2446 /* If the peer is configured for "allowas-in origin" and the last ASN in the
2447 * as-path is our ASN then we do not need to call aspath_loop_check
2449 if (CHECK_FLAG (peer
->af_flags
[afi
][safi
], PEER_FLAG_ALLOWAS_IN_ORIGIN
))
2450 if (aspath_get_last_as(attr
->aspath
) == bgp
->as
)
2453 /* AS path loop check. */
2456 if (aspath_loop_check (attr
->aspath
, bgp
->as
) > peer
->allowas_in
[afi
][safi
]
2457 || (CHECK_FLAG(bgp
->config
, BGP_CONFIG_CONFEDERATION
)
2458 && aspath_loop_check(attr
->aspath
, bgp
->confed_id
) > peer
->allowas_in
[afi
][safi
]))
2460 reason
= "as-path contains our own AS;";
2465 /* Route reflector originator ID check. */
2466 if (attr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_ORIGINATOR_ID
)
2467 && IPV4_ADDR_SAME (&bgp
->router_id
, &attr
->extra
->originator_id
))
2469 reason
= "originator is us;";
2473 /* Route reflector cluster ID check. */
2474 if (bgp_cluster_filter (peer
, attr
))
2476 reason
= "reflected from the same cluster;";
2480 /* Apply incoming filter. */
2481 if (bgp_input_filter (peer
, p
, attr
, afi
, safi
) == FILTER_DENY
)
2487 new_attr
.extra
= &new_extra
;
2488 bgp_attr_dup (&new_attr
, attr
);
2490 /* Apply incoming route-map.
2491 * NB: new_attr may now contain newly allocated values from route-map "set"
2492 * commands, so we need bgp_attr_flush in the error paths, until we intern
2493 * the attr (which takes over the memory references) */
2494 if (bgp_input_modifier (peer
, p
, &new_attr
, afi
, safi
, NULL
) == RMAP_DENY
)
2496 reason
= "route-map;";
2497 bgp_attr_flush (&new_attr
);
2501 /* next hop check. */
2502 if (bgp_update_martian_nexthop (bgp
, afi
, safi
, &new_attr
))
2504 reason
= "martian or self next-hop;";
2505 bgp_attr_flush (&new_attr
);
2509 attr_new
= bgp_attr_intern (&new_attr
);
2511 /* If the update is implicit withdraw. */
2514 ri
->uptime
= bgp_clock ();
2516 /* Same attribute comes in. */
2517 if (!CHECK_FLAG (ri
->flags
, BGP_INFO_REMOVED
)
2518 && attrhash_cmp (ri
->attr
, attr_new
)
2519 && (overlay_index_equal(afi
, ri
, evpn
==NULL
?NULL
:&evpn
->eth_s_id
,
2520 evpn
==NULL
?NULL
:&evpn
->gw_ip
)))
2522 if (CHECK_FLAG (bgp
->af_flags
[afi
][safi
], BGP_CONFIG_DAMPENING
)
2523 && peer
->sort
== BGP_PEER_EBGP
2524 && CHECK_FLAG (ri
->flags
, BGP_INFO_HISTORY
))
2526 if (bgp_debug_update(peer
, p
, NULL
, 1))
2527 zlog_debug ("%s rcvd %s", peer
->host
,
2528 bgp_debug_rdpfxpath2str (prd
, p
, addpath_id
? 1 : 0,
2529 addpath_id
, pfx_buf
, sizeof (pfx_buf
)));
2531 if (bgp_damp_update (ri
, rn
, afi
, safi
) != BGP_DAMP_SUPPRESSED
)
2533 bgp_aggregate_increment (bgp
, p
, ri
, afi
, safi
);
2534 bgp_process (bgp
, rn
, afi
, safi
);
2537 else /* Duplicate - odd */
2539 if (bgp_debug_update(peer
, p
, NULL
, 1))
2541 if (!peer
->rcvd_attr_printed
)
2543 zlog_debug ("%s rcvd UPDATE w/ attr: %s", peer
->host
, peer
->rcvd_attr_str
);
2544 peer
->rcvd_attr_printed
= 1;
2547 zlog_debug ("%s rcvd %s...duplicate ignored",
2549 bgp_debug_rdpfxpath2str (prd
, p
, addpath_id
?
2550 1 : 0, addpath_id
, pfx_buf
, sizeof (pfx_buf
)));
2553 /* graceful restart STALE flag unset. */
2554 if (CHECK_FLAG (ri
->flags
, BGP_INFO_STALE
))
2556 bgp_info_unset_flag (rn
, ri
, BGP_INFO_STALE
);
2557 bgp_process (bgp
, rn
, afi
, safi
);
2561 bgp_unlock_node (rn
);
2562 bgp_attr_unintern (&attr_new
);
2567 /* Withdraw/Announce before we fully processed the withdraw */
2568 if (CHECK_FLAG(ri
->flags
, BGP_INFO_REMOVED
))
2570 if (bgp_debug_update(peer
, p
, NULL
, 1))
2571 zlog_debug ("%s rcvd %s, flapped quicker than processing",
2573 bgp_debug_rdpfxpath2str (prd
, p
, addpath_id
? 1 : 0,
2574 addpath_id
, pfx_buf
, sizeof (pfx_buf
)));
2575 bgp_info_restore (rn
, ri
);
2578 /* Received Logging. */
2579 if (bgp_debug_update(peer
, p
, NULL
, 1))
2580 zlog_debug ("%s rcvd %s", peer
->host
,
2581 bgp_debug_rdpfxpath2str (prd
, p
, addpath_id
? 1 : 0,
2582 addpath_id
, pfx_buf
, sizeof (pfx_buf
)));
2584 /* graceful restart STALE flag unset. */
2585 if (CHECK_FLAG (ri
->flags
, BGP_INFO_STALE
))
2586 bgp_info_unset_flag (rn
, ri
, BGP_INFO_STALE
);
2588 /* The attribute is changed. */
2589 bgp_info_set_flag (rn
, ri
, BGP_INFO_ATTR_CHANGED
);
2591 /* implicit withdraw, decrement aggregate and pcount here.
2592 * only if update is accepted, they'll increment below.
2594 bgp_aggregate_decrement (bgp
, p
, ri
, afi
, safi
);
2596 /* Update bgp route dampening information. */
2597 if (CHECK_FLAG (bgp
->af_flags
[afi
][safi
], BGP_CONFIG_DAMPENING
)
2598 && peer
->sort
== BGP_PEER_EBGP
)
2600 /* This is implicit withdraw so we should update dampening
2602 if (! CHECK_FLAG (ri
->flags
, BGP_INFO_HISTORY
))
2603 bgp_damp_withdraw (ri
, rn
, afi
, safi
, 1);
2606 if (safi
== SAFI_MPLS_VPN
) {
2607 struct bgp_node
*prn
= NULL
;
2608 struct bgp_table
*table
= NULL
;
2610 prn
= bgp_node_get(bgp
->rib
[afi
][safi
], (struct prefix
*) prd
);
2612 table
= (struct bgp_table
*)(prn
->info
);
2614 vnc_import_bgp_del_vnc_host_route_mode_resolve_nve(
2621 bgp_unlock_node(prn
);
2623 if ((afi
== AFI_IP
|| afi
== AFI_IP6
) && (safi
== SAFI_UNICAST
)) {
2624 if (CHECK_FLAG (ri
->flags
, BGP_INFO_SELECTED
)) {
2626 * Implicit withdraw case.
2628 ++vnc_implicit_withdraw
;
2629 vnc_import_bgp_del_route(bgp
, p
, ri
);
2630 vnc_import_bgp_exterior_del_route(bgp
, p
, ri
);
2635 /* Update to new attribute. */
2636 bgp_attr_unintern (&ri
->attr
);
2637 ri
->attr
= attr_new
;
2639 /* Update MPLS tag. */
2640 if (safi
== SAFI_MPLS_VPN
|| safi
== SAFI_EVPN
)
2641 memcpy ((bgp_info_extra_get (ri
))->tag
, tag
, 3);
2644 if ((afi
== AFI_IP
|| afi
== AFI_IP6
) && (safi
== SAFI_UNICAST
))
2646 if (vnc_implicit_withdraw
)
2649 * Add back the route with its new attributes (e.g., nexthop).
2650 * The route is still selected, until the route selection
2651 * queued by bgp_process actually runs. We have to make this
2652 * update to the VNC side immediately to avoid racing against
2653 * configuration changes (e.g., route-map changes) which
2654 * trigger re-importation of the entire RIB.
2656 vnc_import_bgp_add_route(bgp
, p
, ri
);
2657 vnc_import_bgp_exterior_add_route(bgp
, p
, ri
);
2661 /* Update Overlay Index */
2662 if(afi
== AFI_L2VPN
)
2664 overlay_index_update(ri
->attr
, evpn
==NULL
?NULL
:&evpn
->eth_s_id
,
2665 evpn
==NULL
?NULL
:&evpn
->gw_ip
);
2668 /* Update bgp route dampening information. */
2669 if (CHECK_FLAG (bgp
->af_flags
[afi
][safi
], BGP_CONFIG_DAMPENING
)
2670 && peer
->sort
== BGP_PEER_EBGP
)
2672 /* Now we do normal update dampening. */
2673 ret
= bgp_damp_update (ri
, rn
, afi
, safi
);
2674 if (ret
== BGP_DAMP_SUPPRESSED
)
2676 bgp_unlock_node (rn
);
2681 /* Nexthop reachability check. */
2682 if ((afi
== AFI_IP
|| afi
== AFI_IP6
) && safi
== SAFI_UNICAST
)
2684 if (peer
->sort
== BGP_PEER_EBGP
&& peer
->ttl
== 1 &&
2685 ! CHECK_FLAG (peer
->flags
, PEER_FLAG_DISABLE_CONNECTED_CHECK
)
2686 && ! bgp_flag_check(bgp
, BGP_FLAG_DISABLE_NH_CONNECTED_CHK
))
2691 if (bgp_find_or_add_nexthop (bgp
, afi
, ri
, NULL
, connected
))
2692 bgp_info_set_flag (rn
, ri
, BGP_INFO_VALID
);
2695 if (BGP_DEBUG(nht
, NHT
))
2697 char buf1
[INET6_ADDRSTRLEN
];
2698 inet_ntop(AF_INET
, (const void *)&attr_new
->nexthop
, buf1
, INET6_ADDRSTRLEN
);
2699 zlog_debug("%s(%s): NH unresolved", __FUNCTION__
, buf1
);
2701 bgp_info_unset_flag (rn
, ri
, BGP_INFO_VALID
);
2705 bgp_info_set_flag (rn
, ri
, BGP_INFO_VALID
);
2708 if (safi
== SAFI_MPLS_VPN
)
2710 struct bgp_node
*prn
= NULL
;
2711 struct bgp_table
*table
= NULL
;
2713 prn
= bgp_node_get(bgp
->rib
[afi
][safi
], (struct prefix
*) prd
);
2716 table
= (struct bgp_table
*)(prn
->info
);
2718 vnc_import_bgp_add_vnc_host_route_mode_resolve_nve(
2725 bgp_unlock_node(prn
);
2729 /* Process change. */
2730 bgp_aggregate_increment (bgp
, p
, ri
, afi
, safi
);
2732 bgp_process (bgp
, rn
, afi
, safi
);
2733 bgp_unlock_node (rn
);
2736 if (SAFI_MPLS_VPN
== safi
)
2738 uint32_t label
= decode_label(tag
);
2740 rfapiProcessUpdate(peer
, NULL
, p
, prd
, attr
, afi
, safi
, type
, sub_type
,
2743 if (SAFI_ENCAP
== safi
)
2745 rfapiProcessUpdate(peer
, NULL
, p
, prd
, attr
, afi
, safi
, type
, sub_type
,
2751 } // End of implicit withdraw
2753 /* Received Logging. */
2754 if (bgp_debug_update(peer
, p
, NULL
, 1))
2756 if (!peer
->rcvd_attr_printed
)
2758 zlog_debug ("%s rcvd UPDATE w/ attr: %s", peer
->host
, peer
->rcvd_attr_str
);
2759 peer
->rcvd_attr_printed
= 1;
2762 zlog_debug ("%s rcvd %s", peer
->host
,
2763 bgp_debug_rdpfxpath2str (prd
, p
, addpath_id
? 1 : 0,
2764 addpath_id
, pfx_buf
, sizeof (pfx_buf
)));
2767 /* Make new BGP info. */
2768 new = info_make(type
, sub_type
, 0, peer
, attr_new
, rn
);
2770 /* Update MPLS tag. */
2771 if (safi
== SAFI_MPLS_VPN
|| safi
== SAFI_EVPN
)
2772 memcpy ((bgp_info_extra_get (new))->tag
, tag
, 3);
2774 /* Update Overlay Index */
2775 if(afi
== AFI_L2VPN
)
2777 overlay_index_update(new->attr
, evpn
==NULL
?NULL
:&evpn
->eth_s_id
,
2778 evpn
==NULL
?NULL
:&evpn
->gw_ip
);
2780 /* Nexthop reachability check. */
2781 if ((afi
== AFI_IP
|| afi
== AFI_IP6
) && safi
== SAFI_UNICAST
)
2783 if (peer
->sort
== BGP_PEER_EBGP
&& peer
->ttl
== 1 &&
2784 ! CHECK_FLAG (peer
->flags
, PEER_FLAG_DISABLE_CONNECTED_CHECK
)
2785 && ! bgp_flag_check(bgp
, BGP_FLAG_DISABLE_NH_CONNECTED_CHK
))
2790 if (bgp_find_or_add_nexthop (bgp
, afi
, new, NULL
, connected
))
2791 bgp_info_set_flag (rn
, new, BGP_INFO_VALID
);
2794 if (BGP_DEBUG(nht
, NHT
))
2796 char buf1
[INET6_ADDRSTRLEN
];
2797 inet_ntop(AF_INET
, (const void *)&attr_new
->nexthop
, buf1
, INET6_ADDRSTRLEN
);
2798 zlog_debug("%s(%s): NH unresolved", __FUNCTION__
, buf1
);
2800 bgp_info_unset_flag (rn
, new, BGP_INFO_VALID
);
2804 bgp_info_set_flag (rn
, new, BGP_INFO_VALID
);
2807 new->addpath_rx_id
= addpath_id
;
2809 /* Increment prefix */
2810 bgp_aggregate_increment (bgp
, p
, new, afi
, safi
);
2812 /* Register new BGP information. */
2813 bgp_info_add (rn
, new);
2815 /* route_node_get lock */
2816 bgp_unlock_node (rn
);
2819 if (safi
== SAFI_MPLS_VPN
)
2821 struct bgp_node
*prn
= NULL
;
2822 struct bgp_table
*table
= NULL
;
2824 prn
= bgp_node_get(bgp
->rib
[afi
][safi
], (struct prefix
*) prd
);
2827 table
= (struct bgp_table
*)(prn
->info
);
2829 vnc_import_bgp_add_vnc_host_route_mode_resolve_nve(
2836 bgp_unlock_node(prn
);
2840 /* If maximum prefix count is configured and current prefix
2842 if (bgp_maximum_prefix_overflow (peer
, afi
, safi
, 0))
2845 /* Process change. */
2846 bgp_process (bgp
, rn
, afi
, safi
);
2849 if (SAFI_MPLS_VPN
== safi
)
2851 uint32_t label
= decode_label(tag
);
2853 rfapiProcessUpdate(peer
, NULL
, p
, prd
, attr
, afi
, safi
, type
, sub_type
,
2856 if (SAFI_ENCAP
== safi
)
2858 rfapiProcessUpdate(peer
, NULL
, p
, prd
, attr
, afi
, safi
, type
, sub_type
,
2865 /* This BGP update is filtered. Log the reason then update BGP
2868 if (bgp_debug_update(peer
, p
, NULL
, 1))
2870 if (!peer
->rcvd_attr_printed
)
2872 zlog_debug ("%s rcvd UPDATE w/ attr: %s", peer
->host
, peer
->rcvd_attr_str
);
2873 peer
->rcvd_attr_printed
= 1;
2876 zlog_debug ("%s rcvd UPDATE about %s -- DENIED due to: %s",
2878 bgp_debug_rdpfxpath2str (prd
, p
, addpath_id
? 1 : 0,
2879 addpath_id
, pfx_buf
, sizeof (pfx_buf
)), reason
);
2883 bgp_rib_remove (rn
, ri
, peer
, afi
, safi
);
2885 bgp_unlock_node (rn
);
2889 * Filtered update is treated as an implicit withdrawal (see bgp_rib_remove()
2890 * a few lines above)
2892 if ((SAFI_MPLS_VPN
== safi
) || (SAFI_ENCAP
== safi
))
2894 rfapiProcessWithdraw(peer
, NULL
, p
, prd
, NULL
, afi
, safi
, type
, 0);
2902 bgp_withdraw (struct peer
*peer
, struct prefix
*p
, u_int32_t addpath_id
,
2903 struct attr
*attr
, afi_t afi
, safi_t safi
, int type
, int sub_type
,
2904 struct prefix_rd
*prd
, u_char
*tag
, struct bgp_route_evpn
*evpn
)
2907 char pfx_buf
[BGP_PRD_PATH_STRLEN
];
2908 struct bgp_node
*rn
;
2909 struct bgp_info
*ri
;
2912 if ((SAFI_MPLS_VPN
== safi
) || (SAFI_ENCAP
== safi
))
2914 rfapiProcessWithdraw(peer
, NULL
, p
, prd
, NULL
, afi
, safi
, type
, 0);
2921 rn
= bgp_afi_node_get (bgp
->rib
[afi
][safi
], afi
, safi
, p
, prd
);
2923 /* If peer is soft reconfiguration enabled. Record input packet for
2924 * further calculation.
2926 * Cisco IOS 12.4(24)T4 on session establishment sends withdraws for all
2927 * routes that are filtered. This tanks out Quagga RS pretty badly due to
2928 * the iteration over all RS clients.
2929 * Since we need to remove the entry from adj_in anyway, do that first and
2930 * if there was no entry, we don't need to do anything more.
2932 if (CHECK_FLAG (peer
->af_flags
[afi
][safi
], PEER_FLAG_SOFT_RECONFIG
)
2933 && peer
!= bgp
->peer_self
)
2934 if (!bgp_adj_in_unset (rn
, peer
, addpath_id
))
2936 if (bgp_debug_update (peer
, p
, NULL
, 1))
2937 zlog_debug ("%s withdrawing route %s not in adj-in",
2939 bgp_debug_rdpfxpath2str (prd
, p
, addpath_id
? 1 : 0,
2940 addpath_id
, pfx_buf
, sizeof (pfx_buf
)));
2941 bgp_unlock_node (rn
);
2945 /* Lookup withdrawn route. */
2946 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
2947 if (ri
->peer
== peer
&& ri
->type
== type
&& ri
->sub_type
== sub_type
&&
2948 ri
->addpath_rx_id
== addpath_id
)
2952 if (bgp_debug_update(peer
, p
, NULL
, 1))
2954 zlog_debug ("%s rcvd UPDATE about %s -- withdrawn",
2956 bgp_debug_rdpfxpath2str (prd
, p
, addpath_id
? 1 : 0,
2957 addpath_id
, pfx_buf
, sizeof (pfx_buf
)));
2960 /* Withdraw specified route from routing table. */
2961 if (ri
&& ! CHECK_FLAG (ri
->flags
, BGP_INFO_HISTORY
))
2962 bgp_rib_withdraw (rn
, ri
, peer
, afi
, safi
, prd
);
2963 else if (bgp_debug_update(peer
, p
, NULL
, 1))
2964 zlog_debug ("%s Can't find the route %s",
2966 bgp_debug_rdpfxpath2str (prd
, p
, addpath_id
? 1 : 0,
2967 addpath_id
, pfx_buf
, sizeof (pfx_buf
)));
2969 /* Unlock bgp_node_get() lock. */
2970 bgp_unlock_node (rn
);
2976 bgp_default_originate (struct peer
*peer
, afi_t afi
, safi_t safi
, int withdraw
)
2978 struct update_subgroup
*subgrp
;
2979 subgrp
= peer_subgroup(peer
, afi
, safi
);
2980 subgroup_default_originate(subgrp
, withdraw
);
2985 * bgp_stop_announce_route_timer
2988 bgp_stop_announce_route_timer (struct peer_af
*paf
)
2990 if (!paf
->t_announce_route
)
2993 THREAD_TIMER_OFF (paf
->t_announce_route
);
2997 * bgp_announce_route_timer_expired
2999 * Callback that is invoked when the route announcement timer for a
3003 bgp_announce_route_timer_expired (struct thread
*t
)
3005 struct peer_af
*paf
;
3008 paf
= THREAD_ARG (t
);
3011 assert (paf
->t_announce_route
);
3012 paf
->t_announce_route
= NULL
;
3014 if (peer
->status
!= Established
)
3017 if (!peer
->afc_nego
[paf
->afi
][paf
->safi
])
3020 peer_af_announce_route (paf
, 1);
3025 * bgp_announce_route
3027 * *Triggers* announcement of routes of a given AFI/SAFI to a peer.
3030 bgp_announce_route (struct peer
*peer
, afi_t afi
, safi_t safi
)
3032 struct peer_af
*paf
;
3033 struct update_subgroup
*subgrp
;
3035 paf
= peer_af_find (peer
, afi
, safi
);
3038 subgrp
= PAF_SUBGRP(paf
);
3041 * Ignore if subgroup doesn't exist (implies AF is not negotiated)
3042 * or a refresh has already been triggered.
3044 if (!subgrp
|| paf
->t_announce_route
)
3048 * Start a timer to stagger/delay the announce. This serves
3049 * two purposes - announcement can potentially be combined for
3050 * multiple peers and the announcement doesn't happen in the
3053 THREAD_TIMER_MSEC_ON (bm
->master
, paf
->t_announce_route
,
3054 bgp_announce_route_timer_expired
, paf
,
3055 (subgrp
->peer_count
== 1) ?
3056 BGP_ANNOUNCE_ROUTE_SHORT_DELAY_MS
:
3057 BGP_ANNOUNCE_ROUTE_DELAY_MS
);
3061 * Announce routes from all AF tables to a peer.
3063 * This should ONLY be called when there is a need to refresh the
3064 * routes to the peer based on a policy change for this peer alone
3065 * or a route refresh request received from the peer.
3066 * The operation will result in splitting the peer from its existing
3067 * subgroups and putting it in new subgroups.
3070 bgp_announce_route_all (struct peer
*peer
)
3075 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++)
3076 for (safi
= SAFI_UNICAST
; safi
< SAFI_MAX
; safi
++)
3077 bgp_announce_route (peer
, afi
, safi
);
3081 bgp_soft_reconfig_table (struct peer
*peer
, afi_t afi
, safi_t safi
,
3082 struct bgp_table
*table
, struct prefix_rd
*prd
)
3085 struct bgp_node
*rn
;
3086 struct bgp_adj_in
*ain
;
3089 table
= peer
->bgp
->rib
[afi
][safi
];
3091 for (rn
= bgp_table_top (table
); rn
; rn
= bgp_route_next (rn
))
3092 for (ain
= rn
->adj_in
; ain
; ain
= ain
->next
)
3094 if (ain
->peer
== peer
)
3096 struct bgp_info
*ri
= rn
->info
;
3097 u_char
*tag
= (ri
&& ri
->extra
) ? ri
->extra
->tag
: NULL
;
3099 ret
= bgp_update (peer
, &rn
->p
, ain
->addpath_rx_id
, ain
->attr
,
3100 afi
, safi
, ZEBRA_ROUTE_BGP
, BGP_ROUTE_NORMAL
,
3105 bgp_unlock_node (rn
);
3113 bgp_soft_reconfig_in (struct peer
*peer
, afi_t afi
, safi_t safi
)
3115 struct bgp_node
*rn
;
3116 struct bgp_table
*table
;
3118 if (peer
->status
!= Established
)
3121 if ((safi
!= SAFI_MPLS_VPN
) && (safi
!= SAFI_ENCAP
) && (safi
!= SAFI_EVPN
))
3122 bgp_soft_reconfig_table (peer
, afi
, safi
, NULL
, NULL
);
3124 for (rn
= bgp_table_top (peer
->bgp
->rib
[afi
][safi
]); rn
;
3125 rn
= bgp_route_next (rn
))
3126 if ((table
= rn
->info
) != NULL
)
3128 struct prefix_rd prd
;
3129 prd
.family
= AF_UNSPEC
;
3131 memcpy(&prd
.val
, rn
->p
.u
.val
, 8);
3133 bgp_soft_reconfig_table (peer
, afi
, safi
, table
, &prd
);
3138 struct bgp_clear_node_queue
3140 struct bgp_node
*rn
;
3143 static wq_item_status
3144 bgp_clear_route_node (struct work_queue
*wq
, void *data
)
3146 struct bgp_clear_node_queue
*cnq
= data
;
3147 struct bgp_node
*rn
= cnq
->rn
;
3148 struct peer
*peer
= wq
->spec
.data
;
3149 struct bgp_info
*ri
;
3150 afi_t afi
= bgp_node_table (rn
)->afi
;
3151 safi_t safi
= bgp_node_table (rn
)->safi
;
3153 assert (rn
&& peer
);
3155 /* It is possible that we have multiple paths for a prefix from a peer
3156 * if that peer is using AddPath.
3158 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
3159 if (ri
->peer
== peer
)
3161 /* graceful restart STALE flag set. */
3162 if (CHECK_FLAG (peer
->sflags
, PEER_STATUS_NSF_WAIT
)
3163 && peer
->nsf
[afi
][safi
]
3164 && ! CHECK_FLAG (ri
->flags
, BGP_INFO_STALE
)
3165 && ! CHECK_FLAG (ri
->flags
, BGP_INFO_UNUSEABLE
))
3166 bgp_info_set_flag (rn
, ri
, BGP_INFO_STALE
);
3168 bgp_rib_remove (rn
, ri
, peer
, afi
, safi
);
3174 bgp_clear_node_queue_del (struct work_queue
*wq
, void *data
)
3176 struct bgp_clear_node_queue
*cnq
= data
;
3177 struct bgp_node
*rn
= cnq
->rn
;
3178 struct bgp_table
*table
= bgp_node_table (rn
);
3180 bgp_unlock_node (rn
);
3181 bgp_table_unlock (table
);
3182 XFREE (MTYPE_BGP_CLEAR_NODE_QUEUE
, cnq
);
3186 bgp_clear_node_complete (struct work_queue
*wq
)
3188 struct peer
*peer
= wq
->spec
.data
;
3190 /* Tickle FSM to start moving again */
3191 BGP_EVENT_ADD (peer
, Clearing_Completed
);
3193 peer_unlock (peer
); /* bgp_clear_route */
3197 bgp_clear_node_queue_init (struct peer
*peer
)
3199 char wname
[sizeof("clear xxxx:xxxx:xxxx:xxxx:xxxx:xxxx:xxxx:xxxx")];
3201 snprintf (wname
, sizeof(wname
), "clear %s", peer
->host
);
3202 #undef CLEAR_QUEUE_NAME_LEN
3204 if ( (peer
->clear_node_queue
= work_queue_new (bm
->master
, wname
)) == NULL
)
3206 zlog_err ("%s: Failed to allocate work queue", __func__
);
3209 peer
->clear_node_queue
->spec
.hold
= 10;
3210 peer
->clear_node_queue
->spec
.workfunc
= &bgp_clear_route_node
;
3211 peer
->clear_node_queue
->spec
.del_item_data
= &bgp_clear_node_queue_del
;
3212 peer
->clear_node_queue
->spec
.completion_func
= &bgp_clear_node_complete
;
3213 peer
->clear_node_queue
->spec
.max_retries
= 0;
3215 /* we only 'lock' this peer reference when the queue is actually active */
3216 peer
->clear_node_queue
->spec
.data
= peer
;
3220 bgp_clear_route_table (struct peer
*peer
, afi_t afi
, safi_t safi
,
3221 struct bgp_table
*table
)
3223 struct bgp_node
*rn
;
3224 int force
= bm
->process_main_queue
? 0 : 1;
3227 table
= peer
->bgp
->rib
[afi
][safi
];
3229 /* If still no table => afi/safi isn't configured at all or smth. */
3233 for (rn
= bgp_table_top (table
); rn
; rn
= bgp_route_next (rn
))
3235 struct bgp_info
*ri
, *next
;
3236 struct bgp_adj_in
*ain
;
3237 struct bgp_adj_in
*ain_next
;
3239 /* XXX:TODO: This is suboptimal, every non-empty route_node is
3240 * queued for every clearing peer, regardless of whether it is
3241 * relevant to the peer at hand.
3243 * Overview: There are 3 different indices which need to be
3244 * scrubbed, potentially, when a peer is removed:
3246 * 1 peer's routes visible via the RIB (ie accepted routes)
3247 * 2 peer's routes visible by the (optional) peer's adj-in index
3248 * 3 other routes visible by the peer's adj-out index
3250 * 3 there is no hurry in scrubbing, once the struct peer is
3251 * removed from bgp->peer, we could just GC such deleted peer's
3252 * adj-outs at our leisure.
3254 * 1 and 2 must be 'scrubbed' in some way, at least made
3255 * invisible via RIB index before peer session is allowed to be
3256 * brought back up. So one needs to know when such a 'search' is
3261 * - there'd be a single global queue or a single RIB walker
3262 * - rather than tracking which route_nodes still need to be
3263 * examined on a peer basis, we'd track which peers still
3266 * Given that our per-peer prefix-counts now should be reliable,
3267 * this may actually be achievable. It doesn't seem to be a huge
3268 * problem at this time,
3270 * It is possible that we have multiple paths for a prefix from a peer
3271 * if that peer is using AddPath.
3276 ain_next
= ain
->next
;
3278 if (ain
->peer
== peer
)
3280 bgp_adj_in_remove (rn
, ain
);
3281 bgp_unlock_node (rn
);
3287 for (ri
= rn
->info
; ri
; ri
= next
)
3290 if (ri
->peer
!= peer
)
3294 bgp_info_reap (rn
, ri
);
3297 struct bgp_clear_node_queue
*cnq
;
3299 /* both unlocked in bgp_clear_node_queue_del */
3300 bgp_table_lock (bgp_node_table (rn
));
3302 cnq
= XCALLOC (MTYPE_BGP_CLEAR_NODE_QUEUE
,
3303 sizeof (struct bgp_clear_node_queue
));
3305 work_queue_add (peer
->clear_node_queue
, cnq
);
3314 bgp_clear_route (struct peer
*peer
, afi_t afi
, safi_t safi
)
3316 struct bgp_node
*rn
;
3317 struct bgp_table
*table
;
3319 if (peer
->clear_node_queue
== NULL
)
3320 bgp_clear_node_queue_init (peer
);
3322 /* bgp_fsm.c keeps sessions in state Clearing, not transitioning to
3323 * Idle until it receives a Clearing_Completed event. This protects
3324 * against peers which flap faster than we can we clear, which could
3327 * a) race with routes from the new session being installed before
3328 * clear_route_node visits the node (to delete the route of that
3330 * b) resource exhaustion, clear_route_node likely leads to an entry
3331 * on the process_main queue. Fast-flapping could cause that queue
3335 /* lock peer in assumption that clear-node-queue will get nodes; if so,
3336 * the unlock will happen upon work-queue completion; other wise, the
3337 * unlock happens at the end of this function.
3339 if (!peer
->clear_node_queue
->thread
)
3342 if (safi
!= SAFI_MPLS_VPN
&& safi
!= SAFI_ENCAP
&& safi
!= SAFI_EVPN
)
3343 bgp_clear_route_table (peer
, afi
, safi
, NULL
);
3345 for (rn
= bgp_table_top (peer
->bgp
->rib
[afi
][safi
]); rn
;
3346 rn
= bgp_route_next (rn
))
3347 if ((table
= rn
->info
) != NULL
)
3348 bgp_clear_route_table (peer
, afi
, safi
, table
);
3350 /* unlock if no nodes got added to the clear-node-queue. */
3351 if (!peer
->clear_node_queue
->thread
)
3357 bgp_clear_route_all (struct peer
*peer
)
3362 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++)
3363 for (safi
= SAFI_UNICAST
; safi
< SAFI_MAX
; safi
++)
3364 bgp_clear_route (peer
, afi
, safi
);
3367 rfapiProcessPeerDown(peer
);
3372 bgp_clear_adj_in (struct peer
*peer
, afi_t afi
, safi_t safi
)
3374 struct bgp_table
*table
;
3375 struct bgp_node
*rn
;
3376 struct bgp_adj_in
*ain
;
3377 struct bgp_adj_in
*ain_next
;
3379 table
= peer
->bgp
->rib
[afi
][safi
];
3381 /* It is possible that we have multiple paths for a prefix from a peer
3382 * if that peer is using AddPath.
3384 for (rn
= bgp_table_top (table
); rn
; rn
= bgp_route_next (rn
))
3390 ain_next
= ain
->next
;
3392 if (ain
->peer
== peer
)
3394 bgp_adj_in_remove (rn
, ain
);
3395 bgp_unlock_node (rn
);
3404 bgp_clear_stale_route (struct peer
*peer
, afi_t afi
, safi_t safi
)
3406 struct bgp_node
*rn
;
3407 struct bgp_info
*ri
;
3408 struct bgp_table
*table
;
3410 if ( safi
== SAFI_MPLS_VPN
)
3412 for (rn
= bgp_table_top (peer
->bgp
->rib
[afi
][safi
]); rn
; rn
= bgp_route_next (rn
))
3414 struct bgp_node
*rm
;
3415 struct bgp_info
*ri
;
3417 /* look for neighbor in tables */
3418 if ((table
= rn
->info
) != NULL
)
3420 for (rm
= bgp_table_top (table
); rm
; rm
= bgp_route_next (rm
))
3421 for (ri
= rm
->info
; ri
; ri
= ri
->next
)
3422 if (ri
->peer
== peer
)
3424 if (CHECK_FLAG (ri
->flags
, BGP_INFO_STALE
))
3425 bgp_rib_remove (rm
, ri
, peer
, afi
, safi
);
3433 for (rn
= bgp_table_top (peer
->bgp
->rib
[afi
][safi
]); rn
; rn
= bgp_route_next (rn
))
3434 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
3435 if (ri
->peer
== peer
)
3437 if (CHECK_FLAG (ri
->flags
, BGP_INFO_STALE
))
3438 bgp_rib_remove (rn
, ri
, peer
, afi
, safi
);
3445 bgp_cleanup_table(struct bgp_table
*table
, safi_t safi
)
3447 struct bgp_node
*rn
;
3448 struct bgp_info
*ri
;
3449 struct bgp_info
*next
;
3451 for (rn
= bgp_table_top (table
); rn
; rn
= bgp_route_next (rn
))
3452 for (ri
= rn
->info
; ri
; ri
= next
)
3455 if (CHECK_FLAG (ri
->flags
, BGP_INFO_SELECTED
)
3456 && ri
->type
== ZEBRA_ROUTE_BGP
3457 && (ri
->sub_type
== BGP_ROUTE_NORMAL
||
3458 ri
->sub_type
== BGP_ROUTE_AGGREGATE
))
3461 if (table
->owner
&& table
->owner
->bgp
)
3462 vnc_import_bgp_del_route(table
->owner
->bgp
, &rn
->p
, ri
);
3464 bgp_zebra_withdraw (&rn
->p
, ri
, safi
);
3465 bgp_info_reap (rn
, ri
);
3470 /* Delete all kernel routes. */
3472 bgp_cleanup_routes (struct bgp
*bgp
)
3475 struct bgp_node
*rn
;
3477 for (afi
= AFI_IP
; afi
< AFI_MAX
; ++afi
)
3479 if (afi
== AFI_L2VPN
)
3481 bgp_cleanup_table(bgp
->rib
[afi
][SAFI_UNICAST
], SAFI_UNICAST
);
3483 * VPN and ENCAP and EVPN tables are two-level (RD is top level)
3485 if (afi
!= AFI_L2VPN
)
3488 safi
= SAFI_MPLS_VPN
;
3489 for (rn
= bgp_table_top(bgp
->rib
[afi
][safi
]); rn
;
3490 rn
= bgp_route_next (rn
))
3494 bgp_cleanup_table((struct bgp_table
*)(rn
->info
), safi
);
3495 bgp_table_finish ((struct bgp_table
**)&(rn
->info
));
3497 bgp_unlock_node(rn
);
3501 for (rn
= bgp_table_top(bgp
->rib
[afi
][safi
]); rn
;
3502 rn
= bgp_route_next (rn
))
3506 bgp_cleanup_table((struct bgp_table
*)(rn
->info
), safi
);
3507 bgp_table_finish ((struct bgp_table
**)&(rn
->info
));
3509 bgp_unlock_node(rn
);
3514 for (rn
= bgp_table_top(bgp
->rib
[AFI_L2VPN
][SAFI_EVPN
]); rn
;
3515 rn
= bgp_route_next (rn
))
3519 bgp_cleanup_table((struct bgp_table
*)(rn
->info
), SAFI_EVPN
);
3520 bgp_table_finish ((struct bgp_table
**)&(rn
->info
));
3522 bgp_unlock_node(rn
);
3531 bgp_zclient_reset ();
3532 access_list_reset ();
3533 prefix_list_reset ();
3537 bgp_addpath_encode_rx (struct peer
*peer
, afi_t afi
, safi_t safi
)
3539 return (CHECK_FLAG (peer
->af_cap
[afi
][safi
], PEER_CAP_ADDPATH_AF_RX_ADV
) &&
3540 CHECK_FLAG (peer
->af_cap
[afi
][safi
], PEER_CAP_ADDPATH_AF_TX_RCV
));
3543 /* Parse NLRI stream. Withdraw NLRI is recognized by NULL attr
3546 bgp_nlri_parse_ip (struct peer
*peer
, struct attr
*attr
,
3547 struct bgp_nlri
*packet
)
3556 int addpath_encoded
;
3557 u_int32_t addpath_id
;
3559 /* Check peer status. */
3560 if (peer
->status
!= Established
)
3564 lim
= pnt
+ packet
->length
;
3566 safi
= packet
->safi
;
3568 addpath_encoded
= bgp_addpath_encode_rx (peer
, afi
, safi
);
3570 /* RFC4771 6.3 The NLRI field in the UPDATE message is checked for
3571 syntactic validity. If the field is syntactically incorrect,
3572 then the Error Subcode is set to Invalid Network Field. */
3573 for (; pnt
< lim
; pnt
+= psize
)
3575 /* Clear prefix structure. */
3576 memset (&p
, 0, sizeof (struct prefix
));
3578 if (addpath_encoded
)
3581 /* When packet overflow occurs return immediately. */
3582 if (pnt
+ BGP_ADDPATH_ID_LEN
> lim
)
3585 addpath_id
= ntohl(*((uint32_t*) pnt
));
3586 pnt
+= BGP_ADDPATH_ID_LEN
;
3589 /* Fetch prefix length. */
3590 p
.prefixlen
= *pnt
++;
3591 /* afi/safi validity already verified by caller, bgp_update_receive */
3592 p
.family
= afi2family (afi
);
3594 /* Prefix length check. */
3595 if (p
.prefixlen
> prefix_blen (&p
) * 8)
3597 zlog_err("%s [Error] Update packet error (wrong perfix length %d for afi %u)",
3598 peer
->host
, p
.prefixlen
, packet
->afi
);
3602 /* Packet size overflow check. */
3603 psize
= PSIZE (p
.prefixlen
);
3605 /* When packet overflow occur return immediately. */
3606 if (pnt
+ psize
> lim
)
3608 zlog_err("%s [Error] Update packet error (prefix length %d overflows packet)",
3609 peer
->host
, p
.prefixlen
);
3613 /* Defensive coding, double-check the psize fits in a struct prefix */
3614 if (psize
> (ssize_t
) sizeof(p
.u
))
3616 zlog_err("%s [Error] Update packet error (prefix length %d too large for prefix storage %zu)",
3617 peer
->host
, p
.prefixlen
, sizeof(p
.u
));
3621 /* Fetch prefix from NLRI packet. */
3622 memcpy (&p
.u
.prefix
, pnt
, psize
);
3624 /* Check address. */
3625 if (afi
== AFI_IP
&& safi
== SAFI_UNICAST
)
3627 if (IN_CLASSD (ntohl (p
.u
.prefix4
.s_addr
)))
3629 /* From RFC4271 Section 6.3:
3631 * If a prefix in the NLRI field is semantically incorrect
3632 * (e.g., an unexpected multicast IP address), an error SHOULD
3633 * be logged locally, and the prefix SHOULD be ignored.
3635 zlog_err ("%s: IPv4 unicast NLRI is multicast address %s, ignoring",
3636 peer
->host
, inet_ntoa (p
.u
.prefix4
));
3641 /* Check address. */
3642 if (afi
== AFI_IP6
&& safi
== SAFI_UNICAST
)
3644 if (IN6_IS_ADDR_LINKLOCAL (&p
.u
.prefix6
))
3648 zlog_err ("%s: IPv6 unicast NLRI is link-local address %s, ignoring",
3649 peer
->host
, inet_ntop (AF_INET6
, &p
.u
.prefix6
, buf
, BUFSIZ
));
3653 if (IN6_IS_ADDR_MULTICAST (&p
.u
.prefix6
))
3657 zlog_err ("%s: IPv6 unicast NLRI is multicast address %s, ignoring",
3658 peer
->host
, inet_ntop (AF_INET6
, &p
.u
.prefix6
, buf
, BUFSIZ
));
3664 /* Normal process. */
3666 ret
= bgp_update (peer
, &p
, addpath_id
, attr
, afi
, safi
,
3667 ZEBRA_ROUTE_BGP
, BGP_ROUTE_NORMAL
, NULL
, NULL
, 0, NULL
);
3669 ret
= bgp_withdraw (peer
, &p
, addpath_id
, attr
, afi
, safi
,
3670 ZEBRA_ROUTE_BGP
, BGP_ROUTE_NORMAL
, NULL
, NULL
, NULL
);
3672 /* Address family configuration mismatch or maximum-prefix count
3678 /* Packet length consistency check. */
3681 zlog_err ("%s [Error] Update packet error (prefix length mismatch with total length)",
3689 static struct bgp_static
*
3690 bgp_static_new (void)
3692 return XCALLOC (MTYPE_BGP_STATIC
, sizeof (struct bgp_static
));
3696 bgp_static_free (struct bgp_static
*bgp_static
)
3698 if (bgp_static
->rmap
.name
)
3699 XFREE(MTYPE_ROUTE_MAP_NAME
, bgp_static
->rmap
.name
);
3700 if(bgp_static
->eth_s_id
)
3701 XFREE(MTYPE_ATTR
, bgp_static
->eth_s_id
);
3702 XFREE (MTYPE_BGP_STATIC
, bgp_static
);
3706 bgp_static_update_main (struct bgp
*bgp
, struct prefix
*p
,
3707 struct bgp_static
*bgp_static
, afi_t afi
, safi_t safi
)
3709 struct bgp_node
*rn
;
3710 struct bgp_info
*ri
;
3711 struct bgp_info
*new;
3712 struct bgp_info info
;
3714 struct attr
*attr_new
;
3717 int vnc_implicit_withdraw
= 0;
3720 assert (bgp_static
);
3724 rn
= bgp_afi_node_get (bgp
->rib
[afi
][safi
], afi
, safi
, p
, NULL
);
3726 bgp_attr_default_set (&attr
, BGP_ORIGIN_IGP
);
3728 attr
.nexthop
= bgp_static
->igpnexthop
;
3729 attr
.med
= bgp_static
->igpmetric
;
3730 attr
.flag
|= ATTR_FLAG_BIT (BGP_ATTR_MULTI_EXIT_DISC
);
3732 if (bgp_static
->atomic
)
3733 attr
.flag
|= ATTR_FLAG_BIT (BGP_ATTR_ATOMIC_AGGREGATE
);
3735 /* Apply route-map. */
3736 if (bgp_static
->rmap
.name
)
3738 struct attr attr_tmp
= attr
;
3739 info
.peer
= bgp
->peer_self
;
3740 info
.attr
= &attr_tmp
;
3742 SET_FLAG (bgp
->peer_self
->rmap_type
, PEER_RMAP_TYPE_NETWORK
);
3744 ret
= route_map_apply (bgp_static
->rmap
.map
, p
, RMAP_BGP
, &info
);
3746 bgp
->peer_self
->rmap_type
= 0;
3748 if (ret
== RMAP_DENYMATCH
)
3750 /* Free uninterned attribute. */
3751 bgp_attr_flush (&attr_tmp
);
3753 /* Unintern original. */
3754 aspath_unintern (&attr
.aspath
);
3755 bgp_attr_extra_free (&attr
);
3756 bgp_static_withdraw (bgp
, p
, afi
, safi
);
3759 attr_new
= bgp_attr_intern (&attr_tmp
);
3762 attr_new
= bgp_attr_intern (&attr
);
3764 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
3765 if (ri
->peer
== bgp
->peer_self
&& ri
->type
== ZEBRA_ROUTE_BGP
3766 && ri
->sub_type
== BGP_ROUTE_STATIC
)
3771 if (attrhash_cmp (ri
->attr
, attr_new
) &&
3772 !CHECK_FLAG(ri
->flags
, BGP_INFO_REMOVED
) &&
3773 !bgp_flag_check(bgp
, BGP_FLAG_FORCE_STATIC_PROCESS
))
3775 bgp_unlock_node (rn
);
3776 bgp_attr_unintern (&attr_new
);
3777 aspath_unintern (&attr
.aspath
);
3778 bgp_attr_extra_free (&attr
);
3783 /* The attribute is changed. */
3784 bgp_info_set_flag (rn
, ri
, BGP_INFO_ATTR_CHANGED
);
3786 /* Rewrite BGP route information. */
3787 if (CHECK_FLAG(ri
->flags
, BGP_INFO_REMOVED
))
3788 bgp_info_restore(rn
, ri
);
3790 bgp_aggregate_decrement (bgp
, p
, ri
, afi
, safi
);
3792 if ((afi
== AFI_IP
|| afi
== AFI_IP6
) && (safi
== SAFI_UNICAST
))
3794 if (CHECK_FLAG (ri
->flags
, BGP_INFO_SELECTED
))
3797 * Implicit withdraw case.
3798 * We have to do this before ri is changed
3800 ++vnc_implicit_withdraw
;
3801 vnc_import_bgp_del_route(bgp
, p
, ri
);
3802 vnc_import_bgp_exterior_del_route(bgp
, p
, ri
);
3806 bgp_attr_unintern (&ri
->attr
);
3807 ri
->attr
= attr_new
;
3808 ri
->uptime
= bgp_clock ();
3810 if ((afi
== AFI_IP
|| afi
== AFI_IP6
) && (safi
== SAFI_UNICAST
))
3812 if (vnc_implicit_withdraw
)
3814 vnc_import_bgp_add_route(bgp
, p
, ri
);
3815 vnc_import_bgp_exterior_add_route(bgp
, p
, ri
);
3820 /* Nexthop reachability check. */
3821 if (bgp_flag_check (bgp
, BGP_FLAG_IMPORT_CHECK
))
3823 if (bgp_find_or_add_nexthop (bgp
, afi
, ri
, NULL
, 0))
3824 bgp_info_set_flag (rn
, ri
, BGP_INFO_VALID
);
3827 if (BGP_DEBUG(nht
, NHT
))
3829 char buf1
[INET6_ADDRSTRLEN
];
3830 inet_ntop(p
->family
, &p
->u
.prefix
, buf1
,
3832 zlog_debug("%s(%s): Route not in table, not advertising",
3833 __FUNCTION__
, buf1
);
3835 bgp_info_unset_flag (rn
, ri
, BGP_INFO_VALID
);
3840 /* Delete the NHT structure if any, if we're toggling between
3841 * enabling/disabling import check. We deregister the route
3842 * from NHT to avoid overloading NHT and the process interaction
3844 bgp_unlink_nexthop(ri
);
3845 bgp_info_set_flag (rn
, ri
, BGP_INFO_VALID
);
3847 /* Process change. */
3848 bgp_aggregate_increment (bgp
, p
, ri
, afi
, safi
);
3849 bgp_process (bgp
, rn
, afi
, safi
);
3850 bgp_unlock_node (rn
);
3851 aspath_unintern (&attr
.aspath
);
3852 bgp_attr_extra_free (&attr
);
3857 /* Make new BGP info. */
3858 new = info_make(ZEBRA_ROUTE_BGP
, BGP_ROUTE_STATIC
, 0, bgp
->peer_self
, attr_new
,
3860 /* Nexthop reachability check. */
3861 if (bgp_flag_check (bgp
, BGP_FLAG_IMPORT_CHECK
))
3863 if (bgp_find_or_add_nexthop (bgp
, afi
, new, NULL
, 0))
3864 bgp_info_set_flag (rn
, new, BGP_INFO_VALID
);
3867 if (BGP_DEBUG(nht
, NHT
))
3869 char buf1
[INET6_ADDRSTRLEN
];
3870 inet_ntop(p
->family
, &p
->u
.prefix
, buf1
,
3872 zlog_debug("%s(%s): Route not in table, not advertising",
3873 __FUNCTION__
, buf1
);
3875 bgp_info_unset_flag (rn
, new, BGP_INFO_VALID
);
3880 /* Delete the NHT structure if any, if we're toggling between
3881 * enabling/disabling import check. We deregister the route
3882 * from NHT to avoid overloading NHT and the process interaction
3884 bgp_unlink_nexthop(new);
3886 bgp_info_set_flag (rn
, new, BGP_INFO_VALID
);
3889 /* Aggregate address increment. */
3890 bgp_aggregate_increment (bgp
, p
, new, afi
, safi
);
3892 /* Register new BGP information. */
3893 bgp_info_add (rn
, new);
3895 /* route_node_get lock */
3896 bgp_unlock_node (rn
);
3898 /* Process change. */
3899 bgp_process (bgp
, rn
, afi
, safi
);
3901 /* Unintern original. */
3902 aspath_unintern (&attr
.aspath
);
3903 bgp_attr_extra_free (&attr
);
3907 bgp_static_update (struct bgp
*bgp
, struct prefix
*p
,
3908 struct bgp_static
*bgp_static
, afi_t afi
, safi_t safi
)
3910 bgp_static_update_main (bgp
, p
, bgp_static
, afi
, safi
);
3914 bgp_static_withdraw (struct bgp
*bgp
, struct prefix
*p
, afi_t afi
,
3917 struct bgp_node
*rn
;
3918 struct bgp_info
*ri
;
3920 rn
= bgp_afi_node_get (bgp
->rib
[afi
][safi
], afi
, safi
, p
, NULL
);
3922 /* Check selected route and self inserted route. */
3923 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
3924 if (ri
->peer
== bgp
->peer_self
3925 && ri
->type
== ZEBRA_ROUTE_BGP
3926 && ri
->sub_type
== BGP_ROUTE_STATIC
)
3929 /* Withdraw static BGP route from routing table. */
3932 bgp_aggregate_decrement (bgp
, p
, ri
, afi
, safi
);
3933 bgp_unlink_nexthop(ri
);
3934 bgp_info_delete (rn
, ri
);
3935 bgp_process (bgp
, rn
, afi
, safi
);
3938 /* Unlock bgp_node_lookup. */
3939 bgp_unlock_node (rn
);
3943 * Used for SAFI_MPLS_VPN and SAFI_ENCAP
3946 bgp_static_withdraw_safi (struct bgp
*bgp
, struct prefix
*p
, afi_t afi
,
3947 safi_t safi
, struct prefix_rd
*prd
, u_char
*tag
)
3949 struct bgp_node
*rn
;
3950 struct bgp_info
*ri
;
3952 rn
= bgp_afi_node_get (bgp
->rib
[afi
][safi
], afi
, safi
, p
, prd
);
3954 /* Check selected route and self inserted route. */
3955 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
3956 if (ri
->peer
== bgp
->peer_self
3957 && ri
->type
== ZEBRA_ROUTE_BGP
3958 && ri
->sub_type
== BGP_ROUTE_STATIC
)
3961 /* Withdraw static BGP route from routing table. */
3965 rfapiProcessWithdraw(
3974 1); /* Kill, since it is an administrative change */
3976 bgp_aggregate_decrement (bgp
, p
, ri
, afi
, safi
);
3977 bgp_info_delete (rn
, ri
);
3978 bgp_process (bgp
, rn
, afi
, safi
);
3981 /* Unlock bgp_node_lookup. */
3982 bgp_unlock_node (rn
);
3986 bgp_static_update_safi (struct bgp
*bgp
, struct prefix
*p
,
3987 struct bgp_static
*bgp_static
, afi_t afi
, safi_t safi
)
3989 struct bgp_node
*rn
;
3990 struct bgp_info
*new;
3991 struct attr
*attr_new
;
3992 struct attr attr
= { 0 };
3993 struct bgp_info
*ri
;
3995 u_int32_t label
= 0;
3999 assert (bgp_static
);
4001 rn
= bgp_afi_node_get (bgp
->rib
[afi
][safi
], afi
, safi
, p
, &bgp_static
->prd
);
4003 bgp_attr_default_set (&attr
, BGP_ORIGIN_IGP
);
4005 attr
.nexthop
= bgp_static
->igpnexthop
;
4006 attr
.med
= bgp_static
->igpmetric
;
4007 attr
.flag
|= ATTR_FLAG_BIT (BGP_ATTR_MULTI_EXIT_DISC
);
4009 if(afi
== AFI_L2VPN
)
4011 if (bgp_static
->gatewayIp
.family
== AF_INET
)
4012 add
.ipv4
.s_addr
= bgp_static
->gatewayIp
.u
.prefix4
.s_addr
;
4013 else if (bgp_static
->gatewayIp
.family
== AF_INET6
)
4014 memcpy( &(add
.ipv6
), &(bgp_static
->gatewayIp
.u
.prefix6
), sizeof (struct in6_addr
));
4015 overlay_index_update(&attr
, bgp_static
->eth_s_id
, &add
);
4016 if (bgp_static
->encap_tunneltype
== BGP_ENCAP_TYPE_VXLAN
)
4018 struct bgp_encap_type_vxlan bet
;
4019 memset(&bet
, 0, sizeof(struct bgp_encap_type_vxlan
));
4020 bet
.vnid
= p
->u
.prefix_evpn
.eth_tag
;
4021 bgp_encap_type_vxlan_to_tlv(&bet
, &attr
);
4023 if (bgp_static
->router_mac
)
4025 bgp_add_routermac_ecom (&attr
, bgp_static
->router_mac
);
4028 /* Apply route-map. */
4029 if (bgp_static
->rmap
.name
)
4031 struct attr attr_tmp
= attr
;
4032 struct bgp_info info
;
4035 info
.peer
= bgp
->peer_self
;
4036 info
.attr
= &attr_tmp
;
4038 SET_FLAG (bgp
->peer_self
->rmap_type
, PEER_RMAP_TYPE_NETWORK
);
4040 ret
= route_map_apply (bgp_static
->rmap
.map
, p
, RMAP_BGP
, &info
);
4042 bgp
->peer_self
->rmap_type
= 0;
4044 if (ret
== RMAP_DENYMATCH
)
4046 /* Free uninterned attribute. */
4047 bgp_attr_flush (&attr_tmp
);
4049 /* Unintern original. */
4050 aspath_unintern (&attr
.aspath
);
4051 bgp_attr_extra_free (&attr
);
4052 bgp_static_withdraw_safi (bgp
, p
, afi
, safi
, &bgp_static
->prd
,
4057 attr_new
= bgp_attr_intern (&attr_tmp
);
4061 attr_new
= bgp_attr_intern (&attr
);
4064 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
4065 if (ri
->peer
== bgp
->peer_self
&& ri
->type
== ZEBRA_ROUTE_BGP
4066 && ri
->sub_type
== BGP_ROUTE_STATIC
)
4072 memset(&add
, 0, sizeof(union gw_addr
));
4073 if (attrhash_cmp (ri
->attr
, attr_new
) &&
4074 overlay_index_equal(afi
, ri
, bgp_static
->eth_s_id
, &add
) &&
4075 !CHECK_FLAG(ri
->flags
, BGP_INFO_REMOVED
))
4077 bgp_unlock_node (rn
);
4078 bgp_attr_unintern (&attr_new
);
4079 aspath_unintern (&attr
.aspath
);
4080 bgp_attr_extra_free (&attr
);
4085 /* The attribute is changed. */
4086 bgp_info_set_flag (rn
, ri
, BGP_INFO_ATTR_CHANGED
);
4088 /* Rewrite BGP route information. */
4089 if (CHECK_FLAG(ri
->flags
, BGP_INFO_REMOVED
))
4090 bgp_info_restore(rn
, ri
);
4092 bgp_aggregate_decrement (bgp
, p
, ri
, afi
, safi
);
4093 bgp_attr_unintern (&ri
->attr
);
4094 ri
->attr
= attr_new
;
4095 ri
->uptime
= bgp_clock ();
4098 label
= decode_label (ri
->extra
->tag
);
4101 /* Process change. */
4102 bgp_aggregate_increment (bgp
, p
, ri
, afi
, safi
);
4103 bgp_process (bgp
, rn
, afi
, safi
);
4105 rfapiProcessUpdate(ri
->peer
, NULL
, p
, &bgp_static
->prd
,
4106 ri
->attr
, afi
, safi
,
4107 ri
->type
, ri
->sub_type
, &label
);
4109 bgp_unlock_node (rn
);
4110 aspath_unintern (&attr
.aspath
);
4111 bgp_attr_extra_free (&attr
);
4117 /* Make new BGP info. */
4118 new = info_make(ZEBRA_ROUTE_BGP
, BGP_ROUTE_STATIC
, 0, bgp
->peer_self
, attr_new
,
4120 SET_FLAG (new->flags
, BGP_INFO_VALID
);
4121 new->extra
= bgp_info_extra_new();
4122 memcpy (new->extra
->tag
, bgp_static
->tag
, 3);
4124 label
= decode_label (bgp_static
->tag
);
4127 /* Aggregate address increment. */
4128 bgp_aggregate_increment (bgp
, p
, new, afi
, safi
);
4130 /* Register new BGP information. */
4131 bgp_info_add (rn
, new);
4133 /* route_node_get lock */
4134 bgp_unlock_node (rn
);
4136 /* Process change. */
4137 bgp_process (bgp
, rn
, afi
, safi
);
4140 rfapiProcessUpdate(new->peer
, NULL
, p
, &bgp_static
->prd
,
4141 new->attr
, afi
, safi
,
4142 new->type
, new->sub_type
, &label
);
4145 /* Unintern original. */
4146 aspath_unintern (&attr
.aspath
);
4147 bgp_attr_extra_free (&attr
);
4150 /* Configure static BGP network. When user don't run zebra, static
4151 route should be installed as valid. */
4153 bgp_static_set (struct vty
*vty
, const char *ip_str
,
4154 afi_t afi
, safi_t safi
, const char *rmap
, int backdoor
)
4156 VTY_DECLVAR_CONTEXT(bgp
, bgp
);
4159 struct bgp_static
*bgp_static
;
4160 struct bgp_node
*rn
;
4161 u_char need_update
= 0;
4163 /* Convert IP prefix string to struct prefix. */
4164 ret
= str2prefix (ip_str
, &p
);
4167 vty_out (vty
, "%% Malformed prefix%s", VTY_NEWLINE
);
4170 if (afi
== AFI_IP6
&& IN6_IS_ADDR_LINKLOCAL (&p
.u
.prefix6
))
4172 vty_out (vty
, "%% Malformed prefix (link-local address)%s",
4179 /* Set BGP static route configuration. */
4180 rn
= bgp_node_get (bgp
->route
[afi
][safi
], &p
);
4184 /* Configuration change. */
4185 bgp_static
= rn
->info
;
4187 /* Check previous routes are installed into BGP. */
4188 if (bgp_static
->valid
&& bgp_static
->backdoor
!= backdoor
)
4191 bgp_static
->backdoor
= backdoor
;
4195 if (bgp_static
->rmap
.name
)
4196 XFREE(MTYPE_ROUTE_MAP_NAME
, bgp_static
->rmap
.name
);
4197 bgp_static
->rmap
.name
= XSTRDUP(MTYPE_ROUTE_MAP_NAME
, rmap
);
4198 bgp_static
->rmap
.map
= route_map_lookup_by_name (rmap
);
4202 if (bgp_static
->rmap
.name
)
4203 XFREE(MTYPE_ROUTE_MAP_NAME
, bgp_static
->rmap
.name
);
4204 bgp_static
->rmap
.name
= NULL
;
4205 bgp_static
->rmap
.map
= NULL
;
4206 bgp_static
->valid
= 0;
4208 bgp_unlock_node (rn
);
4212 /* New configuration. */
4213 bgp_static
= bgp_static_new ();
4214 bgp_static
->backdoor
= backdoor
;
4215 bgp_static
->valid
= 0;
4216 bgp_static
->igpmetric
= 0;
4217 bgp_static
->igpnexthop
.s_addr
= 0;
4221 if (bgp_static
->rmap
.name
)
4222 XFREE(MTYPE_ROUTE_MAP_NAME
, bgp_static
->rmap
.name
);
4223 bgp_static
->rmap
.name
= XSTRDUP(MTYPE_ROUTE_MAP_NAME
, rmap
);
4224 bgp_static
->rmap
.map
= route_map_lookup_by_name (rmap
);
4226 rn
->info
= bgp_static
;
4229 bgp_static
->valid
= 1;
4231 bgp_static_withdraw (bgp
, &p
, afi
, safi
);
4233 if (! bgp_static
->backdoor
)
4234 bgp_static_update (bgp
, &p
, bgp_static
, afi
, safi
);
4239 /* Configure static BGP network. */
4241 bgp_static_unset (struct vty
*vty
, const char *ip_str
,
4242 afi_t afi
, safi_t safi
)
4244 VTY_DECLVAR_CONTEXT(bgp
, bgp
);
4247 struct bgp_static
*bgp_static
;
4248 struct bgp_node
*rn
;
4250 /* Convert IP prefix string to struct prefix. */
4251 ret
= str2prefix (ip_str
, &p
);
4254 vty_out (vty
, "%% Malformed prefix%s", VTY_NEWLINE
);
4257 if (afi
== AFI_IP6
&& IN6_IS_ADDR_LINKLOCAL (&p
.u
.prefix6
))
4259 vty_out (vty
, "%% Malformed prefix (link-local address)%s",
4266 rn
= bgp_node_lookup (bgp
->route
[afi
][safi
], &p
);
4269 vty_out (vty
, "%% Can't find specified static route configuration.%s",
4274 bgp_static
= rn
->info
;
4276 /* Update BGP RIB. */
4277 if (! bgp_static
->backdoor
)
4278 bgp_static_withdraw (bgp
, &p
, afi
, safi
);
4280 /* Clear configuration. */
4281 bgp_static_free (bgp_static
);
4283 bgp_unlock_node (rn
);
4284 bgp_unlock_node (rn
);
4290 bgp_static_add (struct bgp
*bgp
)
4294 struct bgp_node
*rn
;
4295 struct bgp_node
*rm
;
4296 struct bgp_table
*table
;
4297 struct bgp_static
*bgp_static
;
4299 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++)
4300 for (safi
= SAFI_UNICAST
; safi
< SAFI_MAX
; safi
++)
4301 for (rn
= bgp_table_top (bgp
->route
[afi
][safi
]); rn
; rn
= bgp_route_next (rn
))
4302 if (rn
->info
!= NULL
)
4304 if ((safi
== SAFI_MPLS_VPN
) || (safi
== SAFI_ENCAP
) || (safi
== SAFI_EVPN
))
4308 for (rm
= bgp_table_top (table
); rm
; rm
= bgp_route_next (rm
))
4310 bgp_static
= rn
->info
;
4311 bgp_static_update_safi (bgp
, &rm
->p
, bgp_static
, afi
, safi
);
4316 bgp_static_update (bgp
, &rn
->p
, rn
->info
, afi
, safi
);
4321 /* Called from bgp_delete(). Delete all static routes from the BGP
4324 bgp_static_delete (struct bgp
*bgp
)
4328 struct bgp_node
*rn
;
4329 struct bgp_node
*rm
;
4330 struct bgp_table
*table
;
4331 struct bgp_static
*bgp_static
;
4333 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++)
4334 for (safi
= SAFI_UNICAST
; safi
< SAFI_MAX
; safi
++)
4335 for (rn
= bgp_table_top (bgp
->route
[afi
][safi
]); rn
; rn
= bgp_route_next (rn
))
4336 if (rn
->info
!= NULL
)
4338 if ((safi
== SAFI_MPLS_VPN
) || (safi
== SAFI_ENCAP
) || (safi
== SAFI_EVPN
))
4342 for (rm
= bgp_table_top (table
); rm
; rm
= bgp_route_next (rm
))
4344 bgp_static
= rn
->info
;
4345 bgp_static_withdraw_safi (bgp
, &rm
->p
,
4347 (struct prefix_rd
*)&rn
->p
,
4349 bgp_static_free (bgp_static
);
4351 bgp_unlock_node (rn
);
4356 bgp_static
= rn
->info
;
4357 bgp_static_withdraw (bgp
, &rn
->p
, afi
, safi
);
4358 bgp_static_free (bgp_static
);
4360 bgp_unlock_node (rn
);
4366 bgp_static_redo_import_check (struct bgp
*bgp
)
4370 struct bgp_node
*rn
;
4371 struct bgp_static
*bgp_static
;
4373 /* Use this flag to force reprocessing of the route */
4374 bgp_flag_set(bgp
, BGP_FLAG_FORCE_STATIC_PROCESS
);
4375 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++)
4376 for (safi
= SAFI_UNICAST
; safi
< SAFI_MAX
; safi
++)
4377 for (rn
= bgp_table_top (bgp
->route
[afi
][safi
]); rn
; rn
= bgp_route_next (rn
))
4378 if (rn
->info
!= NULL
)
4380 bgp_static
= rn
->info
;
4381 bgp_static_update (bgp
, &rn
->p
, bgp_static
, afi
, safi
);
4383 bgp_flag_unset(bgp
, BGP_FLAG_FORCE_STATIC_PROCESS
);
4387 bgp_purge_af_static_redist_routes (struct bgp
*bgp
, afi_t afi
, safi_t safi
)
4389 struct bgp_table
*table
;
4390 struct bgp_node
*rn
;
4391 struct bgp_info
*ri
;
4393 table
= bgp
->rib
[afi
][safi
];
4394 for (rn
= bgp_table_top (table
); rn
; rn
= bgp_route_next (rn
))
4396 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
4398 if (ri
->peer
== bgp
->peer_self
&&
4399 ((ri
->type
== ZEBRA_ROUTE_BGP
&&
4400 ri
->sub_type
== BGP_ROUTE_STATIC
) ||
4401 (ri
->type
!= ZEBRA_ROUTE_BGP
&&
4402 ri
->sub_type
== BGP_ROUTE_REDISTRIBUTE
)))
4404 bgp_aggregate_decrement (bgp
, &rn
->p
, ri
, afi
, safi
);
4405 bgp_unlink_nexthop(ri
);
4406 bgp_info_delete (rn
, ri
);
4407 bgp_process (bgp
, rn
, afi
, safi
);
4414 * Purge all networks and redistributed routes from routing table.
4415 * Invoked upon the instance going down.
4418 bgp_purge_static_redist_routes (struct bgp
*bgp
)
4423 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++)
4424 for (safi
= SAFI_UNICAST
; safi
< SAFI_MAX
; safi
++)
4425 bgp_purge_af_static_redist_routes (bgp
, afi
, safi
);
4430 * Currently this is used to set static routes for VPN and ENCAP.
4431 * I think it can probably be factored with bgp_static_set.
4434 bgp_static_set_safi (safi_t safi
, struct vty
*vty
, const char *ip_str
,
4435 const char *rd_str
, const char *tag_str
,
4436 const char *rmap_str
, int evpn_type
, const char *esi
, const char *gwip
,
4437 const char *ethtag
, const char *routermac
)
4439 VTY_DECLVAR_CONTEXT(bgp
, bgp
);
4442 struct prefix_rd prd
;
4443 struct bgp_node
*prn
;
4444 struct bgp_node
*rn
;
4445 struct bgp_table
*table
;
4446 struct bgp_static
*bgp_static
;
4449 struct prefix gw_ip
;
4451 if(safi
== SAFI_EVPN
)
4456 /* validate ip prefix */
4457 ret
= str2prefix (ip_str
, &p
);
4460 vty_out (vty
, "%% Malformed prefix%s", VTY_NEWLINE
);
4464 if ( (afi
== AFI_L2VPN
) &&
4465 (bgp_build_evpn_prefix ( evpn_type
, ethtag
!=NULL
?atol(ethtag
):0, &p
)))
4467 vty_out (vty
, "%% L2VPN prefix could not be forged%s", VTY_NEWLINE
);
4471 ret
= str2prefix_rd (rd_str
, &prd
);
4474 vty_out (vty
, "%% Malformed rd%s", VTY_NEWLINE
);
4480 ret
= str2tag (tag_str
, tag
);
4483 vty_out (vty
, "%% Malformed tag%s", VTY_NEWLINE
);
4489 encode_label (0, tag
);
4491 if (safi
== SAFI_EVPN
)
4493 if( esi
&& str2esi (esi
, NULL
) == 0)
4495 vty_out (vty
, "%% Malformed ESI%s", VTY_NEWLINE
);
4498 if( routermac
&& str2mac (routermac
, NULL
) == 0)
4500 vty_out (vty
, "%% Malformed Router MAC%s", VTY_NEWLINE
);
4505 memset (&gw_ip
, 0, sizeof (struct prefix
));
4506 ret
= str2prefix (gwip
, &gw_ip
);
4509 vty_out (vty
, "%% Malformed GatewayIp%s", VTY_NEWLINE
);
4512 if((gw_ip
.family
== AF_INET
&& (p
.u
.prefix_evpn
.flags
& IP_PREFIX_V6
))
4513 || (gw_ip
.family
== AF_INET6
&& (p
.u
.prefix_evpn
.flags
& IP_PREFIX_V4
)))
4515 vty_out (vty
, "%% GatewayIp family differs with IP prefix%s", VTY_NEWLINE
);
4520 prn
= bgp_node_get (bgp
->route
[afi
][safi
],
4521 (struct prefix
*)&prd
);
4522 if (prn
->info
== NULL
)
4523 prn
->info
= bgp_table_init (afi
, safi
);
4525 bgp_unlock_node (prn
);
4528 rn
= bgp_node_get (table
, &p
);
4532 vty_out (vty
, "%% Same network configuration exists%s", VTY_NEWLINE
);
4533 bgp_unlock_node (rn
);
4537 /* New configuration. */
4538 bgp_static
= bgp_static_new ();
4539 bgp_static
->backdoor
= 0;
4540 bgp_static
->valid
= 0;
4541 bgp_static
->igpmetric
= 0;
4542 bgp_static
->igpnexthop
.s_addr
= 0;
4543 memcpy(bgp_static
->tag
, tag
, 3);
4544 bgp_static
->prd
= prd
;
4548 if (bgp_static
->rmap
.name
)
4549 free (bgp_static
->rmap
.name
);
4550 bgp_static
->rmap
.name
= strdup (rmap_str
);
4551 bgp_static
->rmap
.map
= route_map_lookup_by_name (rmap_str
);
4554 if (safi
== SAFI_EVPN
)
4558 bgp_static
->eth_s_id
= XCALLOC (MTYPE_ATTR
, sizeof(struct eth_segment_id
));
4559 str2esi (esi
, bgp_static
->eth_s_id
);
4563 bgp_static
->router_mac
= XCALLOC (MTYPE_ATTR
, MAC_LEN
+1);
4564 str2mac (routermac
, bgp_static
->router_mac
);
4567 prefix_copy (&bgp_static
->gatewayIp
, &gw_ip
);
4569 rn
->info
= bgp_static
;
4571 bgp_static
->valid
= 1;
4572 bgp_static_update_safi (bgp
, &p
, bgp_static
, afi
, safi
);
4578 /* Configure static BGP network. */
4580 bgp_static_unset_safi(safi_t safi
, struct vty
*vty
, const char *ip_str
,
4581 const char *rd_str
, const char *tag_str
,
4582 int evpn_type
, const char *esi
, const char *gwip
, const char *ethtag
)
4584 VTY_DECLVAR_CONTEXT(bgp
, bgp
);
4587 struct prefix_rd prd
;
4588 struct bgp_node
*prn
;
4589 struct bgp_node
*rn
;
4590 struct bgp_table
*table
;
4591 struct bgp_static
*bgp_static
;
4595 if(safi
== SAFI_EVPN
)
4600 /* Convert IP prefix string to struct prefix. */
4601 ret
= str2prefix (ip_str
, &p
);
4604 vty_out (vty
, "%% Malformed prefix%s", VTY_NEWLINE
);
4608 if ( (afi
== AFI_L2VPN
) &&
4609 (bgp_build_evpn_prefix ( evpn_type
, ethtag
!=NULL
?atol(ethtag
):0, &p
)))
4611 vty_out (vty
, "%% L2VPN prefix could not be forged%s", VTY_NEWLINE
);
4614 ret
= str2prefix_rd (rd_str
, &prd
);
4617 vty_out (vty
, "%% Malformed rd%s", VTY_NEWLINE
);
4621 ret
= str2tag (tag_str
, tag
);
4624 vty_out (vty
, "%% Malformed tag%s", VTY_NEWLINE
);
4628 prn
= bgp_node_get (bgp
->route
[afi
][safi
],
4629 (struct prefix
*)&prd
);
4630 if (prn
->info
== NULL
)
4631 prn
->info
= bgp_table_init (afi
, safi
);
4633 bgp_unlock_node (prn
);
4636 rn
= bgp_node_lookup (table
, &p
);
4640 bgp_static_withdraw_safi (bgp
, &p
, afi
, safi
, &prd
, tag
);
4642 bgp_static
= rn
->info
;
4643 bgp_static_free (bgp_static
);
4645 bgp_unlock_node (rn
);
4646 bgp_unlock_node (rn
);
4649 vty_out (vty
, "%% Can't find the route%s", VTY_NEWLINE
);
4655 bgp_table_map_set (struct vty
*vty
, afi_t afi
, safi_t safi
,
4656 const char *rmap_name
)
4658 VTY_DECLVAR_CONTEXT(bgp
, bgp
);
4659 struct bgp_rmap
*rmap
;
4661 rmap
= &bgp
->table_map
[afi
][safi
];
4665 XFREE(MTYPE_ROUTE_MAP_NAME
, rmap
->name
);
4666 rmap
->name
= XSTRDUP(MTYPE_ROUTE_MAP_NAME
, rmap_name
);
4667 rmap
->map
= route_map_lookup_by_name (rmap_name
);
4672 XFREE(MTYPE_ROUTE_MAP_NAME
, rmap
->name
);
4677 bgp_zebra_announce_table(bgp
, afi
, safi
);
4683 bgp_table_map_unset (struct vty
*vty
, afi_t afi
, safi_t safi
,
4684 const char *rmap_name
)
4686 VTY_DECLVAR_CONTEXT(bgp
, bgp
);
4687 struct bgp_rmap
*rmap
;
4689 rmap
= &bgp
->table_map
[afi
][safi
];
4691 XFREE(MTYPE_ROUTE_MAP_NAME
, rmap
->name
);
4695 bgp_zebra_announce_table(bgp
, afi
, safi
);
4701 bgp_config_write_table_map (struct vty
*vty
, struct bgp
*bgp
, afi_t afi
,
4702 safi_t safi
, int *write
)
4704 if (bgp
->table_map
[afi
][safi
].name
)
4706 bgp_config_write_family_header (vty
, afi
, safi
, write
);
4707 vty_out (vty
, " table-map %s%s",
4708 bgp
->table_map
[afi
][safi
].name
, VTY_NEWLINE
);
4714 DEFUN (bgp_table_map
,
4717 "BGP table to RIB route download filter\n"
4718 "Name of the route map\n")
4721 return bgp_table_map_set (vty
,
4722 bgp_node_afi (vty
), bgp_node_safi (vty
), argv
[idx_word
]->arg
);
4724 DEFUN (no_bgp_table_map
,
4725 no_bgp_table_map_cmd
,
4726 "no table-map WORD",
4728 "BGP table to RIB route download filter\n"
4729 "Name of the route map\n")
4732 return bgp_table_map_unset (vty
,
4733 bgp_node_afi (vty
), bgp_node_safi (vty
), argv
[idx_word
]->arg
);
4738 "network A.B.C.D/M",
4739 "Specify a network to announce via BGP\n"
4742 int idx_ipv4_prefixlen
= 1;
4743 return bgp_static_set (vty
, argv
[idx_ipv4_prefixlen
]->arg
,
4744 AFI_IP
, bgp_node_safi (vty
), NULL
, 0);
4747 DEFUN (bgp_network_route_map
,
4748 bgp_network_route_map_cmd
,
4749 "network A.B.C.D/M route-map WORD",
4750 "Specify a network to announce via BGP\n"
4752 "Route-map to modify the attributes\n"
4753 "Name of the route map\n")
4755 int idx_ipv4_prefixlen
= 1;
4757 return bgp_static_set (vty
, argv
[idx_ipv4_prefixlen
]->arg
,
4758 AFI_IP
, bgp_node_safi (vty
), argv
[idx_word
]->arg
, 0);
4761 DEFUN (bgp_network_backdoor
,
4762 bgp_network_backdoor_cmd
,
4763 "network A.B.C.D/M backdoor",
4764 "Specify a network to announce via BGP\n"
4766 "Specify a BGP backdoor route\n")
4768 int idx_ipv4_prefixlen
= 1;
4769 return bgp_static_set (vty
, argv
[idx_ipv4_prefixlen
]->arg
, AFI_IP
, SAFI_UNICAST
,
4773 DEFUN (bgp_network_mask
,
4774 bgp_network_mask_cmd
,
4775 "network A.B.C.D mask A.B.C.D",
4776 "Specify a network to announce via BGP\n"
4784 char prefix_str
[BUFSIZ
];
4786 ret
= netmask_str2prefix_str (argv
[idx_ipv4
]->arg
, argv
[idx_ipv4_2
]->arg
, prefix_str
);
4789 vty_out (vty
, "%% Inconsistent address and mask%s", VTY_NEWLINE
);
4793 return bgp_static_set (vty
, prefix_str
,
4794 AFI_IP
, bgp_node_safi (vty
), NULL
, 0);
4797 DEFUN (bgp_network_mask_route_map
,
4798 bgp_network_mask_route_map_cmd
,
4799 "network A.B.C.D mask A.B.C.D route-map WORD",
4800 "Specify a network to announce via BGP\n"
4804 "Route-map to modify the attributes\n"
4805 "Name of the route map\n")
4811 char prefix_str
[BUFSIZ
];
4813 ret
= netmask_str2prefix_str (argv
[idx_ipv4
]->arg
, argv
[idx_ipv4_2
]->arg
, prefix_str
);
4816 vty_out (vty
, "%% Inconsistent address and mask%s", VTY_NEWLINE
);
4820 return bgp_static_set (vty
, prefix_str
,
4821 AFI_IP
, bgp_node_safi (vty
), argv
[idx_word
]->arg
, 0);
4824 DEFUN (bgp_network_mask_backdoor
,
4825 bgp_network_mask_backdoor_cmd
,
4826 "network A.B.C.D mask A.B.C.D backdoor",
4827 "Specify a network to announce via BGP\n"
4831 "Specify a BGP backdoor route\n")
4836 char prefix_str
[BUFSIZ
];
4838 ret
= netmask_str2prefix_str (argv
[idx_ipv4
]->arg
, argv
[idx_ipv4_2
]->arg
, prefix_str
);
4841 vty_out (vty
, "%% Inconsistent address and mask%s", VTY_NEWLINE
);
4845 return bgp_static_set (vty
, prefix_str
, AFI_IP
, SAFI_UNICAST
,
4849 DEFUN (bgp_network_mask_natural
,
4850 bgp_network_mask_natural_cmd
,
4852 "Specify a network to announce via BGP\n"
4857 char prefix_str
[BUFSIZ
];
4859 ret
= netmask_str2prefix_str (argv
[idx_ipv4
]->arg
, NULL
, prefix_str
);
4862 vty_out (vty
, "%% Inconsistent address and mask%s", VTY_NEWLINE
);
4866 return bgp_static_set (vty
, prefix_str
,
4867 AFI_IP
, bgp_node_safi (vty
), NULL
, 0);
4870 DEFUN (bgp_network_mask_natural_route_map
,
4871 bgp_network_mask_natural_route_map_cmd
,
4872 "network A.B.C.D route-map WORD",
4873 "Specify a network to announce via BGP\n"
4875 "Route-map to modify the attributes\n"
4876 "Name of the route map\n")
4881 char prefix_str
[BUFSIZ
];
4883 ret
= netmask_str2prefix_str (argv
[idx_ipv4
]->arg
, NULL
, prefix_str
);
4886 vty_out (vty
, "%% Inconsistent address and mask%s", VTY_NEWLINE
);
4890 return bgp_static_set (vty
, prefix_str
,
4891 AFI_IP
, bgp_node_safi (vty
), argv
[idx_word
]->arg
, 0);
4894 DEFUN (bgp_network_mask_natural_backdoor
,
4895 bgp_network_mask_natural_backdoor_cmd
,
4896 "network A.B.C.D backdoor",
4897 "Specify a network to announce via BGP\n"
4899 "Specify a BGP backdoor route\n")
4903 char prefix_str
[BUFSIZ
];
4905 ret
= netmask_str2prefix_str (argv
[idx_ipv4
]->arg
, NULL
, prefix_str
);
4908 vty_out (vty
, "%% Inconsistent address and mask%s", VTY_NEWLINE
);
4912 return bgp_static_set (vty
, prefix_str
, AFI_IP
, SAFI_UNICAST
,
4916 DEFUN (no_bgp_network
,
4918 "no network A.B.C.D/M [<backdoor|route-map WORD>]",
4920 "Specify a network to announce via BGP\n"
4922 "Specify a BGP backdoor route\n"
4923 "Route-map to modify the attributes\n"
4924 "Name of the route map\n")
4926 int idx_ipv4_prefixlen
= 2;
4927 return bgp_static_unset (vty
, argv
[idx_ipv4_prefixlen
]->arg
, AFI_IP
,
4928 bgp_node_safi (vty
));
4931 DEFUN (no_bgp_network_mask
,
4932 no_bgp_network_mask_cmd
,
4933 "no network A.B.C.D mask A.B.C.D [<backdoor|route-map WORD>]",
4935 "Specify a network to announce via BGP\n"
4939 "Specify a BGP backdoor route\n"
4940 "Route-map to modify the attributes\n"
4941 "Name of the route map\n")
4946 char prefix_str
[BUFSIZ
];
4948 ret
= netmask_str2prefix_str (argv
[idx_ipv4
]->arg
, argv
[idx_ipv4_2
]->arg
, prefix_str
);
4951 vty_out (vty
, "%% Inconsistent address and mask%s", VTY_NEWLINE
);
4955 return bgp_static_unset (vty
, prefix_str
, AFI_IP
,
4956 bgp_node_safi (vty
));
4959 DEFUN (no_bgp_network_mask_natural
,
4960 no_bgp_network_mask_natural_cmd
,
4961 "no network A.B.C.D [<backdoor|route-map WORD>]",
4963 "Specify a network to announce via BGP\n"
4965 "Specify a BGP backdoor route\n"
4966 "Route-map to modify the attributes\n"
4967 "Name of the route map\n")
4971 char prefix_str
[BUFSIZ
];
4973 ret
= netmask_str2prefix_str (argv
[idx_ipv4
]->arg
, NULL
, prefix_str
);
4976 vty_out (vty
, "%% Inconsistent address and mask%s", VTY_NEWLINE
);
4980 return bgp_static_unset (vty
, prefix_str
, AFI_IP
,
4981 bgp_node_safi (vty
));
4984 DEFUN (ipv6_bgp_network
,
4985 ipv6_bgp_network_cmd
,
4986 "network X:X::X:X/M",
4987 "Specify a network to announce via BGP\n"
4990 int idx_ipv6_prefixlen
= 1;
4991 return bgp_static_set (vty
, argv
[idx_ipv6_prefixlen
]->arg
, AFI_IP6
, bgp_node_safi(vty
),
4995 DEFUN (ipv6_bgp_network_route_map
,
4996 ipv6_bgp_network_route_map_cmd
,
4997 "network X:X::X:X/M route-map WORD",
4998 "Specify a network to announce via BGP\n"
5000 "Route-map to modify the attributes\n"
5001 "Name of the route map\n")
5003 int idx_ipv6_prefixlen
= 1;
5005 return bgp_static_set (vty
, argv
[idx_ipv6_prefixlen
]->arg
, AFI_IP6
,
5006 bgp_node_safi (vty
), argv
[idx_word
]->arg
, 0);
5009 DEFUN (no_ipv6_bgp_network
,
5010 no_ipv6_bgp_network_cmd
,
5011 "no network X:X::X:X/M [route-map WORD]",
5013 "Specify a network to announce via BGP\n"
5015 "Route-map to modify the attributes\n"
5016 "Name of the route map\n")
5018 int idx_ipv6_prefixlen
= 2;
5019 return bgp_static_unset (vty
, argv
[idx_ipv6_prefixlen
]->arg
, AFI_IP6
, bgp_node_safi(vty
));
5022 /* Aggreagete address:
5024 advertise-map Set condition to advertise attribute
5025 as-set Generate AS set path information
5026 attribute-map Set attributes of aggregate
5027 route-map Set parameters of aggregate
5028 summary-only Filter more specific routes from updates
5029 suppress-map Conditionally filter more specific routes from updates
5032 struct bgp_aggregate
5034 /* Summary-only flag. */
5035 u_char summary_only
;
5037 /* AS set generation. */
5040 /* Route-map for aggregated route. */
5041 struct route_map
*map
;
5043 /* Suppress-count. */
5044 unsigned long count
;
5046 /* SAFI configuration. */
5050 static struct bgp_aggregate
*
5051 bgp_aggregate_new (void)
5053 return XCALLOC (MTYPE_BGP_AGGREGATE
, sizeof (struct bgp_aggregate
));
5057 bgp_aggregate_free (struct bgp_aggregate
*aggregate
)
5059 XFREE (MTYPE_BGP_AGGREGATE
, aggregate
);
5062 /* Update an aggregate as routes are added/removed from the BGP table */
5064 bgp_aggregate_route (struct bgp
*bgp
, struct prefix
*p
, struct bgp_info
*rinew
,
5065 afi_t afi
, safi_t safi
, struct bgp_info
*del
,
5066 struct bgp_aggregate
*aggregate
)
5068 struct bgp_table
*table
;
5069 struct bgp_node
*top
;
5070 struct bgp_node
*rn
;
5072 struct aspath
*aspath
= NULL
;
5073 struct aspath
*asmerge
= NULL
;
5074 struct community
*community
= NULL
;
5075 struct community
*commerge
= NULL
;
5076 #if defined(AGGREGATE_NEXTHOP_CHECK)
5077 struct in_addr nexthop
;
5080 struct bgp_info
*ri
;
5081 struct bgp_info
*new;
5083 unsigned long match
= 0;
5084 u_char atomic_aggregate
= 0;
5086 /* Record adding route's nexthop and med. */
5089 #if defined(AGGREGATE_NEXTHOP_CHECK)
5090 nexthop
= rinew
->attr
->nexthop
;
5091 med
= rinew
->attr
->med
;
5095 /* ORIGIN attribute: If at least one route among routes that are
5096 aggregated has ORIGIN with the value INCOMPLETE, then the
5097 aggregated route must have the ORIGIN attribute with the value
5098 INCOMPLETE. Otherwise, if at least one route among routes that
5099 are aggregated has ORIGIN with the value EGP, then the aggregated
5100 route must have the origin attribute with the value EGP. In all
5101 other case the value of the ORIGIN attribute of the aggregated
5102 route is INTERNAL. */
5103 origin
= BGP_ORIGIN_IGP
;
5105 table
= bgp
->rib
[afi
][safi
];
5107 top
= bgp_node_get (table
, p
);
5108 for (rn
= bgp_node_get (table
, p
); rn
; rn
= bgp_route_next_until (rn
, top
))
5109 if (rn
->p
.prefixlen
> p
->prefixlen
)
5113 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
5115 if (BGP_INFO_HOLDDOWN (ri
))
5118 if (del
&& ri
== del
)
5121 if (! rinew
&& first
)
5123 #if defined(AGGREGATE_NEXTHOP_CHECK)
5124 nexthop
= ri
->attr
->nexthop
;
5125 med
= ri
->attr
->med
;
5130 #ifdef AGGREGATE_NEXTHOP_CHECK
5131 if (! IPV4_ADDR_SAME (&ri
->attr
->nexthop
, &nexthop
)
5132 || ri
->attr
->med
!= med
)
5135 aspath_free (aspath
);
5137 community_free (community
);
5138 bgp_unlock_node (rn
);
5139 bgp_unlock_node (top
);
5142 #endif /* AGGREGATE_NEXTHOP_CHECK */
5144 if (ri
->attr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_ATOMIC_AGGREGATE
))
5145 atomic_aggregate
= 1;
5147 if (ri
->sub_type
!= BGP_ROUTE_AGGREGATE
)
5149 if (aggregate
->summary_only
)
5151 (bgp_info_extra_get (ri
))->suppress
++;
5152 bgp_info_set_flag (rn
, ri
, BGP_INFO_ATTR_CHANGED
);
5158 if (origin
< ri
->attr
->origin
)
5159 origin
= ri
->attr
->origin
;
5161 if (aggregate
->as_set
)
5165 asmerge
= aspath_aggregate (aspath
, ri
->attr
->aspath
);
5166 aspath_free (aspath
);
5170 aspath
= aspath_dup (ri
->attr
->aspath
);
5172 if (ri
->attr
->community
)
5176 commerge
= community_merge (community
,
5177 ri
->attr
->community
);
5178 community
= community_uniq_sort (commerge
);
5179 community_free (commerge
);
5182 community
= community_dup (ri
->attr
->community
);
5188 bgp_process (bgp
, rn
, afi
, safi
);
5190 bgp_unlock_node (top
);
5196 if (aggregate
->summary_only
)
5197 (bgp_info_extra_get (rinew
))->suppress
++;
5199 if (origin
< rinew
->attr
->origin
)
5200 origin
= rinew
->attr
->origin
;
5202 if (aggregate
->as_set
)
5206 asmerge
= aspath_aggregate (aspath
, rinew
->attr
->aspath
);
5207 aspath_free (aspath
);
5211 aspath
= aspath_dup (rinew
->attr
->aspath
);
5213 if (rinew
->attr
->community
)
5217 commerge
= community_merge (community
,
5218 rinew
->attr
->community
);
5219 community
= community_uniq_sort (commerge
);
5220 community_free (commerge
);
5223 community
= community_dup (rinew
->attr
->community
);
5228 if (aggregate
->count
> 0)
5230 rn
= bgp_node_get (table
, p
);
5231 new = info_make(ZEBRA_ROUTE_BGP
, BGP_ROUTE_AGGREGATE
, 0, bgp
->peer_self
,
5232 bgp_attr_aggregate_intern(bgp
, origin
, aspath
, community
,
5234 atomic_aggregate
), rn
);
5235 SET_FLAG (new->flags
, BGP_INFO_VALID
);
5237 bgp_info_add (rn
, new);
5238 bgp_unlock_node (rn
);
5239 bgp_process (bgp
, rn
, afi
, safi
);
5244 aspath_free (aspath
);
5246 community_free (community
);
5250 void bgp_aggregate_delete (struct bgp
*, struct prefix
*, afi_t
, safi_t
,
5251 struct bgp_aggregate
*);
5254 bgp_aggregate_increment (struct bgp
*bgp
, struct prefix
*p
,
5255 struct bgp_info
*ri
, afi_t afi
, safi_t safi
)
5257 struct bgp_node
*child
;
5258 struct bgp_node
*rn
;
5259 struct bgp_aggregate
*aggregate
;
5260 struct bgp_table
*table
;
5262 /* MPLS-VPN aggregation is not yet supported. */
5263 if ((safi
== SAFI_MPLS_VPN
) || (safi
== SAFI_ENCAP
) || (safi
= SAFI_EVPN
))
5266 table
= bgp
->aggregate
[afi
][safi
];
5268 /* No aggregates configured. */
5269 if (bgp_table_top_nolock (table
) == NULL
)
5272 if (p
->prefixlen
== 0)
5275 if (BGP_INFO_HOLDDOWN (ri
))
5278 child
= bgp_node_get (table
, p
);
5280 /* Aggregate address configuration check. */
5281 for (rn
= child
; rn
; rn
= bgp_node_parent_nolock (rn
))
5282 if ((aggregate
= rn
->info
) != NULL
&& rn
->p
.prefixlen
< p
->prefixlen
)
5284 bgp_aggregate_delete (bgp
, &rn
->p
, afi
, safi
, aggregate
);
5285 bgp_aggregate_route (bgp
, &rn
->p
, ri
, afi
, safi
, NULL
, aggregate
);
5287 bgp_unlock_node (child
);
5291 bgp_aggregate_decrement (struct bgp
*bgp
, struct prefix
*p
,
5292 struct bgp_info
*del
, afi_t afi
, safi_t safi
)
5294 struct bgp_node
*child
;
5295 struct bgp_node
*rn
;
5296 struct bgp_aggregate
*aggregate
;
5297 struct bgp_table
*table
;
5299 /* MPLS-VPN aggregation is not yet supported. */
5300 if ((safi
== SAFI_MPLS_VPN
) || (safi
== SAFI_ENCAP
) || (safi
= SAFI_EVPN
))
5303 table
= bgp
->aggregate
[afi
][safi
];
5305 /* No aggregates configured. */
5306 if (bgp_table_top_nolock (table
) == NULL
)
5309 if (p
->prefixlen
== 0)
5312 child
= bgp_node_get (table
, p
);
5314 /* Aggregate address configuration check. */
5315 for (rn
= child
; rn
; rn
= bgp_node_parent_nolock (rn
))
5316 if ((aggregate
= rn
->info
) != NULL
&& rn
->p
.prefixlen
< p
->prefixlen
)
5318 bgp_aggregate_delete (bgp
, &rn
->p
, afi
, safi
, aggregate
);
5319 bgp_aggregate_route (bgp
, &rn
->p
, NULL
, afi
, safi
, del
, aggregate
);
5321 bgp_unlock_node (child
);
5324 /* Called via bgp_aggregate_set when the user configures aggregate-address */
5326 bgp_aggregate_add (struct bgp
*bgp
, struct prefix
*p
, afi_t afi
, safi_t safi
,
5327 struct bgp_aggregate
*aggregate
)
5329 struct bgp_table
*table
;
5330 struct bgp_node
*top
;
5331 struct bgp_node
*rn
;
5332 struct bgp_info
*new;
5333 struct bgp_info
*ri
;
5334 unsigned long match
;
5335 u_char origin
= BGP_ORIGIN_IGP
;
5336 struct aspath
*aspath
= NULL
;
5337 struct aspath
*asmerge
= NULL
;
5338 struct community
*community
= NULL
;
5339 struct community
*commerge
= NULL
;
5340 u_char atomic_aggregate
= 0;
5342 table
= bgp
->rib
[afi
][safi
];
5345 if (afi
== AFI_IP
&& p
->prefixlen
== IPV4_MAX_BITLEN
)
5347 if (afi
== AFI_IP6
&& p
->prefixlen
== IPV6_MAX_BITLEN
)
5350 /* If routes exists below this node, generate aggregate routes. */
5351 top
= bgp_node_get (table
, p
);
5352 for (rn
= bgp_node_get (table
, p
); rn
; rn
= bgp_route_next_until (rn
, top
))
5353 if (rn
->p
.prefixlen
> p
->prefixlen
)
5357 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
5359 if (BGP_INFO_HOLDDOWN (ri
))
5362 if (ri
->attr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_ATOMIC_AGGREGATE
))
5363 atomic_aggregate
= 1;
5365 if (ri
->sub_type
!= BGP_ROUTE_AGGREGATE
)
5367 /* summary-only aggregate route suppress aggregated
5368 route announcement. */
5369 if (aggregate
->summary_only
)
5371 (bgp_info_extra_get (ri
))->suppress
++;
5372 bgp_info_set_flag (rn
, ri
, BGP_INFO_ATTR_CHANGED
);
5376 /* If at least one route among routes that are aggregated has
5377 * ORIGIN with the value INCOMPLETE, then the aggregated route
5378 * MUST have the ORIGIN attribute with the value INCOMPLETE.
5379 * Otherwise, if at least one route among routes that are
5380 * aggregated has ORIGIN with the value EGP, then the aggregated
5381 * route MUST have the ORIGIN attribute with the value EGP.
5383 if (origin
< ri
->attr
->origin
)
5384 origin
= ri
->attr
->origin
;
5386 /* as-set aggregate route generate origin, as path,
5387 community aggregation. */
5388 if (aggregate
->as_set
)
5392 asmerge
= aspath_aggregate (aspath
, ri
->attr
->aspath
);
5393 aspath_free (aspath
);
5397 aspath
= aspath_dup (ri
->attr
->aspath
);
5399 if (ri
->attr
->community
)
5403 commerge
= community_merge (community
,
5404 ri
->attr
->community
);
5405 community
= community_uniq_sort (commerge
);
5406 community_free (commerge
);
5409 community
= community_dup (ri
->attr
->community
);
5416 /* If this node is suppressed, process the change. */
5418 bgp_process (bgp
, rn
, afi
, safi
);
5420 bgp_unlock_node (top
);
5422 /* Add aggregate route to BGP table. */
5423 if (aggregate
->count
)
5425 rn
= bgp_node_get (table
, p
);
5426 new = info_make(ZEBRA_ROUTE_BGP
, BGP_ROUTE_AGGREGATE
, 0, bgp
->peer_self
,
5427 bgp_attr_aggregate_intern(bgp
, origin
, aspath
, community
,
5429 atomic_aggregate
), rn
);
5430 SET_FLAG (new->flags
, BGP_INFO_VALID
);
5432 bgp_info_add (rn
, new);
5433 bgp_unlock_node (rn
);
5435 /* Process change. */
5436 bgp_process (bgp
, rn
, afi
, safi
);
5441 aspath_free (aspath
);
5443 community_free (community
);
5448 bgp_aggregate_delete (struct bgp
*bgp
, struct prefix
*p
, afi_t afi
,
5449 safi_t safi
, struct bgp_aggregate
*aggregate
)
5451 struct bgp_table
*table
;
5452 struct bgp_node
*top
;
5453 struct bgp_node
*rn
;
5454 struct bgp_info
*ri
;
5455 unsigned long match
;
5457 table
= bgp
->rib
[afi
][safi
];
5459 if (afi
== AFI_IP
&& p
->prefixlen
== IPV4_MAX_BITLEN
)
5461 if (afi
== AFI_IP6
&& p
->prefixlen
== IPV6_MAX_BITLEN
)
5464 /* If routes exists below this node, generate aggregate routes. */
5465 top
= bgp_node_get (table
, p
);
5466 for (rn
= bgp_node_get (table
, p
); rn
; rn
= bgp_route_next_until (rn
, top
))
5467 if (rn
->p
.prefixlen
> p
->prefixlen
)
5471 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
5473 if (BGP_INFO_HOLDDOWN (ri
))
5476 if (ri
->sub_type
!= BGP_ROUTE_AGGREGATE
)
5478 if (aggregate
->summary_only
&& ri
->extra
)
5480 ri
->extra
->suppress
--;
5482 if (ri
->extra
->suppress
== 0)
5484 bgp_info_set_flag (rn
, ri
, BGP_INFO_ATTR_CHANGED
);
5492 /* If this node was suppressed, process the change. */
5494 bgp_process (bgp
, rn
, afi
, safi
);
5496 bgp_unlock_node (top
);
5498 /* Delete aggregate route from BGP table. */
5499 rn
= bgp_node_get (table
, p
);
5501 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
5502 if (ri
->peer
== bgp
->peer_self
5503 && ri
->type
== ZEBRA_ROUTE_BGP
5504 && ri
->sub_type
== BGP_ROUTE_AGGREGATE
)
5507 /* Withdraw static BGP route from routing table. */
5510 bgp_info_delete (rn
, ri
);
5511 bgp_process (bgp
, rn
, afi
, safi
);
5514 /* Unlock bgp_node_lookup. */
5515 bgp_unlock_node (rn
);
5518 /* Aggregate route attribute. */
5519 #define AGGREGATE_SUMMARY_ONLY 1
5520 #define AGGREGATE_AS_SET 1
5523 bgp_aggregate_unset (struct vty
*vty
, const char *prefix_str
,
5524 afi_t afi
, safi_t safi
)
5526 VTY_DECLVAR_CONTEXT(bgp
, bgp
);
5529 struct bgp_node
*rn
;
5530 struct bgp_aggregate
*aggregate
;
5532 /* Convert string to prefix structure. */
5533 ret
= str2prefix (prefix_str
, &p
);
5536 vty_out (vty
, "Malformed prefix%s", VTY_NEWLINE
);
5541 /* Old configuration check. */
5542 rn
= bgp_node_lookup (bgp
->aggregate
[afi
][safi
], &p
);
5545 vty_out (vty
, "%% There is no aggregate-address configuration.%s",
5550 aggregate
= rn
->info
;
5551 if (aggregate
->safi
& SAFI_UNICAST
)
5552 bgp_aggregate_delete (bgp
, &p
, afi
, SAFI_UNICAST
, aggregate
);
5553 if (aggregate
->safi
& SAFI_MULTICAST
)
5554 bgp_aggregate_delete (bgp
, &p
, afi
, SAFI_MULTICAST
, aggregate
);
5556 /* Unlock aggregate address configuration. */
5558 bgp_aggregate_free (aggregate
);
5559 bgp_unlock_node (rn
);
5560 bgp_unlock_node (rn
);
5566 bgp_aggregate_set (struct vty
*vty
, const char *prefix_str
,
5567 afi_t afi
, safi_t safi
,
5568 u_char summary_only
, u_char as_set
)
5570 VTY_DECLVAR_CONTEXT(bgp
, bgp
);
5573 struct bgp_node
*rn
;
5574 struct bgp_aggregate
*aggregate
;
5576 /* Convert string to prefix structure. */
5577 ret
= str2prefix (prefix_str
, &p
);
5580 vty_out (vty
, "Malformed prefix%s", VTY_NEWLINE
);
5585 /* Old configuration check. */
5586 rn
= bgp_node_get (bgp
->aggregate
[afi
][safi
], &p
);
5590 vty_out (vty
, "There is already same aggregate network.%s", VTY_NEWLINE
);
5591 /* try to remove the old entry */
5592 ret
= bgp_aggregate_unset (vty
, prefix_str
, afi
, safi
);
5595 vty_out (vty
, "Error deleting aggregate.%s", VTY_NEWLINE
);
5596 bgp_unlock_node (rn
);
5601 /* Make aggregate address structure. */
5602 aggregate
= bgp_aggregate_new ();
5603 aggregate
->summary_only
= summary_only
;
5604 aggregate
->as_set
= as_set
;
5605 aggregate
->safi
= safi
;
5606 rn
->info
= aggregate
;
5608 /* Aggregate address insert into BGP routing table. */
5609 if (safi
& SAFI_UNICAST
)
5610 bgp_aggregate_add (bgp
, &p
, afi
, SAFI_UNICAST
, aggregate
);
5611 if (safi
& SAFI_MULTICAST
)
5612 bgp_aggregate_add (bgp
, &p
, afi
, SAFI_MULTICAST
, aggregate
);
5617 DEFUN (aggregate_address
,
5618 aggregate_address_cmd
,
5619 "aggregate-address A.B.C.D/M [<as-set [summary-only]|summary-only [as-set]>]",
5620 "Configure BGP aggregate entries\n"
5621 "Aggregate prefix\n"
5622 "Generate AS set path information\n"
5623 "Filter more specific routes from updates\n"
5624 "Filter more specific routes from updates\n"
5625 "Generate AS set path information\n")
5628 argv_find (argv
, argc
, "A.B.C.D/M", &idx
);
5629 char *prefix
= argv
[idx
]->arg
;
5630 int as_set
= argv_find (argv
, argc
, "as-set", &idx
) ? AGGREGATE_AS_SET
: 0;
5632 int summary_only
= argv_find (argv
, argc
, "summary-only", &idx
) ? AGGREGATE_SUMMARY_ONLY
: 0;
5634 return bgp_aggregate_set (vty
, prefix
, AFI_IP
, bgp_node_safi (vty
), summary_only
, as_set
);
5637 DEFUN (aggregate_address_mask
,
5638 aggregate_address_mask_cmd
,
5639 "aggregate-address A.B.C.D A.B.C.D [<as-set [summary-only]|summary-only [as-set]>]",
5640 "Configure BGP aggregate entries\n"
5641 "Aggregate address\n"
5643 "Generate AS set path information\n"
5644 "Filter more specific routes from updates\n"
5645 "Filter more specific routes from updates\n"
5646 "Generate AS set path information\n")
5649 argv_find (argv
, argc
, "A.B.C.D", &idx
);
5650 char *prefix
= argv
[idx
++]->arg
;
5651 argv_find (argv
, argc
, "A.B.C.D", &idx
);
5652 char *mask
= argv
[idx
]->arg
;
5653 int as_set
= argv_find (argv
, argc
, "as-set", &idx
) ? AGGREGATE_AS_SET
: 0;
5655 int summary_only
= argv_find (argv
, argc
, "summary-only", &idx
) ? AGGREGATE_SUMMARY_ONLY
: 0;
5657 char prefix_str
[BUFSIZ
];
5658 int ret
= netmask_str2prefix_str (prefix
, mask
, prefix_str
);
5662 vty_out (vty
, "%% Inconsistent address and mask%s", VTY_NEWLINE
);
5666 return bgp_aggregate_set (vty
, prefix_str
, AFI_IP
, bgp_node_safi (vty
), summary_only
, as_set
);
5669 DEFUN (no_aggregate_address
,
5670 no_aggregate_address_cmd
,
5671 "no aggregate-address A.B.C.D/M [<as-set [summary-only]|summary-only [as-set]>]",
5673 "Configure BGP aggregate entries\n"
5674 "Aggregate prefix\n"
5675 "Generate AS set path information\n"
5676 "Filter more specific routes from updates\n"
5677 "Filter more specific routes from updates\n"
5678 "Generate AS set path information\n")
5681 argv_find (argv
, argc
, "A.B.C.D/M", &idx
);
5682 char *prefix
= argv
[idx
]->arg
;
5683 return bgp_aggregate_unset (vty
, prefix
, AFI_IP
, bgp_node_safi (vty
));
5686 DEFUN (no_aggregate_address_mask
,
5687 no_aggregate_address_mask_cmd
,
5688 "no aggregate-address A.B.C.D A.B.C.D [<as-set [summary-only]|summary-only [as-set]>]",
5690 "Configure BGP aggregate entries\n"
5691 "Aggregate address\n"
5693 "Generate AS set path information\n"
5694 "Filter more specific routes from updates\n"
5695 "Filter more specific routes from updates\n"
5696 "Generate AS set path information\n")
5699 argv_find (argv
, argc
, "A.B.C.D", &idx
);
5700 char *prefix
= argv
[idx
++]->arg
;
5701 argv_find (argv
, argc
, "A.B.C.D", &idx
);
5702 char *mask
= argv
[idx
]->arg
;
5704 char prefix_str
[BUFSIZ
];
5705 int ret
= netmask_str2prefix_str (prefix
, mask
, prefix_str
);
5709 vty_out (vty
, "%% Inconsistent address and mask%s", VTY_NEWLINE
);
5713 return bgp_aggregate_unset (vty
, prefix_str
, AFI_IP
, bgp_node_safi (vty
));
5716 DEFUN (ipv6_aggregate_address
,
5717 ipv6_aggregate_address_cmd
,
5718 "aggregate-address X:X::X:X/M [summary-only]",
5719 "Configure BGP aggregate entries\n"
5720 "Aggregate prefix\n"
5721 "Filter more specific routes from updates\n")
5724 argv_find (argv
, argc
, "X:X::X:X/M", &idx
);
5725 char *prefix
= argv
[idx
]->arg
;
5726 int sum_only
= argv_find (argv
, argc
, "summary-only", &idx
) ? AGGREGATE_SUMMARY_ONLY
: 0;
5727 return bgp_aggregate_set (vty
, prefix
, AFI_IP6
, SAFI_UNICAST
, sum_only
, 0);
5730 DEFUN (no_ipv6_aggregate_address
,
5731 no_ipv6_aggregate_address_cmd
,
5732 "no aggregate-address X:X::X:X/M [summary-only]",
5734 "Configure BGP aggregate entries\n"
5735 "Aggregate prefix\n"
5736 "Filter more specific routes from updates\n")
5739 argv_find (argv
, argc
, "X:X::X:X/M", &idx
);
5740 char *prefix
= argv
[idx
]->arg
;
5741 return bgp_aggregate_unset (vty
, prefix
, AFI_IP6
, SAFI_UNICAST
);
5744 /* Redistribute route treatment. */
5746 bgp_redistribute_add (struct bgp
*bgp
, struct prefix
*p
, const struct in_addr
*nexthop
,
5747 const struct in6_addr
*nexthop6
, unsigned int ifindex
,
5748 u_int32_t metric
, u_char type
, u_short instance
, route_tag_t tag
)
5750 struct bgp_info
*new;
5751 struct bgp_info
*bi
;
5752 struct bgp_info info
;
5753 struct bgp_node
*bn
;
5755 struct attr
*new_attr
;
5758 struct bgp_redist
*red
;
5760 /* Make default attribute. */
5761 bgp_attr_default_set (&attr
, BGP_ORIGIN_INCOMPLETE
);
5763 attr
.nexthop
= *nexthop
;
5764 attr
.nh_ifindex
= ifindex
;
5768 struct attr_extra
*extra
= bgp_attr_extra_get(&attr
);
5769 extra
->mp_nexthop_global
= *nexthop6
;
5770 extra
->mp_nexthop_len
= BGP_ATTR_NHLEN_IPV6_GLOBAL
;
5774 attr
.flag
|= ATTR_FLAG_BIT (BGP_ATTR_MULTI_EXIT_DISC
);
5775 attr
.extra
->tag
= tag
;
5777 afi
= family2afi (p
->family
);
5779 red
= bgp_redist_lookup(bgp
, afi
, type
, instance
);
5782 struct attr attr_new
;
5783 struct attr_extra extra_new
;
5785 /* Copy attribute for modification. */
5786 attr_new
.extra
= &extra_new
;
5787 bgp_attr_dup (&attr_new
, &attr
);
5789 if (red
->redist_metric_flag
)
5790 attr_new
.med
= red
->redist_metric
;
5792 /* Apply route-map. */
5795 info
.peer
= bgp
->peer_self
;
5796 info
.attr
= &attr_new
;
5798 SET_FLAG (bgp
->peer_self
->rmap_type
, PEER_RMAP_TYPE_REDISTRIBUTE
);
5800 ret
= route_map_apply (red
->rmap
.map
, p
, RMAP_BGP
, &info
);
5802 bgp
->peer_self
->rmap_type
= 0;
5804 if (ret
== RMAP_DENYMATCH
)
5806 /* Free uninterned attribute. */
5807 bgp_attr_flush (&attr_new
);
5809 /* Unintern original. */
5810 aspath_unintern (&attr
.aspath
);
5811 bgp_attr_extra_free (&attr
);
5812 bgp_redistribute_delete (bgp
, p
, type
, instance
);
5817 bn
= bgp_afi_node_get (bgp
->rib
[afi
][SAFI_UNICAST
],
5818 afi
, SAFI_UNICAST
, p
, NULL
);
5820 new_attr
= bgp_attr_intern (&attr_new
);
5822 for (bi
= bn
->info
; bi
; bi
= bi
->next
)
5823 if (bi
->peer
== bgp
->peer_self
5824 && bi
->sub_type
== BGP_ROUTE_REDISTRIBUTE
)
5829 /* Ensure the (source route) type is updated. */
5831 if (attrhash_cmp (bi
->attr
, new_attr
) &&
5832 !CHECK_FLAG(bi
->flags
, BGP_INFO_REMOVED
))
5834 bgp_attr_unintern (&new_attr
);
5835 aspath_unintern (&attr
.aspath
);
5836 bgp_attr_extra_free (&attr
);
5837 bgp_unlock_node (bn
);
5842 /* The attribute is changed. */
5843 bgp_info_set_flag (bn
, bi
, BGP_INFO_ATTR_CHANGED
);
5845 /* Rewrite BGP route information. */
5846 if (CHECK_FLAG(bi
->flags
, BGP_INFO_REMOVED
))
5847 bgp_info_restore(bn
, bi
);
5849 bgp_aggregate_decrement (bgp
, p
, bi
, afi
, SAFI_UNICAST
);
5850 bgp_attr_unintern (&bi
->attr
);
5851 bi
->attr
= new_attr
;
5852 bi
->uptime
= bgp_clock ();
5854 /* Process change. */
5855 bgp_aggregate_increment (bgp
, p
, bi
, afi
, SAFI_UNICAST
);
5856 bgp_process (bgp
, bn
, afi
, SAFI_UNICAST
);
5857 bgp_unlock_node (bn
);
5858 aspath_unintern (&attr
.aspath
);
5859 bgp_attr_extra_free (&attr
);
5864 new = info_make(type
, BGP_ROUTE_REDISTRIBUTE
, instance
, bgp
->peer_self
,
5866 SET_FLAG (new->flags
, BGP_INFO_VALID
);
5868 bgp_aggregate_increment (bgp
, p
, new, afi
, SAFI_UNICAST
);
5869 bgp_info_add (bn
, new);
5870 bgp_unlock_node (bn
);
5871 bgp_process (bgp
, bn
, afi
, SAFI_UNICAST
);
5874 /* Unintern original. */
5875 aspath_unintern (&attr
.aspath
);
5876 bgp_attr_extra_free (&attr
);
5880 bgp_redistribute_delete (struct bgp
*bgp
, struct prefix
*p
, u_char type
, u_short instance
)
5883 struct bgp_node
*rn
;
5884 struct bgp_info
*ri
;
5885 struct bgp_redist
*red
;
5887 afi
= family2afi (p
->family
);
5889 red
= bgp_redist_lookup(bgp
, afi
, type
, instance
);
5892 rn
= bgp_afi_node_get (bgp
->rib
[afi
][SAFI_UNICAST
], afi
, SAFI_UNICAST
, p
, NULL
);
5894 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
5895 if (ri
->peer
== bgp
->peer_self
5896 && ri
->type
== type
)
5901 bgp_aggregate_decrement (bgp
, p
, ri
, afi
, SAFI_UNICAST
);
5902 bgp_info_delete (rn
, ri
);
5903 bgp_process (bgp
, rn
, afi
, SAFI_UNICAST
);
5905 bgp_unlock_node (rn
);
5909 /* Withdraw specified route type's route. */
5911 bgp_redistribute_withdraw (struct bgp
*bgp
, afi_t afi
, int type
, u_short instance
)
5913 struct bgp_node
*rn
;
5914 struct bgp_info
*ri
;
5915 struct bgp_table
*table
;
5917 table
= bgp
->rib
[afi
][SAFI_UNICAST
];
5919 for (rn
= bgp_table_top (table
); rn
; rn
= bgp_route_next (rn
))
5921 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
5922 if (ri
->peer
== bgp
->peer_self
5924 && ri
->instance
== instance
)
5929 bgp_aggregate_decrement (bgp
, &rn
->p
, ri
, afi
, SAFI_UNICAST
);
5930 bgp_info_delete (rn
, ri
);
5931 bgp_process (bgp
, rn
, afi
, SAFI_UNICAST
);
5936 /* Static function to display route. */
5938 route_vty_out_route (struct prefix
*p
, struct vty
*vty
)
5941 u_int32_t destination
;
5944 if (p
->family
== AF_INET
)
5946 len
= vty_out (vty
, "%s", inet_ntop (p
->family
, &p
->u
.prefix
, buf
, BUFSIZ
));
5947 destination
= ntohl (p
->u
.prefix4
.s_addr
);
5949 if ((IN_CLASSC (destination
) && p
->prefixlen
== 24)
5950 || (IN_CLASSB (destination
) && p
->prefixlen
== 16)
5951 || (IN_CLASSA (destination
) && p
->prefixlen
== 8)
5952 || p
->u
.prefix4
.s_addr
== 0)
5954 /* When mask is natural, mask is not displayed. */
5957 len
+= vty_out (vty
, "/%d", p
->prefixlen
);
5959 else if (p
->family
== AF_ETHERNET
)
5961 prefix2str(p
, buf
, PREFIX_STRLEN
);
5962 len
= vty_out (vty
, "%s", buf
);
5965 len
= vty_out (vty
, "%s/%d", inet_ntop (p
->family
, &p
->u
.prefix
, buf
, BUFSIZ
),
5970 vty_out (vty
, "%s%*s", VTY_NEWLINE
, 20, " ");
5972 vty_out (vty
, "%*s", len
, " ");
5975 enum bgp_display_type
5980 /* Print the short form route status for a bgp_info */
5982 route_vty_short_status_out (struct vty
*vty
, struct bgp_info
*binfo
,
5983 json_object
*json_path
)
5988 /* Route status display. */
5989 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_REMOVED
))
5990 json_object_boolean_true_add(json_path
, "removed");
5992 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_STALE
))
5993 json_object_boolean_true_add(json_path
, "stale");
5995 if (binfo
->extra
&& binfo
->extra
->suppress
)
5996 json_object_boolean_true_add(json_path
, "suppressed");
5998 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_VALID
) &&
5999 ! CHECK_FLAG (binfo
->flags
, BGP_INFO_HISTORY
))
6000 json_object_boolean_true_add(json_path
, "valid");
6003 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_HISTORY
))
6004 json_object_boolean_true_add(json_path
, "history");
6006 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_DAMPED
))
6007 json_object_boolean_true_add(json_path
, "damped");
6009 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_SELECTED
))
6010 json_object_boolean_true_add(json_path
, "bestpath");
6012 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_MULTIPATH
))
6013 json_object_boolean_true_add(json_path
, "multipath");
6015 /* Internal route. */
6016 if ((binfo
->peer
->as
) && (binfo
->peer
->as
== binfo
->peer
->local_as
))
6017 json_object_string_add(json_path
, "pathFrom", "internal");
6019 json_object_string_add(json_path
, "pathFrom", "external");
6024 /* Route status display. */
6025 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_REMOVED
))
6027 else if (CHECK_FLAG (binfo
->flags
, BGP_INFO_STALE
))
6029 else if (binfo
->extra
&& binfo
->extra
->suppress
)
6031 else if (CHECK_FLAG (binfo
->flags
, BGP_INFO_VALID
) &&
6032 ! CHECK_FLAG (binfo
->flags
, BGP_INFO_HISTORY
))
6038 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_HISTORY
))
6040 else if (CHECK_FLAG (binfo
->flags
, BGP_INFO_DAMPED
))
6042 else if (CHECK_FLAG (binfo
->flags
, BGP_INFO_SELECTED
))
6044 else if (CHECK_FLAG (binfo
->flags
, BGP_INFO_MULTIPATH
))
6049 /* Internal route. */
6051 (binfo
->peer
->as
) && (binfo
->peer
->as
== binfo
->peer
->local_as
))
6057 /* called from terminal list command */
6059 route_vty_out (struct vty
*vty
, struct prefix
*p
,
6060 struct bgp_info
*binfo
, int display
, safi_t safi
,
6061 json_object
*json_paths
)
6064 json_object
*json_path
= NULL
;
6065 json_object
*json_nexthops
= NULL
;
6066 json_object
*json_nexthop_global
= NULL
;
6067 json_object
*json_nexthop_ll
= NULL
;
6070 json_path
= json_object_new_object();
6072 /* short status lead text */
6073 route_vty_short_status_out (vty
, binfo
, json_path
);
6077 /* print prefix and mask */
6079 route_vty_out_route (p
, vty
);
6081 vty_out (vty
, "%*s", 17, " ");
6084 /* Print attribute */
6089 * For ENCAP routes, nexthop address family is not
6090 * neccessarily the same as the prefix address family.
6091 * Both SAFI_MPLS_VPN and SAFI_ENCAP use the MP nexthop field
6093 if ((safi
== SAFI_ENCAP
) || (safi
== SAFI_MPLS_VPN
) || (safi
= SAFI_EVPN
))
6098 int af
= NEXTHOP_FAMILY(attr
->extra
->mp_nexthop_len
);
6103 vty_out (vty
, "%s", inet_ntop(af
,
6104 &attr
->extra
->mp_nexthop_global_in
, buf
, BUFSIZ
));
6107 vty_out (vty
, "%s", inet_ntop(af
,
6108 &attr
->extra
->mp_nexthop_global
, buf
, BUFSIZ
));
6119 else if (p
->family
== AF_INET
&& !BGP_ATTR_NEXTHOP_AFI_IP6(attr
))
6123 json_nexthop_global
= json_object_new_object();
6125 if ((safi
== SAFI_MPLS_VPN
) || (safi
= SAFI_EVPN
))
6126 json_object_string_add(json_nexthop_global
, "ip", inet_ntoa (attr
->extra
->mp_nexthop_global_in
));
6128 json_object_string_add(json_nexthop_global
, "ip", inet_ntoa (attr
->nexthop
));
6130 json_object_string_add(json_nexthop_global
, "afi", "ipv4");
6131 json_object_boolean_true_add(json_nexthop_global
, "used");
6135 if ((safi
== SAFI_MPLS_VPN
) || (safi
= SAFI_EVPN
))
6136 vty_out (vty
, "%-16s",
6137 inet_ntoa (attr
->extra
->mp_nexthop_global_in
));
6139 vty_out (vty
, "%-16s", inet_ntoa (attr
->nexthop
));
6144 else if (p
->family
== AF_INET6
|| BGP_ATTR_NEXTHOP_AFI_IP6(attr
))
6151 json_nexthop_global
= json_object_new_object();
6152 json_object_string_add(json_nexthop_global
, "ip",
6153 inet_ntop (AF_INET6
,
6154 &attr
->extra
->mp_nexthop_global
,
6156 json_object_string_add(json_nexthop_global
, "afi", "ipv6");
6157 json_object_string_add(json_nexthop_global
, "scope", "global");
6159 /* We display both LL & GL if both have been received */
6160 if ((attr
->extra
->mp_nexthop_len
== 32) || (binfo
->peer
->conf_if
))
6162 json_nexthop_ll
= json_object_new_object();
6163 json_object_string_add(json_nexthop_ll
, "ip",
6164 inet_ntop (AF_INET6
,
6165 &attr
->extra
->mp_nexthop_local
,
6167 json_object_string_add(json_nexthop_ll
, "afi", "ipv6");
6168 json_object_string_add(json_nexthop_ll
, "scope", "link-local");
6170 if ((IPV6_ADDR_CMP (&attr
->extra
->mp_nexthop_global
,
6171 &attr
->extra
->mp_nexthop_local
) != 0) &&
6172 !attr
->extra
->mp_nexthop_prefer_global
)
6173 json_object_boolean_true_add(json_nexthop_ll
, "used");
6175 json_object_boolean_true_add(json_nexthop_global
, "used");
6178 json_object_boolean_true_add(json_nexthop_global
, "used");
6182 /* Display LL if LL/Global both in table unless prefer-global is set */
6183 if (((attr
->extra
->mp_nexthop_len
== 32) &&
6184 !attr
->extra
->mp_nexthop_prefer_global
) ||
6185 (binfo
->peer
->conf_if
))
6187 if (binfo
->peer
->conf_if
)
6189 len
= vty_out (vty
, "%s",
6190 binfo
->peer
->conf_if
);
6191 len
= 7 - len
; /* len of IPv6 addr + max len of def ifname */
6194 vty_out (vty
, "%s%*s", VTY_NEWLINE
, 45, " ");
6196 vty_out (vty
, "%*s", len
, " ");
6200 len
= vty_out (vty
, "%s",
6201 inet_ntop (AF_INET6
,
6202 &attr
->extra
->mp_nexthop_local
,
6207 vty_out (vty
, "%s%*s", VTY_NEWLINE
, 36, " ");
6209 vty_out (vty
, "%*s", len
, " ");
6214 len
= vty_out (vty
, "%s",
6215 inet_ntop (AF_INET6
,
6216 &attr
->extra
->mp_nexthop_global
,
6221 vty_out (vty
, "%s%*s", VTY_NEWLINE
, 36, " ");
6223 vty_out (vty
, "%*s", len
, " ");
6229 if (attr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_MULTI_EXIT_DISC
))
6231 json_object_int_add(json_path
, "med", attr
->med
);
6233 vty_out (vty
, "%10u", attr
->med
);
6239 if (attr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_LOCAL_PREF
))
6241 json_object_int_add(json_path
, "localpref", attr
->local_pref
);
6243 vty_out (vty
, "%7u", attr
->local_pref
);
6251 json_object_int_add(json_path
, "weight", attr
->extra
->weight
);
6253 json_object_int_add(json_path
, "weight", 0);
6256 vty_out (vty
, "%7u ", (attr
->extra
? attr
->extra
->weight
: 0));
6260 json_object_string_add(json_path
, "peerId", sockunion2str (&binfo
->peer
->su
, buf
, SU_ADDRSTRLEN
));
6267 json_object_string_add(json_path
, "aspath", attr
->aspath
->str
);
6269 aspath_print_vty (vty
, "%s", attr
->aspath
, " ");
6274 json_object_string_add(json_path
, "origin", bgp_origin_long_str
[attr
->origin
]);
6276 vty_out (vty
, "%s", bgp_origin_str
[attr
->origin
]);
6281 json_object_string_add(json_path
, "alert", "No attributes");
6283 vty_out (vty
, "No attributes to print%s", VTY_NEWLINE
);
6288 if (json_nexthop_global
|| json_nexthop_ll
)
6290 json_nexthops
= json_object_new_array();
6292 if (json_nexthop_global
)
6293 json_object_array_add(json_nexthops
, json_nexthop_global
);
6295 if (json_nexthop_ll
)
6296 json_object_array_add(json_nexthops
, json_nexthop_ll
);
6298 json_object_object_add(json_path
, "nexthops", json_nexthops
);
6301 json_object_array_add(json_paths
, json_path
);
6305 vty_out (vty
, "%s", VTY_NEWLINE
);
6307 /* prints an additional line, indented, with VNC info, if present */
6308 if ((safi
== SAFI_MPLS_VPN
) || (safi
== SAFI_ENCAP
))
6309 rfapi_vty_out_vncinfo(vty
, p
, binfo
, safi
);
6314 /* called from terminal list command */
6316 route_vty_out_tmp (struct vty
*vty
, struct prefix
*p
, struct attr
*attr
, safi_t safi
,
6317 u_char use_json
, json_object
*json_ar
)
6319 json_object
*json_status
= NULL
;
6320 json_object
*json_net
= NULL
;
6322 /* Route status display. */
6325 json_status
= json_object_new_object();
6326 json_net
= json_object_new_object();
6335 /* print prefix and mask */
6337 json_object_string_add(json_net
, "addrPrefix", inet_ntop (p
->family
, &p
->u
.prefix
, buff
, BUFSIZ
));
6339 route_vty_out_route (p
, vty
);
6341 /* Print attribute */
6346 if (p
->family
== AF_INET
&&
6347 (safi
== SAFI_MPLS_VPN
||
6348 safi
== SAFI_ENCAP
||
6349 safi
== SAFI_EVPN
||
6350 !BGP_ATTR_NEXTHOP_AFI_IP6(attr
)))
6352 if (safi
== SAFI_MPLS_VPN
|| safi
== SAFI_ENCAP
|| safi
== SAFI_EVPN
)
6353 json_object_string_add(json_net
, "nextHop", inet_ntoa (attr
->extra
->mp_nexthop_global_in
));
6355 json_object_string_add(json_net
, "nextHop", inet_ntoa (attr
->nexthop
));
6357 else if (p
->family
== AF_INET6
|| BGP_ATTR_NEXTHOP_AFI_IP6(attr
))
6361 json_object_string_add(json_net
, "netHopGloabal", inet_ntop (AF_INET6
, &attr
->extra
->mp_nexthop_global
,
6365 if (attr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_MULTI_EXIT_DISC
))
6366 json_object_int_add(json_net
, "metric", attr
->med
);
6368 if (attr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_LOCAL_PREF
))
6369 json_object_int_add(json_net
, "localPref", attr
->local_pref
);
6372 json_object_int_add(json_net
, "weight", attr
->extra
->weight
);
6374 json_object_int_add(json_net
, "weight", 0);
6378 json_object_string_add(json_net
, "asPath", attr
->aspath
->str
);
6381 json_object_string_add(json_net
, "bgpOriginCode", bgp_origin_str
[attr
->origin
]);
6385 if (p
->family
== AF_INET
&&
6386 (safi
== SAFI_MPLS_VPN
||
6387 safi
== SAFI_ENCAP
||
6388 safi
== SAFI_EVPN
||
6389 !BGP_ATTR_NEXTHOP_AFI_IP6(attr
)))
6391 if (safi
== SAFI_MPLS_VPN
|| safi
== SAFI_ENCAP
|| safi
== SAFI_EVPN
)
6392 vty_out (vty
, "%-16s",
6393 inet_ntoa (attr
->extra
->mp_nexthop_global_in
));
6395 vty_out (vty
, "%-16s", inet_ntoa (attr
->nexthop
));
6397 else if (p
->family
== AF_INET6
|| BGP_ATTR_NEXTHOP_AFI_IP6(attr
))
6402 assert (attr
->extra
);
6404 len
= vty_out (vty
, "%s",
6405 inet_ntop (AF_INET6
, &attr
->extra
->mp_nexthop_global
,
6409 vty_out (vty
, "%s%*s", VTY_NEWLINE
, 36, " ");
6411 vty_out (vty
, "%*s", len
, " ");
6413 if (attr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_MULTI_EXIT_DISC
))
6414 vty_out (vty
, "%10u", attr
->med
);
6418 if (attr
->flag
& ATTR_FLAG_BIT (BGP_ATTR_LOCAL_PREF
))
6419 vty_out (vty
, "%7u", attr
->local_pref
);
6423 vty_out (vty
, "%7u ", (attr
->extra
? attr
->extra
->weight
: 0));
6427 aspath_print_vty (vty
, "%s", attr
->aspath
, " ");
6430 vty_out (vty
, "%s", bgp_origin_str
[attr
->origin
]);
6435 json_object_boolean_true_add(json_status
, "*");
6436 json_object_boolean_true_add(json_status
, ">");
6437 json_object_object_add(json_net
, "appliedStatusSymbols", json_status
);
6438 char buf_cut
[BUFSIZ
];
6439 json_object_object_add(json_ar
, inet_ntop (p
->family
, &p
->u
.prefix
, buf_cut
, BUFSIZ
), json_net
);
6442 vty_out (vty
, "%s", VTY_NEWLINE
);
6446 route_vty_out_tag (struct vty
*vty
, struct prefix
*p
,
6447 struct bgp_info
*binfo
, int display
, safi_t safi
, json_object
*json
)
6449 json_object
*json_out
= NULL
;
6451 u_int32_t label
= 0;
6457 json_out
= json_object_new_object();
6459 /* short status lead text */
6460 route_vty_short_status_out (vty
, binfo
, json_out
);
6462 /* print prefix and mask */
6466 route_vty_out_route (p
, vty
);
6468 vty_out (vty
, "%*s", 17, " ");
6471 /* Print attribute */
6475 if (p
->family
== AF_INET
6476 && (safi
== SAFI_MPLS_VPN
|| !BGP_ATTR_NEXTHOP_AFI_IP6(attr
)))
6478 if (safi
== SAFI_MPLS_VPN
|| safi
== SAFI_ENCAP
|| safi
== SAFI_EVPN
)
6481 json_object_string_add(json_out
, "mpNexthopGlobalIn", inet_ntoa (attr
->extra
->mp_nexthop_global_in
));
6483 vty_out (vty
, "%-16s", inet_ntoa (attr
->extra
->mp_nexthop_global_in
));
6488 json_object_string_add(json_out
, "nexthop", inet_ntoa (attr
->nexthop
));
6490 vty_out (vty
, "%-16s", inet_ntoa (attr
->nexthop
));
6493 else if (p
->family
== AF_INET6
|| BGP_ATTR_NEXTHOP_AFI_IP6(attr
))
6495 assert (attr
->extra
);
6499 if (attr
->extra
->mp_nexthop_len
== BGP_ATTR_NHLEN_IPV6_GLOBAL
)
6502 json_object_string_add(json_out
, "mpNexthopGlobalIn",
6503 inet_ntop (AF_INET6
, &attr
->extra
->mp_nexthop_global
, buf_a
, BUFSIZ
));
6506 inet_ntop (AF_INET6
, &attr
->extra
->mp_nexthop_global
,
6509 else if (attr
->extra
->mp_nexthop_len
== BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL
)
6513 inet_ntop (AF_INET6
, &attr
->extra
->mp_nexthop_global
,
6515 inet_ntop (AF_INET6
, &attr
->extra
->mp_nexthop_local
,
6517 sprintf(buf_c
, "%s(%s)", buf_a
, buf_b
);
6518 json_object_string_add(json_out
, "mpNexthopGlobalLocal", buf_c
);
6521 vty_out (vty
, "%s(%s)",
6522 inet_ntop (AF_INET6
, &attr
->extra
->mp_nexthop_global
,
6524 inet_ntop (AF_INET6
, &attr
->extra
->mp_nexthop_local
,
6531 label
= decode_label (binfo
->extra
->tag
);
6536 json_object_int_add(json_out
, "notag", label
);
6537 json_object_array_add(json
, json_out
);
6541 vty_out (vty
, "notag/%d", label
);
6543 vty_out (vty
, "%s", VTY_NEWLINE
);
6548 route_vty_out_overlay (struct vty
*vty
, struct prefix
*p
,
6549 struct bgp_info
*binfo
, int display
, json_object
*json_paths
)
6553 json_object
*json_path
= NULL
;
6556 json_path
= json_object_new_object();
6561 /* short status lead text */
6562 route_vty_short_status_out (vty
, binfo
, json_path
);
6564 /* print prefix and mask */
6566 route_vty_out_route (p
, vty
);
6568 vty_out (vty
, "%*s", 17, " ");
6570 /* Print attribute */
6577 int af
= NEXTHOP_FAMILY(attr
->extra
->mp_nexthop_len
);
6581 vty_out (vty
, "%-16s", inet_ntop(af
,
6582 &attr
->extra
->mp_nexthop_global_in
, buf
, BUFSIZ
));
6585 vty_out (vty
, "%s(%s)",
6587 &attr
->extra
->mp_nexthop_global
, buf
, BUFSIZ
),
6589 &attr
->extra
->mp_nexthop_local
, buf1
, BUFSIZ
));
6601 struct eth_segment_id
*id
= &(attr
->extra
->evpn_overlay
.eth_s_id
);
6602 char *str
= esi2str(id
);
6603 vty_out (vty
, "%s", str
);
6605 if (p
->u
.prefix_evpn
.flags
& IP_PREFIX_V4
)
6607 vty_out (vty
, "/%s", inet_ntoa (attr
->extra
->evpn_overlay
.gw_ip
.ipv4
));
6609 else if (p
->u
.prefix_evpn
.flags
& IP_PREFIX_V6
)
6611 vty_out (vty
, "/%s",
6612 inet_ntop (AF_INET6
, &(attr
->extra
->evpn_overlay
.gw_ip
.ipv6
),
6615 if(attr
->extra
->ecommunity
)
6618 struct ecommunity_val
*routermac
= ecommunity_lookup (attr
->extra
->ecommunity
,
6619 ECOMMUNITY_ENCODE_EVPN
,
6620 ECOMMUNITY_EVPN_SUBTYPE_ROUTERMAC
);
6622 mac
= ecom_mac2str((char *)routermac
->val
);
6625 vty_out (vty
, "/%s",(char *)mac
);
6630 vty_out (vty
, "%s", VTY_NEWLINE
);
6633 /* dampening route */
6635 damp_route_vty_out (struct vty
*vty
, struct prefix
*p
, struct bgp_info
*binfo
,
6636 int display
, safi_t safi
, u_char use_json
, json_object
*json
)
6640 char timebuf
[BGP_UPTIME_LEN
];
6642 /* short status lead text */
6643 route_vty_short_status_out (vty
, binfo
, json
);
6645 /* print prefix and mask */
6649 route_vty_out_route (p
, vty
);
6651 vty_out (vty
, "%*s", 17, " ");
6654 len
= vty_out (vty
, "%s", binfo
->peer
->host
);
6659 vty_out (vty
, "%s%*s", VTY_NEWLINE
, 34, " ");
6664 json_object_int_add(json
, "peerHost", len
);
6666 vty_out (vty
, "%*s", len
, " ");
6670 bgp_damp_reuse_time_vty (vty
, binfo
, timebuf
, BGP_UPTIME_LEN
, use_json
, json
);
6672 vty_out (vty
, "%s ", bgp_damp_reuse_time_vty (vty
, binfo
, timebuf
, BGP_UPTIME_LEN
, use_json
, json
));
6674 /* Print attribute */
6682 json_object_string_add(json
, "asPath", attr
->aspath
->str
);
6684 aspath_print_vty (vty
, "%s", attr
->aspath
, " ");
6689 json_object_string_add(json
, "origin", bgp_origin_str
[attr
->origin
]);
6691 vty_out (vty
, "%s", bgp_origin_str
[attr
->origin
]);
6694 vty_out (vty
, "%s", VTY_NEWLINE
);
6699 flap_route_vty_out (struct vty
*vty
, struct prefix
*p
, struct bgp_info
*binfo
,
6700 int display
, safi_t safi
, u_char use_json
, json_object
*json
)
6703 struct bgp_damp_info
*bdi
;
6704 char timebuf
[BGP_UPTIME_LEN
];
6710 bdi
= binfo
->extra
->damp_info
;
6712 /* short status lead text */
6713 route_vty_short_status_out (vty
, binfo
, json
);
6715 /* print prefix and mask */
6719 route_vty_out_route (p
, vty
);
6721 vty_out (vty
, "%*s", 17, " ");
6724 len
= vty_out (vty
, "%s", binfo
->peer
->host
);
6729 vty_out (vty
, "%s%*s", VTY_NEWLINE
, 33, " ");
6734 json_object_int_add(json
, "peerHost", len
);
6736 vty_out (vty
, "%*s", len
, " ");
6739 len
= vty_out (vty
, "%d", bdi
->flap
);
6749 json_object_int_add(json
, "bdiFlap", len
);
6751 vty_out (vty
, "%*s", len
, " ");
6755 peer_uptime (bdi
->start_time
, timebuf
, BGP_UPTIME_LEN
, use_json
, json
);
6757 vty_out (vty
, "%s ", peer_uptime (bdi
->start_time
,
6758 timebuf
, BGP_UPTIME_LEN
, 0, NULL
));
6760 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_DAMPED
)
6761 && ! CHECK_FLAG (binfo
->flags
, BGP_INFO_HISTORY
))
6764 bgp_damp_reuse_time_vty (vty
, binfo
, timebuf
, BGP_UPTIME_LEN
, use_json
, json
);
6766 vty_out (vty
, "%s ", bgp_damp_reuse_time_vty (vty
, binfo
, timebuf
, BGP_UPTIME_LEN
, use_json
, json
));
6771 vty_out (vty
, "%*s ", 8, " ");
6774 /* Print attribute */
6782 json_object_string_add(json
, "asPath", attr
->aspath
->str
);
6784 aspath_print_vty (vty
, "%s", attr
->aspath
, " ");
6789 json_object_string_add(json
, "origin", bgp_origin_str
[attr
->origin
]);
6791 vty_out (vty
, "%s", bgp_origin_str
[attr
->origin
]);
6794 vty_out (vty
, "%s", VTY_NEWLINE
);
6798 route_vty_out_advertised_to (struct vty
*vty
, struct peer
*peer
, int *first
,
6799 const char *header
, json_object
*json_adv_to
)
6801 char buf1
[INET6_ADDRSTRLEN
];
6802 json_object
*json_peer
= NULL
;
6806 /* 'advertised-to' is a dictionary of peers we have advertised this
6807 * prefix too. The key is the peer's IP or swpX, the value is the
6808 * hostname if we know it and "" if not.
6810 json_peer
= json_object_new_object();
6813 json_object_string_add(json_peer
, "hostname", peer
->hostname
);
6816 json_object_object_add(json_adv_to
, peer
->conf_if
, json_peer
);
6818 json_object_object_add(json_adv_to
,
6819 sockunion2str (&peer
->su
, buf1
, SU_ADDRSTRLEN
),
6826 vty_out (vty
, "%s", header
);
6830 if (peer
->hostname
&& bgp_flag_check(peer
->bgp
, BGP_FLAG_SHOW_HOSTNAME
))
6833 vty_out (vty
, " %s(%s)", peer
->hostname
, peer
->conf_if
);
6835 vty_out (vty
, " %s(%s)", peer
->hostname
,
6836 sockunion2str (&peer
->su
, buf1
, SU_ADDRSTRLEN
));
6841 vty_out (vty
, " %s", peer
->conf_if
);
6843 vty_out (vty
, " %s", sockunion2str (&peer
->su
, buf1
, SU_ADDRSTRLEN
));
6849 route_vty_out_detail (struct vty
*vty
, struct bgp
*bgp
, struct prefix
*p
,
6850 struct bgp_info
*binfo
, afi_t afi
, safi_t safi
,
6851 json_object
*json_paths
)
6853 char buf
[INET6_ADDRSTRLEN
];
6856 int sockunion_vty_out (struct vty
*, union sockunion
*);
6858 json_object
*json_bestpath
= NULL
;
6859 json_object
*json_cluster_list
= NULL
;
6860 json_object
*json_cluster_list_list
= NULL
;
6861 json_object
*json_ext_community
= NULL
;
6862 json_object
*json_last_update
= NULL
;
6863 json_object
*json_nexthop_global
= NULL
;
6864 json_object
*json_nexthop_ll
= NULL
;
6865 json_object
*json_nexthops
= NULL
;
6866 json_object
*json_path
= NULL
;
6867 json_object
*json_peer
= NULL
;
6868 json_object
*json_string
= NULL
;
6869 json_object
*json_adv_to
= NULL
;
6871 struct listnode
*node
, *nnode
;
6873 int addpath_capable
;
6875 unsigned int first_as
;
6879 json_path
= json_object_new_object();
6880 json_peer
= json_object_new_object();
6881 json_nexthop_global
= json_object_new_object();
6888 /* Line1 display AS-path, Aggregator */
6893 json_object_lock(attr
->aspath
->json
);
6894 json_object_object_add(json_path
, "aspath", attr
->aspath
->json
);
6898 if (attr
->aspath
->segments
)
6899 aspath_print_vty (vty
, " %s", attr
->aspath
, "");
6901 vty_out (vty
, " Local");
6905 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_REMOVED
))
6908 json_object_boolean_true_add(json_path
, "removed");
6910 vty_out (vty
, ", (removed)");
6913 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_STALE
))
6916 json_object_boolean_true_add(json_path
, "stale");
6918 vty_out (vty
, ", (stale)");
6921 if (CHECK_FLAG (attr
->flag
, ATTR_FLAG_BIT (BGP_ATTR_AGGREGATOR
)))
6925 json_object_int_add(json_path
, "aggregatorAs", attr
->extra
->aggregator_as
);
6926 json_object_string_add(json_path
, "aggregatorId", inet_ntoa (attr
->extra
->aggregator_addr
));
6930 vty_out (vty
, ", (aggregated by %u %s)",
6931 attr
->extra
->aggregator_as
,
6932 inet_ntoa (attr
->extra
->aggregator_addr
));
6936 if (CHECK_FLAG (binfo
->peer
->af_flags
[afi
][safi
], PEER_FLAG_REFLECTOR_CLIENT
))
6939 json_object_boolean_true_add(json_path
, "rxedFromRrClient");
6941 vty_out (vty
, ", (Received from a RR-client)");
6944 if (CHECK_FLAG (binfo
->peer
->af_flags
[afi
][safi
], PEER_FLAG_RSERVER_CLIENT
))
6947 json_object_boolean_true_add(json_path
, "rxedFromRsClient");
6949 vty_out (vty
, ", (Received from a RS-client)");
6952 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_HISTORY
))
6955 json_object_boolean_true_add(json_path
, "dampeningHistoryEntry");
6957 vty_out (vty
, ", (history entry)");
6959 else if (CHECK_FLAG (binfo
->flags
, BGP_INFO_DAMPED
))
6962 json_object_boolean_true_add(json_path
, "dampeningSuppressed");
6964 vty_out (vty
, ", (suppressed due to dampening)");
6968 vty_out (vty
, "%s", VTY_NEWLINE
);
6970 /* Line2 display Next-hop, Neighbor, Router-id */
6971 /* Display the nexthop */
6972 if (p
->family
== AF_INET
&&
6973 (safi
== SAFI_MPLS_VPN
||
6974 safi
== SAFI_ENCAP
||
6975 safi
== SAFI_EVPN
||
6976 !BGP_ATTR_NEXTHOP_AFI_IP6(attr
)))
6978 if (safi
== SAFI_MPLS_VPN
|| safi
== SAFI_ENCAP
|| safi
== SAFI_EVPN
)
6981 json_object_string_add(json_nexthop_global
, "ip", inet_ntoa (attr
->extra
->mp_nexthop_global_in
));
6983 vty_out (vty
, " %s", inet_ntoa (attr
->extra
->mp_nexthop_global_in
));
6988 json_object_string_add(json_nexthop_global
, "ip", inet_ntoa (attr
->nexthop
));
6990 vty_out (vty
, " %s", inet_ntoa (attr
->nexthop
));
6994 json_object_string_add(json_nexthop_global
, "afi", "ipv4");
6998 assert (attr
->extra
);
7001 json_object_string_add(json_nexthop_global
, "ip",
7002 inet_ntop (AF_INET6
, &attr
->extra
->mp_nexthop_global
,
7003 buf
, INET6_ADDRSTRLEN
));
7004 json_object_string_add(json_nexthop_global
, "afi", "ipv6");
7005 json_object_string_add(json_nexthop_global
, "scope", "global");
7009 vty_out (vty
, " %s",
7010 inet_ntop (AF_INET6
, &attr
->extra
->mp_nexthop_global
,
7011 buf
, INET6_ADDRSTRLEN
));
7015 /* Display the IGP cost or 'inaccessible' */
7016 if (! CHECK_FLAG (binfo
->flags
, BGP_INFO_VALID
))
7019 json_object_boolean_false_add(json_nexthop_global
, "accessible");
7021 vty_out (vty
, " (inaccessible)");
7025 if (binfo
->extra
&& binfo
->extra
->igpmetric
)
7028 json_object_int_add(json_nexthop_global
, "metric", binfo
->extra
->igpmetric
);
7030 vty_out (vty
, " (metric %u)", binfo
->extra
->igpmetric
);
7033 /* IGP cost is 0, display this only for json */
7037 json_object_int_add(json_nexthop_global
, "metric", 0);
7041 json_object_boolean_true_add(json_nexthop_global
, "accessible");
7044 /* Display peer "from" output */
7045 /* This path was originated locally */
7046 if (binfo
->peer
== bgp
->peer_self
)
7049 if (p
->family
== AF_INET
&& !BGP_ATTR_NEXTHOP_AFI_IP6(attr
))
7052 json_object_string_add(json_peer
, "peerId", "0.0.0.0");
7054 vty_out (vty
, " from 0.0.0.0 ");
7059 json_object_string_add(json_peer
, "peerId", "::");
7061 vty_out (vty
, " from :: ");
7065 json_object_string_add(json_peer
, "routerId", inet_ntoa(bgp
->router_id
));
7067 vty_out (vty
, "(%s)", inet_ntoa(bgp
->router_id
));
7070 /* We RXed this path from one of our peers */
7076 json_object_string_add(json_peer
, "peerId", sockunion2str (&binfo
->peer
->su
, buf
, SU_ADDRSTRLEN
));
7077 json_object_string_add(json_peer
, "routerId", inet_ntop (AF_INET
, &binfo
->peer
->remote_id
, buf1
, BUFSIZ
));
7079 if (binfo
->peer
->hostname
)
7080 json_object_string_add(json_peer
, "hostname", binfo
->peer
->hostname
);
7082 if (binfo
->peer
->domainname
)
7083 json_object_string_add(json_peer
, "domainname", binfo
->peer
->domainname
);
7085 if (binfo
->peer
->conf_if
)
7086 json_object_string_add(json_peer
, "interface", binfo
->peer
->conf_if
);
7090 if (binfo
->peer
->conf_if
)
7092 if (binfo
->peer
->hostname
&&
7093 bgp_flag_check(binfo
->peer
->bgp
, BGP_FLAG_SHOW_HOSTNAME
))
7094 vty_out (vty
, " from %s(%s)", binfo
->peer
->hostname
,
7095 binfo
->peer
->conf_if
);
7097 vty_out (vty
, " from %s", binfo
->peer
->conf_if
);
7101 if (binfo
->peer
->hostname
&&
7102 bgp_flag_check(binfo
->peer
->bgp
, BGP_FLAG_SHOW_HOSTNAME
))
7103 vty_out (vty
, " from %s(%s)", binfo
->peer
->hostname
,
7106 vty_out (vty
, " from %s", sockunion2str (&binfo
->peer
->su
, buf
, SU_ADDRSTRLEN
));
7109 if (attr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID
))
7110 vty_out (vty
, " (%s)", inet_ntoa (attr
->extra
->originator_id
));
7112 vty_out (vty
, " (%s)", inet_ntop (AF_INET
, &binfo
->peer
->remote_id
, buf1
, BUFSIZ
));
7117 vty_out (vty
, "%s", VTY_NEWLINE
);
7119 /* display the link-local nexthop */
7120 if (attr
->extra
&& attr
->extra
->mp_nexthop_len
== BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL
)
7124 json_nexthop_ll
= json_object_new_object();
7125 json_object_string_add(json_nexthop_ll
, "ip",
7126 inet_ntop (AF_INET6
, &attr
->extra
->mp_nexthop_local
,
7127 buf
, INET6_ADDRSTRLEN
));
7128 json_object_string_add(json_nexthop_ll
, "afi", "ipv6");
7129 json_object_string_add(json_nexthop_ll
, "scope", "link-local");
7131 json_object_boolean_true_add(json_nexthop_ll
, "accessible");
7133 if (!attr
->extra
->mp_nexthop_prefer_global
)
7134 json_object_boolean_true_add(json_nexthop_ll
, "used");
7136 json_object_boolean_true_add(json_nexthop_global
, "used");
7140 vty_out (vty
, " (%s) %s%s",
7141 inet_ntop (AF_INET6
, &attr
->extra
->mp_nexthop_local
,
7142 buf
, INET6_ADDRSTRLEN
),
7143 attr
->extra
->mp_nexthop_prefer_global
?
7144 "(prefer-global)" : "(used)",
7148 /* If we do not have a link-local nexthop then we must flag the global as "used" */
7152 json_object_boolean_true_add(json_nexthop_global
, "used");
7155 /* Line 3 display Origin, Med, Locpref, Weight, Tag, valid, Int/Ext/Local, Atomic, best */
7157 json_object_string_add(json_path
, "origin", bgp_origin_long_str
[attr
->origin
]);
7159 vty_out (vty
, " Origin %s", bgp_origin_long_str
[attr
->origin
]);
7161 if (attr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC
))
7164 json_object_int_add(json_path
, "med", attr
->med
);
7166 vty_out (vty
, ", metric %u", attr
->med
);
7169 if (attr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF
))
7172 json_object_int_add(json_path
, "localpref", attr
->local_pref
);
7174 vty_out (vty
, ", localpref %u", attr
->local_pref
);
7179 json_object_int_add(json_path
, "localpref", bgp
->default_local_pref
);
7181 vty_out (vty
, ", localpref %u", bgp
->default_local_pref
);
7184 if (attr
->extra
&& attr
->extra
->weight
!= 0)
7187 json_object_int_add(json_path
, "weight", attr
->extra
->weight
);
7189 vty_out (vty
, ", weight %u", attr
->extra
->weight
);
7192 if (attr
->extra
&& attr
->extra
->tag
!= 0)
7195 json_object_int_add(json_path
, "tag", attr
->extra
->tag
);
7197 vty_out (vty
, ", tag %"ROUTE_TAG_PRI
, attr
->extra
->tag
);
7200 if (! CHECK_FLAG (binfo
->flags
, BGP_INFO_VALID
))
7203 json_object_boolean_false_add(json_path
, "valid");
7205 vty_out (vty
, ", invalid");
7207 else if (! CHECK_FLAG (binfo
->flags
, BGP_INFO_HISTORY
))
7210 json_object_boolean_true_add(json_path
, "valid");
7212 vty_out (vty
, ", valid");
7215 if (binfo
->peer
!= bgp
->peer_self
)
7217 if (binfo
->peer
->as
== binfo
->peer
->local_as
)
7219 if (CHECK_FLAG(bgp
->config
, BGP_CONFIG_CONFEDERATION
))
7222 json_object_string_add(json_peer
, "type", "confed-internal");
7224 vty_out (vty
, ", confed-internal");
7229 json_object_string_add(json_peer
, "type", "internal");
7231 vty_out (vty
, ", internal");
7236 if (bgp_confederation_peers_check(bgp
, binfo
->peer
->as
))
7239 json_object_string_add(json_peer
, "type", "confed-external");
7241 vty_out (vty
, ", confed-external");
7246 json_object_string_add(json_peer
, "type", "external");
7248 vty_out (vty
, ", external");
7252 else if (binfo
->sub_type
== BGP_ROUTE_AGGREGATE
)
7256 json_object_boolean_true_add(json_path
, "aggregated");
7257 json_object_boolean_true_add(json_path
, "local");
7261 vty_out (vty
, ", aggregated, local");
7264 else if (binfo
->type
!= ZEBRA_ROUTE_BGP
)
7267 json_object_boolean_true_add(json_path
, "sourced");
7269 vty_out (vty
, ", sourced");
7275 json_object_boolean_true_add(json_path
, "sourced");
7276 json_object_boolean_true_add(json_path
, "local");
7280 vty_out (vty
, ", sourced, local");
7284 if (attr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_ATOMIC_AGGREGATE
))
7287 json_object_boolean_true_add(json_path
, "atomicAggregate");
7289 vty_out (vty
, ", atomic-aggregate");
7292 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_MULTIPATH
) ||
7293 (CHECK_FLAG (binfo
->flags
, BGP_INFO_SELECTED
) &&
7294 bgp_info_mpath_count (binfo
)))
7297 json_object_boolean_true_add(json_path
, "multipath");
7299 vty_out (vty
, ", multipath");
7302 // Mark the bestpath(s)
7303 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_DMED_SELECTED
))
7305 first_as
= aspath_get_first_as(attr
->aspath
);
7310 json_bestpath
= json_object_new_object();
7311 json_object_int_add(json_bestpath
, "bestpathFromAs", first_as
);
7316 vty_out (vty
, ", bestpath-from-AS %d", first_as
);
7318 vty_out (vty
, ", bestpath-from-AS Local");
7322 if (CHECK_FLAG (binfo
->flags
, BGP_INFO_SELECTED
))
7327 json_bestpath
= json_object_new_object();
7328 json_object_boolean_true_add(json_bestpath
, "overall");
7331 vty_out (vty
, ", best");
7335 json_object_object_add(json_path
, "bestpath", json_bestpath
);
7338 vty_out (vty
, "%s", VTY_NEWLINE
);
7340 /* Line 4 display Community */
7341 if (attr
->community
)
7345 json_object_lock(attr
->community
->json
);
7346 json_object_object_add(json_path
, "community", attr
->community
->json
);
7350 vty_out (vty
, " Community: %s%s", attr
->community
->str
,
7355 /* Line 5 display Extended-community */
7356 if (attr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_EXT_COMMUNITIES
))
7360 json_ext_community
= json_object_new_object();
7361 json_object_string_add(json_ext_community
, "string", attr
->extra
->ecommunity
->str
);
7362 json_object_object_add(json_path
, "extendedCommunity", json_ext_community
);
7366 vty_out (vty
, " Extended Community: %s%s",
7367 attr
->extra
->ecommunity
->str
, VTY_NEWLINE
);
7371 /* Line 6 display Large community */
7372 if (attr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_LARGE_COMMUNITIES
))
7373 vty_out (vty
, " Large Community: %s%s",
7374 attr
->extra
->lcommunity
->str
, VTY_NEWLINE
);
7376 /* Line 7 display Originator, Cluster-id */
7377 if ((attr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID
)) ||
7378 (attr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_CLUSTER_LIST
)))
7380 assert (attr
->extra
);
7381 if (attr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID
))
7384 json_object_string_add(json_path
, "originatorId", inet_ntoa (attr
->extra
->originator_id
));
7386 vty_out (vty
, " Originator: %s",
7387 inet_ntoa (attr
->extra
->originator_id
));
7390 if (attr
->flag
& ATTR_FLAG_BIT(BGP_ATTR_CLUSTER_LIST
))
7396 json_cluster_list
= json_object_new_object();
7397 json_cluster_list_list
= json_object_new_array();
7399 for (i
= 0; i
< attr
->extra
->cluster
->length
/ 4; i
++)
7401 json_string
= json_object_new_string(inet_ntoa (attr
->extra
->cluster
->list
[i
]));
7402 json_object_array_add(json_cluster_list_list
, json_string
);
7405 /* struct cluster_list does not have "str" variable like
7406 * aspath and community do. Add this someday if someone
7408 json_object_string_add(json_cluster_list, "string", attr->extra->cluster->str);
7410 json_object_object_add(json_cluster_list
, "list", json_cluster_list_list
);
7411 json_object_object_add(json_path
, "clusterList", json_cluster_list
);
7415 vty_out (vty
, ", Cluster list: ");
7417 for (i
= 0; i
< attr
->extra
->cluster
->length
/ 4; i
++)
7419 vty_out (vty
, "%s ",
7420 inet_ntoa (attr
->extra
->cluster
->list
[i
]));
7426 vty_out (vty
, "%s", VTY_NEWLINE
);
7429 if (binfo
->extra
&& binfo
->extra
->damp_info
)
7430 bgp_damp_info_vty (vty
, binfo
, json_path
);
7432 /* Line 8 display Addpath IDs */
7433 if (binfo
->addpath_rx_id
|| binfo
->addpath_tx_id
)
7437 json_object_int_add(json_path
, "addpathRxId", binfo
->addpath_rx_id
);
7438 json_object_int_add(json_path
, "addpathTxId", binfo
->addpath_tx_id
);
7442 vty_out (vty
, " AddPath ID: RX %u, TX %u%s",
7443 binfo
->addpath_rx_id
, binfo
->addpath_tx_id
,
7448 /* If we used addpath to TX a non-bestpath we need to display
7449 * "Advertised to" on a path-by-path basis */
7450 if (bgp
->addpath_tx_used
[afi
][safi
])
7454 for (ALL_LIST_ELEMENTS (bgp
->peer
, node
, nnode
, peer
))
7456 addpath_capable
= bgp_addpath_encode_tx (peer
, afi
, safi
);
7457 has_adj
= bgp_adj_out_lookup (peer
, binfo
->net
, binfo
->addpath_tx_id
);
7459 if ((addpath_capable
&& has_adj
) ||
7460 (!addpath_capable
&& has_adj
&& CHECK_FLAG (binfo
->flags
, BGP_INFO_SELECTED
)))
7462 if (json_path
&& !json_adv_to
)
7463 json_adv_to
= json_object_new_object();
7465 route_vty_out_advertised_to(vty
, peer
, &first
,
7475 json_object_object_add(json_path
, "advertisedTo", json_adv_to
);
7482 vty_out (vty
, "%s", VTY_NEWLINE
);
7487 /* Line 9 display Uptime */
7488 tbuf
= time(NULL
) - (bgp_clock() - binfo
->uptime
);
7491 json_last_update
= json_object_new_object();
7492 json_object_int_add(json_last_update
, "epoch", tbuf
);
7493 json_object_string_add(json_last_update
, "string", ctime(&tbuf
));
7494 json_object_object_add(json_path
, "lastUpdate", json_last_update
);
7497 vty_out (vty
, " Last update: %s", ctime(&tbuf
));
7500 /* We've constructed the json object for this path, add it to the json
7505 if (json_nexthop_global
|| json_nexthop_ll
)
7507 json_nexthops
= json_object_new_array();
7509 if (json_nexthop_global
)
7510 json_object_array_add(json_nexthops
, json_nexthop_global
);
7512 if (json_nexthop_ll
)
7513 json_object_array_add(json_nexthops
, json_nexthop_ll
);
7515 json_object_object_add(json_path
, "nexthops", json_nexthops
);
7518 json_object_object_add(json_path
, "peer", json_peer
);
7519 json_object_array_add(json_paths
, json_path
);
7522 vty_out (vty
, "%s", VTY_NEWLINE
);
7525 #define BGP_SHOW_HEADER_CSV "Flags, Network, Next Hop, Metric, LocPrf, Weight, Path%s"
7526 #define BGP_SHOW_DAMP_HEADER " Network From Reuse Path%s"
7527 #define BGP_SHOW_FLAP_HEADER " Network From Flaps Duration Reuse Path%s"
7530 bgp_show_prefix_list (struct vty
*vty
, struct bgp
*bgp
,
7531 const char *prefix_list_str
, afi_t afi
,
7532 safi_t safi
, enum bgp_show_type type
);
7534 bgp_show_filter_list (struct vty
*vty
, struct bgp
*bgp
,
7535 const char *filter
, afi_t afi
,
7536 safi_t safi
, enum bgp_show_type type
);
7538 bgp_show_route_map (struct vty
*vty
, struct bgp
*bgp
,
7539 const char *rmap_str
, afi_t afi
,
7540 safi_t safi
, enum bgp_show_type type
);
7542 bgp_show_community_list (struct vty
*vty
, struct bgp
*bgp
,
7543 const char *com
, int exact
,
7544 afi_t afi
, safi_t safi
);
7546 bgp_show_prefix_longer (struct vty
*vty
, struct bgp
*bgp
,
7547 const char *prefix
, afi_t afi
,
7548 safi_t safi
, enum bgp_show_type type
);
7550 bgp_show_regexp (struct vty
*vty
, const char *regstr
, afi_t afi
,
7551 safi_t safi
, enum bgp_show_type type
);
7553 bgp_show_community (struct vty
*vty
, struct bgp
*bgp
, int argc
,
7554 struct cmd_token
**argv
, int exact
, afi_t afi
, safi_t safi
);
7557 bgp_show_table (struct vty
*vty
, struct bgp
*bgp
, struct bgp_table
*table
,
7558 enum bgp_show_type type
, void *output_arg
, u_char use_json
)
7560 struct bgp_info
*ri
;
7561 struct bgp_node
*rn
;
7564 unsigned long output_count
;
7565 unsigned long total_count
;
7569 json_object
*json_paths
= NULL
;
7574 vty_out (vty
, "{ \"vrfId\": %d, \"vrfName\": \"%s\", \"tableVersion\": %" PRId64
", \"routerId\": \"%s\", \"routes\": { ",
7575 bgp
->vrf_id
== VRF_UNKNOWN
? -1 : bgp
->vrf_id
,
7576 bgp
->inst_type
== BGP_INSTANCE_TYPE_DEFAULT
? "Default" : bgp
->name
,
7577 table
->version
, inet_ntoa (bgp
->router_id
));
7578 json_paths
= json_object_new_object();
7581 /* This is first entry point, so reset total line. */
7585 /* Start processing of routes. */
7586 for (rn
= bgp_table_top (table
); rn
; rn
= bgp_route_next (rn
))
7587 if (rn
->info
!= NULL
)
7590 if (!first
&& use_json
)
7595 json_paths
= json_object_new_array();
7599 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
7602 if (type
== bgp_show_type_flap_statistics
7603 || type
== bgp_show_type_flap_neighbor
7604 || type
== bgp_show_type_dampend_paths
7605 || type
== bgp_show_type_damp_neighbor
)
7607 if (!(ri
->extra
&& ri
->extra
->damp_info
))
7610 if (type
== bgp_show_type_regexp
)
7612 regex_t
*regex
= output_arg
;
7614 if (bgp_regexec (regex
, ri
->attr
->aspath
) == REG_NOMATCH
)
7617 if (type
== bgp_show_type_prefix_list
)
7619 struct prefix_list
*plist
= output_arg
;
7621 if (prefix_list_apply (plist
, &rn
->p
) != PREFIX_PERMIT
)
7624 if (type
== bgp_show_type_filter_list
)
7626 struct as_list
*as_list
= output_arg
;
7628 if (as_list_apply (as_list
, ri
->attr
->aspath
) != AS_FILTER_PERMIT
)
7631 if (type
== bgp_show_type_route_map
)
7633 struct route_map
*rmap
= output_arg
;
7634 struct bgp_info binfo
;
7635 struct attr dummy_attr
;
7636 struct attr_extra dummy_extra
;
7639 dummy_attr
.extra
= &dummy_extra
;
7640 bgp_attr_dup (&dummy_attr
, ri
->attr
);
7642 binfo
.peer
= ri
->peer
;
7643 binfo
.attr
= &dummy_attr
;
7645 ret
= route_map_apply (rmap
, &rn
->p
, RMAP_BGP
, &binfo
);
7646 if (ret
== RMAP_DENYMATCH
)
7649 if (type
== bgp_show_type_neighbor
7650 || type
== bgp_show_type_flap_neighbor
7651 || type
== bgp_show_type_damp_neighbor
)
7653 union sockunion
*su
= output_arg
;
7655 if (ri
->peer
== NULL
||
7656 ri
->peer
->su_remote
== NULL
|| ! sockunion_same(ri
->peer
->su_remote
, su
))
7659 if (type
== bgp_show_type_cidr_only
)
7661 u_int32_t destination
;
7663 destination
= ntohl (rn
->p
.u
.prefix4
.s_addr
);
7664 if (IN_CLASSC (destination
) && rn
->p
.prefixlen
== 24)
7666 if (IN_CLASSB (destination
) && rn
->p
.prefixlen
== 16)
7668 if (IN_CLASSA (destination
) && rn
->p
.prefixlen
== 8)
7671 if (type
== bgp_show_type_prefix_longer
)
7673 struct prefix
*p
= output_arg
;
7675 if (! prefix_match (p
, &rn
->p
))
7678 if (type
== bgp_show_type_community_all
)
7680 if (! ri
->attr
->community
)
7683 if (type
== bgp_show_type_community
)
7685 struct community
*com
= output_arg
;
7687 if (! ri
->attr
->community
||
7688 ! community_match (ri
->attr
->community
, com
))
7691 if (type
== bgp_show_type_community_exact
)
7693 struct community
*com
= output_arg
;
7695 if (! ri
->attr
->community
||
7696 ! community_cmp (ri
->attr
->community
, com
))
7699 if (type
== bgp_show_type_community_list
)
7701 struct community_list
*list
= output_arg
;
7703 if (! community_list_match (ri
->attr
->community
, list
))
7706 if (type
== bgp_show_type_community_list_exact
)
7708 struct community_list
*list
= output_arg
;
7710 if (! community_list_exact_match (ri
->attr
->community
, list
))
7713 if (type
== bgp_show_type_lcommunity
)
7715 struct lcommunity
*lcom
= output_arg
;
7717 if (! ri
->attr
->extra
|| ! ri
->attr
->extra
->lcommunity
||
7718 ! lcommunity_match (ri
->attr
->extra
->lcommunity
, lcom
))
7721 if (type
== bgp_show_type_lcommunity_list
)
7723 struct community_list
*list
= output_arg
;
7725 if (! ri
->attr
->extra
||
7726 ! lcommunity_list_match (ri
->attr
->extra
->lcommunity
, list
))
7729 if (type
== bgp_show_type_lcommunity_all
)
7731 if (! ri
->attr
->extra
|| ! ri
->attr
->extra
->lcommunity
)
7734 if (type
== bgp_show_type_dampend_paths
7735 || type
== bgp_show_type_damp_neighbor
)
7737 if (! CHECK_FLAG (ri
->flags
, BGP_INFO_DAMPED
)
7738 || CHECK_FLAG (ri
->flags
, BGP_INFO_HISTORY
))
7742 if (!use_json
&& header
)
7744 vty_out (vty
, "BGP table version is %" PRIu64
", local router ID is %s%s", table
->version
, inet_ntoa (bgp
->router_id
), VTY_NEWLINE
);
7745 vty_out (vty
, BGP_SHOW_SCODE_HEADER
, VTY_NEWLINE
, VTY_NEWLINE
);
7746 vty_out (vty
, BGP_SHOW_OCODE_HEADER
, VTY_NEWLINE
, VTY_NEWLINE
);
7747 if (type
== bgp_show_type_dampend_paths
7748 || type
== bgp_show_type_damp_neighbor
)
7749 vty_out (vty
, BGP_SHOW_DAMP_HEADER
, VTY_NEWLINE
);
7750 else if (type
== bgp_show_type_flap_statistics
7751 || type
== bgp_show_type_flap_neighbor
)
7752 vty_out (vty
, BGP_SHOW_FLAP_HEADER
, VTY_NEWLINE
);
7754 vty_out (vty
, BGP_SHOW_HEADER
, VTY_NEWLINE
);
7758 if (type
== bgp_show_type_dampend_paths
7759 || type
== bgp_show_type_damp_neighbor
)
7760 damp_route_vty_out (vty
, &rn
->p
, ri
, display
, SAFI_UNICAST
, use_json
, json_paths
);
7761 else if (type
== bgp_show_type_flap_statistics
7762 || type
== bgp_show_type_flap_neighbor
)
7763 flap_route_vty_out (vty
, &rn
->p
, ri
, display
, SAFI_UNICAST
, use_json
, json_paths
);
7765 route_vty_out (vty
, &rn
->p
, ri
, display
, SAFI_UNICAST
, json_paths
);
7775 sprintf(buf2
, "%s/%d", inet_ntop (p
->family
, &p
->u
.prefix
, buf
, BUFSIZ
), p
->prefixlen
);
7776 vty_out (vty
, "\"%s\": ", buf2
);
7777 vty_out (vty
, "%s", json_object_to_json_string (json_paths
));
7778 json_object_free (json_paths
);
7787 json_object_free (json_paths
);
7788 vty_out (vty
, " } }%s", VTY_NEWLINE
);
7792 /* No route is displayed */
7793 if (output_count
== 0)
7795 if (type
== bgp_show_type_normal
)
7796 vty_out (vty
, "No BGP prefixes displayed, %ld exist%s", total_count
, VTY_NEWLINE
);
7799 vty_out (vty
, "%sDisplayed %ld routes and %ld total paths%s",
7800 VTY_NEWLINE
, output_count
, total_count
, VTY_NEWLINE
);
7807 bgp_show (struct vty
*vty
, struct bgp
*bgp
, afi_t afi
, safi_t safi
,
7808 enum bgp_show_type type
, void *output_arg
, u_char use_json
)
7810 struct bgp_table
*table
;
7814 bgp
= bgp_get_default ();
7820 vty_out (vty
, "No BGP process is configured%s", VTY_NEWLINE
);
7823 /* use MPLS and ENCAP specific shows until they are merged */
7824 if (safi
== SAFI_MPLS_VPN
)
7826 return bgp_show_mpls_vpn(vty
, afi
, NULL
, type
, output_arg
,
7829 if (safi
== SAFI_ENCAP
)
7831 return bgp_show_encap(vty
, afi
, NULL
, type
, output_arg
,
7836 table
= bgp
->rib
[afi
][safi
];
7838 return bgp_show_table (vty
, bgp
, table
, type
, output_arg
,
7843 bgp_show_all_instances_routes_vty (struct vty
*vty
, afi_t afi
, safi_t safi
,
7846 struct listnode
*node
, *nnode
;
7848 struct bgp_table
*table
;
7852 vty_out (vty
, "{%s", VTY_NEWLINE
);
7854 for (ALL_LIST_ELEMENTS (bm
->bgp
, node
, nnode
, bgp
))
7859 vty_out (vty
, ",%s", VTY_NEWLINE
);
7863 vty_out(vty
, "\"%s\":", (bgp
->inst_type
== BGP_INSTANCE_TYPE_DEFAULT
)
7864 ? "Default" : bgp
->name
);
7868 vty_out (vty
, "%sInstance %s:%s",
7870 (bgp
->inst_type
== BGP_INSTANCE_TYPE_DEFAULT
)
7871 ? "Default" : bgp
->name
,
7874 table
= bgp
->rib
[afi
][safi
];
7875 bgp_show_table (vty
, bgp
, table
,
7876 bgp_show_type_normal
, NULL
, use_json
);
7881 vty_out (vty
, "}%s", VTY_NEWLINE
);
7884 /* Header of detailed BGP route information */
7886 route_vty_out_detail_header (struct vty
*vty
, struct bgp
*bgp
,
7887 struct bgp_node
*rn
,
7888 struct prefix_rd
*prd
, afi_t afi
, safi_t safi
,
7891 struct bgp_info
*ri
;
7894 struct listnode
*node
, *nnode
;
7895 char buf1
[INET6_ADDRSTRLEN
];
7896 char buf2
[INET6_ADDRSTRLEN
];
7901 int no_advertise
= 0;
7904 json_object
*json_adv_to
= NULL
;
7910 json_object_string_add(json
, "prefix", inet_ntop (p
->family
, &p
->u
.prefix
, buf2
, INET6_ADDRSTRLEN
));
7911 json_object_int_add(json
, "prefixlen", p
->prefixlen
);
7915 if (p
->family
== AF_ETHERNET
)
7916 prefix2str (p
, buf2
, INET6_ADDRSTRLEN
);
7918 inet_ntop (p
->family
, &p
->u
.prefix
, buf2
, INET6_ADDRSTRLEN
);
7919 vty_out (vty
, "BGP routing table entry for %s%s%s/%d%s",
7920 ((safi
== SAFI_MPLS_VPN
|| safi
== SAFI_ENCAP
|| safi
== SAFI_EVPN
) ?
7921 prefix_rd2str (prd
, buf1
, RD_ADDRSTRLEN
) : ""),
7922 ((safi
== SAFI_MPLS_VPN
) || (safi
== SAFI_EVPN
)) ? ":" : "",
7924 p
->prefixlen
, VTY_NEWLINE
);
7927 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
7930 if (CHECK_FLAG (ri
->flags
, BGP_INFO_SELECTED
))
7933 if (ri
->extra
&& ri
->extra
->suppress
)
7935 if (ri
->attr
->community
!= NULL
)
7937 if (community_include (ri
->attr
->community
, COMMUNITY_NO_ADVERTISE
))
7939 if (community_include (ri
->attr
->community
, COMMUNITY_NO_EXPORT
))
7941 if (community_include (ri
->attr
->community
, COMMUNITY_LOCAL_AS
))
7949 vty_out (vty
, "Paths: (%d available", count
);
7952 vty_out (vty
, ", best #%d", best
);
7953 if (safi
== SAFI_UNICAST
)
7954 vty_out (vty
, ", table %s",
7955 (bgp
->inst_type
== BGP_INSTANCE_TYPE_DEFAULT
)
7956 ? "Default-IP-Routing-Table" : bgp
->name
);
7959 vty_out (vty
, ", no best path");
7962 vty_out (vty
, ", not advertised to any peer");
7964 vty_out (vty
, ", not advertised to EBGP peer");
7966 vty_out (vty
, ", not advertised outside local AS");
7969 vty_out (vty
, ", Advertisements suppressed by an aggregate.");
7970 vty_out (vty
, ")%s", VTY_NEWLINE
);
7973 /* If we are not using addpath then we can display Advertised to and that will
7974 * show what peers we advertised the bestpath to. If we are using addpath
7975 * though then we must display Advertised to on a path-by-path basis. */
7976 if (!bgp
->addpath_tx_used
[afi
][safi
])
7978 for (ALL_LIST_ELEMENTS (bgp
->peer
, node
, nnode
, peer
))
7980 if (bgp_adj_out_lookup (peer
, rn
, 0))
7982 if (json
&& !json_adv_to
)
7983 json_adv_to
= json_object_new_object();
7985 route_vty_out_advertised_to(vty
, peer
, &first
,
7986 " Advertised to non peer-group peers:\n ",
7995 json_object_object_add(json
, "advertisedTo", json_adv_to
);
8001 vty_out (vty
, " Not advertised to any peer");
8002 vty_out (vty
, "%s", VTY_NEWLINE
);
8007 /* Display specified route of BGP table. */
8009 bgp_show_route_in_table (struct vty
*vty
, struct bgp
*bgp
,
8010 struct bgp_table
*rib
, const char *ip_str
,
8011 afi_t afi
, safi_t safi
, struct prefix_rd
*prd
,
8012 int prefix_check
, enum bgp_path_type pathtype
,
8018 struct prefix match
;
8019 struct bgp_node
*rn
;
8020 struct bgp_node
*rm
;
8021 struct bgp_info
*ri
;
8022 struct bgp_table
*table
;
8023 json_object
*json
= NULL
;
8024 json_object
*json_paths
= NULL
;
8026 /* Check IP address argument. */
8027 ret
= str2prefix (ip_str
, &match
);
8030 vty_out (vty
, "address is malformed%s", VTY_NEWLINE
);
8034 match
.family
= afi2family (afi
);
8038 json
= json_object_new_object();
8039 json_paths
= json_object_new_array();
8042 if (safi
== SAFI_MPLS_VPN
|| safi
== SAFI_ENCAP
|| safi
== SAFI_EVPN
)
8044 for (rn
= bgp_table_top (rib
); rn
; rn
= bgp_route_next (rn
))
8046 if (prd
&& memcmp (rn
->p
.u
.val
, prd
->val
, 8) != 0)
8049 if ((table
= rn
->info
) != NULL
)
8053 if ((rm
= bgp_node_match (table
, &match
)) != NULL
)
8055 if (prefix_check
&& rm
->p
.prefixlen
!= match
.prefixlen
)
8057 bgp_unlock_node (rm
);
8061 for (ri
= rm
->info
; ri
; ri
= ri
->next
)
8065 route_vty_out_detail_header (vty
, bgp
, rm
, (struct prefix_rd
*)&rn
->p
,
8066 AFI_IP
, safi
, json
);
8071 if (pathtype
== BGP_PATH_ALL
||
8072 (pathtype
== BGP_PATH_BESTPATH
&& CHECK_FLAG (ri
->flags
, BGP_INFO_SELECTED
)) ||
8073 (pathtype
== BGP_PATH_MULTIPATH
&&
8074 (CHECK_FLAG (ri
->flags
, BGP_INFO_MULTIPATH
) || CHECK_FLAG (ri
->flags
, BGP_INFO_SELECTED
))))
8075 route_vty_out_detail (vty
, bgp
, &rm
->p
, ri
, AFI_IP
, safi
, json_paths
);
8078 bgp_unlock_node (rm
);
8087 if ((rn
= bgp_node_match (rib
, &match
)) != NULL
)
8089 if (! prefix_check
|| rn
->p
.prefixlen
== match
.prefixlen
)
8091 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
8095 route_vty_out_detail_header (vty
, bgp
, rn
, NULL
, afi
, safi
, json
);
8100 if (pathtype
== BGP_PATH_ALL
||
8101 (pathtype
== BGP_PATH_BESTPATH
&& CHECK_FLAG (ri
->flags
, BGP_INFO_SELECTED
)) ||
8102 (pathtype
== BGP_PATH_MULTIPATH
&&
8103 (CHECK_FLAG (ri
->flags
, BGP_INFO_MULTIPATH
) || CHECK_FLAG (ri
->flags
, BGP_INFO_SELECTED
))))
8104 route_vty_out_detail (vty
, bgp
, &rn
->p
, ri
, afi
, safi
, json_paths
);
8108 bgp_unlock_node (rn
);
8115 json_object_object_add(json
, "paths", json_paths
);
8117 vty_out (vty
, "%s%s", json_object_to_json_string_ext(json
, JSON_C_TO_STRING_PRETTY
), VTY_NEWLINE
);
8118 json_object_free(json
);
8124 vty_out (vty
, "%% Network not in table%s", VTY_NEWLINE
);
8132 /* Display specified route of Main RIB */
8134 bgp_show_route (struct vty
*vty
, struct bgp
*bgp
, const char *ip_str
,
8135 afi_t afi
, safi_t safi
, struct prefix_rd
*prd
,
8136 int prefix_check
, enum bgp_path_type pathtype
,
8140 bgp
= bgp_get_default ();
8142 return bgp_show_route_in_table (vty
, bgp
, bgp
->rib
[afi
][safi
], ip_str
,
8143 afi
, safi
, prd
, prefix_check
, pathtype
,
8148 bgp_show_lcommunity (struct vty
*vty
, struct bgp
*bgp
, int argc
,
8149 struct cmd_token
**argv
, afi_t afi
, safi_t safi
, u_char uj
)
8151 struct lcommunity
*lcom
;
8157 b
= buffer_new (1024);
8158 for (i
= 0; i
< argc
; i
++)
8161 buffer_putc (b
, ' ');
8164 if (strmatch (argv
[i
]->text
, "<AA:BB:CC>"))
8167 buffer_putstr (b
, argv
[i
]->arg
);
8171 buffer_putc (b
, '\0');
8173 str
= buffer_getstr (b
);
8176 lcom
= lcommunity_str2com (str
);
8177 XFREE (MTYPE_TMP
, str
);
8180 vty_out (vty
, "%% Large-community malformed: %s", VTY_NEWLINE
);
8184 return bgp_show (vty
, bgp
, afi
, safi
, bgp_show_type_lcommunity
, lcom
, uj
);
8188 bgp_show_lcommunity_list (struct vty
*vty
, struct bgp
*bgp
, const char *lcom
,
8189 afi_t afi
, safi_t safi
, u_char uj
)
8191 struct community_list
*list
;
8193 list
= community_list_lookup (bgp_clist
, lcom
, LARGE_COMMUNITY_LIST_MASTER
);
8196 vty_out (vty
, "%% %s is not a valid large-community-list name%s", lcom
,
8201 return bgp_show (vty
, bgp
, afi
, safi
, bgp_show_type_lcommunity_list
, list
, uj
);
8204 DEFUN (show_ip_bgp_large_community_list
,
8205 show_ip_bgp_large_community_list_cmd
,
8206 "show [ip] bgp [<view|vrf> WORD] [<ipv4|ipv6> [<unicast|multicast|vpn|encap>]] large-community-list <(1-500)|WORD> [json]",
8210 BGP_INSTANCE_HELP_STR
8213 "Address Family modifier\n"
8214 "Address Family modifier\n"
8215 "Address Family modifier\n"
8216 "Address Family modifier\n"
8217 "Display routes matching the large-community-list\n"
8218 "large-community-list number\n"
8219 "large-community-list name\n"
8223 afi_t afi
= AFI_IP6
;
8224 safi_t safi
= SAFI_UNICAST
;
8227 if (argv_find (argv
, argc
, "ip", &idx
))
8229 if (argv_find (argv
, argc
, "view", &idx
) || argv_find (argv
, argc
, "vrf", &idx
))
8230 vrf
= argv
[++idx
]->arg
;
8231 if (argv_find (argv
, argc
, "ipv4", &idx
) || argv_find (argv
, argc
, "ipv6", &idx
))
8233 afi
= strmatch(argv
[idx
]->text
, "ipv6") ? AFI_IP6
: AFI_IP
;
8234 if (argv_find (argv
, argc
, "unicast", &idx
) || argv_find (argv
, argc
, "multicast", &idx
))
8235 safi
= bgp_vty_safi_from_arg (argv
[idx
]->text
);
8238 int uj
= use_json (argc
, argv
);
8240 struct bgp
*bgp
= bgp_lookup_by_name (vrf
);
8243 vty_out (vty
, "Can't find BGP instance %s%s", vrf
, VTY_NEWLINE
);
8247 argv_find (argv
, argc
, "large-community-list", &idx
);
8248 return bgp_show_lcommunity_list (vty
, bgp
, argv
[idx
+1]->arg
, afi
, safi
, uj
);
8250 DEFUN (show_ip_bgp_large_community
,
8251 show_ip_bgp_large_community_cmd
,
8252 "show [ip] bgp [<view|vrf> WORD] [<ipv4|ipv6> [<unicast|multicast|vpn|encap>]] large-community [AA:BB:CC] [json]",
8256 BGP_INSTANCE_HELP_STR
8259 "Address Family modifier\n"
8260 "Address Family modifier\n"
8261 "Address Family modifier\n"
8262 "Address Family modifier\n"
8263 "Display routes matching the large-communities\n"
8264 "List of large-community numbers\n"
8268 afi_t afi
= AFI_IP6
;
8269 safi_t safi
= SAFI_UNICAST
;
8272 if (argv_find (argv
, argc
, "ip", &idx
))
8274 if (argv_find (argv
, argc
, "view", &idx
) || argv_find (argv
, argc
, "vrf", &idx
))
8275 vrf
= argv
[++idx
]->arg
;
8276 if (argv_find (argv
, argc
, "ipv4", &idx
) || argv_find (argv
, argc
, "ipv6", &idx
))
8278 afi
= strmatch(argv
[idx
]->text
, "ipv6") ? AFI_IP6
: AFI_IP
;
8279 if (argv_find (argv
, argc
, "unicast", &idx
) || argv_find (argv
, argc
, "multicast", &idx
))
8280 safi
= bgp_vty_safi_from_arg (argv
[idx
]->text
);
8283 int uj
= use_json (argc
, argv
);
8285 struct bgp
*bgp
= bgp_lookup_by_name (vrf
);
8288 vty_out (vty
, "Can't find BGP instance %s%s", vrf
, VTY_NEWLINE
);
8292 argv_find (argv
, argc
, "large-community", &idx
);
8293 if (strmatch(argv
[idx
+1]->text
, "AA:BB:CC"))
8294 return bgp_show_lcommunity (vty
, bgp
, argc
, argv
, afi
, safi
, uj
);
8296 return bgp_show (vty
, bgp
, afi
, safi
, bgp_show_type_lcommunity_all
, NULL
, uj
);
8299 static int bgp_table_stats (struct vty
*vty
, struct bgp
*bgp
, afi_t afi
, safi_t safi
);
8301 /* BGP route print out function. */
8304 "show [ip] bgp [<view|vrf> WORD] ["BGP_AFI_CMD_STR
" ["BGP_SAFI_CMD_STR
"]]\
8307 |dampening <flap-statistics|dampened-paths|parameters>\
8312 |community [<AA:NN|local-AS|no-advertise|no-export> [exact-match]]\
8313 |community-list <(1-500)|WORD> [exact-match]\
8314 |A.B.C.D/M longer-prefixes\
8315 |X:X::X:X/M longer-prefixes>\
8320 BGP_INSTANCE_HELP_STR
8323 "Display only routes with non-natural netmasks\n"
8324 "Display detailed information about dampening\n"
8325 "Display flap statistics of routes\n"
8326 "Display paths suppressed due to dampening\n"
8327 "Display detail of configured dampening parameters\n"
8328 "Display routes matching the route-map\n"
8329 "A route-map to match on\n"
8330 "Display routes conforming to the prefix-list\n"
8331 "Prefix-list name\n"
8332 "Display routes conforming to the filter-list\n"
8333 "Regular expression access list name\n"
8334 "BGP RIB advertisement statistics\n"
8335 "Display routes matching the communities\n"
8337 "Do not send outside local AS (well-known community)\n"
8338 "Do not advertise to any peer (well-known community)\n"
8339 "Do not export to next AS (well-known community)\n"
8340 "Exact match of the communities\n"
8341 "Display routes matching the community-list\n"
8342 "community-list number\n"
8343 "community-list name\n"
8344 "Exact match of the communities\n"
8346 "Display route and more specific routes\n"
8348 "Display route and more specific routes\n"
8351 vrf_id_t vrf
= VRF_DEFAULT
;
8352 afi_t afi
= AFI_IP6
;
8353 safi_t safi
= SAFI_UNICAST
;
8354 int exact_match
= 0;
8355 enum bgp_show_type sh_type
= bgp_show_type_normal
;
8356 struct bgp
*bgp
= NULL
;
8359 bgp_vty_find_and_parse_afi_safi_vrf (vty
, argv
, argc
, &idx
, &afi
, &safi
, &vrf
);
8363 int uj
= use_json (argc
, argv
);
8366 bgp
= bgp_lookup_by_vrf_id (vrf
);
8369 if (vrf
== VRF_DEFAULT
)
8370 vty_out (vty
, "Can't find BGP instance (default)%s", VTY_NEWLINE
);
8372 vty_out (vty
, "Can't find BGP instance %d%s", vrf
, VTY_NEWLINE
);
8376 if (argv_find(argv
, argc
, "cidr-only", &idx
))
8377 return bgp_show (vty
, bgp
, afi
, safi
, bgp_show_type_cidr_only
, NULL
, uj
);
8379 if (argv_find(argv
, argc
, "dampening", &idx
))
8381 if (argv_find (argv
, argc
, "dampened-paths", &idx
))
8382 return bgp_show (vty
, bgp
, afi
, safi
, bgp_show_type_dampend_paths
, NULL
, uj
);
8383 else if (argv_find (argv
, argc
, "flap-statistics", &idx
))
8384 return bgp_show (vty
, bgp
, afi
, safi
, bgp_show_type_flap_statistics
, NULL
, uj
);
8385 else if (argv_find (argv
, argc
, "parameters", &idx
))
8386 return bgp_show_dampening_parameters (vty
, afi
, safi
);
8389 if (argv_find(argv
, argc
, "prefix-list", &idx
))
8390 return bgp_show_prefix_list (vty
, bgp
, argv
[idx
+ 1]->arg
, afi
, safi
, bgp_show_type_prefix_list
);
8392 if (argv_find(argv
, argc
, "filter-list", &idx
))
8393 return bgp_show_filter_list (vty
, bgp
, argv
[idx
+ 1]->arg
, afi
, safi
, bgp_show_type_filter_list
);
8395 if (argv_find(argv
, argc
, "statistics", &idx
))
8396 return bgp_table_stats (vty
, bgp
, afi
, safi
);
8398 if (argv_find(argv
, argc
, "route-map", &idx
))
8399 return bgp_show_route_map (vty
, bgp
, argv
[idx
+ 1]->arg
, afi
, safi
, bgp_show_type_route_map
);
8401 if (argv_find(argv
, argc
, "community", &idx
))
8403 /* show a specific community */
8404 if (argv_find (argv
, argc
, "local-AS", &idx
) ||
8405 argv_find (argv
, argc
, "no-advertise", &idx
) ||
8406 argv_find (argv
, argc
, "no-export", &idx
))
8408 if (argv_find (argv
, argc
, "exact_match", &idx
))
8410 return bgp_show_community (vty
, bgp
, argc
, argv
, exact_match
, afi
, safi
);
8412 /* show all communities */
8414 return bgp_show (vty
, bgp
, afi
, safi
, bgp_show_type_community_all
, NULL
, uj
);
8417 if (argv_find(argv
, argc
, "community-list", &idx
))
8419 const char *clist_number_or_name
= argv
[++idx
]->arg
;
8420 if (++idx
< argc
&& strmatch (argv
[idx
]->text
, "exact-match"))
8422 return bgp_show_community_list (vty
, bgp
, clist_number_or_name
, exact_match
, afi
, safi
);
8425 if (argv_find(argv
, argc
, "A.B.C.D/M", &idx
) || argv_find(argv
, argc
, "X:X::X:X/M", &idx
))
8426 return bgp_show_prefix_longer (vty
, bgp
, argv
[idx
+ 1]->arg
, afi
, safi
, bgp_show_type_prefix_longer
);
8428 if (safi
== SAFI_MPLS_VPN
)
8429 return bgp_show_mpls_vpn (vty
, afi
, NULL
, bgp_show_type_normal
, NULL
, 0, uj
);
8430 else if (safi
== SAFI_ENCAP
)
8431 return bgp_show_encap (vty
, afi
, NULL
, bgp_show_type_normal
, NULL
, 0);
8433 return bgp_show (vty
, bgp
, afi
, safi
, sh_type
, NULL
, uj
);
8436 DEFUN (show_ip_bgp_route
,
8437 show_ip_bgp_route_cmd
,
8438 "show [ip] bgp [<view|vrf> WORD] ["BGP_AFI_CMD_STR
" ["BGP_SAFI_CMD_STR
"]]"
8439 "<A.B.C.D|A.B.C.D/M|X:X::X:X|X:X::X:X/M> [<bestpath|multipath>] [json]",
8443 BGP_INSTANCE_HELP_STR
8446 "Network in the BGP routing table to display\n"
8448 "Network in the BGP routing table to display\n"
8450 "Display only the bestpath\n"
8451 "Display only multipaths\n"
8454 int prefix_check
= 0;
8456 afi_t afi
= AFI_IP6
;
8457 safi_t safi
= SAFI_UNICAST
;
8458 vrf_id_t vrf
= VRF_DEFAULT
;;
8459 char *prefix
= NULL
;
8460 struct bgp
*bgp
= NULL
;
8461 enum bgp_path_type path_type
;
8462 u_char uj
= use_json(argc
, argv
);
8466 bgp_vty_find_and_parse_afi_safi_vrf (vty
, argv
, argc
, &idx
, &afi
, &safi
, &vrf
);
8472 bgp
= bgp_lookup_by_vrf_id (vrf
);
8475 vty_out (vty
, "Can't find BGP instance %s%s", argv
[5]->arg
, VTY_NEWLINE
);
8481 vty_out (vty
, "Specified 'all' vrf's but this command currently only works per view/vrf%s", VTY_NEWLINE
);
8485 /* <A.B.C.D|A.B.C.D/M|X:X::X:X|X:X::X:X/M> */
8486 if (argv_find (argv
, argc
, "A.B.C.D", &idx
) || argv_find (argv
, argc
, "X:X::X:X", &idx
))
8488 else if (argv_find (argv
, argc
, "A.B.C.D/M", &idx
) || argv_find (argv
, argc
, "X:X::X:X/M", &idx
))
8491 if ((argv
[idx
]->type
== IPV6_TKN
|| argv
[idx
]->type
== IPV6_PREFIX_TKN
) && afi
!= AFI_IP6
)
8493 vty_out (vty
, "%% Cannot specify IPv6 address or prefix with IPv4 AFI%s", VTY_NEWLINE
);
8496 if ((argv
[idx
]->type
== IPV4_TKN
|| argv
[idx
]->type
== IPV4_PREFIX_TKN
) && afi
!= AFI_IP
)
8498 vty_out (vty
, "%% Cannot specify IPv4 address or prefix with IPv6 AFI%s", VTY_NEWLINE
);
8502 prefix
= argv
[idx
]->arg
;
8504 /* [<bestpath|multipath>] */
8505 if (argv_find (argv
, argc
, "bestpath", &idx
))
8506 path_type
= BGP_PATH_BESTPATH
;
8507 else if (argv_find (argv
, argc
, "multipath", &idx
))
8508 path_type
= BGP_PATH_MULTIPATH
;
8510 path_type
= BGP_PATH_ALL
;
8512 return bgp_show_route (vty
, bgp
, prefix
, afi
, safi
, NULL
, prefix_check
, path_type
, uj
);
8515 DEFUN (show_ip_bgp_regexp
,
8516 show_ip_bgp_regexp_cmd
,
8517 "show [ip] bgp [<view|vrf> WORD] ["BGP_AFI_CMD_STR
" ["BGP_SAFI_CMD_STR
"]] regexp REGEX...",
8521 BGP_INSTANCE_HELP_STR
8524 "Display routes matching the AS path regular expression\n"
8525 "A regular-expression to match the BGP AS paths\n")
8527 vrf_id_t vrf
= VRF_DEFAULT
;
8528 afi_t afi
= AFI_IP6
;
8529 safi_t safi
= SAFI_UNICAST
;
8532 bgp_vty_find_and_parse_afi_safi_vrf (vty
, argv
, argc
, &idx
, &afi
, &safi
, &vrf
);
8536 // get index of regex
8537 argv_find (argv
, argc
, "regexp", &idx
);
8540 char *regstr
= argv_concat (argv
, argc
, idx
);
8541 int rc
= bgp_show_regexp (vty
, (const char *) regstr
, afi
, safi
, bgp_show_type_regexp
);
8542 XFREE (MTYPE_TMP
, regstr
);
8546 DEFUN (show_ip_bgp_instance_all
,
8547 show_ip_bgp_instance_all_cmd
,
8548 "show [ip] bgp <view|vrf> all ["BGP_AFI_CMD_STR
" ["BGP_SAFI_CMD_STR
"]] [json]",
8552 BGP_INSTANCE_ALL_HELP_STR
8557 vrf_id_t vrf
= VRF_DEFAULT
;
8559 safi_t safi
= SAFI_UNICAST
;
8562 bgp_vty_find_and_parse_afi_safi_vrf (vty
, argv
, argc
, &idx
, &afi
, &safi
, &vrf
);
8566 int uj
= use_json (argc
, argv
);
8569 bgp_show_all_instances_routes_vty (vty
, afi
, safi
, uj
);
8574 bgp_show_regexp (struct vty
*vty
, const char *regstr
, afi_t afi
,
8575 safi_t safi
, enum bgp_show_type type
)
8582 regex
= bgp_regcomp (regstr
);
8585 vty_out (vty
, "Can't compile regexp %s%s", regstr
, VTY_NEWLINE
);
8589 rc
= bgp_show (vty
, NULL
, afi
, safi
, type
, regex
, 0);
8590 bgp_regex_free (regex
);
8595 bgp_show_prefix_list (struct vty
*vty
, struct bgp
*bgp
,
8596 const char *prefix_list_str
, afi_t afi
,
8597 safi_t safi
, enum bgp_show_type type
)
8599 struct prefix_list
*plist
;
8601 plist
= prefix_list_lookup (afi
, prefix_list_str
);
8604 vty_out (vty
, "%% %s is not a valid prefix-list name%s",
8605 prefix_list_str
, VTY_NEWLINE
);
8609 return bgp_show (vty
, bgp
, afi
, safi
, type
, plist
, 0);
8613 bgp_show_filter_list (struct vty
*vty
, struct bgp
*bgp
,
8614 const char *filter
, afi_t afi
,
8615 safi_t safi
, enum bgp_show_type type
)
8617 struct as_list
*as_list
;
8619 as_list
= as_list_lookup (filter
);
8620 if (as_list
== NULL
)
8622 vty_out (vty
, "%% %s is not a valid AS-path access-list name%s", filter
, VTY_NEWLINE
);
8626 return bgp_show (vty
, bgp
, afi
, safi
, type
, as_list
, 0);
8630 bgp_show_route_map (struct vty
*vty
, struct bgp
*bgp
,
8631 const char *rmap_str
, afi_t afi
,
8632 safi_t safi
, enum bgp_show_type type
)
8634 struct route_map
*rmap
;
8636 rmap
= route_map_lookup_by_name (rmap_str
);
8639 vty_out (vty
, "%% %s is not a valid route-map name%s",
8640 rmap_str
, VTY_NEWLINE
);
8644 return bgp_show (vty
, bgp
, afi
, safi
, type
, rmap
, 0);
8648 bgp_show_community (struct vty
*vty
, struct bgp
*bgp
, int argc
,
8649 struct cmd_token
**argv
, int exact
, afi_t afi
, safi_t safi
)
8651 struct community
*com
;
8657 b
= buffer_new (1024);
8658 for (i
= 0; i
< argc
; i
++)
8661 buffer_putc (b
, ' ');
8664 if ((strcmp (argv
[i
]->arg
, "unicast") == 0) || (strcmp (argv
[i
]->arg
, "multicast") == 0))
8669 buffer_putstr (b
, argv
[i
]->arg
);
8671 buffer_putc (b
, '\0');
8673 str
= buffer_getstr (b
);
8676 com
= community_str2com (str
);
8677 XFREE (MTYPE_TMP
, str
);
8680 vty_out (vty
, "%% Community malformed: %s", VTY_NEWLINE
);
8684 return bgp_show (vty
, bgp
, afi
, safi
,
8685 (exact
? bgp_show_type_community_exact
:
8686 bgp_show_type_community
), com
, 0);
8690 bgp_show_community_list (struct vty
*vty
, struct bgp
*bgp
,
8691 const char *com
, int exact
,
8692 afi_t afi
, safi_t safi
)
8694 struct community_list
*list
;
8696 list
= community_list_lookup (bgp_clist
, com
, COMMUNITY_LIST_MASTER
);
8699 vty_out (vty
, "%% %s is not a valid community-list name%s", com
,
8704 return bgp_show (vty
, bgp
, afi
, safi
,
8705 (exact
? bgp_show_type_community_list_exact
:
8706 bgp_show_type_community_list
), list
, 0);
8710 bgp_show_prefix_longer (struct vty
*vty
, struct bgp
*bgp
,
8711 const char *prefix
, afi_t afi
,
8712 safi_t safi
, enum bgp_show_type type
)
8719 ret
= str2prefix (prefix
, p
);
8722 vty_out (vty
, "%% Malformed Prefix%s", VTY_NEWLINE
);
8726 ret
= bgp_show (vty
, bgp
, afi
, safi
, type
, p
, 0);
8731 static struct peer
*
8732 peer_lookup_in_view (struct vty
*vty
, struct bgp
*bgp
,
8733 const char *ip_str
, u_char use_json
)
8739 /* Get peer sockunion. */
8740 ret
= str2sockunion (ip_str
, &su
);
8743 peer
= peer_lookup_by_conf_if (bgp
, ip_str
);
8746 peer
= peer_lookup_by_hostname(bgp
, ip_str
);
8752 json_object
*json_no
= NULL
;
8753 json_no
= json_object_new_object();
8754 json_object_string_add(json_no
, "malformedAddressOrName", ip_str
);
8755 vty_out (vty
, "%s%s", json_object_to_json_string(json_no
), VTY_NEWLINE
);
8756 json_object_free(json_no
);
8759 vty_out (vty
, "%% Malformed address or name: %s%s", ip_str
, VTY_NEWLINE
);
8766 /* Peer structure lookup. */
8767 peer
= peer_lookup (bgp
, &su
);
8772 json_object
*json_no
= NULL
;
8773 json_no
= json_object_new_object();
8774 json_object_string_add(json_no
, "warning","No such neighbor");
8775 vty_out (vty
, "%s%s", json_object_to_json_string(json_no
), VTY_NEWLINE
);
8776 json_object_free(json_no
);
8779 vty_out (vty
, "No such neighbor%s", VTY_NEWLINE
);
8788 BGP_STATS_MAXBITLEN
= 0,
8792 BGP_STATS_UNAGGREGATEABLE
,
8793 BGP_STATS_MAX_AGGREGATEABLE
,
8794 BGP_STATS_AGGREGATES
,
8796 BGP_STATS_ASPATH_COUNT
,
8797 BGP_STATS_ASPATH_MAXHOPS
,
8798 BGP_STATS_ASPATH_TOTHOPS
,
8799 BGP_STATS_ASPATH_MAXSIZE
,
8800 BGP_STATS_ASPATH_TOTSIZE
,
8801 BGP_STATS_ASN_HIGHEST
,
8805 static const char *table_stats_strs
[] =
8807 [BGP_STATS_PREFIXES
] = "Total Prefixes",
8808 [BGP_STATS_TOTPLEN
] = "Average prefix length",
8809 [BGP_STATS_RIB
] = "Total Advertisements",
8810 [BGP_STATS_UNAGGREGATEABLE
] = "Unaggregateable prefixes",
8811 [BGP_STATS_MAX_AGGREGATEABLE
] = "Maximum aggregateable prefixes",
8812 [BGP_STATS_AGGREGATES
] = "BGP Aggregate advertisements",
8813 [BGP_STATS_SPACE
] = "Address space advertised",
8814 [BGP_STATS_ASPATH_COUNT
] = "Advertisements with paths",
8815 [BGP_STATS_ASPATH_MAXHOPS
] = "Longest AS-Path (hops)",
8816 [BGP_STATS_ASPATH_MAXSIZE
] = "Largest AS-Path (bytes)",
8817 [BGP_STATS_ASPATH_TOTHOPS
] = "Average AS-Path length (hops)",
8818 [BGP_STATS_ASPATH_TOTSIZE
] = "Average AS-Path size (bytes)",
8819 [BGP_STATS_ASN_HIGHEST
] = "Highest public ASN",
8820 [BGP_STATS_MAX
] = NULL
,
8823 struct bgp_table_stats
8825 struct bgp_table
*table
;
8826 unsigned long long counts
[BGP_STATS_MAX
];
8830 #define TALLY_SIGFIG 100000
8831 static unsigned long
8832 ravg_tally (unsigned long count
, unsigned long oldavg
, unsigned long newval
)
8834 unsigned long newtot
= (count
-1) * oldavg
+ (newval
* TALLY_SIGFIG
);
8835 unsigned long res
= (newtot
* TALLY_SIGFIG
) / count
;
8836 unsigned long ret
= newtot
/ count
;
8838 if ((res
% TALLY_SIGFIG
) > (TALLY_SIGFIG
/2))
8846 bgp_table_stats_walker (struct thread
*t
)
8848 struct bgp_node
*rn
;
8849 struct bgp_node
*top
;
8850 struct bgp_table_stats
*ts
= THREAD_ARG (t
);
8851 unsigned int space
= 0;
8853 if (!(top
= bgp_table_top (ts
->table
)))
8856 switch (top
->p
.family
)
8859 space
= IPV4_MAX_BITLEN
;
8862 space
= IPV6_MAX_BITLEN
;
8866 ts
->counts
[BGP_STATS_MAXBITLEN
] = space
;
8868 for (rn
= top
; rn
; rn
= bgp_route_next (rn
))
8870 struct bgp_info
*ri
;
8871 struct bgp_node
*prn
= bgp_node_parent_nolock (rn
);
8872 unsigned int rinum
= 0;
8880 ts
->counts
[BGP_STATS_PREFIXES
]++;
8881 ts
->counts
[BGP_STATS_TOTPLEN
] += rn
->p
.prefixlen
;
8884 ts
->counts
[BGP_STATS_AVGPLEN
]
8885 = ravg_tally (ts
->counts
[BGP_STATS_PREFIXES
],
8886 ts
->counts
[BGP_STATS_AVGPLEN
],
8890 /* check if the prefix is included by any other announcements */
8891 while (prn
&& !prn
->info
)
8892 prn
= bgp_node_parent_nolock (prn
);
8894 if (prn
== NULL
|| prn
== top
)
8896 ts
->counts
[BGP_STATS_UNAGGREGATEABLE
]++;
8897 /* announced address space */
8899 ts
->counts
[BGP_STATS_SPACE
] += 1 << (space
- rn
->p
.prefixlen
);
8902 ts
->counts
[BGP_STATS_MAX_AGGREGATEABLE
]++;
8904 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
8907 ts
->counts
[BGP_STATS_RIB
]++;
8910 (CHECK_FLAG (ri
->attr
->flag
,
8911 ATTR_FLAG_BIT (BGP_ATTR_ATOMIC_AGGREGATE
))))
8912 ts
->counts
[BGP_STATS_AGGREGATES
]++;
8915 if (ri
->attr
&& ri
->attr
->aspath
)
8917 unsigned int hops
= aspath_count_hops (ri
->attr
->aspath
);
8918 unsigned int size
= aspath_size (ri
->attr
->aspath
);
8919 as_t highest
= aspath_highest (ri
->attr
->aspath
);
8921 ts
->counts
[BGP_STATS_ASPATH_COUNT
]++;
8923 if (hops
> ts
->counts
[BGP_STATS_ASPATH_MAXHOPS
])
8924 ts
->counts
[BGP_STATS_ASPATH_MAXHOPS
] = hops
;
8926 if (size
> ts
->counts
[BGP_STATS_ASPATH_MAXSIZE
])
8927 ts
->counts
[BGP_STATS_ASPATH_MAXSIZE
] = size
;
8929 ts
->counts
[BGP_STATS_ASPATH_TOTHOPS
] += hops
;
8930 ts
->counts
[BGP_STATS_ASPATH_TOTSIZE
] += size
;
8932 ts
->counts
[BGP_STATS_ASPATH_AVGHOPS
]
8933 = ravg_tally (ts
->counts
[BGP_STATS_ASPATH_COUNT
],
8934 ts
->counts
[BGP_STATS_ASPATH_AVGHOPS
],
8936 ts
->counts
[BGP_STATS_ASPATH_AVGSIZE
]
8937 = ravg_tally (ts
->counts
[BGP_STATS_ASPATH_COUNT
],
8938 ts
->counts
[BGP_STATS_ASPATH_AVGSIZE
],
8941 if (highest
> ts
->counts
[BGP_STATS_ASN_HIGHEST
])
8942 ts
->counts
[BGP_STATS_ASN_HIGHEST
] = highest
;
8950 bgp_table_stats (struct vty
*vty
, struct bgp
*bgp
, afi_t afi
, safi_t safi
)
8952 struct bgp_table_stats ts
;
8955 if (!bgp
->rib
[afi
][safi
])
8957 vty_out (vty
, "%% No RIB exist's for the AFI(%d)/SAFI(%d)%s",
8958 afi
, safi
, VTY_NEWLINE
);
8962 memset (&ts
, 0, sizeof (ts
));
8963 ts
.table
= bgp
->rib
[afi
][safi
];
8964 thread_execute (bm
->master
, bgp_table_stats_walker
, &ts
, 0);
8966 vty_out (vty
, "BGP %s RIB statistics%s%s",
8967 afi_safi_print (afi
, safi
), VTY_NEWLINE
, VTY_NEWLINE
);
8969 for (i
= 0; i
< BGP_STATS_MAX
; i
++)
8971 if (!table_stats_strs
[i
])
8977 case BGP_STATS_ASPATH_AVGHOPS
:
8978 case BGP_STATS_ASPATH_AVGSIZE
:
8979 case BGP_STATS_AVGPLEN
:
8980 vty_out (vty
, "%-30s: ", table_stats_strs
[i
]);
8981 vty_out (vty
, "%12.2f",
8982 (float)ts
.counts
[i
] / (float)TALLY_SIGFIG
);
8985 case BGP_STATS_ASPATH_TOTHOPS
:
8986 case BGP_STATS_ASPATH_TOTSIZE
:
8987 vty_out (vty
, "%-30s: ", table_stats_strs
[i
]);
8988 vty_out (vty
, "%12.2f",
8990 (float)ts
.counts
[i
] /
8991 (float)ts
.counts
[BGP_STATS_ASPATH_COUNT
]
8994 case BGP_STATS_TOTPLEN
:
8995 vty_out (vty
, "%-30s: ", table_stats_strs
[i
]);
8996 vty_out (vty
, "%12.2f",
8998 (float)ts
.counts
[i
] /
8999 (float)ts
.counts
[BGP_STATS_PREFIXES
]
9002 case BGP_STATS_SPACE
:
9003 vty_out (vty
, "%-30s: ", table_stats_strs
[i
]);
9004 vty_out (vty
, "%12llu%s", ts
.counts
[i
], VTY_NEWLINE
);
9005 if (ts
.counts
[BGP_STATS_MAXBITLEN
] < 9)
9007 vty_out (vty
, "%30s: ", "%% announced ");
9008 vty_out (vty
, "%12.2f%s",
9009 100 * (float)ts
.counts
[BGP_STATS_SPACE
] /
9010 (float)((uint64_t)1UL << ts
.counts
[BGP_STATS_MAXBITLEN
]),
9012 vty_out (vty
, "%30s: ", "/8 equivalent ");
9013 vty_out (vty
, "%12.2f%s",
9014 (float)ts
.counts
[BGP_STATS_SPACE
] /
9015 (float)(1UL << (ts
.counts
[BGP_STATS_MAXBITLEN
] - 8)),
9017 if (ts
.counts
[BGP_STATS_MAXBITLEN
] < 25)
9019 vty_out (vty
, "%30s: ", "/24 equivalent ");
9020 vty_out (vty
, "%12.2f",
9021 (float)ts
.counts
[BGP_STATS_SPACE
] /
9022 (float)(1UL << (ts
.counts
[BGP_STATS_MAXBITLEN
] - 24)));
9025 vty_out (vty
, "%-30s: ", table_stats_strs
[i
]);
9026 vty_out (vty
, "%12llu", ts
.counts
[i
]);
9029 vty_out (vty
, "%s", VTY_NEWLINE
);
9044 PCOUNT_PFCNT
, /* the figure we display to users */
9048 static const char *pcount_strs
[] =
9050 [PCOUNT_ADJ_IN
] = "Adj-in",
9051 [PCOUNT_DAMPED
] = "Damped",
9052 [PCOUNT_REMOVED
] = "Removed",
9053 [PCOUNT_HISTORY
] = "History",
9054 [PCOUNT_STALE
] = "Stale",
9055 [PCOUNT_VALID
] = "Valid",
9056 [PCOUNT_ALL
] = "All RIB",
9057 [PCOUNT_COUNTED
] = "PfxCt counted",
9058 [PCOUNT_PFCNT
] = "Useable",
9059 [PCOUNT_MAX
] = NULL
,
9064 unsigned int count
[PCOUNT_MAX
];
9065 const struct peer
*peer
;
9066 const struct bgp_table
*table
;
9070 bgp_peer_count_walker (struct thread
*t
)
9072 struct bgp_node
*rn
;
9073 struct peer_pcounts
*pc
= THREAD_ARG (t
);
9074 const struct peer
*peer
= pc
->peer
;
9076 for (rn
= bgp_table_top (pc
->table
); rn
; rn
= bgp_route_next (rn
))
9078 struct bgp_adj_in
*ain
;
9079 struct bgp_info
*ri
;
9081 for (ain
= rn
->adj_in
; ain
; ain
= ain
->next
)
9082 if (ain
->peer
== peer
)
9083 pc
->count
[PCOUNT_ADJ_IN
]++;
9085 for (ri
= rn
->info
; ri
; ri
= ri
->next
)
9087 char buf
[SU_ADDRSTRLEN
];
9089 if (ri
->peer
!= peer
)
9092 pc
->count
[PCOUNT_ALL
]++;
9094 if (CHECK_FLAG (ri
->flags
, BGP_INFO_DAMPED
))
9095 pc
->count
[PCOUNT_DAMPED
]++;
9096 if (CHECK_FLAG (ri
->flags
, BGP_INFO_HISTORY
))
9097 pc
->count
[PCOUNT_HISTORY
]++;
9098 if (CHECK_FLAG (ri
->flags
, BGP_INFO_REMOVED
))
9099 pc
->count
[PCOUNT_REMOVED
]++;
9100 if (CHECK_FLAG (ri
->flags
, BGP_INFO_STALE
))
9101 pc
->count
[PCOUNT_STALE
]++;
9102 if (CHECK_FLAG (ri
->flags
, BGP_INFO_VALID
))
9103 pc
->count
[PCOUNT_VALID
]++;
9104 if (!CHECK_FLAG (ri
->flags
, BGP_INFO_UNUSEABLE
))
9105 pc
->count
[PCOUNT_PFCNT
]++;
9107 if (CHECK_FLAG (ri
->flags
, BGP_INFO_COUNTED
))
9109 pc
->count
[PCOUNT_COUNTED
]++;
9110 if (CHECK_FLAG (ri
->flags
, BGP_INFO_UNUSEABLE
))
9111 zlog_warn ("%s [pcount] %s/%d is counted but flags 0x%x",
9113 inet_ntop(rn
->p
.family
, &rn
->p
.u
.prefix
,
9114 buf
, SU_ADDRSTRLEN
),
9120 if (!CHECK_FLAG (ri
->flags
, BGP_INFO_UNUSEABLE
))
9121 zlog_warn ("%s [pcount] %s/%d not counted but flags 0x%x",
9123 inet_ntop(rn
->p
.family
, &rn
->p
.u
.prefix
,
9124 buf
, SU_ADDRSTRLEN
),
9134 bgp_peer_counts (struct vty
*vty
, struct peer
*peer
, afi_t afi
, safi_t safi
, u_char use_json
)
9136 struct peer_pcounts pcounts
= { .peer
= peer
};
9138 json_object
*json
= NULL
;
9139 json_object
*json_loop
= NULL
;
9143 json
= json_object_new_object();
9144 json_loop
= json_object_new_object();
9147 if (!peer
|| !peer
->bgp
|| !peer
->afc
[afi
][safi
]
9148 || !peer
->bgp
->rib
[afi
][safi
])
9152 json_object_string_add(json
, "warning", "No such neighbor or address family");
9153 vty_out (vty
, "%s%s", json_object_to_json_string(json
), VTY_NEWLINE
);
9154 json_object_free(json
);
9157 vty_out (vty
, "%% No such neighbor or address family%s", VTY_NEWLINE
);
9162 memset (&pcounts
, 0, sizeof(pcounts
));
9163 pcounts
.peer
= peer
;
9164 pcounts
.table
= peer
->bgp
->rib
[afi
][safi
];
9166 /* in-place call via thread subsystem so as to record execution time
9167 * * stats for the thread-walk (i.e. ensure this can't be blamed on
9168 * * on just vty_read()).
9170 thread_execute (bm
->master
, bgp_peer_count_walker
, &pcounts
, 0);
9174 json_object_string_add(json
, "prefixCountsFor", peer
->host
);
9175 json_object_string_add(json
, "multiProtocol", afi_safi_print (afi
, safi
));
9176 json_object_int_add(json
, "pfxCounter", peer
->pcount
[afi
][safi
]);
9178 for (i
= 0; i
< PCOUNT_MAX
; i
++)
9179 json_object_int_add(json_loop
, pcount_strs
[i
], pcounts
.count
[i
]);
9181 json_object_object_add(json
, "ribTableWalkCounters", json_loop
);
9183 if (pcounts
.count
[PCOUNT_PFCNT
] != peer
->pcount
[afi
][safi
])
9185 json_object_string_add(json
, "pfxctDriftFor", peer
->host
);
9186 json_object_string_add(json
, "recommended", "Please report this bug, with the above command output");
9188 vty_out (vty
, "%s%s", json_object_to_json_string(json
), VTY_NEWLINE
);
9189 json_object_free(json
);
9194 if (peer
->hostname
&& bgp_flag_check(peer
->bgp
, BGP_FLAG_SHOW_HOSTNAME
))
9196 vty_out (vty
, "Prefix counts for %s/%s, %s%s",
9197 peer
->hostname
, peer
->host
, afi_safi_print (afi
, safi
),
9202 vty_out (vty
, "Prefix counts for %s, %s%s",
9203 peer
->host
, afi_safi_print (afi
, safi
), VTY_NEWLINE
);
9206 vty_out (vty
, "PfxCt: %ld%s", peer
->pcount
[afi
][safi
], VTY_NEWLINE
);
9207 vty_out (vty
, "%sCounts from RIB table walk:%s%s",
9208 VTY_NEWLINE
, VTY_NEWLINE
, VTY_NEWLINE
);
9210 for (i
= 0; i
< PCOUNT_MAX
; i
++)
9211 vty_out (vty
, "%20s: %-10d%s", pcount_strs
[i
], pcounts
.count
[i
], VTY_NEWLINE
);
9213 if (pcounts
.count
[PCOUNT_PFCNT
] != peer
->pcount
[afi
][safi
])
9215 vty_out (vty
, "%s [pcount] PfxCt drift!%s",
9216 peer
->host
, VTY_NEWLINE
);
9217 vty_out (vty
, "Please report this bug, with the above command output%s",
9225 DEFUN (show_ip_bgp_instance_neighbor_prefix_counts
,
9226 show_ip_bgp_instance_neighbor_prefix_counts_cmd
,
9227 "show [ip] bgp [<view|vrf> WORD] [<ipv4|ipv6> [<unicast|multicast|vpn|encap>]] "
9228 "neighbors <A.B.C.D|X:X::X:X|WORD> prefix-counts [json]",
9232 BGP_INSTANCE_HELP_STR
9235 "Address Family modifier\n"
9236 "Address Family modifier\n"
9237 "Address Family modifier\n"
9238 "Address Family modifier\n"
9239 "Detailed information on TCP and BGP neighbor connections\n"
9240 "Neighbor to display information about\n"
9241 "Neighbor to display information about\n"
9242 "Neighbor on BGP configured interface\n"
9243 "Display detailed prefix count information\n"
9246 vrf_id_t vrf
= VRF_DEFAULT
;
9247 afi_t afi
= AFI_IP6
;
9248 safi_t safi
= SAFI_UNICAST
;
9251 struct bgp
*bgp
= NULL
;
9253 bgp_vty_find_and_parse_afi_safi_vrf (vty
, argv
, argc
, &idx
, &afi
, &safi
, &vrf
);
9257 int uj
= use_json (argc
, argv
);
9262 bgp
= bgp_lookup_by_vrf_id (vrf
);
9267 json_object
*json_no
= NULL
;
9268 json_no
= json_object_new_object();
9269 json_object_string_add(json_no
, "warning", "Can't find BGP view");
9270 vty_out (vty
, "%s%s", json_object_to_json_string(json_no
), VTY_NEWLINE
);
9271 json_object_free(json_no
);
9274 vty_out (vty
, "Can't find BGP instance %s%s", argv
[5]->arg
, VTY_NEWLINE
);
9281 argv_find (argv
, argc
, "neighbors", &idx
);
9282 peer
= peer_lookup_in_view (vty
, bgp
, argv
[idx
+1]->arg
, uj
);
9286 return bgp_peer_counts (vty
, peer
, AFI_IP
, SAFI_UNICAST
, uj
);
9289 #ifdef KEEP_OLD_VPN_COMMANDS
9290 DEFUN (show_ip_bgp_vpn_neighbor_prefix_counts
,
9291 show_ip_bgp_vpn_neighbor_prefix_counts_cmd
,
9292 "show [ip] bgp <vpnv4|vpnv6> all neighbors <A.B.C.D|X:X::X:X|WORD> prefix-counts [json]",
9297 "Display information about all VPNv4 NLRIs\n"
9298 "Detailed information on TCP and BGP neighbor connections\n"
9299 "Neighbor to display information about\n"
9300 "Neighbor to display information about\n"
9301 "Neighbor on BGP configured interface\n"
9302 "Display detailed prefix count information\n"
9307 u_char uj
= use_json(argc
, argv
);
9309 peer
= peer_lookup_in_view (vty
, NULL
, argv
[idx_peer
]->arg
, uj
);
9313 return bgp_peer_counts (vty
, peer
, AFI_IP
, SAFI_MPLS_VPN
, uj
);
9316 DEFUN (show_ip_bgp_vpn_all_route_prefix
,
9317 show_ip_bgp_vpn_all_route_prefix_cmd
,
9318 "show [ip] bgp <vpnv4|vpnv6> all <A.B.C.D|A.B.C.D/M> [json]",
9323 "Display information about all VPNv4 NLRIs\n"
9324 "Network in the BGP routing table to display\n"
9325 "Network in the BGP routing table to display\n"
9329 char *network
= NULL
;
9330 struct bgp
*bgp
= bgp_get_default();
9333 vty_out (vty
, "Can't find default instance%s", VTY_NEWLINE
);
9336 network
= argv_find (argv
, argc
, "A.B.C.D", &idx
) ? argv
[idx
]->arg
: NULL
;
9337 network
= argv_find (argv
, argc
, "A.B.C.D/M", &idx
) ? argv
[idx
]->arg
: NULL
;
9338 return bgp_show_route (vty
, bgp
, network
, AFI_IP
, SAFI_MPLS_VPN
, NULL
, 0, BGP_PATH_ALL
, use_json(argc
, argv
));
9340 #endif /* KEEP_OLD_VPN_COMMANDS */
9342 DEFUN (show_ip_bgp_l2vpn_evpn_all_route_prefix
,
9343 show_ip_bgp_l2vpn_evpn_all_route_prefix_cmd
,
9344 "show [ip] bgp l2vpn evpn all <A.B.C.D|A.B.C.D/M> [json]",
9350 "Display information about all EVPN NLRIs\n"
9351 "Network in the BGP routing table to display\n"
9352 "Network in the BGP routing table to display\n"
9356 char *network
= NULL
;
9357 network
= argv_find (argv
, argc
, "A.B.C.D", &idx
) ? argv
[idx
]->arg
: NULL
;
9358 network
= argv_find (argv
, argc
, "A.B.C.D/M", &idx
) ? argv
[idx
]->arg
: NULL
;
9359 return bgp_show_route (vty
, NULL
, network
, AFI_L2VPN
, SAFI_EVPN
, NULL
, 0, BGP_PATH_ALL
, use_json(argc
, argv
));
9363 show_adj_route (struct vty
*vty
, struct peer
*peer
, afi_t afi
, safi_t safi
,
9364 int in
, const char *rmap_name
, u_char use_json
, json_object
*json
)
9366 struct bgp_table
*table
;
9367 struct bgp_adj_in
*ain
;
9368 struct bgp_adj_out
*adj
;
9369 unsigned long output_count
;
9370 unsigned long filtered_count
;
9371 struct bgp_node
*rn
;
9376 struct attr_extra extra
;
9378 struct update_subgroup
*subgrp
;
9379 json_object
*json_scode
= NULL
;
9380 json_object
*json_ocode
= NULL
;
9381 json_object
*json_ar
= NULL
;
9382 struct peer_af
*paf
;
9386 json_scode
= json_object_new_object();
9387 json_ocode
= json_object_new_object();
9388 json_ar
= json_object_new_object();
9390 json_object_string_add(json_scode
, "suppressed", "s");
9391 json_object_string_add(json_scode
, "damped", "d");
9392 json_object_string_add(json_scode
, "history", "h");
9393 json_object_string_add(json_scode
, "valid", "*");
9394 json_object_string_add(json_scode
, "best", ">");
9395 json_object_string_add(json_scode
, "multipath", "=");
9396 json_object_string_add(json_scode
, "internal", "i");
9397 json_object_string_add(json_scode
, "ribFailure", "r");
9398 json_object_string_add(json_scode
, "stale", "S");
9399 json_object_string_add(json_scode
, "removed", "R");
9401 json_object_string_add(json_ocode
, "igp", "i");
9402 json_object_string_add(json_ocode
, "egp", "e");
9403 json_object_string_add(json_ocode
, "incomplete", "?");
9412 json_object_string_add(json
, "alert", "no BGP");
9413 vty_out (vty
, "%s%s", json_object_to_json_string(json
), VTY_NEWLINE
);
9414 json_object_free(json
);
9417 vty_out (vty
, "%% No bgp%s", VTY_NEWLINE
);
9421 table
= bgp
->rib
[afi
][safi
];
9423 output_count
= filtered_count
= 0;
9424 subgrp
= peer_subgroup(peer
, afi
, safi
);
9426 if (!in
&& subgrp
&& CHECK_FLAG (subgrp
->sflags
, SUBGRP_STATUS_DEFAULT_ORIGINATE
))
9430 json_object_int_add(json
, "bgpTableVersion", table
->version
);
9431 json_object_string_add(json
, "bgpLocalRouterId", inet_ntoa (bgp
->router_id
));
9432 json_object_object_add(json
, "bgpStatusCodes", json_scode
);
9433 json_object_object_add(json
, "bgpOriginCodes", json_ocode
);
9434 json_object_string_add(json
, "bgpOriginatingDefaultNetwork", "0.0.0.0");
9438 vty_out (vty
, "BGP table version is %" PRIu64
", local router ID is %s%s", table
->version
, inet_ntoa (bgp
->router_id
), VTY_NEWLINE
);
9439 vty_out (vty
, BGP_SHOW_SCODE_HEADER
, VTY_NEWLINE
, VTY_NEWLINE
);
9440 vty_out (vty
, BGP_SHOW_OCODE_HEADER
, VTY_NEWLINE
, VTY_NEWLINE
);
9442 vty_out (vty
, "Originating default network 0.0.0.0%s%s",
9443 VTY_NEWLINE
, VTY_NEWLINE
);
9448 attr
.extra
= &extra
;
9449 for (rn
= bgp_table_top (table
); rn
; rn
= bgp_route_next (rn
))
9453 for (ain
= rn
->adj_in
; ain
; ain
= ain
->next
)
9455 if (ain
->peer
== peer
)
9461 json_object_int_add(json
, "bgpTableVersion", 0);
9462 json_object_string_add(json
, "bgpLocalRouterId", inet_ntoa (bgp
->router_id
));
9463 json_object_object_add(json
, "bgpStatusCodes", json_scode
);
9464 json_object_object_add(json
, "bgpOriginCodes", json_ocode
);
9468 vty_out (vty
, "BGP table version is 0, local router ID is %s%s", inet_ntoa (bgp
->router_id
), VTY_NEWLINE
);
9469 vty_out (vty
, BGP_SHOW_SCODE_HEADER
, VTY_NEWLINE
, VTY_NEWLINE
);
9470 vty_out (vty
, BGP_SHOW_OCODE_HEADER
, VTY_NEWLINE
, VTY_NEWLINE
);
9477 vty_out (vty
, BGP_SHOW_HEADER
, VTY_NEWLINE
);
9482 bgp_attr_dup(&attr
, ain
->attr
);
9483 if (bgp_input_modifier(peer
, &rn
->p
, &attr
, afi
, safi
, rmap_name
) != RMAP_DENY
)
9485 route_vty_out_tmp (vty
, &rn
->p
, &attr
, safi
, use_json
, json_ar
);
9496 for (adj
= rn
->adj_out
; adj
; adj
= adj
->next
)
9497 SUBGRP_FOREACH_PEER(adj
->subgroup
, paf
)
9498 if (paf
->peer
== peer
)
9504 json_object_int_add(json
, "bgpTableVersion", table
->version
);
9505 json_object_string_add(json
, "bgpLocalRouterId", inet_ntoa (bgp
->router_id
));
9506 json_object_object_add(json
, "bgpStatusCodes", json_scode
);
9507 json_object_object_add(json
, "bgpOriginCodes", json_ocode
);
9511 vty_out (vty
, "BGP table version is %" PRIu64
", local router ID is %s%s", table
->version
,
9512 inet_ntoa (bgp
->router_id
), VTY_NEWLINE
);
9513 vty_out (vty
, BGP_SHOW_SCODE_HEADER
, VTY_NEWLINE
, VTY_NEWLINE
);
9514 vty_out (vty
, BGP_SHOW_OCODE_HEADER
, VTY_NEWLINE
, VTY_NEWLINE
);
9522 vty_out (vty
, BGP_SHOW_HEADER
, VTY_NEWLINE
);
9528 bgp_attr_dup(&attr
, adj
->attr
);
9529 ret
= bgp_output_modifier(peer
, &rn
->p
, &attr
, afi
, safi
, rmap_name
);
9530 if (ret
!= RMAP_DENY
)
9532 route_vty_out_tmp (vty
, &rn
->p
, &attr
, safi
, use_json
, json_ar
);
9542 json_object_object_add(json
, "advertisedRoutes", json_ar
);
9544 if (output_count
!= 0)
9547 json_object_int_add(json
, "totalPrefixCounter", output_count
);
9549 vty_out (vty
, "%sTotal number of prefixes %ld%s",
9550 VTY_NEWLINE
, output_count
, VTY_NEWLINE
);
9554 vty_out (vty
, "%s%s", json_object_to_json_string(json
), VTY_NEWLINE
);
9555 json_object_free(json
);
9561 peer_adj_routes (struct vty
*vty
, struct peer
*peer
, afi_t afi
, safi_t safi
,
9562 int in
, const char *rmap_name
, u_char use_json
)
9564 json_object
*json
= NULL
;
9567 json
= json_object_new_object();
9569 if (!peer
|| !peer
->afc
[afi
][safi
])
9573 json_object_string_add(json
, "warning", "No such neighbor or address family");
9574 vty_out (vty
, "%s%s", json_object_to_json_string(json
), VTY_NEWLINE
);
9575 json_object_free(json
);
9578 vty_out (vty
, "%% No such neighbor or address family%s", VTY_NEWLINE
);
9583 if (in
&& !CHECK_FLAG(peer
->af_flags
[afi
][safi
], PEER_FLAG_SOFT_RECONFIG
))
9587 json_object_string_add(json
, "warning", "Inbound soft reconfiguration not enabled");
9588 vty_out (vty
, "%s%s", json_object_to_json_string(json
), VTY_NEWLINE
);
9589 json_object_free(json
);
9592 vty_out (vty
, "%% Inbound soft reconfiguration not enabled%s", VTY_NEWLINE
);
9597 show_adj_route (vty
, peer
, afi
, safi
, in
, rmap_name
, use_json
, json
);
9602 DEFUN (show_ip_bgp_instance_neighbor_advertised_route
,
9603 show_ip_bgp_instance_neighbor_advertised_route_cmd
,
9604 "show [ip] bgp [<view|vrf> WORD] ["BGP_AFI_CMD_STR
" ["BGP_SAFI_CMD_STR
"]] "
9605 "neighbors <A.B.C.D|X:X::X:X|WORD> <received-routes|advertised-routes> [route-map WORD] [json]",
9609 BGP_INSTANCE_HELP_STR
9612 "Detailed information on TCP and BGP neighbor connections\n"
9613 "Neighbor to display information about\n"
9614 "Neighbor to display information about\n"
9615 "Neighbor on BGP configured interface\n"
9616 "Display the received routes from neighbor\n"
9617 "Display the routes advertised to a BGP neighbor\n"
9618 "Route-map to modify the attributes\n"
9619 "Name of the route map\n"
9622 vrf_id_t vrf
= VRF_DEFAULT
;
9623 afi_t afi
= AFI_IP6
;
9624 safi_t safi
= SAFI_UNICAST
;
9625 char *rmap_name
= NULL
;
9626 char *peerstr
= NULL
;
9628 struct bgp
*bgp
= NULL
;
9633 bgp_vty_find_and_parse_afi_safi_vrf (vty
, argv
, argc
, &idx
, &afi
, &safi
, &vrf
);
9637 int uj
= use_json (argc
, argv
);
9640 bgp
= bgp_lookup_by_vrf_id (vrf
);
9645 json_object
*json_no
= NULL
;
9646 json_no
= json_object_new_object();
9647 json_object_string_add(json_no
, "warning", "Can't find BGP view");
9648 vty_out (vty
, "%s%s", json_object_to_json_string(json_no
), VTY_NEWLINE
);
9649 json_object_free(json_no
);
9652 vty_out (vty
, "Can't find BGP instance %s%s", argv
[5]->arg
, VTY_NEWLINE
);
9656 /* neighbors <A.B.C.D|X:X::X:X|WORD> */
9657 argv_find (argv
, argc
, "neighbors", &idx
);
9658 peerstr
= argv
[++idx
]->arg
;
9660 peer
= peer_lookup_in_view (vty
, bgp
, peerstr
, uj
);
9664 if (argv_find (argv
, argc
, "received-routes", &idx
))
9666 if (argv_find (argv
, argc
, "advertised-routes", &idx
))
9668 if (argv_find (argv
, argc
, "route-map", &idx
))
9669 rmap_name
= argv
[++idx
]->arg
;
9671 return peer_adj_routes (vty
, peer
, afi
, safi
, rcvd
, rmap_name
, uj
);
9674 DEFUN (show_ip_bgp_neighbor_received_prefix_filter
,
9675 show_ip_bgp_neighbor_received_prefix_filter_cmd
,
9676 "show [ip] bgp [<ipv4|ipv6> [unicast]] neighbors <A.B.C.D|X:X::X:X|WORD> received prefix-filter [json]",
9682 "Address Family modifier\n"
9683 "Detailed information on TCP and BGP neighbor connections\n"
9684 "Neighbor to display information about\n"
9685 "Neighbor to display information about\n"
9686 "Neighbor on BGP configured interface\n"
9687 "Display information received from a BGP neighbor\n"
9688 "Display the prefixlist filter\n"
9691 afi_t afi
= AFI_IP6
;
9692 safi_t safi
= SAFI_UNICAST
;
9693 char *peerstr
= NULL
;
9703 if (argv_find (argv
, argc
, "ip", &idx
))
9705 /* [<ipv4|ipv6> [unicast]] */
9706 if (argv_find (argv
, argc
, "ipv4", &idx
))
9708 if (argv_find (argv
, argc
, "ipv6", &idx
))
9710 /* neighbors <A.B.C.D|X:X::X:X|WORD> */
9711 argv_find (argv
, argc
, "neighbors", &idx
);
9712 peerstr
= argv
[++idx
]->arg
;
9714 u_char uj
= use_json(argc
, argv
);
9716 ret
= str2sockunion (peerstr
, &su
);
9719 peer
= peer_lookup_by_conf_if (NULL
, peerstr
);
9723 vty_out (vty
, "{}%s", VTY_NEWLINE
);
9725 vty_out (vty
, "%% Malformed address or name: %s%s", peerstr
, VTY_NEWLINE
);
9731 peer
= peer_lookup (NULL
, &su
);
9735 vty_out (vty
, "{}%s", VTY_NEWLINE
);
9737 vty_out (vty
, "No peer%s", VTY_NEWLINE
);
9742 sprintf (name
, "%s.%d.%d", peer
->host
, afi
, safi
);
9743 count
= prefix_bgp_show_prefix_list (NULL
, afi
, name
, uj
);
9747 vty_out (vty
, "Address Family: %s%s", afi_safi_print(afi
, safi
), VTY_NEWLINE
);
9748 prefix_bgp_show_prefix_list (vty
, afi
, name
, uj
);
9753 vty_out (vty
, "{}%s", VTY_NEWLINE
);
9755 vty_out (vty
, "No functional output%s", VTY_NEWLINE
);
9762 bgp_show_neighbor_route (struct vty
*vty
, struct peer
*peer
, afi_t afi
,
9763 safi_t safi
, enum bgp_show_type type
, u_char use_json
)
9765 if (! peer
|| ! peer
->afc
[afi
][safi
])
9769 json_object
*json_no
= NULL
;
9770 json_no
= json_object_new_object();
9771 json_object_string_add(json_no
, "warning", "No such neighbor or address family");
9772 vty_out (vty
, "%s%s", json_object_to_json_string(json_no
), VTY_NEWLINE
);
9773 json_object_free(json_no
);
9776 vty_out (vty
, "%% No such neighbor or address family%s", VTY_NEWLINE
);
9780 return bgp_show (vty
, peer
->bgp
, afi
, safi
, type
, &peer
->su
, use_json
);
9783 DEFUN (show_ip_bgp_neighbor_routes
,
9784 show_ip_bgp_neighbor_routes_cmd
,
9785 "show [ip] bgp [<view|vrf> WORD] ["BGP_AFI_CMD_STR
" ["BGP_SAFI_CMD_STR
"]] "
9786 "neighbors <A.B.C.D|X:X::X:X|WORD> <flap-statistics|dampened-routes|routes> [json]",
9790 BGP_INSTANCE_HELP_STR
9793 "Detailed information on TCP and BGP neighbor connections\n"
9794 "Neighbor to display information about\n"
9795 "Neighbor to display information about\n"
9796 "Neighbor on BGP configured interface\n"
9797 "Display flap statistics of the routes learned from neighbor\n"
9798 "Display the dampened routes received from neighbor\n"
9799 "Display routes learned from neighbor\n"
9802 vrf_id_t vrf
= VRF_DEFAULT
;
9803 char *peerstr
= NULL
;
9804 struct bgp
*bgp
= NULL
;
9805 afi_t afi
= AFI_IP6
;
9806 safi_t safi
= SAFI_UNICAST
;
9808 enum bgp_show_type sh_type
= bgp_show_type_neighbor
;
9812 bgp_vty_find_and_parse_afi_safi_vrf (vty
, argv
, argc
, &idx
, &afi
, &safi
, &vrf
);
9816 int uj
= use_json (argc
, argv
);
9821 bgp
= bgp_lookup_by_vrf_id (vrf
);
9826 json_object
*json_no
= NULL
;
9827 json_no
= json_object_new_object();
9828 json_object_string_add(json_no
, "warning", "Can't find BGP view");
9829 vty_out (vty
, "%s%s", json_object_to_json_string(json_no
), VTY_NEWLINE
);
9830 json_object_free(json_no
);
9833 vty_out (vty
, "Can't find BGP instance %s%s", argv
[5]->arg
, VTY_NEWLINE
);
9840 /* neighbors <A.B.C.D|X:X::X:X|WORD> */
9841 argv_find (argv
, argc
, "neighbors", &idx
);
9842 peerstr
= argv
[++idx
]->arg
;
9844 peer
= peer_lookup_in_view (vty
, bgp
, peerstr
, uj
);
9847 vty_out (vty
, "No such neighbor%s", VTY_NEWLINE
);
9851 if (argv_find (argv
, argc
, "flap-statistics", &idx
))
9852 sh_type
= bgp_show_type_flap_neighbor
;
9853 else if (argv_find (argv
, argc
, "dampened-routes", &idx
))
9854 sh_type
= bgp_show_type_damp_neighbor
;
9855 else if (argv_find (argv
, argc
, "routes", &idx
))
9856 sh_type
= bgp_show_type_neighbor
;
9858 return bgp_show_neighbor_route (vty
, peer
, afi
, safi
, sh_type
, uj
);
9861 struct bgp_table
*bgp_distance_table
[AFI_MAX
][SAFI_MAX
];
9865 /* Distance value for the IP source prefix. */
9868 /* Name of the access-list to be matched. */
9872 DEFUN (show_bgp_afi_vpn_rd_route
,
9873 show_bgp_afi_vpn_rd_route_cmd
,
9874 "show bgp "BGP_AFI_CMD_STR
" vpn rd ASN:nn_or_IP-address:nn <A.B.C.D/M|X:X::X:X/M> [json]",
9878 "Address Family modifier\n"
9879 "Display information for a route distinguisher\n"
9880 "Route Distinguisher\n"
9881 "Network in the BGP routing table to display\n"
9882 "Network in the BGP routing table to display\n"
9886 struct prefix_rd prd
;
9887 afi_t afi
= AFI_MAX
;
9890 argv_find_and_parse_afi (argv
, argc
, &idx
, &afi
);
9891 ret
= str2prefix_rd (argv
[5]->arg
, &prd
);
9894 vty_out (vty
, "%% Malformed Route Distinguisher%s", VTY_NEWLINE
);
9897 return bgp_show_route (vty
, NULL
, argv
[6]->arg
, afi
, SAFI_MPLS_VPN
, &prd
, 0, BGP_PATH_ALL
, use_json (argc
, argv
));
9900 static struct bgp_distance
*
9901 bgp_distance_new (void)
9903 return XCALLOC (MTYPE_BGP_DISTANCE
, sizeof (struct bgp_distance
));
9907 bgp_distance_free (struct bgp_distance
*bdistance
)
9909 XFREE (MTYPE_BGP_DISTANCE
, bdistance
);
9913 bgp_distance_set (struct vty
*vty
, const char *distance_str
,
9914 const char *ip_str
, const char *access_list_str
)
9921 struct bgp_node
*rn
;
9922 struct bgp_distance
*bdistance
;
9924 afi
= bgp_node_afi (vty
);
9925 safi
= bgp_node_safi (vty
);
9927 ret
= str2prefix (ip_str
, &p
);
9930 vty_out (vty
, "Malformed prefix%s", VTY_NEWLINE
);
9934 distance
= atoi (distance_str
);
9936 /* Get BGP distance node. */
9937 rn
= bgp_node_get (bgp_distance_table
[afi
][safi
], (struct prefix
*) &p
);
9940 bdistance
= rn
->info
;
9941 bgp_unlock_node (rn
);
9945 bdistance
= bgp_distance_new ();
9946 rn
->info
= bdistance
;
9949 /* Set distance value. */
9950 bdistance
->distance
= distance
;
9952 /* Reset access-list configuration. */
9953 if (bdistance
->access_list
)
9955 XFREE(MTYPE_AS_LIST
, bdistance
->access_list
);
9956 bdistance
->access_list
= NULL
;
9958 if (access_list_str
)
9959 bdistance
->access_list
= XSTRDUP(MTYPE_AS_LIST
, access_list_str
);
9965 bgp_distance_unset (struct vty
*vty
, const char *distance_str
,
9966 const char *ip_str
, const char *access_list_str
)
9973 struct bgp_node
*rn
;
9974 struct bgp_distance
*bdistance
;
9976 afi
= bgp_node_afi (vty
);
9977 safi
= bgp_node_safi (vty
);
9979 ret
= str2prefix (ip_str
, &p
);
9982 vty_out (vty
, "Malformed prefix%s", VTY_NEWLINE
);
9986 rn
= bgp_node_lookup (bgp_distance_table
[afi
][safi
], (struct prefix
*)&p
);
9989 vty_out (vty
, "Can't find specified prefix%s", VTY_NEWLINE
);
9993 bdistance
= rn
->info
;
9994 distance
= atoi(distance_str
);
9996 if (bdistance
->distance
!= distance
)
9998 vty_out (vty
, "Distance does not match configured%s", VTY_NEWLINE
);
10002 if (bdistance
->access_list
)
10003 XFREE(MTYPE_AS_LIST
, bdistance
->access_list
);
10004 bgp_distance_free (bdistance
);
10007 bgp_unlock_node (rn
);
10008 bgp_unlock_node (rn
);
10010 return CMD_SUCCESS
;
10013 /* Apply BGP information to distance method. */
10015 bgp_distance_apply (struct prefix
*p
, struct bgp_info
*rinfo
, afi_t afi
,
10016 safi_t safi
, struct bgp
*bgp
)
10018 struct bgp_node
*rn
;
10021 struct bgp_distance
*bdistance
;
10022 struct access_list
*alist
;
10023 struct bgp_static
*bgp_static
;
10028 peer
= rinfo
->peer
;
10030 /* Check source address. */
10031 sockunion2hostprefix (&peer
->su
, &q
);
10032 rn
= bgp_node_match (bgp_distance_table
[afi
][safi
], &q
);
10035 bdistance
= rn
->info
;
10036 bgp_unlock_node (rn
);
10038 if (bdistance
->access_list
)
10040 alist
= access_list_lookup (afi
, bdistance
->access_list
);
10041 if (alist
&& access_list_apply (alist
, p
) == FILTER_PERMIT
)
10042 return bdistance
->distance
;
10045 return bdistance
->distance
;
10048 /* Backdoor check. */
10049 rn
= bgp_node_lookup (bgp
->route
[afi
][safi
], p
);
10052 bgp_static
= rn
->info
;
10053 bgp_unlock_node (rn
);
10055 if (bgp_static
->backdoor
)
10057 if (bgp
->distance_local
[afi
][safi
])
10058 return bgp
->distance_local
[afi
][safi
];
10060 return ZEBRA_IBGP_DISTANCE_DEFAULT
;
10064 if (peer
->sort
== BGP_PEER_EBGP
)
10066 if (bgp
->distance_ebgp
[afi
][safi
])
10067 return bgp
->distance_ebgp
[afi
][safi
];
10068 return ZEBRA_EBGP_DISTANCE_DEFAULT
;
10072 if (bgp
->distance_ibgp
[afi
][safi
])
10073 return bgp
->distance_ibgp
[afi
][safi
];
10074 return ZEBRA_IBGP_DISTANCE_DEFAULT
;
10078 DEFUN (bgp_distance
,
10080 "distance bgp (1-255) (1-255) (1-255)",
10081 "Define an administrative distance\n"
10083 "Distance for routes external to the AS\n"
10084 "Distance for routes internal to the AS\n"
10085 "Distance for local routes\n")
10087 VTY_DECLVAR_CONTEXT(bgp
, bgp
);
10088 int idx_number
= 2;
10089 int idx_number_2
= 3;
10090 int idx_number_3
= 4;
10094 afi
= bgp_node_afi (vty
);
10095 safi
= bgp_node_safi (vty
);
10097 bgp
->distance_ebgp
[afi
][safi
] = atoi (argv
[idx_number
]->arg
);
10098 bgp
->distance_ibgp
[afi
][safi
] = atoi (argv
[idx_number_2
]->arg
);
10099 bgp
->distance_local
[afi
][safi
] = atoi (argv
[idx_number_3
]->arg
);
10100 return CMD_SUCCESS
;
10103 DEFUN (no_bgp_distance
,
10104 no_bgp_distance_cmd
,
10105 "no distance bgp [(1-255) (1-255) (1-255)]",
10107 "Define an administrative distance\n"
10109 "Distance for routes external to the AS\n"
10110 "Distance for routes internal to the AS\n"
10111 "Distance for local routes\n")
10113 VTY_DECLVAR_CONTEXT(bgp
, bgp
);
10117 afi
= bgp_node_afi (vty
);
10118 safi
= bgp_node_safi (vty
);
10120 bgp
->distance_ebgp
[afi
][safi
] = 0;
10121 bgp
->distance_ibgp
[afi
][safi
] = 0;
10122 bgp
->distance_local
[afi
][safi
] = 0;
10123 return CMD_SUCCESS
;
10127 DEFUN (bgp_distance_source
,
10128 bgp_distance_source_cmd
,
10129 "distance (1-255) A.B.C.D/M",
10130 "Define an administrative distance\n"
10131 "Administrative distance\n"
10132 "IP source prefix\n")
10134 int idx_number
= 1;
10135 int idx_ipv4_prefixlen
= 2;
10136 bgp_distance_set (vty
, argv
[idx_number
]->arg
, argv
[idx_ipv4_prefixlen
]->arg
, NULL
);
10137 return CMD_SUCCESS
;
10140 DEFUN (no_bgp_distance_source
,
10141 no_bgp_distance_source_cmd
,
10142 "no distance (1-255) A.B.C.D/M",
10144 "Define an administrative distance\n"
10145 "Administrative distance\n"
10146 "IP source prefix\n")
10148 int idx_number
= 2;
10149 int idx_ipv4_prefixlen
= 3;
10150 bgp_distance_unset (vty
, argv
[idx_number
]->arg
, argv
[idx_ipv4_prefixlen
]->arg
, NULL
);
10151 return CMD_SUCCESS
;
10154 DEFUN (bgp_distance_source_access_list
,
10155 bgp_distance_source_access_list_cmd
,
10156 "distance (1-255) A.B.C.D/M WORD",
10157 "Define an administrative distance\n"
10158 "Administrative distance\n"
10159 "IP source prefix\n"
10160 "Access list name\n")
10162 int idx_number
= 1;
10163 int idx_ipv4_prefixlen
= 2;
10165 bgp_distance_set (vty
, argv
[idx_number
]->arg
, argv
[idx_ipv4_prefixlen
]->arg
, argv
[idx_word
]->arg
);
10166 return CMD_SUCCESS
;
10169 DEFUN (no_bgp_distance_source_access_list
,
10170 no_bgp_distance_source_access_list_cmd
,
10171 "no distance (1-255) A.B.C.D/M WORD",
10173 "Define an administrative distance\n"
10174 "Administrative distance\n"
10175 "IP source prefix\n"
10176 "Access list name\n")
10178 int idx_number
= 2;
10179 int idx_ipv4_prefixlen
= 3;
10181 bgp_distance_unset (vty
, argv
[idx_number
]->arg
, argv
[idx_ipv4_prefixlen
]->arg
, argv
[idx_word
]->arg
);
10182 return CMD_SUCCESS
;
10185 DEFUN (ipv6_bgp_distance_source
,
10186 ipv6_bgp_distance_source_cmd
,
10187 "distance (1-255) X:X::X:X/M",
10188 "Define an administrative distance\n"
10189 "Administrative distance\n"
10190 "IP source prefix\n")
10192 bgp_distance_set (vty
, argv
[1]->arg
, argv
[2]->arg
, NULL
);
10193 return CMD_SUCCESS
;
10196 DEFUN (no_ipv6_bgp_distance_source
,
10197 no_ipv6_bgp_distance_source_cmd
,
10198 "no distance (1-255) X:X::X:X/M",
10200 "Define an administrative distance\n"
10201 "Administrative distance\n"
10202 "IP source prefix\n")
10204 bgp_distance_unset (vty
, argv
[2]->arg
, argv
[3]->arg
, NULL
);
10205 return CMD_SUCCESS
;
10208 DEFUN (ipv6_bgp_distance_source_access_list
,
10209 ipv6_bgp_distance_source_access_list_cmd
,
10210 "distance (1-255) X:X::X:X/M WORD",
10211 "Define an administrative distance\n"
10212 "Administrative distance\n"
10213 "IP source prefix\n"
10214 "Access list name\n")
10216 bgp_distance_set (vty
, argv
[1]->arg
, argv
[2]->arg
, argv
[3]->arg
);
10217 return CMD_SUCCESS
;
10220 DEFUN (no_ipv6_bgp_distance_source_access_list
,
10221 no_ipv6_bgp_distance_source_access_list_cmd
,
10222 "no distance (1-255) X:X::X:X/M WORD",
10224 "Define an administrative distance\n"
10225 "Administrative distance\n"
10226 "IP source prefix\n"
10227 "Access list name\n")
10229 bgp_distance_unset (vty
, argv
[2]->arg
, argv
[3]->arg
, argv
[4]->arg
);
10230 return CMD_SUCCESS
;
10233 DEFUN (bgp_damp_set
,
10235 "bgp dampening [(1-45) [(1-20000) (1-20000) (1-255)]]",
10236 "BGP Specific commands\n"
10237 "Enable route-flap dampening\n"
10238 "Half-life time for the penalty\n"
10239 "Value to start reusing a route\n"
10240 "Value to start suppressing a route\n"
10241 "Maximum duration to suppress a stable route\n")
10243 VTY_DECLVAR_CONTEXT(bgp
, bgp
);
10244 int idx_half_life
= 2;
10246 int idx_suppress
= 4;
10247 int idx_max_suppress
= 5;
10248 int half
= DEFAULT_HALF_LIFE
* 60;
10249 int reuse
= DEFAULT_REUSE
;
10250 int suppress
= DEFAULT_SUPPRESS
;
10251 int max
= 4 * half
;
10255 half
= atoi (argv
[idx_half_life
]->arg
) * 60;
10256 reuse
= atoi (argv
[idx_reuse
]->arg
);
10257 suppress
= atoi (argv
[idx_suppress
]->arg
);
10258 max
= atoi (argv
[idx_max_suppress
]->arg
) * 60;
10260 else if (argc
== 3)
10262 half
= atoi (argv
[idx_half_life
]->arg
) * 60;
10266 if (suppress
< reuse
)
10268 vty_out (vty
, "Suppress value cannot be less than reuse value %s",
10273 return bgp_damp_enable (bgp
, bgp_node_afi (vty
), bgp_node_safi (vty
),
10274 half
, reuse
, suppress
, max
);
10277 DEFUN (bgp_damp_unset
,
10278 bgp_damp_unset_cmd
,
10279 "no bgp dampening [(1-45) [(1-20000) (1-20000) (1-255)]]",
10281 "BGP Specific commands\n"
10282 "Enable route-flap dampening\n"
10283 "Half-life time for the penalty\n"
10284 "Value to start reusing a route\n"
10285 "Value to start suppressing a route\n"
10286 "Maximum duration to suppress a stable route\n")
10288 VTY_DECLVAR_CONTEXT(bgp
, bgp
);
10289 return bgp_damp_disable (bgp
, bgp_node_afi (vty
), bgp_node_safi (vty
));
10292 /* Display specified route of BGP table. */
10294 bgp_clear_damp_route (struct vty
*vty
, const char *view_name
,
10295 const char *ip_str
, afi_t afi
, safi_t safi
,
10296 struct prefix_rd
*prd
, int prefix_check
)
10299 struct prefix match
;
10300 struct bgp_node
*rn
;
10301 struct bgp_node
*rm
;
10302 struct bgp_info
*ri
;
10303 struct bgp_info
*ri_temp
;
10305 struct bgp_table
*table
;
10307 /* BGP structure lookup. */
10310 bgp
= bgp_lookup_by_name (view_name
);
10313 vty_out (vty
, "%% Can't find BGP instance %s%s", view_name
, VTY_NEWLINE
);
10314 return CMD_WARNING
;
10319 bgp
= bgp_get_default ();
10322 vty_out (vty
, "%% No BGP process is configured%s", VTY_NEWLINE
);
10323 return CMD_WARNING
;
10327 /* Check IP address argument. */
10328 ret
= str2prefix (ip_str
, &match
);
10331 vty_out (vty
, "%% address is malformed%s", VTY_NEWLINE
);
10332 return CMD_WARNING
;
10335 match
.family
= afi2family (afi
);
10337 if ((safi
== SAFI_MPLS_VPN
) || (safi
== SAFI_ENCAP
) || (safi
== SAFI_EVPN
))
10339 for (rn
= bgp_table_top (bgp
->rib
[AFI_IP
][safi
]); rn
; rn
= bgp_route_next (rn
))
10341 if (prd
&& memcmp (rn
->p
.u
.val
, prd
->val
, 8) != 0)
10344 if ((table
= rn
->info
) != NULL
)
10345 if ((rm
= bgp_node_match (table
, &match
)) != NULL
)
10347 if (! prefix_check
|| rm
->p
.prefixlen
== match
.prefixlen
)
10352 if (ri
->extra
&& ri
->extra
->damp_info
)
10354 ri_temp
= ri
->next
;
10355 bgp_damp_info_free (ri
->extra
->damp_info
, 1);
10363 bgp_unlock_node (rm
);
10369 if ((rn
= bgp_node_match (bgp
->rib
[afi
][safi
], &match
)) != NULL
)
10371 if (! prefix_check
|| rn
->p
.prefixlen
== match
.prefixlen
)
10376 if (ri
->extra
&& ri
->extra
->damp_info
)
10378 ri_temp
= ri
->next
;
10379 bgp_damp_info_free (ri
->extra
->damp_info
, 1);
10387 bgp_unlock_node (rn
);
10391 return CMD_SUCCESS
;
10394 DEFUN (clear_ip_bgp_dampening
,
10395 clear_ip_bgp_dampening_cmd
,
10396 "clear ip bgp dampening",
10400 "Clear route flap dampening information\n")
10402 bgp_damp_info_clean ();
10403 return CMD_SUCCESS
;
10406 DEFUN (clear_ip_bgp_dampening_prefix
,
10407 clear_ip_bgp_dampening_prefix_cmd
,
10408 "clear ip bgp dampening A.B.C.D/M",
10412 "Clear route flap dampening information\n"
10415 int idx_ipv4_prefixlen
= 4;
10416 return bgp_clear_damp_route (vty
, NULL
, argv
[idx_ipv4_prefixlen
]->arg
, AFI_IP
,
10417 SAFI_UNICAST
, NULL
, 1);
10420 DEFUN (clear_ip_bgp_dampening_address
,
10421 clear_ip_bgp_dampening_address_cmd
,
10422 "clear ip bgp dampening A.B.C.D",
10426 "Clear route flap dampening information\n"
10427 "Network to clear damping information\n")
10430 return bgp_clear_damp_route (vty
, NULL
, argv
[idx_ipv4
]->arg
, AFI_IP
,
10431 SAFI_UNICAST
, NULL
, 0);
10434 DEFUN (clear_ip_bgp_dampening_address_mask
,
10435 clear_ip_bgp_dampening_address_mask_cmd
,
10436 "clear ip bgp dampening A.B.C.D A.B.C.D",
10440 "Clear route flap dampening information\n"
10441 "Network to clear damping information\n"
10445 int idx_ipv4_2
= 5;
10447 char prefix_str
[BUFSIZ
];
10449 ret
= netmask_str2prefix_str (argv
[idx_ipv4
]->arg
, argv
[idx_ipv4_2
]->arg
, prefix_str
);
10452 vty_out (vty
, "%% Inconsistent address and mask%s", VTY_NEWLINE
);
10453 return CMD_WARNING
;
10456 return bgp_clear_damp_route (vty
, NULL
, prefix_str
, AFI_IP
,
10457 SAFI_UNICAST
, NULL
, 0);
10460 /* also used for encap safi */
10462 bgp_config_write_network_vpn (struct vty
*vty
, struct bgp
*bgp
,
10463 afi_t afi
, safi_t safi
, int *write
)
10465 struct bgp_node
*prn
;
10466 struct bgp_node
*rn
;
10467 struct bgp_table
*table
;
10469 struct prefix_rd
*prd
;
10470 struct bgp_static
*bgp_static
;
10472 char buf
[SU_ADDRSTRLEN
];
10473 char rdbuf
[RD_ADDRSTRLEN
];
10475 /* Network configuration. */
10476 for (prn
= bgp_table_top (bgp
->route
[afi
][safi
]); prn
; prn
= bgp_route_next (prn
))
10477 if ((table
= prn
->info
) != NULL
)
10478 for (rn
= bgp_table_top (table
); rn
; rn
= bgp_route_next (rn
))
10479 if ((bgp_static
= rn
->info
) != NULL
)
10482 prd
= (struct prefix_rd
*) &prn
->p
;
10484 /* "address-family" display. */
10485 bgp_config_write_family_header (vty
, afi
, safi
, write
);
10487 /* "network" configuration display. */
10488 prefix_rd2str (prd
, rdbuf
, RD_ADDRSTRLEN
);
10489 label
= decode_label (bgp_static
->tag
);
10491 vty_out (vty
, " network %s/%d rd %s tag %d",
10492 inet_ntop (p
->family
, &p
->u
.prefix
, buf
, SU_ADDRSTRLEN
),
10495 vty_out (vty
, "%s", VTY_NEWLINE
);
10501 bgp_config_write_network_evpn (struct vty
*vty
, struct bgp
*bgp
,
10502 afi_t afi
, safi_t safi
, int *write
)
10504 struct bgp_node
*prn
;
10505 struct bgp_node
*rn
;
10506 struct bgp_table
*table
;
10508 struct prefix_rd
*prd
;
10509 struct bgp_static
*bgp_static
;
10510 char buf
[PREFIX_STRLEN
];
10511 char buf2
[SU_ADDRSTRLEN
];
10512 char rdbuf
[RD_ADDRSTRLEN
];
10514 /* Network configuration. */
10515 for (prn
= bgp_table_top (bgp
->route
[afi
][safi
]); prn
; prn
= bgp_route_next (prn
))
10516 if ((table
= prn
->info
) != NULL
)
10517 for (rn
= bgp_table_top (table
); rn
; rn
= bgp_route_next (rn
))
10518 if ((bgp_static
= rn
->info
) != NULL
)
10520 char *macrouter
= NULL
;
10523 if(bgp_static
->router_mac
)
10524 macrouter
= mac2str(bgp_static
->router_mac
);
10525 if(bgp_static
->eth_s_id
)
10526 esi
= esi2str(bgp_static
->eth_s_id
);
10528 prd
= (struct prefix_rd
*) &prn
->p
;
10530 /* "address-family" display. */
10531 bgp_config_write_family_header (vty
, afi
, safi
, write
);
10533 /* "network" configuration display. */
10534 prefix_rd2str (prd
, rdbuf
, RD_ADDRSTRLEN
);
10536 inet_ntop (AF_INET
, &bgp_static
->igpnexthop
, buf2
, SU_ADDRSTRLEN
);
10538 prefix2str (p
, buf
, sizeof (buf
)),
10539 vty_out (vty
, " network %s rd %s ethtag %u tag %u esi %s gwip %s routermac %s",
10540 buf
, rdbuf
, p
->u
.prefix_evpn
.eth_tag
,
10541 decode_label (bgp_static
->tag
), esi
, buf2
, macrouter
);
10542 vty_out (vty
, "%s", VTY_NEWLINE
);
10547 /* Configuration of static route announcement and aggregate
10550 bgp_config_write_network (struct vty
*vty
, struct bgp
*bgp
,
10551 afi_t afi
, safi_t safi
, int *write
)
10553 struct bgp_node
*rn
;
10555 struct bgp_static
*bgp_static
;
10556 struct bgp_aggregate
*bgp_aggregate
;
10557 char buf
[SU_ADDRSTRLEN
];
10559 if ((safi
== SAFI_MPLS_VPN
) || (safi
== SAFI_ENCAP
))
10560 return bgp_config_write_network_vpn (vty
, bgp
, afi
, safi
, write
);
10562 if (afi
== AFI_L2VPN
&& safi
== SAFI_EVPN
)
10563 return bgp_config_write_network_evpn (vty
, bgp
, afi
, safi
, write
);
10565 /* Network configuration. */
10566 for (rn
= bgp_table_top (bgp
->route
[afi
][safi
]); rn
; rn
= bgp_route_next (rn
))
10567 if ((bgp_static
= rn
->info
) != NULL
)
10571 /* "address-family" display. */
10572 bgp_config_write_family_header (vty
, afi
, safi
, write
);
10574 /* "network" configuration display. */
10575 if (bgp_option_check (BGP_OPT_CONFIG_CISCO
) && afi
== AFI_IP
)
10577 u_int32_t destination
;
10578 struct in_addr netmask
;
10580 destination
= ntohl (p
->u
.prefix4
.s_addr
);
10581 masklen2ip (p
->prefixlen
, &netmask
);
10582 vty_out (vty
, " network %s",
10583 inet_ntop (p
->family
, &p
->u
.prefix
, buf
, SU_ADDRSTRLEN
));
10585 if ((IN_CLASSC (destination
) && p
->prefixlen
== 24)
10586 || (IN_CLASSB (destination
) && p
->prefixlen
== 16)
10587 || (IN_CLASSA (destination
) && p
->prefixlen
== 8)
10588 || p
->u
.prefix4
.s_addr
== 0)
10590 /* Natural mask is not display. */
10593 vty_out (vty
, " mask %s", inet_ntoa (netmask
));
10597 vty_out (vty
, " network %s/%d",
10598 inet_ntop (p
->family
, &p
->u
.prefix
, buf
, SU_ADDRSTRLEN
),
10602 if (bgp_static
->rmap
.name
)
10603 vty_out (vty
, " route-map %s", bgp_static
->rmap
.name
);
10606 if (bgp_static
->backdoor
)
10607 vty_out (vty
, " backdoor");
10610 vty_out (vty
, "%s", VTY_NEWLINE
);
10613 /* Aggregate-address configuration. */
10614 for (rn
= bgp_table_top (bgp
->aggregate
[afi
][safi
]); rn
; rn
= bgp_route_next (rn
))
10615 if ((bgp_aggregate
= rn
->info
) != NULL
)
10619 /* "address-family" display. */
10620 bgp_config_write_family_header (vty
, afi
, safi
, write
);
10622 if (bgp_option_check (BGP_OPT_CONFIG_CISCO
) && afi
== AFI_IP
)
10624 struct in_addr netmask
;
10626 masklen2ip (p
->prefixlen
, &netmask
);
10627 vty_out (vty
, " aggregate-address %s %s",
10628 inet_ntop (p
->family
, &p
->u
.prefix
, buf
, SU_ADDRSTRLEN
),
10629 inet_ntoa (netmask
));
10633 vty_out (vty
, " aggregate-address %s/%d",
10634 inet_ntop (p
->family
, &p
->u
.prefix
, buf
, SU_ADDRSTRLEN
),
10638 if (bgp_aggregate
->as_set
)
10639 vty_out (vty
, " as-set");
10641 if (bgp_aggregate
->summary_only
)
10642 vty_out (vty
, " summary-only");
10644 vty_out (vty
, "%s", VTY_NEWLINE
);
10651 bgp_config_write_distance (struct vty
*vty
, struct bgp
*bgp
, afi_t afi
,
10652 safi_t safi
, int *write
)
10654 struct bgp_node
*rn
;
10655 struct bgp_distance
*bdistance
;
10657 /* Distance configuration. */
10658 if (bgp
->distance_ebgp
[afi
][safi
]
10659 && bgp
->distance_ibgp
[afi
][safi
]
10660 && bgp
->distance_local
[afi
][safi
]
10661 && (bgp
->distance_ebgp
[afi
][safi
] != ZEBRA_EBGP_DISTANCE_DEFAULT
10662 || bgp
->distance_ibgp
[afi
][safi
] != ZEBRA_IBGP_DISTANCE_DEFAULT
10663 || bgp
->distance_local
[afi
][safi
] != ZEBRA_IBGP_DISTANCE_DEFAULT
))
10665 bgp_config_write_family_header (vty
, afi
, safi
, write
);
10666 vty_out (vty
, " distance bgp %d %d %d%s",
10667 bgp
->distance_ebgp
[afi
][safi
], bgp
->distance_ibgp
[afi
][safi
],
10668 bgp
->distance_local
[afi
][safi
], VTY_NEWLINE
);
10671 for (rn
= bgp_table_top (bgp_distance_table
[afi
][safi
]); rn
;
10672 rn
= bgp_route_next (rn
))
10673 if ((bdistance
= rn
->info
) != NULL
)
10675 char buf
[PREFIX_STRLEN
];
10677 bgp_config_write_family_header (vty
, afi
, safi
, write
);
10678 vty_out (vty
, " distance %d %s %s%s", bdistance
->distance
,
10679 prefix2str (&rn
->p
, buf
, sizeof (buf
)),
10680 bdistance
->access_list
? bdistance
->access_list
: "",
10687 /* Allocate routing table structure and install commands. */
10689 bgp_route_init (void)
10694 /* Init BGP distance table. */
10695 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++)
10696 for (safi
= SAFI_UNICAST
; safi
< SAFI_MAX
; safi
++)
10697 bgp_distance_table
[afi
][safi
] = bgp_table_init (afi
, safi
);
10699 /* IPv4 BGP commands. */
10700 install_element (BGP_NODE
, &bgp_table_map_cmd
);
10701 install_element (BGP_NODE
, &bgp_network_cmd
);
10702 install_element (BGP_NODE
, &bgp_network_mask_cmd
);
10703 install_element (BGP_NODE
, &bgp_network_mask_natural_cmd
);
10704 install_element (BGP_NODE
, &bgp_network_route_map_cmd
);
10705 install_element (BGP_NODE
, &bgp_network_mask_route_map_cmd
);
10706 install_element (BGP_NODE
, &bgp_network_mask_natural_route_map_cmd
);
10707 install_element (BGP_NODE
, &bgp_network_backdoor_cmd
);
10708 install_element (BGP_NODE
, &bgp_network_mask_backdoor_cmd
);
10709 install_element (BGP_NODE
, &bgp_network_mask_natural_backdoor_cmd
);
10710 install_element (BGP_NODE
, &no_bgp_table_map_cmd
);
10711 install_element (BGP_NODE
, &no_bgp_network_cmd
);
10712 install_element (BGP_NODE
, &no_bgp_network_mask_cmd
);
10713 install_element (BGP_NODE
, &no_bgp_network_mask_natural_cmd
);
10715 install_element (BGP_NODE
, &aggregate_address_cmd
);
10716 install_element (BGP_NODE
, &aggregate_address_mask_cmd
);
10717 install_element (BGP_NODE
, &no_aggregate_address_cmd
);
10718 install_element (BGP_NODE
, &no_aggregate_address_mask_cmd
);
10720 /* IPv4 unicast configuration. */
10721 install_element (BGP_IPV4_NODE
, &bgp_table_map_cmd
);
10722 install_element (BGP_IPV4_NODE
, &bgp_network_cmd
);
10723 install_element (BGP_IPV4_NODE
, &bgp_network_mask_cmd
);
10724 install_element (BGP_IPV4_NODE
, &bgp_network_mask_natural_cmd
);
10725 install_element (BGP_IPV4_NODE
, &bgp_network_route_map_cmd
);
10726 install_element (BGP_IPV4_NODE
, &bgp_network_mask_route_map_cmd
);
10727 install_element (BGP_IPV4_NODE
, &bgp_network_mask_natural_route_map_cmd
);
10728 install_element (BGP_IPV4_NODE
, &no_bgp_table_map_cmd
);
10729 install_element (BGP_IPV4_NODE
, &no_bgp_network_cmd
);
10730 install_element (BGP_IPV4_NODE
, &no_bgp_network_mask_cmd
);
10731 install_element (BGP_IPV4_NODE
, &no_bgp_network_mask_natural_cmd
);
10733 install_element (BGP_IPV4_NODE
, &aggregate_address_cmd
);
10734 install_element (BGP_IPV4_NODE
, &aggregate_address_mask_cmd
);
10735 install_element (BGP_IPV4_NODE
, &no_aggregate_address_cmd
);
10736 install_element (BGP_IPV4_NODE
, &no_aggregate_address_mask_cmd
);
10738 /* IPv4 multicast configuration. */
10739 install_element (BGP_IPV4M_NODE
, &bgp_table_map_cmd
);
10740 install_element (BGP_IPV4M_NODE
, &bgp_network_cmd
);
10741 install_element (BGP_IPV4M_NODE
, &bgp_network_mask_cmd
);
10742 install_element (BGP_IPV4M_NODE
, &bgp_network_mask_natural_cmd
);
10743 install_element (BGP_IPV4M_NODE
, &bgp_network_route_map_cmd
);
10744 install_element (BGP_IPV4M_NODE
, &bgp_network_mask_route_map_cmd
);
10745 install_element (BGP_IPV4M_NODE
, &bgp_network_mask_natural_route_map_cmd
);
10746 install_element (BGP_IPV4M_NODE
, &no_bgp_table_map_cmd
);
10747 install_element (BGP_IPV4M_NODE
, &no_bgp_network_cmd
);
10748 install_element (BGP_IPV4M_NODE
, &no_bgp_network_mask_cmd
);
10749 install_element (BGP_IPV4M_NODE
, &no_bgp_network_mask_natural_cmd
);
10750 install_element (BGP_IPV4M_NODE
, &aggregate_address_cmd
);
10751 install_element (BGP_IPV4M_NODE
, &aggregate_address_mask_cmd
);
10752 install_element (BGP_IPV4M_NODE
, &no_aggregate_address_cmd
);
10753 install_element (BGP_IPV4M_NODE
, &no_aggregate_address_mask_cmd
);
10755 install_element (VIEW_NODE
, &show_ip_bgp_instance_all_cmd
);
10756 install_element (VIEW_NODE
, &show_ip_bgp_cmd
);
10757 install_element (VIEW_NODE
, &show_ip_bgp_route_cmd
);
10758 install_element (VIEW_NODE
, &show_ip_bgp_regexp_cmd
);
10760 install_element (VIEW_NODE
, &show_ip_bgp_instance_neighbor_advertised_route_cmd
);
10761 install_element (VIEW_NODE
, &show_ip_bgp_neighbor_routes_cmd
);
10762 install_element (VIEW_NODE
, &show_ip_bgp_neighbor_received_prefix_filter_cmd
);
10763 #ifdef KEEP_OLD_VPN_COMMANDS
10764 install_element (VIEW_NODE
, &show_ip_bgp_vpn_all_route_prefix_cmd
);
10765 #endif /* KEEP_OLD_VPN_COMMANDS */
10766 install_element (VIEW_NODE
, &show_bgp_afi_vpn_rd_route_cmd
);
10767 install_element (VIEW_NODE
, &show_ip_bgp_l2vpn_evpn_all_route_prefix_cmd
);
10769 /* BGP dampening clear commands */
10770 install_element (ENABLE_NODE
, &clear_ip_bgp_dampening_cmd
);
10771 install_element (ENABLE_NODE
, &clear_ip_bgp_dampening_prefix_cmd
);
10773 install_element (ENABLE_NODE
, &clear_ip_bgp_dampening_address_cmd
);
10774 install_element (ENABLE_NODE
, &clear_ip_bgp_dampening_address_mask_cmd
);
10777 install_element (ENABLE_NODE
, &show_ip_bgp_instance_neighbor_prefix_counts_cmd
);
10778 #ifdef KEEP_OLD_VPN_COMMANDS
10779 install_element (ENABLE_NODE
, &show_ip_bgp_vpn_neighbor_prefix_counts_cmd
);
10780 #endif /* KEEP_OLD_VPN_COMMANDS */
10782 /* New config IPv6 BGP commands. */
10783 install_element (BGP_IPV6_NODE
, &bgp_table_map_cmd
);
10784 install_element (BGP_IPV6_NODE
, &ipv6_bgp_network_cmd
);
10785 install_element (BGP_IPV6_NODE
, &ipv6_bgp_network_route_map_cmd
);
10786 install_element (BGP_IPV6_NODE
, &no_bgp_table_map_cmd
);
10787 install_element (BGP_IPV6_NODE
, &no_ipv6_bgp_network_cmd
);
10789 install_element (BGP_IPV6_NODE
, &ipv6_aggregate_address_cmd
);
10790 install_element (BGP_IPV6_NODE
, &no_ipv6_aggregate_address_cmd
);
10792 install_element (BGP_IPV6M_NODE
, &ipv6_bgp_network_cmd
);
10793 install_element (BGP_IPV6M_NODE
, &no_ipv6_bgp_network_cmd
);
10795 install_element (BGP_NODE
, &bgp_distance_cmd
);
10796 install_element (BGP_NODE
, &no_bgp_distance_cmd
);
10797 install_element (BGP_NODE
, &bgp_distance_source_cmd
);
10798 install_element (BGP_NODE
, &no_bgp_distance_source_cmd
);
10799 install_element (BGP_NODE
, &bgp_distance_source_access_list_cmd
);
10800 install_element (BGP_NODE
, &no_bgp_distance_source_access_list_cmd
);
10801 install_element (BGP_IPV4_NODE
, &bgp_distance_cmd
);
10802 install_element (BGP_IPV4_NODE
, &no_bgp_distance_cmd
);
10803 install_element (BGP_IPV4_NODE
, &bgp_distance_source_cmd
);
10804 install_element (BGP_IPV4_NODE
, &no_bgp_distance_source_cmd
);
10805 install_element (BGP_IPV4_NODE
, &bgp_distance_source_access_list_cmd
);
10806 install_element (BGP_IPV4_NODE
, &no_bgp_distance_source_access_list_cmd
);
10807 install_element (BGP_IPV4M_NODE
, &bgp_distance_cmd
);
10808 install_element (BGP_IPV4M_NODE
, &no_bgp_distance_cmd
);
10809 install_element (BGP_IPV4M_NODE
, &bgp_distance_source_cmd
);
10810 install_element (BGP_IPV4M_NODE
, &no_bgp_distance_source_cmd
);
10811 install_element (BGP_IPV4M_NODE
, &bgp_distance_source_access_list_cmd
);
10812 install_element (BGP_IPV4M_NODE
, &no_bgp_distance_source_access_list_cmd
);
10813 install_element (BGP_IPV6_NODE
, &bgp_distance_cmd
);
10814 install_element (BGP_IPV6_NODE
, &no_bgp_distance_cmd
);
10815 install_element (BGP_IPV6_NODE
, &ipv6_bgp_distance_source_cmd
);
10816 install_element (BGP_IPV6_NODE
, &no_ipv6_bgp_distance_source_cmd
);
10817 install_element (BGP_IPV6_NODE
, &ipv6_bgp_distance_source_access_list_cmd
);
10818 install_element (BGP_IPV6_NODE
, &no_ipv6_bgp_distance_source_access_list_cmd
);
10819 install_element (BGP_IPV6M_NODE
, &bgp_distance_cmd
);
10820 install_element (BGP_IPV6M_NODE
, &no_bgp_distance_cmd
);
10821 install_element (BGP_IPV6M_NODE
, &ipv6_bgp_distance_source_cmd
);
10822 install_element (BGP_IPV6M_NODE
, &no_ipv6_bgp_distance_source_cmd
);
10823 install_element (BGP_IPV6M_NODE
, &ipv6_bgp_distance_source_access_list_cmd
);
10824 install_element (BGP_IPV6M_NODE
, &no_ipv6_bgp_distance_source_access_list_cmd
);
10826 install_element (BGP_NODE
, &bgp_damp_set_cmd
);
10827 install_element (BGP_NODE
, &bgp_damp_unset_cmd
);
10828 install_element (BGP_IPV4_NODE
, &bgp_damp_set_cmd
);
10829 install_element (BGP_IPV4_NODE
, &bgp_damp_unset_cmd
);
10831 /* IPv4 Multicast Mode */
10832 install_element (BGP_IPV4M_NODE
, &bgp_damp_set_cmd
);
10833 install_element (BGP_IPV4M_NODE
, &bgp_damp_unset_cmd
);
10835 /* Large Communities */
10836 install_element (VIEW_NODE
, &show_ip_bgp_large_community_list_cmd
);
10837 install_element (VIEW_NODE
, &show_ip_bgp_large_community_cmd
);
10841 bgp_route_finish (void)
10846 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++)
10847 for (safi
= SAFI_UNICAST
; safi
< SAFI_MAX
; safi
++)
10849 bgp_table_unlock (bgp_distance_table
[afi
][safi
]);
10850 bgp_distance_table
[afi
][safi
] = NULL
;