]> git.proxmox.com Git - mirror_frr.git/blob - bgpd/bgp_route.c
projects / mirror_frr.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Merge branch 'master' of https://github.com/FRRouting/frr into community
[mirror_frr.git] / bgpd / bgp_route.c
1 /* BGP routing information
2 * Copyright (C) 1996, 97, 98, 99 Kunihiro Ishiguro
3 * Copyright (C) 2016 Job Snijders <job@instituut.net>
4 *
5 * This file is part of GNU Zebra.
6 *
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
10 * later version.
11 *
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.
16 *
17 * You should have received a copy of the GNU General Public License along
18 * with this program; see the file COPYING; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
20 */
21
22 #include <zebra.h>
23 #include <math.h>
24
25 #include "prefix.h"
26 #include "linklist.h"
27 #include "memory.h"
28 #include "command.h"
29 #include "stream.h"
30 #include "filter.h"
31 #include "log.h"
32 #include "routemap.h"
33 #include "buffer.h"
34 #include "sockunion.h"
35 #include "plist.h"
36 #include "thread.h"
37 #include "workqueue.h"
38 #include "queue.h"
39 #include "memory.h"
40 #include "lib/json.h"
41 #include "lib_errors.h"
42
43 #include "bgpd/bgpd.h"
44 #include "bgpd/bgp_table.h"
45 #include "bgpd/bgp_route.h"
46 #include "bgpd/bgp_attr.h"
47 #include "bgpd/bgp_debug.h"
48 #include "bgpd/bgp_errors.h"
49 #include "bgpd/bgp_aspath.h"
50 #include "bgpd/bgp_regex.h"
51 #include "bgpd/bgp_community.h"
52 #include "bgpd/bgp_ecommunity.h"
53 #include "bgpd/bgp_lcommunity.h"
54 #include "bgpd/bgp_clist.h"
55 #include "bgpd/bgp_packet.h"
56 #include "bgpd/bgp_filter.h"
57 #include "bgpd/bgp_fsm.h"
58 #include "bgpd/bgp_mplsvpn.h"
59 #include "bgpd/bgp_nexthop.h"
60 #include "bgpd/bgp_damp.h"
61 #include "bgpd/bgp_advertise.h"
62 #include "bgpd/bgp_zebra.h"
63 #include "bgpd/bgp_vty.h"
64 #include "bgpd/bgp_mpath.h"
65 #include "bgpd/bgp_nht.h"
66 #include "bgpd/bgp_updgrp.h"
67 #include "bgpd/bgp_label.h"
68
69 #if ENABLE_BGP_VNC
70 #include "bgpd/rfapi/rfapi_backend.h"
71 #include "bgpd/rfapi/vnc_import_bgp.h"
72 #include "bgpd/rfapi/vnc_export_bgp.h"
73 #endif
74 #include "bgpd/bgp_encap_types.h"
75 #include "bgpd/bgp_encap_tlv.h"
76 #include "bgpd/bgp_evpn.h"
77 #include "bgpd/bgp_evpn_vty.h"
78 #include "bgpd/bgp_flowspec.h"
79 #include "bgpd/bgp_flowspec_util.h"
80 #include "bgpd/bgp_pbr.h"
81
82 #ifndef VTYSH_EXTRACT_PL
83 #include "bgpd/bgp_route_clippy.c"
84 #endif
85
86 /* Extern from bgp_dump.c */
87 extern const char *bgp_origin_str[];
88 extern const char *bgp_origin_long_str[];
89
90 /* PMSI strings. */
91 #define PMSI_TNLTYPE_STR_NO_INFO "No info"
92 #define PMSI_TNLTYPE_STR_DEFAULT PMSI_TNLTYPE_STR_NO_INFO
93 static const struct message bgp_pmsi_tnltype_str[] = {
94 {PMSI_TNLTYPE_NO_INFO, PMSI_TNLTYPE_STR_NO_INFO},
95 {PMSI_TNLTYPE_RSVP_TE_P2MP, "RSVP-TE P2MP"},
96 {PMSI_TNLTYPE_MLDP_P2MP, "mLDP P2MP"},
97 {PMSI_TNLTYPE_PIM_SSM, "PIM-SSM"},
98 {PMSI_TNLTYPE_PIM_SM, "PIM-SM"},
99 {PMSI_TNLTYPE_PIM_BIDIR, "PIM-BIDIR"},
100 {PMSI_TNLTYPE_INGR_REPL, "Ingress Replication"},
101 {PMSI_TNLTYPE_MLDP_MP2MP, "mLDP MP2MP"},
102 {0}
103 };
104
105 #define VRFID_NONE_STR "-"
106
107 struct bgp_node *bgp_afi_node_get(struct bgp_table *table, afi_t afi,
108 safi_t safi, struct prefix *p,
109 struct prefix_rd *prd)
110 {
111 struct bgp_node *rn;
112 struct bgp_node *prn = NULL;
113
114 assert(table);
115 if (!table)
116 return NULL;
117
118 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_ENCAP)
119 || (safi == SAFI_EVPN)) {
120 prn = bgp_node_get(table, (struct prefix *)prd);
121
122 if (prn->info == NULL)
123 prn->info = bgp_table_init(table->bgp, afi, safi);
124 else
125 bgp_unlock_node(prn);
126 table = prn->info;
127 }
128
129 rn = bgp_node_get(table, p);
130
131 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_ENCAP)
132 || (safi == SAFI_EVPN))
133 rn->prn = prn;
134
135 return rn;
136 }
137
138 struct bgp_node *bgp_afi_node_lookup(struct bgp_table *table, afi_t afi,
139 safi_t safi, struct prefix *p,
140 struct prefix_rd *prd)
141 {
142 struct bgp_node *rn;
143 struct bgp_node *prn = NULL;
144
145 if (!table)
146 return NULL;
147
148 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_ENCAP)
149 || (safi == SAFI_EVPN)) {
150 prn = bgp_node_lookup(table, (struct prefix *)prd);
151 if (!prn)
152 return NULL;
153
154 if (prn->info == NULL) {
155 bgp_unlock_node(prn);
156 return NULL;
157 }
158
159 table = prn->info;
160 }
161
162 rn = bgp_node_lookup(table, p);
163
164 return rn;
165 }
166
167 /* Allocate bgp_path_info_extra */
168 static struct bgp_path_info_extra *bgp_path_info_extra_new(void)
169 {
170 struct bgp_path_info_extra *new;
171 new = XCALLOC(MTYPE_BGP_ROUTE_EXTRA,
172 sizeof(struct bgp_path_info_extra));
173 new->label[0] = MPLS_INVALID_LABEL;
174 new->num_labels = 0;
175 return new;
176 }
177
178 static void bgp_path_info_extra_free(struct bgp_path_info_extra **extra)
179 {
180 struct bgp_path_info_extra *e;
181
182 if (!extra || !*extra)
183 return;
184
185 e = *extra;
186 if (e->damp_info)
187 bgp_damp_info_free(e->damp_info, 0);
188
189 e->damp_info = NULL;
190 if (e->parent) {
191 struct bgp_path_info *bpi = (struct bgp_path_info *)e->parent;
192
193 if (bpi->net) {
194 /* FIXME: since multiple e may have the same e->parent
195 * and e->parent->net is holding a refcount for each
196 * of them, we need to do some fudging here.
197 *
198 * WARNING: if bpi->net->lock drops to 0, bpi may be
199 * freed as well (because bpi->net was holding the
200 * last reference to bpi) => write after free!
201 */
202 unsigned refcount;
203
204 bpi = bgp_path_info_lock(bpi);
205 refcount = bpi->net->lock - 1;
206 bgp_unlock_node((struct bgp_node *)bpi->net);
207 if (!refcount)
208 bpi->net = NULL;
209 bgp_path_info_unlock(bpi);
210 }
211 bgp_path_info_unlock(e->parent);
212 e->parent = NULL;
213 }
214
215 if (e->bgp_orig)
216 bgp_unlock(e->bgp_orig);
217
218 if ((*extra)->bgp_fs_pbr)
219 list_delete(&((*extra)->bgp_fs_pbr));
220 XFREE(MTYPE_BGP_ROUTE_EXTRA, *extra);
221
222 *extra = NULL;
223 }
224
225 /* Get bgp_path_info extra information for the given bgp_path_info, lazy
226 * allocated if required.
227 */
228 struct bgp_path_info_extra *bgp_path_info_extra_get(struct bgp_path_info *pi)
229 {
230 if (!pi->extra)
231 pi->extra = bgp_path_info_extra_new();
232 return pi->extra;
233 }
234
235 /* Allocate new bgp info structure. */
236 struct bgp_path_info *bgp_path_info_new(void)
237 {
238 return XCALLOC(MTYPE_BGP_ROUTE, sizeof(struct bgp_path_info));
239 }
240
241 /* Free bgp route information. */
242 static void bgp_path_info_free(struct bgp_path_info *path)
243 {
244 if (path->attr)
245 bgp_attr_unintern(&path->attr);
246
247 bgp_unlink_nexthop(path);
248 bgp_path_info_extra_free(&path->extra);
249 bgp_path_info_mpath_free(&path->mpath);
250
251 peer_unlock(path->peer); /* bgp_path_info peer reference */
252
253 XFREE(MTYPE_BGP_ROUTE, path);
254 }
255
256 struct bgp_path_info *bgp_path_info_lock(struct bgp_path_info *path)
257 {
258 path->lock++;
259 return path;
260 }
261
262 struct bgp_path_info *bgp_path_info_unlock(struct bgp_path_info *path)
263 {
264 assert(path && path->lock > 0);
265 path->lock--;
266
267 if (path->lock == 0) {
268 #if 0
269 zlog_debug ("%s: unlocked and freeing", __func__);
270 zlog_backtrace (LOG_DEBUG);
271 #endif
272 bgp_path_info_free(path);
273 return NULL;
274 }
275
276 #if 0
277 if (path->lock == 1)
278 {
279 zlog_debug ("%s: unlocked to 1", __func__);
280 zlog_backtrace (LOG_DEBUG);
281 }
282 #endif
283
284 return path;
285 }
286
287 void bgp_path_info_add(struct bgp_node *rn, struct bgp_path_info *pi)
288 {
289 struct bgp_path_info *top;
290
291 top = rn->info;
292
293 pi->next = rn->info;
294 pi->prev = NULL;
295 if (top)
296 top->prev = pi;
297 rn->info = pi;
298
299 bgp_path_info_lock(pi);
300 bgp_lock_node(rn);
301 peer_lock(pi->peer); /* bgp_path_info peer reference */
302 }
303
304 /* Do the actual removal of info from RIB, for use by bgp_process
305 completion callback *only* */
306 void bgp_path_info_reap(struct bgp_node *rn, struct bgp_path_info *pi)
307 {
308 if (pi->next)
309 pi->next->prev = pi->prev;
310 if (pi->prev)
311 pi->prev->next = pi->next;
312 else
313 rn->info = pi->next;
314
315 bgp_path_info_mpath_dequeue(pi);
316 bgp_path_info_unlock(pi);
317 bgp_unlock_node(rn);
318 }
319
320 void bgp_path_info_delete(struct bgp_node *rn, struct bgp_path_info *pi)
321 {
322 bgp_path_info_set_flag(rn, pi, BGP_PATH_REMOVED);
323 /* set of previous already took care of pcount */
324 UNSET_FLAG(pi->flags, BGP_PATH_VALID);
325 }
326
327 /* undo the effects of a previous call to bgp_path_info_delete; typically
328 called when a route is deleted and then quickly re-added before the
329 deletion has been processed */
330 void bgp_path_info_restore(struct bgp_node *rn, struct bgp_path_info *pi)
331 {
332 bgp_path_info_unset_flag(rn, pi, BGP_PATH_REMOVED);
333 /* unset of previous already took care of pcount */
334 SET_FLAG(pi->flags, BGP_PATH_VALID);
335 }
336
337 /* Adjust pcount as required */
338 static void bgp_pcount_adjust(struct bgp_node *rn, struct bgp_path_info *pi)
339 {
340 struct bgp_table *table;
341
342 assert(rn && bgp_node_table(rn));
343 assert(pi && pi->peer && pi->peer->bgp);
344
345 table = bgp_node_table(rn);
346
347 if (pi->peer == pi->peer->bgp->peer_self)
348 return;
349
350 if (!BGP_PATH_COUNTABLE(pi)
351 && CHECK_FLAG(pi->flags, BGP_PATH_COUNTED)) {
352
353 UNSET_FLAG(pi->flags, BGP_PATH_COUNTED);
354
355 /* slight hack, but more robust against errors. */
356 if (pi->peer->pcount[table->afi][table->safi])
357 pi->peer->pcount[table->afi][table->safi]--;
358 else
359 flog_err(EC_LIB_DEVELOPMENT,
360 "Asked to decrement 0 prefix count for peer");
361 } else if (BGP_PATH_COUNTABLE(pi)
362 && !CHECK_FLAG(pi->flags, BGP_PATH_COUNTED)) {
363 SET_FLAG(pi->flags, BGP_PATH_COUNTED);
364 pi->peer->pcount[table->afi][table->safi]++;
365 }
366 }
367
368 static int bgp_label_index_differs(struct bgp_path_info *pi1,
369 struct bgp_path_info *pi2)
370 {
371 return (!(pi1->attr->label_index == pi2->attr->label_index));
372 }
373
374 /* Set/unset bgp_path_info flags, adjusting any other state as needed.
375 * This is here primarily to keep prefix-count in check.
376 */
377 void bgp_path_info_set_flag(struct bgp_node *rn, struct bgp_path_info *pi,
378 uint32_t flag)
379 {
380 SET_FLAG(pi->flags, flag);
381
382 /* early bath if we know it's not a flag that changes countability state
383 */
384 if (!CHECK_FLAG(flag,
385 BGP_PATH_VALID | BGP_PATH_HISTORY | BGP_PATH_REMOVED))
386 return;
387
388 bgp_pcount_adjust(rn, pi);
389 }
390
391 void bgp_path_info_unset_flag(struct bgp_node *rn, struct bgp_path_info *pi,
392 uint32_t flag)
393 {
394 UNSET_FLAG(pi->flags, flag);
395
396 /* early bath if we know it's not a flag that changes countability state
397 */
398 if (!CHECK_FLAG(flag,
399 BGP_PATH_VALID | BGP_PATH_HISTORY | BGP_PATH_REMOVED))
400 return;
401
402 bgp_pcount_adjust(rn, pi);
403 }
404
405 /* Get MED value. If MED value is missing and "bgp bestpath
406 missing-as-worst" is specified, treat it as the worst value. */
407 static uint32_t bgp_med_value(struct attr *attr, struct bgp *bgp)
408 {
409 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC))
410 return attr->med;
411 else {
412 if (bgp_flag_check(bgp, BGP_FLAG_MED_MISSING_AS_WORST))
413 return BGP_MED_MAX;
414 else
415 return 0;
416 }
417 }
418
419 void bgp_path_info_path_with_addpath_rx_str(struct bgp_path_info *pi, char *buf)
420 {
421 if (pi->addpath_rx_id)
422 sprintf(buf, "path %s (addpath rxid %d)", pi->peer->host,
423 pi->addpath_rx_id);
424 else
425 sprintf(buf, "path %s", pi->peer->host);
426 }
427
428 /* Compare two bgp route entity. If 'new' is preferable over 'exist' return 1.
429 */
430 static int bgp_path_info_cmp(struct bgp *bgp, struct bgp_path_info *new,
431 struct bgp_path_info *exist, int *paths_eq,
432 struct bgp_maxpaths_cfg *mpath_cfg, int debug,
433 char *pfx_buf, afi_t afi, safi_t safi)
434 {
435 struct attr *newattr, *existattr;
436 bgp_peer_sort_t new_sort;
437 bgp_peer_sort_t exist_sort;
438 uint32_t new_pref;
439 uint32_t exist_pref;
440 uint32_t new_med;
441 uint32_t exist_med;
442 uint32_t new_weight;
443 uint32_t exist_weight;
444 uint32_t newm, existm;
445 struct in_addr new_id;
446 struct in_addr exist_id;
447 int new_cluster;
448 int exist_cluster;
449 int internal_as_route;
450 int confed_as_route;
451 int ret = 0;
452 char new_buf[PATH_ADDPATH_STR_BUFFER];
453 char exist_buf[PATH_ADDPATH_STR_BUFFER];
454 uint32_t new_mm_seq;
455 uint32_t exist_mm_seq;
456
457 *paths_eq = 0;
458
459 /* 0. Null check. */
460 if (new == NULL) {
461 if (debug)
462 zlog_debug("%s: new is NULL", pfx_buf);
463 return 0;
464 }
465
466 if (debug)
467 bgp_path_info_path_with_addpath_rx_str(new, new_buf);
468
469 if (exist == NULL) {
470 if (debug)
471 zlog_debug("%s: %s is the initial bestpath", pfx_buf,
472 new_buf);
473 return 1;
474 }
475
476 if (debug) {
477 bgp_path_info_path_with_addpath_rx_str(exist, exist_buf);
478 zlog_debug("%s: Comparing %s flags 0x%x with %s flags 0x%x",
479 pfx_buf, new_buf, new->flags, exist_buf,
480 exist->flags);
481 }
482
483 newattr = new->attr;
484 existattr = exist->attr;
485
486 /* For EVPN routes, we cannot just go by local vs remote, we have to
487 * look at the MAC mobility sequence number, if present.
488 */
489 if (safi == SAFI_EVPN) {
490 /* This is an error condition described in RFC 7432 Section
491 * 15.2. The RFC
492 * states that in this scenario "the PE MUST alert the operator"
493 * but it
494 * does not state what other action to take. In order to provide
495 * some
496 * consistency in this scenario we are going to prefer the path
497 * with the
498 * sticky flag.
499 */
500 if (newattr->sticky != existattr->sticky) {
501 if (!debug) {
502 prefix2str(&new->net->p, pfx_buf,
503 sizeof(*pfx_buf)
504 * PREFIX2STR_BUFFER);
505 bgp_path_info_path_with_addpath_rx_str(new,
506 new_buf);
507 bgp_path_info_path_with_addpath_rx_str(
508 exist, exist_buf);
509 }
510
511 if (newattr->sticky && !existattr->sticky) {
512 if (debug)
513 zlog_debug(
514 "%s: %s wins over %s due to sticky MAC flag",
515 pfx_buf, new_buf, exist_buf);
516 return 1;
517 }
518
519 if (!newattr->sticky && existattr->sticky) {
520 if (debug)
521 zlog_debug(
522 "%s: %s loses to %s due to sticky MAC flag",
523 pfx_buf, new_buf, exist_buf);
524 return 0;
525 }
526 }
527
528 new_mm_seq = mac_mobility_seqnum(newattr);
529 exist_mm_seq = mac_mobility_seqnum(existattr);
530
531 if (new_mm_seq > exist_mm_seq) {
532 if (debug)
533 zlog_debug(
534 "%s: %s wins over %s due to MM seq %u > %u",
535 pfx_buf, new_buf, exist_buf, new_mm_seq,
536 exist_mm_seq);
537 return 1;
538 }
539
540 if (new_mm_seq < exist_mm_seq) {
541 if (debug)
542 zlog_debug(
543 "%s: %s loses to %s due to MM seq %u < %u",
544 pfx_buf, new_buf, exist_buf, new_mm_seq,
545 exist_mm_seq);
546 return 0;
547 }
548 }
549
550 /* 1. Weight check. */
551 new_weight = newattr->weight;
552 exist_weight = existattr->weight;
553
554 if (new_weight > exist_weight) {
555 if (debug)
556 zlog_debug("%s: %s wins over %s due to weight %d > %d",
557 pfx_buf, new_buf, exist_buf, new_weight,
558 exist_weight);
559 return 1;
560 }
561
562 if (new_weight < exist_weight) {
563 if (debug)
564 zlog_debug("%s: %s loses to %s due to weight %d < %d",
565 pfx_buf, new_buf, exist_buf, new_weight,
566 exist_weight);
567 return 0;
568 }
569
570 /* 2. Local preference check. */
571 new_pref = exist_pref = bgp->default_local_pref;
572
573 if (newattr->flag & ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF))
574 new_pref = newattr->local_pref;
575 if (existattr->flag & ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF))
576 exist_pref = existattr->local_pref;
577
578 if (new_pref > exist_pref) {
579 if (debug)
580 zlog_debug(
581 "%s: %s wins over %s due to localpref %d > %d",
582 pfx_buf, new_buf, exist_buf, new_pref,
583 exist_pref);
584 return 1;
585 }
586
587 if (new_pref < exist_pref) {
588 if (debug)
589 zlog_debug(
590 "%s: %s loses to %s due to localpref %d < %d",
591 pfx_buf, new_buf, exist_buf, new_pref,
592 exist_pref);
593 return 0;
594 }
595
596 /* 3. Local route check. We prefer:
597 * - BGP_ROUTE_STATIC
598 * - BGP_ROUTE_AGGREGATE
599 * - BGP_ROUTE_REDISTRIBUTE
600 */
601 if (!(new->sub_type == BGP_ROUTE_NORMAL ||
602 new->sub_type == BGP_ROUTE_IMPORTED)) {
603 if (debug)
604 zlog_debug(
605 "%s: %s wins over %s due to preferred BGP_ROUTE type",
606 pfx_buf, new_buf, exist_buf);
607 return 1;
608 }
609
610 if (!(exist->sub_type == BGP_ROUTE_NORMAL ||
611 exist->sub_type == BGP_ROUTE_IMPORTED)) {
612 if (debug)
613 zlog_debug(
614 "%s: %s loses to %s due to preferred BGP_ROUTE type",
615 pfx_buf, new_buf, exist_buf);
616 return 0;
617 }
618
619 /* 4. AS path length check. */
620 if (!bgp_flag_check(bgp, BGP_FLAG_ASPATH_IGNORE)) {
621 int exist_hops = aspath_count_hops(existattr->aspath);
622 int exist_confeds = aspath_count_confeds(existattr->aspath);
623
624 if (bgp_flag_check(bgp, BGP_FLAG_ASPATH_CONFED)) {
625 int aspath_hops;
626
627 aspath_hops = aspath_count_hops(newattr->aspath);
628 aspath_hops += aspath_count_confeds(newattr->aspath);
629
630 if (aspath_hops < (exist_hops + exist_confeds)) {
631 if (debug)
632 zlog_debug(
633 "%s: %s wins over %s due to aspath (with confeds) hopcount %d < %d",
634 pfx_buf, new_buf, exist_buf,
635 aspath_hops,
636 (exist_hops + exist_confeds));
637 return 1;
638 }
639
640 if (aspath_hops > (exist_hops + exist_confeds)) {
641 if (debug)
642 zlog_debug(
643 "%s: %s loses to %s due to aspath (with confeds) hopcount %d > %d",
644 pfx_buf, new_buf, exist_buf,
645 aspath_hops,
646 (exist_hops + exist_confeds));
647 return 0;
648 }
649 } else {
650 int newhops = aspath_count_hops(newattr->aspath);
651
652 if (newhops < exist_hops) {
653 if (debug)
654 zlog_debug(
655 "%s: %s wins over %s due to aspath hopcount %d < %d",
656 pfx_buf, new_buf, exist_buf,
657 newhops, exist_hops);
658 return 1;
659 }
660
661 if (newhops > exist_hops) {
662 if (debug)
663 zlog_debug(
664 "%s: %s loses to %s due to aspath hopcount %d > %d",
665 pfx_buf, new_buf, exist_buf,
666 newhops, exist_hops);
667 return 0;
668 }
669 }
670 }
671
672 /* 5. Origin check. */
673 if (newattr->origin < existattr->origin) {
674 if (debug)
675 zlog_debug("%s: %s wins over %s due to ORIGIN %s < %s",
676 pfx_buf, new_buf, exist_buf,
677 bgp_origin_long_str[newattr->origin],
678 bgp_origin_long_str[existattr->origin]);
679 return 1;
680 }
681
682 if (newattr->origin > existattr->origin) {
683 if (debug)
684 zlog_debug("%s: %s loses to %s due to ORIGIN %s > %s",
685 pfx_buf, new_buf, exist_buf,
686 bgp_origin_long_str[newattr->origin],
687 bgp_origin_long_str[existattr->origin]);
688 return 0;
689 }
690
691 /* 6. MED check. */
692 internal_as_route = (aspath_count_hops(newattr->aspath) == 0
693 && aspath_count_hops(existattr->aspath) == 0);
694 confed_as_route = (aspath_count_confeds(newattr->aspath) > 0
695 && aspath_count_confeds(existattr->aspath) > 0
696 && aspath_count_hops(newattr->aspath) == 0
697 && aspath_count_hops(existattr->aspath) == 0);
698
699 if (bgp_flag_check(bgp, BGP_FLAG_ALWAYS_COMPARE_MED)
700 || (bgp_flag_check(bgp, BGP_FLAG_MED_CONFED) && confed_as_route)
701 || aspath_cmp_left(newattr->aspath, existattr->aspath)
702 || aspath_cmp_left_confed(newattr->aspath, existattr->aspath)
703 || internal_as_route) {
704 new_med = bgp_med_value(new->attr, bgp);
705 exist_med = bgp_med_value(exist->attr, bgp);
706
707 if (new_med < exist_med) {
708 if (debug)
709 zlog_debug(
710 "%s: %s wins over %s due to MED %d < %d",
711 pfx_buf, new_buf, exist_buf, new_med,
712 exist_med);
713 return 1;
714 }
715
716 if (new_med > exist_med) {
717 if (debug)
718 zlog_debug(
719 "%s: %s loses to %s due to MED %d > %d",
720 pfx_buf, new_buf, exist_buf, new_med,
721 exist_med);
722 return 0;
723 }
724 }
725
726 /* 7. Peer type check. */
727 new_sort = new->peer->sort;
728 exist_sort = exist->peer->sort;
729
730 if (new_sort == BGP_PEER_EBGP
731 && (exist_sort == BGP_PEER_IBGP || exist_sort == BGP_PEER_CONFED)) {
732 if (debug)
733 zlog_debug(
734 "%s: %s wins over %s due to eBGP peer > iBGP peer",
735 pfx_buf, new_buf, exist_buf);
736 return 1;
737 }
738
739 if (exist_sort == BGP_PEER_EBGP
740 && (new_sort == BGP_PEER_IBGP || new_sort == BGP_PEER_CONFED)) {
741 if (debug)
742 zlog_debug(
743 "%s: %s loses to %s due to iBGP peer < eBGP peer",
744 pfx_buf, new_buf, exist_buf);
745 return 0;
746 }
747
748 /* 8. IGP metric check. */
749 newm = existm = 0;
750
751 if (new->extra)
752 newm = new->extra->igpmetric;
753 if (exist->extra)
754 existm = exist->extra->igpmetric;
755
756 if (newm < existm) {
757 if (debug)
758 zlog_debug(
759 "%s: %s wins over %s due to IGP metric %d < %d",
760 pfx_buf, new_buf, exist_buf, newm, existm);
761 ret = 1;
762 }
763
764 if (newm > existm) {
765 if (debug)
766 zlog_debug(
767 "%s: %s loses to %s due to IGP metric %d > %d",
768 pfx_buf, new_buf, exist_buf, newm, existm);
769 ret = 0;
770 }
771
772 /* 9. Same IGP metric. Compare the cluster list length as
773 representative of IGP hops metric. Rewrite the metric value
774 pair (newm, existm) with the cluster list length. Prefer the
775 path with smaller cluster list length. */
776 if (newm == existm) {
777 if (peer_sort(new->peer) == BGP_PEER_IBGP
778 && peer_sort(exist->peer) == BGP_PEER_IBGP
779 && (mpath_cfg == NULL
780 || CHECK_FLAG(
781 mpath_cfg->ibgp_flags,
782 BGP_FLAG_IBGP_MULTIPATH_SAME_CLUSTERLEN))) {
783 newm = BGP_CLUSTER_LIST_LENGTH(new->attr);
784 existm = BGP_CLUSTER_LIST_LENGTH(exist->attr);
785
786 if (newm < existm) {
787 if (debug)
788 zlog_debug(
789 "%s: %s wins over %s due to CLUSTER_LIST length %d < %d",
790 pfx_buf, new_buf, exist_buf,
791 newm, existm);
792 ret = 1;
793 }
794
795 if (newm > existm) {
796 if (debug)
797 zlog_debug(
798 "%s: %s loses to %s due to CLUSTER_LIST length %d > %d",
799 pfx_buf, new_buf, exist_buf,
800 newm, existm);
801 ret = 0;
802 }
803 }
804 }
805
806 /* 10. confed-external vs. confed-internal */
807 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION)) {
808 if (new_sort == BGP_PEER_CONFED
809 && exist_sort == BGP_PEER_IBGP) {
810 if (debug)
811 zlog_debug(
812 "%s: %s wins over %s due to confed-external peer > confed-internal peer",
813 pfx_buf, new_buf, exist_buf);
814 return 1;
815 }
816
817 if (exist_sort == BGP_PEER_CONFED
818 && new_sort == BGP_PEER_IBGP) {
819 if (debug)
820 zlog_debug(
821 "%s: %s loses to %s due to confed-internal peer < confed-external peer",
822 pfx_buf, new_buf, exist_buf);
823 return 0;
824 }
825 }
826
827 /* 11. Maximum path check. */
828 if (newm == existm) {
829 /* If one path has a label but the other does not, do not treat
830 * them as equals for multipath
831 */
832 if ((new->extra &&bgp_is_valid_label(&new->extra->label[0]))
833 != (exist->extra
834 && bgp_is_valid_label(&exist->extra->label[0]))) {
835 if (debug)
836 zlog_debug(
837 "%s: %s and %s cannot be multipath, one has a label while the other does not",
838 pfx_buf, new_buf, exist_buf);
839 } else if (bgp_flag_check(bgp,
840 BGP_FLAG_ASPATH_MULTIPATH_RELAX)) {
841
842 /*
843 * For the two paths, all comparison steps till IGP
844 * metric
845 * have succeeded - including AS_PATH hop count. Since
846 * 'bgp
847 * bestpath as-path multipath-relax' knob is on, we
848 * don't need
849 * an exact match of AS_PATH. Thus, mark the paths are
850 * equal.
851 * That will trigger both these paths to get into the
852 * multipath
853 * array.
854 */
855 *paths_eq = 1;
856
857 if (debug)
858 zlog_debug(
859 "%s: %s and %s are equal via multipath-relax",
860 pfx_buf, new_buf, exist_buf);
861 } else if (new->peer->sort == BGP_PEER_IBGP) {
862 if (aspath_cmp(new->attr->aspath,
863 exist->attr->aspath)) {
864 *paths_eq = 1;
865
866 if (debug)
867 zlog_debug(
868 "%s: %s and %s are equal via matching aspaths",
869 pfx_buf, new_buf, exist_buf);
870 }
871 } else if (new->peer->as == exist->peer->as) {
872 *paths_eq = 1;
873
874 if (debug)
875 zlog_debug(
876 "%s: %s and %s are equal via same remote-as",
877 pfx_buf, new_buf, exist_buf);
878 }
879 } else {
880 /*
881 * TODO: If unequal cost ibgp multipath is enabled we can
882 * mark the paths as equal here instead of returning
883 */
884 if (debug) {
885 if (ret == 1)
886 zlog_debug(
887 "%s: %s wins over %s after IGP metric comparison",
888 pfx_buf, new_buf, exist_buf);
889 else
890 zlog_debug(
891 "%s: %s loses to %s after IGP metric comparison",
892 pfx_buf, new_buf, exist_buf);
893 }
894 return ret;
895 }
896
897 /* 12. If both paths are external, prefer the path that was received
898 first (the oldest one). This step minimizes route-flap, since a
899 newer path won't displace an older one, even if it was the
900 preferred route based on the additional decision criteria below. */
901 if (!bgp_flag_check(bgp, BGP_FLAG_COMPARE_ROUTER_ID)
902 && new_sort == BGP_PEER_EBGP && exist_sort == BGP_PEER_EBGP) {
903 if (CHECK_FLAG(new->flags, BGP_PATH_SELECTED)) {
904 if (debug)
905 zlog_debug(
906 "%s: %s wins over %s due to oldest external",
907 pfx_buf, new_buf, exist_buf);
908 return 1;
909 }
910
911 if (CHECK_FLAG(exist->flags, BGP_PATH_SELECTED)) {
912 if (debug)
913 zlog_debug(
914 "%s: %s loses to %s due to oldest external",
915 pfx_buf, new_buf, exist_buf);
916 return 0;
917 }
918 }
919
920 /* 13. Router-ID comparision. */
921 /* If one of the paths is "stale", the corresponding peer router-id will
922 * be 0 and would always win over the other path. If originator id is
923 * used for the comparision, it will decide which path is better.
924 */
925 if (newattr->flag & ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID))
926 new_id.s_addr = newattr->originator_id.s_addr;
927 else
928 new_id.s_addr = new->peer->remote_id.s_addr;
929 if (existattr->flag & ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID))
930 exist_id.s_addr = existattr->originator_id.s_addr;
931 else
932 exist_id.s_addr = exist->peer->remote_id.s_addr;
933
934 if (ntohl(new_id.s_addr) < ntohl(exist_id.s_addr)) {
935 if (debug)
936 zlog_debug(
937 "%s: %s wins over %s due to Router-ID comparison",
938 pfx_buf, new_buf, exist_buf);
939 return 1;
940 }
941
942 if (ntohl(new_id.s_addr) > ntohl(exist_id.s_addr)) {
943 if (debug)
944 zlog_debug(
945 "%s: %s loses to %s due to Router-ID comparison",
946 pfx_buf, new_buf, exist_buf);
947 return 0;
948 }
949
950 /* 14. Cluster length comparision. */
951 new_cluster = BGP_CLUSTER_LIST_LENGTH(new->attr);
952 exist_cluster = BGP_CLUSTER_LIST_LENGTH(exist->attr);
953
954 if (new_cluster < exist_cluster) {
955 if (debug)
956 zlog_debug(
957 "%s: %s wins over %s due to CLUSTER_LIST length %d < %d",
958 pfx_buf, new_buf, exist_buf, new_cluster,
959 exist_cluster);
960 return 1;
961 }
962
963 if (new_cluster > exist_cluster) {
964 if (debug)
965 zlog_debug(
966 "%s: %s loses to %s due to CLUSTER_LIST length %d > %d",
967 pfx_buf, new_buf, exist_buf, new_cluster,
968 exist_cluster);
969 return 0;
970 }
971
972 /* 15. Neighbor address comparision. */
973 /* Do this only if neither path is "stale" as stale paths do not have
974 * valid peer information (as the connection may or may not be up).
975 */
976 if (CHECK_FLAG(exist->flags, BGP_PATH_STALE)) {
977 if (debug)
978 zlog_debug(
979 "%s: %s wins over %s due to latter path being STALE",
980 pfx_buf, new_buf, exist_buf);
981 return 1;
982 }
983
984 if (CHECK_FLAG(new->flags, BGP_PATH_STALE)) {
985 if (debug)
986 zlog_debug(
987 "%s: %s loses to %s due to former path being STALE",
988 pfx_buf, new_buf, exist_buf);
989 return 0;
990 }
991
992 /* locally configured routes to advertise do not have su_remote */
993 if (new->peer->su_remote == NULL)
994 return 0;
995 if (exist->peer->su_remote == NULL)
996 return 1;
997
998 ret = sockunion_cmp(new->peer->su_remote, exist->peer->su_remote);
999
1000 if (ret == 1) {
1001 if (debug)
1002 zlog_debug(
1003 "%s: %s loses to %s due to Neighor IP comparison",
1004 pfx_buf, new_buf, exist_buf);
1005 return 0;
1006 }
1007
1008 if (ret == -1) {
1009 if (debug)
1010 zlog_debug(
1011 "%s: %s wins over %s due to Neighor IP comparison",
1012 pfx_buf, new_buf, exist_buf);
1013 return 1;
1014 }
1015
1016 if (debug)
1017 zlog_debug("%s: %s wins over %s due to nothing left to compare",
1018 pfx_buf, new_buf, exist_buf);
1019
1020 return 1;
1021 }
1022
1023 /* Compare two bgp route entity. Return -1 if new is preferred, 1 if exist
1024 * is preferred, or 0 if they are the same (usually will only occur if
1025 * multipath is enabled
1026 * This version is compatible with */
1027 int bgp_path_info_cmp_compatible(struct bgp *bgp, struct bgp_path_info *new,
1028 struct bgp_path_info *exist, char *pfx_buf,
1029 afi_t afi, safi_t safi)
1030 {
1031 int paths_eq;
1032 int ret;
1033 ret = bgp_path_info_cmp(bgp, new, exist, &paths_eq, NULL, 0, pfx_buf,
1034 afi, safi);
1035
1036 if (paths_eq)
1037 ret = 0;
1038 else {
1039 if (ret == 1)
1040 ret = -1;
1041 else
1042 ret = 1;
1043 }
1044 return ret;
1045 }
1046
1047 static enum filter_type bgp_input_filter(struct peer *peer, struct prefix *p,
1048 struct attr *attr, afi_t afi,
1049 safi_t safi)
1050 {
1051 struct bgp_filter *filter;
1052
1053 filter = &peer->filter[afi][safi];
1054
1055 #define FILTER_EXIST_WARN(F, f, filter) \
1056 if (BGP_DEBUG(update, UPDATE_IN) && !(F##_IN(filter))) \
1057 zlog_debug("%s: Could not find configured input %s-list %s!", \
1058 peer->host, #f, F##_IN_NAME(filter));
1059
1060 if (DISTRIBUTE_IN_NAME(filter)) {
1061 FILTER_EXIST_WARN(DISTRIBUTE, distribute, filter);
1062
1063 if (access_list_apply(DISTRIBUTE_IN(filter), p) == FILTER_DENY)
1064 return FILTER_DENY;
1065 }
1066
1067 if (PREFIX_LIST_IN_NAME(filter)) {
1068 FILTER_EXIST_WARN(PREFIX_LIST, prefix, filter);
1069
1070 if (prefix_list_apply(PREFIX_LIST_IN(filter), p) == PREFIX_DENY)
1071 return FILTER_DENY;
1072 }
1073
1074 if (FILTER_LIST_IN_NAME(filter)) {
1075 FILTER_EXIST_WARN(FILTER_LIST, as, filter);
1076
1077 if (as_list_apply(FILTER_LIST_IN(filter), attr->aspath)
1078 == AS_FILTER_DENY)
1079 return FILTER_DENY;
1080 }
1081
1082 return FILTER_PERMIT;
1083 #undef FILTER_EXIST_WARN
1084 }
1085
1086 static enum filter_type bgp_output_filter(struct peer *peer, struct prefix *p,
1087 struct attr *attr, afi_t afi,
1088 safi_t safi)
1089 {
1090 struct bgp_filter *filter;
1091
1092 filter = &peer->filter[afi][safi];
1093
1094 #define FILTER_EXIST_WARN(F, f, filter) \
1095 if (BGP_DEBUG(update, UPDATE_OUT) && !(F##_OUT(filter))) \
1096 zlog_debug("%s: Could not find configured output %s-list %s!", \
1097 peer->host, #f, F##_OUT_NAME(filter));
1098
1099 if (DISTRIBUTE_OUT_NAME(filter)) {
1100 FILTER_EXIST_WARN(DISTRIBUTE, distribute, filter);
1101
1102 if (access_list_apply(DISTRIBUTE_OUT(filter), p) == FILTER_DENY)
1103 return FILTER_DENY;
1104 }
1105
1106 if (PREFIX_LIST_OUT_NAME(filter)) {
1107 FILTER_EXIST_WARN(PREFIX_LIST, prefix, filter);
1108
1109 if (prefix_list_apply(PREFIX_LIST_OUT(filter), p)
1110 == PREFIX_DENY)
1111 return FILTER_DENY;
1112 }
1113
1114 if (FILTER_LIST_OUT_NAME(filter)) {
1115 FILTER_EXIST_WARN(FILTER_LIST, as, filter);
1116
1117 if (as_list_apply(FILTER_LIST_OUT(filter), attr->aspath)
1118 == AS_FILTER_DENY)
1119 return FILTER_DENY;
1120 }
1121
1122 return FILTER_PERMIT;
1123 #undef FILTER_EXIST_WARN
1124 }
1125
1126 /* If community attribute includes no_export then return 1. */
1127 static int bgp_community_filter(struct peer *peer, struct attr *attr)
1128 {
1129 if (attr->community) {
1130 /* NO_ADVERTISE check. */
1131 if (community_include(attr->community, COMMUNITY_NO_ADVERTISE))
1132 return 1;
1133
1134 /* NO_EXPORT check. */
1135 if (peer->sort == BGP_PEER_EBGP
1136 && community_include(attr->community, COMMUNITY_NO_EXPORT))
1137 return 1;
1138
1139 /* NO_EXPORT_SUBCONFED check. */
1140 if (peer->sort == BGP_PEER_EBGP
1141 || peer->sort == BGP_PEER_CONFED)
1142 if (community_include(attr->community,
1143 COMMUNITY_NO_EXPORT_SUBCONFED))
1144 return 1;
1145 }
1146 return 0;
1147 }
1148
1149 /* Route reflection loop check. */
1150 static int bgp_cluster_filter(struct peer *peer, struct attr *attr)
1151 {
1152 struct in_addr cluster_id;
1153
1154 if (attr->cluster) {
1155 if (peer->bgp->config & BGP_CONFIG_CLUSTER_ID)
1156 cluster_id = peer->bgp->cluster_id;
1157 else
1158 cluster_id = peer->bgp->router_id;
1159
1160 if (cluster_loop_check(attr->cluster, cluster_id))
1161 return 1;
1162 }
1163 return 0;
1164 }
1165
1166 static int bgp_input_modifier(struct peer *peer, struct prefix *p,
1167 struct attr *attr, afi_t afi, safi_t safi,
1168 const char *rmap_name)
1169 {
1170 struct bgp_filter *filter;
1171 struct bgp_path_info rmap_path;
1172 route_map_result_t ret;
1173 struct route_map *rmap = NULL;
1174
1175 filter = &peer->filter[afi][safi];
1176
1177 /* Apply default weight value. */
1178 if (peer->weight[afi][safi])
1179 attr->weight = peer->weight[afi][safi];
1180
1181 if (rmap_name) {
1182 rmap = route_map_lookup_by_name(rmap_name);
1183
1184 if (rmap == NULL)
1185 return RMAP_DENY;
1186 } else {
1187 if (ROUTE_MAP_IN_NAME(filter)) {
1188 rmap = ROUTE_MAP_IN(filter);
1189
1190 if (rmap == NULL)
1191 return RMAP_DENY;
1192 }
1193 }
1194
1195 /* Route map apply. */
1196 if (rmap) {
1197 memset(&rmap_path, 0, sizeof(struct bgp_path_info));
1198 /* Duplicate current value to new strucutre for modification. */
1199 rmap_path.peer = peer;
1200 rmap_path.attr = attr;
1201
1202 SET_FLAG(peer->rmap_type, PEER_RMAP_TYPE_IN);
1203
1204 /* Apply BGP route map to the attribute. */
1205 ret = route_map_apply(rmap, p, RMAP_BGP, &rmap_path);
1206
1207 peer->rmap_type = 0;
1208
1209 if (ret == RMAP_DENYMATCH)
1210 return RMAP_DENY;
1211 }
1212 return RMAP_PERMIT;
1213 }
1214
1215 static int bgp_output_modifier(struct peer *peer, struct prefix *p,
1216 struct attr *attr, afi_t afi, safi_t safi,
1217 const char *rmap_name)
1218 {
1219 struct bgp_path_info rmap_path;
1220 route_map_result_t ret;
1221 struct route_map *rmap = NULL;
1222 uint8_t rmap_type;
1223
1224 /*
1225 * So if we get to this point and have no rmap_name
1226 * we want to just show the output as it currently
1227 * exists.
1228 */
1229 if (!rmap_name)
1230 return RMAP_PERMIT;
1231
1232 /* Apply default weight value. */
1233 if (peer->weight[afi][safi])
1234 attr->weight = peer->weight[afi][safi];
1235
1236 rmap = route_map_lookup_by_name(rmap_name);
1237
1238 /*
1239 * If we have a route map name and we do not find
1240 * the routemap that means we have an implicit
1241 * deny.
1242 */
1243 if (rmap == NULL)
1244 return RMAP_DENY;
1245
1246 memset(&rmap_path, 0, sizeof(struct bgp_path_info));
1247 /* Route map apply. */
1248 /* Duplicate current value to new strucutre for modification. */
1249 rmap_path.peer = peer;
1250 rmap_path.attr = attr;
1251
1252 rmap_type = peer->rmap_type;
1253 SET_FLAG(peer->rmap_type, PEER_RMAP_TYPE_OUT);
1254
1255 /* Apply BGP route map to the attribute. */
1256 ret = route_map_apply(rmap, p, RMAP_BGP, &rmap_path);
1257
1258 peer->rmap_type = rmap_type;
1259
1260 if (ret == RMAP_DENYMATCH)
1261 /*
1262 * caller has multiple error paths with bgp_attr_flush()
1263 */
1264 return RMAP_DENY;
1265
1266 return RMAP_PERMIT;
1267 }
1268
1269 /* If this is an EBGP peer with remove-private-AS */
1270 static void bgp_peer_remove_private_as(struct bgp *bgp, afi_t afi, safi_t safi,
1271 struct peer *peer, struct attr *attr)
1272 {
1273 if (peer->sort == BGP_PEER_EBGP
1274 && (peer_af_flag_check(peer, afi, safi,
1275 PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE)
1276 || peer_af_flag_check(peer, afi, safi,
1277 PEER_FLAG_REMOVE_PRIVATE_AS_REPLACE)
1278 || peer_af_flag_check(peer, afi, safi,
1279 PEER_FLAG_REMOVE_PRIVATE_AS_ALL)
1280 || peer_af_flag_check(peer, afi, safi,
1281 PEER_FLAG_REMOVE_PRIVATE_AS))) {
1282 // Take action on the entire aspath
1283 if (peer_af_flag_check(peer, afi, safi,
1284 PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE)
1285 || peer_af_flag_check(peer, afi, safi,
1286 PEER_FLAG_REMOVE_PRIVATE_AS_ALL)) {
1287 if (peer_af_flag_check(
1288 peer, afi, safi,
1289 PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE))
1290 attr->aspath = aspath_replace_private_asns(
1291 attr->aspath, bgp->as);
1292
1293 // The entire aspath consists of private ASNs so create
1294 // an empty aspath
1295 else if (aspath_private_as_check(attr->aspath))
1296 attr->aspath = aspath_empty_get();
1297
1298 // There are some public and some private ASNs, remove
1299 // the private ASNs
1300 else
1301 attr->aspath = aspath_remove_private_asns(
1302 attr->aspath);
1303 }
1304
1305 // 'all' was not specified so the entire aspath must be private
1306 // ASNs
1307 // for us to do anything
1308 else if (aspath_private_as_check(attr->aspath)) {
1309 if (peer_af_flag_check(
1310 peer, afi, safi,
1311 PEER_FLAG_REMOVE_PRIVATE_AS_REPLACE))
1312 attr->aspath = aspath_replace_private_asns(
1313 attr->aspath, bgp->as);
1314 else
1315 attr->aspath = aspath_empty_get();
1316 }
1317 }
1318 }
1319
1320 /* If this is an EBGP peer with as-override */
1321 static void bgp_peer_as_override(struct bgp *bgp, afi_t afi, safi_t safi,
1322 struct peer *peer, struct attr *attr)
1323 {
1324 if (peer->sort == BGP_PEER_EBGP
1325 && peer_af_flag_check(peer, afi, safi, PEER_FLAG_AS_OVERRIDE)) {
1326 if (aspath_single_asn_check(attr->aspath, peer->as))
1327 attr->aspath = aspath_replace_specific_asn(
1328 attr->aspath, peer->as, bgp->as);
1329 }
1330 }
1331
1332 void bgp_attr_add_gshut_community(struct attr *attr)
1333 {
1334 struct community *old;
1335 struct community *new;
1336 struct community *merge;
1337 struct community *gshut;
1338
1339 old = attr->community;
1340 gshut = community_str2com("graceful-shutdown");
1341
1342 assert(gshut);
1343
1344 if (old) {
1345 merge = community_merge(community_dup(old), gshut);
1346
1347 if (old->refcnt == 0)
1348 community_free(&old);
1349
1350 new = community_uniq_sort(merge);
1351 community_free(&merge);
1352 } else {
1353 new = community_dup(gshut);
1354 }
1355
1356 community_free(&gshut);
1357 attr->community = new;
1358 attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_COMMUNITIES);
1359
1360 /* When we add the graceful-shutdown community we must also
1361 * lower the local-preference */
1362 attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF);
1363 attr->local_pref = BGP_GSHUT_LOCAL_PREF;
1364 }
1365
1366
1367 static void subgroup_announce_reset_nhop(uint8_t family, struct attr *attr)
1368 {
1369 if (family == AF_INET) {
1370 attr->nexthop.s_addr = 0;
1371 attr->mp_nexthop_global_in.s_addr = 0;
1372 }
1373 if (family == AF_INET6)
1374 memset(&attr->mp_nexthop_global, 0, IPV6_MAX_BYTELEN);
1375 if (family == AF_EVPN)
1376 memset(&attr->mp_nexthop_global_in, 0, BGP_ATTR_NHLEN_IPV4);
1377 }
1378
1379 int subgroup_announce_check(struct bgp_node *rn, struct bgp_path_info *pi,
1380 struct update_subgroup *subgrp, struct prefix *p,
1381 struct attr *attr)
1382 {
1383 struct bgp_filter *filter;
1384 struct peer *from;
1385 struct peer *peer;
1386 struct peer *onlypeer;
1387 struct bgp *bgp;
1388 struct attr *piattr;
1389 char buf[PREFIX_STRLEN];
1390 int ret;
1391 int transparent;
1392 int reflect;
1393 afi_t afi;
1394 safi_t safi;
1395 int samepeer_safe = 0; /* for synthetic mplsvpns routes */
1396
1397 if (DISABLE_BGP_ANNOUNCE)
1398 return 0;
1399
1400 afi = SUBGRP_AFI(subgrp);
1401 safi = SUBGRP_SAFI(subgrp);
1402 peer = SUBGRP_PEER(subgrp);
1403 onlypeer = NULL;
1404 if (CHECK_FLAG(peer->flags, PEER_FLAG_LONESOUL))
1405 onlypeer = SUBGRP_PFIRST(subgrp)->peer;
1406
1407 from = pi->peer;
1408 filter = &peer->filter[afi][safi];
1409 bgp = SUBGRP_INST(subgrp);
1410 piattr = bgp_path_info_mpath_count(pi) ? bgp_path_info_mpath_attr(pi)
1411 : pi->attr;
1412
1413 #if ENABLE_BGP_VNC
1414 if (((afi == AFI_IP) || (afi == AFI_IP6)) && (safi == SAFI_MPLS_VPN)
1415 && ((pi->type == ZEBRA_ROUTE_BGP_DIRECT)
1416 || (pi->type == ZEBRA_ROUTE_BGP_DIRECT_EXT))) {
1417
1418 /*
1419 * direct and direct_ext type routes originate internally even
1420 * though they can have peer pointers that reference other
1421 * systems
1422 */
1423 prefix2str(p, buf, PREFIX_STRLEN);
1424 zlog_debug("%s: pfx %s bgp_direct->vpn route peer safe",
1425 __func__, buf);
1426 samepeer_safe = 1;
1427 }
1428 #endif
1429
1430 if (((afi == AFI_IP) || (afi == AFI_IP6))
1431 && ((safi == SAFI_MPLS_VPN) || (safi == SAFI_UNICAST))
1432 && (pi->type == ZEBRA_ROUTE_BGP)
1433 && (pi->sub_type == BGP_ROUTE_IMPORTED)) {
1434
1435 /* Applies to routes leaked vpn->vrf and vrf->vpn */
1436
1437 samepeer_safe = 1;
1438 }
1439
1440 /* With addpath we may be asked to TX all kinds of paths so make sure
1441 * pi is valid */
1442 if (!CHECK_FLAG(pi->flags, BGP_PATH_VALID)
1443 || CHECK_FLAG(pi->flags, BGP_PATH_HISTORY)
1444 || CHECK_FLAG(pi->flags, BGP_PATH_REMOVED)) {
1445 return 0;
1446 }
1447
1448 /* If this is not the bestpath then check to see if there is an enabled
1449 * addpath
1450 * feature that requires us to advertise it */
1451 if (!CHECK_FLAG(pi->flags, BGP_PATH_SELECTED)) {
1452 if (!bgp_addpath_tx_path(peer, afi, safi, pi)) {
1453 return 0;
1454 }
1455 }
1456
1457 /* Aggregate-address suppress check. */
1458 if (pi->extra && pi->extra->suppress)
1459 if (!UNSUPPRESS_MAP_NAME(filter)) {
1460 return 0;
1461 }
1462
1463 /*
1464 * If we are doing VRF 2 VRF leaking via the import
1465 * statement, we want to prevent the route going
1466 * off box as that the RT and RD created are localy
1467 * significant and globaly useless.
1468 */
1469 if (safi == SAFI_MPLS_VPN && pi->extra && pi->extra->num_labels
1470 && pi->extra->label[0] == BGP_PREVENT_VRF_2_VRF_LEAK)
1471 return 0;
1472
1473 /* If it's labeled safi, make sure the route has a valid label. */
1474 if (safi == SAFI_LABELED_UNICAST) {
1475 mpls_label_t label = bgp_adv_label(rn, pi, peer, afi, safi);
1476 if (!bgp_is_valid_label(&label)) {
1477 if (bgp_debug_update(NULL, p, subgrp->update_group, 0))
1478 zlog_debug("u%" PRIu64 ":s%" PRIu64
1479 " %s/%d is filtered - no label (%p)",
1480 subgrp->update_group->id, subgrp->id,
1481 inet_ntop(p->family, &p->u.prefix,
1482 buf, SU_ADDRSTRLEN),
1483 p->prefixlen, &label);
1484 return 0;
1485 }
1486 }
1487
1488 /* Do not send back route to sender. */
1489 if (onlypeer && from == onlypeer) {
1490 return 0;
1491 }
1492
1493 /* Do not send the default route in the BGP table if the neighbor is
1494 * configured for default-originate */
1495 if (CHECK_FLAG(peer->af_flags[afi][safi],
1496 PEER_FLAG_DEFAULT_ORIGINATE)) {
1497 if (p->family == AF_INET && p->u.prefix4.s_addr == INADDR_ANY)
1498 return 0;
1499 else if (p->family == AF_INET6 && p->prefixlen == 0)
1500 return 0;
1501 }
1502
1503 /* Transparency check. */
1504 if (CHECK_FLAG(peer->af_flags[afi][safi], PEER_FLAG_RSERVER_CLIENT)
1505 && CHECK_FLAG(from->af_flags[afi][safi], PEER_FLAG_RSERVER_CLIENT))
1506 transparent = 1;
1507 else
1508 transparent = 0;
1509
1510 /* If community is not disabled check the no-export and local. */
1511 if (!transparent && bgp_community_filter(peer, piattr)) {
1512 if (bgp_debug_update(NULL, p, subgrp->update_group, 0))
1513 zlog_debug(
1514 "subgrpannouncecheck: community filter check fail");
1515 return 0;
1516 }
1517
1518 /* If the attribute has originator-id and it is same as remote
1519 peer's id. */
1520 if (onlypeer && piattr->flag & ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID)
1521 && (IPV4_ADDR_SAME(&onlypeer->remote_id, &piattr->originator_id))) {
1522 if (bgp_debug_update(NULL, p, subgrp->update_group, 0))
1523 zlog_debug(
1524 "%s [Update:SEND] %s originator-id is same as "
1525 "remote router-id",
1526 onlypeer->host,
1527 prefix2str(p, buf, sizeof(buf)));
1528 return 0;
1529 }
1530
1531 /* ORF prefix-list filter check */
1532 if (CHECK_FLAG(peer->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_RM_ADV)
1533 && (CHECK_FLAG(peer->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_SM_RCV)
1534 || CHECK_FLAG(peer->af_cap[afi][safi],
1535 PEER_CAP_ORF_PREFIX_SM_OLD_RCV)))
1536 if (peer->orf_plist[afi][safi]) {
1537 if (prefix_list_apply(peer->orf_plist[afi][safi], p)
1538 == PREFIX_DENY) {
1539 if (bgp_debug_update(NULL, p,
1540 subgrp->update_group, 0))
1541 zlog_debug(
1542 "%s [Update:SEND] %s is filtered via ORF",
1543 peer->host,
1544 prefix2str(p, buf,
1545 sizeof(buf)));
1546 return 0;
1547 }
1548 }
1549
1550 /* Output filter check. */
1551 if (bgp_output_filter(peer, p, piattr, afi, safi) == FILTER_DENY) {
1552 if (bgp_debug_update(NULL, p, subgrp->update_group, 0))
1553 zlog_debug("%s [Update:SEND] %s is filtered",
1554 peer->host, prefix2str(p, buf, sizeof(buf)));
1555 return 0;
1556 }
1557
1558 #ifdef BGP_SEND_ASPATH_CHECK
1559 /* AS path loop check. */
1560 if (onlypeer && aspath_loop_check(piattr->aspath, onlypeer->as)) {
1561 if (bgp_debug_update(NULL, p, subgrp->update_group, 0))
1562 zlog_debug(
1563 "%s [Update:SEND] suppress announcement to peer AS %u "
1564 "that is part of AS path.",
1565 onlypeer->host, onlypeer->as);
1566 return 0;
1567 }
1568 #endif /* BGP_SEND_ASPATH_CHECK */
1569
1570 /* If we're a CONFED we need to loop check the CONFED ID too */
1571 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION)) {
1572 if (aspath_loop_check(piattr->aspath, bgp->confed_id)) {
1573 if (bgp_debug_update(NULL, p, subgrp->update_group, 0))
1574 zlog_debug(
1575 "%s [Update:SEND] suppress announcement to peer AS %u"
1576 " is AS path.",
1577 peer->host, bgp->confed_id);
1578 return 0;
1579 }
1580 }
1581
1582 /* Route-Reflect check. */
1583 if (from->sort == BGP_PEER_IBGP && peer->sort == BGP_PEER_IBGP)
1584 reflect = 1;
1585 else
1586 reflect = 0;
1587
1588 /* IBGP reflection check. */
1589 if (reflect && !samepeer_safe) {
1590 /* A route from a Client peer. */
1591 if (CHECK_FLAG(from->af_flags[afi][safi],
1592 PEER_FLAG_REFLECTOR_CLIENT)) {
1593 /* Reflect to all the Non-Client peers and also to the
1594 Client peers other than the originator. Originator
1595 check
1596 is already done. So there is noting to do. */
1597 /* no bgp client-to-client reflection check. */
1598 if (bgp_flag_check(bgp, BGP_FLAG_NO_CLIENT_TO_CLIENT))
1599 if (CHECK_FLAG(peer->af_flags[afi][safi],
1600 PEER_FLAG_REFLECTOR_CLIENT))
1601 return 0;
1602 } else {
1603 /* A route from a Non-client peer. Reflect to all other
1604 clients. */
1605 if (!CHECK_FLAG(peer->af_flags[afi][safi],
1606 PEER_FLAG_REFLECTOR_CLIENT))
1607 return 0;
1608 }
1609 }
1610
1611 /* For modify attribute, copy it to temporary structure. */
1612 bgp_attr_dup(attr, piattr);
1613
1614 /* If local-preference is not set. */
1615 if ((peer->sort == BGP_PEER_IBGP || peer->sort == BGP_PEER_CONFED)
1616 && (!(attr->flag & ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF)))) {
1617 attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF);
1618 attr->local_pref = bgp->default_local_pref;
1619 }
1620
1621 /* If originator-id is not set and the route is to be reflected,
1622 set the originator id */
1623 if (reflect
1624 && (!(attr->flag & ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID)))) {
1625 IPV4_ADDR_COPY(&(attr->originator_id), &(from->remote_id));
1626 SET_FLAG(attr->flag, BGP_ATTR_ORIGINATOR_ID);
1627 }
1628
1629 /* Remove MED if its an EBGP peer - will get overwritten by route-maps
1630 */
1631 if (peer->sort == BGP_PEER_EBGP
1632 && attr->flag & ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC)) {
1633 if (from != bgp->peer_self && !transparent
1634 && !CHECK_FLAG(peer->af_flags[afi][safi],
1635 PEER_FLAG_MED_UNCHANGED))
1636 attr->flag &=
1637 ~(ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC));
1638 }
1639
1640 /* Since the nexthop attribute can vary per peer, it is not explicitly
1641 * set
1642 * in announce check, only certain flags and length (or number of
1643 * nexthops
1644 * -- for IPv6/MP_REACH) are set here in order to guide the update
1645 * formation
1646 * code in setting the nexthop(s) on a per peer basis in
1647 * reformat_peer().
1648 * Typically, the source nexthop in the attribute is preserved but in
1649 * the
1650 * scenarios where we know it will always be overwritten, we reset the
1651 * nexthop to "0" in an attempt to achieve better Update packing. An
1652 * example of this is when a prefix from each of 2 IBGP peers needs to
1653 * be
1654 * announced to an EBGP peer (and they have the same attributes barring
1655 * their nexthop).
1656 */
1657 if (reflect)
1658 SET_FLAG(attr->rmap_change_flags, BATTR_REFLECTED);
1659
1660 #define NEXTHOP_IS_V6 \
1661 ((safi != SAFI_ENCAP && safi != SAFI_MPLS_VPN \
1662 && (p->family == AF_INET6 || peer_cap_enhe(peer, afi, safi))) \
1663 || ((safi == SAFI_ENCAP || safi == SAFI_MPLS_VPN) \
1664 && attr->mp_nexthop_len >= IPV6_MAX_BYTELEN))
1665
1666 /* IPv6/MP starts with 1 nexthop. The link-local address is passed only
1667 * if
1668 * the peer (group) is configured to receive link-local nexthop
1669 * unchanged
1670 * and it is available in the prefix OR we're not reflecting the route
1671 * and
1672 * the peer (group) to whom we're going to announce is on a shared
1673 * network
1674 * and this is either a self-originated route or the peer is EBGP.
1675 */
1676 if (NEXTHOP_IS_V6) {
1677 attr->mp_nexthop_len = BGP_ATTR_NHLEN_IPV6_GLOBAL;
1678 if ((CHECK_FLAG(peer->af_flags[afi][safi],
1679 PEER_FLAG_NEXTHOP_LOCAL_UNCHANGED)
1680 && IN6_IS_ADDR_LINKLOCAL(&attr->mp_nexthop_local))
1681 || (!reflect && peer->shared_network
1682 && (from == bgp->peer_self
1683 || peer->sort == BGP_PEER_EBGP))) {
1684 attr->mp_nexthop_len =
1685 BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL;
1686 }
1687
1688 /* Clear off link-local nexthop in source, whenever it is not
1689 * needed to
1690 * ensure more prefixes share the same attribute for
1691 * announcement.
1692 */
1693 if (!(CHECK_FLAG(peer->af_flags[afi][safi],
1694 PEER_FLAG_NEXTHOP_LOCAL_UNCHANGED)))
1695 memset(&attr->mp_nexthop_local, 0, IPV6_MAX_BYTELEN);
1696 }
1697
1698 bgp_peer_remove_private_as(bgp, afi, safi, peer, attr);
1699 bgp_peer_as_override(bgp, afi, safi, peer, attr);
1700
1701 /* Route map & unsuppress-map apply. */
1702 if (ROUTE_MAP_OUT_NAME(filter) || (pi->extra && pi->extra->suppress)) {
1703 struct bgp_path_info rmap_path;
1704 struct bgp_path_info_extra dummy_rmap_path_extra;
1705 struct attr dummy_attr;
1706
1707 memset(&rmap_path, 0, sizeof(struct bgp_path_info));
1708 rmap_path.peer = peer;
1709 rmap_path.attr = attr;
1710
1711 if (pi->extra) {
1712 memcpy(&dummy_rmap_path_extra, pi->extra,
1713 sizeof(struct bgp_path_info_extra));
1714 rmap_path.extra = &dummy_rmap_path_extra;
1715 }
1716
1717 /* don't confuse inbound and outbound setting */
1718 RESET_FLAG(attr->rmap_change_flags);
1719
1720 /*
1721 * The route reflector is not allowed to modify the attributes
1722 * of the reflected IBGP routes unless explicitly allowed.
1723 */
1724 if ((from->sort == BGP_PEER_IBGP && peer->sort == BGP_PEER_IBGP)
1725 && !bgp_flag_check(bgp,
1726 BGP_FLAG_RR_ALLOW_OUTBOUND_POLICY)) {
1727 bgp_attr_dup(&dummy_attr, attr);
1728 rmap_path.attr = &dummy_attr;
1729 }
1730
1731 SET_FLAG(peer->rmap_type, PEER_RMAP_TYPE_OUT);
1732
1733 if (pi->extra && pi->extra->suppress)
1734 ret = route_map_apply(UNSUPPRESS_MAP(filter), p,
1735 RMAP_BGP, &rmap_path);
1736 else
1737 ret = route_map_apply(ROUTE_MAP_OUT(filter), p,
1738 RMAP_BGP, &rmap_path);
1739
1740 peer->rmap_type = 0;
1741
1742 if (ret == RMAP_DENYMATCH) {
1743 bgp_attr_flush(attr);
1744 return 0;
1745 }
1746 }
1747
1748 if (bgp_flag_check(bgp, BGP_FLAG_GRACEFUL_SHUTDOWN)) {
1749 if (peer->sort == BGP_PEER_IBGP
1750 || peer->sort == BGP_PEER_CONFED) {
1751 attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF);
1752 attr->local_pref = BGP_GSHUT_LOCAL_PREF;
1753 } else {
1754 bgp_attr_add_gshut_community(attr);
1755 }
1756 }
1757
1758 /* After route-map has been applied, we check to see if the nexthop to
1759 * be carried in the attribute (that is used for the announcement) can
1760 * be cleared off or not. We do this in all cases where we would be
1761 * setting the nexthop to "ourselves". For IPv6, we only need to
1762 * consider
1763 * the global nexthop here; the link-local nexthop would have been
1764 * cleared
1765 * already, and if not, it is required by the update formation code.
1766 * Also see earlier comments in this function.
1767 */
1768 /*
1769 * If route-map has performed some operation on the nexthop or the peer
1770 * configuration says to pass it unchanged, we cannot reset the nexthop
1771 * here, so only attempt to do it if these aren't true. Note that the
1772 * route-map handler itself might have cleared the nexthop, if for
1773 * example,
1774 * it is configured as 'peer-address'.
1775 */
1776 if (!bgp_rmap_nhop_changed(attr->rmap_change_flags,
1777 piattr->rmap_change_flags)
1778 && !transparent
1779 && !CHECK_FLAG(peer->af_flags[afi][safi],
1780 PEER_FLAG_NEXTHOP_UNCHANGED)) {
1781 /* We can reset the nexthop, if setting (or forcing) it to
1782 * 'self' */
1783 if (CHECK_FLAG(peer->af_flags[afi][safi],
1784 PEER_FLAG_NEXTHOP_SELF)
1785 || CHECK_FLAG(peer->af_flags[afi][safi],
1786 PEER_FLAG_FORCE_NEXTHOP_SELF)) {
1787 if (!reflect
1788 || CHECK_FLAG(peer->af_flags[afi][safi],
1789 PEER_FLAG_FORCE_NEXTHOP_SELF))
1790 subgroup_announce_reset_nhop(
1791 (peer_cap_enhe(peer, afi, safi)
1792 ? AF_INET6
1793 : p->family),
1794 attr);
1795 } else if (peer->sort == BGP_PEER_EBGP) {
1796 /* Can also reset the nexthop if announcing to EBGP, but
1797 * only if
1798 * no peer in the subgroup is on a shared subnet.
1799 * Note: 3rd party nexthop currently implemented for
1800 * IPv4 only.
1801 */
1802 if (!bgp_subgrp_multiaccess_check_v4(piattr->nexthop,
1803 subgrp))
1804 subgroup_announce_reset_nhop(
1805 (peer_cap_enhe(peer, afi, safi)
1806 ? AF_INET6
1807 : p->family),
1808 attr);
1809 } else if (CHECK_FLAG(pi->flags, BGP_PATH_ANNC_NH_SELF)) {
1810 /*
1811 * This flag is used for leaked vpn-vrf routes
1812 */
1813 int family = p->family;
1814
1815 if (peer_cap_enhe(peer, afi, safi))
1816 family = AF_INET6;
1817
1818 if (bgp_debug_update(NULL, p, subgrp->update_group, 0))
1819 zlog_debug(
1820 "%s: BGP_PATH_ANNC_NH_SELF, family=%s",
1821 __func__, family2str(family));
1822 subgroup_announce_reset_nhop(family, attr);
1823 }
1824
1825 /* If IPv6/MP and nexthop does not have any override and happens
1826 * to
1827 * be a link-local address, reset it so that we don't pass along
1828 * the
1829 * source's link-local IPv6 address to recipients who may not be
1830 * on
1831 * the same interface.
1832 */
1833 if (p->family == AF_INET6 || peer_cap_enhe(peer, afi, safi)) {
1834 if (IN6_IS_ADDR_LINKLOCAL(&attr->mp_nexthop_global))
1835 subgroup_announce_reset_nhop(AF_INET6, attr);
1836 }
1837 }
1838
1839 return 1;
1840 }
1841
1842 void bgp_best_selection(struct bgp *bgp, struct bgp_node *rn,
1843 struct bgp_maxpaths_cfg *mpath_cfg,
1844 struct bgp_path_info_pair *result, afi_t afi,
1845 safi_t safi)
1846 {
1847 struct bgp_path_info *new_select;
1848 struct bgp_path_info *old_select;
1849 struct bgp_path_info *pi;
1850 struct bgp_path_info *pi1;
1851 struct bgp_path_info *pi2;
1852 struct bgp_path_info *nextpi = NULL;
1853 int paths_eq, do_mpath, debug;
1854 struct list mp_list;
1855 char pfx_buf[PREFIX2STR_BUFFER];
1856 char path_buf[PATH_ADDPATH_STR_BUFFER];
1857
1858 bgp_mp_list_init(&mp_list);
1859 do_mpath =
1860 (mpath_cfg->maxpaths_ebgp > 1 || mpath_cfg->maxpaths_ibgp > 1);
1861
1862 debug = bgp_debug_bestpath(&rn->p);
1863
1864 if (debug)
1865 prefix2str(&rn->p, pfx_buf, sizeof(pfx_buf));
1866
1867 /* bgp deterministic-med */
1868 new_select = NULL;
1869 if (bgp_flag_check(bgp, BGP_FLAG_DETERMINISTIC_MED)) {
1870
1871 /* Clear BGP_PATH_DMED_SELECTED for all paths */
1872 for (pi1 = rn->info; pi1; pi1 = pi1->next)
1873 bgp_path_info_unset_flag(rn, pi1,
1874 BGP_PATH_DMED_SELECTED);
1875
1876 for (pi1 = rn->info; pi1; pi1 = pi1->next) {
1877 if (CHECK_FLAG(pi1->flags, BGP_PATH_DMED_CHECK))
1878 continue;
1879 if (BGP_PATH_HOLDDOWN(pi1))
1880 continue;
1881 if (pi1->peer && pi1->peer != bgp->peer_self)
1882 if (pi1->peer->status != Established)
1883 continue;
1884
1885 new_select = pi1;
1886 if (pi1->next) {
1887 for (pi2 = pi1->next; pi2; pi2 = pi2->next) {
1888 if (CHECK_FLAG(pi2->flags,
1889 BGP_PATH_DMED_CHECK))
1890 continue;
1891 if (BGP_PATH_HOLDDOWN(pi2))
1892 continue;
1893 if (pi2->peer
1894 && pi2->peer != bgp->peer_self
1895 && !CHECK_FLAG(
1896 pi2->peer->sflags,
1897 PEER_STATUS_NSF_WAIT))
1898 if (pi2->peer->status
1899 != Established)
1900 continue;
1901
1902 if (!aspath_cmp_left(pi1->attr->aspath,
1903 pi2->attr->aspath)
1904 && !aspath_cmp_left_confed(
1905 pi1->attr->aspath,
1906 pi2->attr->aspath))
1907 continue;
1908
1909 if (bgp_path_info_cmp(
1910 bgp, pi2, new_select,
1911 &paths_eq, mpath_cfg, debug,
1912 pfx_buf, afi, safi)) {
1913 bgp_path_info_unset_flag(
1914 rn, new_select,
1915 BGP_PATH_DMED_SELECTED);
1916 new_select = pi2;
1917 }
1918
1919 bgp_path_info_set_flag(
1920 rn, pi2, BGP_PATH_DMED_CHECK);
1921 }
1922 }
1923 bgp_path_info_set_flag(rn, new_select,
1924 BGP_PATH_DMED_CHECK);
1925 bgp_path_info_set_flag(rn, new_select,
1926 BGP_PATH_DMED_SELECTED);
1927
1928 if (debug) {
1929 bgp_path_info_path_with_addpath_rx_str(
1930 new_select, path_buf);
1931 zlog_debug("%s: %s is the bestpath from AS %u",
1932 pfx_buf, path_buf,
1933 aspath_get_first_as(
1934 new_select->attr->aspath));
1935 }
1936 }
1937 }
1938
1939 /* Check old selected route and new selected route. */
1940 old_select = NULL;
1941 new_select = NULL;
1942 for (pi = rn->info; (pi != NULL) && (nextpi = pi->next, 1);
1943 pi = nextpi) {
1944 if (CHECK_FLAG(pi->flags, BGP_PATH_SELECTED))
1945 old_select = pi;
1946
1947 if (BGP_PATH_HOLDDOWN(pi)) {
1948 /* reap REMOVED routes, if needs be
1949 * selected route must stay for a while longer though
1950 */
1951 if (CHECK_FLAG(pi->flags, BGP_PATH_REMOVED)
1952 && (pi != old_select))
1953 bgp_path_info_reap(rn, pi);
1954
1955 if (debug)
1956 zlog_debug("%s: pi %p in holddown", __func__,
1957 pi);
1958
1959 continue;
1960 }
1961
1962 if (pi->peer && pi->peer != bgp->peer_self
1963 && !CHECK_FLAG(pi->peer->sflags, PEER_STATUS_NSF_WAIT))
1964 if (pi->peer->status != Established) {
1965
1966 if (debug)
1967 zlog_debug(
1968 "%s: pi %p non self peer %s not estab state",
1969 __func__, pi, pi->peer->host);
1970
1971 continue;
1972 }
1973
1974 if (bgp_flag_check(bgp, BGP_FLAG_DETERMINISTIC_MED)
1975 && (!CHECK_FLAG(pi->flags, BGP_PATH_DMED_SELECTED))) {
1976 bgp_path_info_unset_flag(rn, pi, BGP_PATH_DMED_CHECK);
1977 if (debug)
1978 zlog_debug("%s: pi %p dmed", __func__, pi);
1979 continue;
1980 }
1981
1982 bgp_path_info_unset_flag(rn, pi, BGP_PATH_DMED_CHECK);
1983
1984 if (bgp_path_info_cmp(bgp, pi, new_select, &paths_eq, mpath_cfg,
1985 debug, pfx_buf, afi, safi)) {
1986 new_select = pi;
1987 }
1988 }
1989
1990 /* Now that we know which path is the bestpath see if any of the other
1991 * paths
1992 * qualify as multipaths
1993 */
1994 if (debug) {
1995 if (new_select)
1996 bgp_path_info_path_with_addpath_rx_str(new_select,
1997 path_buf);
1998 else
1999 sprintf(path_buf, "NONE");
2000 zlog_debug(
2001 "%s: After path selection, newbest is %s oldbest was %s",
2002 pfx_buf, path_buf,
2003 old_select ? old_select->peer->host : "NONE");
2004 }
2005
2006 if (do_mpath && new_select) {
2007 for (pi = rn->info; (pi != NULL) && (nextpi = pi->next, 1);
2008 pi = nextpi) {
2009
2010 if (debug)
2011 bgp_path_info_path_with_addpath_rx_str(
2012 pi, path_buf);
2013
2014 if (pi == new_select) {
2015 if (debug)
2016 zlog_debug(
2017 "%s: %s is the bestpath, add to the multipath list",
2018 pfx_buf, path_buf);
2019 bgp_mp_list_add(&mp_list, pi);
2020 continue;
2021 }
2022
2023 if (BGP_PATH_HOLDDOWN(pi))
2024 continue;
2025
2026 if (pi->peer && pi->peer != bgp->peer_self
2027 && !CHECK_FLAG(pi->peer->sflags,
2028 PEER_STATUS_NSF_WAIT))
2029 if (pi->peer->status != Established)
2030 continue;
2031
2032 if (!bgp_path_info_nexthop_cmp(pi, new_select)) {
2033 if (debug)
2034 zlog_debug(
2035 "%s: %s has the same nexthop as the bestpath, skip it",
2036 pfx_buf, path_buf);
2037 continue;
2038 }
2039
2040 bgp_path_info_cmp(bgp, pi, new_select, &paths_eq,
2041 mpath_cfg, debug, pfx_buf, afi, safi);
2042
2043 if (paths_eq) {
2044 if (debug)
2045 zlog_debug(
2046 "%s: %s is equivalent to the bestpath, add to the multipath list",
2047 pfx_buf, path_buf);
2048 bgp_mp_list_add(&mp_list, pi);
2049 }
2050 }
2051 }
2052
2053 bgp_path_info_mpath_update(rn, new_select, old_select, &mp_list,
2054 mpath_cfg);
2055 bgp_path_info_mpath_aggregate_update(new_select, old_select);
2056 bgp_mp_list_clear(&mp_list);
2057
2058 result->old = old_select;
2059 result->new = new_select;
2060
2061 return;
2062 }
2063
2064 /*
2065 * A new route/change in bestpath of an existing route. Evaluate the path
2066 * for advertisement to the subgroup.
2067 */
2068 int subgroup_process_announce_selected(struct update_subgroup *subgrp,
2069 struct bgp_path_info *selected,
2070 struct bgp_node *rn,
2071 uint32_t addpath_tx_id)
2072 {
2073 struct prefix *p;
2074 struct peer *onlypeer;
2075 struct attr attr;
2076 afi_t afi;
2077 safi_t safi;
2078
2079 p = &rn->p;
2080 afi = SUBGRP_AFI(subgrp);
2081 safi = SUBGRP_SAFI(subgrp);
2082 onlypeer = ((SUBGRP_PCOUNT(subgrp) == 1) ? (SUBGRP_PFIRST(subgrp))->peer
2083 : NULL);
2084
2085 if (BGP_DEBUG(update, UPDATE_OUT)) {
2086 char buf_prefix[PREFIX_STRLEN];
2087 prefix2str(p, buf_prefix, sizeof(buf_prefix));
2088 zlog_debug("%s: p=%s, selected=%p", __func__, buf_prefix,
2089 selected);
2090 }
2091
2092 /* First update is deferred until ORF or ROUTE-REFRESH is received */
2093 if (onlypeer && CHECK_FLAG(onlypeer->af_sflags[afi][safi],
2094 PEER_STATUS_ORF_WAIT_REFRESH))
2095 return 0;
2096
2097 memset(&attr, 0, sizeof(struct attr));
2098 /* It's initialized in bgp_announce_check() */
2099
2100 /* Announcement to the subgroup. If the route is filtered withdraw it.
2101 */
2102 if (selected) {
2103 if (subgroup_announce_check(rn, selected, subgrp, p, &attr))
2104 bgp_adj_out_set_subgroup(rn, subgrp, &attr, selected);
2105 else
2106 bgp_adj_out_unset_subgroup(rn, subgrp, 1,
2107 selected->addpath_tx_id);
2108 }
2109
2110 /* If selected is NULL we must withdraw the path using addpath_tx_id */
2111 else {
2112 bgp_adj_out_unset_subgroup(rn, subgrp, 1, addpath_tx_id);
2113 }
2114
2115 return 0;
2116 }
2117
2118 /*
2119 * Clear IGP changed flag and attribute changed flag for a route (all paths).
2120 * This is called at the end of route processing.
2121 */
2122 void bgp_zebra_clear_route_change_flags(struct bgp_node *rn)
2123 {
2124 struct bgp_path_info *pi;
2125
2126 for (pi = rn->info; pi; pi = pi->next) {
2127 if (BGP_PATH_HOLDDOWN(pi))
2128 continue;
2129 UNSET_FLAG(pi->flags, BGP_PATH_IGP_CHANGED);
2130 UNSET_FLAG(pi->flags, BGP_PATH_ATTR_CHANGED);
2131 }
2132 }
2133
2134 /*
2135 * Has the route changed from the RIB's perspective? This is invoked only
2136 * if the route selection returns the same best route as earlier - to
2137 * determine if we need to update zebra or not.
2138 */
2139 int bgp_zebra_has_route_changed(struct bgp_node *rn,
2140 struct bgp_path_info *selected)
2141 {
2142 struct bgp_path_info *mpinfo;
2143
2144 /* If this is multipath, check all selected paths for any nexthop
2145 * change or attribute change. Some attribute changes (e.g., community)
2146 * aren't of relevance to the RIB, but we'll update zebra to ensure
2147 * we handle the case of BGP nexthop change. This is the behavior
2148 * when the best path has an attribute change anyway.
2149 */
2150 if (CHECK_FLAG(selected->flags, BGP_PATH_IGP_CHANGED)
2151 || CHECK_FLAG(selected->flags, BGP_PATH_MULTIPATH_CHG))
2152 return 1;
2153
2154 /*
2155 * If this is multipath, check all selected paths for any nexthop change
2156 */
2157 for (mpinfo = bgp_path_info_mpath_first(selected); mpinfo;
2158 mpinfo = bgp_path_info_mpath_next(mpinfo)) {
2159 if (CHECK_FLAG(mpinfo->flags, BGP_PATH_IGP_CHANGED)
2160 || CHECK_FLAG(mpinfo->flags, BGP_PATH_ATTR_CHANGED))
2161 return 1;
2162 }
2163
2164 /* Nothing has changed from the RIB's perspective. */
2165 return 0;
2166 }
2167
2168 struct bgp_process_queue {
2169 struct bgp *bgp;
2170 STAILQ_HEAD(, bgp_node) pqueue;
2171 #define BGP_PROCESS_QUEUE_EOIU_MARKER (1 << 0)
2172 unsigned int flags;
2173 unsigned int queued;
2174 };
2175
2176 /*
2177 * old_select = The old best path
2178 * new_select = the new best path
2179 *
2180 * if (!old_select && new_select)
2181 * We are sending new information on.
2182 *
2183 * if (old_select && new_select) {
2184 * if (new_select != old_select)
2185 * We have a new best path send a change
2186 * else
2187 * We've received a update with new attributes that needs
2188 * to be passed on.
2189 * }
2190 *
2191 * if (old_select && !new_select)
2192 * We have no eligible route that we can announce or the rn
2193 * is being removed.
2194 */
2195 static void bgp_process_main_one(struct bgp *bgp, struct bgp_node *rn,
2196 afi_t afi, safi_t safi)
2197 {
2198 struct bgp_path_info *new_select;
2199 struct bgp_path_info *old_select;
2200 struct bgp_path_info_pair old_and_new;
2201 char pfx_buf[PREFIX2STR_BUFFER];
2202 int debug = 0;
2203
2204 /* Is it end of initial update? (after startup) */
2205 if (!rn) {
2206 quagga_timestamp(3, bgp->update_delay_zebra_resume_time,
2207 sizeof(bgp->update_delay_zebra_resume_time));
2208
2209 bgp->main_zebra_update_hold = 0;
2210 FOREACH_AFI_SAFI (afi, safi) {
2211 if (bgp_fibupd_safi(safi))
2212 bgp_zebra_announce_table(bgp, afi, safi);
2213 }
2214 bgp->main_peers_update_hold = 0;
2215
2216 bgp_start_routeadv(bgp);
2217 return;
2218 }
2219
2220 struct prefix *p = &rn->p;
2221
2222 debug = bgp_debug_bestpath(&rn->p);
2223 if (debug) {
2224 prefix2str(&rn->p, pfx_buf, sizeof(pfx_buf));
2225 zlog_debug("%s: p=%s afi=%s, safi=%s start", __func__, pfx_buf,
2226 afi2str(afi), safi2str(safi));
2227 }
2228
2229 /* Best path selection. */
2230 bgp_best_selection(bgp, rn, &bgp->maxpaths[afi][safi], &old_and_new,
2231 afi, safi);
2232 old_select = old_and_new.old;
2233 new_select = old_and_new.new;
2234
2235 /* Do we need to allocate or free labels?
2236 * Right now, since we only deal with per-prefix labels, it is not
2237 * necessary to do this upon changes to best path except if the label
2238 * index changes
2239 */
2240 if (bgp->allocate_mpls_labels[afi][safi]) {
2241 if (new_select) {
2242 if (!old_select
2243 || bgp_label_index_differs(new_select, old_select)
2244 || new_select->sub_type != old_select->sub_type) {
2245 if (new_select->sub_type == BGP_ROUTE_STATIC
2246 && new_select->attr->flag
2247 & ATTR_FLAG_BIT(
2248 BGP_ATTR_PREFIX_SID)
2249 && new_select->attr->label_index
2250 != BGP_INVALID_LABEL_INDEX) {
2251 if (CHECK_FLAG(
2252 rn->flags,
2253 BGP_NODE_REGISTERED_FOR_LABEL))
2254 bgp_unregister_for_label(rn);
2255 label_ntop(MPLS_LABEL_IMPLICIT_NULL, 1,
2256 &rn->local_label);
2257 bgp_set_valid_label(&rn->local_label);
2258 } else
2259 bgp_register_for_label(rn, new_select);
2260 }
2261 } else if (CHECK_FLAG(rn->flags,
2262 BGP_NODE_REGISTERED_FOR_LABEL)) {
2263 bgp_unregister_for_label(rn);
2264 }
2265 } else if (CHECK_FLAG(rn->flags, BGP_NODE_REGISTERED_FOR_LABEL)) {
2266 bgp_unregister_for_label(rn);
2267 }
2268
2269 if (debug) {
2270 prefix2str(&rn->p, pfx_buf, sizeof(pfx_buf));
2271 zlog_debug(
2272 "%s: p=%s afi=%s, safi=%s, old_select=%p, new_select=%p",
2273 __func__, pfx_buf, afi2str(afi), safi2str(safi),
2274 old_select, new_select);
2275 }
2276
2277 /* If best route remains the same and this is not due to user-initiated
2278 * clear, see exactly what needs to be done.
2279 */
2280 if (old_select && old_select == new_select
2281 && !CHECK_FLAG(rn->flags, BGP_NODE_USER_CLEAR)
2282 && !CHECK_FLAG(old_select->flags, BGP_PATH_ATTR_CHANGED)
2283 && !bgp->addpath_tx_used[afi][safi]) {
2284 if (bgp_zebra_has_route_changed(rn, old_select)) {
2285 #if ENABLE_BGP_VNC
2286 vnc_import_bgp_add_route(bgp, p, old_select);
2287 vnc_import_bgp_exterior_add_route(bgp, p, old_select);
2288 #endif
2289 if (bgp_fibupd_safi(safi)
2290 && !bgp_option_check(BGP_OPT_NO_FIB)) {
2291
2292 if (new_select->type == ZEBRA_ROUTE_BGP
2293 && (new_select->sub_type == BGP_ROUTE_NORMAL
2294 || new_select->sub_type
2295 == BGP_ROUTE_IMPORTED))
2296
2297 bgp_zebra_announce(rn, p, old_select,
2298 bgp, afi, safi);
2299 }
2300 }
2301 UNSET_FLAG(old_select->flags, BGP_PATH_MULTIPATH_CHG);
2302 bgp_zebra_clear_route_change_flags(rn);
2303
2304 /* If there is a change of interest to peers, reannounce the
2305 * route. */
2306 if (CHECK_FLAG(old_select->flags, BGP_PATH_ATTR_CHANGED)
2307 || CHECK_FLAG(rn->flags, BGP_NODE_LABEL_CHANGED)) {
2308 group_announce_route(bgp, afi, safi, rn, new_select);
2309
2310 /* unicast routes must also be annouced to
2311 * labeled-unicast update-groups */
2312 if (safi == SAFI_UNICAST)
2313 group_announce_route(bgp, afi,
2314 SAFI_LABELED_UNICAST, rn,
2315 new_select);
2316
2317 UNSET_FLAG(old_select->flags, BGP_PATH_ATTR_CHANGED);
2318 UNSET_FLAG(rn->flags, BGP_NODE_LABEL_CHANGED);
2319 }
2320
2321 UNSET_FLAG(rn->flags, BGP_NODE_PROCESS_SCHEDULED);
2322 return;
2323 }
2324
2325 /* If the user did "clear ip bgp prefix x.x.x.x" this flag will be set
2326 */
2327 UNSET_FLAG(rn->flags, BGP_NODE_USER_CLEAR);
2328
2329 /* bestpath has changed; bump version */
2330 if (old_select || new_select) {
2331 bgp_bump_version(rn);
2332
2333 if (!bgp->t_rmap_def_originate_eval) {
2334 bgp_lock(bgp);
2335 thread_add_timer(
2336 bm->master,
2337 update_group_refresh_default_originate_route_map,
2338 bgp, RMAP_DEFAULT_ORIGINATE_EVAL_TIMER,
2339 &bgp->t_rmap_def_originate_eval);
2340 }
2341 }
2342
2343 if (old_select)
2344 bgp_path_info_unset_flag(rn, old_select, BGP_PATH_SELECTED);
2345 if (new_select) {
2346 if (debug)
2347 zlog_debug("%s: setting SELECTED flag", __func__);
2348 bgp_path_info_set_flag(rn, new_select, BGP_PATH_SELECTED);
2349 bgp_path_info_unset_flag(rn, new_select, BGP_PATH_ATTR_CHANGED);
2350 UNSET_FLAG(new_select->flags, BGP_PATH_MULTIPATH_CHG);
2351 }
2352
2353 #if ENABLE_BGP_VNC
2354 if ((afi == AFI_IP || afi == AFI_IP6) && (safi == SAFI_UNICAST)) {
2355 if (old_select != new_select) {
2356 if (old_select) {
2357 vnc_import_bgp_exterior_del_route(bgp, p,
2358 old_select);
2359 vnc_import_bgp_del_route(bgp, p, old_select);
2360 }
2361 if (new_select) {
2362 vnc_import_bgp_exterior_add_route(bgp, p,
2363 new_select);
2364 vnc_import_bgp_add_route(bgp, p, new_select);
2365 }
2366 }
2367 }
2368 #endif
2369
2370 group_announce_route(bgp, afi, safi, rn, new_select);
2371
2372 /* unicast routes must also be annouced to labeled-unicast update-groups
2373 */
2374 if (safi == SAFI_UNICAST)
2375 group_announce_route(bgp, afi, SAFI_LABELED_UNICAST, rn,
2376 new_select);
2377
2378 /* FIB update. */
2379 if (bgp_fibupd_safi(safi) && (bgp->inst_type != BGP_INSTANCE_TYPE_VIEW)
2380 && !bgp_option_check(BGP_OPT_NO_FIB)) {
2381 if (new_select && new_select->type == ZEBRA_ROUTE_BGP
2382 && (new_select->sub_type == BGP_ROUTE_NORMAL
2383 || new_select->sub_type == BGP_ROUTE_AGGREGATE
2384 || new_select->sub_type == BGP_ROUTE_IMPORTED)) {
2385
2386 /* if this is an evpn imported type-5 prefix,
2387 * we need to withdraw the route first to clear
2388 * the nh neigh and the RMAC entry.
2389 */
2390 if (old_select &&
2391 is_route_parent_evpn(old_select))
2392 bgp_zebra_withdraw(p, old_select, bgp, safi);
2393
2394 bgp_zebra_announce(rn, p, new_select, bgp, afi, safi);
2395 } else {
2396 /* Withdraw the route from the kernel. */
2397 if (old_select && old_select->type == ZEBRA_ROUTE_BGP
2398 && (old_select->sub_type == BGP_ROUTE_NORMAL
2399 || old_select->sub_type == BGP_ROUTE_AGGREGATE
2400 || old_select->sub_type == BGP_ROUTE_IMPORTED))
2401
2402 bgp_zebra_withdraw(p, old_select, bgp, safi);
2403 }
2404 }
2405
2406 /* advertise/withdraw type-5 routes */
2407 if ((afi == AFI_IP || afi == AFI_IP6) && (safi == SAFI_UNICAST)) {
2408 if (advertise_type5_routes(bgp, afi) && new_select &&
2409 (!new_select->extra || !new_select->extra->parent)) {
2410
2411 /* apply the route-map */
2412 if (bgp->adv_cmd_rmap[afi][safi].map) {
2413 int ret = 0;
2414
2415 ret = route_map_apply(
2416 bgp->adv_cmd_rmap[afi][safi].map,
2417 &rn->p, RMAP_BGP, new_select);
2418 if (ret == RMAP_MATCH)
2419 bgp_evpn_advertise_type5_route(
2420 bgp, &rn->p, new_select->attr,
2421 afi, safi);
2422 } else {
2423 bgp_evpn_advertise_type5_route(bgp,
2424 &rn->p,
2425 new_select->attr,
2426 afi, safi);
2427
2428 }
2429 } else if (advertise_type5_routes(bgp, afi) && old_select &&
2430 (!old_select->extra || !old_select->extra->parent))
2431 bgp_evpn_withdraw_type5_route(bgp, &rn->p, afi, safi);
2432 }
2433
2434 /* Clear any route change flags. */
2435 bgp_zebra_clear_route_change_flags(rn);
2436
2437 /* Reap old select bgp_path_info, if it has been removed */
2438 if (old_select && CHECK_FLAG(old_select->flags, BGP_PATH_REMOVED))
2439 bgp_path_info_reap(rn, old_select);
2440
2441 UNSET_FLAG(rn->flags, BGP_NODE_PROCESS_SCHEDULED);
2442 return;
2443 }
2444
2445 static wq_item_status bgp_process_wq(struct work_queue *wq, void *data)
2446 {
2447 struct bgp_process_queue *pqnode = data;
2448 struct bgp *bgp = pqnode->bgp;
2449 struct bgp_table *table;
2450 struct bgp_node *rn;
2451
2452 /* eoiu marker */
2453 if (CHECK_FLAG(pqnode->flags, BGP_PROCESS_QUEUE_EOIU_MARKER)) {
2454 bgp_process_main_one(bgp, NULL, 0, 0);
2455 /* should always have dedicated wq call */
2456 assert(STAILQ_FIRST(&pqnode->pqueue) == NULL);
2457 return WQ_SUCCESS;
2458 }
2459
2460 while (!STAILQ_EMPTY(&pqnode->pqueue)) {
2461 rn = STAILQ_FIRST(&pqnode->pqueue);
2462 STAILQ_REMOVE_HEAD(&pqnode->pqueue, pq);
2463 STAILQ_NEXT(rn, pq) = NULL; /* complete unlink */
2464 table = bgp_node_table(rn);
2465 /* note, new RNs may be added as part of processing */
2466 bgp_process_main_one(bgp, rn, table->afi, table->safi);
2467
2468 bgp_unlock_node(rn);
2469 bgp_table_unlock(table);
2470 }
2471
2472 return WQ_SUCCESS;
2473 }
2474
2475 static void bgp_processq_del(struct work_queue *wq, void *data)
2476 {
2477 struct bgp_process_queue *pqnode = data;
2478
2479 bgp_unlock(pqnode->bgp);
2480
2481 XFREE(MTYPE_BGP_PROCESS_QUEUE, pqnode);
2482 }
2483
2484 void bgp_process_queue_init(void)
2485 {
2486 if (!bm->process_main_queue)
2487 bm->process_main_queue =
2488 work_queue_new(bm->master, "process_main_queue");
2489
2490 bm->process_main_queue->spec.workfunc = &bgp_process_wq;
2491 bm->process_main_queue->spec.del_item_data = &bgp_processq_del;
2492 bm->process_main_queue->spec.max_retries = 0;
2493 bm->process_main_queue->spec.hold = 50;
2494 /* Use a higher yield value of 50ms for main queue processing */
2495 bm->process_main_queue->spec.yield = 50 * 1000L;
2496 }
2497
2498 static struct bgp_process_queue *bgp_processq_alloc(struct bgp *bgp)
2499 {
2500 struct bgp_process_queue *pqnode;
2501
2502 pqnode = XCALLOC(MTYPE_BGP_PROCESS_QUEUE,
2503 sizeof(struct bgp_process_queue));
2504
2505 /* unlocked in bgp_processq_del */
2506 pqnode->bgp = bgp_lock(bgp);
2507 STAILQ_INIT(&pqnode->pqueue);
2508
2509 return pqnode;
2510 }
2511
2512 void bgp_process(struct bgp *bgp, struct bgp_node *rn, afi_t afi, safi_t safi)
2513 {
2514 #define ARBITRARY_PROCESS_QLEN 10000
2515 struct work_queue *wq = bm->process_main_queue;
2516 struct bgp_process_queue *pqnode;
2517 int pqnode_reuse = 0;
2518
2519 /* already scheduled for processing? */
2520 if (CHECK_FLAG(rn->flags, BGP_NODE_PROCESS_SCHEDULED))
2521 return;
2522
2523 if (wq == NULL)
2524 return;
2525
2526 /* Add route nodes to an existing work queue item until reaching the
2527 limit only if is from the same BGP view and it's not an EOIU marker
2528 */
2529 if (work_queue_item_count(wq)) {
2530 struct work_queue_item *item = work_queue_last_item(wq);
2531 pqnode = item->data;
2532
2533 if (CHECK_FLAG(pqnode->flags, BGP_PROCESS_QUEUE_EOIU_MARKER)
2534 || pqnode->bgp != bgp
2535 || pqnode->queued >= ARBITRARY_PROCESS_QLEN)
2536 pqnode = bgp_processq_alloc(bgp);
2537 else
2538 pqnode_reuse = 1;
2539 } else
2540 pqnode = bgp_processq_alloc(bgp);
2541 /* all unlocked in bgp_process_wq */
2542 bgp_table_lock(bgp_node_table(rn));
2543
2544 SET_FLAG(rn->flags, BGP_NODE_PROCESS_SCHEDULED);
2545 bgp_lock_node(rn);
2546
2547 /* can't be enqueued twice */
2548 assert(STAILQ_NEXT(rn, pq) == NULL);
2549 STAILQ_INSERT_TAIL(&pqnode->pqueue, rn, pq);
2550 pqnode->queued++;
2551
2552 if (!pqnode_reuse)
2553 work_queue_add(wq, pqnode);
2554
2555 return;
2556 }
2557
2558 void bgp_add_eoiu_mark(struct bgp *bgp)
2559 {
2560 struct bgp_process_queue *pqnode;
2561
2562 if (bm->process_main_queue == NULL)
2563 return;
2564
2565 pqnode = bgp_processq_alloc(bgp);
2566
2567 SET_FLAG(pqnode->flags, BGP_PROCESS_QUEUE_EOIU_MARKER);
2568 work_queue_add(bm->process_main_queue, pqnode);
2569 }
2570
2571 static int bgp_maximum_prefix_restart_timer(struct thread *thread)
2572 {
2573 struct peer *peer;
2574
2575 peer = THREAD_ARG(thread);
2576 peer->t_pmax_restart = NULL;
2577
2578 if (bgp_debug_neighbor_events(peer))
2579 zlog_debug(
2580 "%s Maximum-prefix restart timer expired, restore peering",
2581 peer->host);
2582
2583 if ((peer_clear(peer, NULL) < 0) && bgp_debug_neighbor_events(peer))
2584 zlog_debug("%s: %s peer_clear failed",
2585 __PRETTY_FUNCTION__, peer->host);
2586
2587 return 0;
2588 }
2589
2590 int bgp_maximum_prefix_overflow(struct peer *peer, afi_t afi, safi_t safi,
2591 int always)
2592 {
2593 iana_afi_t pkt_afi;
2594 iana_safi_t pkt_safi;
2595
2596 if (!CHECK_FLAG(peer->af_flags[afi][safi], PEER_FLAG_MAX_PREFIX))
2597 return 0;
2598
2599 if (peer->pcount[afi][safi] > peer->pmax[afi][safi]) {
2600 if (CHECK_FLAG(peer->af_sflags[afi][safi],
2601 PEER_STATUS_PREFIX_LIMIT)
2602 && !always)
2603 return 0;
2604
2605 zlog_info(
2606 "%%MAXPFXEXCEED: No. of %s prefix received from %s %ld exceed, "
2607 "limit %ld",
2608 afi_safi_print(afi, safi), peer->host,
2609 peer->pcount[afi][safi], peer->pmax[afi][safi]);
2610 SET_FLAG(peer->af_sflags[afi][safi], PEER_STATUS_PREFIX_LIMIT);
2611
2612 if (CHECK_FLAG(peer->af_flags[afi][safi],
2613 PEER_FLAG_MAX_PREFIX_WARNING))
2614 return 0;
2615
2616 /* Convert AFI, SAFI to values for packet. */
2617 pkt_afi = afi_int2iana(afi);
2618 pkt_safi = safi_int2iana(safi);
2619 {
2620 uint8_t ndata[7];
2621
2622 ndata[0] = (pkt_afi >> 8);
2623 ndata[1] = pkt_afi;
2624 ndata[2] = pkt_safi;
2625 ndata[3] = (peer->pmax[afi][safi] >> 24);
2626 ndata[4] = (peer->pmax[afi][safi] >> 16);
2627 ndata[5] = (peer->pmax[afi][safi] >> 8);
2628 ndata[6] = (peer->pmax[afi][safi]);
2629
2630 SET_FLAG(peer->sflags, PEER_STATUS_PREFIX_OVERFLOW);
2631 bgp_notify_send_with_data(peer, BGP_NOTIFY_CEASE,
2632 BGP_NOTIFY_CEASE_MAX_PREFIX,
2633 ndata, 7);
2634 }
2635
2636 /* Dynamic peers will just close their connection. */
2637 if (peer_dynamic_neighbor(peer))
2638 return 1;
2639
2640 /* restart timer start */
2641 if (peer->pmax_restart[afi][safi]) {
2642 peer->v_pmax_restart =
2643 peer->pmax_restart[afi][safi] * 60;
2644
2645 if (bgp_debug_neighbor_events(peer))
2646 zlog_debug(
2647 "%s Maximum-prefix restart timer started for %d secs",
2648 peer->host, peer->v_pmax_restart);
2649
2650 BGP_TIMER_ON(peer->t_pmax_restart,
2651 bgp_maximum_prefix_restart_timer,
2652 peer->v_pmax_restart);
2653 }
2654
2655 return 1;
2656 } else
2657 UNSET_FLAG(peer->af_sflags[afi][safi],
2658 PEER_STATUS_PREFIX_LIMIT);
2659
2660 if (peer->pcount[afi][safi]
2661 > (peer->pmax[afi][safi] * peer->pmax_threshold[afi][safi] / 100)) {
2662 if (CHECK_FLAG(peer->af_sflags[afi][safi],
2663 PEER_STATUS_PREFIX_THRESHOLD)
2664 && !always)
2665 return 0;
2666
2667 zlog_info(
2668 "%%MAXPFX: No. of %s prefix received from %s reaches %ld, max %ld",
2669 afi_safi_print(afi, safi), peer->host,
2670 peer->pcount[afi][safi], peer->pmax[afi][safi]);
2671 SET_FLAG(peer->af_sflags[afi][safi],
2672 PEER_STATUS_PREFIX_THRESHOLD);
2673 } else
2674 UNSET_FLAG(peer->af_sflags[afi][safi],
2675 PEER_STATUS_PREFIX_THRESHOLD);
2676 return 0;
2677 }
2678
2679 /* Unconditionally remove the route from the RIB, without taking
2680 * damping into consideration (eg, because the session went down)
2681 */
2682 void bgp_rib_remove(struct bgp_node *rn, struct bgp_path_info *pi,
2683 struct peer *peer, afi_t afi, safi_t safi)
2684 {
2685 bgp_aggregate_decrement(peer->bgp, &rn->p, pi, afi, safi);
2686
2687 if (!CHECK_FLAG(pi->flags, BGP_PATH_HISTORY))
2688 bgp_path_info_delete(rn, pi); /* keep historical info */
2689
2690 bgp_process(peer->bgp, rn, afi, safi);
2691 }
2692
2693 static void bgp_rib_withdraw(struct bgp_node *rn, struct bgp_path_info *pi,
2694 struct peer *peer, afi_t afi, safi_t safi,
2695 struct prefix_rd *prd)
2696 {
2697 /* apply dampening, if result is suppressed, we'll be retaining
2698 * the bgp_path_info in the RIB for historical reference.
2699 */
2700 if (CHECK_FLAG(peer->bgp->af_flags[afi][safi], BGP_CONFIG_DAMPENING)
2701 && peer->sort == BGP_PEER_EBGP)
2702 if ((bgp_damp_withdraw(pi, rn, afi, safi, 0))
2703 == BGP_DAMP_SUPPRESSED) {
2704 bgp_aggregate_decrement(peer->bgp, &rn->p, pi, afi,
2705 safi);
2706 return;
2707 }
2708
2709 #if ENABLE_BGP_VNC
2710 if (safi == SAFI_MPLS_VPN) {
2711 struct bgp_node *prn = NULL;
2712 struct bgp_table *table = NULL;
2713
2714 prn = bgp_node_get(peer->bgp->rib[afi][safi],
2715 (struct prefix *)prd);
2716 if (prn->info) {
2717 table = (struct bgp_table *)(prn->info);
2718
2719 vnc_import_bgp_del_vnc_host_route_mode_resolve_nve(
2720 peer->bgp, prd, table, &rn->p, pi);
2721 }
2722 bgp_unlock_node(prn);
2723 }
2724 if ((afi == AFI_IP || afi == AFI_IP6) && (safi == SAFI_UNICAST)) {
2725 if (CHECK_FLAG(pi->flags, BGP_PATH_SELECTED)) {
2726
2727 vnc_import_bgp_del_route(peer->bgp, &rn->p, pi);
2728 vnc_import_bgp_exterior_del_route(peer->bgp, &rn->p,
2729 pi);
2730 }
2731 }
2732 #endif
2733
2734 /* If this is an EVPN route, process for un-import. */
2735 if (safi == SAFI_EVPN)
2736 bgp_evpn_unimport_route(peer->bgp, afi, safi, &rn->p, pi);
2737
2738 bgp_rib_remove(rn, pi, peer, afi, safi);
2739 }
2740
2741 struct bgp_path_info *info_make(int type, int sub_type, unsigned short instance,
2742 struct peer *peer, struct attr *attr,
2743 struct bgp_node *rn)
2744 {
2745 struct bgp_path_info *new;
2746
2747 /* Make new BGP info. */
2748 new = XCALLOC(MTYPE_BGP_ROUTE, sizeof(struct bgp_path_info));
2749 new->type = type;
2750 new->instance = instance;
2751 new->sub_type = sub_type;
2752 new->peer = peer;
2753 new->attr = attr;
2754 new->uptime = bgp_clock();
2755 new->net = rn;
2756 new->addpath_tx_id = ++peer->bgp->addpath_tx_id;
2757 return new;
2758 }
2759
2760 static void overlay_index_update(struct attr *attr,
2761 struct eth_segment_id *eth_s_id,
2762 union gw_addr *gw_ip)
2763 {
2764 if (!attr)
2765 return;
2766
2767 if (eth_s_id == NULL) {
2768 memset(&(attr->evpn_overlay.eth_s_id), 0,
2769 sizeof(struct eth_segment_id));
2770 } else {
2771 memcpy(&(attr->evpn_overlay.eth_s_id), eth_s_id,
2772 sizeof(struct eth_segment_id));
2773 }
2774 if (gw_ip == NULL) {
2775 memset(&(attr->evpn_overlay.gw_ip), 0, sizeof(union gw_addr));
2776 } else {
2777 memcpy(&(attr->evpn_overlay.gw_ip), gw_ip,
2778 sizeof(union gw_addr));
2779 }
2780 }
2781
2782 static bool overlay_index_equal(afi_t afi, struct bgp_path_info *path,
2783 struct eth_segment_id *eth_s_id,
2784 union gw_addr *gw_ip)
2785 {
2786 struct eth_segment_id *path_eth_s_id, *path_eth_s_id_remote;
2787 union gw_addr *path_gw_ip, *path_gw_ip_remote;
2788 union {
2789 struct eth_segment_id esi;
2790 union gw_addr ip;
2791 } temp;
2792
2793 if (afi != AFI_L2VPN)
2794 return true;
2795 if (!path->attr) {
2796 memset(&temp, 0, sizeof(temp));
2797 path_eth_s_id = &temp.esi;
2798 path_gw_ip = &temp.ip;
2799
2800 if (eth_s_id == NULL && gw_ip == NULL)
2801 return true;
2802 } else {
2803 path_eth_s_id = &(path->attr->evpn_overlay.eth_s_id);
2804 path_gw_ip = &(path->attr->evpn_overlay.gw_ip);
2805 }
2806
2807 if (gw_ip == NULL) {
2808 memset(&temp, 0, sizeof(temp));
2809 path_gw_ip_remote = &temp.ip;
2810 } else
2811 path_gw_ip_remote = gw_ip;
2812
2813 if (eth_s_id == NULL) {
2814 memset(&temp, 0, sizeof(temp));
2815 path_eth_s_id_remote = &temp.esi;
2816 } else
2817 path_eth_s_id_remote = eth_s_id;
2818
2819 if (!memcmp(path_gw_ip, path_gw_ip_remote, sizeof(union gw_addr)))
2820 return false;
2821
2822 return !memcmp(path_eth_s_id, path_eth_s_id_remote,
2823 sizeof(struct eth_segment_id));
2824 }
2825
2826 /* Check if received nexthop is valid or not. */
2827 static int bgp_update_martian_nexthop(struct bgp *bgp, afi_t afi, safi_t safi,
2828 struct attr *attr)
2829 {
2830 int ret = 0;
2831
2832 /* Only validated for unicast and multicast currently. */
2833 /* Also valid for EVPN where the nexthop is an IP address. */
2834 if (safi != SAFI_UNICAST && safi != SAFI_MULTICAST && safi != SAFI_EVPN)
2835 return 0;
2836
2837 /* If NEXT_HOP is present, validate it. */
2838 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_NEXT_HOP)) {
2839 if (attr->nexthop.s_addr == 0
2840 || IPV4_CLASS_DE(ntohl(attr->nexthop.s_addr))
2841 || bgp_nexthop_self(bgp, attr->nexthop))
2842 return 1;
2843 }
2844
2845 /* If MP_NEXTHOP is present, validate it. */
2846 /* Note: For IPv6 nexthops, we only validate the global (1st) nexthop;
2847 * there is code in bgp_attr.c to ignore the link-local (2nd) nexthop if
2848 * it is not an IPv6 link-local address.
2849 */
2850 if (attr->mp_nexthop_len) {
2851 switch (attr->mp_nexthop_len) {
2852 case BGP_ATTR_NHLEN_IPV4:
2853 case BGP_ATTR_NHLEN_VPNV4:
2854 ret = (attr->mp_nexthop_global_in.s_addr == 0
2855 || IPV4_CLASS_DE(ntohl(
2856 attr->mp_nexthop_global_in.s_addr))
2857 || bgp_nexthop_self(bgp,
2858 attr->mp_nexthop_global_in));
2859 break;
2860
2861 case BGP_ATTR_NHLEN_IPV6_GLOBAL:
2862 case BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL:
2863 case BGP_ATTR_NHLEN_VPNV6_GLOBAL:
2864 ret = (IN6_IS_ADDR_UNSPECIFIED(&attr->mp_nexthop_global)
2865 || IN6_IS_ADDR_LOOPBACK(&attr->mp_nexthop_global)
2866 || IN6_IS_ADDR_MULTICAST(
2867 &attr->mp_nexthop_global));
2868 break;
2869
2870 default:
2871 ret = 1;
2872 break;
2873 }
2874 }
2875
2876 return ret;
2877 }
2878
2879 int bgp_update(struct peer *peer, struct prefix *p, uint32_t addpath_id,
2880 struct attr *attr, afi_t afi, safi_t safi, int type,
2881 int sub_type, struct prefix_rd *prd, mpls_label_t *label,
2882 uint32_t num_labels, int soft_reconfig,
2883 struct bgp_route_evpn *evpn)
2884 {
2885 int ret;
2886 int aspath_loop_count = 0;
2887 struct bgp_node *rn;
2888 struct bgp *bgp;
2889 struct attr new_attr;
2890 struct attr *attr_new;
2891 struct bgp_path_info *pi;
2892 struct bgp_path_info *new;
2893 struct bgp_path_info_extra *extra;
2894 const char *reason;
2895 char pfx_buf[BGP_PRD_PATH_STRLEN];
2896 int connected = 0;
2897 int do_loop_check = 1;
2898 int has_valid_label = 0;
2899 #if ENABLE_BGP_VNC
2900 int vnc_implicit_withdraw = 0;
2901 #endif
2902 int same_attr = 0;
2903
2904 memset(&new_attr, 0, sizeof(struct attr));
2905 new_attr.label_index = BGP_INVALID_LABEL_INDEX;
2906 new_attr.label = MPLS_INVALID_LABEL;
2907
2908 bgp = peer->bgp;
2909 rn = bgp_afi_node_get(bgp->rib[afi][safi], afi, safi, p, prd);
2910 /* TODO: Check to see if we can get rid of "is_valid_label" */
2911 if (afi == AFI_L2VPN && safi == SAFI_EVPN)
2912 has_valid_label = (num_labels > 0) ? 1 : 0;
2913 else
2914 has_valid_label = bgp_is_valid_label(label);
2915
2916 /* When peer's soft reconfiguration enabled. Record input packet in
2917 Adj-RIBs-In. */
2918 if (!soft_reconfig
2919 && CHECK_FLAG(peer->af_flags[afi][safi], PEER_FLAG_SOFT_RECONFIG)
2920 && peer != bgp->peer_self)
2921 bgp_adj_in_set(rn, peer, attr, addpath_id);
2922
2923 /* Check previously received route. */
2924 for (pi = rn->info; pi; pi = pi->next)
2925 if (pi->peer == peer && pi->type == type
2926 && pi->sub_type == sub_type
2927 && pi->addpath_rx_id == addpath_id)
2928 break;
2929
2930 /* AS path local-as loop check. */
2931 if (peer->change_local_as) {
2932 if (peer->allowas_in[afi][safi])
2933 aspath_loop_count = peer->allowas_in[afi][safi];
2934 else if (!CHECK_FLAG(peer->flags,
2935 PEER_FLAG_LOCAL_AS_NO_PREPEND))
2936 aspath_loop_count = 1;
2937
2938 if (aspath_loop_check(attr->aspath, peer->change_local_as)
2939 > aspath_loop_count) {
2940 reason = "as-path contains our own AS;";
2941 goto filtered;
2942 }
2943 }
2944
2945 /* If the peer is configured for "allowas-in origin" and the last ASN in
2946 * the
2947 * as-path is our ASN then we do not need to call aspath_loop_check
2948 */
2949 if (CHECK_FLAG(peer->af_flags[afi][safi], PEER_FLAG_ALLOWAS_IN_ORIGIN))
2950 if (aspath_get_last_as(attr->aspath) == bgp->as)
2951 do_loop_check = 0;
2952
2953 /* AS path loop check. */
2954 if (do_loop_check) {
2955 if (aspath_loop_check(attr->aspath, bgp->as)
2956 > peer->allowas_in[afi][safi]
2957 || (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION)
2958 && aspath_loop_check(attr->aspath, bgp->confed_id)
2959 > peer->allowas_in[afi][safi])) {
2960 reason = "as-path contains our own AS;";
2961 goto filtered;
2962 }
2963 }
2964
2965 /* Route reflector originator ID check. */
2966 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID)
2967 && IPV4_ADDR_SAME(&bgp->router_id, &attr->originator_id)) {
2968 reason = "originator is us;";
2969 goto filtered;
2970 }
2971
2972 /* Route reflector cluster ID check. */
2973 if (bgp_cluster_filter(peer, attr)) {
2974 reason = "reflected from the same cluster;";
2975 goto filtered;
2976 }
2977
2978 /* Apply incoming filter. */
2979 if (bgp_input_filter(peer, p, attr, afi, safi) == FILTER_DENY) {
2980 reason = "filter;";
2981 goto filtered;
2982 }
2983
2984 bgp_attr_dup(&new_attr, attr);
2985
2986 /* Apply incoming route-map.
2987 * NB: new_attr may now contain newly allocated values from route-map
2988 * "set"
2989 * commands, so we need bgp_attr_flush in the error paths, until we
2990 * intern
2991 * the attr (which takes over the memory references) */
2992 if (bgp_input_modifier(peer, p, &new_attr, afi, safi, NULL)
2993 == RMAP_DENY) {
2994 reason = "route-map;";
2995 bgp_attr_flush(&new_attr);
2996 goto filtered;
2997 }
2998
2999 if (peer->sort == BGP_PEER_EBGP) {
3000
3001 /* If we receive the graceful-shutdown community from an eBGP
3002 * peer we must lower local-preference */
3003 if (new_attr.community
3004 && community_include(new_attr.community, COMMUNITY_GSHUT)) {
3005 new_attr.flag |= ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF);
3006 new_attr.local_pref = BGP_GSHUT_LOCAL_PREF;
3007
3008 /* If graceful-shutdown is configured then add the GSHUT
3009 * community to all paths received from eBGP peers */
3010 } else if (bgp_flag_check(peer->bgp,
3011 BGP_FLAG_GRACEFUL_SHUTDOWN)) {
3012 bgp_attr_add_gshut_community(&new_attr);
3013 }
3014 }
3015
3016 /* next hop check. */
3017 if (!CHECK_FLAG(peer->flags, PEER_FLAG_IS_RFAPI_HD)
3018 && bgp_update_martian_nexthop(bgp, afi, safi, &new_attr)) {
3019 reason = "martian or self next-hop;";
3020 bgp_attr_flush(&new_attr);
3021 goto filtered;
3022 }
3023
3024 attr_new = bgp_attr_intern(&new_attr);
3025
3026 /* If the update is implicit withdraw. */
3027 if (pi) {
3028 pi->uptime = bgp_clock();
3029 same_attr = attrhash_cmp(pi->attr, attr_new);
3030
3031 /* Same attribute comes in. */
3032 if (!CHECK_FLAG(pi->flags, BGP_PATH_REMOVED)
3033 && attrhash_cmp(pi->attr, attr_new)
3034 && (!has_valid_label
3035 || memcmp(&(bgp_path_info_extra_get(pi))->label, label,
3036 num_labels * sizeof(mpls_label_t))
3037 == 0)
3038 && (overlay_index_equal(
3039 afi, pi, evpn == NULL ? NULL : &evpn->eth_s_id,
3040 evpn == NULL ? NULL : &evpn->gw_ip))) {
3041 if (CHECK_FLAG(bgp->af_flags[afi][safi],
3042 BGP_CONFIG_DAMPENING)
3043 && peer->sort == BGP_PEER_EBGP
3044 && CHECK_FLAG(pi->flags, BGP_PATH_HISTORY)) {
3045 if (bgp_debug_update(peer, p, NULL, 1)) {
3046 bgp_debug_rdpfxpath2str(
3047 afi, safi, prd, p, label,
3048 num_labels, addpath_id ? 1 : 0,
3049 addpath_id, pfx_buf,
3050 sizeof(pfx_buf));
3051 zlog_debug("%s rcvd %s", peer->host,
3052 pfx_buf);
3053 }
3054
3055 if (bgp_damp_update(pi, rn, afi, safi)
3056 != BGP_DAMP_SUPPRESSED) {
3057 bgp_aggregate_increment(bgp, p, pi, afi,
3058 safi);
3059 bgp_process(bgp, rn, afi, safi);
3060 }
3061 } else /* Duplicate - odd */
3062 {
3063 if (bgp_debug_update(peer, p, NULL, 1)) {
3064 if (!peer->rcvd_attr_printed) {
3065 zlog_debug(
3066 "%s rcvd UPDATE w/ attr: %s",
3067 peer->host,
3068 peer->rcvd_attr_str);
3069 peer->rcvd_attr_printed = 1;
3070 }
3071
3072 bgp_debug_rdpfxpath2str(
3073 afi, safi, prd, p, label,
3074 num_labels, addpath_id ? 1 : 0,
3075 addpath_id, pfx_buf,
3076 sizeof(pfx_buf));
3077 zlog_debug(
3078 "%s rcvd %s...duplicate ignored",
3079 peer->host, pfx_buf);
3080 }
3081
3082 /* graceful restart STALE flag unset. */
3083 if (CHECK_FLAG(pi->flags, BGP_PATH_STALE)) {
3084 bgp_path_info_unset_flag(
3085 rn, pi, BGP_PATH_STALE);
3086 bgp_process(bgp, rn, afi, safi);
3087 }
3088 }
3089
3090 bgp_unlock_node(rn);
3091 bgp_attr_unintern(&attr_new);
3092
3093 return 0;
3094 }
3095
3096 /* Withdraw/Announce before we fully processed the withdraw */
3097 if (CHECK_FLAG(pi->flags, BGP_PATH_REMOVED)) {
3098 if (bgp_debug_update(peer, p, NULL, 1)) {
3099 bgp_debug_rdpfxpath2str(
3100 afi, safi, prd, p, label, num_labels,
3101 addpath_id ? 1 : 0, addpath_id, pfx_buf,
3102 sizeof(pfx_buf));
3103 zlog_debug(
3104 "%s rcvd %s, flapped quicker than processing",
3105 peer->host, pfx_buf);
3106 }
3107
3108 bgp_path_info_restore(rn, pi);
3109 }
3110
3111 /* Received Logging. */
3112 if (bgp_debug_update(peer, p, NULL, 1)) {
3113 bgp_debug_rdpfxpath2str(afi, safi, prd, p, label,
3114 num_labels, addpath_id ? 1 : 0,
3115 addpath_id, pfx_buf,
3116 sizeof(pfx_buf));
3117 zlog_debug("%s rcvd %s", peer->host, pfx_buf);
3118 }
3119
3120 /* graceful restart STALE flag unset. */
3121 if (CHECK_FLAG(pi->flags, BGP_PATH_STALE))
3122 bgp_path_info_unset_flag(rn, pi, BGP_PATH_STALE);
3123
3124 /* The attribute is changed. */
3125 bgp_path_info_set_flag(rn, pi, BGP_PATH_ATTR_CHANGED);
3126
3127 /* implicit withdraw, decrement aggregate and pcount here.
3128 * only if update is accepted, they'll increment below.
3129 */
3130 bgp_aggregate_decrement(bgp, p, pi, afi, safi);
3131
3132 /* Update bgp route dampening information. */
3133 if (CHECK_FLAG(bgp->af_flags[afi][safi], BGP_CONFIG_DAMPENING)
3134 && peer->sort == BGP_PEER_EBGP) {
3135 /* This is implicit withdraw so we should update
3136 dampening
3137 information. */
3138 if (!CHECK_FLAG(pi->flags, BGP_PATH_HISTORY))
3139 bgp_damp_withdraw(pi, rn, afi, safi, 1);
3140 }
3141 #if ENABLE_BGP_VNC
3142 if (safi == SAFI_MPLS_VPN) {
3143 struct bgp_node *prn = NULL;
3144 struct bgp_table *table = NULL;
3145
3146 prn = bgp_node_get(bgp->rib[afi][safi],
3147 (struct prefix *)prd);
3148 if (prn->info) {
3149 table = (struct bgp_table *)(prn->info);
3150
3151 vnc_import_bgp_del_vnc_host_route_mode_resolve_nve(
3152 bgp, prd, table, p, pi);
3153 }
3154 bgp_unlock_node(prn);
3155 }
3156 if ((afi == AFI_IP || afi == AFI_IP6)
3157 && (safi == SAFI_UNICAST)) {
3158 if (CHECK_FLAG(pi->flags, BGP_PATH_SELECTED)) {
3159 /*
3160 * Implicit withdraw case.
3161 */
3162 ++vnc_implicit_withdraw;
3163 vnc_import_bgp_del_route(bgp, p, pi);
3164 vnc_import_bgp_exterior_del_route(bgp, p, pi);
3165 }
3166 }
3167 #endif
3168
3169 /* Special handling for EVPN update of an existing route. If the
3170 * extended community attribute has changed, we need to
3171 * un-import
3172 * the route using its existing extended community. It will be
3173 * subsequently processed for import with the new extended
3174 * community.
3175 */
3176 if (safi == SAFI_EVPN && !same_attr) {
3177 if ((pi->attr->flag
3178 & ATTR_FLAG_BIT(BGP_ATTR_EXT_COMMUNITIES))
3179 && (attr_new->flag
3180 & ATTR_FLAG_BIT(BGP_ATTR_EXT_COMMUNITIES))) {
3181 int cmp;
3182
3183 cmp = ecommunity_cmp(pi->attr->ecommunity,
3184 attr_new->ecommunity);
3185 if (!cmp) {
3186 if (bgp_debug_update(peer, p, NULL, 1))
3187 zlog_debug(
3188 "Change in EXT-COMM, existing %s new %s",
3189 ecommunity_str(
3190 pi->attr->ecommunity),
3191 ecommunity_str(
3192 attr_new->ecommunity));
3193 bgp_evpn_unimport_route(bgp, afi, safi,
3194 p, pi);
3195 }
3196 }
3197 }
3198
3199 /* Update to new attribute. */
3200 bgp_attr_unintern(&pi->attr);
3201 pi->attr = attr_new;
3202
3203 /* Update MPLS label */
3204 if (has_valid_label) {
3205 extra = bgp_path_info_extra_get(pi);
3206 memcpy(&extra->label, label,
3207 num_labels * sizeof(mpls_label_t));
3208 extra->num_labels = num_labels;
3209 if (!(afi == AFI_L2VPN && safi == SAFI_EVPN))
3210 bgp_set_valid_label(&extra->label[0]);
3211 }
3212
3213 #if ENABLE_BGP_VNC
3214 if ((afi == AFI_IP || afi == AFI_IP6)
3215 && (safi == SAFI_UNICAST)) {
3216 if (vnc_implicit_withdraw) {
3217 /*
3218 * Add back the route with its new attributes
3219 * (e.g., nexthop).
3220 * The route is still selected, until the route
3221 * selection
3222 * queued by bgp_process actually runs. We have
3223 * to make this
3224 * update to the VNC side immediately to avoid
3225 * racing against
3226 * configuration changes (e.g., route-map
3227 * changes) which
3228 * trigger re-importation of the entire RIB.
3229 */
3230 vnc_import_bgp_add_route(bgp, p, pi);
3231 vnc_import_bgp_exterior_add_route(bgp, p, pi);
3232 }
3233 }
3234 #endif
3235 /* Update Overlay Index */
3236 if (afi == AFI_L2VPN) {
3237 overlay_index_update(
3238 pi->attr, evpn == NULL ? NULL : &evpn->eth_s_id,
3239 evpn == NULL ? NULL : &evpn->gw_ip);
3240 }
3241
3242 /* Update bgp route dampening information. */
3243 if (CHECK_FLAG(bgp->af_flags[afi][safi], BGP_CONFIG_DAMPENING)
3244 && peer->sort == BGP_PEER_EBGP) {
3245 /* Now we do normal update dampening. */
3246 ret = bgp_damp_update(pi, rn, afi, safi);
3247 if (ret == BGP_DAMP_SUPPRESSED) {
3248 bgp_unlock_node(rn);
3249 return 0;
3250 }
3251 }
3252
3253 /* Nexthop reachability check - for unicast and
3254 * labeled-unicast.. */
3255 if ((afi == AFI_IP || afi == AFI_IP6)
3256 && (safi == SAFI_UNICAST || safi == SAFI_LABELED_UNICAST)) {
3257 if (peer->sort == BGP_PEER_EBGP && peer->ttl == 1
3258 && !CHECK_FLAG(peer->flags,
3259 PEER_FLAG_DISABLE_CONNECTED_CHECK)
3260 && !bgp_flag_check(
3261 bgp, BGP_FLAG_DISABLE_NH_CONNECTED_CHK))
3262 connected = 1;
3263 else
3264 connected = 0;
3265
3266 struct bgp *bgp_nexthop = bgp;
3267
3268 if (pi->extra && pi->extra->bgp_orig)
3269 bgp_nexthop = pi->extra->bgp_orig;
3270
3271 if (bgp_find_or_add_nexthop(bgp, bgp_nexthop, afi, pi,
3272 NULL, connected)
3273 || CHECK_FLAG(peer->flags, PEER_FLAG_IS_RFAPI_HD))
3274 bgp_path_info_set_flag(rn, pi, BGP_PATH_VALID);
3275 else {
3276 if (BGP_DEBUG(nht, NHT)) {
3277 char buf1[INET6_ADDRSTRLEN];
3278 inet_ntop(AF_INET,
3279 (const void *)&attr_new
3280 ->nexthop,
3281 buf1, INET6_ADDRSTRLEN);
3282 zlog_debug("%s(%s): NH unresolved",
3283 __FUNCTION__, buf1);
3284 }
3285 bgp_path_info_unset_flag(rn, pi,
3286 BGP_PATH_VALID);
3287 }
3288 } else
3289 bgp_path_info_set_flag(rn, pi, BGP_PATH_VALID);
3290
3291 #if ENABLE_BGP_VNC
3292 if (safi == SAFI_MPLS_VPN) {
3293 struct bgp_node *prn = NULL;
3294 struct bgp_table *table = NULL;
3295
3296 prn = bgp_node_get(bgp->rib[afi][safi],
3297 (struct prefix *)prd);
3298 if (prn->info) {
3299 table = (struct bgp_table *)(prn->info);
3300
3301 vnc_import_bgp_add_vnc_host_route_mode_resolve_nve(
3302 bgp, prd, table, p, pi);
3303 }
3304 bgp_unlock_node(prn);
3305 }
3306 #endif
3307
3308 /* If this is an EVPN route and some attribute has changed,
3309 * process
3310 * route for import. If the extended community has changed, we
3311 * would
3312 * have done the un-import earlier and the import would result
3313 * in the
3314 * route getting injected into appropriate L2 VNIs. If it is
3315 * just
3316 * some other attribute change, the import will result in
3317 * updating
3318 * the attributes for the route in the VNI(s).
3319 */
3320 if (safi == SAFI_EVPN && !same_attr)
3321 bgp_evpn_import_route(bgp, afi, safi, p, pi);
3322
3323 /* Process change. */
3324 bgp_aggregate_increment(bgp, p, pi, afi, safi);
3325
3326 bgp_process(bgp, rn, afi, safi);
3327 bgp_unlock_node(rn);
3328
3329 if (SAFI_UNICAST == safi
3330 && (bgp->inst_type == BGP_INSTANCE_TYPE_VRF
3331 || bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
3332
3333 vpn_leak_from_vrf_update(bgp_get_default(), bgp, pi);
3334 }
3335 if ((SAFI_MPLS_VPN == safi)
3336 && (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
3337
3338 vpn_leak_to_vrf_update(bgp, pi);
3339 }
3340
3341 #if ENABLE_BGP_VNC
3342 if (SAFI_MPLS_VPN == safi) {
3343 mpls_label_t label_decoded = decode_label(label);
3344
3345 rfapiProcessUpdate(peer, NULL, p, prd, attr, afi, safi,
3346 type, sub_type, &label_decoded);
3347 }
3348 if (SAFI_ENCAP == safi) {
3349 rfapiProcessUpdate(peer, NULL, p, prd, attr, afi, safi,
3350 type, sub_type, NULL);
3351 }
3352 #endif
3353
3354 return 0;
3355 } // End of implicit withdraw
3356
3357 /* Received Logging. */
3358 if (bgp_debug_update(peer, p, NULL, 1)) {
3359 if (!peer->rcvd_attr_printed) {
3360 zlog_debug("%s rcvd UPDATE w/ attr: %s", peer->host,
3361 peer->rcvd_attr_str);
3362 peer->rcvd_attr_printed = 1;
3363 }
3364
3365 bgp_debug_rdpfxpath2str(afi, safi, prd, p, label, num_labels,
3366 addpath_id ? 1 : 0, addpath_id, pfx_buf,
3367 sizeof(pfx_buf));
3368 zlog_debug("%s rcvd %s", peer->host, pfx_buf);
3369 }
3370
3371 /* Make new BGP info. */
3372 new = info_make(type, sub_type, 0, peer, attr_new, rn);
3373
3374 /* Update MPLS label */
3375 if (has_valid_label) {
3376 extra = bgp_path_info_extra_get(new);
3377 memcpy(&extra->label, label, num_labels * sizeof(mpls_label_t));
3378 extra->num_labels = num_labels;
3379 if (!(afi == AFI_L2VPN && safi == SAFI_EVPN))
3380 bgp_set_valid_label(&extra->label[0]);
3381 }
3382
3383 /* Update Overlay Index */
3384 if (afi == AFI_L2VPN) {
3385 overlay_index_update(new->attr,
3386 evpn == NULL ? NULL : &evpn->eth_s_id,
3387 evpn == NULL ? NULL : &evpn->gw_ip);
3388 }
3389 /* Nexthop reachability check. */
3390 if ((afi == AFI_IP || afi == AFI_IP6)
3391 && (safi == SAFI_UNICAST || safi == SAFI_LABELED_UNICAST)) {
3392 if (peer->sort == BGP_PEER_EBGP && peer->ttl == 1
3393 && !CHECK_FLAG(peer->flags,
3394 PEER_FLAG_DISABLE_CONNECTED_CHECK)
3395 && !bgp_flag_check(bgp, BGP_FLAG_DISABLE_NH_CONNECTED_CHK))
3396 connected = 1;
3397 else
3398 connected = 0;
3399
3400 if (bgp_find_or_add_nexthop(bgp, bgp, afi, new, NULL, connected)
3401 || CHECK_FLAG(peer->flags, PEER_FLAG_IS_RFAPI_HD))
3402 bgp_path_info_set_flag(rn, new, BGP_PATH_VALID);
3403 else {
3404 if (BGP_DEBUG(nht, NHT)) {
3405 char buf1[INET6_ADDRSTRLEN];
3406 inet_ntop(AF_INET,
3407 (const void *)&attr_new->nexthop,
3408 buf1, INET6_ADDRSTRLEN);
3409 zlog_debug("%s(%s): NH unresolved",
3410 __FUNCTION__, buf1);
3411 }
3412 bgp_path_info_unset_flag(rn, new, BGP_PATH_VALID);
3413 }
3414 } else
3415 bgp_path_info_set_flag(rn, new, BGP_PATH_VALID);
3416
3417 /* Addpath ID */
3418 new->addpath_rx_id = addpath_id;
3419
3420 /* Increment prefix */
3421 bgp_aggregate_increment(bgp, p, new, afi, safi);
3422
3423 /* Register new BGP information. */
3424 bgp_path_info_add(rn, new);
3425
3426 /* route_node_get lock */
3427 bgp_unlock_node(rn);
3428
3429 #if ENABLE_BGP_VNC
3430 if (safi == SAFI_MPLS_VPN) {
3431 struct bgp_node *prn = NULL;
3432 struct bgp_table *table = NULL;
3433
3434 prn = bgp_node_get(bgp->rib[afi][safi], (struct prefix *)prd);
3435 if (prn->info) {
3436 table = (struct bgp_table *)(prn->info);
3437
3438 vnc_import_bgp_add_vnc_host_route_mode_resolve_nve(
3439 bgp, prd, table, p, new);
3440 }
3441 bgp_unlock_node(prn);
3442 }
3443 #endif
3444
3445 /* If maximum prefix count is configured and current prefix
3446 count exeed it. */
3447 if (bgp_maximum_prefix_overflow(peer, afi, safi, 0))
3448 return -1;
3449
3450 /* If this is an EVPN route, process for import. */
3451 if (safi == SAFI_EVPN)
3452 bgp_evpn_import_route(bgp, afi, safi, p, new);
3453
3454 /* Process change. */
3455 bgp_process(bgp, rn, afi, safi);
3456
3457 if (SAFI_UNICAST == safi
3458 && (bgp->inst_type == BGP_INSTANCE_TYPE_VRF
3459 || bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
3460 vpn_leak_from_vrf_update(bgp_get_default(), bgp, new);
3461 }
3462 if ((SAFI_MPLS_VPN == safi)
3463 && (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
3464
3465 vpn_leak_to_vrf_update(bgp, new);
3466 }
3467 #if ENABLE_BGP_VNC
3468 if (SAFI_MPLS_VPN == safi) {
3469 mpls_label_t label_decoded = decode_label(label);
3470
3471 rfapiProcessUpdate(peer, NULL, p, prd, attr, afi, safi, type,
3472 sub_type, &label_decoded);
3473 }
3474 if (SAFI_ENCAP == safi) {
3475 rfapiProcessUpdate(peer, NULL, p, prd, attr, afi, safi, type,
3476 sub_type, NULL);
3477 }
3478 #endif
3479
3480 return 0;
3481
3482 /* This BGP update is filtered. Log the reason then update BGP
3483 entry. */
3484 filtered:
3485 if (bgp_debug_update(peer, p, NULL, 1)) {
3486 if (!peer->rcvd_attr_printed) {
3487 zlog_debug("%s rcvd UPDATE w/ attr: %s", peer->host,
3488 peer->rcvd_attr_str);
3489 peer->rcvd_attr_printed = 1;
3490 }
3491
3492 bgp_debug_rdpfxpath2str(afi, safi, prd, p, label, num_labels,
3493 addpath_id ? 1 : 0, addpath_id, pfx_buf,
3494 sizeof(pfx_buf));
3495 zlog_debug("%s rcvd UPDATE about %s -- DENIED due to: %s",
3496 peer->host, pfx_buf, reason);
3497 }
3498
3499 if (pi) {
3500 /* If this is an EVPN route, un-import it as it is now filtered.
3501 */
3502 if (safi == SAFI_EVPN)
3503 bgp_evpn_unimport_route(bgp, afi, safi, p, pi);
3504
3505 if (SAFI_UNICAST == safi
3506 && (bgp->inst_type == BGP_INSTANCE_TYPE_VRF
3507 || bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
3508
3509 vpn_leak_from_vrf_withdraw(bgp_get_default(), bgp, pi);
3510 }
3511 if ((SAFI_MPLS_VPN == safi)
3512 && (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
3513
3514 vpn_leak_to_vrf_withdraw(bgp, pi);
3515 }
3516
3517 bgp_rib_remove(rn, pi, peer, afi, safi);
3518 }
3519
3520 bgp_unlock_node(rn);
3521
3522 #if ENABLE_BGP_VNC
3523 /*
3524 * Filtered update is treated as an implicit withdrawal (see
3525 * bgp_rib_remove()
3526 * a few lines above)
3527 */
3528 if ((SAFI_MPLS_VPN == safi) || (SAFI_ENCAP == safi)) {
3529 rfapiProcessWithdraw(peer, NULL, p, prd, NULL, afi, safi, type,
3530 0);
3531 }
3532 #endif
3533
3534 return 0;
3535 }
3536
3537 int bgp_withdraw(struct peer *peer, struct prefix *p, uint32_t addpath_id,
3538 struct attr *attr, afi_t afi, safi_t safi, int type,
3539 int sub_type, struct prefix_rd *prd, mpls_label_t *label,
3540 uint32_t num_labels, struct bgp_route_evpn *evpn)
3541 {
3542 struct bgp *bgp;
3543 char pfx_buf[BGP_PRD_PATH_STRLEN];
3544 struct bgp_node *rn;
3545 struct bgp_path_info *pi;
3546
3547 #if ENABLE_BGP_VNC
3548 if ((SAFI_MPLS_VPN == safi) || (SAFI_ENCAP == safi)) {
3549 rfapiProcessWithdraw(peer, NULL, p, prd, NULL, afi, safi, type,
3550 0);
3551 }
3552 #endif
3553
3554 bgp = peer->bgp;
3555
3556 /* Lookup node. */
3557 rn = bgp_afi_node_get(bgp->rib[afi][safi], afi, safi, p, prd);
3558
3559 /* If peer is soft reconfiguration enabled. Record input packet for
3560 * further calculation.
3561 *
3562 * Cisco IOS 12.4(24)T4 on session establishment sends withdraws for all
3563 * routes that are filtered. This tanks out Quagga RS pretty badly due
3564 * to
3565 * the iteration over all RS clients.
3566 * Since we need to remove the entry from adj_in anyway, do that first
3567 * and
3568 * if there was no entry, we don't need to do anything more.
3569 */
3570 if (CHECK_FLAG(peer->af_flags[afi][safi], PEER_FLAG_SOFT_RECONFIG)
3571 && peer != bgp->peer_self)
3572 if (!bgp_adj_in_unset(rn, peer, addpath_id)) {
3573 if (bgp_debug_update(peer, p, NULL, 1)) {
3574 bgp_debug_rdpfxpath2str(
3575 afi, safi, prd, p, label, num_labels,
3576 addpath_id ? 1 : 0, addpath_id, pfx_buf,
3577 sizeof(pfx_buf));
3578 zlog_debug(
3579 "%s withdrawing route %s not in adj-in",
3580 peer->host, pfx_buf);
3581 }
3582 bgp_unlock_node(rn);
3583 return 0;
3584 }
3585
3586 /* Lookup withdrawn route. */
3587 for (pi = rn->info; pi; pi = pi->next)
3588 if (pi->peer == peer && pi->type == type
3589 && pi->sub_type == sub_type
3590 && pi->addpath_rx_id == addpath_id)
3591 break;
3592
3593 /* Logging. */
3594 if (bgp_debug_update(peer, p, NULL, 1)) {
3595 bgp_debug_rdpfxpath2str(afi, safi, prd, p, label, num_labels,
3596 addpath_id ? 1 : 0, addpath_id, pfx_buf,
3597 sizeof(pfx_buf));
3598 zlog_debug("%s rcvd UPDATE about %s -- withdrawn", peer->host,
3599 pfx_buf);
3600 }
3601
3602 /* Withdraw specified route from routing table. */
3603 if (pi && !CHECK_FLAG(pi->flags, BGP_PATH_HISTORY)) {
3604 bgp_rib_withdraw(rn, pi, peer, afi, safi, prd);
3605 if (SAFI_UNICAST == safi
3606 && (bgp->inst_type == BGP_INSTANCE_TYPE_VRF
3607 || bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
3608 vpn_leak_from_vrf_withdraw(bgp_get_default(), bgp, pi);
3609 }
3610 if ((SAFI_MPLS_VPN == safi)
3611 && (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
3612
3613 vpn_leak_to_vrf_withdraw(bgp, pi);
3614 }
3615 } else if (bgp_debug_update(peer, p, NULL, 1)) {
3616 bgp_debug_rdpfxpath2str(afi, safi, prd, p, label, num_labels,
3617 addpath_id ? 1 : 0, addpath_id, pfx_buf,
3618 sizeof(pfx_buf));
3619 zlog_debug("%s Can't find the route %s", peer->host, pfx_buf);
3620 }
3621
3622 /* Unlock bgp_node_get() lock. */
3623 bgp_unlock_node(rn);
3624
3625 return 0;
3626 }
3627
3628 void bgp_default_originate(struct peer *peer, afi_t afi, safi_t safi,
3629 int withdraw)
3630 {
3631 struct update_subgroup *subgrp;
3632 subgrp = peer_subgroup(peer, afi, safi);
3633 subgroup_default_originate(subgrp, withdraw);
3634 }
3635
3636
3637 /*
3638 * bgp_stop_announce_route_timer
3639 */
3640 void bgp_stop_announce_route_timer(struct peer_af *paf)
3641 {
3642 if (!paf->t_announce_route)
3643 return;
3644
3645 THREAD_TIMER_OFF(paf->t_announce_route);
3646 }
3647
3648 /*
3649 * bgp_announce_route_timer_expired
3650 *
3651 * Callback that is invoked when the route announcement timer for a
3652 * peer_af expires.
3653 */
3654 static int bgp_announce_route_timer_expired(struct thread *t)
3655 {
3656 struct peer_af *paf;
3657 struct peer *peer;
3658
3659 paf = THREAD_ARG(t);
3660 peer = paf->peer;
3661
3662 if (peer->status != Established)
3663 return 0;
3664
3665 if (!peer->afc_nego[paf->afi][paf->safi])
3666 return 0;
3667
3668 peer_af_announce_route(paf, 1);
3669 return 0;
3670 }
3671
3672 /*
3673 * bgp_announce_route
3674 *
3675 * *Triggers* announcement of routes of a given AFI/SAFI to a peer.
3676 */
3677 void bgp_announce_route(struct peer *peer, afi_t afi, safi_t safi)
3678 {
3679 struct peer_af *paf;
3680 struct update_subgroup *subgrp;
3681
3682 paf = peer_af_find(peer, afi, safi);
3683 if (!paf)
3684 return;
3685 subgrp = PAF_SUBGRP(paf);
3686
3687 /*
3688 * Ignore if subgroup doesn't exist (implies AF is not negotiated)
3689 * or a refresh has already been triggered.
3690 */
3691 if (!subgrp || paf->t_announce_route)
3692 return;
3693
3694 /*
3695 * Start a timer to stagger/delay the announce. This serves
3696 * two purposes - announcement can potentially be combined for
3697 * multiple peers and the announcement doesn't happen in the
3698 * vty context.
3699 */
3700 thread_add_timer_msec(bm->master, bgp_announce_route_timer_expired, paf,
3701 (subgrp->peer_count == 1)
3702 ? BGP_ANNOUNCE_ROUTE_SHORT_DELAY_MS
3703 : BGP_ANNOUNCE_ROUTE_DELAY_MS,
3704 &paf->t_announce_route);
3705 }
3706
3707 /*
3708 * Announce routes from all AF tables to a peer.
3709 *
3710 * This should ONLY be called when there is a need to refresh the
3711 * routes to the peer based on a policy change for this peer alone
3712 * or a route refresh request received from the peer.
3713 * The operation will result in splitting the peer from its existing
3714 * subgroups and putting it in new subgroups.
3715 */
3716 void bgp_announce_route_all(struct peer *peer)
3717 {
3718 afi_t afi;
3719 safi_t safi;
3720
3721 FOREACH_AFI_SAFI (afi, safi)
3722 bgp_announce_route(peer, afi, safi);
3723 }
3724
3725 static void bgp_soft_reconfig_table(struct peer *peer, afi_t afi, safi_t safi,
3726 struct bgp_table *table,
3727 struct prefix_rd *prd)
3728 {
3729 int ret;
3730 struct bgp_node *rn;
3731 struct bgp_adj_in *ain;
3732
3733 if (!table)
3734 table = peer->bgp->rib[afi][safi];
3735
3736 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn))
3737 for (ain = rn->adj_in; ain; ain = ain->next) {
3738 if (ain->peer != peer)
3739 continue;
3740
3741 struct bgp_path_info *pi = rn->info;
3742 uint32_t num_labels = 0;
3743 mpls_label_t *label_pnt = NULL;
3744
3745 if (pi && pi->extra)
3746 num_labels = pi->extra->num_labels;
3747 if (num_labels)
3748 label_pnt = &pi->extra->label[0];
3749
3750 ret = bgp_update(peer, &rn->p, ain->addpath_rx_id,
3751 ain->attr, afi, safi, ZEBRA_ROUTE_BGP,
3752 BGP_ROUTE_NORMAL, prd, label_pnt,
3753 num_labels, 1, NULL);
3754
3755 if (ret < 0) {
3756 bgp_unlock_node(rn);
3757 return;
3758 }
3759 }
3760 }
3761
3762 void bgp_soft_reconfig_in(struct peer *peer, afi_t afi, safi_t safi)
3763 {
3764 struct bgp_node *rn;
3765 struct bgp_table *table;
3766
3767 if (peer->status != Established)
3768 return;
3769
3770 if ((safi != SAFI_MPLS_VPN) && (safi != SAFI_ENCAP)
3771 && (safi != SAFI_EVPN))
3772 bgp_soft_reconfig_table(peer, afi, safi, NULL, NULL);
3773 else
3774 for (rn = bgp_table_top(peer->bgp->rib[afi][safi]); rn;
3775 rn = bgp_route_next(rn))
3776 if ((table = rn->info) != NULL) {
3777 struct prefix_rd prd;
3778 prd.family = AF_UNSPEC;
3779 prd.prefixlen = 64;
3780 memcpy(&prd.val, rn->p.u.val, 8);
3781
3782 bgp_soft_reconfig_table(peer, afi, safi, table,
3783 &prd);
3784 }
3785 }
3786
3787
3788 struct bgp_clear_node_queue {
3789 struct bgp_node *rn;
3790 };
3791
3792 static wq_item_status bgp_clear_route_node(struct work_queue *wq, void *data)
3793 {
3794 struct bgp_clear_node_queue *cnq = data;
3795 struct bgp_node *rn = cnq->rn;
3796 struct peer *peer = wq->spec.data;
3797 struct bgp_path_info *pi;
3798 struct bgp *bgp;
3799 afi_t afi = bgp_node_table(rn)->afi;
3800 safi_t safi = bgp_node_table(rn)->safi;
3801
3802 assert(rn && peer);
3803 bgp = peer->bgp;
3804
3805 /* It is possible that we have multiple paths for a prefix from a peer
3806 * if that peer is using AddPath.
3807 */
3808 for (pi = rn->info; pi; pi = pi->next) {
3809 if (pi->peer != peer)
3810 continue;
3811
3812 /* graceful restart STALE flag set. */
3813 if (CHECK_FLAG(peer->sflags, PEER_STATUS_NSF_WAIT)
3814 && peer->nsf[afi][safi]
3815 && !CHECK_FLAG(pi->flags, BGP_PATH_STALE)
3816 && !CHECK_FLAG(pi->flags, BGP_PATH_UNUSEABLE))
3817 bgp_path_info_set_flag(rn, pi, BGP_PATH_STALE);
3818 else {
3819 /* If this is an EVPN route, process for
3820 * un-import. */
3821 if (safi == SAFI_EVPN)
3822 bgp_evpn_unimport_route(bgp, afi, safi, &rn->p,
3823 pi);
3824 /* Handle withdraw for VRF route-leaking and L3VPN */
3825 if (SAFI_UNICAST == safi
3826 && (bgp->inst_type == BGP_INSTANCE_TYPE_VRF ||
3827 bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
3828 vpn_leak_from_vrf_withdraw(bgp_get_default(),
3829 bgp, pi);
3830 }
3831 if (SAFI_MPLS_VPN == safi &&
3832 bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT) {
3833 vpn_leak_to_vrf_withdraw(bgp, pi);
3834 }
3835
3836 bgp_rib_remove(rn, pi, peer, afi, safi);
3837 }
3838 }
3839 return WQ_SUCCESS;
3840 }
3841
3842 static void bgp_clear_node_queue_del(struct work_queue *wq, void *data)
3843 {
3844 struct bgp_clear_node_queue *cnq = data;
3845 struct bgp_node *rn = cnq->rn;
3846 struct bgp_table *table = bgp_node_table(rn);
3847
3848 bgp_unlock_node(rn);
3849 bgp_table_unlock(table);
3850 XFREE(MTYPE_BGP_CLEAR_NODE_QUEUE, cnq);
3851 }
3852
3853 static void bgp_clear_node_complete(struct work_queue *wq)
3854 {
3855 struct peer *peer = wq->spec.data;
3856
3857 /* Tickle FSM to start moving again */
3858 BGP_EVENT_ADD(peer, Clearing_Completed);
3859
3860 peer_unlock(peer); /* bgp_clear_route */
3861 }
3862
3863 static void bgp_clear_node_queue_init(struct peer *peer)
3864 {
3865 char wname[sizeof("clear xxxx:xxxx:xxxx:xxxx:xxxx:xxxx:xxxx:xxxx")];
3866
3867 snprintf(wname, sizeof(wname), "clear %s", peer->host);
3868 #undef CLEAR_QUEUE_NAME_LEN
3869
3870 peer->clear_node_queue = work_queue_new(bm->master, wname);
3871 peer->clear_node_queue->spec.hold = 10;
3872 peer->clear_node_queue->spec.workfunc = &bgp_clear_route_node;
3873 peer->clear_node_queue->spec.del_item_data = &bgp_clear_node_queue_del;
3874 peer->clear_node_queue->spec.completion_func = &bgp_clear_node_complete;
3875 peer->clear_node_queue->spec.max_retries = 0;
3876
3877 /* we only 'lock' this peer reference when the queue is actually active
3878 */
3879 peer->clear_node_queue->spec.data = peer;
3880 }
3881
3882 static void bgp_clear_route_table(struct peer *peer, afi_t afi, safi_t safi,
3883 struct bgp_table *table)
3884 {
3885 struct bgp_node *rn;
3886 int force = bm->process_main_queue ? 0 : 1;
3887
3888 if (!table)
3889 table = peer->bgp->rib[afi][safi];
3890
3891 /* If still no table => afi/safi isn't configured at all or smth. */
3892 if (!table)
3893 return;
3894
3895 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn)) {
3896 struct bgp_path_info *pi, *next;
3897 struct bgp_adj_in *ain;
3898 struct bgp_adj_in *ain_next;
3899
3900 /* XXX:TODO: This is suboptimal, every non-empty route_node is
3901 * queued for every clearing peer, regardless of whether it is
3902 * relevant to the peer at hand.
3903 *
3904 * Overview: There are 3 different indices which need to be
3905 * scrubbed, potentially, when a peer is removed:
3906 *
3907 * 1 peer's routes visible via the RIB (ie accepted routes)
3908 * 2 peer's routes visible by the (optional) peer's adj-in index
3909 * 3 other routes visible by the peer's adj-out index
3910 *
3911 * 3 there is no hurry in scrubbing, once the struct peer is
3912 * removed from bgp->peer, we could just GC such deleted peer's
3913 * adj-outs at our leisure.
3914 *
3915 * 1 and 2 must be 'scrubbed' in some way, at least made
3916 * invisible via RIB index before peer session is allowed to be
3917 * brought back up. So one needs to know when such a 'search' is
3918 * complete.
3919 *
3920 * Ideally:
3921 *
3922 * - there'd be a single global queue or a single RIB walker
3923 * - rather than tracking which route_nodes still need to be
3924 * examined on a peer basis, we'd track which peers still
3925 * aren't cleared
3926 *
3927 * Given that our per-peer prefix-counts now should be reliable,
3928 * this may actually be achievable. It doesn't seem to be a huge
3929 * problem at this time,
3930 *
3931 * It is possible that we have multiple paths for a prefix from
3932 * a peer
3933 * if that peer is using AddPath.
3934 */
3935 ain = rn->adj_in;
3936 while (ain) {
3937 ain_next = ain->next;
3938
3939 if (ain->peer == peer) {
3940 bgp_adj_in_remove(rn, ain);
3941 bgp_unlock_node(rn);
3942 }
3943
3944 ain = ain_next;
3945 }
3946
3947 for (pi = rn->info; pi; pi = next) {
3948 next = pi->next;
3949 if (pi->peer != peer)
3950 continue;
3951
3952 if (force)
3953 bgp_path_info_reap(rn, pi);
3954 else {
3955 struct bgp_clear_node_queue *cnq;
3956
3957 /* both unlocked in bgp_clear_node_queue_del */
3958 bgp_table_lock(bgp_node_table(rn));
3959 bgp_lock_node(rn);
3960 cnq = XCALLOC(
3961 MTYPE_BGP_CLEAR_NODE_QUEUE,
3962 sizeof(struct bgp_clear_node_queue));
3963 cnq->rn = rn;
3964 work_queue_add(peer->clear_node_queue, cnq);
3965 break;
3966 }
3967 }
3968 }
3969 return;
3970 }
3971
3972 void bgp_clear_route(struct peer *peer, afi_t afi, safi_t safi)
3973 {
3974 struct bgp_node *rn;
3975 struct bgp_table *table;
3976
3977 if (peer->clear_node_queue == NULL)
3978 bgp_clear_node_queue_init(peer);
3979
3980 /* bgp_fsm.c keeps sessions in state Clearing, not transitioning to
3981 * Idle until it receives a Clearing_Completed event. This protects
3982 * against peers which flap faster than we can we clear, which could
3983 * lead to:
3984 *
3985 * a) race with routes from the new session being installed before
3986 * clear_route_node visits the node (to delete the route of that
3987 * peer)
3988 * b) resource exhaustion, clear_route_node likely leads to an entry
3989 * on the process_main queue. Fast-flapping could cause that queue
3990 * to grow and grow.
3991 */
3992
3993 /* lock peer in assumption that clear-node-queue will get nodes; if so,
3994 * the unlock will happen upon work-queue completion; other wise, the
3995 * unlock happens at the end of this function.
3996 */
3997 if (!peer->clear_node_queue->thread)
3998 peer_lock(peer);
3999
4000 if (safi != SAFI_MPLS_VPN && safi != SAFI_ENCAP && safi != SAFI_EVPN)
4001 bgp_clear_route_table(peer, afi, safi, NULL);
4002 else
4003 for (rn = bgp_table_top(peer->bgp->rib[afi][safi]); rn;
4004 rn = bgp_route_next(rn))
4005 if ((table = rn->info) != NULL)
4006 bgp_clear_route_table(peer, afi, safi, table);
4007
4008 /* unlock if no nodes got added to the clear-node-queue. */
4009 if (!peer->clear_node_queue->thread)
4010 peer_unlock(peer);
4011 }
4012
4013 void bgp_clear_route_all(struct peer *peer)
4014 {
4015 afi_t afi;
4016 safi_t safi;
4017
4018 FOREACH_AFI_SAFI (afi, safi)
4019 bgp_clear_route(peer, afi, safi);
4020
4021 #if ENABLE_BGP_VNC
4022 rfapiProcessPeerDown(peer);
4023 #endif
4024 }
4025
4026 void bgp_clear_adj_in(struct peer *peer, afi_t afi, safi_t safi)
4027 {
4028 struct bgp_table *table;
4029 struct bgp_node *rn;
4030 struct bgp_adj_in *ain;
4031 struct bgp_adj_in *ain_next;
4032
4033 table = peer->bgp->rib[afi][safi];
4034
4035 /* It is possible that we have multiple paths for a prefix from a peer
4036 * if that peer is using AddPath.
4037 */
4038 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn)) {
4039 ain = rn->adj_in;
4040
4041 while (ain) {
4042 ain_next = ain->next;
4043
4044 if (ain->peer == peer) {
4045 bgp_adj_in_remove(rn, ain);
4046 bgp_unlock_node(rn);
4047 }
4048
4049 ain = ain_next;
4050 }
4051 }
4052 }
4053
4054 void bgp_clear_stale_route(struct peer *peer, afi_t afi, safi_t safi)
4055 {
4056 struct bgp_node *rn;
4057 struct bgp_path_info *pi;
4058 struct bgp_table *table;
4059
4060 if (safi == SAFI_MPLS_VPN) {
4061 for (rn = bgp_table_top(peer->bgp->rib[afi][safi]); rn;
4062 rn = bgp_route_next(rn)) {
4063 struct bgp_node *rm;
4064
4065 /* look for neighbor in tables */
4066 if ((table = rn->info) == NULL)
4067 continue;
4068
4069 for (rm = bgp_table_top(table); rm;
4070 rm = bgp_route_next(rm))
4071 for (pi = rm->info; pi; pi = pi->next) {
4072 if (pi->peer != peer)
4073 continue;
4074 if (!CHECK_FLAG(pi->flags,
4075 BGP_PATH_STALE))
4076 break;
4077
4078 bgp_rib_remove(rm, pi, peer, afi, safi);
4079 break;
4080 }
4081 }
4082 } else {
4083 for (rn = bgp_table_top(peer->bgp->rib[afi][safi]); rn;
4084 rn = bgp_route_next(rn))
4085 for (pi = rn->info; pi; pi = pi->next) {
4086 if (pi->peer != peer)
4087 continue;
4088 if (!CHECK_FLAG(pi->flags, BGP_PATH_STALE))
4089 break;
4090 bgp_rib_remove(rn, pi, peer, afi, safi);
4091 break;
4092 }
4093 }
4094 }
4095
4096 static void bgp_cleanup_table(struct bgp *bgp, struct bgp_table *table,
4097 safi_t safi)
4098 {
4099 struct bgp_node *rn;
4100 struct bgp_path_info *pi;
4101 struct bgp_path_info *next;
4102
4103 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn))
4104 for (pi = rn->info; pi; pi = next) {
4105 next = pi->next;
4106 if (CHECK_FLAG(pi->flags, BGP_PATH_SELECTED)
4107 && pi->type == ZEBRA_ROUTE_BGP
4108 && (pi->sub_type == BGP_ROUTE_NORMAL
4109 || pi->sub_type == BGP_ROUTE_AGGREGATE
4110 || pi->sub_type == BGP_ROUTE_IMPORTED)) {
4111
4112 if (bgp_fibupd_safi(safi))
4113 bgp_zebra_withdraw(&rn->p, pi, bgp,
4114 safi);
4115 bgp_path_info_reap(rn, pi);
4116 }
4117 }
4118 }
4119
4120 /* Delete all kernel routes. */
4121 void bgp_cleanup_routes(struct bgp *bgp)
4122 {
4123 afi_t afi;
4124 struct bgp_node *rn;
4125
4126 for (afi = AFI_IP; afi < AFI_MAX; ++afi) {
4127 if (afi == AFI_L2VPN)
4128 continue;
4129 bgp_cleanup_table(bgp, bgp->rib[afi][SAFI_UNICAST],
4130 SAFI_UNICAST);
4131 /*
4132 * VPN and ENCAP and EVPN tables are two-level (RD is top level)
4133 */
4134 if (afi != AFI_L2VPN) {
4135 safi_t safi;
4136 safi = SAFI_MPLS_VPN;
4137 for (rn = bgp_table_top(bgp->rib[afi][safi]); rn;
4138 rn = bgp_route_next(rn)) {
4139 if (rn->info) {
4140 bgp_cleanup_table(bgp,
4141 (struct bgp_table *)(rn->info),
4142 safi);
4143 bgp_table_finish((struct bgp_table **)&(
4144 rn->info));
4145 rn->info = NULL;
4146 bgp_unlock_node(rn);
4147 }
4148 }
4149 safi = SAFI_ENCAP;
4150 for (rn = bgp_table_top(bgp->rib[afi][safi]); rn;
4151 rn = bgp_route_next(rn)) {
4152 if (rn->info) {
4153 bgp_cleanup_table(bgp,
4154 (struct bgp_table *)(rn->info),
4155 safi);
4156 bgp_table_finish((struct bgp_table **)&(
4157 rn->info));
4158 rn->info = NULL;
4159 bgp_unlock_node(rn);
4160 }
4161 }
4162 }
4163 }
4164 for (rn = bgp_table_top(bgp->rib[AFI_L2VPN][SAFI_EVPN]); rn;
4165 rn = bgp_route_next(rn)) {
4166 if (rn->info) {
4167 bgp_cleanup_table(bgp,
4168 (struct bgp_table *)(rn->info),
4169 SAFI_EVPN);
4170 bgp_table_finish((struct bgp_table **)&(rn->info));
4171 rn->info = NULL;
4172 bgp_unlock_node(rn);
4173 }
4174 }
4175 }
4176
4177 void bgp_reset(void)
4178 {
4179 vty_reset();
4180 bgp_zclient_reset();
4181 access_list_reset();
4182 prefix_list_reset();
4183 }
4184
4185 static int bgp_addpath_encode_rx(struct peer *peer, afi_t afi, safi_t safi)
4186 {
4187 return (CHECK_FLAG(peer->af_cap[afi][safi], PEER_CAP_ADDPATH_AF_RX_ADV)
4188 && CHECK_FLAG(peer->af_cap[afi][safi],
4189 PEER_CAP_ADDPATH_AF_TX_RCV));
4190 }
4191
4192 /* Parse NLRI stream. Withdraw NLRI is recognized by NULL attr
4193 value. */
4194 int bgp_nlri_parse_ip(struct peer *peer, struct attr *attr,
4195 struct bgp_nlri *packet)
4196 {
4197 uint8_t *pnt;
4198 uint8_t *lim;
4199 struct prefix p;
4200 int psize;
4201 int ret;
4202 afi_t afi;
4203 safi_t safi;
4204 int addpath_encoded;
4205 uint32_t addpath_id;
4206
4207 pnt = packet->nlri;
4208 lim = pnt + packet->length;
4209 afi = packet->afi;
4210 safi = packet->safi;
4211 addpath_id = 0;
4212 addpath_encoded = bgp_addpath_encode_rx(peer, afi, safi);
4213
4214 /* RFC4771 6.3 The NLRI field in the UPDATE message is checked for
4215 syntactic validity. If the field is syntactically incorrect,
4216 then the Error Subcode is set to Invalid Network Field. */
4217 for (; pnt < lim; pnt += psize) {
4218 /* Clear prefix structure. */
4219 memset(&p, 0, sizeof(struct prefix));
4220
4221 if (addpath_encoded) {
4222
4223 /* When packet overflow occurs return immediately. */
4224 if (pnt + BGP_ADDPATH_ID_LEN > lim)
4225 return -1;
4226
4227 addpath_id = ntohl(*((uint32_t *)pnt));
4228 pnt += BGP_ADDPATH_ID_LEN;
4229 }
4230
4231 /* Fetch prefix length. */
4232 p.prefixlen = *pnt++;
4233 /* afi/safi validity already verified by caller,
4234 * bgp_update_receive */
4235 p.family = afi2family(afi);
4236
4237 /* Prefix length check. */
4238 if (p.prefixlen > prefix_blen(&p) * 8) {
4239 flog_err(
4240 EC_BGP_UPDATE_RCV,
4241 "%s [Error] Update packet error (wrong prefix length %d for afi %u)",
4242 peer->host, p.prefixlen, packet->afi);
4243 return -1;
4244 }
4245
4246 /* Packet size overflow check. */
4247 psize = PSIZE(p.prefixlen);
4248
4249 /* When packet overflow occur return immediately. */
4250 if (pnt + psize > lim) {
4251 flog_err(
4252 EC_BGP_UPDATE_RCV,
4253 "%s [Error] Update packet error (prefix length %d overflows packet)",
4254 peer->host, p.prefixlen);
4255 return -1;
4256 }
4257
4258 /* Defensive coding, double-check the psize fits in a struct
4259 * prefix */
4260 if (psize > (ssize_t)sizeof(p.u)) {
4261 flog_err(
4262 EC_BGP_UPDATE_RCV,
4263 "%s [Error] Update packet error (prefix length %d too large for prefix storage %zu)",
4264 peer->host, p.prefixlen, sizeof(p.u));
4265 return -1;
4266 }
4267
4268 /* Fetch prefix from NLRI packet. */
4269 memcpy(p.u.val, pnt, psize);
4270
4271 /* Check address. */
4272 if (afi == AFI_IP && safi == SAFI_UNICAST) {
4273 if (IN_CLASSD(ntohl(p.u.prefix4.s_addr))) {
4274 /* From RFC4271 Section 6.3:
4275 *
4276 * If a prefix in the NLRI field is semantically
4277 * incorrect
4278 * (e.g., an unexpected multicast IP address),
4279 * an error SHOULD
4280 * be logged locally, and the prefix SHOULD be
4281 * ignored.
4282 */
4283 flog_err(
4284 EC_BGP_UPDATE_RCV,
4285 "%s: IPv4 unicast NLRI is multicast address %s, ignoring",
4286 peer->host, inet_ntoa(p.u.prefix4));
4287 continue;
4288 }
4289 }
4290
4291 /* Check address. */
4292 if (afi == AFI_IP6 && safi == SAFI_UNICAST) {
4293 if (IN6_IS_ADDR_LINKLOCAL(&p.u.prefix6)) {
4294 char buf[BUFSIZ];
4295
4296 flog_err(
4297 EC_BGP_UPDATE_RCV,
4298 "%s: IPv6 unicast NLRI is link-local address %s, ignoring",
4299 peer->host,
4300 inet_ntop(AF_INET6, &p.u.prefix6, buf,
4301 BUFSIZ));
4302
4303 continue;
4304 }
4305 if (IN6_IS_ADDR_MULTICAST(&p.u.prefix6)) {
4306 char buf[BUFSIZ];
4307
4308 flog_err(
4309 EC_BGP_UPDATE_RCV,
4310 "%s: IPv6 unicast NLRI is multicast address %s, ignoring",
4311 peer->host,
4312 inet_ntop(AF_INET6, &p.u.prefix6, buf,
4313 BUFSIZ));
4314
4315 continue;
4316 }
4317 }
4318
4319 /* Normal process. */
4320 if (attr)
4321 ret = bgp_update(peer, &p, addpath_id, attr, afi, safi,
4322 ZEBRA_ROUTE_BGP, BGP_ROUTE_NORMAL,
4323 NULL, NULL, 0, 0, NULL);
4324 else
4325 ret = bgp_withdraw(peer, &p, addpath_id, attr, afi,
4326 safi, ZEBRA_ROUTE_BGP,
4327 BGP_ROUTE_NORMAL, NULL, NULL, 0,
4328 NULL);
4329
4330 /* Address family configuration mismatch or maximum-prefix count
4331 overflow. */
4332 if (ret < 0)
4333 return -1;
4334 }
4335
4336 /* Packet length consistency check. */
4337 if (pnt != lim) {
4338 flog_err(
4339 EC_BGP_UPDATE_RCV,
4340 "%s [Error] Update packet error (prefix length mismatch with total length)",
4341 peer->host);
4342 return -1;
4343 }
4344
4345 return 0;
4346 }
4347
4348 static struct bgp_static *bgp_static_new(void)
4349 {
4350 return XCALLOC(MTYPE_BGP_STATIC, sizeof(struct bgp_static));
4351 }
4352
4353 static void bgp_static_free(struct bgp_static *bgp_static)
4354 {
4355 if (bgp_static->rmap.name)
4356 XFREE(MTYPE_ROUTE_MAP_NAME, bgp_static->rmap.name);
4357 if (bgp_static->eth_s_id)
4358 XFREE(MTYPE_ATTR, bgp_static->eth_s_id);
4359 XFREE(MTYPE_BGP_STATIC, bgp_static);
4360 }
4361
4362 void bgp_static_update(struct bgp *bgp, struct prefix *p,
4363 struct bgp_static *bgp_static, afi_t afi, safi_t safi)
4364 {
4365 struct bgp_node *rn;
4366 struct bgp_path_info *pi;
4367 struct bgp_path_info *new;
4368 struct bgp_path_info rmap_path;
4369 struct attr attr;
4370 struct attr *attr_new;
4371 int ret;
4372 #if ENABLE_BGP_VNC
4373 int vnc_implicit_withdraw = 0;
4374 #endif
4375
4376 assert(bgp_static);
4377 if (!bgp_static)
4378 return;
4379
4380 rn = bgp_afi_node_get(bgp->rib[afi][safi], afi, safi, p, NULL);
4381
4382 bgp_attr_default_set(&attr, BGP_ORIGIN_IGP);
4383
4384 attr.nexthop = bgp_static->igpnexthop;
4385 attr.med = bgp_static->igpmetric;
4386 attr.flag |= ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC);
4387
4388 if (bgp_static->atomic)
4389 attr.flag |= ATTR_FLAG_BIT(BGP_ATTR_ATOMIC_AGGREGATE);
4390
4391 /* Store label index, if required. */
4392 if (bgp_static->label_index != BGP_INVALID_LABEL_INDEX) {
4393 attr.label_index = bgp_static->label_index;
4394 attr.flag |= ATTR_FLAG_BIT(BGP_ATTR_PREFIX_SID);
4395 }
4396
4397 /* Apply route-map. */
4398 if (bgp_static->rmap.name) {
4399 struct attr attr_tmp = attr;
4400
4401 memset(&rmap_path, 0, sizeof(struct bgp_path_info));
4402 rmap_path.peer = bgp->peer_self;
4403 rmap_path.attr = &attr_tmp;
4404
4405 SET_FLAG(bgp->peer_self->rmap_type, PEER_RMAP_TYPE_NETWORK);
4406
4407 ret = route_map_apply(bgp_static->rmap.map, p, RMAP_BGP,
4408 &rmap_path);
4409
4410 bgp->peer_self->rmap_type = 0;
4411
4412 if (ret == RMAP_DENYMATCH) {
4413 /* Free uninterned attribute. */
4414 bgp_attr_flush(&attr_tmp);
4415
4416 /* Unintern original. */
4417 aspath_unintern(&attr.aspath);
4418 bgp_static_withdraw(bgp, p, afi, safi);
4419 return;
4420 }
4421
4422 if (bgp_flag_check(bgp, BGP_FLAG_GRACEFUL_SHUTDOWN))
4423 bgp_attr_add_gshut_community(&attr_tmp);
4424
4425 attr_new = bgp_attr_intern(&attr_tmp);
4426 } else {
4427
4428 if (bgp_flag_check(bgp, BGP_FLAG_GRACEFUL_SHUTDOWN))
4429 bgp_attr_add_gshut_community(&attr);
4430
4431 attr_new = bgp_attr_intern(&attr);
4432 }
4433
4434 for (pi = rn->info; pi; pi = pi->next)
4435 if (pi->peer == bgp->peer_self && pi->type == ZEBRA_ROUTE_BGP
4436 && pi->sub_type == BGP_ROUTE_STATIC)
4437 break;
4438
4439 if (pi) {
4440 if (attrhash_cmp(pi->attr, attr_new)
4441 && !CHECK_FLAG(pi->flags, BGP_PATH_REMOVED)
4442 && !bgp_flag_check(bgp, BGP_FLAG_FORCE_STATIC_PROCESS)) {
4443 bgp_unlock_node(rn);
4444 bgp_attr_unintern(&attr_new);
4445 aspath_unintern(&attr.aspath);
4446 return;
4447 } else {
4448 /* The attribute is changed. */
4449 bgp_path_info_set_flag(rn, pi, BGP_PATH_ATTR_CHANGED);
4450
4451 /* Rewrite BGP route information. */
4452 if (CHECK_FLAG(pi->flags, BGP_PATH_REMOVED))
4453 bgp_path_info_restore(rn, pi);
4454 else
4455 bgp_aggregate_decrement(bgp, p, pi, afi, safi);
4456 #if ENABLE_BGP_VNC
4457 if ((afi == AFI_IP || afi == AFI_IP6)
4458 && (safi == SAFI_UNICAST)) {
4459 if (CHECK_FLAG(pi->flags, BGP_PATH_SELECTED)) {
4460 /*
4461 * Implicit withdraw case.
4462 * We have to do this before pi is
4463 * changed
4464 */
4465 ++vnc_implicit_withdraw;
4466 vnc_import_bgp_del_route(bgp, p, pi);
4467 vnc_import_bgp_exterior_del_route(
4468 bgp, p, pi);
4469 }
4470 }
4471 #endif
4472 bgp_attr_unintern(&pi->attr);
4473 pi->attr = attr_new;
4474 pi->uptime = bgp_clock();
4475 #if ENABLE_BGP_VNC
4476 if ((afi == AFI_IP || afi == AFI_IP6)
4477 && (safi == SAFI_UNICAST)) {
4478 if (vnc_implicit_withdraw) {
4479 vnc_import_bgp_add_route(bgp, p, pi);
4480 vnc_import_bgp_exterior_add_route(
4481 bgp, p, pi);
4482 }
4483 }
4484 #endif
4485
4486 /* Nexthop reachability check. */
4487 if (bgp_flag_check(bgp, BGP_FLAG_IMPORT_CHECK)
4488 && (safi == SAFI_UNICAST
4489 || safi == SAFI_LABELED_UNICAST)) {
4490
4491 struct bgp *bgp_nexthop = bgp;
4492
4493 if (pi->extra && pi->extra->bgp_orig)
4494 bgp_nexthop = pi->extra->bgp_orig;
4495
4496 if (bgp_find_or_add_nexthop(bgp, bgp_nexthop,
4497 afi, pi, NULL, 0))
4498 bgp_path_info_set_flag(rn, pi,
4499 BGP_PATH_VALID);
4500 else {
4501 if (BGP_DEBUG(nht, NHT)) {
4502 char buf1[INET6_ADDRSTRLEN];
4503 inet_ntop(p->family,
4504 &p->u.prefix, buf1,
4505 INET6_ADDRSTRLEN);
4506 zlog_debug(
4507 "%s(%s): Route not in table, not advertising",
4508 __FUNCTION__, buf1);
4509 }
4510 bgp_path_info_unset_flag(
4511 rn, pi, BGP_PATH_VALID);
4512 }
4513 } else {
4514 /* Delete the NHT structure if any, if we're
4515 * toggling between
4516 * enabling/disabling import check. We
4517 * deregister the route
4518 * from NHT to avoid overloading NHT and the
4519 * process interaction
4520 */
4521 bgp_unlink_nexthop(pi);
4522 bgp_path_info_set_flag(rn, pi, BGP_PATH_VALID);
4523 }
4524 /* Process change. */
4525 bgp_aggregate_increment(bgp, p, pi, afi, safi);
4526 bgp_process(bgp, rn, afi, safi);
4527
4528 if (SAFI_UNICAST == safi
4529 && (bgp->inst_type == BGP_INSTANCE_TYPE_VRF
4530 || bgp->inst_type
4531 == BGP_INSTANCE_TYPE_DEFAULT)) {
4532 vpn_leak_from_vrf_update(bgp_get_default(), bgp,
4533 pi);
4534 }
4535
4536 bgp_unlock_node(rn);
4537 aspath_unintern(&attr.aspath);
4538 return;
4539 }
4540 }
4541
4542 /* Make new BGP info. */
4543 new = info_make(ZEBRA_ROUTE_BGP, BGP_ROUTE_STATIC, 0, bgp->peer_self,
4544 attr_new, rn);
4545 /* Nexthop reachability check. */
4546 if (bgp_flag_check(bgp, BGP_FLAG_IMPORT_CHECK)
4547 && (safi == SAFI_UNICAST || safi == SAFI_LABELED_UNICAST)) {
4548 if (bgp_find_or_add_nexthop(bgp, bgp, afi, new, NULL, 0))
4549 bgp_path_info_set_flag(rn, new, BGP_PATH_VALID);
4550 else {
4551 if (BGP_DEBUG(nht, NHT)) {
4552 char buf1[INET6_ADDRSTRLEN];
4553 inet_ntop(p->family, &p->u.prefix, buf1,
4554 INET6_ADDRSTRLEN);
4555 zlog_debug(
4556 "%s(%s): Route not in table, not advertising",
4557 __FUNCTION__, buf1);
4558 }
4559 bgp_path_info_unset_flag(rn, new, BGP_PATH_VALID);
4560 }
4561 } else {
4562 /* Delete the NHT structure if any, if we're toggling between
4563 * enabling/disabling import check. We deregister the route
4564 * from NHT to avoid overloading NHT and the process interaction
4565 */
4566 bgp_unlink_nexthop(new);
4567
4568 bgp_path_info_set_flag(rn, new, BGP_PATH_VALID);
4569 }
4570
4571 /* Aggregate address increment. */
4572 bgp_aggregate_increment(bgp, p, new, afi, safi);
4573
4574 /* Register new BGP information. */
4575 bgp_path_info_add(rn, new);
4576
4577 /* route_node_get lock */
4578 bgp_unlock_node(rn);
4579
4580 /* Process change. */
4581 bgp_process(bgp, rn, afi, safi);
4582
4583 if (SAFI_UNICAST == safi
4584 && (bgp->inst_type == BGP_INSTANCE_TYPE_VRF
4585 || bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
4586 vpn_leak_from_vrf_update(bgp_get_default(), bgp, new);
4587 }
4588
4589 /* Unintern original. */
4590 aspath_unintern(&attr.aspath);
4591 }
4592
4593 void bgp_static_withdraw(struct bgp *bgp, struct prefix *p, afi_t afi,
4594 safi_t safi)
4595 {
4596 struct bgp_node *rn;
4597 struct bgp_path_info *pi;
4598
4599 rn = bgp_afi_node_get(bgp->rib[afi][safi], afi, safi, p, NULL);
4600
4601 /* Check selected route and self inserted route. */
4602 for (pi = rn->info; pi; pi = pi->next)
4603 if (pi->peer == bgp->peer_self && pi->type == ZEBRA_ROUTE_BGP
4604 && pi->sub_type == BGP_ROUTE_STATIC)
4605 break;
4606
4607 /* Withdraw static BGP route from routing table. */
4608 if (pi) {
4609 if (SAFI_UNICAST == safi
4610 && (bgp->inst_type == BGP_INSTANCE_TYPE_VRF
4611 || bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
4612 vpn_leak_from_vrf_withdraw(bgp_get_default(), bgp, pi);
4613 }
4614 bgp_aggregate_decrement(bgp, p, pi, afi, safi);
4615 bgp_unlink_nexthop(pi);
4616 bgp_path_info_delete(rn, pi);
4617 bgp_process(bgp, rn, afi, safi);
4618 }
4619
4620 /* Unlock bgp_node_lookup. */
4621 bgp_unlock_node(rn);
4622 }
4623
4624 /*
4625 * Used for SAFI_MPLS_VPN and SAFI_ENCAP
4626 */
4627 static void bgp_static_withdraw_safi(struct bgp *bgp, struct prefix *p,
4628 afi_t afi, safi_t safi,
4629 struct prefix_rd *prd)
4630 {
4631 struct bgp_node *rn;
4632 struct bgp_path_info *pi;
4633
4634 rn = bgp_afi_node_get(bgp->rib[afi][safi], afi, safi, p, prd);
4635
4636 /* Check selected route and self inserted route. */
4637 for (pi = rn->info; pi; pi = pi->next)
4638 if (pi->peer == bgp->peer_self && pi->type == ZEBRA_ROUTE_BGP
4639 && pi->sub_type == BGP_ROUTE_STATIC)
4640 break;
4641
4642 /* Withdraw static BGP route from routing table. */
4643 if (pi) {
4644 #if ENABLE_BGP_VNC
4645 rfapiProcessWithdraw(
4646 pi->peer, NULL, p, prd, pi->attr, afi, safi, pi->type,
4647 1); /* Kill, since it is an administrative change */
4648 #endif
4649 if (SAFI_MPLS_VPN == safi
4650 && bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT) {
4651 vpn_leak_to_vrf_withdraw(bgp, pi);
4652 }
4653 bgp_aggregate_decrement(bgp, p, pi, afi, safi);
4654 bgp_path_info_delete(rn, pi);
4655 bgp_process(bgp, rn, afi, safi);
4656 }
4657
4658 /* Unlock bgp_node_lookup. */
4659 bgp_unlock_node(rn);
4660 }
4661
4662 static void bgp_static_update_safi(struct bgp *bgp, struct prefix *p,
4663 struct bgp_static *bgp_static, afi_t afi,
4664 safi_t safi)
4665 {
4666 struct bgp_node *rn;
4667 struct bgp_path_info *new;
4668 struct attr *attr_new;
4669 struct attr attr = {0};
4670 struct bgp_path_info *pi;
4671 #if ENABLE_BGP_VNC
4672 mpls_label_t label = 0;
4673 #endif
4674 uint32_t num_labels = 0;
4675 union gw_addr add;
4676
4677 assert(bgp_static);
4678
4679 if (bgp_static->label != MPLS_INVALID_LABEL)
4680 num_labels = 1;
4681 rn = bgp_afi_node_get(bgp->rib[afi][safi], afi, safi, p,
4682 &bgp_static->prd);
4683
4684 bgp_attr_default_set(&attr, BGP_ORIGIN_IGP);
4685
4686 attr.nexthop = bgp_static->igpnexthop;
4687 attr.med = bgp_static->igpmetric;
4688 attr.flag |= ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC);
4689
4690 if ((safi == SAFI_EVPN) || (safi == SAFI_MPLS_VPN)
4691 || (safi == SAFI_ENCAP)) {
4692 if (afi == AFI_IP) {
4693 attr.mp_nexthop_global_in = bgp_static->igpnexthop;
4694 attr.mp_nexthop_len = IPV4_MAX_BYTELEN;
4695 }
4696 }
4697 if (afi == AFI_L2VPN) {
4698 if (bgp_static->gatewayIp.family == AF_INET)
4699 add.ipv4.s_addr =
4700 bgp_static->gatewayIp.u.prefix4.s_addr;
4701 else if (bgp_static->gatewayIp.family == AF_INET6)
4702 memcpy(&(add.ipv6), &(bgp_static->gatewayIp.u.prefix6),
4703 sizeof(struct in6_addr));
4704 overlay_index_update(&attr, bgp_static->eth_s_id, &add);
4705 if (bgp_static->encap_tunneltype == BGP_ENCAP_TYPE_VXLAN) {
4706 struct bgp_encap_type_vxlan bet;
4707 memset(&bet, 0, sizeof(struct bgp_encap_type_vxlan));
4708 bet.vnid = p->u.prefix_evpn.prefix_addr.eth_tag;
4709 bgp_encap_type_vxlan_to_tlv(&bet, &attr);
4710 }
4711 if (bgp_static->router_mac) {
4712 bgp_add_routermac_ecom(&attr, bgp_static->router_mac);
4713 }
4714 }
4715 /* Apply route-map. */
4716 if (bgp_static->rmap.name) {
4717 struct attr attr_tmp = attr;
4718 struct bgp_path_info rmap_path;
4719 int ret;
4720
4721 rmap_path.peer = bgp->peer_self;
4722 rmap_path.attr = &attr_tmp;
4723
4724 SET_FLAG(bgp->peer_self->rmap_type, PEER_RMAP_TYPE_NETWORK);
4725
4726 ret = route_map_apply(bgp_static->rmap.map, p, RMAP_BGP,
4727 &rmap_path);
4728
4729 bgp->peer_self->rmap_type = 0;
4730
4731 if (ret == RMAP_DENYMATCH) {
4732 /* Free uninterned attribute. */
4733 bgp_attr_flush(&attr_tmp);
4734
4735 /* Unintern original. */
4736 aspath_unintern(&attr.aspath);
4737 bgp_static_withdraw_safi(bgp, p, afi, safi,
4738 &bgp_static->prd);
4739 return;
4740 }
4741
4742 attr_new = bgp_attr_intern(&attr_tmp);
4743 } else {
4744 attr_new = bgp_attr_intern(&attr);
4745 }
4746
4747 for (pi = rn->info; pi; pi = pi->next)
4748 if (pi->peer == bgp->peer_self && pi->type == ZEBRA_ROUTE_BGP
4749 && pi->sub_type == BGP_ROUTE_STATIC)
4750 break;
4751
4752 if (pi) {
4753 memset(&add, 0, sizeof(union gw_addr));
4754 if (attrhash_cmp(pi->attr, attr_new)
4755 && overlay_index_equal(afi, pi, bgp_static->eth_s_id, &add)
4756 && !CHECK_FLAG(pi->flags, BGP_PATH_REMOVED)) {
4757 bgp_unlock_node(rn);
4758 bgp_attr_unintern(&attr_new);
4759 aspath_unintern(&attr.aspath);
4760 return;
4761 } else {
4762 /* The attribute is changed. */
4763 bgp_path_info_set_flag(rn, pi, BGP_PATH_ATTR_CHANGED);
4764
4765 /* Rewrite BGP route information. */
4766 if (CHECK_FLAG(pi->flags, BGP_PATH_REMOVED))
4767 bgp_path_info_restore(rn, pi);
4768 else
4769 bgp_aggregate_decrement(bgp, p, pi, afi, safi);
4770 bgp_attr_unintern(&pi->attr);
4771 pi->attr = attr_new;
4772 pi->uptime = bgp_clock();
4773 #if ENABLE_BGP_VNC
4774 if (pi->extra)
4775 label = decode_label(&pi->extra->label[0]);
4776 #endif
4777
4778 /* Process change. */
4779 bgp_aggregate_increment(bgp, p, pi, afi, safi);
4780 bgp_process(bgp, rn, afi, safi);
4781
4782 if (SAFI_MPLS_VPN == safi
4783 && bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT) {
4784 vpn_leak_to_vrf_update(bgp, pi);
4785 }
4786 #if ENABLE_BGP_VNC
4787 rfapiProcessUpdate(pi->peer, NULL, p, &bgp_static->prd,
4788 pi->attr, afi, safi, pi->type,
4789 pi->sub_type, &label);
4790 #endif
4791 bgp_unlock_node(rn);
4792 aspath_unintern(&attr.aspath);
4793 return;
4794 }
4795 }
4796
4797
4798 /* Make new BGP info. */
4799 new = info_make(ZEBRA_ROUTE_BGP, BGP_ROUTE_STATIC, 0, bgp->peer_self,
4800 attr_new, rn);
4801 SET_FLAG(new->flags, BGP_PATH_VALID);
4802 new->extra = bgp_path_info_extra_new();
4803 if (num_labels) {
4804 new->extra->label[0] = bgp_static->label;
4805 new->extra->num_labels = num_labels;
4806 }
4807 #if ENABLE_BGP_VNC
4808 label = decode_label(&bgp_static->label);
4809 #endif
4810
4811 /* Aggregate address increment. */
4812 bgp_aggregate_increment(bgp, p, new, afi, safi);
4813
4814 /* Register new BGP information. */
4815 bgp_path_info_add(rn, new);
4816 /* route_node_get lock */
4817 bgp_unlock_node(rn);
4818
4819 /* Process change. */
4820 bgp_process(bgp, rn, afi, safi);
4821
4822 if (SAFI_MPLS_VPN == safi
4823 && bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT) {
4824 vpn_leak_to_vrf_update(bgp, new);
4825 }
4826 #if ENABLE_BGP_VNC
4827 rfapiProcessUpdate(new->peer, NULL, p, &bgp_static->prd, new->attr, afi,
4828 safi, new->type, new->sub_type, &label);
4829 #endif
4830
4831 /* Unintern original. */
4832 aspath_unintern(&attr.aspath);
4833 }
4834
4835 /* Configure static BGP network. When user don't run zebra, static
4836 route should be installed as valid. */
4837 static int bgp_static_set(struct vty *vty, const char *negate,
4838 const char *ip_str, afi_t afi, safi_t safi,
4839 const char *rmap, int backdoor, uint32_t label_index)
4840 {
4841 VTY_DECLVAR_CONTEXT(bgp, bgp);
4842 int ret;
4843 struct prefix p;
4844 struct bgp_static *bgp_static;
4845 struct bgp_node *rn;
4846 uint8_t need_update = 0;
4847
4848 /* Convert IP prefix string to struct prefix. */
4849 ret = str2prefix(ip_str, &p);
4850 if (!ret) {
4851 vty_out(vty, "%% Malformed prefix\n");
4852 return CMD_WARNING_CONFIG_FAILED;
4853 }
4854 if (afi == AFI_IP6 && IN6_IS_ADDR_LINKLOCAL(&p.u.prefix6)) {
4855 vty_out(vty, "%% Malformed prefix (link-local address)\n");
4856 return CMD_WARNING_CONFIG_FAILED;
4857 }
4858
4859 apply_mask(&p);
4860
4861 if (negate) {
4862
4863 /* Set BGP static route configuration. */
4864 rn = bgp_node_lookup(bgp->route[afi][safi], &p);
4865
4866 if (!rn) {
4867 vty_out(vty, "%% Can't find static route specified\n");
4868 return CMD_WARNING_CONFIG_FAILED;
4869 }
4870
4871 bgp_static = bgp_static_get_node_info(rn);
4872
4873 if ((label_index != BGP_INVALID_LABEL_INDEX)
4874 && (label_index != bgp_static->label_index)) {
4875 vty_out(vty,
4876 "%% label-index doesn't match static route\n");
4877 return CMD_WARNING_CONFIG_FAILED;
4878 }
4879
4880 if ((rmap && bgp_static->rmap.name)
4881 && strcmp(rmap, bgp_static->rmap.name)) {
4882 vty_out(vty,
4883 "%% route-map name doesn't match static route\n");
4884 return CMD_WARNING_CONFIG_FAILED;
4885 }
4886
4887 /* Update BGP RIB. */
4888 if (!bgp_static->backdoor)
4889 bgp_static_withdraw(bgp, &p, afi, safi);
4890
4891 /* Clear configuration. */
4892 bgp_static_free(bgp_static);
4893 bgp_static_set_node_info(rn, NULL);
4894 bgp_unlock_node(rn);
4895 bgp_unlock_node(rn);
4896 } else {
4897
4898 /* Set BGP static route configuration. */
4899 rn = bgp_node_get(bgp->route[afi][safi], &p);
4900
4901 bgp_static = bgp_static_get_node_info(rn);
4902 if (bgp_static) {
4903 /* Configuration change. */
4904 /* Label index cannot be changed. */
4905 if (bgp_static->label_index != label_index) {
4906 vty_out(vty, "%% cannot change label-index\n");
4907 return CMD_WARNING_CONFIG_FAILED;
4908 }
4909
4910 /* Check previous routes are installed into BGP. */
4911 if (bgp_static->valid
4912 && bgp_static->backdoor != backdoor)
4913 need_update = 1;
4914
4915 bgp_static->backdoor = backdoor;
4916
4917 if (rmap) {
4918 if (bgp_static->rmap.name)
4919 XFREE(MTYPE_ROUTE_MAP_NAME,
4920 bgp_static->rmap.name);
4921 bgp_static->rmap.name =
4922 XSTRDUP(MTYPE_ROUTE_MAP_NAME, rmap);
4923 bgp_static->rmap.map =
4924 route_map_lookup_by_name(rmap);
4925 } else {
4926 if (bgp_static->rmap.name)
4927 XFREE(MTYPE_ROUTE_MAP_NAME,
4928 bgp_static->rmap.name);
4929 bgp_static->rmap.name = NULL;
4930 bgp_static->rmap.map = NULL;
4931 bgp_static->valid = 0;
4932 }
4933 bgp_unlock_node(rn);
4934 } else {
4935 /* New configuration. */
4936 bgp_static = bgp_static_new();
4937 bgp_static->backdoor = backdoor;
4938 bgp_static->valid = 0;
4939 bgp_static->igpmetric = 0;
4940 bgp_static->igpnexthop.s_addr = 0;
4941 bgp_static->label_index = label_index;
4942
4943 if (rmap) {
4944 if (bgp_static->rmap.name)
4945 XFREE(MTYPE_ROUTE_MAP_NAME,
4946 bgp_static->rmap.name);
4947 bgp_static->rmap.name =
4948 XSTRDUP(MTYPE_ROUTE_MAP_NAME, rmap);
4949 bgp_static->rmap.map =
4950 route_map_lookup_by_name(rmap);
4951 }
4952 bgp_static_set_node_info(rn, bgp_static);
4953 }
4954
4955 bgp_static->valid = 1;
4956 if (need_update)
4957 bgp_static_withdraw(bgp, &p, afi, safi);
4958
4959 if (!bgp_static->backdoor)
4960 bgp_static_update(bgp, &p, bgp_static, afi, safi);
4961 }
4962
4963 return CMD_SUCCESS;
4964 }
4965
4966 void bgp_static_add(struct bgp *bgp)
4967 {
4968 afi_t afi;
4969 safi_t safi;
4970 struct bgp_node *rn;
4971 struct bgp_node *rm;
4972 struct bgp_table *table;
4973 struct bgp_static *bgp_static;
4974
4975 FOREACH_AFI_SAFI (afi, safi)
4976 for (rn = bgp_table_top(bgp->route[afi][safi]); rn;
4977 rn = bgp_route_next(rn)) {
4978 if (rn->info == NULL)
4979 continue;
4980
4981 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_ENCAP)
4982 || (safi == SAFI_EVPN)) {
4983 table = rn->info;
4984
4985 for (rm = bgp_table_top(table); rm;
4986 rm = bgp_route_next(rm)) {
4987 bgp_static =
4988 bgp_static_get_node_info(rm);
4989 bgp_static_update_safi(bgp, &rm->p,
4990 bgp_static, afi,
4991 safi);
4992 }
4993 } else {
4994 bgp_static_update(bgp, &rn->p,
4995 bgp_static_get_node_info(rn),
4996 afi, safi);
4997 }
4998 }
4999 }
5000
5001 /* Called from bgp_delete(). Delete all static routes from the BGP
5002 instance. */
5003 void bgp_static_delete(struct bgp *bgp)
5004 {
5005 afi_t afi;
5006 safi_t safi;
5007 struct bgp_node *rn;
5008 struct bgp_node *rm;
5009 struct bgp_table *table;
5010 struct bgp_static *bgp_static;
5011
5012 FOREACH_AFI_SAFI (afi, safi)
5013 for (rn = bgp_table_top(bgp->route[afi][safi]); rn;
5014 rn = bgp_route_next(rn)) {
5015 if (rn->info == NULL)
5016 continue;
5017
5018 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_ENCAP)
5019 || (safi == SAFI_EVPN)) {
5020 table = rn->info;
5021
5022 for (rm = bgp_table_top(table); rm;
5023 rm = bgp_route_next(rm)) {
5024 bgp_static =
5025 bgp_static_get_node_info(rm);
5026 bgp_static_withdraw_safi(
5027 bgp, &rm->p, AFI_IP, safi,
5028 (struct prefix_rd *)&rn->p);
5029 bgp_static_free(bgp_static);
5030 bgp_static_set_node_info(rn, NULL);
5031 bgp_unlock_node(rn);
5032 }
5033 } else {
5034 bgp_static = bgp_static_get_node_info(rn);
5035 bgp_static_withdraw(bgp, &rn->p, afi, safi);
5036 bgp_static_free(bgp_static);
5037 bgp_static_set_node_info(rn, NULL);
5038 bgp_unlock_node(rn);
5039 }
5040 }
5041 }
5042
5043 void bgp_static_redo_import_check(struct bgp *bgp)
5044 {
5045 afi_t afi;
5046 safi_t safi;
5047 struct bgp_node *rn;
5048 struct bgp_node *rm;
5049 struct bgp_table *table;
5050 struct bgp_static *bgp_static;
5051
5052 /* Use this flag to force reprocessing of the route */
5053 bgp_flag_set(bgp, BGP_FLAG_FORCE_STATIC_PROCESS);
5054 FOREACH_AFI_SAFI (afi, safi) {
5055 for (rn = bgp_table_top(bgp->route[afi][safi]); rn;
5056 rn = bgp_route_next(rn)) {
5057 if (rn->info == NULL)
5058 continue;
5059
5060 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_ENCAP)
5061 || (safi == SAFI_EVPN)) {
5062 table = rn->info;
5063
5064 for (rm = bgp_table_top(table); rm;
5065 rm = bgp_route_next(rm)) {
5066 bgp_static =
5067 bgp_static_get_node_info(rm);
5068 bgp_static_update_safi(bgp, &rm->p,
5069 bgp_static, afi,
5070 safi);
5071 }
5072 } else {
5073 bgp_static = bgp_static_get_node_info(rn);
5074 bgp_static_update(bgp, &rn->p, bgp_static, afi,
5075 safi);
5076 }
5077 }
5078 }
5079 bgp_flag_unset(bgp, BGP_FLAG_FORCE_STATIC_PROCESS);
5080 }
5081
5082 static void bgp_purge_af_static_redist_routes(struct bgp *bgp, afi_t afi,
5083 safi_t safi)
5084 {
5085 struct bgp_table *table;
5086 struct bgp_node *rn;
5087 struct bgp_path_info *pi;
5088
5089 table = bgp->rib[afi][safi];
5090 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn)) {
5091 for (pi = rn->info; pi; pi = pi->next) {
5092 if (pi->peer == bgp->peer_self
5093 && ((pi->type == ZEBRA_ROUTE_BGP
5094 && pi->sub_type == BGP_ROUTE_STATIC)
5095 || (pi->type != ZEBRA_ROUTE_BGP
5096 && pi->sub_type
5097 == BGP_ROUTE_REDISTRIBUTE))) {
5098 bgp_aggregate_decrement(bgp, &rn->p, pi, afi,
5099 safi);
5100 bgp_unlink_nexthop(pi);
5101 bgp_path_info_delete(rn, pi);
5102 bgp_process(bgp, rn, afi, safi);
5103 }
5104 }
5105 }
5106 }
5107
5108 /*
5109 * Purge all networks and redistributed routes from routing table.
5110 * Invoked upon the instance going down.
5111 */
5112 void bgp_purge_static_redist_routes(struct bgp *bgp)
5113 {
5114 afi_t afi;
5115 safi_t safi;
5116
5117 FOREACH_AFI_SAFI (afi, safi)
5118 bgp_purge_af_static_redist_routes(bgp, afi, safi);
5119 }
5120
5121 /*
5122 * gpz 110624
5123 * Currently this is used to set static routes for VPN and ENCAP.
5124 * I think it can probably be factored with bgp_static_set.
5125 */
5126 int bgp_static_set_safi(afi_t afi, safi_t safi, struct vty *vty,
5127 const char *ip_str, const char *rd_str,
5128 const char *label_str, const char *rmap_str,
5129 int evpn_type, const char *esi, const char *gwip,
5130 const char *ethtag, const char *routermac)
5131 {
5132 VTY_DECLVAR_CONTEXT(bgp, bgp);
5133 int ret;
5134 struct prefix p;
5135 struct prefix_rd prd;
5136 struct bgp_node *prn;
5137 struct bgp_node *rn;
5138 struct bgp_table *table;
5139 struct bgp_static *bgp_static;
5140 mpls_label_t label = MPLS_INVALID_LABEL;
5141 struct prefix gw_ip;
5142
5143 /* validate ip prefix */
5144 ret = str2prefix(ip_str, &p);
5145 if (!ret) {
5146 vty_out(vty, "%% Malformed prefix\n");
5147 return CMD_WARNING_CONFIG_FAILED;
5148 }
5149 apply_mask(&p);
5150 if ((afi == AFI_L2VPN)
5151 && (bgp_build_evpn_prefix(evpn_type,
5152 ethtag != NULL ? atol(ethtag) : 0, &p))) {
5153 vty_out(vty, "%% L2VPN prefix could not be forged\n");
5154 return CMD_WARNING_CONFIG_FAILED;
5155 }
5156
5157 ret = str2prefix_rd(rd_str, &prd);
5158 if (!ret) {
5159 vty_out(vty, "%% Malformed rd\n");
5160 return CMD_WARNING_CONFIG_FAILED;
5161 }
5162
5163 if (label_str) {
5164 unsigned long label_val;
5165 label_val = strtoul(label_str, NULL, 10);
5166 encode_label(label_val, &label);
5167 }
5168
5169 if (safi == SAFI_EVPN) {
5170 if (esi && str2esi(esi, NULL) == 0) {
5171 vty_out(vty, "%% Malformed ESI\n");
5172 return CMD_WARNING_CONFIG_FAILED;
5173 }
5174 if (routermac && prefix_str2mac(routermac, NULL) == 0) {
5175 vty_out(vty, "%% Malformed Router MAC\n");
5176 return CMD_WARNING_CONFIG_FAILED;
5177 }
5178 if (gwip) {
5179 memset(&gw_ip, 0, sizeof(struct prefix));
5180 ret = str2prefix(gwip, &gw_ip);
5181 if (!ret) {
5182 vty_out(vty, "%% Malformed GatewayIp\n");
5183 return CMD_WARNING_CONFIG_FAILED;
5184 }
5185 if ((gw_ip.family == AF_INET
5186 && is_evpn_prefix_ipaddr_v6(
5187 (struct prefix_evpn *)&p))
5188 || (gw_ip.family == AF_INET6
5189 && is_evpn_prefix_ipaddr_v4(
5190 (struct prefix_evpn *)&p))) {
5191 vty_out(vty,
5192 "%% GatewayIp family differs with IP prefix\n");
5193 return CMD_WARNING_CONFIG_FAILED;
5194 }
5195 }
5196 }
5197 prn = bgp_node_get(bgp->route[afi][safi], (struct prefix *)&prd);
5198 if (prn->info == NULL)
5199 prn->info = bgp_table_init(bgp, afi, safi);
5200 else
5201 bgp_unlock_node(prn);
5202 table = prn->info;
5203
5204 rn = bgp_node_get(table, &p);
5205
5206 if (rn->info) {
5207 vty_out(vty, "%% Same network configuration exists\n");
5208 bgp_unlock_node(rn);
5209 } else {
5210 /* New configuration. */
5211 bgp_static = bgp_static_new();
5212 bgp_static->backdoor = 0;
5213 bgp_static->valid = 0;
5214 bgp_static->igpmetric = 0;
5215 bgp_static->igpnexthop.s_addr = 0;
5216 bgp_static->label = label;
5217 bgp_static->prd = prd;
5218
5219 if (rmap_str) {
5220 if (bgp_static->rmap.name)
5221 XFREE(MTYPE_ROUTE_MAP_NAME,
5222 bgp_static->rmap.name);
5223 bgp_static->rmap.name =
5224 XSTRDUP(MTYPE_ROUTE_MAP_NAME, rmap_str);
5225 bgp_static->rmap.map =
5226 route_map_lookup_by_name(rmap_str);
5227 }
5228
5229 if (safi == SAFI_EVPN) {
5230 if (esi) {
5231 bgp_static->eth_s_id =
5232 XCALLOC(MTYPE_ATTR,
5233 sizeof(struct eth_segment_id));
5234 str2esi(esi, bgp_static->eth_s_id);
5235 }
5236 if (routermac) {
5237 bgp_static->router_mac =
5238 XCALLOC(MTYPE_ATTR, ETH_ALEN + 1);
5239 (void)prefix_str2mac(routermac,
5240 bgp_static->router_mac);
5241 }
5242 if (gwip)
5243 prefix_copy(&bgp_static->gatewayIp, &gw_ip);
5244 }
5245 bgp_static_set_node_info(rn, bgp_static);
5246
5247 bgp_static->valid = 1;
5248 bgp_static_update_safi(bgp, &p, bgp_static, afi, safi);
5249 }
5250
5251 return CMD_SUCCESS;
5252 }
5253
5254 /* Configure static BGP network. */
5255 int bgp_static_unset_safi(afi_t afi, safi_t safi, struct vty *vty,
5256 const char *ip_str, const char *rd_str,
5257 const char *label_str, int evpn_type, const char *esi,
5258 const char *gwip, const char *ethtag)
5259 {
5260 VTY_DECLVAR_CONTEXT(bgp, bgp);
5261 int ret;
5262 struct prefix p;
5263 struct prefix_rd prd;
5264 struct bgp_node *prn;
5265 struct bgp_node *rn;
5266 struct bgp_table *table;
5267 struct bgp_static *bgp_static;
5268 mpls_label_t label = MPLS_INVALID_LABEL;
5269
5270 /* Convert IP prefix string to struct prefix. */
5271 ret = str2prefix(ip_str, &p);
5272 if (!ret) {
5273 vty_out(vty, "%% Malformed prefix\n");
5274 return CMD_WARNING_CONFIG_FAILED;
5275 }
5276 apply_mask(&p);
5277 if ((afi == AFI_L2VPN)
5278 && (bgp_build_evpn_prefix(evpn_type,
5279 ethtag != NULL ? atol(ethtag) : 0, &p))) {
5280 vty_out(vty, "%% L2VPN prefix could not be forged\n");
5281 return CMD_WARNING_CONFIG_FAILED;
5282 }
5283 ret = str2prefix_rd(rd_str, &prd);
5284 if (!ret) {
5285 vty_out(vty, "%% Malformed rd\n");
5286 return CMD_WARNING_CONFIG_FAILED;
5287 }
5288
5289 if (label_str) {
5290 unsigned long label_val;
5291 label_val = strtoul(label_str, NULL, 10);
5292 encode_label(label_val, &label);
5293 }
5294
5295 prn = bgp_node_get(bgp->route[afi][safi], (struct prefix *)&prd);
5296 if (prn->info == NULL)
5297 prn->info = bgp_table_init(bgp, afi, safi);
5298 else
5299 bgp_unlock_node(prn);
5300 table = prn->info;
5301
5302 rn = bgp_node_lookup(table, &p);
5303
5304 if (rn) {
5305 bgp_static_withdraw_safi(bgp, &p, afi, safi, &prd);
5306
5307 bgp_static = bgp_static_get_node_info(rn);
5308 bgp_static_free(bgp_static);
5309 bgp_static_set_node_info(rn, NULL);
5310 bgp_unlock_node(rn);
5311 bgp_unlock_node(rn);
5312 } else
5313 vty_out(vty, "%% Can't find the route\n");
5314
5315 return CMD_SUCCESS;
5316 }
5317
5318 static int bgp_table_map_set(struct vty *vty, afi_t afi, safi_t safi,
5319 const char *rmap_name)
5320 {
5321 VTY_DECLVAR_CONTEXT(bgp, bgp);
5322 struct bgp_rmap *rmap;
5323
5324 rmap = &bgp->table_map[afi][safi];
5325 if (rmap_name) {
5326 if (rmap->name)
5327 XFREE(MTYPE_ROUTE_MAP_NAME, rmap->name);
5328 rmap->name = XSTRDUP(MTYPE_ROUTE_MAP_NAME, rmap_name);
5329 rmap->map = route_map_lookup_by_name(rmap_name);
5330 } else {
5331 if (rmap->name)
5332 XFREE(MTYPE_ROUTE_MAP_NAME, rmap->name);
5333 rmap->name = NULL;
5334 rmap->map = NULL;
5335 }
5336
5337 if (bgp_fibupd_safi(safi))
5338 bgp_zebra_announce_table(bgp, afi, safi);
5339
5340 return CMD_SUCCESS;
5341 }
5342
5343 static int bgp_table_map_unset(struct vty *vty, afi_t afi, safi_t safi,
5344 const char *rmap_name)
5345 {
5346 VTY_DECLVAR_CONTEXT(bgp, bgp);
5347 struct bgp_rmap *rmap;
5348
5349 rmap = &bgp->table_map[afi][safi];
5350 if (rmap->name)
5351 XFREE(MTYPE_ROUTE_MAP_NAME, rmap->name);
5352 rmap->name = NULL;
5353 rmap->map = NULL;
5354
5355 if (bgp_fibupd_safi(safi))
5356 bgp_zebra_announce_table(bgp, afi, safi);
5357
5358 return CMD_SUCCESS;
5359 }
5360
5361 void bgp_config_write_table_map(struct vty *vty, struct bgp *bgp, afi_t afi,
5362 safi_t safi)
5363 {
5364 if (bgp->table_map[afi][safi].name) {
5365 vty_out(vty, " table-map %s\n",
5366 bgp->table_map[afi][safi].name);
5367 }
5368 }
5369
5370 DEFUN (bgp_table_map,
5371 bgp_table_map_cmd,
5372 "table-map WORD",
5373 "BGP table to RIB route download filter\n"
5374 "Name of the route map\n")
5375 {
5376 int idx_word = 1;
5377 return bgp_table_map_set(vty, bgp_node_afi(vty), bgp_node_safi(vty),
5378 argv[idx_word]->arg);
5379 }
5380 DEFUN (no_bgp_table_map,
5381 no_bgp_table_map_cmd,
5382 "no table-map WORD",
5383 NO_STR
5384 "BGP table to RIB route download filter\n"
5385 "Name of the route map\n")
5386 {
5387 int idx_word = 2;
5388 return bgp_table_map_unset(vty, bgp_node_afi(vty), bgp_node_safi(vty),
5389 argv[idx_word]->arg);
5390 }
5391
5392 DEFPY(bgp_network,
5393 bgp_network_cmd,
5394 "[no] network \
5395 <A.B.C.D/M$prefix|A.B.C.D$address [mask A.B.C.D$netmask]> \
5396 [{route-map WORD$map_name|label-index (0-1048560)$label_index| \
5397 backdoor$backdoor}]",
5398 NO_STR
5399 "Specify a network to announce via BGP\n"
5400 "IPv4 prefix\n"
5401 "Network number\n"
5402 "Network mask\n"
5403 "Network mask\n"
5404 "Route-map to modify the attributes\n"
5405 "Name of the route map\n"
5406 "Label index to associate with the prefix\n"
5407 "Label index value\n"
5408 "Specify a BGP backdoor route\n")
5409 {
5410 char addr_prefix_str[BUFSIZ];
5411
5412 if (address_str) {
5413 int ret;
5414
5415 ret = netmask_str2prefix_str(address_str, netmask_str,
5416 addr_prefix_str);
5417 if (!ret) {
5418 vty_out(vty, "%% Inconsistent address and mask\n");
5419 return CMD_WARNING_CONFIG_FAILED;
5420 }
5421 }
5422
5423 return bgp_static_set(
5424 vty, no, address_str ? addr_prefix_str : prefix_str, AFI_IP,
5425 bgp_node_safi(vty), map_name, backdoor ? 1 : 0,
5426 label_index ? (uint32_t)label_index : BGP_INVALID_LABEL_INDEX);
5427 }
5428
5429 DEFPY(ipv6_bgp_network,
5430 ipv6_bgp_network_cmd,
5431 "[no] network X:X::X:X/M$prefix \
5432 [{route-map WORD$map_name|label-index (0-1048560)$label_index}]",
5433 NO_STR
5434 "Specify a network to announce via BGP\n"
5435 "IPv6 prefix\n"
5436 "Route-map to modify the attributes\n"
5437 "Name of the route map\n"
5438 "Label index to associate with the prefix\n"
5439 "Label index value\n")
5440 {
5441 return bgp_static_set(
5442 vty, no, prefix_str, AFI_IP6, bgp_node_safi(vty), map_name, 0,
5443 label_index ? (uint32_t)label_index : BGP_INVALID_LABEL_INDEX);
5444 }
5445
5446 /* Aggreagete address:
5447
5448 advertise-map Set condition to advertise attribute
5449 as-set Generate AS set path information
5450 attribute-map Set attributes of aggregate
5451 route-map Set parameters of aggregate
5452 summary-only Filter more specific routes from updates
5453 suppress-map Conditionally filter more specific routes from updates
5454 <cr>
5455 */
5456 struct bgp_aggregate {
5457 /* Summary-only flag. */
5458 uint8_t summary_only;
5459
5460 /* AS set generation. */
5461 uint8_t as_set;
5462
5463 /* Route-map for aggregated route. */
5464 struct route_map *map;
5465
5466 /* Suppress-count. */
5467 unsigned long count;
5468
5469 /* SAFI configuration. */
5470 safi_t safi;
5471 };
5472
5473 static struct bgp_aggregate *bgp_aggregate_new(void)
5474 {
5475 return XCALLOC(MTYPE_BGP_AGGREGATE, sizeof(struct bgp_aggregate));
5476 }
5477
5478 static void bgp_aggregate_free(struct bgp_aggregate *aggregate)
5479 {
5480 XFREE(MTYPE_BGP_AGGREGATE, aggregate);
5481 }
5482
5483 static int bgp_aggregate_info_same(struct bgp_path_info *pi, uint8_t origin,
5484 struct aspath *aspath,
5485 struct community *comm,
5486 struct ecommunity *ecomm,
5487 struct lcommunity *lcomm)
5488 {
5489 static struct aspath *ae = NULL;
5490
5491 if (!ae)
5492 ae = aspath_empty();
5493
5494 if (!pi)
5495 return 0;
5496
5497 if (origin != pi->attr->origin)
5498 return 0;
5499
5500 if (!aspath_cmp(pi->attr->aspath, (aspath) ? aspath : ae))
5501 return 0;
5502
5503 if (!community_cmp(pi->attr->community, comm))
5504 return 0;
5505
5506 if (!ecommunity_cmp(pi->attr->ecommunity, ecomm))
5507 return 0;
5508
5509 if (!lcommunity_cmp(pi->attr->lcommunity, lcomm))
5510 return 0;
5511
5512 if (!CHECK_FLAG(pi->flags, BGP_PATH_VALID))
5513 return 0;
5514
5515 return 1;
5516 }
5517
5518 static void bgp_aggregate_install(struct bgp *bgp, afi_t afi, safi_t safi,
5519 struct prefix *p, uint8_t origin,
5520 struct aspath *aspath,
5521 struct community *community,
5522 struct ecommunity *ecommunity,
5523 struct lcommunity *lcommunity,
5524 uint8_t atomic_aggregate,
5525 struct bgp_aggregate *aggregate)
5526 {
5527 struct bgp_node *rn;
5528 struct bgp_table *table;
5529 struct bgp_path_info *pi, *new;
5530
5531 table = bgp->rib[afi][safi];
5532
5533 rn = bgp_node_get(table, p);
5534
5535 for (pi = rn->info; pi; pi = pi->next)
5536 if (pi->peer == bgp->peer_self && pi->type == ZEBRA_ROUTE_BGP
5537 && pi->sub_type == BGP_ROUTE_AGGREGATE)
5538 break;
5539
5540 if (aggregate->count > 0) {
5541 /*
5542 * If the aggregate information has not changed
5543 * no need to re-install it again.
5544 */
5545 if (bgp_aggregate_info_same(rn->info, origin, aspath, community,
5546 ecommunity, lcommunity)) {
5547 bgp_unlock_node(rn);
5548
5549 if (aspath)
5550 aspath_free(aspath);
5551 if (community)
5552 community_free(&community);
5553 if (ecommunity)
5554 ecommunity_free(&ecommunity);
5555 if (lcommunity)
5556 lcommunity_free(&lcommunity);
5557
5558 return;
5559 }
5560
5561 /*
5562 * Mark the old as unusable
5563 */
5564 if (pi)
5565 bgp_path_info_delete(rn, pi);
5566
5567 new = info_make(ZEBRA_ROUTE_BGP, BGP_ROUTE_AGGREGATE, 0,
5568 bgp->peer_self,
5569 bgp_attr_aggregate_intern(bgp, origin, aspath,
5570 community, ecommunity,
5571 lcommunity,
5572 aggregate->as_set,
5573 atomic_aggregate),
5574 rn);
5575 SET_FLAG(new->flags, BGP_PATH_VALID);
5576
5577 bgp_path_info_add(rn, new);
5578 bgp_process(bgp, rn, afi, safi);
5579 } else {
5580 for (pi = rn->info; pi; pi = pi->next)
5581 if (pi->peer == bgp->peer_self
5582 && pi->type == ZEBRA_ROUTE_BGP
5583 && pi->sub_type == BGP_ROUTE_AGGREGATE)
5584 break;
5585
5586 /* Withdraw static BGP route from routing table. */
5587 if (pi) {
5588 bgp_path_info_delete(rn, pi);
5589 bgp_process(bgp, rn, afi, safi);
5590 }
5591 }
5592
5593 bgp_unlock_node(rn);
5594 }
5595
5596 /* Update an aggregate as routes are added/removed from the BGP table */
5597 static void bgp_aggregate_route(struct bgp *bgp, struct prefix *p,
5598 struct bgp_path_info *pinew, afi_t afi,
5599 safi_t safi, struct bgp_path_info *del,
5600 struct bgp_aggregate *aggregate)
5601 {
5602 struct bgp_table *table;
5603 struct bgp_node *top;
5604 struct bgp_node *rn;
5605 uint8_t origin;
5606 struct aspath *aspath = NULL;
5607 struct aspath *asmerge = NULL;
5608 struct community *community = NULL;
5609 struct community *commerge = NULL;
5610 struct ecommunity *ecommunity = NULL;
5611 struct ecommunity *ecommerge = NULL;
5612 struct lcommunity *lcommunity = NULL;
5613 struct lcommunity *lcommerge = NULL;
5614 struct bgp_path_info *pi;
5615 unsigned long match = 0;
5616 uint8_t atomic_aggregate = 0;
5617
5618 /* ORIGIN attribute: If at least one route among routes that are
5619 aggregated has ORIGIN with the value INCOMPLETE, then the
5620 aggregated route must have the ORIGIN attribute with the value
5621 INCOMPLETE. Otherwise, if at least one route among routes that
5622 are aggregated has ORIGIN with the value EGP, then the aggregated
5623 route must have the origin attribute with the value EGP. In all
5624 other case the value of the ORIGIN attribute of the aggregated
5625 route is INTERNAL. */
5626 origin = BGP_ORIGIN_IGP;
5627
5628 table = bgp->rib[afi][safi];
5629
5630 top = bgp_node_get(table, p);
5631 for (rn = bgp_node_get(table, p); rn;
5632 rn = bgp_route_next_until(rn, top)) {
5633 if (rn->p.prefixlen <= p->prefixlen)
5634 continue;
5635
5636 match = 0;
5637
5638 for (pi = rn->info; pi; pi = pi->next) {
5639 if (BGP_PATH_HOLDDOWN(pi))
5640 continue;
5641
5642 if (del && pi == del)
5643 continue;
5644
5645 if (pi->attr->flag
5646 & ATTR_FLAG_BIT(BGP_ATTR_ATOMIC_AGGREGATE))
5647 atomic_aggregate = 1;
5648
5649 if (pi->sub_type == BGP_ROUTE_AGGREGATE)
5650 continue;
5651
5652 /*
5653 * summary-only aggregate route suppress
5654 * aggregated route announcements.
5655 */
5656 if (aggregate->summary_only) {
5657 (bgp_path_info_extra_get(pi))->suppress++;
5658 bgp_path_info_set_flag(rn, pi,
5659 BGP_PATH_ATTR_CHANGED);
5660 match++;
5661 }
5662
5663 aggregate->count++;
5664
5665 /*
5666 * If at least one route among routes that are
5667 * aggregated has ORIGIN with the value INCOMPLETE,
5668 * then the aggregated route MUST have the ORIGIN
5669 * attribute with the value INCOMPLETE. Otherwise, if
5670 * at least one route among routes that are aggregated
5671 * has ORIGIN with the value EGP, then the aggregated
5672 * route MUST have the ORIGIN attribute with the value
5673 * EGP.
5674 */
5675 if (origin < pi->attr->origin)
5676 origin = pi->attr->origin;
5677
5678 if (!aggregate->as_set)
5679 continue;
5680
5681 /*
5682 * as-set aggregate route generate origin, as path,
5683 * and community aggregation.
5684 */
5685 if (aspath) {
5686 asmerge = aspath_aggregate(aspath,
5687 pi->attr->aspath);
5688 aspath_free(aspath);
5689 aspath = asmerge;
5690 } else
5691 aspath = aspath_dup(pi->attr->aspath);
5692
5693 if (pi->attr->community) {
5694 if (community) {
5695 commerge = community_merge(
5696 community, pi->attr->community);
5697 community =
5698 community_uniq_sort(commerge);
5699 community_free(&commerge);
5700 } else
5701 community = community_dup(
5702 pi->attr->community);
5703 }
5704
5705 if (pi->attr->ecommunity) {
5706 if (ecommunity) {
5707 ecommerge = ecommunity_merge(
5708 ecommunity,
5709 pi->attr->ecommunity);
5710 ecommunity =
5711 ecommunity_uniq_sort(ecommerge);
5712 ecommunity_free(&ecommerge);
5713 } else
5714 ecommunity = ecommunity_dup(
5715 pi->attr->ecommunity);
5716 }
5717
5718 if (pi->attr->lcommunity) {
5719 if (lcommunity) {
5720 lcommerge = lcommunity_merge(
5721 lcommunity,
5722 pi->attr->lcommunity);
5723 lcommunity =
5724 lcommunity_uniq_sort(lcommerge);
5725 lcommunity_free(&lcommerge);
5726 } else
5727 lcommunity = lcommunity_dup(
5728 pi->attr->lcommunity);
5729 }
5730 }
5731 if (match)
5732 bgp_process(bgp, rn, afi, safi);
5733 }
5734 bgp_unlock_node(top);
5735
5736 if (pinew) {
5737 aggregate->count++;
5738
5739 if (aggregate->summary_only)
5740 (bgp_path_info_extra_get(pinew))->suppress++;
5741
5742 if (origin < pinew->attr->origin)
5743 origin = pinew->attr->origin;
5744
5745 if (aggregate->as_set) {
5746 if (aspath) {
5747 asmerge = aspath_aggregate(aspath,
5748 pinew->attr->aspath);
5749 aspath_free(aspath);
5750 aspath = asmerge;
5751 } else
5752 aspath = aspath_dup(pinew->attr->aspath);
5753
5754 if (pinew->attr->community) {
5755 if (community) {
5756 commerge = community_merge(
5757 community,
5758 pinew->attr->community);
5759 community =
5760 community_uniq_sort(commerge);
5761 community_free(&commerge);
5762 } else
5763 community = community_dup(
5764 pinew->attr->community);
5765 }
5766
5767 if (pinew->attr->ecommunity) {
5768 if (ecommunity) {
5769 ecommerge = ecommunity_merge(
5770 ecommunity,
5771 pinew->attr->ecommunity);
5772 ecommunity =
5773 ecommunity_uniq_sort(ecommerge);
5774 ecommunity_free(&ecommerge);
5775 } else
5776 ecommunity = ecommunity_dup(
5777 pinew->attr->ecommunity);
5778 }
5779
5780 if (pinew->attr->lcommunity) {
5781 if (lcommunity) {
5782 lcommerge = lcommunity_merge(
5783 lcommunity,
5784 pinew->attr->lcommunity);
5785 lcommunity =
5786 lcommunity_uniq_sort(lcommerge);
5787 lcommunity_free(&lcommerge);
5788 } else
5789 lcommunity = lcommunity_dup(
5790 pinew->attr->lcommunity);
5791 }
5792 }
5793 }
5794
5795 bgp_aggregate_install(bgp, afi, safi, p, origin, aspath, community,
5796 ecommunity, lcommunity, atomic_aggregate,
5797 aggregate);
5798
5799 if (aggregate->count == 0) {
5800 if (aspath)
5801 aspath_free(aspath);
5802 if (community)
5803 community_free(&community);
5804 if (ecommunity)
5805 ecommunity_free(&ecommunity);
5806 if (lcommunity)
5807 lcommunity_free(&lcommunity);
5808 }
5809 }
5810
5811 static void bgp_aggregate_delete(struct bgp *bgp, struct prefix *p, afi_t afi,
5812 safi_t safi, struct bgp_aggregate *aggregate)
5813 {
5814 struct bgp_table *table;
5815 struct bgp_node *top;
5816 struct bgp_node *rn;
5817 struct bgp_path_info *pi;
5818 unsigned long match;
5819
5820 table = bgp->rib[afi][safi];
5821
5822 /* If routes exists below this node, generate aggregate routes. */
5823 top = bgp_node_get(table, p);
5824 for (rn = bgp_node_get(table, p); rn;
5825 rn = bgp_route_next_until(rn, top)) {
5826 if (rn->p.prefixlen <= p->prefixlen)
5827 continue;
5828 match = 0;
5829
5830 for (pi = rn->info; pi; pi = pi->next) {
5831 if (BGP_PATH_HOLDDOWN(pi))
5832 continue;
5833
5834 if (pi->sub_type == BGP_ROUTE_AGGREGATE)
5835 continue;
5836
5837 if (aggregate->summary_only && pi->extra) {
5838 pi->extra->suppress--;
5839
5840 if (pi->extra->suppress == 0) {
5841 bgp_path_info_set_flag(
5842 rn, pi, BGP_PATH_ATTR_CHANGED);
5843 match++;
5844 }
5845 }
5846 aggregate->count--;
5847 }
5848
5849 /* If this node was suppressed, process the change. */
5850 if (match)
5851 bgp_process(bgp, rn, afi, safi);
5852 }
5853 bgp_unlock_node(top);
5854 }
5855
5856 void bgp_aggregate_increment(struct bgp *bgp, struct prefix *p,
5857 struct bgp_path_info *pi, afi_t afi, safi_t safi)
5858 {
5859 struct bgp_node *child;
5860 struct bgp_node *rn;
5861 struct bgp_aggregate *aggregate;
5862 struct bgp_table *table;
5863
5864 table = bgp->aggregate[afi][safi];
5865
5866 /* No aggregates configured. */
5867 if (bgp_table_top_nolock(table) == NULL)
5868 return;
5869
5870 if (p->prefixlen == 0)
5871 return;
5872
5873 if (BGP_PATH_HOLDDOWN(pi))
5874 return;
5875
5876 child = bgp_node_get(table, p);
5877
5878 /* Aggregate address configuration check. */
5879 for (rn = child; rn; rn = bgp_node_parent_nolock(rn)) {
5880 aggregate = bgp_aggregate_get_node_info(rn);
5881 if (aggregate != NULL && rn->p.prefixlen < p->prefixlen) {
5882 bgp_aggregate_delete(bgp, &rn->p, afi, safi, aggregate);
5883 bgp_aggregate_route(bgp, &rn->p, pi, afi, safi, NULL,
5884 aggregate);
5885 }
5886 }
5887 bgp_unlock_node(child);
5888 }
5889
5890 void bgp_aggregate_decrement(struct bgp *bgp, struct prefix *p,
5891 struct bgp_path_info *del, afi_t afi, safi_t safi)
5892 {
5893 struct bgp_node *child;
5894 struct bgp_node *rn;
5895 struct bgp_aggregate *aggregate;
5896 struct bgp_table *table;
5897
5898 table = bgp->aggregate[afi][safi];
5899
5900 /* No aggregates configured. */
5901 if (bgp_table_top_nolock(table) == NULL)
5902 return;
5903
5904 if (p->prefixlen == 0)
5905 return;
5906
5907 child = bgp_node_get(table, p);
5908
5909 /* Aggregate address configuration check. */
5910 for (rn = child; rn; rn = bgp_node_parent_nolock(rn)) {
5911 aggregate = bgp_aggregate_get_node_info(rn);
5912 if (aggregate != NULL && rn->p.prefixlen < p->prefixlen) {
5913 bgp_aggregate_delete(bgp, &rn->p, afi, safi, aggregate);
5914 bgp_aggregate_route(bgp, &rn->p, NULL, afi, safi, del,
5915 aggregate);
5916 }
5917 }
5918 bgp_unlock_node(child);
5919 }
5920
5921 /* Aggregate route attribute. */
5922 #define AGGREGATE_SUMMARY_ONLY 1
5923 #define AGGREGATE_AS_SET 1
5924
5925 static int bgp_aggregate_unset(struct vty *vty, const char *prefix_str,
5926 afi_t afi, safi_t safi)
5927 {
5928 VTY_DECLVAR_CONTEXT(bgp, bgp);
5929 int ret;
5930 struct prefix p;
5931 struct bgp_node *rn;
5932 struct bgp_aggregate *aggregate;
5933
5934 /* Convert string to prefix structure. */
5935 ret = str2prefix(prefix_str, &p);
5936 if (!ret) {
5937 vty_out(vty, "Malformed prefix\n");
5938 return CMD_WARNING_CONFIG_FAILED;
5939 }
5940 apply_mask(&p);
5941
5942 /* Old configuration check. */
5943 rn = bgp_node_lookup(bgp->aggregate[afi][safi], &p);
5944 if (!rn) {
5945 vty_out(vty,
5946 "%% There is no aggregate-address configuration.\n");
5947 return CMD_WARNING_CONFIG_FAILED;
5948 }
5949
5950 aggregate = bgp_aggregate_get_node_info(rn);
5951 bgp_aggregate_delete(bgp, &p, afi, safi, aggregate);
5952 bgp_aggregate_install(bgp, afi, safi, &p, 0, NULL, NULL,
5953 NULL, NULL, 0, aggregate);
5954
5955 /* Unlock aggregate address configuration. */
5956 bgp_aggregate_set_node_info(rn, NULL);
5957 bgp_aggregate_free(aggregate);
5958 bgp_unlock_node(rn);
5959 bgp_unlock_node(rn);
5960
5961 return CMD_SUCCESS;
5962 }
5963
5964 static int bgp_aggregate_set(struct vty *vty, const char *prefix_str, afi_t afi,
5965 safi_t safi, uint8_t summary_only, uint8_t as_set)
5966 {
5967 VTY_DECLVAR_CONTEXT(bgp, bgp);
5968 int ret;
5969 struct prefix p;
5970 struct bgp_node *rn;
5971 struct bgp_aggregate *aggregate;
5972
5973 /* Convert string to prefix structure. */
5974 ret = str2prefix(prefix_str, &p);
5975 if (!ret) {
5976 vty_out(vty, "Malformed prefix\n");
5977 return CMD_WARNING_CONFIG_FAILED;
5978 }
5979 apply_mask(&p);
5980
5981 if ((afi == AFI_IP && p.prefixlen == IPV4_MAX_BITLEN) ||
5982 (afi == AFI_IP6 && p.prefixlen == IPV6_MAX_BITLEN)) {
5983 vty_out(vty, "Specified prefix: %s will not result in any useful aggregation, disallowing\n",
5984 prefix_str);
5985 return CMD_WARNING_CONFIG_FAILED;
5986 }
5987
5988 /* Old configuration check. */
5989 rn = bgp_node_get(bgp->aggregate[afi][safi], &p);
5990
5991 if (rn->info) {
5992 vty_out(vty, "There is already same aggregate network.\n");
5993 /* try to remove the old entry */
5994 ret = bgp_aggregate_unset(vty, prefix_str, afi, safi);
5995 if (ret) {
5996 vty_out(vty, "Error deleting aggregate.\n");
5997 bgp_unlock_node(rn);
5998 return CMD_WARNING_CONFIG_FAILED;
5999 }
6000 }
6001
6002 /* Make aggregate address structure. */
6003 aggregate = bgp_aggregate_new();
6004 aggregate->summary_only = summary_only;
6005 aggregate->as_set = as_set;
6006 aggregate->safi = safi;
6007 bgp_aggregate_set_node_info(rn, aggregate);
6008
6009 /* Aggregate address insert into BGP routing table. */
6010 bgp_aggregate_route(bgp, &p, NULL, afi, safi, NULL, aggregate);
6011
6012 return CMD_SUCCESS;
6013 }
6014
6015 DEFUN (aggregate_address,
6016 aggregate_address_cmd,
6017 "aggregate-address A.B.C.D/M [<as-set [summary-only]|summary-only [as-set]>]",
6018 "Configure BGP aggregate entries\n"
6019 "Aggregate prefix\n"
6020 "Generate AS set path information\n"
6021 "Filter more specific routes from updates\n"
6022 "Filter more specific routes from updates\n"
6023 "Generate AS set path information\n")
6024 {
6025 int idx = 0;
6026 argv_find(argv, argc, "A.B.C.D/M", &idx);
6027 char *prefix = argv[idx]->arg;
6028 int as_set =
6029 argv_find(argv, argc, "as-set", &idx) ? AGGREGATE_AS_SET : 0;
6030 idx = 0;
6031 int summary_only = argv_find(argv, argc, "summary-only", &idx)
6032 ? AGGREGATE_SUMMARY_ONLY
6033 : 0;
6034
6035 return bgp_aggregate_set(vty, prefix, AFI_IP, bgp_node_safi(vty),
6036 summary_only, as_set);
6037 }
6038
6039 DEFUN (aggregate_address_mask,
6040 aggregate_address_mask_cmd,
6041 "aggregate-address A.B.C.D A.B.C.D [<as-set [summary-only]|summary-only [as-set]>]",
6042 "Configure BGP aggregate entries\n"
6043 "Aggregate address\n"
6044 "Aggregate mask\n"
6045 "Generate AS set path information\n"
6046 "Filter more specific routes from updates\n"
6047 "Filter more specific routes from updates\n"
6048 "Generate AS set path information\n")
6049 {
6050 int idx = 0;
6051 argv_find(argv, argc, "A.B.C.D", &idx);
6052 char *prefix = argv[idx]->arg;
6053 char *mask = argv[idx + 1]->arg;
6054 int as_set =
6055 argv_find(argv, argc, "as-set", &idx) ? AGGREGATE_AS_SET : 0;
6056 idx = 0;
6057 int summary_only = argv_find(argv, argc, "summary-only", &idx)
6058 ? AGGREGATE_SUMMARY_ONLY
6059 : 0;
6060
6061 char prefix_str[BUFSIZ];
6062 int ret = netmask_str2prefix_str(prefix, mask, prefix_str);
6063
6064 if (!ret) {
6065 vty_out(vty, "%% Inconsistent address and mask\n");
6066 return CMD_WARNING_CONFIG_FAILED;
6067 }
6068
6069 return bgp_aggregate_set(vty, prefix_str, AFI_IP, bgp_node_safi(vty),
6070 summary_only, as_set);
6071 }
6072
6073 DEFUN (no_aggregate_address,
6074 no_aggregate_address_cmd,
6075 "no aggregate-address A.B.C.D/M [<as-set [summary-only]|summary-only [as-set]>]",
6076 NO_STR
6077 "Configure BGP aggregate entries\n"
6078 "Aggregate prefix\n"
6079 "Generate AS set path information\n"
6080 "Filter more specific routes from updates\n"
6081 "Filter more specific routes from updates\n"
6082 "Generate AS set path information\n")
6083 {
6084 int idx = 0;
6085 argv_find(argv, argc, "A.B.C.D/M", &idx);
6086 char *prefix = argv[idx]->arg;
6087 return bgp_aggregate_unset(vty, prefix, AFI_IP, bgp_node_safi(vty));
6088 }
6089
6090 DEFUN (no_aggregate_address_mask,
6091 no_aggregate_address_mask_cmd,
6092 "no aggregate-address A.B.C.D A.B.C.D [<as-set [summary-only]|summary-only [as-set]>]",
6093 NO_STR
6094 "Configure BGP aggregate entries\n"
6095 "Aggregate address\n"
6096 "Aggregate mask\n"
6097 "Generate AS set path information\n"
6098 "Filter more specific routes from updates\n"
6099 "Filter more specific routes from updates\n"
6100 "Generate AS set path information\n")
6101 {
6102 int idx = 0;
6103 argv_find(argv, argc, "A.B.C.D", &idx);
6104 char *prefix = argv[idx]->arg;
6105 char *mask = argv[idx + 1]->arg;
6106
6107 char prefix_str[BUFSIZ];
6108 int ret = netmask_str2prefix_str(prefix, mask, prefix_str);
6109
6110 if (!ret) {
6111 vty_out(vty, "%% Inconsistent address and mask\n");
6112 return CMD_WARNING_CONFIG_FAILED;
6113 }
6114
6115 return bgp_aggregate_unset(vty, prefix_str, AFI_IP, bgp_node_safi(vty));
6116 }
6117
6118 DEFUN (ipv6_aggregate_address,
6119 ipv6_aggregate_address_cmd,
6120 "aggregate-address X:X::X:X/M [summary-only]",
6121 "Configure BGP aggregate entries\n"
6122 "Aggregate prefix\n"
6123 "Filter more specific routes from updates\n")
6124 {
6125 int idx = 0;
6126 argv_find(argv, argc, "X:X::X:X/M", &idx);
6127 char *prefix = argv[idx]->arg;
6128 int sum_only = argv_find(argv, argc, "summary-only", &idx)
6129 ? AGGREGATE_SUMMARY_ONLY
6130 : 0;
6131 return bgp_aggregate_set(vty, prefix, AFI_IP6, SAFI_UNICAST, sum_only,
6132 0);
6133 }
6134
6135 DEFUN (no_ipv6_aggregate_address,
6136 no_ipv6_aggregate_address_cmd,
6137 "no aggregate-address X:X::X:X/M [summary-only]",
6138 NO_STR
6139 "Configure BGP aggregate entries\n"
6140 "Aggregate prefix\n"
6141 "Filter more specific routes from updates\n")
6142 {
6143 int idx = 0;
6144 argv_find(argv, argc, "X:X::X:X/M", &idx);
6145 char *prefix = argv[idx]->arg;
6146 return bgp_aggregate_unset(vty, prefix, AFI_IP6, SAFI_UNICAST);
6147 }
6148
6149 /* Redistribute route treatment. */
6150 void bgp_redistribute_add(struct bgp *bgp, struct prefix *p,
6151 const union g_addr *nexthop, ifindex_t ifindex,
6152 enum nexthop_types_t nhtype, uint32_t metric,
6153 uint8_t type, unsigned short instance,
6154 route_tag_t tag)
6155 {
6156 struct bgp_path_info *new;
6157 struct bgp_path_info *bpi;
6158 struct bgp_path_info rmap_path;
6159 struct bgp_node *bn;
6160 struct attr attr;
6161 struct attr *new_attr;
6162 afi_t afi;
6163 int ret;
6164 struct bgp_redist *red;
6165
6166 /* Make default attribute. */
6167 bgp_attr_default_set(&attr, BGP_ORIGIN_INCOMPLETE);
6168
6169 switch (nhtype) {
6170 case NEXTHOP_TYPE_IFINDEX:
6171 break;
6172 case NEXTHOP_TYPE_IPV4:
6173 case NEXTHOP_TYPE_IPV4_IFINDEX:
6174 attr.nexthop = nexthop->ipv4;
6175 break;
6176 case NEXTHOP_TYPE_IPV6:
6177 case NEXTHOP_TYPE_IPV6_IFINDEX:
6178 attr.mp_nexthop_global = nexthop->ipv6;
6179 attr.mp_nexthop_len = BGP_ATTR_NHLEN_IPV6_GLOBAL;
6180 break;
6181 case NEXTHOP_TYPE_BLACKHOLE:
6182 switch (p->family) {
6183 case AF_INET:
6184 attr.nexthop.s_addr = INADDR_ANY;
6185 break;
6186 case AF_INET6:
6187 memset(&attr.mp_nexthop_global, 0,
6188 sizeof(attr.mp_nexthop_global));
6189 attr.mp_nexthop_len = BGP_ATTR_NHLEN_IPV6_GLOBAL;
6190 break;
6191 }
6192 break;
6193 }
6194 attr.nh_ifindex = ifindex;
6195
6196 attr.med = metric;
6197 attr.flag |= ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC);
6198 attr.tag = tag;
6199
6200 afi = family2afi(p->family);
6201
6202 red = bgp_redist_lookup(bgp, afi, type, instance);
6203 if (red) {
6204 struct attr attr_new;
6205
6206 /* Copy attribute for modification. */
6207 bgp_attr_dup(&attr_new, &attr);
6208
6209 if (red->redist_metric_flag)
6210 attr_new.med = red->redist_metric;
6211
6212 /* Apply route-map. */
6213 if (red->rmap.name) {
6214 memset(&rmap_path, 0, sizeof(struct bgp_path_info));
6215 rmap_path.peer = bgp->peer_self;
6216 rmap_path.attr = &attr_new;
6217
6218 SET_FLAG(bgp->peer_self->rmap_type,
6219 PEER_RMAP_TYPE_REDISTRIBUTE);
6220
6221 ret = route_map_apply(red->rmap.map, p, RMAP_BGP,
6222 &rmap_path);
6223
6224 bgp->peer_self->rmap_type = 0;
6225
6226 if (ret == RMAP_DENYMATCH) {
6227 /* Free uninterned attribute. */
6228 bgp_attr_flush(&attr_new);
6229
6230 /* Unintern original. */
6231 aspath_unintern(&attr.aspath);
6232 bgp_redistribute_delete(bgp, p, type, instance);
6233 return;
6234 }
6235 }
6236
6237 if (bgp_flag_check(bgp, BGP_FLAG_GRACEFUL_SHUTDOWN))
6238 bgp_attr_add_gshut_community(&attr_new);
6239
6240 bn = bgp_afi_node_get(bgp->rib[afi][SAFI_UNICAST], afi,
6241 SAFI_UNICAST, p, NULL);
6242
6243 new_attr = bgp_attr_intern(&attr_new);
6244
6245 for (bpi = bn->info; bpi; bpi = bpi->next)
6246 if (bpi->peer == bgp->peer_self
6247 && bpi->sub_type == BGP_ROUTE_REDISTRIBUTE)
6248 break;
6249
6250 if (bpi) {
6251 /* Ensure the (source route) type is updated. */
6252 bpi->type = type;
6253 if (attrhash_cmp(bpi->attr, new_attr)
6254 && !CHECK_FLAG(bpi->flags, BGP_PATH_REMOVED)) {
6255 bgp_attr_unintern(&new_attr);
6256 aspath_unintern(&attr.aspath);
6257 bgp_unlock_node(bn);
6258 return;
6259 } else {
6260 /* The attribute is changed. */
6261 bgp_path_info_set_flag(bn, bpi,
6262 BGP_PATH_ATTR_CHANGED);
6263
6264 /* Rewrite BGP route information. */
6265 if (CHECK_FLAG(bpi->flags, BGP_PATH_REMOVED))
6266 bgp_path_info_restore(bn, bpi);
6267 else
6268 bgp_aggregate_decrement(
6269 bgp, p, bpi, afi, SAFI_UNICAST);
6270 bgp_attr_unintern(&bpi->attr);
6271 bpi->attr = new_attr;
6272 bpi->uptime = bgp_clock();
6273
6274 /* Process change. */
6275 bgp_aggregate_increment(bgp, p, bpi, afi,
6276 SAFI_UNICAST);
6277 bgp_process(bgp, bn, afi, SAFI_UNICAST);
6278 bgp_unlock_node(bn);
6279 aspath_unintern(&attr.aspath);
6280
6281 if ((bgp->inst_type == BGP_INSTANCE_TYPE_VRF)
6282 || (bgp->inst_type
6283 == BGP_INSTANCE_TYPE_DEFAULT)) {
6284
6285 vpn_leak_from_vrf_update(
6286 bgp_get_default(), bgp, bpi);
6287 }
6288 return;
6289 }
6290 }
6291
6292 new = info_make(type, BGP_ROUTE_REDISTRIBUTE, instance,
6293 bgp->peer_self, new_attr, bn);
6294 SET_FLAG(new->flags, BGP_PATH_VALID);
6295
6296 bgp_aggregate_increment(bgp, p, new, afi, SAFI_UNICAST);
6297 bgp_path_info_add(bn, new);
6298 bgp_unlock_node(bn);
6299 bgp_process(bgp, bn, afi, SAFI_UNICAST);
6300
6301 if ((bgp->inst_type == BGP_INSTANCE_TYPE_VRF)
6302 || (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
6303
6304 vpn_leak_from_vrf_update(bgp_get_default(), bgp, new);
6305 }
6306 }
6307
6308 /* Unintern original. */
6309 aspath_unintern(&attr.aspath);
6310 }
6311
6312 void bgp_redistribute_delete(struct bgp *bgp, struct prefix *p, uint8_t type,
6313 unsigned short instance)
6314 {
6315 afi_t afi;
6316 struct bgp_node *rn;
6317 struct bgp_path_info *pi;
6318 struct bgp_redist *red;
6319
6320 afi = family2afi(p->family);
6321
6322 red = bgp_redist_lookup(bgp, afi, type, instance);
6323 if (red) {
6324 rn = bgp_afi_node_get(bgp->rib[afi][SAFI_UNICAST], afi,
6325 SAFI_UNICAST, p, NULL);
6326
6327 for (pi = rn->info; pi; pi = pi->next)
6328 if (pi->peer == bgp->peer_self && pi->type == type)
6329 break;
6330
6331 if (pi) {
6332 if ((bgp->inst_type == BGP_INSTANCE_TYPE_VRF)
6333 || (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
6334
6335 vpn_leak_from_vrf_withdraw(bgp_get_default(),
6336 bgp, pi);
6337 }
6338 bgp_aggregate_decrement(bgp, p, pi, afi, SAFI_UNICAST);
6339 bgp_path_info_delete(rn, pi);
6340 bgp_process(bgp, rn, afi, SAFI_UNICAST);
6341 }
6342 bgp_unlock_node(rn);
6343 }
6344 }
6345
6346 /* Withdraw specified route type's route. */
6347 void bgp_redistribute_withdraw(struct bgp *bgp, afi_t afi, int type,
6348 unsigned short instance)
6349 {
6350 struct bgp_node *rn;
6351 struct bgp_path_info *pi;
6352 struct bgp_table *table;
6353
6354 table = bgp->rib[afi][SAFI_UNICAST];
6355
6356 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn)) {
6357 for (pi = rn->info; pi; pi = pi->next)
6358 if (pi->peer == bgp->peer_self && pi->type == type
6359 && pi->instance == instance)
6360 break;
6361
6362 if (pi) {
6363 if ((bgp->inst_type == BGP_INSTANCE_TYPE_VRF)
6364 || (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
6365
6366 vpn_leak_from_vrf_withdraw(bgp_get_default(),
6367 bgp, pi);
6368 }
6369 bgp_aggregate_decrement(bgp, &rn->p, pi, afi,
6370 SAFI_UNICAST);
6371 bgp_path_info_delete(rn, pi);
6372 bgp_process(bgp, rn, afi, SAFI_UNICAST);
6373 }
6374 }
6375 }
6376
6377 /* Static function to display route. */
6378 static void route_vty_out_route(struct prefix *p, struct vty *vty,
6379 json_object *json)
6380 {
6381 int len = 0;
6382 char buf[BUFSIZ];
6383 char buf2[BUFSIZ];
6384
6385 if (p->family == AF_INET) {
6386 if (!json) {
6387 len = vty_out(
6388 vty, "%s/%d",
6389 inet_ntop(p->family, &p->u.prefix, buf, BUFSIZ),
6390 p->prefixlen);
6391 } else {
6392 json_object_string_add(json, "prefix",
6393 inet_ntop(p->family,
6394 &p->u.prefix, buf,
6395 BUFSIZ));
6396 json_object_int_add(json, "prefixLen", p->prefixlen);
6397 prefix2str(p, buf2, PREFIX_STRLEN);
6398 json_object_string_add(json, "network", buf2);
6399 }
6400 } else if (p->family == AF_ETHERNET) {
6401 prefix2str(p, buf, PREFIX_STRLEN);
6402 len = vty_out(vty, "%s", buf);
6403 } else if (p->family == AF_EVPN) {
6404 if (!json)
6405 len = vty_out(
6406 vty, "%s",
6407 bgp_evpn_route2str((struct prefix_evpn *)p, buf,
6408 BUFSIZ));
6409 else
6410 bgp_evpn_route2json((struct prefix_evpn *)p, json);
6411 } else if (p->family == AF_FLOWSPEC) {
6412 route_vty_out_flowspec(vty, p, NULL,
6413 json ?
6414 NLRI_STRING_FORMAT_JSON_SIMPLE :
6415 NLRI_STRING_FORMAT_MIN, json);
6416 } else {
6417 if (!json)
6418 len = vty_out(
6419 vty, "%s/%d",
6420 inet_ntop(p->family, &p->u.prefix, buf, BUFSIZ),
6421 p->prefixlen);
6422 else {
6423 json_object_string_add(json, "prefix",
6424 inet_ntop(p->family,
6425 &p->u.prefix, buf,
6426 BUFSIZ));
6427 json_object_int_add(json, "prefixLen", p->prefixlen);
6428 prefix2str(p, buf2, PREFIX_STRLEN);
6429 json_object_string_add(json, "network", buf2);
6430 }
6431 }
6432
6433 if (!json) {
6434 len = 17 - len;
6435 if (len < 1)
6436 vty_out(vty, "\n%*s", 20, " ");
6437 else
6438 vty_out(vty, "%*s", len, " ");
6439 }
6440 }
6441
6442 enum bgp_display_type {
6443 normal_list,
6444 };
6445
6446 /* Print the short form route status for a bgp_path_info */
6447 static void route_vty_short_status_out(struct vty *vty,
6448 struct bgp_path_info *path,
6449 json_object *json_path)
6450 {
6451 if (json_path) {
6452
6453 /* Route status display. */
6454 if (CHECK_FLAG(path->flags, BGP_PATH_REMOVED))
6455 json_object_boolean_true_add(json_path, "removed");
6456
6457 if (CHECK_FLAG(path->flags, BGP_PATH_STALE))
6458 json_object_boolean_true_add(json_path, "stale");
6459
6460 if (path->extra && path->extra->suppress)
6461 json_object_boolean_true_add(json_path, "suppressed");
6462
6463 if (CHECK_FLAG(path->flags, BGP_PATH_VALID)
6464 && !CHECK_FLAG(path->flags, BGP_PATH_HISTORY))
6465 json_object_boolean_true_add(json_path, "valid");
6466
6467 /* Selected */
6468 if (CHECK_FLAG(path->flags, BGP_PATH_HISTORY))
6469 json_object_boolean_true_add(json_path, "history");
6470
6471 if (CHECK_FLAG(path->flags, BGP_PATH_DAMPED))
6472 json_object_boolean_true_add(json_path, "damped");
6473
6474 if (CHECK_FLAG(path->flags, BGP_PATH_SELECTED))
6475 json_object_boolean_true_add(json_path, "bestpath");
6476
6477 if (CHECK_FLAG(path->flags, BGP_PATH_MULTIPATH))
6478 json_object_boolean_true_add(json_path, "multipath");
6479
6480 /* Internal route. */
6481 if ((path->peer->as)
6482 && (path->peer->as == path->peer->local_as))
6483 json_object_string_add(json_path, "pathFrom",
6484 "internal");
6485 else
6486 json_object_string_add(json_path, "pathFrom",
6487 "external");
6488
6489 return;
6490 }
6491
6492 /* Route status display. */
6493 if (CHECK_FLAG(path->flags, BGP_PATH_REMOVED))
6494 vty_out(vty, "R");
6495 else if (CHECK_FLAG(path->flags, BGP_PATH_STALE))
6496 vty_out(vty, "S");
6497 else if (path->extra && path->extra->suppress)
6498 vty_out(vty, "s");
6499 else if (CHECK_FLAG(path->flags, BGP_PATH_VALID)
6500 && !CHECK_FLAG(path->flags, BGP_PATH_HISTORY))
6501 vty_out(vty, "*");
6502 else
6503 vty_out(vty, " ");
6504
6505 /* Selected */
6506 if (CHECK_FLAG(path->flags, BGP_PATH_HISTORY))
6507 vty_out(vty, "h");
6508 else if (CHECK_FLAG(path->flags, BGP_PATH_DAMPED))
6509 vty_out(vty, "d");
6510 else if (CHECK_FLAG(path->flags, BGP_PATH_SELECTED))
6511 vty_out(vty, ">");
6512 else if (CHECK_FLAG(path->flags, BGP_PATH_MULTIPATH))
6513 vty_out(vty, "=");
6514 else
6515 vty_out(vty, " ");
6516
6517 /* Internal route. */
6518 if (path->peer && (path->peer->as)
6519 && (path->peer->as == path->peer->local_as))
6520 vty_out(vty, "i");
6521 else
6522 vty_out(vty, " ");
6523 }
6524
6525 /* called from terminal list command */
6526 void route_vty_out(struct vty *vty, struct prefix *p,
6527 struct bgp_path_info *path, int display, safi_t safi,
6528 json_object *json_paths)
6529 {
6530 struct attr *attr;
6531 json_object *json_path = NULL;
6532 json_object *json_nexthops = NULL;
6533 json_object *json_nexthop_global = NULL;
6534 json_object *json_nexthop_ll = NULL;
6535 char vrf_id_str[VRF_NAMSIZ] = {0};
6536 bool nexthop_self =
6537 CHECK_FLAG(path->flags, BGP_PATH_ANNC_NH_SELF) ? true : false;
6538 bool nexthop_othervrf = false;
6539 vrf_id_t nexthop_vrfid = VRF_DEFAULT;
6540 const char *nexthop_vrfname = "Default";
6541
6542 if (json_paths)
6543 json_path = json_object_new_object();
6544
6545 /* short status lead text */
6546 route_vty_short_status_out(vty, path, json_path);
6547
6548 if (!json_paths) {
6549 /* print prefix and mask */
6550 if (!display)
6551 route_vty_out_route(p, vty, json_path);
6552 else
6553 vty_out(vty, "%*s", 17, " ");
6554 } else {
6555 route_vty_out_route(p, vty, json_path);
6556 }
6557
6558 /* Print attribute */
6559 attr = path->attr;
6560 if (!attr) {
6561 if (json_paths)
6562 json_object_array_add(json_paths, json_path);
6563 else
6564 vty_out(vty, "\n");
6565
6566 return;
6567 }
6568
6569 /*
6570 * If vrf id of nexthop is different from that of prefix,
6571 * set up printable string to append
6572 */
6573 if (path->extra && path->extra->bgp_orig) {
6574 const char *self = "";
6575
6576 if (nexthop_self)
6577 self = "<";
6578
6579 nexthop_othervrf = true;
6580 nexthop_vrfid = path->extra->bgp_orig->vrf_id;
6581
6582 if (path->extra->bgp_orig->vrf_id == VRF_UNKNOWN)
6583 snprintf(vrf_id_str, sizeof(vrf_id_str),
6584 "@%s%s", VRFID_NONE_STR, self);
6585 else
6586 snprintf(vrf_id_str, sizeof(vrf_id_str), "@%u%s",
6587 path->extra->bgp_orig->vrf_id, self);
6588
6589 if (path->extra->bgp_orig->inst_type
6590 != BGP_INSTANCE_TYPE_DEFAULT)
6591
6592 nexthop_vrfname = path->extra->bgp_orig->name;
6593 } else {
6594 const char *self = "";
6595
6596 if (nexthop_self)
6597 self = "<";
6598
6599 snprintf(vrf_id_str, sizeof(vrf_id_str), "%s", self);
6600 }
6601
6602 /*
6603 * For ENCAP and EVPN routes, nexthop address family is not
6604 * neccessarily the same as the prefix address family.
6605 * Both SAFI_MPLS_VPN and SAFI_ENCAP use the MP nexthop field
6606 * EVPN routes are also exchanged with a MP nexthop. Currently,
6607 * this
6608 * is only IPv4, the value will be present in either
6609 * attr->nexthop or
6610 * attr->mp_nexthop_global_in
6611 */
6612 if ((safi == SAFI_ENCAP) || (safi == SAFI_MPLS_VPN)) {
6613 char buf[BUFSIZ];
6614 char nexthop[128];
6615 int af = NEXTHOP_FAMILY(attr->mp_nexthop_len);
6616
6617 switch (af) {
6618 case AF_INET:
6619 sprintf(nexthop, "%s",
6620 inet_ntop(af, &attr->mp_nexthop_global_in, buf,
6621 BUFSIZ));
6622 break;
6623 case AF_INET6:
6624 sprintf(nexthop, "%s",
6625 inet_ntop(af, &attr->mp_nexthop_global, buf,
6626 BUFSIZ));
6627 break;
6628 default:
6629 sprintf(nexthop, "?");
6630 break;
6631 }
6632
6633 if (json_paths) {
6634 json_nexthop_global = json_object_new_object();
6635
6636 json_object_string_add(json_nexthop_global, "afi",
6637 (af == AF_INET) ? "ip" : "ipv6");
6638 json_object_string_add(json_nexthop_global,
6639 (af == AF_INET) ? "ip" : "ipv6",
6640 nexthop);
6641 json_object_boolean_true_add(json_nexthop_global,
6642 "used");
6643 } else
6644 vty_out(vty, "%s%s", nexthop, vrf_id_str);
6645 } else if (safi == SAFI_EVPN) {
6646 if (json_paths) {
6647 json_nexthop_global = json_object_new_object();
6648
6649 json_object_string_add(json_nexthop_global, "ip",
6650 inet_ntoa(attr->nexthop));
6651 json_object_string_add(json_nexthop_global, "afi",
6652 "ipv4");
6653 json_object_boolean_true_add(json_nexthop_global,
6654 "used");
6655 } else
6656 vty_out(vty, "%-16s%s", inet_ntoa(attr->nexthop),
6657 vrf_id_str);
6658 } else if (safi == SAFI_FLOWSPEC) {
6659 if (attr->nexthop.s_addr != 0) {
6660 if (json_paths) {
6661 json_nexthop_global = json_object_new_object();
6662 json_object_string_add(
6663 json_nexthop_global, "ip",
6664 inet_ntoa(attr->nexthop));
6665 json_object_string_add(json_nexthop_global,
6666 "afi", "ipv4");
6667 json_object_boolean_true_add(json_nexthop_global,
6668 "used");
6669 } else {
6670 vty_out(vty, "%-16s", inet_ntoa(attr->nexthop));
6671 }
6672 }
6673 } else if (p->family == AF_INET && !BGP_ATTR_NEXTHOP_AFI_IP6(attr)) {
6674 if (json_paths) {
6675 json_nexthop_global = json_object_new_object();
6676
6677 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_EVPN))
6678 json_object_string_add(
6679 json_nexthop_global, "ip",
6680 inet_ntoa(attr->mp_nexthop_global_in));
6681 else
6682 json_object_string_add(
6683 json_nexthop_global, "ip",
6684 inet_ntoa(attr->nexthop));
6685
6686 json_object_string_add(json_nexthop_global, "afi",
6687 "ipv4");
6688 json_object_boolean_true_add(json_nexthop_global,
6689 "used");
6690 } else {
6691 char buf[BUFSIZ];
6692
6693 snprintf(buf, sizeof(buf), "%s%s",
6694 inet_ntoa(attr->nexthop), vrf_id_str);
6695 vty_out(vty, "%-16s", buf);
6696 }
6697 }
6698
6699 /* IPv6 Next Hop */
6700 else if (p->family == AF_INET6 || BGP_ATTR_NEXTHOP_AFI_IP6(attr)) {
6701 int len;
6702 char buf[BUFSIZ];
6703
6704 if (json_paths) {
6705 json_nexthop_global = json_object_new_object();
6706 json_object_string_add(
6707 json_nexthop_global, "ip",
6708 inet_ntop(AF_INET6, &attr->mp_nexthop_global,
6709 buf, BUFSIZ));
6710 json_object_string_add(json_nexthop_global, "afi",
6711 "ipv6");
6712 json_object_string_add(json_nexthop_global, "scope",
6713 "global");
6714
6715 /* We display both LL & GL if both have been
6716 * received */
6717 if ((attr->mp_nexthop_len == 32)
6718 || (path->peer->conf_if)) {
6719 json_nexthop_ll = json_object_new_object();
6720 json_object_string_add(
6721 json_nexthop_ll, "ip",
6722 inet_ntop(AF_INET6,
6723 &attr->mp_nexthop_local, buf,
6724 BUFSIZ));
6725 json_object_string_add(json_nexthop_ll, "afi",
6726 "ipv6");
6727 json_object_string_add(json_nexthop_ll, "scope",
6728 "link-local");
6729
6730 if ((IPV6_ADDR_CMP(&attr->mp_nexthop_global,
6731 &attr->mp_nexthop_local)
6732 != 0)
6733 && !attr->mp_nexthop_prefer_global)
6734 json_object_boolean_true_add(
6735 json_nexthop_ll, "used");
6736 else
6737 json_object_boolean_true_add(
6738 json_nexthop_global, "used");
6739 } else
6740 json_object_boolean_true_add(
6741 json_nexthop_global, "used");
6742 } else {
6743 /* Display LL if LL/Global both in table unless
6744 * prefer-global is set */
6745 if (((attr->mp_nexthop_len == 32)
6746 && !attr->mp_nexthop_prefer_global)
6747 || (path->peer->conf_if)) {
6748 if (path->peer->conf_if) {
6749 len = vty_out(vty, "%s",
6750 path->peer->conf_if);
6751 len = 16 - len; /* len of IPv6
6752 addr + max
6753 len of def
6754 ifname */
6755
6756 if (len < 1)
6757 vty_out(vty, "\n%*s", 36, " ");
6758 else
6759 vty_out(vty, "%*s", len, " ");
6760 } else {
6761 len = vty_out(
6762 vty, "%s%s",
6763 inet_ntop(
6764 AF_INET6,
6765 &attr->mp_nexthop_local,
6766 buf, BUFSIZ),
6767 vrf_id_str);
6768 len = 16 - len;
6769
6770 if (len < 1)
6771 vty_out(vty, "\n%*s", 36, " ");
6772 else
6773 vty_out(vty, "%*s", len, " ");
6774 }
6775 } else {
6776 len = vty_out(
6777 vty, "%s%s",
6778 inet_ntop(AF_INET6,
6779 &attr->mp_nexthop_global, buf,
6780 BUFSIZ),
6781 vrf_id_str);
6782 len = 16 - len;
6783
6784 if (len < 1)
6785 vty_out(vty, "\n%*s", 36, " ");
6786 else
6787 vty_out(vty, "%*s", len, " ");
6788 }
6789 }
6790 }
6791
6792 /* MED/Metric */
6793 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC))
6794 if (json_paths)
6795 json_object_int_add(json_path, "med", attr->med);
6796 else
6797 vty_out(vty, "%10u", attr->med);
6798 else if (!json_paths)
6799 vty_out(vty, " ");
6800
6801 /* Local Pref */
6802 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF))
6803 if (json_paths)
6804 json_object_int_add(json_path, "localpref",
6805 attr->local_pref);
6806 else
6807 vty_out(vty, "%7u", attr->local_pref);
6808 else if (!json_paths)
6809 vty_out(vty, " ");
6810
6811 if (json_paths)
6812 json_object_int_add(json_path, "weight", attr->weight);
6813 else
6814 vty_out(vty, "%7u ", attr->weight);
6815
6816 if (json_paths) {
6817 char buf[BUFSIZ];
6818 json_object_string_add(
6819 json_path, "peerId",
6820 sockunion2str(&path->peer->su, buf, SU_ADDRSTRLEN));
6821 }
6822
6823 /* Print aspath */
6824 if (attr->aspath) {
6825 if (json_paths)
6826 json_object_string_add(json_path, "aspath",
6827 attr->aspath->str);
6828 else
6829 aspath_print_vty(vty, "%s", attr->aspath, " ");
6830 }
6831
6832 /* Print origin */
6833 if (json_paths)
6834 json_object_string_add(json_path, "origin",
6835 bgp_origin_long_str[attr->origin]);
6836 else
6837 vty_out(vty, "%s", bgp_origin_str[attr->origin]);
6838
6839 if (json_paths) {
6840 if (nexthop_self)
6841 json_object_boolean_true_add(json_path,
6842 "announceNexthopSelf");
6843 if (nexthop_othervrf) {
6844 json_object_string_add(json_path, "nhVrfName",
6845 nexthop_vrfname);
6846
6847 json_object_int_add(json_path, "nhVrfId",
6848 ((nexthop_vrfid == VRF_UNKNOWN)
6849 ? -1
6850 : (int)nexthop_vrfid));
6851 }
6852 }
6853
6854 if (json_paths) {
6855 if (json_nexthop_global || json_nexthop_ll) {
6856 json_nexthops = json_object_new_array();
6857
6858 if (json_nexthop_global)
6859 json_object_array_add(json_nexthops,
6860 json_nexthop_global);
6861
6862 if (json_nexthop_ll)
6863 json_object_array_add(json_nexthops,
6864 json_nexthop_ll);
6865
6866 json_object_object_add(json_path, "nexthops",
6867 json_nexthops);
6868 }
6869
6870 json_object_array_add(json_paths, json_path);
6871 } else {
6872 vty_out(vty, "\n");
6873 #if ENABLE_BGP_VNC
6874 /* prints an additional line, indented, with VNC info, if
6875 * present */
6876 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_ENCAP))
6877 rfapi_vty_out_vncinfo(vty, p, path, safi);
6878 #endif
6879 }
6880 }
6881
6882 /* called from terminal list command */
6883 void route_vty_out_tmp(struct vty *vty, struct prefix *p, struct attr *attr,
6884 safi_t safi, bool use_json, json_object *json_ar)
6885 {
6886 json_object *json_status = NULL;
6887 json_object *json_net = NULL;
6888 char buff[BUFSIZ];
6889 char buf2[BUFSIZ];
6890 /* Route status display. */
6891 if (use_json) {
6892 json_status = json_object_new_object();
6893 json_net = json_object_new_object();
6894 } else {
6895 vty_out(vty, "*");
6896 vty_out(vty, ">");
6897 vty_out(vty, " ");
6898 }
6899
6900 /* print prefix and mask */
6901 if (use_json) {
6902 json_object_string_add(
6903 json_net, "addrPrefix",
6904 inet_ntop(p->family, &p->u.prefix, buff, BUFSIZ));
6905 json_object_int_add(json_net, "prefixLen", p->prefixlen);
6906 prefix2str(p, buf2, PREFIX_STRLEN);
6907 json_object_string_add(json_net, "network", buf2);
6908 } else
6909 route_vty_out_route(p, vty, NULL);
6910
6911 /* Print attribute */
6912 if (attr) {
6913 if (use_json) {
6914 if (p->family == AF_INET
6915 && (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
6916 || safi == SAFI_EVPN
6917 || !BGP_ATTR_NEXTHOP_AFI_IP6(attr))) {
6918 if (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
6919 || safi == SAFI_EVPN)
6920 json_object_string_add(
6921 json_net, "nextHop",
6922 inet_ntoa(
6923 attr->mp_nexthop_global_in));
6924 else
6925 json_object_string_add(
6926 json_net, "nextHop",
6927 inet_ntoa(attr->nexthop));
6928 } else if (p->family == AF_INET6
6929 || BGP_ATTR_NEXTHOP_AFI_IP6(attr)) {
6930 char buf[BUFSIZ];
6931
6932 json_object_string_add(
6933 json_net, "nextHopGlobal",
6934 inet_ntop(AF_INET6,
6935 &attr->mp_nexthop_global, buf,
6936 BUFSIZ));
6937 }
6938
6939 if (attr->flag
6940 & ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC))
6941 json_object_int_add(json_net, "metric",
6942 attr->med);
6943
6944 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF))
6945 json_object_int_add(json_net, "localPref",
6946 attr->local_pref);
6947
6948 json_object_int_add(json_net, "weight", attr->weight);
6949
6950 /* Print aspath */
6951 if (attr->aspath)
6952 json_object_string_add(json_net, "asPath",
6953 attr->aspath->str);
6954
6955 /* Print origin */
6956 json_object_string_add(json_net, "bgpOriginCode",
6957 bgp_origin_str[attr->origin]);
6958 } else {
6959 if (p->family == AF_INET
6960 && (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
6961 || safi == SAFI_EVPN
6962 || !BGP_ATTR_NEXTHOP_AFI_IP6(attr))) {
6963 if (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
6964 || safi == SAFI_EVPN)
6965 vty_out(vty, "%-16s",
6966 inet_ntoa(
6967 attr->mp_nexthop_global_in));
6968 else
6969 vty_out(vty, "%-16s",
6970 inet_ntoa(attr->nexthop));
6971 } else if (p->family == AF_INET6
6972 || BGP_ATTR_NEXTHOP_AFI_IP6(attr)) {
6973 int len;
6974 char buf[BUFSIZ];
6975
6976 len = vty_out(
6977 vty, "%s",
6978 inet_ntop(AF_INET6,
6979 &attr->mp_nexthop_global, buf,
6980 BUFSIZ));
6981 len = 16 - len;
6982 if (len < 1)
6983 vty_out(vty, "\n%*s", 36, " ");
6984 else
6985 vty_out(vty, "%*s", len, " ");
6986 }
6987 if (attr->flag
6988 & ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC))
6989 vty_out(vty, "%10u", attr->med);
6990 else
6991 vty_out(vty, " ");
6992
6993 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF))
6994 vty_out(vty, "%7u", attr->local_pref);
6995 else
6996 vty_out(vty, " ");
6997
6998 vty_out(vty, "%7u ", attr->weight);
6999
7000 /* Print aspath */
7001 if (attr->aspath)
7002 aspath_print_vty(vty, "%s", attr->aspath, " ");
7003
7004 /* Print origin */
7005 vty_out(vty, "%s", bgp_origin_str[attr->origin]);
7006 }
7007 }
7008 if (use_json) {
7009 json_object_boolean_true_add(json_status, "*");
7010 json_object_boolean_true_add(json_status, ">");
7011 json_object_object_add(json_net, "appliedStatusSymbols",
7012 json_status);
7013 char buf_cut[BUFSIZ];
7014 json_object_object_add(
7015 json_ar,
7016 inet_ntop(p->family, &p->u.prefix, buf_cut, BUFSIZ),
7017 json_net);
7018 } else
7019 vty_out(vty, "\n");
7020 }
7021
7022 void route_vty_out_tag(struct vty *vty, struct prefix *p,
7023 struct bgp_path_info *path, int display, safi_t safi,
7024 json_object *json)
7025 {
7026 json_object *json_out = NULL;
7027 struct attr *attr;
7028 mpls_label_t label = MPLS_INVALID_LABEL;
7029
7030 if (!path->extra)
7031 return;
7032
7033 if (json)
7034 json_out = json_object_new_object();
7035
7036 /* short status lead text */
7037 route_vty_short_status_out(vty, path, json_out);
7038
7039 /* print prefix and mask */
7040 if (json == NULL) {
7041 if (!display)
7042 route_vty_out_route(p, vty, NULL);
7043 else
7044 vty_out(vty, "%*s", 17, " ");
7045 }
7046
7047 /* Print attribute */
7048 attr = path->attr;
7049 if (attr) {
7050 if (((p->family == AF_INET)
7051 && ((safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP)))
7052 || (safi == SAFI_EVPN && !BGP_ATTR_NEXTHOP_AFI_IP6(attr))
7053 || (!BGP_ATTR_NEXTHOP_AFI_IP6(attr))) {
7054 if (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
7055 || safi == SAFI_EVPN) {
7056 if (json)
7057 json_object_string_add(
7058 json_out, "mpNexthopGlobalIn",
7059 inet_ntoa(
7060 attr->mp_nexthop_global_in));
7061 else
7062 vty_out(vty, "%-16s",
7063 inet_ntoa(
7064 attr->mp_nexthop_global_in));
7065 } else {
7066 if (json)
7067 json_object_string_add(
7068 json_out, "nexthop",
7069 inet_ntoa(attr->nexthop));
7070 else
7071 vty_out(vty, "%-16s",
7072 inet_ntoa(attr->nexthop));
7073 }
7074 } else if (((p->family == AF_INET6)
7075 && ((safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP)))
7076 || (safi == SAFI_EVPN
7077 && BGP_ATTR_NEXTHOP_AFI_IP6(attr))
7078 || (BGP_ATTR_NEXTHOP_AFI_IP6(attr))) {
7079 char buf_a[512];
7080 char buf_b[512];
7081 char buf_c[BUFSIZ];
7082 if (attr->mp_nexthop_len
7083 == BGP_ATTR_NHLEN_IPV6_GLOBAL) {
7084 if (json)
7085 json_object_string_add(
7086 json_out, "mpNexthopGlobalIn",
7087 inet_ntop(
7088 AF_INET6,
7089 &attr->mp_nexthop_global,
7090 buf_a, sizeof(buf_a)));
7091 else
7092 vty_out(vty, "%s",
7093 inet_ntop(
7094 AF_INET6,
7095 &attr->mp_nexthop_global,
7096 buf_a, sizeof(buf_a)));
7097 } else if (attr->mp_nexthop_len
7098 == BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL) {
7099 if (json) {
7100 inet_ntop(AF_INET6,
7101 &attr->mp_nexthop_global,
7102 buf_a, sizeof(buf_a));
7103 inet_ntop(AF_INET6,
7104 &attr->mp_nexthop_local,
7105 buf_b, sizeof(buf_b));
7106 sprintf(buf_c, "%s(%s)", buf_a, buf_b);
7107 json_object_string_add(
7108 json_out,
7109 "mpNexthopGlobalLocal", buf_c);
7110 } else
7111 vty_out(vty, "%s(%s)",
7112 inet_ntop(
7113 AF_INET6,
7114 &attr->mp_nexthop_global,
7115 buf_a, sizeof(buf_a)),
7116 inet_ntop(
7117 AF_INET6,
7118 &attr->mp_nexthop_local,
7119 buf_b, sizeof(buf_b)));
7120 }
7121 }
7122 }
7123
7124 label = decode_label(&path->extra->label[0]);
7125
7126 if (bgp_is_valid_label(&label)) {
7127 if (json) {
7128 json_object_int_add(json_out, "notag", label);
7129 json_object_array_add(json, json_out);
7130 } else {
7131 vty_out(vty, "notag/%d", label);
7132 vty_out(vty, "\n");
7133 }
7134 }
7135 }
7136
7137 void route_vty_out_overlay(struct vty *vty, struct prefix *p,
7138 struct bgp_path_info *path, int display,
7139 json_object *json_paths)
7140 {
7141 struct attr *attr;
7142 char buf[BUFSIZ];
7143 json_object *json_path = NULL;
7144
7145 if (json_paths)
7146 json_path = json_object_new_object();
7147
7148 if (!path->extra)
7149 return;
7150
7151 /* short status lead text */
7152 route_vty_short_status_out(vty, path, json_path);
7153
7154 /* print prefix and mask */
7155 if (!display)
7156 route_vty_out_route(p, vty, NULL);
7157 else
7158 vty_out(vty, "%*s", 17, " ");
7159
7160 /* Print attribute */
7161 attr = path->attr;
7162 if (attr) {
7163 char buf1[BUFSIZ];
7164 int af = NEXTHOP_FAMILY(attr->mp_nexthop_len);
7165
7166 switch (af) {
7167 case AF_INET:
7168 vty_out(vty, "%-16s",
7169 inet_ntop(af, &attr->mp_nexthop_global_in, buf,
7170 BUFSIZ));
7171 break;
7172 case AF_INET6:
7173 vty_out(vty, "%s(%s)",
7174 inet_ntop(af, &attr->mp_nexthop_global, buf,
7175 BUFSIZ),
7176 inet_ntop(af, &attr->mp_nexthop_local, buf1,
7177 BUFSIZ));
7178 break;
7179 default:
7180 vty_out(vty, "?");
7181 }
7182
7183 char *str = esi2str(&(attr->evpn_overlay.eth_s_id));
7184
7185 vty_out(vty, "%s", str);
7186 XFREE(MTYPE_TMP, str);
7187
7188 if (is_evpn_prefix_ipaddr_v4((struct prefix_evpn *)p)) {
7189 vty_out(vty, "/%s",
7190 inet_ntoa(attr->evpn_overlay.gw_ip.ipv4));
7191 } else if (is_evpn_prefix_ipaddr_v6((struct prefix_evpn *)p)) {
7192 vty_out(vty, "/%s",
7193 inet_ntop(AF_INET6,
7194 &(attr->evpn_overlay.gw_ip.ipv6), buf,
7195 BUFSIZ));
7196 }
7197 if (attr->ecommunity) {
7198 char *mac = NULL;
7199 struct ecommunity_val *routermac = ecommunity_lookup(
7200 attr->ecommunity, ECOMMUNITY_ENCODE_EVPN,
7201 ECOMMUNITY_EVPN_SUBTYPE_ROUTERMAC);
7202 if (routermac)
7203 mac = ecom_mac2str((char *)routermac->val);
7204 if (mac) {
7205 vty_out(vty, "/%s", (char *)mac);
7206 XFREE(MTYPE_TMP, mac);
7207 }
7208 }
7209 vty_out(vty, "\n");
7210 }
7211
7212 }
7213
7214 /* dampening route */
7215 static void damp_route_vty_out(struct vty *vty, struct prefix *p,
7216 struct bgp_path_info *path, int display,
7217 safi_t safi, bool use_json, json_object *json)
7218 {
7219 struct attr *attr;
7220 int len;
7221 char timebuf[BGP_UPTIME_LEN];
7222
7223 /* short status lead text */
7224 route_vty_short_status_out(vty, path, json);
7225
7226 /* print prefix and mask */
7227 if (!use_json) {
7228 if (!display)
7229 route_vty_out_route(p, vty, NULL);
7230 else
7231 vty_out(vty, "%*s", 17, " ");
7232 }
7233
7234 len = vty_out(vty, "%s", path->peer->host);
7235 len = 17 - len;
7236 if (len < 1) {
7237 if (!use_json)
7238 vty_out(vty, "\n%*s", 34, " ");
7239 } else {
7240 if (use_json)
7241 json_object_int_add(json, "peerHost", len);
7242 else
7243 vty_out(vty, "%*s", len, " ");
7244 }
7245
7246 if (use_json)
7247 bgp_damp_reuse_time_vty(vty, path, timebuf, BGP_UPTIME_LEN,
7248 use_json, json);
7249 else
7250 vty_out(vty, "%s ",
7251 bgp_damp_reuse_time_vty(vty, path, timebuf,
7252 BGP_UPTIME_LEN, use_json,
7253 json));
7254
7255 /* Print attribute */
7256 attr = path->attr;
7257 if (attr) {
7258 /* Print aspath */
7259 if (attr->aspath) {
7260 if (use_json)
7261 json_object_string_add(json, "asPath",
7262 attr->aspath->str);
7263 else
7264 aspath_print_vty(vty, "%s", attr->aspath, " ");
7265 }
7266
7267 /* Print origin */
7268 if (use_json)
7269 json_object_string_add(json, "origin",
7270 bgp_origin_str[attr->origin]);
7271 else
7272 vty_out(vty, "%s", bgp_origin_str[attr->origin]);
7273 }
7274 if (!use_json)
7275 vty_out(vty, "\n");
7276 }
7277
7278 /* flap route */
7279 static void flap_route_vty_out(struct vty *vty, struct prefix *p,
7280 struct bgp_path_info *path, int display,
7281 safi_t safi, bool use_json, json_object *json)
7282 {
7283 struct attr *attr;
7284 struct bgp_damp_info *bdi;
7285 char timebuf[BGP_UPTIME_LEN];
7286 int len;
7287
7288 if (!path->extra)
7289 return;
7290
7291 bdi = path->extra->damp_info;
7292
7293 /* short status lead text */
7294 route_vty_short_status_out(vty, path, json);
7295
7296 /* print prefix and mask */
7297 if (!use_json) {
7298 if (!display)
7299 route_vty_out_route(p, vty, NULL);
7300 else
7301 vty_out(vty, "%*s", 17, " ");
7302 }
7303
7304 len = vty_out(vty, "%s", path->peer->host);
7305 len = 16 - len;
7306 if (len < 1) {
7307 if (!use_json)
7308 vty_out(vty, "\n%*s", 33, " ");
7309 } else {
7310 if (use_json)
7311 json_object_int_add(json, "peerHost", len);
7312 else
7313 vty_out(vty, "%*s", len, " ");
7314 }
7315
7316 len = vty_out(vty, "%d", bdi->flap);
7317 len = 5 - len;
7318 if (len < 1) {
7319 if (!use_json)
7320 vty_out(vty, " ");
7321 } else {
7322 if (use_json)
7323 json_object_int_add(json, "bdiFlap", len);
7324 else
7325 vty_out(vty, "%*s", len, " ");
7326 }
7327
7328 if (use_json)
7329 peer_uptime(bdi->start_time, timebuf, BGP_UPTIME_LEN, use_json,
7330 json);
7331 else
7332 vty_out(vty, "%s ", peer_uptime(bdi->start_time, timebuf,
7333 BGP_UPTIME_LEN, 0, NULL));
7334
7335 if (CHECK_FLAG(path->flags, BGP_PATH_DAMPED)
7336 && !CHECK_FLAG(path->flags, BGP_PATH_HISTORY)) {
7337 if (use_json)
7338 bgp_damp_reuse_time_vty(vty, path, timebuf,
7339 BGP_UPTIME_LEN, use_json, json);
7340 else
7341 vty_out(vty, "%s ",
7342 bgp_damp_reuse_time_vty(vty, path, timebuf,
7343 BGP_UPTIME_LEN,
7344 use_json, json));
7345 } else {
7346 if (!use_json)
7347 vty_out(vty, "%*s ", 8, " ");
7348 }
7349
7350 /* Print attribute */
7351 attr = path->attr;
7352 if (attr) {
7353 /* Print aspath */
7354 if (attr->aspath) {
7355 if (use_json)
7356 json_object_string_add(json, "asPath",
7357 attr->aspath->str);
7358 else
7359 aspath_print_vty(vty, "%s", attr->aspath, " ");
7360 }
7361
7362 /* Print origin */
7363 if (use_json)
7364 json_object_string_add(json, "origin",
7365 bgp_origin_str[attr->origin]);
7366 else
7367 vty_out(vty, "%s", bgp_origin_str[attr->origin]);
7368 }
7369 if (!use_json)
7370 vty_out(vty, "\n");
7371 }
7372
7373 static void route_vty_out_advertised_to(struct vty *vty, struct peer *peer,
7374 int *first, const char *header,
7375 json_object *json_adv_to)
7376 {
7377 char buf1[INET6_ADDRSTRLEN];
7378 json_object *json_peer = NULL;
7379
7380 if (json_adv_to) {
7381 /* 'advertised-to' is a dictionary of peers we have advertised
7382 * this
7383 * prefix too. The key is the peer's IP or swpX, the value is
7384 * the
7385 * hostname if we know it and "" if not.
7386 */
7387 json_peer = json_object_new_object();
7388
7389 if (peer->hostname)
7390 json_object_string_add(json_peer, "hostname",
7391 peer->hostname);
7392
7393 if (peer->conf_if)
7394 json_object_object_add(json_adv_to, peer->conf_if,
7395 json_peer);
7396 else
7397 json_object_object_add(
7398 json_adv_to,
7399 sockunion2str(&peer->su, buf1, SU_ADDRSTRLEN),
7400 json_peer);
7401 } else {
7402 if (*first) {
7403 vty_out(vty, "%s", header);
7404 *first = 0;
7405 }
7406
7407 if (peer->hostname
7408 && bgp_flag_check(peer->bgp, BGP_FLAG_SHOW_HOSTNAME)) {
7409 if (peer->conf_if)
7410 vty_out(vty, " %s(%s)", peer->hostname,
7411 peer->conf_if);
7412 else
7413 vty_out(vty, " %s(%s)", peer->hostname,
7414 sockunion2str(&peer->su, buf1,
7415 SU_ADDRSTRLEN));
7416 } else {
7417 if (peer->conf_if)
7418 vty_out(vty, " %s", peer->conf_if);
7419 else
7420 vty_out(vty, " %s",
7421 sockunion2str(&peer->su, buf1,
7422 SU_ADDRSTRLEN));
7423 }
7424 }
7425 }
7426
7427 void route_vty_out_detail(struct vty *vty, struct bgp *bgp, struct prefix *p,
7428 struct bgp_path_info *path, afi_t afi, safi_t safi,
7429 json_object *json_paths)
7430 {
7431 char buf[INET6_ADDRSTRLEN];
7432 char buf1[BUFSIZ];
7433 char buf2[EVPN_ROUTE_STRLEN];
7434 struct attr *attr;
7435 int sockunion_vty_out(struct vty *, union sockunion *);
7436 time_t tbuf;
7437 json_object *json_bestpath = NULL;
7438 json_object *json_cluster_list = NULL;
7439 json_object *json_cluster_list_list = NULL;
7440 json_object *json_ext_community = NULL;
7441 json_object *json_last_update = NULL;
7442 json_object *json_pmsi = NULL;
7443 json_object *json_nexthop_global = NULL;
7444 json_object *json_nexthop_ll = NULL;
7445 json_object *json_nexthops = NULL;
7446 json_object *json_path = NULL;
7447 json_object *json_peer = NULL;
7448 json_object *json_string = NULL;
7449 json_object *json_adv_to = NULL;
7450 int first = 0;
7451 struct listnode *node, *nnode;
7452 struct peer *peer;
7453 int addpath_capable;
7454 int has_adj;
7455 unsigned int first_as;
7456 bool nexthop_self =
7457 CHECK_FLAG(path->flags, BGP_PATH_ANNC_NH_SELF) ? true : false;
7458
7459 if (json_paths) {
7460 json_path = json_object_new_object();
7461 json_peer = json_object_new_object();
7462 json_nexthop_global = json_object_new_object();
7463 }
7464
7465 if (!json_paths && safi == SAFI_EVPN) {
7466 char tag_buf[30];
7467
7468 bgp_evpn_route2str((struct prefix_evpn *)p, buf2, sizeof(buf2));
7469 vty_out(vty, " Route %s", buf2);
7470 tag_buf[0] = '\0';
7471 if (path->extra && path->extra->num_labels) {
7472 bgp_evpn_label2str(path->extra->label,
7473 path->extra->num_labels, tag_buf,
7474 sizeof(tag_buf));
7475 vty_out(vty, " VNI %s", tag_buf);
7476 }
7477 vty_out(vty, "\n");
7478 if (path->extra && path->extra->parent) {
7479 struct bgp_path_info *parent_ri;
7480 struct bgp_node *rn, *prn;
7481
7482 parent_ri = (struct bgp_path_info *)path->extra->parent;
7483 rn = parent_ri->net;
7484 if (rn && rn->prn) {
7485 prn = rn->prn;
7486 vty_out(vty, " Imported from %s:%s\n",
7487 prefix_rd2str(
7488 (struct prefix_rd *)&prn->p,
7489 buf1, sizeof(buf1)),
7490 buf2);
7491 }
7492 }
7493 }
7494
7495 attr = path->attr;
7496
7497 if (attr) {
7498 /* Line1 display AS-path, Aggregator */
7499 if (attr->aspath) {
7500 if (json_paths) {
7501 if (!attr->aspath->json)
7502 aspath_str_update(attr->aspath, true);
7503 json_object_lock(attr->aspath->json);
7504 json_object_object_add(json_path, "aspath",
7505 attr->aspath->json);
7506 } else {
7507 if (attr->aspath->segments)
7508 aspath_print_vty(vty, " %s",
7509 attr->aspath, "");
7510 else
7511 vty_out(vty, " Local");
7512 }
7513 }
7514
7515 if (CHECK_FLAG(path->flags, BGP_PATH_REMOVED)) {
7516 if (json_paths)
7517 json_object_boolean_true_add(json_path,
7518 "removed");
7519 else
7520 vty_out(vty, ", (removed)");
7521 }
7522
7523 if (CHECK_FLAG(path->flags, BGP_PATH_STALE)) {
7524 if (json_paths)
7525 json_object_boolean_true_add(json_path,
7526 "stale");
7527 else
7528 vty_out(vty, ", (stale)");
7529 }
7530
7531 if (CHECK_FLAG(attr->flag,
7532 ATTR_FLAG_BIT(BGP_ATTR_AGGREGATOR))) {
7533 if (json_paths) {
7534 json_object_int_add(json_path, "aggregatorAs",
7535 attr->aggregator_as);
7536 json_object_string_add(
7537 json_path, "aggregatorId",
7538 inet_ntoa(attr->aggregator_addr));
7539 } else {
7540 vty_out(vty, ", (aggregated by %u %s)",
7541 attr->aggregator_as,
7542 inet_ntoa(attr->aggregator_addr));
7543 }
7544 }
7545
7546 if (CHECK_FLAG(path->peer->af_flags[afi][safi],
7547 PEER_FLAG_REFLECTOR_CLIENT)) {
7548 if (json_paths)
7549 json_object_boolean_true_add(
7550 json_path, "rxedFromRrClient");
7551 else
7552 vty_out(vty, ", (Received from a RR-client)");
7553 }
7554
7555 if (CHECK_FLAG(path->peer->af_flags[afi][safi],
7556 PEER_FLAG_RSERVER_CLIENT)) {
7557 if (json_paths)
7558 json_object_boolean_true_add(
7559 json_path, "rxedFromRsClient");
7560 else
7561 vty_out(vty, ", (Received from a RS-client)");
7562 }
7563
7564 if (CHECK_FLAG(path->flags, BGP_PATH_HISTORY)) {
7565 if (json_paths)
7566 json_object_boolean_true_add(
7567 json_path, "dampeningHistoryEntry");
7568 else
7569 vty_out(vty, ", (history entry)");
7570 } else if (CHECK_FLAG(path->flags, BGP_PATH_DAMPED)) {
7571 if (json_paths)
7572 json_object_boolean_true_add(
7573 json_path, "dampeningSuppressed");
7574 else
7575 vty_out(vty, ", (suppressed due to dampening)");
7576 }
7577
7578 if (!json_paths)
7579 vty_out(vty, "\n");
7580
7581 /* Line2 display Next-hop, Neighbor, Router-id */
7582 /* Display the nexthop */
7583 if ((p->family == AF_INET || p->family == AF_ETHERNET
7584 || p->family == AF_EVPN)
7585 && (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
7586 || safi == SAFI_EVPN
7587 || !BGP_ATTR_NEXTHOP_AFI_IP6(attr))) {
7588 if (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
7589 || safi == SAFI_EVPN) {
7590 if (json_paths)
7591 json_object_string_add(
7592 json_nexthop_global, "ip",
7593 inet_ntoa(
7594 attr->mp_nexthop_global_in));
7595 else
7596 vty_out(vty, " %s",
7597 inet_ntoa(
7598 attr->mp_nexthop_global_in));
7599 } else {
7600 if (json_paths)
7601 json_object_string_add(
7602 json_nexthop_global, "ip",
7603 inet_ntoa(attr->nexthop));
7604 else
7605 vty_out(vty, " %s",
7606 inet_ntoa(attr->nexthop));
7607 }
7608
7609 if (json_paths)
7610 json_object_string_add(json_nexthop_global,
7611 "afi", "ipv4");
7612 } else {
7613 if (json_paths) {
7614 json_object_string_add(
7615 json_nexthop_global, "ip",
7616 inet_ntop(AF_INET6,
7617 &attr->mp_nexthop_global, buf,
7618 INET6_ADDRSTRLEN));
7619 json_object_string_add(json_nexthop_global,
7620 "afi", "ipv6");
7621 json_object_string_add(json_nexthop_global,
7622 "scope", "global");
7623 } else {
7624 vty_out(vty, " %s",
7625 inet_ntop(AF_INET6,
7626 &attr->mp_nexthop_global, buf,
7627 INET6_ADDRSTRLEN));
7628 }
7629 }
7630
7631 /* Display the IGP cost or 'inaccessible' */
7632 if (!CHECK_FLAG(path->flags, BGP_PATH_VALID)) {
7633 if (json_paths)
7634 json_object_boolean_false_add(
7635 json_nexthop_global, "accessible");
7636 else
7637 vty_out(vty, " (inaccessible)");
7638 } else {
7639 if (path->extra && path->extra->igpmetric) {
7640 if (json_paths)
7641 json_object_int_add(
7642 json_nexthop_global, "metric",
7643 path->extra->igpmetric);
7644 else
7645 vty_out(vty, " (metric %u)",
7646 path->extra->igpmetric);
7647 }
7648
7649 /* IGP cost is 0, display this only for json */
7650 else {
7651 if (json_paths)
7652 json_object_int_add(json_nexthop_global,
7653 "metric", 0);
7654 }
7655
7656 if (json_paths)
7657 json_object_boolean_true_add(
7658 json_nexthop_global, "accessible");
7659 }
7660
7661 /* Display peer "from" output */
7662 /* This path was originated locally */
7663 if (path->peer == bgp->peer_self) {
7664
7665 if (safi == SAFI_EVPN
7666 || (p->family == AF_INET
7667 && !BGP_ATTR_NEXTHOP_AFI_IP6(attr))) {
7668 if (json_paths)
7669 json_object_string_add(
7670 json_peer, "peerId", "0.0.0.0");
7671 else
7672 vty_out(vty, " from 0.0.0.0 ");
7673 } else {
7674 if (json_paths)
7675 json_object_string_add(json_peer,
7676 "peerId", "::");
7677 else
7678 vty_out(vty, " from :: ");
7679 }
7680
7681 if (json_paths)
7682 json_object_string_add(
7683 json_peer, "routerId",
7684 inet_ntoa(bgp->router_id));
7685 else
7686 vty_out(vty, "(%s)", inet_ntoa(bgp->router_id));
7687 }
7688
7689 /* We RXed this path from one of our peers */
7690 else {
7691
7692 if (json_paths) {
7693 json_object_string_add(
7694 json_peer, "peerId",
7695 sockunion2str(&path->peer->su, buf,
7696 SU_ADDRSTRLEN));
7697 json_object_string_add(
7698 json_peer, "routerId",
7699 inet_ntop(AF_INET,
7700 &path->peer->remote_id, buf1,
7701 sizeof(buf1)));
7702
7703 if (path->peer->hostname)
7704 json_object_string_add(
7705 json_peer, "hostname",
7706 path->peer->hostname);
7707
7708 if (path->peer->domainname)
7709 json_object_string_add(
7710 json_peer, "domainname",
7711 path->peer->domainname);
7712
7713 if (path->peer->conf_if)
7714 json_object_string_add(
7715 json_peer, "interface",
7716 path->peer->conf_if);
7717 } else {
7718 if (path->peer->conf_if) {
7719 if (path->peer->hostname
7720 && bgp_flag_check(
7721 path->peer->bgp,
7722 BGP_FLAG_SHOW_HOSTNAME))
7723 vty_out(vty, " from %s(%s)",
7724 path->peer->hostname,
7725 path->peer->conf_if);
7726 else
7727 vty_out(vty, " from %s",
7728 path->peer->conf_if);
7729 } else {
7730 if (path->peer->hostname
7731 && bgp_flag_check(
7732 path->peer->bgp,
7733 BGP_FLAG_SHOW_HOSTNAME))
7734 vty_out(vty, " from %s(%s)",
7735 path->peer->hostname,
7736 path->peer->host);
7737 else
7738 vty_out(vty, " from %s",
7739 sockunion2str(
7740 &path->peer->su,
7741 buf,
7742 SU_ADDRSTRLEN));
7743 }
7744
7745 if (attr->flag
7746 & ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID))
7747 vty_out(vty, " (%s)",
7748 inet_ntoa(attr->originator_id));
7749 else
7750 vty_out(vty, " (%s)",
7751 inet_ntop(
7752 AF_INET,
7753 &path->peer->remote_id,
7754 buf1, sizeof(buf1)));
7755 }
7756 }
7757
7758 /*
7759 * Note when vrfid of nexthop is different from that of prefix
7760 */
7761 if (path->extra && path->extra->bgp_orig) {
7762 vrf_id_t nexthop_vrfid = path->extra->bgp_orig->vrf_id;
7763
7764 if (json_paths) {
7765 const char *vn;
7766
7767 if (path->extra->bgp_orig->inst_type
7768 == BGP_INSTANCE_TYPE_DEFAULT)
7769
7770 vn = "Default";
7771 else
7772 vn = path->extra->bgp_orig->name;
7773
7774 json_object_string_add(json_path, "nhVrfName",
7775 vn);
7776
7777 if (nexthop_vrfid == VRF_UNKNOWN) {
7778 json_object_int_add(json_path,
7779 "nhVrfId", -1);
7780 } else {
7781 json_object_int_add(json_path,
7782 "nhVrfId", (int)nexthop_vrfid);
7783 }
7784 } else {
7785 if (nexthop_vrfid == VRF_UNKNOWN)
7786 vty_out(vty, " vrf ?");
7787 else
7788 vty_out(vty, " vrf %u", nexthop_vrfid);
7789 }
7790 }
7791
7792 if (nexthop_self) {
7793 if (json_paths) {
7794 json_object_boolean_true_add(json_path,
7795 "announceNexthopSelf");
7796 } else {
7797 vty_out(vty, " announce-nh-self");
7798 }
7799 }
7800
7801 if (!json_paths)
7802 vty_out(vty, "\n");
7803
7804 /* display the link-local nexthop */
7805 if (attr->mp_nexthop_len == BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL) {
7806 if (json_paths) {
7807 json_nexthop_ll = json_object_new_object();
7808 json_object_string_add(
7809 json_nexthop_ll, "ip",
7810 inet_ntop(AF_INET6,
7811 &attr->mp_nexthop_local, buf,
7812 INET6_ADDRSTRLEN));
7813 json_object_string_add(json_nexthop_ll, "afi",
7814 "ipv6");
7815 json_object_string_add(json_nexthop_ll, "scope",
7816 "link-local");
7817
7818 json_object_boolean_true_add(json_nexthop_ll,
7819 "accessible");
7820
7821 if (!attr->mp_nexthop_prefer_global)
7822 json_object_boolean_true_add(
7823 json_nexthop_ll, "used");
7824 else
7825 json_object_boolean_true_add(
7826 json_nexthop_global, "used");
7827 } else {
7828 vty_out(vty, " (%s) %s\n",
7829 inet_ntop(AF_INET6,
7830 &attr->mp_nexthop_local, buf,
7831 INET6_ADDRSTRLEN),
7832 attr->mp_nexthop_prefer_global
7833 ? "(prefer-global)"
7834 : "(used)");
7835 }
7836 }
7837 /* If we do not have a link-local nexthop then we must flag the
7838 global as "used" */
7839 else {
7840 if (json_paths)
7841 json_object_boolean_true_add(
7842 json_nexthop_global, "used");
7843 }
7844
7845 /* Line 3 display Origin, Med, Locpref, Weight, Tag, valid,
7846 * Int/Ext/Local, Atomic, best */
7847 if (json_paths)
7848 json_object_string_add(
7849 json_path, "origin",
7850 bgp_origin_long_str[attr->origin]);
7851 else
7852 vty_out(vty, " Origin %s",
7853 bgp_origin_long_str[attr->origin]);
7854
7855 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC)) {
7856 if (json_paths)
7857 json_object_int_add(json_path, "med",
7858 attr->med);
7859 else
7860 vty_out(vty, ", metric %u", attr->med);
7861 }
7862
7863 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF)) {
7864 if (json_paths)
7865 json_object_int_add(json_path, "localpref",
7866 attr->local_pref);
7867 else
7868 vty_out(vty, ", localpref %u",
7869 attr->local_pref);
7870 }
7871
7872 if (attr->weight != 0) {
7873 if (json_paths)
7874 json_object_int_add(json_path, "weight",
7875 attr->weight);
7876 else
7877 vty_out(vty, ", weight %u", attr->weight);
7878 }
7879
7880 if (attr->tag != 0) {
7881 if (json_paths)
7882 json_object_int_add(json_path, "tag",
7883 attr->tag);
7884 else
7885 vty_out(vty, ", tag %" ROUTE_TAG_PRI,
7886 attr->tag);
7887 }
7888
7889 if (!CHECK_FLAG(path->flags, BGP_PATH_VALID)) {
7890 if (json_paths)
7891 json_object_boolean_false_add(json_path,
7892 "valid");
7893 else
7894 vty_out(vty, ", invalid");
7895 } else if (!CHECK_FLAG(path->flags, BGP_PATH_HISTORY)) {
7896 if (json_paths)
7897 json_object_boolean_true_add(json_path,
7898 "valid");
7899 else
7900 vty_out(vty, ", valid");
7901 }
7902
7903 if (path->peer != bgp->peer_self) {
7904 if (path->peer->as == path->peer->local_as) {
7905 if (CHECK_FLAG(bgp->config,
7906 BGP_CONFIG_CONFEDERATION)) {
7907 if (json_paths)
7908 json_object_string_add(
7909 json_peer, "type",
7910 "confed-internal");
7911 else
7912 vty_out(vty,
7913 ", confed-internal");
7914 } else {
7915 if (json_paths)
7916 json_object_string_add(
7917 json_peer, "type",
7918 "internal");
7919 else
7920 vty_out(vty, ", internal");
7921 }
7922 } else {
7923 if (bgp_confederation_peers_check(
7924 bgp, path->peer->as)) {
7925 if (json_paths)
7926 json_object_string_add(
7927 json_peer, "type",
7928 "confed-external");
7929 else
7930 vty_out(vty,
7931 ", confed-external");
7932 } else {
7933 if (json_paths)
7934 json_object_string_add(
7935 json_peer, "type",
7936 "external");
7937 else
7938 vty_out(vty, ", external");
7939 }
7940 }
7941 } else if (path->sub_type == BGP_ROUTE_AGGREGATE) {
7942 if (json_paths) {
7943 json_object_boolean_true_add(json_path,
7944 "aggregated");
7945 json_object_boolean_true_add(json_path,
7946 "local");
7947 } else {
7948 vty_out(vty, ", aggregated, local");
7949 }
7950 } else if (path->type != ZEBRA_ROUTE_BGP) {
7951 if (json_paths)
7952 json_object_boolean_true_add(json_path,
7953 "sourced");
7954 else
7955 vty_out(vty, ", sourced");
7956 } else {
7957 if (json_paths) {
7958 json_object_boolean_true_add(json_path,
7959 "sourced");
7960 json_object_boolean_true_add(json_path,
7961 "local");
7962 } else {
7963 vty_out(vty, ", sourced, local");
7964 }
7965 }
7966
7967 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_ATOMIC_AGGREGATE)) {
7968 if (json_paths)
7969 json_object_boolean_true_add(json_path,
7970 "atomicAggregate");
7971 else
7972 vty_out(vty, ", atomic-aggregate");
7973 }
7974
7975 if (CHECK_FLAG(path->flags, BGP_PATH_MULTIPATH)
7976 || (CHECK_FLAG(path->flags, BGP_PATH_SELECTED)
7977 && bgp_path_info_mpath_count(path))) {
7978 if (json_paths)
7979 json_object_boolean_true_add(json_path,
7980 "multipath");
7981 else
7982 vty_out(vty, ", multipath");
7983 }
7984
7985 // Mark the bestpath(s)
7986 if (CHECK_FLAG(path->flags, BGP_PATH_DMED_SELECTED)) {
7987 first_as = aspath_get_first_as(attr->aspath);
7988
7989 if (json_paths) {
7990 if (!json_bestpath)
7991 json_bestpath =
7992 json_object_new_object();
7993 json_object_int_add(json_bestpath,
7994 "bestpathFromAs", first_as);
7995 } else {
7996 if (first_as)
7997 vty_out(vty, ", bestpath-from-AS %u",
7998 first_as);
7999 else
8000 vty_out(vty,
8001 ", bestpath-from-AS Local");
8002 }
8003 }
8004
8005 if (CHECK_FLAG(path->flags, BGP_PATH_SELECTED)) {
8006 if (json_paths) {
8007 if (!json_bestpath)
8008 json_bestpath =
8009 json_object_new_object();
8010 json_object_boolean_true_add(json_bestpath,
8011 "overall");
8012 } else
8013 vty_out(vty, ", best");
8014 }
8015
8016 if (json_bestpath)
8017 json_object_object_add(json_path, "bestpath",
8018 json_bestpath);
8019
8020 if (!json_paths)
8021 vty_out(vty, "\n");
8022
8023 /* Line 4 display Community */
8024 if (attr->community) {
8025 if (json_paths) {
8026 if (!attr->community->json)
8027 community_str(attr->community, true);
8028 json_object_lock(attr->community->json);
8029 json_object_object_add(json_path, "community",
8030 attr->community->json);
8031 } else {
8032 vty_out(vty, " Community: %s\n",
8033 attr->community->str);
8034 }
8035 }
8036
8037 /* Line 5 display Extended-community */
8038 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_EXT_COMMUNITIES)) {
8039 if (json_paths) {
8040 json_ext_community = json_object_new_object();
8041 json_object_string_add(json_ext_community,
8042 "string",
8043 attr->ecommunity->str);
8044 json_object_object_add(json_path,
8045 "extendedCommunity",
8046 json_ext_community);
8047 } else {
8048 vty_out(vty, " Extended Community: %s\n",
8049 attr->ecommunity->str);
8050 }
8051 }
8052
8053 /* Line 6 display Large community */
8054 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_LARGE_COMMUNITIES)) {
8055 if (json_paths) {
8056 if (!attr->lcommunity->json)
8057 lcommunity_str(attr->lcommunity, true);
8058 json_object_lock(attr->lcommunity->json);
8059 json_object_object_add(json_path,
8060 "largeCommunity",
8061 attr->lcommunity->json);
8062 } else {
8063 vty_out(vty, " Large Community: %s\n",
8064 attr->lcommunity->str);
8065 }
8066 }
8067
8068 /* Line 7 display Originator, Cluster-id */
8069 if ((attr->flag & ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID))
8070 || (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_CLUSTER_LIST))) {
8071 if (attr->flag
8072 & ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID)) {
8073 if (json_paths)
8074 json_object_string_add(
8075 json_path, "originatorId",
8076 inet_ntoa(attr->originator_id));
8077 else
8078 vty_out(vty, " Originator: %s",
8079 inet_ntoa(attr->originator_id));
8080 }
8081
8082 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_CLUSTER_LIST)) {
8083 int i;
8084
8085 if (json_paths) {
8086 json_cluster_list =
8087 json_object_new_object();
8088 json_cluster_list_list =
8089 json_object_new_array();
8090
8091 for (i = 0;
8092 i < attr->cluster->length / 4;
8093 i++) {
8094 json_string = json_object_new_string(
8095 inet_ntoa(
8096 attr->cluster->list
8097 [i]));
8098 json_object_array_add(
8099 json_cluster_list_list,
8100 json_string);
8101 }
8102
8103 /* struct cluster_list does not have
8104 "str" variable like
8105 * aspath and community do. Add this
8106 someday if someone
8107 * asks for it.
8108 json_object_string_add(json_cluster_list,
8109 "string", attr->cluster->str);
8110 */
8111 json_object_object_add(
8112 json_cluster_list, "list",
8113 json_cluster_list_list);
8114 json_object_object_add(
8115 json_path, "clusterList",
8116 json_cluster_list);
8117 } else {
8118 vty_out(vty, ", Cluster list: ");
8119
8120 for (i = 0;
8121 i < attr->cluster->length / 4;
8122 i++) {
8123 vty_out(vty, "%s ",
8124 inet_ntoa(
8125 attr->cluster->list
8126 [i]));
8127 }
8128 }
8129 }
8130
8131 if (!json_paths)
8132 vty_out(vty, "\n");
8133 }
8134
8135 if (path->extra && path->extra->damp_info)
8136 bgp_damp_info_vty(vty, path, json_path);
8137
8138 /* Remote Label */
8139 if (path->extra && bgp_is_valid_label(&path->extra->label[0])
8140 && safi != SAFI_EVPN) {
8141 mpls_label_t label = label_pton(&path->extra->label[0]);
8142
8143 if (json_paths)
8144 json_object_int_add(json_path, "remoteLabel",
8145 label);
8146 else
8147 vty_out(vty, " Remote label: %d\n", label);
8148 }
8149
8150 /* Label Index */
8151 if (attr->label_index != BGP_INVALID_LABEL_INDEX) {
8152 if (json_paths)
8153 json_object_int_add(json_path, "labelIndex",
8154 attr->label_index);
8155 else
8156 vty_out(vty, " Label Index: %d\n",
8157 attr->label_index);
8158 }
8159
8160 /* Line 8 display Addpath IDs */
8161 if (path->addpath_rx_id || path->addpath_tx_id) {
8162 if (json_paths) {
8163 json_object_int_add(json_path, "addpathRxId",
8164 path->addpath_rx_id);
8165 json_object_int_add(json_path, "addpathTxId",
8166 path->addpath_tx_id);
8167 } else {
8168 vty_out(vty, " AddPath ID: RX %u, TX %u\n",
8169 path->addpath_rx_id,
8170 path->addpath_tx_id);
8171 }
8172 }
8173
8174 /* If we used addpath to TX a non-bestpath we need to display
8175 * "Advertised to" on a path-by-path basis */
8176 if (bgp->addpath_tx_used[afi][safi]) {
8177 first = 1;
8178
8179 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
8180 addpath_capable =
8181 bgp_addpath_encode_tx(peer, afi, safi);
8182 has_adj = bgp_adj_out_lookup(
8183 peer, path->net, path->addpath_tx_id);
8184
8185 if ((addpath_capable && has_adj)
8186 || (!addpath_capable && has_adj
8187 && CHECK_FLAG(path->flags,
8188 BGP_PATH_SELECTED))) {
8189 if (json_path && !json_adv_to)
8190 json_adv_to =
8191 json_object_new_object();
8192
8193 route_vty_out_advertised_to(
8194 vty, peer, &first,
8195 " Advertised to:",
8196 json_adv_to);
8197 }
8198 }
8199
8200 if (json_path) {
8201 if (json_adv_to) {
8202 json_object_object_add(json_path,
8203 "advertisedTo",
8204 json_adv_to);
8205 }
8206 } else {
8207 if (!first) {
8208 vty_out(vty, "\n");
8209 }
8210 }
8211 }
8212
8213 /* Line 9 display Uptime */
8214 tbuf = time(NULL) - (bgp_clock() - path->uptime);
8215 if (json_paths) {
8216 json_last_update = json_object_new_object();
8217 json_object_int_add(json_last_update, "epoch", tbuf);
8218 json_object_string_add(json_last_update, "string",
8219 ctime(&tbuf));
8220 json_object_object_add(json_path, "lastUpdate",
8221 json_last_update);
8222 } else
8223 vty_out(vty, " Last update: %s", ctime(&tbuf));
8224
8225 /* Line 10 display PMSI tunnel attribute, if present */
8226 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_PMSI_TUNNEL)) {
8227 const char *str = lookup_msg(bgp_pmsi_tnltype_str,
8228 attr->pmsi_tnl_type,
8229 PMSI_TNLTYPE_STR_DEFAULT);
8230
8231 if (json_paths) {
8232 json_pmsi = json_object_new_object();
8233 json_object_string_add(json_pmsi,
8234 "tunnelType", str);
8235 json_object_object_add(json_path, "pmsi",
8236 json_pmsi);
8237 } else
8238 vty_out(vty, " PMSI Tunnel Type: %s\n",
8239 str);
8240 }
8241
8242 }
8243
8244 /* We've constructed the json object for this path, add it to the json
8245 * array of paths
8246 */
8247 if (json_paths) {
8248 if (json_nexthop_global || json_nexthop_ll) {
8249 json_nexthops = json_object_new_array();
8250
8251 if (json_nexthop_global)
8252 json_object_array_add(json_nexthops,
8253 json_nexthop_global);
8254
8255 if (json_nexthop_ll)
8256 json_object_array_add(json_nexthops,
8257 json_nexthop_ll);
8258
8259 json_object_object_add(json_path, "nexthops",
8260 json_nexthops);
8261 }
8262
8263 json_object_object_add(json_path, "peer", json_peer);
8264 json_object_array_add(json_paths, json_path);
8265 } else
8266 vty_out(vty, "\n");
8267 }
8268
8269 #define BGP_SHOW_HEADER_CSV "Flags, Network, Next Hop, Metric, LocPrf, Weight, Path"
8270 #define BGP_SHOW_DAMP_HEADER " Network From Reuse Path\n"
8271 #define BGP_SHOW_FLAP_HEADER " Network From Flaps Duration Reuse Path\n"
8272
8273 static int bgp_show_prefix_list(struct vty *vty, struct bgp *bgp,
8274 const char *prefix_list_str, afi_t afi,
8275 safi_t safi, enum bgp_show_type type);
8276 static int bgp_show_filter_list(struct vty *vty, struct bgp *bgp,
8277 const char *filter, afi_t afi, safi_t safi,
8278 enum bgp_show_type type);
8279 static int bgp_show_route_map(struct vty *vty, struct bgp *bgp,
8280 const char *rmap_str, afi_t afi, safi_t safi,
8281 enum bgp_show_type type);
8282 static int bgp_show_community_list(struct vty *vty, struct bgp *bgp,
8283 const char *com, int exact, afi_t afi,
8284 safi_t safi);
8285 static int bgp_show_prefix_longer(struct vty *vty, struct bgp *bgp,
8286 const char *prefix, afi_t afi, safi_t safi,
8287 enum bgp_show_type type);
8288 static int bgp_show_regexp(struct vty *vty, struct bgp *bgp, const char *regstr,
8289 afi_t afi, safi_t safi, enum bgp_show_type type);
8290 static int bgp_show_community(struct vty *vty, struct bgp *bgp,
8291 const char *comstr, int exact, afi_t afi,
8292 safi_t safi, bool use_json);
8293
8294
8295 static int bgp_show_table(struct vty *vty, struct bgp *bgp, safi_t safi,
8296 struct bgp_table *table, enum bgp_show_type type,
8297 void *output_arg, bool use_json, char *rd,
8298 int is_last, unsigned long *output_cum,
8299 unsigned long *total_cum,
8300 unsigned long *json_header_depth)
8301 {
8302 struct bgp_path_info *pi;
8303 struct bgp_node *rn;
8304 int header = 1;
8305 int display;
8306 unsigned long output_count = 0;
8307 unsigned long total_count = 0;
8308 struct prefix *p;
8309 char buf[BUFSIZ];
8310 char buf2[BUFSIZ];
8311 json_object *json_paths = NULL;
8312 int first = 1;
8313
8314 if (output_cum && *output_cum != 0)
8315 header = 0;
8316
8317 if (use_json && !*json_header_depth) {
8318 vty_out(vty,
8319 "{\n \"vrfId\": %d,\n \"vrfName\": \"%s\",\n \"tableVersion\": %" PRId64
8320 ",\n \"routerId\": \"%s\",\n \"routes\": { ",
8321 bgp->vrf_id == VRF_UNKNOWN ? -1 : (int)bgp->vrf_id,
8322 bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT ? "Default"
8323 : bgp->name,
8324 table->version, inet_ntoa(bgp->router_id));
8325 *json_header_depth = 2;
8326 if (rd) {
8327 vty_out(vty, " \"routeDistinguishers\" : {");
8328 ++*json_header_depth;
8329 }
8330 }
8331
8332 if (use_json && rd) {
8333 vty_out(vty, " \"%s\" : { ", rd);
8334 }
8335
8336 /* Start processing of routes. */
8337 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn)) {
8338 if (rn->info == NULL)
8339 continue;
8340
8341 display = 0;
8342 if (use_json)
8343 json_paths = json_object_new_array();
8344 else
8345 json_paths = NULL;
8346
8347 for (pi = rn->info; pi; pi = pi->next) {
8348 total_count++;
8349 if (type == bgp_show_type_flap_statistics
8350 || type == bgp_show_type_flap_neighbor
8351 || type == bgp_show_type_dampend_paths
8352 || type == bgp_show_type_damp_neighbor) {
8353 if (!(pi->extra && pi->extra->damp_info))
8354 continue;
8355 }
8356 if (type == bgp_show_type_regexp) {
8357 regex_t *regex = output_arg;
8358
8359 if (bgp_regexec(regex, pi->attr->aspath)
8360 == REG_NOMATCH)
8361 continue;
8362 }
8363 if (type == bgp_show_type_prefix_list) {
8364 struct prefix_list *plist = output_arg;
8365
8366 if (prefix_list_apply(plist, &rn->p)
8367 != PREFIX_PERMIT)
8368 continue;
8369 }
8370 if (type == bgp_show_type_filter_list) {
8371 struct as_list *as_list = output_arg;
8372
8373 if (as_list_apply(as_list, pi->attr->aspath)
8374 != AS_FILTER_PERMIT)
8375 continue;
8376 }
8377 if (type == bgp_show_type_route_map) {
8378 struct route_map *rmap = output_arg;
8379 struct bgp_path_info path;
8380 struct attr dummy_attr;
8381 int ret;
8382
8383 bgp_attr_dup(&dummy_attr, pi->attr);
8384
8385 path.peer = pi->peer;
8386 path.attr = &dummy_attr;
8387
8388 ret = route_map_apply(rmap, &rn->p, RMAP_BGP,
8389 &path);
8390 if (ret == RMAP_DENYMATCH)
8391 continue;
8392 }
8393 if (type == bgp_show_type_neighbor
8394 || type == bgp_show_type_flap_neighbor
8395 || type == bgp_show_type_damp_neighbor) {
8396 union sockunion *su = output_arg;
8397
8398 if (pi->peer == NULL
8399 || pi->peer->su_remote == NULL
8400 || !sockunion_same(pi->peer->su_remote, su))
8401 continue;
8402 }
8403 if (type == bgp_show_type_cidr_only) {
8404 uint32_t destination;
8405
8406 destination = ntohl(rn->p.u.prefix4.s_addr);
8407 if (IN_CLASSC(destination)
8408 && rn->p.prefixlen == 24)
8409 continue;
8410 if (IN_CLASSB(destination)
8411 && rn->p.prefixlen == 16)
8412 continue;
8413 if (IN_CLASSA(destination)
8414 && rn->p.prefixlen == 8)
8415 continue;
8416 }
8417 if (type == bgp_show_type_prefix_longer) {
8418 p = output_arg;
8419 if (!prefix_match(p, &rn->p))
8420 continue;
8421 }
8422 if (type == bgp_show_type_community_all) {
8423 if (!pi->attr->community)
8424 continue;
8425 }
8426 if (type == bgp_show_type_community) {
8427 struct community *com = output_arg;
8428
8429 if (!pi->attr->community
8430 || !community_match(pi->attr->community,
8431 com))
8432 continue;
8433 }
8434 if (type == bgp_show_type_community_exact) {
8435 struct community *com = output_arg;
8436
8437 if (!pi->attr->community
8438 || !community_cmp(pi->attr->community, com))
8439 continue;
8440 }
8441 if (type == bgp_show_type_community_list) {
8442 struct community_list *list = output_arg;
8443
8444 if (!community_list_match(pi->attr->community,
8445 list))
8446 continue;
8447 }
8448 if (type == bgp_show_type_community_list_exact) {
8449 struct community_list *list = output_arg;
8450
8451 if (!community_list_exact_match(
8452 pi->attr->community, list))
8453 continue;
8454 }
8455 if (type == bgp_show_type_lcommunity) {
8456 struct lcommunity *lcom = output_arg;
8457
8458 if (!pi->attr->lcommunity
8459 || !lcommunity_match(pi->attr->lcommunity,
8460 lcom))
8461 continue;
8462 }
8463 if (type == bgp_show_type_lcommunity_list) {
8464 struct community_list *list = output_arg;
8465
8466 if (!lcommunity_list_match(pi->attr->lcommunity,
8467 list))
8468 continue;
8469 }
8470 if (type == bgp_show_type_lcommunity_all) {
8471 if (!pi->attr->lcommunity)
8472 continue;
8473 }
8474 if (type == bgp_show_type_dampend_paths
8475 || type == bgp_show_type_damp_neighbor) {
8476 if (!CHECK_FLAG(pi->flags, BGP_PATH_DAMPED)
8477 || CHECK_FLAG(pi->flags, BGP_PATH_HISTORY))
8478 continue;
8479 }
8480
8481 if (!use_json && header) {
8482 vty_out(vty, "BGP table version is %" PRIu64
8483 ", local router ID is %s, vrf id ",
8484 table->version,
8485 inet_ntoa(bgp->router_id));
8486 if (bgp->vrf_id == VRF_UNKNOWN)
8487 vty_out(vty, "%s", VRFID_NONE_STR);
8488 else
8489 vty_out(vty, "%u", bgp->vrf_id);
8490 vty_out(vty, "\n");
8491 vty_out(vty, BGP_SHOW_SCODE_HEADER);
8492 vty_out(vty, BGP_SHOW_NCODE_HEADER);
8493 vty_out(vty, BGP_SHOW_OCODE_HEADER);
8494 if (type == bgp_show_type_dampend_paths
8495 || type == bgp_show_type_damp_neighbor)
8496 vty_out(vty, BGP_SHOW_DAMP_HEADER);
8497 else if (type == bgp_show_type_flap_statistics
8498 || type == bgp_show_type_flap_neighbor)
8499 vty_out(vty, BGP_SHOW_FLAP_HEADER);
8500 else
8501 vty_out(vty, BGP_SHOW_HEADER);
8502 header = 0;
8503 }
8504 if (rd != NULL && !display && !output_count) {
8505 if (!use_json)
8506 vty_out(vty,
8507 "Route Distinguisher: %s\n",
8508 rd);
8509 }
8510 if (type == bgp_show_type_dampend_paths
8511 || type == bgp_show_type_damp_neighbor)
8512 damp_route_vty_out(vty, &rn->p, pi, display,
8513 safi, use_json, json_paths);
8514 else if (type == bgp_show_type_flap_statistics
8515 || type == bgp_show_type_flap_neighbor)
8516 flap_route_vty_out(vty, &rn->p, pi, display,
8517 safi, use_json, json_paths);
8518 else
8519 route_vty_out(vty, &rn->p, pi, display, safi,
8520 json_paths);
8521 display++;
8522 }
8523
8524 if (display) {
8525 output_count++;
8526 if (!use_json)
8527 continue;
8528
8529 p = &rn->p;
8530 sprintf(buf2, "%s/%d",
8531 inet_ntop(p->family, &p->u.prefix, buf, BUFSIZ),
8532 p->prefixlen);
8533 if (first)
8534 vty_out(vty, "\"%s\": ", buf2);
8535 else
8536 vty_out(vty, ",\"%s\": ", buf2);
8537
8538 vty_out(vty, "%s",
8539 json_object_to_json_string(json_paths));
8540 json_object_free(json_paths);
8541 json_paths = NULL;
8542 first = 0;
8543 }
8544 }
8545
8546 if (output_cum) {
8547 output_count += *output_cum;
8548 *output_cum = output_count;
8549 }
8550 if (total_cum) {
8551 total_count += *total_cum;
8552 *total_cum = total_count;
8553 }
8554 if (use_json) {
8555 if (rd) {
8556 vty_out(vty, " }%s ", (is_last ? "" : ","));
8557 }
8558 if (is_last) {
8559 unsigned long i;
8560 for (i = 0; i < *json_header_depth; ++i)
8561 vty_out(vty, " } ");
8562 }
8563 } else {
8564 if (is_last) {
8565 /* No route is displayed */
8566 if (output_count == 0) {
8567 if (type == bgp_show_type_normal)
8568 vty_out(vty,
8569 "No BGP prefixes displayed, %ld exist\n",
8570 total_count);
8571 } else
8572 vty_out(vty,
8573 "\nDisplayed %ld routes and %ld total paths\n",
8574 output_count, total_count);
8575 }
8576 }
8577
8578 return CMD_SUCCESS;
8579 }
8580
8581 int bgp_show_table_rd(struct vty *vty, struct bgp *bgp, safi_t safi,
8582 struct bgp_table *table, struct prefix_rd *prd_match,
8583 enum bgp_show_type type, void *output_arg, bool use_json)
8584 {
8585 struct bgp_node *rn, *next;
8586 unsigned long output_cum = 0;
8587 unsigned long total_cum = 0;
8588 unsigned long json_header_depth = 0;
8589 bool show_msg;
8590
8591 show_msg = (!use_json && type == bgp_show_type_normal);
8592
8593 for (rn = bgp_table_top(table); rn; rn = next) {
8594 next = bgp_route_next(rn);
8595 if (prd_match && memcmp(rn->p.u.val, prd_match->val, 8) != 0)
8596 continue;
8597 if (rn->info != NULL) {
8598 struct prefix_rd prd;
8599 char rd[RD_ADDRSTRLEN];
8600
8601 memcpy(&prd, &(rn->p), sizeof(struct prefix_rd));
8602 prefix_rd2str(&prd, rd, sizeof(rd));
8603 bgp_show_table(vty, bgp, safi, rn->info, type,
8604 output_arg, use_json, rd, next == NULL,
8605 &output_cum, &total_cum,
8606 &json_header_depth);
8607 if (next == NULL)
8608 show_msg = false;
8609 }
8610 }
8611 if (show_msg) {
8612 if (output_cum == 0)
8613 vty_out(vty, "No BGP prefixes displayed, %ld exist\n",
8614 total_cum);
8615 else
8616 vty_out(vty,
8617 "\nDisplayed %ld routes and %ld total paths\n",
8618 output_cum, total_cum);
8619 }
8620 return CMD_SUCCESS;
8621 }
8622 static int bgp_show(struct vty *vty, struct bgp *bgp, afi_t afi, safi_t safi,
8623 enum bgp_show_type type, void *output_arg, bool use_json)
8624 {
8625 struct bgp_table *table;
8626 unsigned long json_header_depth = 0;
8627
8628 if (bgp == NULL) {
8629 bgp = bgp_get_default();
8630 }
8631
8632 if (bgp == NULL) {
8633 if (!use_json)
8634 vty_out(vty, "No BGP process is configured\n");
8635 else
8636 vty_out(vty, "{}\n");
8637 return CMD_WARNING;
8638 }
8639
8640 table = bgp->rib[afi][safi];
8641 /* use MPLS and ENCAP specific shows until they are merged */
8642 if (safi == SAFI_MPLS_VPN) {
8643 return bgp_show_table_rd(vty, bgp, safi, table, NULL, type,
8644 output_arg, use_json);
8645 }
8646
8647 if (safi == SAFI_FLOWSPEC && type == bgp_show_type_detail) {
8648 return bgp_show_table_flowspec(vty, bgp, afi, table, type,
8649 output_arg, use_json,
8650 1, NULL, NULL);
8651 }
8652 /* labeled-unicast routes live in the unicast table */
8653 else if (safi == SAFI_LABELED_UNICAST)
8654 safi = SAFI_UNICAST;
8655
8656 return bgp_show_table(vty, bgp, safi, table, type, output_arg, use_json,
8657 NULL, 1, NULL, NULL, &json_header_depth);
8658 }
8659
8660 static void bgp_show_all_instances_routes_vty(struct vty *vty, afi_t afi,
8661 safi_t safi, bool use_json)
8662 {
8663 struct listnode *node, *nnode;
8664 struct bgp *bgp;
8665 int is_first = 1;
8666 bool route_output = false;
8667
8668 if (use_json)
8669 vty_out(vty, "{\n");
8670
8671 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp)) {
8672 route_output = true;
8673 if (use_json) {
8674 if (!is_first)
8675 vty_out(vty, ",\n");
8676 else
8677 is_first = 0;
8678
8679 vty_out(vty, "\"%s\":",
8680 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
8681 ? "Default"
8682 : bgp->name);
8683 } else {
8684 vty_out(vty, "\nInstance %s:\n",
8685 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
8686 ? "Default"
8687 : bgp->name);
8688 }
8689 bgp_show(vty, bgp, afi, safi, bgp_show_type_normal, NULL,
8690 use_json);
8691 }
8692
8693 if (use_json)
8694 vty_out(vty, "}\n");
8695 else if (!route_output)
8696 vty_out(vty, "%% BGP instance not found\n");
8697 }
8698
8699 /* Header of detailed BGP route information */
8700 void route_vty_out_detail_header(struct vty *vty, struct bgp *bgp,
8701 struct bgp_node *rn, struct prefix_rd *prd,
8702 afi_t afi, safi_t safi, json_object *json)
8703 {
8704 struct bgp_path_info *pi;
8705 struct prefix *p;
8706 struct peer *peer;
8707 struct listnode *node, *nnode;
8708 char buf1[RD_ADDRSTRLEN];
8709 char buf2[INET6_ADDRSTRLEN];
8710 char buf3[EVPN_ROUTE_STRLEN];
8711 char prefix_str[BUFSIZ];
8712 int count = 0;
8713 int best = 0;
8714 int suppress = 0;
8715 int accept_own = 0;
8716 int route_filter_translated_v4 = 0;
8717 int route_filter_v4 = 0;
8718 int route_filter_translated_v6 = 0;
8719 int route_filter_v6 = 0;
8720 int llgr_stale = 0;
8721 int no_llgr = 0;
8722 int accept_own_nexthop = 0;
8723 int blackhole = 0;
8724 int no_export = 0;
8725 int no_advertise = 0;
8726 int local_as = 0;
8727 int no_peer = 0;
8728 int first = 1;
8729 int has_valid_label = 0;
8730 mpls_label_t label = 0;
8731 json_object *json_adv_to = NULL;
8732
8733 p = &rn->p;
8734 has_valid_label = bgp_is_valid_label(&rn->local_label);
8735
8736 if (has_valid_label)
8737 label = label_pton(&rn->local_label);
8738
8739 if (json) {
8740 if (has_valid_label)
8741 json_object_int_add(json, "localLabel", label);
8742
8743 json_object_string_add(
8744 json, "prefix",
8745 prefix2str(p, prefix_str, sizeof(prefix_str)));
8746 } else {
8747 if (safi == SAFI_EVPN)
8748 vty_out(vty, "BGP routing table entry for %s%s%s\n",
8749 prd ? prefix_rd2str(prd, buf1, sizeof(buf1))
8750 : "",
8751 prd ? ":" : "",
8752 bgp_evpn_route2str((struct prefix_evpn *)p,
8753 buf3, sizeof(buf3)));
8754 else
8755 vty_out(vty, "BGP routing table entry for %s%s%s/%d\n",
8756 ((safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP)
8757 ? prefix_rd2str(prd, buf1,
8758 sizeof(buf1))
8759 : ""),
8760 safi == SAFI_MPLS_VPN ? ":" : "",
8761 inet_ntop(p->family, &p->u.prefix, buf2,
8762 INET6_ADDRSTRLEN),
8763 p->prefixlen);
8764
8765 if (has_valid_label)
8766 vty_out(vty, "Local label: %d\n", label);
8767 if (bgp_labeled_safi(safi) && safi != SAFI_EVPN)
8768 vty_out(vty, "not allocated\n");
8769 }
8770
8771 for (pi = rn->info; pi; pi = pi->next) {
8772 count++;
8773 if (CHECK_FLAG(pi->flags, BGP_PATH_SELECTED)) {
8774 best = count;
8775 if (pi->extra && pi->extra->suppress)
8776 suppress = 1;
8777
8778 if (pi->attr->community == NULL)
8779 continue;
8780
8781 no_advertise += community_include(
8782 pi->attr->community, COMMUNITY_NO_ADVERTISE);
8783 no_export += community_include(pi->attr->community,
8784 COMMUNITY_NO_EXPORT);
8785 local_as += community_include(pi->attr->community,
8786 COMMUNITY_LOCAL_AS);
8787 accept_own += community_include(pi->attr->community,
8788 COMMUNITY_ACCEPT_OWN);
8789 route_filter_translated_v4 += community_include(
8790 pi->attr->community,
8791 COMMUNITY_ROUTE_FILTER_TRANSLATED_v4);
8792 route_filter_translated_v6 += community_include(
8793 pi->attr->community,
8794 COMMUNITY_ROUTE_FILTER_TRANSLATED_v6);
8795 route_filter_v4 += community_include(
8796 pi->attr->community, COMMUNITY_ROUTE_FILTER_v4);
8797 route_filter_v6 += community_include(
8798 pi->attr->community, COMMUNITY_ROUTE_FILTER_v6);
8799 llgr_stale += community_include(pi->attr->community,
8800 COMMUNITY_LLGR_STALE);
8801 no_llgr += community_include(pi->attr->community,
8802 COMMUNITY_NO_LLGR);
8803 accept_own_nexthop +=
8804 community_include(pi->attr->community,
8805 COMMUNITY_ACCEPT_OWN_NEXTHOP);
8806 blackhole += community_include(pi->attr->community,
8807 COMMUNITY_BLACKHOLE);
8808 no_peer += community_include(pi->attr->community,
8809 COMMUNITY_NO_PEER);
8810 }
8811 }
8812
8813 if (!json) {
8814 vty_out(vty, "Paths: (%d available", count);
8815 if (best) {
8816 vty_out(vty, ", best #%d", best);
8817 if (safi == SAFI_UNICAST)
8818 vty_out(vty, ", table %s",
8819 (bgp->inst_type
8820 == BGP_INSTANCE_TYPE_DEFAULT)
8821 ? "Default-IP-Routing-Table"
8822 : bgp->name);
8823 } else
8824 vty_out(vty, ", no best path");
8825
8826 if (accept_own)
8827 vty_out(vty,
8828 ", accept own local route exported and imported in different VRF");
8829 else if (route_filter_translated_v4)
8830 vty_out(vty,
8831 ", mark translated RTs for VPNv4 route filtering");
8832 else if (route_filter_v4)
8833 vty_out(vty,
8834 ", attach RT as-is for VPNv4 route filtering");
8835 else if (route_filter_translated_v6)
8836 vty_out(vty,
8837 ", mark translated RTs for VPNv6 route filtering");
8838 else if (route_filter_v6)
8839 vty_out(vty,
8840 ", attach RT as-is for VPNv6 route filtering");
8841 else if (llgr_stale)
8842 vty_out(vty,
8843 ", mark routes to be retained for a longer time. Requeres support for Long-lived BGP Graceful Restart");
8844 else if (no_llgr)
8845 vty_out(vty,
8846 ", mark routes to not be treated according to Long-lived BGP Graceful Restart operations");
8847 else if (accept_own_nexthop)
8848 vty_out(vty,
8849 ", accept local nexthop");
8850 else if (blackhole)
8851 vty_out(vty, ", inform peer to blackhole prefix");
8852 else if (no_export)
8853 vty_out(vty, ", not advertised to EBGP peer");
8854 else if (no_advertise)
8855 vty_out(vty, ", not advertised to any peer");
8856 else if (local_as)
8857 vty_out(vty, ", not advertised outside local AS");
8858 else if (no_peer)
8859 vty_out(vty,
8860 ", inform EBGP peer not to advertise to their EBGP peers");
8861
8862 if (suppress)
8863 vty_out(vty,
8864 ", Advertisements suppressed by an aggregate.");
8865 vty_out(vty, ")\n");
8866 }
8867
8868 /* If we are not using addpath then we can display Advertised to and
8869 * that will
8870 * show what peers we advertised the bestpath to. If we are using
8871 * addpath
8872 * though then we must display Advertised to on a path-by-path basis. */
8873 if (!bgp->addpath_tx_used[afi][safi]) {
8874 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
8875 if (bgp_adj_out_lookup(peer, rn, 0)) {
8876 if (json && !json_adv_to)
8877 json_adv_to = json_object_new_object();
8878
8879 route_vty_out_advertised_to(
8880 vty, peer, &first,
8881 " Advertised to non peer-group peers:\n ",
8882 json_adv_to);
8883 }
8884 }
8885
8886 if (json) {
8887 if (json_adv_to) {
8888 json_object_object_add(json, "advertisedTo",
8889 json_adv_to);
8890 }
8891 } else {
8892 if (first)
8893 vty_out(vty, " Not advertised to any peer");
8894 vty_out(vty, "\n");
8895 }
8896 }
8897 }
8898
8899 /* Display specified route of BGP table. */
8900 static int bgp_show_route_in_table(struct vty *vty, struct bgp *bgp,
8901 struct bgp_table *rib, const char *ip_str,
8902 afi_t afi, safi_t safi,
8903 struct prefix_rd *prd, int prefix_check,
8904 enum bgp_path_type pathtype, bool use_json)
8905 {
8906 int ret;
8907 int header;
8908 int display = 0;
8909 struct prefix match;
8910 struct bgp_node *rn;
8911 struct bgp_node *rm;
8912 struct bgp_path_info *pi;
8913 struct bgp_table *table;
8914 json_object *json = NULL;
8915 json_object *json_paths = NULL;
8916
8917 /* Check IP address argument. */
8918 ret = str2prefix(ip_str, &match);
8919 if (!ret) {
8920 vty_out(vty, "address is malformed\n");
8921 return CMD_WARNING;
8922 }
8923
8924 match.family = afi2family(afi);
8925
8926 if (use_json) {
8927 json = json_object_new_object();
8928 json_paths = json_object_new_array();
8929 }
8930
8931 if (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP || safi == SAFI_EVPN) {
8932 for (rn = bgp_table_top(rib); rn; rn = bgp_route_next(rn)) {
8933 if (prd && memcmp(rn->p.u.val, prd->val, 8) != 0)
8934 continue;
8935
8936 if ((table = rn->info) == NULL)
8937 continue;
8938
8939 header = 1;
8940
8941 if ((rm = bgp_node_match(table, &match)) == NULL)
8942 continue;
8943
8944 if (prefix_check
8945 && rm->p.prefixlen != match.prefixlen) {
8946 bgp_unlock_node(rm);
8947 continue;
8948 }
8949
8950 for (pi = rm->info; pi; pi = pi->next) {
8951 if (header) {
8952 route_vty_out_detail_header(
8953 vty, bgp, rm,
8954 (struct prefix_rd *)&rn->p,
8955 AFI_IP, safi, json);
8956 header = 0;
8957 }
8958 display++;
8959
8960 if (pathtype == BGP_PATH_SHOW_ALL
8961 || (pathtype == BGP_PATH_SHOW_BESTPATH
8962 && CHECK_FLAG(pi->flags,
8963 BGP_PATH_SELECTED))
8964 || (pathtype == BGP_PATH_SHOW_MULTIPATH
8965 && (CHECK_FLAG(pi->flags,
8966 BGP_PATH_MULTIPATH)
8967 || CHECK_FLAG(pi->flags,
8968 BGP_PATH_SELECTED))))
8969 route_vty_out_detail(vty, bgp, &rm->p,
8970 pi, AFI_IP, safi,
8971 json_paths);
8972 }
8973
8974 bgp_unlock_node(rm);
8975 }
8976 } else if (safi == SAFI_FLOWSPEC) {
8977 display = bgp_flowspec_display_match_per_ip(afi, rib,
8978 &match, prefix_check,
8979 vty,
8980 use_json,
8981 json_paths);
8982 } else {
8983 header = 1;
8984
8985 if ((rn = bgp_node_match(rib, &match)) != NULL) {
8986 if (!prefix_check
8987 || rn->p.prefixlen == match.prefixlen) {
8988 for (pi = rn->info; pi; pi = pi->next) {
8989 if (header) {
8990 route_vty_out_detail_header(
8991 vty, bgp, rn, NULL, afi,
8992 safi, json);
8993 header = 0;
8994 }
8995 display++;
8996
8997 if (pathtype == BGP_PATH_SHOW_ALL
8998 || (pathtype
8999 == BGP_PATH_SHOW_BESTPATH
9000 && CHECK_FLAG(
9001 pi->flags,
9002 BGP_PATH_SELECTED))
9003 || (pathtype
9004 == BGP_PATH_SHOW_MULTIPATH
9005 && (CHECK_FLAG(
9006 pi->flags,
9007 BGP_PATH_MULTIPATH)
9008 || CHECK_FLAG(
9009 pi->flags,
9010 BGP_PATH_SELECTED))))
9011 route_vty_out_detail(
9012 vty, bgp, &rn->p, pi,
9013 afi, safi, json_paths);
9014 }
9015 }
9016
9017 bgp_unlock_node(rn);
9018 }
9019 }
9020
9021 if (use_json) {
9022 if (display)
9023 json_object_object_add(json, "paths", json_paths);
9024
9025 vty_out(vty, "%s\n", json_object_to_json_string_ext(
9026 json, JSON_C_TO_STRING_PRETTY));
9027 json_object_free(json);
9028 } else {
9029 if (!display) {
9030 vty_out(vty, "%% Network not in table\n");
9031 return CMD_WARNING;
9032 }
9033 }
9034
9035 return CMD_SUCCESS;
9036 }
9037
9038 /* Display specified route of Main RIB */
9039 static int bgp_show_route(struct vty *vty, struct bgp *bgp, const char *ip_str,
9040 afi_t afi, safi_t safi, struct prefix_rd *prd,
9041 int prefix_check, enum bgp_path_type pathtype,
9042 bool use_json)
9043 {
9044 if (!bgp) {
9045 bgp = bgp_get_default();
9046 if (!bgp) {
9047 if (!use_json)
9048 vty_out(vty, "No BGP process is configured\n");
9049 else
9050 vty_out(vty, "{}\n");
9051 return CMD_WARNING;
9052 }
9053 }
9054
9055 /* labeled-unicast routes live in the unicast table */
9056 if (safi == SAFI_LABELED_UNICAST)
9057 safi = SAFI_UNICAST;
9058
9059 return bgp_show_route_in_table(vty, bgp, bgp->rib[afi][safi], ip_str,
9060 afi, safi, prd, prefix_check, pathtype,
9061 use_json);
9062 }
9063
9064 static int bgp_show_lcommunity(struct vty *vty, struct bgp *bgp, int argc,
9065 struct cmd_token **argv, afi_t afi, safi_t safi,
9066 bool uj)
9067 {
9068 struct lcommunity *lcom;
9069 struct buffer *b;
9070 int i;
9071 char *str;
9072 int first = 0;
9073
9074 b = buffer_new(1024);
9075 for (i = 0; i < argc; i++) {
9076 if (first)
9077 buffer_putc(b, ' ');
9078 else {
9079 if (strmatch(argv[i]->text, "AA:BB:CC")) {
9080 first = 1;
9081 buffer_putstr(b, argv[i]->arg);
9082 }
9083 }
9084 }
9085 buffer_putc(b, '\0');
9086
9087 str = buffer_getstr(b);
9088 buffer_free(b);
9089
9090 lcom = lcommunity_str2com(str);
9091 XFREE(MTYPE_TMP, str);
9092 if (!lcom) {
9093 vty_out(vty, "%% Large-community malformed\n");
9094 return CMD_WARNING;
9095 }
9096
9097 return bgp_show(vty, bgp, afi, safi, bgp_show_type_lcommunity, lcom,
9098 uj);
9099 }
9100
9101 static int bgp_show_lcommunity_list(struct vty *vty, struct bgp *bgp,
9102 const char *lcom, afi_t afi, safi_t safi,
9103 bool uj)
9104 {
9105 struct community_list *list;
9106
9107 list = community_list_lookup(bgp_clist, lcom,
9108 LARGE_COMMUNITY_LIST_MASTER);
9109 if (list == NULL) {
9110 vty_out(vty, "%% %s is not a valid large-community-list name\n",
9111 lcom);
9112 return CMD_WARNING;
9113 }
9114
9115 return bgp_show(vty, bgp, afi, safi, bgp_show_type_lcommunity_list,
9116 list, uj);
9117 }
9118
9119 DEFUN (show_ip_bgp_large_community_list,
9120 show_ip_bgp_large_community_list_cmd,
9121 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] large-community-list <(1-500)|WORD> [json]",
9122 SHOW_STR
9123 IP_STR
9124 BGP_STR
9125 BGP_INSTANCE_HELP_STR
9126 BGP_AFI_HELP_STR
9127 BGP_SAFI_WITH_LABEL_HELP_STR
9128 "Display routes matching the large-community-list\n"
9129 "large-community-list number\n"
9130 "large-community-list name\n"
9131 JSON_STR)
9132 {
9133 char *vrf = NULL;
9134 afi_t afi = AFI_IP6;
9135 safi_t safi = SAFI_UNICAST;
9136 int idx = 0;
9137
9138 if (argv_find(argv, argc, "ip", &idx))
9139 afi = AFI_IP;
9140 if (argv_find(argv, argc, "view", &idx)
9141 || argv_find(argv, argc, "vrf", &idx))
9142 vrf = argv[++idx]->arg;
9143 if (argv_find(argv, argc, "ipv4", &idx)
9144 || argv_find(argv, argc, "ipv6", &idx)) {
9145 afi = strmatch(argv[idx]->text, "ipv6") ? AFI_IP6 : AFI_IP;
9146 if (argv_find(argv, argc, "unicast", &idx)
9147 || argv_find(argv, argc, "multicast", &idx))
9148 safi = bgp_vty_safi_from_str(argv[idx]->text);
9149 }
9150
9151 bool uj = use_json(argc, argv);
9152
9153 struct bgp *bgp = bgp_lookup_by_name(vrf);
9154 if (bgp == NULL) {
9155 vty_out(vty, "Can't find BGP instance %s\n", vrf);
9156 return CMD_WARNING;
9157 }
9158
9159 argv_find(argv, argc, "large-community-list", &idx);
9160 return bgp_show_lcommunity_list(vty, bgp, argv[idx + 1]->arg, afi, safi,
9161 uj);
9162 }
9163 DEFUN (show_ip_bgp_large_community,
9164 show_ip_bgp_large_community_cmd,
9165 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] large-community [AA:BB:CC] [json]",
9166 SHOW_STR
9167 IP_STR
9168 BGP_STR
9169 BGP_INSTANCE_HELP_STR
9170 BGP_AFI_HELP_STR
9171 BGP_SAFI_WITH_LABEL_HELP_STR
9172 "Display routes matching the large-communities\n"
9173 "List of large-community numbers\n"
9174 JSON_STR)
9175 {
9176 char *vrf = NULL;
9177 afi_t afi = AFI_IP6;
9178 safi_t safi = SAFI_UNICAST;
9179 int idx = 0;
9180
9181 if (argv_find(argv, argc, "ip", &idx))
9182 afi = AFI_IP;
9183 if (argv_find(argv, argc, "view", &idx)
9184 || argv_find(argv, argc, "vrf", &idx))
9185 vrf = argv[++idx]->arg;
9186 if (argv_find(argv, argc, "ipv4", &idx)
9187 || argv_find(argv, argc, "ipv6", &idx)) {
9188 afi = strmatch(argv[idx]->text, "ipv6") ? AFI_IP6 : AFI_IP;
9189 if (argv_find(argv, argc, "unicast", &idx)
9190 || argv_find(argv, argc, "multicast", &idx))
9191 safi = bgp_vty_safi_from_str(argv[idx]->text);
9192 }
9193
9194 bool uj = use_json(argc, argv);
9195
9196 struct bgp *bgp = bgp_lookup_by_name(vrf);
9197 if (bgp == NULL) {
9198 vty_out(vty, "Can't find BGP instance %s\n", vrf);
9199 return CMD_WARNING;
9200 }
9201
9202 if (argv_find(argv, argc, "AA:BB:CC", &idx))
9203 return bgp_show_lcommunity(vty, bgp, argc, argv, afi, safi, uj);
9204 else
9205 return bgp_show(vty, bgp, afi, safi,
9206 bgp_show_type_lcommunity_all, NULL, uj);
9207 }
9208
9209 static int bgp_table_stats(struct vty *vty, struct bgp *bgp, afi_t afi,
9210 safi_t safi);
9211
9212
9213 /* BGP route print out function without JSON */
9214 DEFUN (show_ip_bgp,
9215 show_ip_bgp_cmd,
9216 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]]\
9217 <dampening <parameters>\
9218 |route-map WORD\
9219 |prefix-list WORD\
9220 |filter-list WORD\
9221 |statistics\
9222 |community-list <(1-500)|WORD> [exact-match]\
9223 |A.B.C.D/M longer-prefixes\
9224 |X:X::X:X/M longer-prefixes\
9225 >",
9226 SHOW_STR
9227 IP_STR
9228 BGP_STR
9229 BGP_INSTANCE_HELP_STR
9230 BGP_AFI_HELP_STR
9231 BGP_SAFI_WITH_LABEL_HELP_STR
9232 "Display detailed information about dampening\n"
9233 "Display detail of configured dampening parameters\n"
9234 "Display routes matching the route-map\n"
9235 "A route-map to match on\n"
9236 "Display routes conforming to the prefix-list\n"
9237 "Prefix-list name\n"
9238 "Display routes conforming to the filter-list\n"
9239 "Regular expression access list name\n"
9240 "BGP RIB advertisement statistics\n"
9241 "Display routes matching the community-list\n"
9242 "community-list number\n"
9243 "community-list name\n"
9244 "Exact match of the communities\n"
9245 "IPv4 prefix\n"
9246 "Display route and more specific routes\n"
9247 "IPv6 prefix\n"
9248 "Display route and more specific routes\n")
9249 {
9250 afi_t afi = AFI_IP6;
9251 safi_t safi = SAFI_UNICAST;
9252 int exact_match = 0;
9253 struct bgp *bgp = NULL;
9254 int idx = 0;
9255
9256 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
9257 &bgp, false);
9258 if (!idx)
9259 return CMD_WARNING;
9260
9261 if (argv_find(argv, argc, "dampening", &idx)) {
9262 if (argv_find(argv, argc, "parameters", &idx))
9263 return bgp_show_dampening_parameters(vty, afi, safi);
9264 }
9265
9266 if (argv_find(argv, argc, "prefix-list", &idx))
9267 return bgp_show_prefix_list(vty, bgp, argv[idx + 1]->arg, afi,
9268 safi, bgp_show_type_prefix_list);
9269
9270 if (argv_find(argv, argc, "filter-list", &idx))
9271 return bgp_show_filter_list(vty, bgp, argv[idx + 1]->arg, afi,
9272 safi, bgp_show_type_filter_list);
9273
9274 if (argv_find(argv, argc, "statistics", &idx))
9275 return bgp_table_stats(vty, bgp, afi, safi);
9276
9277 if (argv_find(argv, argc, "route-map", &idx))
9278 return bgp_show_route_map(vty, bgp, argv[idx + 1]->arg, afi,
9279 safi, bgp_show_type_route_map);
9280
9281 if (argv_find(argv, argc, "community-list", &idx)) {
9282 const char *clist_number_or_name = argv[++idx]->arg;
9283 if (++idx < argc && strmatch(argv[idx]->text, "exact-match"))
9284 exact_match = 1;
9285 return bgp_show_community_list(vty, bgp, clist_number_or_name,
9286 exact_match, afi, safi);
9287 }
9288 /* prefix-longer */
9289 if (argv_find(argv, argc, "A.B.C.D/M", &idx)
9290 || argv_find(argv, argc, "X:X::X:X/M", &idx))
9291 return bgp_show_prefix_longer(vty, bgp, argv[idx]->arg, afi,
9292 safi,
9293 bgp_show_type_prefix_longer);
9294
9295 return CMD_WARNING;
9296 }
9297
9298 /* BGP route print out function with JSON */
9299 DEFUN (show_ip_bgp_json,
9300 show_ip_bgp_json_cmd,
9301 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]]\
9302 [cidr-only\
9303 |dampening <flap-statistics|dampened-paths>\
9304 |community [AA:NN|local-AS|no-advertise|no-export\
9305 |graceful-shutdown|no-peer|blackhole|llgr-stale|no-llgr\
9306 |accept-own|accept-own-nexthop|route-filter-v6\
9307 |route-filter-v4|route-filter-translated-v6\
9308 |route-filter-translated-v4] [exact-match]\
9309 ] [json]",
9310 SHOW_STR
9311 IP_STR
9312 BGP_STR
9313 BGP_INSTANCE_HELP_STR
9314 BGP_AFI_HELP_STR
9315 BGP_SAFI_WITH_LABEL_HELP_STR
9316 "Display only routes with non-natural netmasks\n"
9317 "Display detailed information about dampening\n"
9318 "Display flap statistics of routes\n"
9319 "Display paths suppressed due to dampening\n"
9320 "Display routes matching the communities\n"
9321 COMMUNITY_AANN_STR
9322 "Do not send outside local AS (well-known community)\n"
9323 "Do not advertise to any peer (well-known community)\n"
9324 "Do not export to next AS (well-known community)\n"
9325 "Graceful shutdown (well-known community)\n"
9326 "Do not export to any peer (well-known community)\n"
9327 "Inform EBGP peers to blackhole traffic to prefix (well-known community)\n"
9328 "Staled Long-lived Graceful Restart VPN route (well-known community)\n"
9329 "Removed because Long-lived Graceful Restart was not enabled for VPN route (well-known community)\n"
9330 "Should accept local VPN route if exported and imported into different VRF (well-known community)\n"
9331 "Should accept VPN route with local nexthop (well-known community)\n"
9332 "RT VPNv6 route filtering (well-known community)\n"
9333 "RT VPNv4 route filtering (well-known community)\n"
9334 "RT translated VPNv6 route filtering (well-known community)\n"
9335 "RT translated VPNv4 route filtering (well-known community)\n"
9336 "Exact match of the communities\n"
9337 JSON_STR)
9338 {
9339 afi_t afi = AFI_IP6;
9340 safi_t safi = SAFI_UNICAST;
9341 enum bgp_show_type sh_type = bgp_show_type_normal;
9342 struct bgp *bgp = NULL;
9343 int idx = 0;
9344 int exact_match = 0;
9345 bool uj = use_json(argc, argv);
9346
9347 if (uj)
9348 argc--;
9349
9350 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
9351 &bgp, uj);
9352 if (!idx)
9353 return CMD_WARNING;
9354
9355 if (argv_find(argv, argc, "cidr-only", &idx))
9356 return bgp_show(vty, bgp, afi, safi, bgp_show_type_cidr_only,
9357 NULL, uj);
9358
9359 if (argv_find(argv, argc, "dampening", &idx)) {
9360 if (argv_find(argv, argc, "dampened-paths", &idx))
9361 return bgp_show(vty, bgp, afi, safi,
9362 bgp_show_type_dampend_paths, NULL, uj);
9363 else if (argv_find(argv, argc, "flap-statistics", &idx))
9364 return bgp_show(vty, bgp, afi, safi,
9365 bgp_show_type_flap_statistics, NULL,
9366 uj);
9367 }
9368
9369 if (argv_find(argv, argc, "community", &idx)) {
9370 char *maybecomm = idx + 1 < argc ? argv[idx + 1]->text : NULL;
9371 char *community = NULL;
9372
9373 if (maybecomm && !strmatch(maybecomm, "json")
9374 && !strmatch(maybecomm, "exact-match"))
9375 community = maybecomm;
9376
9377 if (argv_find(argv, argc, "exact-match", &idx))
9378 exact_match = 1;
9379
9380 if (community)
9381 return bgp_show_community(vty, bgp, community,
9382 exact_match, afi, safi, uj);
9383 else
9384 return (bgp_show(vty, bgp, afi, safi,
9385 bgp_show_type_community_all, NULL,
9386 uj));
9387 }
9388
9389 return bgp_show(vty, bgp, afi, safi, sh_type, NULL, uj);
9390 }
9391
9392 DEFUN (show_ip_bgp_route,
9393 show_ip_bgp_route_cmd,
9394 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]]"
9395 "<A.B.C.D|A.B.C.D/M|X:X::X:X|X:X::X:X/M> [<bestpath|multipath>] [json]",
9396 SHOW_STR
9397 IP_STR
9398 BGP_STR
9399 BGP_INSTANCE_HELP_STR
9400 BGP_AFI_HELP_STR
9401 BGP_SAFI_WITH_LABEL_HELP_STR
9402 "Network in the BGP routing table to display\n"
9403 "IPv4 prefix\n"
9404 "Network in the BGP routing table to display\n"
9405 "IPv6 prefix\n"
9406 "Display only the bestpath\n"
9407 "Display only multipaths\n"
9408 JSON_STR)
9409 {
9410 int prefix_check = 0;
9411
9412 afi_t afi = AFI_IP6;
9413 safi_t safi = SAFI_UNICAST;
9414 char *prefix = NULL;
9415 struct bgp *bgp = NULL;
9416 enum bgp_path_type path_type;
9417 bool uj = use_json(argc, argv);
9418
9419 int idx = 0;
9420
9421 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
9422 &bgp, uj);
9423 if (!idx)
9424 return CMD_WARNING;
9425
9426 if (!bgp) {
9427 vty_out(vty,
9428 "Specified 'all' vrf's but this command currently only works per view/vrf\n");
9429 return CMD_WARNING;
9430 }
9431
9432 /* <A.B.C.D|A.B.C.D/M|X:X::X:X|X:X::X:X/M> */
9433 if (argv_find(argv, argc, "A.B.C.D", &idx)
9434 || argv_find(argv, argc, "X:X::X:X", &idx))
9435 prefix_check = 0;
9436 else if (argv_find(argv, argc, "A.B.C.D/M", &idx)
9437 || argv_find(argv, argc, "X:X::X:X/M", &idx))
9438 prefix_check = 1;
9439
9440 if ((argv[idx]->type == IPV6_TKN || argv[idx]->type == IPV6_PREFIX_TKN)
9441 && afi != AFI_IP6) {
9442 vty_out(vty,
9443 "%% Cannot specify IPv6 address or prefix with IPv4 AFI\n");
9444 return CMD_WARNING;
9445 }
9446 if ((argv[idx]->type == IPV4_TKN || argv[idx]->type == IPV4_PREFIX_TKN)
9447 && afi != AFI_IP) {
9448 vty_out(vty,
9449 "%% Cannot specify IPv4 address or prefix with IPv6 AFI\n");
9450 return CMD_WARNING;
9451 }
9452
9453 prefix = argv[idx]->arg;
9454
9455 /* [<bestpath|multipath>] */
9456 if (argv_find(argv, argc, "bestpath", &idx))
9457 path_type = BGP_PATH_SHOW_BESTPATH;
9458 else if (argv_find(argv, argc, "multipath", &idx))
9459 path_type = BGP_PATH_SHOW_MULTIPATH;
9460 else
9461 path_type = BGP_PATH_SHOW_ALL;
9462
9463 return bgp_show_route(vty, bgp, prefix, afi, safi, NULL, prefix_check,
9464 path_type, uj);
9465 }
9466
9467 DEFUN (show_ip_bgp_regexp,
9468 show_ip_bgp_regexp_cmd,
9469 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] regexp REGEX...",
9470 SHOW_STR
9471 IP_STR
9472 BGP_STR
9473 BGP_INSTANCE_HELP_STR
9474 BGP_AFI_HELP_STR
9475 BGP_SAFI_WITH_LABEL_HELP_STR
9476 "Display routes matching the AS path regular expression\n"
9477 "A regular-expression to match the BGP AS paths\n")
9478 {
9479 afi_t afi = AFI_IP6;
9480 safi_t safi = SAFI_UNICAST;
9481 struct bgp *bgp = NULL;
9482
9483 int idx = 0;
9484 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
9485 &bgp, false);
9486 if (!idx)
9487 return CMD_WARNING;
9488
9489 // get index of regex
9490 argv_find(argv, argc, "regexp", &idx);
9491 idx++;
9492
9493 char *regstr = argv_concat(argv, argc, idx);
9494 int rc = bgp_show_regexp(vty, bgp, (const char *)regstr, afi, safi,
9495 bgp_show_type_regexp);
9496 XFREE(MTYPE_TMP, regstr);
9497 return rc;
9498 }
9499
9500 DEFUN (show_ip_bgp_instance_all,
9501 show_ip_bgp_instance_all_cmd,
9502 "show [ip] bgp <view|vrf> all ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] [json]",
9503 SHOW_STR
9504 IP_STR
9505 BGP_STR
9506 BGP_INSTANCE_ALL_HELP_STR
9507 BGP_AFI_HELP_STR
9508 BGP_SAFI_WITH_LABEL_HELP_STR
9509 JSON_STR)
9510 {
9511 afi_t afi = AFI_IP;
9512 safi_t safi = SAFI_UNICAST;
9513 struct bgp *bgp = NULL;
9514 int idx = 0;
9515 bool uj = use_json(argc, argv);
9516
9517 if (uj)
9518 argc--;
9519
9520 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
9521 &bgp, uj);
9522 if (!idx)
9523 return CMD_WARNING;
9524
9525 bgp_show_all_instances_routes_vty(vty, afi, safi, uj);
9526 return CMD_SUCCESS;
9527 }
9528
9529 static int bgp_show_regexp(struct vty *vty, struct bgp *bgp, const char *regstr,
9530 afi_t afi, safi_t safi, enum bgp_show_type type)
9531 {
9532 regex_t *regex;
9533 int rc;
9534
9535 regex = bgp_regcomp(regstr);
9536 if (!regex) {
9537 vty_out(vty, "Can't compile regexp %s\n", regstr);
9538 return CMD_WARNING;
9539 }
9540
9541 rc = bgp_show(vty, bgp, afi, safi, type, regex, 0);
9542 bgp_regex_free(regex);
9543 return rc;
9544 }
9545
9546 static int bgp_show_prefix_list(struct vty *vty, struct bgp *bgp,
9547 const char *prefix_list_str, afi_t afi,
9548 safi_t safi, enum bgp_show_type type)
9549 {
9550 struct prefix_list *plist;
9551
9552 plist = prefix_list_lookup(afi, prefix_list_str);
9553 if (plist == NULL) {
9554 vty_out(vty, "%% %s is not a valid prefix-list name\n",
9555 prefix_list_str);
9556 return CMD_WARNING;
9557 }
9558
9559 return bgp_show(vty, bgp, afi, safi, type, plist, 0);
9560 }
9561
9562 static int bgp_show_filter_list(struct vty *vty, struct bgp *bgp,
9563 const char *filter, afi_t afi, safi_t safi,
9564 enum bgp_show_type type)
9565 {
9566 struct as_list *as_list;
9567
9568 as_list = as_list_lookup(filter);
9569 if (as_list == NULL) {
9570 vty_out(vty, "%% %s is not a valid AS-path access-list name\n",
9571 filter);
9572 return CMD_WARNING;
9573 }
9574
9575 return bgp_show(vty, bgp, afi, safi, type, as_list, 0);
9576 }
9577
9578 static int bgp_show_route_map(struct vty *vty, struct bgp *bgp,
9579 const char *rmap_str, afi_t afi, safi_t safi,
9580 enum bgp_show_type type)
9581 {
9582 struct route_map *rmap;
9583
9584 rmap = route_map_lookup_by_name(rmap_str);
9585 if (!rmap) {
9586 vty_out(vty, "%% %s is not a valid route-map name\n", rmap_str);
9587 return CMD_WARNING;
9588 }
9589
9590 return bgp_show(vty, bgp, afi, safi, type, rmap, 0);
9591 }
9592
9593 static int bgp_show_community(struct vty *vty, struct bgp *bgp,
9594 const char *comstr, int exact, afi_t afi,
9595 safi_t safi, bool use_json)
9596 {
9597 struct community *com;
9598 int ret = 0;
9599
9600 com = community_str2com(comstr);
9601 if (!com) {
9602 vty_out(vty, "%% Community malformed: %s\n", comstr);
9603 return CMD_WARNING;
9604 }
9605
9606 ret = bgp_show(vty, bgp, afi, safi,
9607 (exact ? bgp_show_type_community_exact
9608 : bgp_show_type_community),
9609 com, use_json);
9610 community_free(&com);
9611
9612 return ret;
9613 }
9614
9615 static int bgp_show_community_list(struct vty *vty, struct bgp *bgp,
9616 const char *com, int exact, afi_t afi,
9617 safi_t safi)
9618 {
9619 struct community_list *list;
9620
9621 list = community_list_lookup(bgp_clist, com, COMMUNITY_LIST_MASTER);
9622 if (list == NULL) {
9623 vty_out(vty, "%% %s is not a valid community-list name\n", com);
9624 return CMD_WARNING;
9625 }
9626
9627 return bgp_show(vty, bgp, afi, safi,
9628 (exact ? bgp_show_type_community_list_exact
9629 : bgp_show_type_community_list),
9630 list, 0);
9631 }
9632
9633 static int bgp_show_prefix_longer(struct vty *vty, struct bgp *bgp,
9634 const char *prefix, afi_t afi, safi_t safi,
9635 enum bgp_show_type type)
9636 {
9637 int ret;
9638 struct prefix *p;
9639
9640 p = prefix_new();
9641
9642 ret = str2prefix(prefix, p);
9643 if (!ret) {
9644 vty_out(vty, "%% Malformed Prefix\n");
9645 return CMD_WARNING;
9646 }
9647
9648 ret = bgp_show(vty, bgp, afi, safi, type, p, 0);
9649 prefix_free(p);
9650 return ret;
9651 }
9652
9653 static struct peer *peer_lookup_in_view(struct vty *vty, struct bgp *bgp,
9654 const char *ip_str, bool use_json)
9655 {
9656 int ret;
9657 struct peer *peer;
9658 union sockunion su;
9659
9660 /* Get peer sockunion. */
9661 ret = str2sockunion(ip_str, &su);
9662 if (ret < 0) {
9663 peer = peer_lookup_by_conf_if(bgp, ip_str);
9664 if (!peer) {
9665 peer = peer_lookup_by_hostname(bgp, ip_str);
9666
9667 if (!peer) {
9668 if (use_json) {
9669 json_object *json_no = NULL;
9670 json_no = json_object_new_object();
9671 json_object_string_add(
9672 json_no,
9673 "malformedAddressOrName",
9674 ip_str);
9675 vty_out(vty, "%s\n",
9676 json_object_to_json_string_ext(
9677 json_no,
9678 JSON_C_TO_STRING_PRETTY));
9679 json_object_free(json_no);
9680 } else
9681 vty_out(vty,
9682 "%% Malformed address or name: %s\n",
9683 ip_str);
9684 return NULL;
9685 }
9686 }
9687 return peer;
9688 }
9689
9690 /* Peer structure lookup. */
9691 peer = peer_lookup(bgp, &su);
9692 if (!peer) {
9693 if (use_json) {
9694 json_object *json_no = NULL;
9695 json_no = json_object_new_object();
9696 json_object_string_add(json_no, "warning",
9697 "No such neighbor in this view/vrf");
9698 vty_out(vty, "%s\n",
9699 json_object_to_json_string_ext(
9700 json_no, JSON_C_TO_STRING_PRETTY));
9701 json_object_free(json_no);
9702 } else
9703 vty_out(vty, "No such neighbor in this view/vrf\n");
9704 return NULL;
9705 }
9706
9707 return peer;
9708 }
9709
9710 enum bgp_stats {
9711 BGP_STATS_MAXBITLEN = 0,
9712 BGP_STATS_RIB,
9713 BGP_STATS_PREFIXES,
9714 BGP_STATS_TOTPLEN,
9715 BGP_STATS_UNAGGREGATEABLE,
9716 BGP_STATS_MAX_AGGREGATEABLE,
9717 BGP_STATS_AGGREGATES,
9718 BGP_STATS_SPACE,
9719 BGP_STATS_ASPATH_COUNT,
9720 BGP_STATS_ASPATH_MAXHOPS,
9721 BGP_STATS_ASPATH_TOTHOPS,
9722 BGP_STATS_ASPATH_MAXSIZE,
9723 BGP_STATS_ASPATH_TOTSIZE,
9724 BGP_STATS_ASN_HIGHEST,
9725 BGP_STATS_MAX,
9726 };
9727
9728 static const char *table_stats_strs[] = {
9729 [BGP_STATS_PREFIXES] = "Total Prefixes",
9730 [BGP_STATS_TOTPLEN] = "Average prefix length",
9731 [BGP_STATS_RIB] = "Total Advertisements",
9732 [BGP_STATS_UNAGGREGATEABLE] = "Unaggregateable prefixes",
9733 [BGP_STATS_MAX_AGGREGATEABLE] =
9734 "Maximum aggregateable prefixes",
9735 [BGP_STATS_AGGREGATES] = "BGP Aggregate advertisements",
9736 [BGP_STATS_SPACE] = "Address space advertised",
9737 [BGP_STATS_ASPATH_COUNT] = "Advertisements with paths",
9738 [BGP_STATS_ASPATH_MAXHOPS] = "Longest AS-Path (hops)",
9739 [BGP_STATS_ASPATH_MAXSIZE] = "Largest AS-Path (bytes)",
9740 [BGP_STATS_ASPATH_TOTHOPS] = "Average AS-Path length (hops)",
9741 [BGP_STATS_ASPATH_TOTSIZE] = "Average AS-Path size (bytes)",
9742 [BGP_STATS_ASN_HIGHEST] = "Highest public ASN",
9743 [BGP_STATS_MAX] = NULL,
9744 };
9745
9746 struct bgp_table_stats {
9747 struct bgp_table *table;
9748 unsigned long long counts[BGP_STATS_MAX];
9749 double total_space;
9750 };
9751
9752 #if 0
9753 #define TALLY_SIGFIG 100000
9754 static unsigned long
9755 ravg_tally (unsigned long count, unsigned long oldavg, unsigned long newval)
9756 {
9757 unsigned long newtot = (count-1) * oldavg + (newval * TALLY_SIGFIG);
9758 unsigned long res = (newtot * TALLY_SIGFIG) / count;
9759 unsigned long ret = newtot / count;
9760
9761 if ((res % TALLY_SIGFIG) > (TALLY_SIGFIG/2))
9762 return ret + 1;
9763 else
9764 return ret;
9765 }
9766 #endif
9767
9768 static int bgp_table_stats_walker(struct thread *t)
9769 {
9770 struct bgp_node *rn;
9771 struct bgp_node *top;
9772 struct bgp_table_stats *ts = THREAD_ARG(t);
9773 unsigned int space = 0;
9774
9775 if (!(top = bgp_table_top(ts->table)))
9776 return 0;
9777
9778 switch (top->p.family) {
9779 case AF_INET:
9780 space = IPV4_MAX_BITLEN;
9781 break;
9782 case AF_INET6:
9783 space = IPV6_MAX_BITLEN;
9784 break;
9785 }
9786
9787 ts->counts[BGP_STATS_MAXBITLEN] = space;
9788
9789 for (rn = top; rn; rn = bgp_route_next(rn)) {
9790 struct bgp_path_info *pi;
9791 struct bgp_node *prn = bgp_node_parent_nolock(rn);
9792 unsigned int pinum = 0;
9793
9794 if (rn == top)
9795 continue;
9796
9797 if (!rn->info)
9798 continue;
9799
9800 ts->counts[BGP_STATS_PREFIXES]++;
9801 ts->counts[BGP_STATS_TOTPLEN] += rn->p.prefixlen;
9802
9803 #if 0
9804 ts->counts[BGP_STATS_AVGPLEN]
9805 = ravg_tally (ts->counts[BGP_STATS_PREFIXES],
9806 ts->counts[BGP_STATS_AVGPLEN],
9807 rn->p.prefixlen);
9808 #endif
9809
9810 /* check if the prefix is included by any other announcements */
9811 while (prn && !prn->info)
9812 prn = bgp_node_parent_nolock(prn);
9813
9814 if (prn == NULL || prn == top) {
9815 ts->counts[BGP_STATS_UNAGGREGATEABLE]++;
9816 /* announced address space */
9817 if (space)
9818 ts->total_space +=
9819 pow(2.0, space - rn->p.prefixlen);
9820 } else if (prn->info)
9821 ts->counts[BGP_STATS_MAX_AGGREGATEABLE]++;
9822
9823 for (pi = rn->info; pi; pi = pi->next) {
9824 pinum++;
9825 ts->counts[BGP_STATS_RIB]++;
9826
9827 if (pi->attr
9828 && (CHECK_FLAG(pi->attr->flag,
9829 ATTR_FLAG_BIT(
9830 BGP_ATTR_ATOMIC_AGGREGATE))))
9831 ts->counts[BGP_STATS_AGGREGATES]++;
9832
9833 /* as-path stats */
9834 if (pi->attr && pi->attr->aspath) {
9835 unsigned int hops =
9836 aspath_count_hops(pi->attr->aspath);
9837 unsigned int size =
9838 aspath_size(pi->attr->aspath);
9839 as_t highest = aspath_highest(pi->attr->aspath);
9840
9841 ts->counts[BGP_STATS_ASPATH_COUNT]++;
9842
9843 if (hops > ts->counts[BGP_STATS_ASPATH_MAXHOPS])
9844 ts->counts[BGP_STATS_ASPATH_MAXHOPS] =
9845 hops;
9846
9847 if (size > ts->counts[BGP_STATS_ASPATH_MAXSIZE])
9848 ts->counts[BGP_STATS_ASPATH_MAXSIZE] =
9849 size;
9850
9851 ts->counts[BGP_STATS_ASPATH_TOTHOPS] += hops;
9852 ts->counts[BGP_STATS_ASPATH_TOTSIZE] += size;
9853 #if 0
9854 ts->counts[BGP_STATS_ASPATH_AVGHOPS]
9855 = ravg_tally (ts->counts[BGP_STATS_ASPATH_COUNT],
9856 ts->counts[BGP_STATS_ASPATH_AVGHOPS],
9857 hops);
9858 ts->counts[BGP_STATS_ASPATH_AVGSIZE]
9859 = ravg_tally (ts->counts[BGP_STATS_ASPATH_COUNT],
9860 ts->counts[BGP_STATS_ASPATH_AVGSIZE],
9861 size);
9862 #endif
9863 if (highest > ts->counts[BGP_STATS_ASN_HIGHEST])
9864 ts->counts[BGP_STATS_ASN_HIGHEST] =
9865 highest;
9866 }
9867 }
9868 }
9869 return 0;
9870 }
9871
9872 static int bgp_table_stats(struct vty *vty, struct bgp *bgp, afi_t afi,
9873 safi_t safi)
9874 {
9875 struct bgp_table_stats ts;
9876 unsigned int i;
9877
9878 if (!bgp->rib[afi][safi]) {
9879 vty_out(vty, "%% No RIB exist's for the AFI(%d)/SAFI(%d)\n",
9880 afi, safi);
9881 return CMD_WARNING;
9882 }
9883
9884 vty_out(vty, "BGP %s RIB statistics\n", afi_safi_print(afi, safi));
9885
9886 /* labeled-unicast routes live in the unicast table */
9887 if (safi == SAFI_LABELED_UNICAST)
9888 safi = SAFI_UNICAST;
9889
9890 memset(&ts, 0, sizeof(ts));
9891 ts.table = bgp->rib[afi][safi];
9892 thread_execute(bm->master, bgp_table_stats_walker, &ts, 0);
9893
9894 for (i = 0; i < BGP_STATS_MAX; i++) {
9895 if (!table_stats_strs[i])
9896 continue;
9897
9898 switch (i) {
9899 #if 0
9900 case BGP_STATS_ASPATH_AVGHOPS:
9901 case BGP_STATS_ASPATH_AVGSIZE:
9902 case BGP_STATS_AVGPLEN:
9903 vty_out (vty, "%-30s: ", table_stats_strs[i]);
9904 vty_out (vty, "%12.2f",
9905 (float)ts.counts[i] / (float)TALLY_SIGFIG);
9906 break;
9907 #endif
9908 case BGP_STATS_ASPATH_TOTHOPS:
9909 case BGP_STATS_ASPATH_TOTSIZE:
9910 vty_out(vty, "%-30s: ", table_stats_strs[i]);
9911 vty_out(vty, "%12.2f",
9912 ts.counts[i]
9913 ? (float)ts.counts[i]
9914 / (float)ts.counts
9915 [BGP_STATS_ASPATH_COUNT]
9916 : 0);
9917 break;
9918 case BGP_STATS_TOTPLEN:
9919 vty_out(vty, "%-30s: ", table_stats_strs[i]);
9920 vty_out(vty, "%12.2f",
9921 ts.counts[i]
9922 ? (float)ts.counts[i]
9923 / (float)ts.counts
9924 [BGP_STATS_PREFIXES]
9925 : 0);
9926 break;
9927 case BGP_STATS_SPACE:
9928 vty_out(vty, "%-30s: ", table_stats_strs[i]);
9929 vty_out(vty, "%12g\n", ts.total_space);
9930
9931 if (afi == AFI_IP6) {
9932 vty_out(vty, "%30s: ", "/32 equivalent ");
9933 vty_out(vty, "%12g\n",
9934 ts.total_space * pow(2.0, -128 + 32));
9935 vty_out(vty, "%30s: ", "/48 equivalent ");
9936 vty_out(vty, "%12g\n",
9937 ts.total_space * pow(2.0, -128 + 48));
9938 } else {
9939 vty_out(vty, "%30s: ", "% announced ");
9940 vty_out(vty, "%12.2f\n",
9941 ts.total_space * 100. * pow(2.0, -32));
9942 vty_out(vty, "%30s: ", "/8 equivalent ");
9943 vty_out(vty, "%12.2f\n",
9944 ts.total_space * pow(2.0, -32 + 8));
9945 vty_out(vty, "%30s: ", "/24 equivalent ");
9946 vty_out(vty, "%12.2f\n",
9947 ts.total_space * pow(2.0, -32 + 24));
9948 }
9949 break;
9950 default:
9951 vty_out(vty, "%-30s: ", table_stats_strs[i]);
9952 vty_out(vty, "%12llu", ts.counts[i]);
9953 }
9954
9955 vty_out(vty, "\n");
9956 }
9957 return CMD_SUCCESS;
9958 }
9959
9960 enum bgp_pcounts {
9961 PCOUNT_ADJ_IN = 0,
9962 PCOUNT_DAMPED,
9963 PCOUNT_REMOVED,
9964 PCOUNT_HISTORY,
9965 PCOUNT_STALE,
9966 PCOUNT_VALID,
9967 PCOUNT_ALL,
9968 PCOUNT_COUNTED,
9969 PCOUNT_PFCNT, /* the figure we display to users */
9970 PCOUNT_MAX,
9971 };
9972
9973 static const char *pcount_strs[] = {
9974 [PCOUNT_ADJ_IN] = "Adj-in",
9975 [PCOUNT_DAMPED] = "Damped",
9976 [PCOUNT_REMOVED] = "Removed",
9977 [PCOUNT_HISTORY] = "History",
9978 [PCOUNT_STALE] = "Stale",
9979 [PCOUNT_VALID] = "Valid",
9980 [PCOUNT_ALL] = "All RIB",
9981 [PCOUNT_COUNTED] = "PfxCt counted",
9982 [PCOUNT_PFCNT] = "Useable",
9983 [PCOUNT_MAX] = NULL,
9984 };
9985
9986 struct peer_pcounts {
9987 unsigned int count[PCOUNT_MAX];
9988 const struct peer *peer;
9989 const struct bgp_table *table;
9990 };
9991
9992 static int bgp_peer_count_walker(struct thread *t)
9993 {
9994 struct bgp_node *rn;
9995 struct peer_pcounts *pc = THREAD_ARG(t);
9996 const struct peer *peer = pc->peer;
9997
9998 for (rn = bgp_table_top(pc->table); rn; rn = bgp_route_next(rn)) {
9999 struct bgp_adj_in *ain;
10000 struct bgp_path_info *pi;
10001
10002 for (ain = rn->adj_in; ain; ain = ain->next)
10003 if (ain->peer == peer)
10004 pc->count[PCOUNT_ADJ_IN]++;
10005
10006 for (pi = rn->info; pi; pi = pi->next) {
10007 if (pi->peer != peer)
10008 continue;
10009
10010 pc->count[PCOUNT_ALL]++;
10011
10012 if (CHECK_FLAG(pi->flags, BGP_PATH_DAMPED))
10013 pc->count[PCOUNT_DAMPED]++;
10014 if (CHECK_FLAG(pi->flags, BGP_PATH_HISTORY))
10015 pc->count[PCOUNT_HISTORY]++;
10016 if (CHECK_FLAG(pi->flags, BGP_PATH_REMOVED))
10017 pc->count[PCOUNT_REMOVED]++;
10018 if (CHECK_FLAG(pi->flags, BGP_PATH_STALE))
10019 pc->count[PCOUNT_STALE]++;
10020 if (CHECK_FLAG(pi->flags, BGP_PATH_VALID))
10021 pc->count[PCOUNT_VALID]++;
10022 if (!CHECK_FLAG(pi->flags, BGP_PATH_UNUSEABLE))
10023 pc->count[PCOUNT_PFCNT]++;
10024
10025 if (CHECK_FLAG(pi->flags, BGP_PATH_COUNTED)) {
10026 pc->count[PCOUNT_COUNTED]++;
10027 if (CHECK_FLAG(pi->flags, BGP_PATH_UNUSEABLE))
10028 flog_err(
10029 EC_LIB_DEVELOPMENT,
10030 "Attempting to count but flags say it is unusable");
10031 } else {
10032 if (!CHECK_FLAG(pi->flags, BGP_PATH_UNUSEABLE))
10033 flog_err(
10034 EC_LIB_DEVELOPMENT,
10035 "Not counted but flags say we should");
10036 }
10037 }
10038 }
10039 return 0;
10040 }
10041
10042 static int bgp_peer_counts(struct vty *vty, struct peer *peer, afi_t afi,
10043 safi_t safi, bool use_json)
10044 {
10045 struct peer_pcounts pcounts = {.peer = peer};
10046 unsigned int i;
10047 json_object *json = NULL;
10048 json_object *json_loop = NULL;
10049
10050 if (use_json) {
10051 json = json_object_new_object();
10052 json_loop = json_object_new_object();
10053 }
10054
10055 if (!peer || !peer->bgp || !peer->afc[afi][safi]
10056 || !peer->bgp->rib[afi][safi]) {
10057 if (use_json) {
10058 json_object_string_add(
10059 json, "warning",
10060 "No such neighbor or address family");
10061 vty_out(vty, "%s\n", json_object_to_json_string(json));
10062 json_object_free(json);
10063 } else
10064 vty_out(vty, "%% No such neighbor or address family\n");
10065
10066 return CMD_WARNING;
10067 }
10068
10069 memset(&pcounts, 0, sizeof(pcounts));
10070 pcounts.peer = peer;
10071 pcounts.table = peer->bgp->rib[afi][safi];
10072
10073 /* in-place call via thread subsystem so as to record execution time
10074 * stats for the thread-walk (i.e. ensure this can't be blamed on
10075 * on just vty_read()).
10076 */
10077 thread_execute(bm->master, bgp_peer_count_walker, &pcounts, 0);
10078
10079 if (use_json) {
10080 json_object_string_add(json, "prefixCountsFor", peer->host);
10081 json_object_string_add(json, "multiProtocol",
10082 afi_safi_print(afi, safi));
10083 json_object_int_add(json, "pfxCounter",
10084 peer->pcount[afi][safi]);
10085
10086 for (i = 0; i < PCOUNT_MAX; i++)
10087 json_object_int_add(json_loop, pcount_strs[i],
10088 pcounts.count[i]);
10089
10090 json_object_object_add(json, "ribTableWalkCounters", json_loop);
10091
10092 if (pcounts.count[PCOUNT_PFCNT] != peer->pcount[afi][safi]) {
10093 json_object_string_add(json, "pfxctDriftFor",
10094 peer->host);
10095 json_object_string_add(
10096 json, "recommended",
10097 "Please report this bug, with the above command output");
10098 }
10099 vty_out(vty, "%s\n", json_object_to_json_string_ext(
10100 json, JSON_C_TO_STRING_PRETTY));
10101 json_object_free(json);
10102 } else {
10103
10104 if (peer->hostname
10105 && bgp_flag_check(peer->bgp, BGP_FLAG_SHOW_HOSTNAME)) {
10106 vty_out(vty, "Prefix counts for %s/%s, %s\n",
10107 peer->hostname, peer->host,
10108 afi_safi_print(afi, safi));
10109 } else {
10110 vty_out(vty, "Prefix counts for %s, %s\n", peer->host,
10111 afi_safi_print(afi, safi));
10112 }
10113
10114 vty_out(vty, "PfxCt: %ld\n", peer->pcount[afi][safi]);
10115 vty_out(vty, "\nCounts from RIB table walk:\n\n");
10116
10117 for (i = 0; i < PCOUNT_MAX; i++)
10118 vty_out(vty, "%20s: %-10d\n", pcount_strs[i],
10119 pcounts.count[i]);
10120
10121 if (pcounts.count[PCOUNT_PFCNT] != peer->pcount[afi][safi]) {
10122 vty_out(vty, "%s [pcount] PfxCt drift!\n", peer->host);
10123 vty_out(vty,
10124 "Please report this bug, with the above command output\n");
10125 }
10126 }
10127
10128 return CMD_SUCCESS;
10129 }
10130
10131 DEFUN (show_ip_bgp_instance_neighbor_prefix_counts,
10132 show_ip_bgp_instance_neighbor_prefix_counts_cmd,
10133 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_CMD_STR"]] "
10134 "neighbors <A.B.C.D|X:X::X:X|WORD> prefix-counts [json]",
10135 SHOW_STR
10136 IP_STR
10137 BGP_STR
10138 BGP_INSTANCE_HELP_STR
10139 BGP_AFI_HELP_STR
10140 BGP_SAFI_HELP_STR
10141 "Detailed information on TCP and BGP neighbor connections\n"
10142 "Neighbor to display information about\n"
10143 "Neighbor to display information about\n"
10144 "Neighbor on BGP configured interface\n"
10145 "Display detailed prefix count information\n"
10146 JSON_STR)
10147 {
10148 afi_t afi = AFI_IP6;
10149 safi_t safi = SAFI_UNICAST;
10150 struct peer *peer;
10151 int idx = 0;
10152 struct bgp *bgp = NULL;
10153 bool uj = use_json(argc, argv);
10154
10155 if (uj)
10156 argc--;
10157
10158 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
10159 &bgp, uj);
10160 if (!idx)
10161 return CMD_WARNING;
10162
10163 argv_find(argv, argc, "neighbors", &idx);
10164 peer = peer_lookup_in_view(vty, bgp, argv[idx + 1]->arg, uj);
10165 if (!peer)
10166 return CMD_WARNING;
10167
10168 return bgp_peer_counts(vty, peer, AFI_IP, SAFI_UNICAST, uj);
10169 }
10170
10171 #ifdef KEEP_OLD_VPN_COMMANDS
10172 DEFUN (show_ip_bgp_vpn_neighbor_prefix_counts,
10173 show_ip_bgp_vpn_neighbor_prefix_counts_cmd,
10174 "show [ip] bgp <vpnv4|vpnv6> all neighbors <A.B.C.D|X:X::X:X|WORD> prefix-counts [json]",
10175 SHOW_STR
10176 IP_STR
10177 BGP_STR
10178 BGP_VPNVX_HELP_STR
10179 "Display information about all VPNv4 NLRIs\n"
10180 "Detailed information on TCP and BGP neighbor connections\n"
10181 "Neighbor to display information about\n"
10182 "Neighbor to display information about\n"
10183 "Neighbor on BGP configured interface\n"
10184 "Display detailed prefix count information\n"
10185 JSON_STR)
10186 {
10187 int idx_peer = 6;
10188 struct peer *peer;
10189 bool uj = use_json(argc, argv);
10190
10191 peer = peer_lookup_in_view(vty, NULL, argv[idx_peer]->arg, uj);
10192 if (!peer)
10193 return CMD_WARNING;
10194
10195 return bgp_peer_counts(vty, peer, AFI_IP, SAFI_MPLS_VPN, uj);
10196 }
10197
10198 DEFUN (show_ip_bgp_vpn_all_route_prefix,
10199 show_ip_bgp_vpn_all_route_prefix_cmd,
10200 "show [ip] bgp <vpnv4|vpnv6> all <A.B.C.D|A.B.C.D/M> [json]",
10201 SHOW_STR
10202 IP_STR
10203 BGP_STR
10204 BGP_VPNVX_HELP_STR
10205 "Display information about all VPNv4 NLRIs\n"
10206 "Network in the BGP routing table to display\n"
10207 "Network in the BGP routing table to display\n"
10208 JSON_STR)
10209 {
10210 int idx = 0;
10211 char *network = NULL;
10212 struct bgp *bgp = bgp_get_default();
10213 if (!bgp) {
10214 vty_out(vty, "Can't find default instance\n");
10215 return CMD_WARNING;
10216 }
10217
10218 if (argv_find(argv, argc, "A.B.C.D", &idx))
10219 network = argv[idx]->arg;
10220 else if (argv_find(argv, argc, "A.B.C.D/M", &idx))
10221 network = argv[idx]->arg;
10222 else {
10223 vty_out(vty, "Unable to figure out Network\n");
10224 return CMD_WARNING;
10225 }
10226
10227 return bgp_show_route(vty, bgp, network, AFI_IP, SAFI_MPLS_VPN, NULL, 0,
10228 BGP_PATH_SHOW_ALL, use_json(argc, argv));
10229 }
10230 #endif /* KEEP_OLD_VPN_COMMANDS */
10231
10232 DEFUN (show_ip_bgp_l2vpn_evpn_all_route_prefix,
10233 show_ip_bgp_l2vpn_evpn_all_route_prefix_cmd,
10234 "show [ip] bgp l2vpn evpn all <A.B.C.D|A.B.C.D/M> [json]",
10235 SHOW_STR
10236 IP_STR
10237 BGP_STR
10238 L2VPN_HELP_STR
10239 EVPN_HELP_STR
10240 "Display information about all EVPN NLRIs\n"
10241 "Network in the BGP routing table to display\n"
10242 "Network in the BGP routing table to display\n"
10243 JSON_STR)
10244 {
10245 int idx = 0;
10246 char *network = NULL;
10247
10248 if (argv_find(argv, argc, "A.B.C.D", &idx))
10249 network = argv[idx]->arg;
10250 else if (argv_find(argv, argc, "A.B.C.D/M", &idx))
10251 network = argv[idx]->arg;
10252 else {
10253 vty_out(vty, "Unable to figure out Network\n");
10254 return CMD_WARNING;
10255 }
10256 return bgp_show_route(vty, NULL, network, AFI_L2VPN, SAFI_EVPN, NULL, 0,
10257 BGP_PATH_SHOW_ALL, use_json(argc, argv));
10258 }
10259
10260 static void show_adj_route(struct vty *vty, struct peer *peer, afi_t afi,
10261 safi_t safi, enum bgp_show_adj_route_type type,
10262 const char *rmap_name, bool use_json,
10263 json_object *json)
10264 {
10265 struct bgp_table *table;
10266 struct bgp_adj_in *ain;
10267 struct bgp_adj_out *adj;
10268 unsigned long output_count;
10269 unsigned long filtered_count;
10270 struct bgp_node *rn;
10271 int header1 = 1;
10272 struct bgp *bgp;
10273 int header2 = 1;
10274 struct attr attr;
10275 int ret;
10276 struct update_subgroup *subgrp;
10277 json_object *json_scode = NULL;
10278 json_object *json_ocode = NULL;
10279 json_object *json_ar = NULL;
10280 struct peer_af *paf;
10281 bool route_filtered;
10282
10283 if (use_json) {
10284 json_scode = json_object_new_object();
10285 json_ocode = json_object_new_object();
10286 json_ar = json_object_new_object();
10287
10288 json_object_string_add(json_scode, "suppressed", "s");
10289 json_object_string_add(json_scode, "damped", "d");
10290 json_object_string_add(json_scode, "history", "h");
10291 json_object_string_add(json_scode, "valid", "*");
10292 json_object_string_add(json_scode, "best", ">");
10293 json_object_string_add(json_scode, "multipath", "=");
10294 json_object_string_add(json_scode, "internal", "i");
10295 json_object_string_add(json_scode, "ribFailure", "r");
10296 json_object_string_add(json_scode, "stale", "S");
10297 json_object_string_add(json_scode, "removed", "R");
10298
10299 json_object_string_add(json_ocode, "igp", "i");
10300 json_object_string_add(json_ocode, "egp", "e");
10301 json_object_string_add(json_ocode, "incomplete", "?");
10302 }
10303
10304 bgp = peer->bgp;
10305
10306 if (!bgp) {
10307 if (use_json) {
10308 json_object_string_add(json, "alert", "no BGP");
10309 vty_out(vty, "%s\n", json_object_to_json_string(json));
10310 json_object_free(json);
10311 } else
10312 vty_out(vty, "%% No bgp\n");
10313 return;
10314 }
10315
10316 table = bgp->rib[afi][safi];
10317
10318 output_count = filtered_count = 0;
10319 subgrp = peer_subgroup(peer, afi, safi);
10320
10321 if (type == bgp_show_adj_route_advertised && subgrp
10322 && CHECK_FLAG(subgrp->sflags, SUBGRP_STATUS_DEFAULT_ORIGINATE)) {
10323 if (use_json) {
10324 json_object_int_add(json, "bgpTableVersion",
10325 table->version);
10326 json_object_string_add(json, "bgpLocalRouterId",
10327 inet_ntoa(bgp->router_id));
10328 json_object_object_add(json, "bgpStatusCodes",
10329 json_scode);
10330 json_object_object_add(json, "bgpOriginCodes",
10331 json_ocode);
10332 json_object_string_add(
10333 json, "bgpOriginatingDefaultNetwork",
10334 (afi == AFI_IP) ? "0.0.0.0/0" : "::/0");
10335 } else {
10336 vty_out(vty, "BGP table version is %" PRIu64
10337 ", local router ID is %s, vrf id ",
10338 table->version, inet_ntoa(bgp->router_id));
10339 if (bgp->vrf_id == VRF_UNKNOWN)
10340 vty_out(vty, "%s", VRFID_NONE_STR);
10341 else
10342 vty_out(vty, "%u", bgp->vrf_id);
10343 vty_out(vty, "\n");
10344 vty_out(vty, BGP_SHOW_SCODE_HEADER);
10345 vty_out(vty, BGP_SHOW_NCODE_HEADER);
10346 vty_out(vty, BGP_SHOW_OCODE_HEADER);
10347
10348 vty_out(vty, "Originating default network %s\n\n",
10349 (afi == AFI_IP) ? "0.0.0.0/0" : "::/0");
10350 }
10351 header1 = 0;
10352 }
10353
10354 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn)) {
10355 if (type == bgp_show_adj_route_received
10356 || type == bgp_show_adj_route_filtered) {
10357 for (ain = rn->adj_in; ain; ain = ain->next) {
10358 if (ain->peer != peer || !ain->attr)
10359 continue;
10360
10361 if (header1) {
10362 if (use_json) {
10363 json_object_int_add(
10364 json, "bgpTableVersion",
10365 0);
10366 json_object_string_add(
10367 json,
10368 "bgpLocalRouterId",
10369 inet_ntoa(
10370 bgp->router_id));
10371 json_object_object_add(
10372 json, "bgpStatusCodes",
10373 json_scode);
10374 json_object_object_add(
10375 json, "bgpOriginCodes",
10376 json_ocode);
10377 } else {
10378 vty_out(vty,
10379 "BGP table version is 0, local router ID is %s, vrf id ",
10380 inet_ntoa(
10381 bgp->router_id));
10382 if (bgp->vrf_id == VRF_UNKNOWN)
10383 vty_out(vty, "%s",
10384 VRFID_NONE_STR);
10385 else
10386 vty_out(vty, "%u",
10387 bgp->vrf_id);
10388 vty_out(vty, "\n");
10389 vty_out(vty,
10390 BGP_SHOW_SCODE_HEADER);
10391 vty_out(vty,
10392 BGP_SHOW_NCODE_HEADER);
10393 vty_out(vty,
10394 BGP_SHOW_OCODE_HEADER);
10395 }
10396 header1 = 0;
10397 }
10398 if (header2) {
10399 if (!use_json)
10400 vty_out(vty, BGP_SHOW_HEADER);
10401 header2 = 0;
10402 }
10403
10404 bgp_attr_dup(&attr, ain->attr);
10405 route_filtered = false;
10406
10407 /* Filter prefix using distribute list,
10408 * filter list or prefix list
10409 */
10410 if ((bgp_input_filter(peer, &rn->p, &attr, afi,
10411 safi)) == FILTER_DENY)
10412 route_filtered = true;
10413
10414 /* Filter prefix using route-map */
10415 ret = bgp_input_modifier(peer, &rn->p, &attr,
10416 afi, safi, rmap_name);
10417
10418 if (type == bgp_show_adj_route_filtered &&
10419 !route_filtered && ret != RMAP_DENY) {
10420 bgp_attr_undup(&attr, ain->attr);
10421 continue;
10422 }
10423
10424 if (type == bgp_show_adj_route_received &&
10425 (route_filtered || ret == RMAP_DENY))
10426 filtered_count++;
10427
10428 route_vty_out_tmp(vty, &rn->p, &attr, safi,
10429 use_json, json_ar);
10430 bgp_attr_undup(&attr, ain->attr);
10431 output_count++;
10432 }
10433 } else if (type == bgp_show_adj_route_advertised) {
10434 for (adj = rn->adj_out; adj; adj = adj->next)
10435 SUBGRP_FOREACH_PEER (adj->subgroup, paf) {
10436 if (paf->peer != peer || !adj->attr)
10437 continue;
10438
10439 if (header1) {
10440 if (use_json) {
10441 json_object_int_add(
10442 json,
10443 "bgpTableVersion",
10444 table->version);
10445 json_object_string_add(
10446 json,
10447 "bgpLocalRouterId",
10448 inet_ntoa(
10449 bgp->router_id));
10450 json_object_object_add(
10451 json,
10452 "bgpStatusCodes",
10453 json_scode);
10454 json_object_object_add(
10455 json,
10456 "bgpOriginCodes",
10457 json_ocode);
10458 } else {
10459 vty_out(vty,
10460 "BGP table version is %" PRIu64
10461 ", local router ID is %s, vrf id ",
10462 table->version,
10463 inet_ntoa(
10464 bgp->router_id));
10465 if (bgp->vrf_id ==
10466 VRF_UNKNOWN)
10467 vty_out(vty,
10468 "%s",
10469 VRFID_NONE_STR);
10470 else
10471 vty_out(vty,
10472 "%u",
10473 bgp->vrf_id);
10474 vty_out(vty, "\n");
10475 vty_out(vty,
10476 BGP_SHOW_SCODE_HEADER);
10477 vty_out(vty,
10478 BGP_SHOW_NCODE_HEADER);
10479 vty_out(vty,
10480 BGP_SHOW_OCODE_HEADER);
10481 }
10482 header1 = 0;
10483 }
10484 if (header2) {
10485 if (!use_json)
10486 vty_out(vty,
10487 BGP_SHOW_HEADER);
10488 header2 = 0;
10489 }
10490
10491 bgp_attr_dup(&attr, adj->attr);
10492 ret = bgp_output_modifier(
10493 peer, &rn->p, &attr, afi, safi,
10494 rmap_name);
10495
10496 if (ret != RMAP_DENY) {
10497 route_vty_out_tmp(vty, &rn->p,
10498 &attr, safi,
10499 use_json,
10500 json_ar);
10501 output_count++;
10502 } else {
10503 filtered_count++;
10504 }
10505
10506 bgp_attr_undup(&attr, adj->attr);
10507 }
10508 }
10509 }
10510
10511 if (use_json) {
10512 json_object_object_add(json, "advertisedRoutes", json_ar);
10513 json_object_int_add(json, "totalPrefixCounter", output_count);
10514 json_object_int_add(json, "filteredPrefixCounter",
10515 filtered_count);
10516
10517 vty_out(vty, "%s\n", json_object_to_json_string_ext(
10518 json, JSON_C_TO_STRING_PRETTY));
10519 json_object_free(json);
10520 } else if (output_count > 0) {
10521 if (filtered_count > 0)
10522 vty_out(vty,
10523 "\nTotal number of prefixes %ld (%ld filtered)\n",
10524 output_count, filtered_count);
10525 else
10526 vty_out(vty, "\nTotal number of prefixes %ld\n",
10527 output_count);
10528 }
10529 }
10530
10531 static int peer_adj_routes(struct vty *vty, struct peer *peer, afi_t afi,
10532 safi_t safi, enum bgp_show_adj_route_type type,
10533 const char *rmap_name, bool use_json)
10534 {
10535 json_object *json = NULL;
10536
10537 if (use_json)
10538 json = json_object_new_object();
10539
10540 /* labeled-unicast routes live in the unicast table */
10541 if (safi == SAFI_LABELED_UNICAST)
10542 safi = SAFI_UNICAST;
10543
10544 if (!peer || !peer->afc[afi][safi]) {
10545 if (use_json) {
10546 json_object_string_add(
10547 json, "warning",
10548 "No such neighbor or address family");
10549 vty_out(vty, "%s\n", json_object_to_json_string(json));
10550 json_object_free(json);
10551 } else
10552 vty_out(vty, "%% No such neighbor or address family\n");
10553
10554 return CMD_WARNING;
10555 }
10556
10557 if ((type == bgp_show_adj_route_received
10558 || type == bgp_show_adj_route_filtered)
10559 && !CHECK_FLAG(peer->af_flags[afi][safi],
10560 PEER_FLAG_SOFT_RECONFIG)) {
10561 if (use_json) {
10562 json_object_string_add(
10563 json, "warning",
10564 "Inbound soft reconfiguration not enabled");
10565 vty_out(vty, "%s\n", json_object_to_json_string(json));
10566 json_object_free(json);
10567 } else
10568 vty_out(vty,
10569 "%% Inbound soft reconfiguration not enabled\n");
10570
10571 return CMD_WARNING;
10572 }
10573
10574 show_adj_route(vty, peer, afi, safi, type, rmap_name, use_json, json);
10575
10576 return CMD_SUCCESS;
10577 }
10578
10579 DEFUN (show_ip_bgp_instance_neighbor_advertised_route,
10580 show_ip_bgp_instance_neighbor_advertised_route_cmd,
10581 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] "
10582 "neighbors <A.B.C.D|X:X::X:X|WORD> <advertised-routes|received-routes|filtered-routes> [route-map WORD] [json]",
10583 SHOW_STR
10584 IP_STR
10585 BGP_STR
10586 BGP_INSTANCE_HELP_STR
10587 BGP_AFI_HELP_STR
10588 BGP_SAFI_WITH_LABEL_HELP_STR
10589 "Detailed information on TCP and BGP neighbor connections\n"
10590 "Neighbor to display information about\n"
10591 "Neighbor to display information about\n"
10592 "Neighbor on BGP configured interface\n"
10593 "Display the routes advertised to a BGP neighbor\n"
10594 "Display the received routes from neighbor\n"
10595 "Display the filtered routes received from neighbor\n"
10596 "Route-map to modify the attributes\n"
10597 "Name of the route map\n"
10598 JSON_STR)
10599 {
10600 afi_t afi = AFI_IP6;
10601 safi_t safi = SAFI_UNICAST;
10602 char *rmap_name = NULL;
10603 char *peerstr = NULL;
10604 struct bgp *bgp = NULL;
10605 struct peer *peer;
10606 enum bgp_show_adj_route_type type = bgp_show_adj_route_advertised;
10607 int idx = 0;
10608 bool uj = use_json(argc, argv);
10609
10610 if (uj)
10611 argc--;
10612
10613 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
10614 &bgp, uj);
10615 if (!idx)
10616 return CMD_WARNING;
10617
10618 /* neighbors <A.B.C.D|X:X::X:X|WORD> */
10619 argv_find(argv, argc, "neighbors", &idx);
10620 peerstr = argv[++idx]->arg;
10621
10622 peer = peer_lookup_in_view(vty, bgp, peerstr, uj);
10623 if (!peer)
10624 return CMD_WARNING;
10625
10626 if (argv_find(argv, argc, "advertised-routes", &idx))
10627 type = bgp_show_adj_route_advertised;
10628 else if (argv_find(argv, argc, "received-routes", &idx))
10629 type = bgp_show_adj_route_received;
10630 else if (argv_find(argv, argc, "filtered-routes", &idx))
10631 type = bgp_show_adj_route_filtered;
10632
10633 if (argv_find(argv, argc, "route-map", &idx))
10634 rmap_name = argv[++idx]->arg;
10635
10636 return peer_adj_routes(vty, peer, afi, safi, type, rmap_name, uj);
10637 }
10638
10639 DEFUN (show_ip_bgp_neighbor_received_prefix_filter,
10640 show_ip_bgp_neighbor_received_prefix_filter_cmd,
10641 "show [ip] bgp [<ipv4|ipv6> [unicast]] neighbors <A.B.C.D|X:X::X:X|WORD> received prefix-filter [json]",
10642 SHOW_STR
10643 IP_STR
10644 BGP_STR
10645 "Address Family\n"
10646 "Address Family\n"
10647 "Address Family modifier\n"
10648 "Detailed information on TCP and BGP neighbor connections\n"
10649 "Neighbor to display information about\n"
10650 "Neighbor to display information about\n"
10651 "Neighbor on BGP configured interface\n"
10652 "Display information received from a BGP neighbor\n"
10653 "Display the prefixlist filter\n"
10654 JSON_STR)
10655 {
10656 afi_t afi = AFI_IP6;
10657 safi_t safi = SAFI_UNICAST;
10658 char *peerstr = NULL;
10659
10660 char name[BUFSIZ];
10661 union sockunion su;
10662 struct peer *peer;
10663 int count, ret;
10664
10665 int idx = 0;
10666
10667 /* show [ip] bgp */
10668 if (argv_find(argv, argc, "ip", &idx))
10669 afi = AFI_IP;
10670 /* [<ipv4|ipv6> [unicast]] */
10671 if (argv_find(argv, argc, "ipv4", &idx))
10672 afi = AFI_IP;
10673 if (argv_find(argv, argc, "ipv6", &idx))
10674 afi = AFI_IP6;
10675 /* neighbors <A.B.C.D|X:X::X:X|WORD> */
10676 argv_find(argv, argc, "neighbors", &idx);
10677 peerstr = argv[++idx]->arg;
10678
10679 bool uj = use_json(argc, argv);
10680
10681 ret = str2sockunion(peerstr, &su);
10682 if (ret < 0) {
10683 peer = peer_lookup_by_conf_if(NULL, peerstr);
10684 if (!peer) {
10685 if (uj)
10686 vty_out(vty, "{}\n");
10687 else
10688 vty_out(vty,
10689 "%% Malformed address or name: %s\n",
10690 peerstr);
10691 return CMD_WARNING;
10692 }
10693 } else {
10694 peer = peer_lookup(NULL, &su);
10695 if (!peer) {
10696 if (uj)
10697 vty_out(vty, "{}\n");
10698 else
10699 vty_out(vty, "No peer\n");
10700 return CMD_WARNING;
10701 }
10702 }
10703
10704 sprintf(name, "%s.%d.%d", peer->host, afi, safi);
10705 count = prefix_bgp_show_prefix_list(NULL, afi, name, uj);
10706 if (count) {
10707 if (!uj)
10708 vty_out(vty, "Address Family: %s\n",
10709 afi_safi_print(afi, safi));
10710 prefix_bgp_show_prefix_list(vty, afi, name, uj);
10711 } else {
10712 if (uj)
10713 vty_out(vty, "{}\n");
10714 else
10715 vty_out(vty, "No functional output\n");
10716 }
10717
10718 return CMD_SUCCESS;
10719 }
10720
10721 static int bgp_show_neighbor_route(struct vty *vty, struct peer *peer,
10722 afi_t afi, safi_t safi,
10723 enum bgp_show_type type, bool use_json)
10724 {
10725 /* labeled-unicast routes live in the unicast table */
10726 if (safi == SAFI_LABELED_UNICAST)
10727 safi = SAFI_UNICAST;
10728
10729 if (!peer || !peer->afc[afi][safi]) {
10730 if (use_json) {
10731 json_object *json_no = NULL;
10732 json_no = json_object_new_object();
10733 json_object_string_add(
10734 json_no, "warning",
10735 "No such neighbor or address family");
10736 vty_out(vty, "%s\n",
10737 json_object_to_json_string(json_no));
10738 json_object_free(json_no);
10739 } else
10740 vty_out(vty, "%% No such neighbor or address family\n");
10741 return CMD_WARNING;
10742 }
10743
10744 return bgp_show(vty, peer->bgp, afi, safi, type, &peer->su, use_json);
10745 }
10746
10747 DEFUN (show_ip_bgp_flowspec_routes_detailed,
10748 show_ip_bgp_flowspec_routes_detailed_cmd,
10749 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" flowspec] detail [json]",
10750 SHOW_STR
10751 IP_STR
10752 BGP_STR
10753 BGP_INSTANCE_HELP_STR
10754 BGP_AFI_HELP_STR
10755 "SAFI Flowspec\n"
10756 "Detailed information on flowspec entries\n"
10757 JSON_STR)
10758 {
10759 afi_t afi = AFI_IP;
10760 safi_t safi = SAFI_UNICAST;
10761 struct bgp *bgp = NULL;
10762 int idx = 0;
10763 bool uj = use_json(argc, argv);
10764
10765 if (uj)
10766 argc--;
10767
10768 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
10769 &bgp, uj);
10770 if (!idx)
10771 return CMD_WARNING;
10772
10773 return bgp_show(vty, bgp, afi, safi, bgp_show_type_detail, NULL, uj);
10774 }
10775
10776 DEFUN (show_ip_bgp_neighbor_routes,
10777 show_ip_bgp_neighbor_routes_cmd,
10778 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] "
10779 "neighbors <A.B.C.D|X:X::X:X|WORD> <flap-statistics|dampened-routes|routes> [json]",
10780 SHOW_STR
10781 IP_STR
10782 BGP_STR
10783 BGP_INSTANCE_HELP_STR
10784 BGP_AFI_HELP_STR
10785 BGP_SAFI_WITH_LABEL_HELP_STR
10786 "Detailed information on TCP and BGP neighbor connections\n"
10787 "Neighbor to display information about\n"
10788 "Neighbor to display information about\n"
10789 "Neighbor on BGP configured interface\n"
10790 "Display flap statistics of the routes learned from neighbor\n"
10791 "Display the dampened routes received from neighbor\n"
10792 "Display routes learned from neighbor\n"
10793 JSON_STR)
10794 {
10795 char *peerstr = NULL;
10796 struct bgp *bgp = NULL;
10797 afi_t afi = AFI_IP6;
10798 safi_t safi = SAFI_UNICAST;
10799 struct peer *peer;
10800 enum bgp_show_type sh_type = bgp_show_type_neighbor;
10801 int idx = 0;
10802 bool uj = use_json(argc, argv);
10803
10804 if (uj)
10805 argc--;
10806
10807 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
10808 &bgp, uj);
10809 if (!idx)
10810 return CMD_WARNING;
10811
10812 /* neighbors <A.B.C.D|X:X::X:X|WORD> */
10813 argv_find(argv, argc, "neighbors", &idx);
10814 peerstr = argv[++idx]->arg;
10815
10816 peer = peer_lookup_in_view(vty, bgp, peerstr, uj);
10817 if (!peer)
10818 return CMD_WARNING;
10819
10820 if (argv_find(argv, argc, "flap-statistics", &idx))
10821 sh_type = bgp_show_type_flap_neighbor;
10822 else if (argv_find(argv, argc, "dampened-routes", &idx))
10823 sh_type = bgp_show_type_damp_neighbor;
10824 else if (argv_find(argv, argc, "routes", &idx))
10825 sh_type = bgp_show_type_neighbor;
10826
10827 return bgp_show_neighbor_route(vty, peer, afi, safi, sh_type, uj);
10828 }
10829
10830 struct bgp_table *bgp_distance_table[AFI_MAX][SAFI_MAX];
10831
10832 struct bgp_distance {
10833 /* Distance value for the IP source prefix. */
10834 uint8_t distance;
10835
10836 /* Name of the access-list to be matched. */
10837 char *access_list;
10838 };
10839
10840 DEFUN (show_bgp_afi_vpn_rd_route,
10841 show_bgp_afi_vpn_rd_route_cmd,
10842 "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]",
10843 SHOW_STR
10844 BGP_STR
10845 BGP_AFI_HELP_STR
10846 "Address Family modifier\n"
10847 "Display information for a route distinguisher\n"
10848 "Route Distinguisher\n"
10849 "Network in the BGP routing table to display\n"
10850 "Network in the BGP routing table to display\n"
10851 JSON_STR)
10852 {
10853 int ret;
10854 struct prefix_rd prd;
10855 afi_t afi = AFI_MAX;
10856 int idx = 0;
10857
10858 if (!argv_find_and_parse_afi(argv, argc, &idx, &afi)) {
10859 vty_out(vty, "%% Malformed Address Family\n");
10860 return CMD_WARNING;
10861 }
10862
10863 ret = str2prefix_rd(argv[5]->arg, &prd);
10864 if (!ret) {
10865 vty_out(vty, "%% Malformed Route Distinguisher\n");
10866 return CMD_WARNING;
10867 }
10868
10869 return bgp_show_route(vty, NULL, argv[6]->arg, afi, SAFI_MPLS_VPN, &prd,
10870 0, BGP_PATH_SHOW_ALL, use_json(argc, argv));
10871 }
10872
10873 static struct bgp_distance *bgp_distance_new(void)
10874 {
10875 return XCALLOC(MTYPE_BGP_DISTANCE, sizeof(struct bgp_distance));
10876 }
10877
10878 static void bgp_distance_free(struct bgp_distance *bdistance)
10879 {
10880 XFREE(MTYPE_BGP_DISTANCE, bdistance);
10881 }
10882
10883 static int bgp_distance_set(struct vty *vty, const char *distance_str,
10884 const char *ip_str, const char *access_list_str)
10885 {
10886 int ret;
10887 afi_t afi;
10888 safi_t safi;
10889 struct prefix p;
10890 uint8_t distance;
10891 struct bgp_node *rn;
10892 struct bgp_distance *bdistance;
10893
10894 afi = bgp_node_afi(vty);
10895 safi = bgp_node_safi(vty);
10896
10897 ret = str2prefix(ip_str, &p);
10898 if (ret == 0) {
10899 vty_out(vty, "Malformed prefix\n");
10900 return CMD_WARNING_CONFIG_FAILED;
10901 }
10902
10903 distance = atoi(distance_str);
10904
10905 /* Get BGP distance node. */
10906 rn = bgp_node_get(bgp_distance_table[afi][safi], (struct prefix *)&p);
10907 bdistance = bgp_distance_get_node(rn);
10908 if (bdistance)
10909 bgp_unlock_node(rn);
10910 else {
10911 bdistance = bgp_distance_new();
10912 bgp_distance_set_node_info(rn, bdistance);
10913 }
10914
10915 /* Set distance value. */
10916 bdistance->distance = distance;
10917
10918 /* Reset access-list configuration. */
10919 if (bdistance->access_list) {
10920 XFREE(MTYPE_AS_LIST, bdistance->access_list);
10921 bdistance->access_list = NULL;
10922 }
10923 if (access_list_str)
10924 bdistance->access_list =
10925 XSTRDUP(MTYPE_AS_LIST, access_list_str);
10926
10927 return CMD_SUCCESS;
10928 }
10929
10930 static int bgp_distance_unset(struct vty *vty, const char *distance_str,
10931 const char *ip_str, const char *access_list_str)
10932 {
10933 int ret;
10934 afi_t afi;
10935 safi_t safi;
10936 struct prefix p;
10937 int distance;
10938 struct bgp_node *rn;
10939 struct bgp_distance *bdistance;
10940
10941 afi = bgp_node_afi(vty);
10942 safi = bgp_node_safi(vty);
10943
10944 ret = str2prefix(ip_str, &p);
10945 if (ret == 0) {
10946 vty_out(vty, "Malformed prefix\n");
10947 return CMD_WARNING_CONFIG_FAILED;
10948 }
10949
10950 rn = bgp_node_lookup(bgp_distance_table[afi][safi],
10951 (struct prefix *)&p);
10952 if (!rn) {
10953 vty_out(vty, "Can't find specified prefix\n");
10954 return CMD_WARNING_CONFIG_FAILED;
10955 }
10956
10957 bdistance = bgp_distance_get_node(rn);
10958 distance = atoi(distance_str);
10959
10960 if (bdistance->distance != distance) {
10961 vty_out(vty, "Distance does not match configured\n");
10962 return CMD_WARNING_CONFIG_FAILED;
10963 }
10964
10965 if (bdistance->access_list)
10966 XFREE(MTYPE_AS_LIST, bdistance->access_list);
10967 bgp_distance_free(bdistance);
10968
10969 rn->info = NULL;
10970 bgp_unlock_node(rn);
10971 bgp_unlock_node(rn);
10972
10973 return CMD_SUCCESS;
10974 }
10975
10976 /* Apply BGP information to distance method. */
10977 uint8_t bgp_distance_apply(struct prefix *p, struct bgp_path_info *pinfo,
10978 afi_t afi, safi_t safi, struct bgp *bgp)
10979 {
10980 struct bgp_node *rn;
10981 struct prefix q;
10982 struct peer *peer;
10983 struct bgp_distance *bdistance;
10984 struct access_list *alist;
10985 struct bgp_static *bgp_static;
10986
10987 if (!bgp)
10988 return 0;
10989
10990 peer = pinfo->peer;
10991
10992 /* Check source address. */
10993 sockunion2hostprefix(&peer->su, &q);
10994 rn = bgp_node_match(bgp_distance_table[afi][safi], &q);
10995 if (rn) {
10996 bdistance = bgp_distance_get_node(rn);
10997 bgp_unlock_node(rn);
10998
10999 if (bdistance->access_list) {
11000 alist = access_list_lookup(afi, bdistance->access_list);
11001 if (alist
11002 && access_list_apply(alist, p) == FILTER_PERMIT)
11003 return bdistance->distance;
11004 } else
11005 return bdistance->distance;
11006 }
11007
11008 /* Backdoor check. */
11009 rn = bgp_node_lookup(bgp->route[afi][safi], p);
11010 if (rn) {
11011 bgp_static = bgp_static_get_node_info(rn);
11012 bgp_unlock_node(rn);
11013
11014 if (bgp_static->backdoor) {
11015 if (bgp->distance_local[afi][safi])
11016 return bgp->distance_local[afi][safi];
11017 else
11018 return ZEBRA_IBGP_DISTANCE_DEFAULT;
11019 }
11020 }
11021
11022 if (peer->sort == BGP_PEER_EBGP) {
11023 if (bgp->distance_ebgp[afi][safi])
11024 return bgp->distance_ebgp[afi][safi];
11025 return ZEBRA_EBGP_DISTANCE_DEFAULT;
11026 } else {
11027 if (bgp->distance_ibgp[afi][safi])
11028 return bgp->distance_ibgp[afi][safi];
11029 return ZEBRA_IBGP_DISTANCE_DEFAULT;
11030 }
11031 }
11032
11033 DEFUN (bgp_distance,
11034 bgp_distance_cmd,
11035 "distance bgp (1-255) (1-255) (1-255)",
11036 "Define an administrative distance\n"
11037 "BGP distance\n"
11038 "Distance for routes external to the AS\n"
11039 "Distance for routes internal to the AS\n"
11040 "Distance for local routes\n")
11041 {
11042 VTY_DECLVAR_CONTEXT(bgp, bgp);
11043 int idx_number = 2;
11044 int idx_number_2 = 3;
11045 int idx_number_3 = 4;
11046 afi_t afi;
11047 safi_t safi;
11048
11049 afi = bgp_node_afi(vty);
11050 safi = bgp_node_safi(vty);
11051
11052 bgp->distance_ebgp[afi][safi] = atoi(argv[idx_number]->arg);
11053 bgp->distance_ibgp[afi][safi] = atoi(argv[idx_number_2]->arg);
11054 bgp->distance_local[afi][safi] = atoi(argv[idx_number_3]->arg);
11055 return CMD_SUCCESS;
11056 }
11057
11058 DEFUN (no_bgp_distance,
11059 no_bgp_distance_cmd,
11060 "no distance bgp [(1-255) (1-255) (1-255)]",
11061 NO_STR
11062 "Define an administrative distance\n"
11063 "BGP distance\n"
11064 "Distance for routes external to the AS\n"
11065 "Distance for routes internal to the AS\n"
11066 "Distance for local routes\n")
11067 {
11068 VTY_DECLVAR_CONTEXT(bgp, bgp);
11069 afi_t afi;
11070 safi_t safi;
11071
11072 afi = bgp_node_afi(vty);
11073 safi = bgp_node_safi(vty);
11074
11075 bgp->distance_ebgp[afi][safi] = 0;
11076 bgp->distance_ibgp[afi][safi] = 0;
11077 bgp->distance_local[afi][safi] = 0;
11078 return CMD_SUCCESS;
11079 }
11080
11081
11082 DEFUN (bgp_distance_source,
11083 bgp_distance_source_cmd,
11084 "distance (1-255) A.B.C.D/M",
11085 "Define an administrative distance\n"
11086 "Administrative distance\n"
11087 "IP source prefix\n")
11088 {
11089 int idx_number = 1;
11090 int idx_ipv4_prefixlen = 2;
11091 bgp_distance_set(vty, argv[idx_number]->arg,
11092 argv[idx_ipv4_prefixlen]->arg, NULL);
11093 return CMD_SUCCESS;
11094 }
11095
11096 DEFUN (no_bgp_distance_source,
11097 no_bgp_distance_source_cmd,
11098 "no distance (1-255) A.B.C.D/M",
11099 NO_STR
11100 "Define an administrative distance\n"
11101 "Administrative distance\n"
11102 "IP source prefix\n")
11103 {
11104 int idx_number = 2;
11105 int idx_ipv4_prefixlen = 3;
11106 bgp_distance_unset(vty, argv[idx_number]->arg,
11107 argv[idx_ipv4_prefixlen]->arg, NULL);
11108 return CMD_SUCCESS;
11109 }
11110
11111 DEFUN (bgp_distance_source_access_list,
11112 bgp_distance_source_access_list_cmd,
11113 "distance (1-255) A.B.C.D/M WORD",
11114 "Define an administrative distance\n"
11115 "Administrative distance\n"
11116 "IP source prefix\n"
11117 "Access list name\n")
11118 {
11119 int idx_number = 1;
11120 int idx_ipv4_prefixlen = 2;
11121 int idx_word = 3;
11122 bgp_distance_set(vty, argv[idx_number]->arg,
11123 argv[idx_ipv4_prefixlen]->arg, argv[idx_word]->arg);
11124 return CMD_SUCCESS;
11125 }
11126
11127 DEFUN (no_bgp_distance_source_access_list,
11128 no_bgp_distance_source_access_list_cmd,
11129 "no distance (1-255) A.B.C.D/M WORD",
11130 NO_STR
11131 "Define an administrative distance\n"
11132 "Administrative distance\n"
11133 "IP source prefix\n"
11134 "Access list name\n")
11135 {
11136 int idx_number = 2;
11137 int idx_ipv4_prefixlen = 3;
11138 int idx_word = 4;
11139 bgp_distance_unset(vty, argv[idx_number]->arg,
11140 argv[idx_ipv4_prefixlen]->arg, argv[idx_word]->arg);
11141 return CMD_SUCCESS;
11142 }
11143
11144 DEFUN (ipv6_bgp_distance_source,
11145 ipv6_bgp_distance_source_cmd,
11146 "distance (1-255) X:X::X:X/M",
11147 "Define an administrative distance\n"
11148 "Administrative distance\n"
11149 "IP source prefix\n")
11150 {
11151 bgp_distance_set(vty, argv[1]->arg, argv[2]->arg, NULL);
11152 return CMD_SUCCESS;
11153 }
11154
11155 DEFUN (no_ipv6_bgp_distance_source,
11156 no_ipv6_bgp_distance_source_cmd,
11157 "no distance (1-255) X:X::X:X/M",
11158 NO_STR
11159 "Define an administrative distance\n"
11160 "Administrative distance\n"
11161 "IP source prefix\n")
11162 {
11163 bgp_distance_unset(vty, argv[2]->arg, argv[3]->arg, NULL);
11164 return CMD_SUCCESS;
11165 }
11166
11167 DEFUN (ipv6_bgp_distance_source_access_list,
11168 ipv6_bgp_distance_source_access_list_cmd,
11169 "distance (1-255) X:X::X:X/M WORD",
11170 "Define an administrative distance\n"
11171 "Administrative distance\n"
11172 "IP source prefix\n"
11173 "Access list name\n")
11174 {
11175 bgp_distance_set(vty, argv[1]->arg, argv[2]->arg, argv[3]->arg);
11176 return CMD_SUCCESS;
11177 }
11178
11179 DEFUN (no_ipv6_bgp_distance_source_access_list,
11180 no_ipv6_bgp_distance_source_access_list_cmd,
11181 "no distance (1-255) X:X::X:X/M WORD",
11182 NO_STR
11183 "Define an administrative distance\n"
11184 "Administrative distance\n"
11185 "IP source prefix\n"
11186 "Access list name\n")
11187 {
11188 bgp_distance_unset(vty, argv[2]->arg, argv[3]->arg, argv[4]->arg);
11189 return CMD_SUCCESS;
11190 }
11191
11192 DEFUN (bgp_damp_set,
11193 bgp_damp_set_cmd,
11194 "bgp dampening [(1-45) [(1-20000) (1-20000) (1-255)]]",
11195 "BGP Specific commands\n"
11196 "Enable route-flap dampening\n"
11197 "Half-life time for the penalty\n"
11198 "Value to start reusing a route\n"
11199 "Value to start suppressing a route\n"
11200 "Maximum duration to suppress a stable route\n")
11201 {
11202 VTY_DECLVAR_CONTEXT(bgp, bgp);
11203 int idx_half_life = 2;
11204 int idx_reuse = 3;
11205 int idx_suppress = 4;
11206 int idx_max_suppress = 5;
11207 int half = DEFAULT_HALF_LIFE * 60;
11208 int reuse = DEFAULT_REUSE;
11209 int suppress = DEFAULT_SUPPRESS;
11210 int max = 4 * half;
11211
11212 if (argc == 6) {
11213 half = atoi(argv[idx_half_life]->arg) * 60;
11214 reuse = atoi(argv[idx_reuse]->arg);
11215 suppress = atoi(argv[idx_suppress]->arg);
11216 max = atoi(argv[idx_max_suppress]->arg) * 60;
11217 } else if (argc == 3) {
11218 half = atoi(argv[idx_half_life]->arg) * 60;
11219 max = 4 * half;
11220 }
11221
11222 if (suppress < reuse) {
11223 vty_out(vty,
11224 "Suppress value cannot be less than reuse value \n");
11225 return 0;
11226 }
11227
11228 return bgp_damp_enable(bgp, bgp_node_afi(vty), bgp_node_safi(vty), half,
11229 reuse, suppress, max);
11230 }
11231
11232 DEFUN (bgp_damp_unset,
11233 bgp_damp_unset_cmd,
11234 "no bgp dampening [(1-45) [(1-20000) (1-20000) (1-255)]]",
11235 NO_STR
11236 "BGP Specific commands\n"
11237 "Enable route-flap dampening\n"
11238 "Half-life time for the penalty\n"
11239 "Value to start reusing a route\n"
11240 "Value to start suppressing a route\n"
11241 "Maximum duration to suppress a stable route\n")
11242 {
11243 VTY_DECLVAR_CONTEXT(bgp, bgp);
11244 return bgp_damp_disable(bgp, bgp_node_afi(vty), bgp_node_safi(vty));
11245 }
11246
11247 /* Display specified route of BGP table. */
11248 static int bgp_clear_damp_route(struct vty *vty, const char *view_name,
11249 const char *ip_str, afi_t afi, safi_t safi,
11250 struct prefix_rd *prd, int prefix_check)
11251 {
11252 int ret;
11253 struct prefix match;
11254 struct bgp_node *rn;
11255 struct bgp_node *rm;
11256 struct bgp_path_info *pi;
11257 struct bgp_path_info *pi_temp;
11258 struct bgp *bgp;
11259 struct bgp_table *table;
11260
11261 /* BGP structure lookup. */
11262 if (view_name) {
11263 bgp = bgp_lookup_by_name(view_name);
11264 if (bgp == NULL) {
11265 vty_out(vty, "%% Can't find BGP instance %s\n",
11266 view_name);
11267 return CMD_WARNING;
11268 }
11269 } else {
11270 bgp = bgp_get_default();
11271 if (bgp == NULL) {
11272 vty_out(vty, "%% No BGP process is configured\n");
11273 return CMD_WARNING;
11274 }
11275 }
11276
11277 /* Check IP address argument. */
11278 ret = str2prefix(ip_str, &match);
11279 if (!ret) {
11280 vty_out(vty, "%% address is malformed\n");
11281 return CMD_WARNING;
11282 }
11283
11284 match.family = afi2family(afi);
11285
11286 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_ENCAP)
11287 || (safi == SAFI_EVPN)) {
11288 for (rn = bgp_table_top(bgp->rib[AFI_IP][safi]); rn;
11289 rn = bgp_route_next(rn)) {
11290 if (prd && memcmp(rn->p.u.val, prd->val, 8) != 0)
11291 continue;
11292 if ((table = rn->info) == NULL)
11293 continue;
11294 if ((rm = bgp_node_match(table, &match)) == NULL)
11295 continue;
11296
11297 if (!prefix_check
11298 || rm->p.prefixlen == match.prefixlen) {
11299 pi = rm->info;
11300 while (pi) {
11301 if (pi->extra && pi->extra->damp_info) {
11302 pi_temp = pi->next;
11303 bgp_damp_info_free(
11304 pi->extra->damp_info,
11305 1);
11306 pi = pi_temp;
11307 } else
11308 pi = pi->next;
11309 }
11310 }
11311
11312 bgp_unlock_node(rm);
11313 }
11314 } else {
11315 if ((rn = bgp_node_match(bgp->rib[afi][safi], &match))
11316 != NULL) {
11317 if (!prefix_check
11318 || rn->p.prefixlen == match.prefixlen) {
11319 pi = rn->info;
11320 while (pi) {
11321 if (pi->extra && pi->extra->damp_info) {
11322 pi_temp = pi->next;
11323 bgp_damp_info_free(
11324 pi->extra->damp_info,
11325 1);
11326 pi = pi_temp;
11327 } else
11328 pi = pi->next;
11329 }
11330 }
11331
11332 bgp_unlock_node(rn);
11333 }
11334 }
11335
11336 return CMD_SUCCESS;
11337 }
11338
11339 DEFUN (clear_ip_bgp_dampening,
11340 clear_ip_bgp_dampening_cmd,
11341 "clear ip bgp dampening",
11342 CLEAR_STR
11343 IP_STR
11344 BGP_STR
11345 "Clear route flap dampening information\n")
11346 {
11347 bgp_damp_info_clean();
11348 return CMD_SUCCESS;
11349 }
11350
11351 DEFUN (clear_ip_bgp_dampening_prefix,
11352 clear_ip_bgp_dampening_prefix_cmd,
11353 "clear ip bgp dampening A.B.C.D/M",
11354 CLEAR_STR
11355 IP_STR
11356 BGP_STR
11357 "Clear route flap dampening information\n"
11358 "IPv4 prefix\n")
11359 {
11360 int idx_ipv4_prefixlen = 4;
11361 return bgp_clear_damp_route(vty, NULL, argv[idx_ipv4_prefixlen]->arg,
11362 AFI_IP, SAFI_UNICAST, NULL, 1);
11363 }
11364
11365 DEFUN (clear_ip_bgp_dampening_address,
11366 clear_ip_bgp_dampening_address_cmd,
11367 "clear ip bgp dampening A.B.C.D",
11368 CLEAR_STR
11369 IP_STR
11370 BGP_STR
11371 "Clear route flap dampening information\n"
11372 "Network to clear damping information\n")
11373 {
11374 int idx_ipv4 = 4;
11375 return bgp_clear_damp_route(vty, NULL, argv[idx_ipv4]->arg, AFI_IP,
11376 SAFI_UNICAST, NULL, 0);
11377 }
11378
11379 DEFUN (clear_ip_bgp_dampening_address_mask,
11380 clear_ip_bgp_dampening_address_mask_cmd,
11381 "clear ip bgp dampening A.B.C.D A.B.C.D",
11382 CLEAR_STR
11383 IP_STR
11384 BGP_STR
11385 "Clear route flap dampening information\n"
11386 "Network to clear damping information\n"
11387 "Network mask\n")
11388 {
11389 int idx_ipv4 = 4;
11390 int idx_ipv4_2 = 5;
11391 int ret;
11392 char prefix_str[BUFSIZ];
11393
11394 ret = netmask_str2prefix_str(argv[idx_ipv4]->arg, argv[idx_ipv4_2]->arg,
11395 prefix_str);
11396 if (!ret) {
11397 vty_out(vty, "%% Inconsistent address and mask\n");
11398 return CMD_WARNING;
11399 }
11400
11401 return bgp_clear_damp_route(vty, NULL, prefix_str, AFI_IP, SAFI_UNICAST,
11402 NULL, 0);
11403 }
11404
11405 static void show_bgp_peerhash_entry(struct hash_backet *backet, void *arg)
11406 {
11407 struct vty *vty = arg;
11408 struct peer *peer = backet->data;
11409 char buf[SU_ADDRSTRLEN];
11410
11411 vty_out(vty, "\tPeer: %s %s\n", peer->host,
11412 sockunion2str(&peer->su, buf, sizeof(buf)));
11413 }
11414
11415 DEFUN (show_bgp_peerhash,
11416 show_bgp_peerhash_cmd,
11417 "show bgp peerhash",
11418 SHOW_STR
11419 BGP_STR
11420 "Display information about the BGP peerhash\n")
11421 {
11422 struct list *instances = bm->bgp;
11423 struct listnode *node;
11424 struct bgp *bgp;
11425
11426 for (ALL_LIST_ELEMENTS_RO(instances, node, bgp)) {
11427 vty_out(vty, "BGP: %s\n", bgp->name);
11428 hash_iterate(bgp->peerhash, show_bgp_peerhash_entry,
11429 vty);
11430 }
11431
11432 return CMD_SUCCESS;
11433 }
11434
11435 /* also used for encap safi */
11436 static void bgp_config_write_network_vpn(struct vty *vty, struct bgp *bgp,
11437 afi_t afi, safi_t safi)
11438 {
11439 struct bgp_node *prn;
11440 struct bgp_node *rn;
11441 struct bgp_table *table;
11442 struct prefix *p;
11443 struct prefix_rd *prd;
11444 struct bgp_static *bgp_static;
11445 mpls_label_t label;
11446 char buf[SU_ADDRSTRLEN];
11447 char rdbuf[RD_ADDRSTRLEN];
11448
11449 /* Network configuration. */
11450 for (prn = bgp_table_top(bgp->route[afi][safi]); prn;
11451 prn = bgp_route_next(prn)) {
11452 if ((table = prn->info) == NULL)
11453 continue;
11454
11455 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn)) {
11456 bgp_static = bgp_static_get_node_info(rn);
11457 if (bgp_static == NULL)
11458 continue;
11459
11460 p = &rn->p;
11461 prd = (struct prefix_rd *)&prn->p;
11462
11463 /* "network" configuration display. */
11464 prefix_rd2str(prd, rdbuf, sizeof(rdbuf));
11465 label = decode_label(&bgp_static->label);
11466
11467 vty_out(vty, " network %s/%d rd %s",
11468 inet_ntop(p->family, &p->u.prefix, buf,
11469 SU_ADDRSTRLEN),
11470 p->prefixlen, rdbuf);
11471 if (safi == SAFI_MPLS_VPN)
11472 vty_out(vty, " label %u", label);
11473
11474 if (bgp_static->rmap.name)
11475 vty_out(vty, " route-map %s",
11476 bgp_static->rmap.name);
11477
11478 if (bgp_static->backdoor)
11479 vty_out(vty, " backdoor");
11480
11481 vty_out(vty, "\n");
11482 }
11483 }
11484 }
11485
11486 static void bgp_config_write_network_evpn(struct vty *vty, struct bgp *bgp,
11487 afi_t afi, safi_t safi)
11488 {
11489 struct bgp_node *prn;
11490 struct bgp_node *rn;
11491 struct bgp_table *table;
11492 struct prefix *p;
11493 struct prefix_rd *prd;
11494 struct bgp_static *bgp_static;
11495 char buf[PREFIX_STRLEN * 2];
11496 char buf2[SU_ADDRSTRLEN];
11497 char rdbuf[RD_ADDRSTRLEN];
11498
11499 /* Network configuration. */
11500 for (prn = bgp_table_top(bgp->route[afi][safi]); prn;
11501 prn = bgp_route_next(prn)) {
11502 if ((table = prn->info) == NULL)
11503 continue;
11504
11505 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn)) {
11506 bgp_static = bgp_static_get_node_info(rn);
11507 if (bgp_static == NULL)
11508 continue;
11509
11510 char *macrouter = NULL;
11511 char *esi = NULL;
11512
11513 if (bgp_static->router_mac)
11514 macrouter = prefix_mac2str(
11515 bgp_static->router_mac, NULL, 0);
11516 if (bgp_static->eth_s_id)
11517 esi = esi2str(bgp_static->eth_s_id);
11518 p = &rn->p;
11519 prd = (struct prefix_rd *)&prn->p;
11520
11521 /* "network" configuration display. */
11522 prefix_rd2str(prd, rdbuf, sizeof(rdbuf));
11523 if (p->u.prefix_evpn.route_type == 5) {
11524 char local_buf[PREFIX_STRLEN];
11525 uint8_t family = is_evpn_prefix_ipaddr_v4((
11526 struct prefix_evpn *)p)
11527 ? AF_INET
11528 : AF_INET6;
11529 inet_ntop(family,
11530 &p->u.prefix_evpn.prefix_addr.ip.ip.addr,
11531 local_buf, PREFIX_STRLEN);
11532 sprintf(buf, "%s/%u", local_buf,
11533 p->u.prefix_evpn.prefix_addr.ip_prefix_length);
11534 } else {
11535 prefix2str(p, buf, sizeof(buf));
11536 }
11537
11538 if (bgp_static->gatewayIp.family == AF_INET
11539 || bgp_static->gatewayIp.family == AF_INET6)
11540 inet_ntop(bgp_static->gatewayIp.family,
11541 &bgp_static->gatewayIp.u.prefix, buf2,
11542 sizeof(buf2));
11543 vty_out(vty,
11544 " network %s rd %s ethtag %u label %u esi %s gwip %s routermac %s\n",
11545 buf, rdbuf,
11546 p->u.prefix_evpn.prefix_addr.eth_tag,
11547 decode_label(&bgp_static->label), esi, buf2,
11548 macrouter);
11549
11550 if (macrouter)
11551 XFREE(MTYPE_TMP, macrouter);
11552 if (esi)
11553 XFREE(MTYPE_TMP, esi);
11554 }
11555 }
11556 }
11557
11558 /* Configuration of static route announcement and aggregate
11559 information. */
11560 void bgp_config_write_network(struct vty *vty, struct bgp *bgp, afi_t afi,
11561 safi_t safi)
11562 {
11563 struct bgp_node *rn;
11564 struct prefix *p;
11565 struct bgp_static *bgp_static;
11566 struct bgp_aggregate *bgp_aggregate;
11567 char buf[SU_ADDRSTRLEN];
11568
11569 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_ENCAP)) {
11570 bgp_config_write_network_vpn(vty, bgp, afi, safi);
11571 return;
11572 }
11573
11574 if (afi == AFI_L2VPN && safi == SAFI_EVPN) {
11575 bgp_config_write_network_evpn(vty, bgp, afi, safi);
11576 return;
11577 }
11578
11579 /* Network configuration. */
11580 for (rn = bgp_table_top(bgp->route[afi][safi]); rn;
11581 rn = bgp_route_next(rn)) {
11582 bgp_static = bgp_static_get_node_info(rn);
11583 if (bgp_static == NULL)
11584 continue;
11585
11586 p = &rn->p;
11587
11588 /* "network" configuration display. */
11589 if (bgp_option_check(BGP_OPT_CONFIG_CISCO) && afi == AFI_IP) {
11590 uint32_t destination;
11591 struct in_addr netmask;
11592
11593 destination = ntohl(p->u.prefix4.s_addr);
11594 masklen2ip(p->prefixlen, &netmask);
11595 vty_out(vty, " network %s",
11596 inet_ntop(p->family, &p->u.prefix, buf,
11597 SU_ADDRSTRLEN));
11598
11599 if ((IN_CLASSC(destination) && p->prefixlen == 24)
11600 || (IN_CLASSB(destination) && p->prefixlen == 16)
11601 || (IN_CLASSA(destination) && p->prefixlen == 8)
11602 || p->u.prefix4.s_addr == 0) {
11603 /* Natural mask is not display. */
11604 } else
11605 vty_out(vty, " mask %s", inet_ntoa(netmask));
11606 } else {
11607 vty_out(vty, " network %s/%d",
11608 inet_ntop(p->family, &p->u.prefix, buf,
11609 SU_ADDRSTRLEN),
11610 p->prefixlen);
11611 }
11612
11613 if (bgp_static->label_index != BGP_INVALID_LABEL_INDEX)
11614 vty_out(vty, " label-index %u",
11615 bgp_static->label_index);
11616
11617 if (bgp_static->rmap.name)
11618 vty_out(vty, " route-map %s", bgp_static->rmap.name);
11619
11620 if (bgp_static->backdoor)
11621 vty_out(vty, " backdoor");
11622
11623 vty_out(vty, "\n");
11624 }
11625
11626 /* Aggregate-address configuration. */
11627 for (rn = bgp_table_top(bgp->aggregate[afi][safi]); rn;
11628 rn = bgp_route_next(rn)) {
11629 bgp_aggregate = bgp_aggregate_get_node_info(rn);
11630 if (bgp_aggregate == NULL)
11631 continue;
11632
11633 p = &rn->p;
11634
11635 if (bgp_option_check(BGP_OPT_CONFIG_CISCO) && afi == AFI_IP) {
11636 struct in_addr netmask;
11637
11638 masklen2ip(p->prefixlen, &netmask);
11639 vty_out(vty, " aggregate-address %s %s",
11640 inet_ntop(p->family, &p->u.prefix, buf,
11641 SU_ADDRSTRLEN),
11642 inet_ntoa(netmask));
11643 } else {
11644 vty_out(vty, " aggregate-address %s/%d",
11645 inet_ntop(p->family, &p->u.prefix, buf,
11646 SU_ADDRSTRLEN),
11647 p->prefixlen);
11648 }
11649
11650 if (bgp_aggregate->as_set)
11651 vty_out(vty, " as-set");
11652
11653 if (bgp_aggregate->summary_only)
11654 vty_out(vty, " summary-only");
11655
11656 vty_out(vty, "\n");
11657 }
11658 }
11659
11660 void bgp_config_write_distance(struct vty *vty, struct bgp *bgp, afi_t afi,
11661 safi_t safi)
11662 {
11663 struct bgp_node *rn;
11664 struct bgp_distance *bdistance;
11665
11666 /* Distance configuration. */
11667 if (bgp->distance_ebgp[afi][safi] && bgp->distance_ibgp[afi][safi]
11668 && bgp->distance_local[afi][safi]
11669 && (bgp->distance_ebgp[afi][safi] != ZEBRA_EBGP_DISTANCE_DEFAULT
11670 || bgp->distance_ibgp[afi][safi] != ZEBRA_IBGP_DISTANCE_DEFAULT
11671 || bgp->distance_local[afi][safi]
11672 != ZEBRA_IBGP_DISTANCE_DEFAULT)) {
11673 vty_out(vty, " distance bgp %d %d %d\n",
11674 bgp->distance_ebgp[afi][safi],
11675 bgp->distance_ibgp[afi][safi],
11676 bgp->distance_local[afi][safi]);
11677 }
11678
11679 for (rn = bgp_table_top(bgp_distance_table[afi][safi]); rn;
11680 rn = bgp_route_next(rn)) {
11681 bdistance = bgp_distance_get_node(rn);
11682 if (bdistance != NULL) {
11683 char buf[PREFIX_STRLEN];
11684
11685 vty_out(vty, " distance %d %s %s\n",
11686 bdistance->distance,
11687 prefix2str(&rn->p, buf, sizeof(buf)),
11688 bdistance->access_list ? bdistance->access_list
11689 : "");
11690 }
11691 }
11692 }
11693
11694 /* Allocate routing table structure and install commands. */
11695 void bgp_route_init(void)
11696 {
11697 afi_t afi;
11698 safi_t safi;
11699
11700 /* Init BGP distance table. */
11701 FOREACH_AFI_SAFI (afi, safi)
11702 bgp_distance_table[afi][safi] = bgp_table_init(NULL, afi, safi);
11703
11704 /* IPv4 BGP commands. */
11705 install_element(BGP_NODE, &bgp_table_map_cmd);
11706 install_element(BGP_NODE, &bgp_network_cmd);
11707 install_element(BGP_NODE, &no_bgp_table_map_cmd);
11708
11709 install_element(BGP_NODE, &aggregate_address_cmd);
11710 install_element(BGP_NODE, &aggregate_address_mask_cmd);
11711 install_element(BGP_NODE, &no_aggregate_address_cmd);
11712 install_element(BGP_NODE, &no_aggregate_address_mask_cmd);
11713
11714 /* IPv4 unicast configuration. */
11715 install_element(BGP_IPV4_NODE, &bgp_table_map_cmd);
11716 install_element(BGP_IPV4_NODE, &bgp_network_cmd);
11717 install_element(BGP_IPV4_NODE, &no_bgp_table_map_cmd);
11718
11719 install_element(BGP_IPV4_NODE, &aggregate_address_cmd);
11720 install_element(BGP_IPV4_NODE, &aggregate_address_mask_cmd);
11721 install_element(BGP_IPV4_NODE, &no_aggregate_address_cmd);
11722 install_element(BGP_IPV4_NODE, &no_aggregate_address_mask_cmd);
11723
11724 /* IPv4 multicast configuration. */
11725 install_element(BGP_IPV4M_NODE, &bgp_table_map_cmd);
11726 install_element(BGP_IPV4M_NODE, &bgp_network_cmd);
11727 install_element(BGP_IPV4M_NODE, &no_bgp_table_map_cmd);
11728 install_element(BGP_IPV4M_NODE, &aggregate_address_cmd);
11729 install_element(BGP_IPV4M_NODE, &aggregate_address_mask_cmd);
11730 install_element(BGP_IPV4M_NODE, &no_aggregate_address_cmd);
11731 install_element(BGP_IPV4M_NODE, &no_aggregate_address_mask_cmd);
11732
11733 /* IPv4 labeled-unicast configuration. */
11734 install_element(VIEW_NODE, &show_ip_bgp_instance_all_cmd);
11735 install_element(VIEW_NODE, &show_ip_bgp_cmd);
11736 install_element(VIEW_NODE, &show_ip_bgp_json_cmd);
11737 install_element(VIEW_NODE, &show_ip_bgp_route_cmd);
11738 install_element(VIEW_NODE, &show_ip_bgp_regexp_cmd);
11739
11740 install_element(VIEW_NODE,
11741 &show_ip_bgp_instance_neighbor_advertised_route_cmd);
11742 install_element(VIEW_NODE, &show_ip_bgp_neighbor_routes_cmd);
11743 install_element(VIEW_NODE,
11744 &show_ip_bgp_neighbor_received_prefix_filter_cmd);
11745 #ifdef KEEP_OLD_VPN_COMMANDS
11746 install_element(VIEW_NODE, &show_ip_bgp_vpn_all_route_prefix_cmd);
11747 #endif /* KEEP_OLD_VPN_COMMANDS */
11748 install_element(VIEW_NODE, &show_bgp_afi_vpn_rd_route_cmd);
11749 install_element(VIEW_NODE,
11750 &show_ip_bgp_l2vpn_evpn_all_route_prefix_cmd);
11751
11752 /* BGP dampening clear commands */
11753 install_element(ENABLE_NODE, &clear_ip_bgp_dampening_cmd);
11754 install_element(ENABLE_NODE, &clear_ip_bgp_dampening_prefix_cmd);
11755
11756 install_element(ENABLE_NODE, &clear_ip_bgp_dampening_address_cmd);
11757 install_element(ENABLE_NODE, &clear_ip_bgp_dampening_address_mask_cmd);
11758
11759 /* prefix count */
11760 install_element(ENABLE_NODE,
11761 &show_ip_bgp_instance_neighbor_prefix_counts_cmd);
11762 #ifdef KEEP_OLD_VPN_COMMANDS
11763 install_element(ENABLE_NODE,
11764 &show_ip_bgp_vpn_neighbor_prefix_counts_cmd);
11765 #endif /* KEEP_OLD_VPN_COMMANDS */
11766
11767 /* New config IPv6 BGP commands. */
11768 install_element(BGP_IPV6_NODE, &bgp_table_map_cmd);
11769 install_element(BGP_IPV6_NODE, &ipv6_bgp_network_cmd);
11770 install_element(BGP_IPV6_NODE, &no_bgp_table_map_cmd);
11771
11772 install_element(BGP_IPV6_NODE, &ipv6_aggregate_address_cmd);
11773 install_element(BGP_IPV6_NODE, &no_ipv6_aggregate_address_cmd);
11774
11775 install_element(BGP_IPV6M_NODE, &ipv6_bgp_network_cmd);
11776
11777 install_element(BGP_NODE, &bgp_distance_cmd);
11778 install_element(BGP_NODE, &no_bgp_distance_cmd);
11779 install_element(BGP_NODE, &bgp_distance_source_cmd);
11780 install_element(BGP_NODE, &no_bgp_distance_source_cmd);
11781 install_element(BGP_NODE, &bgp_distance_source_access_list_cmd);
11782 install_element(BGP_NODE, &no_bgp_distance_source_access_list_cmd);
11783 install_element(BGP_IPV4_NODE, &bgp_distance_cmd);
11784 install_element(BGP_IPV4_NODE, &no_bgp_distance_cmd);
11785 install_element(BGP_IPV4_NODE, &bgp_distance_source_cmd);
11786 install_element(BGP_IPV4_NODE, &no_bgp_distance_source_cmd);
11787 install_element(BGP_IPV4_NODE, &bgp_distance_source_access_list_cmd);
11788 install_element(BGP_IPV4_NODE, &no_bgp_distance_source_access_list_cmd);
11789 install_element(BGP_IPV4M_NODE, &bgp_distance_cmd);
11790 install_element(BGP_IPV4M_NODE, &no_bgp_distance_cmd);
11791 install_element(BGP_IPV4M_NODE, &bgp_distance_source_cmd);
11792 install_element(BGP_IPV4M_NODE, &no_bgp_distance_source_cmd);
11793 install_element(BGP_IPV4M_NODE, &bgp_distance_source_access_list_cmd);
11794 install_element(BGP_IPV4M_NODE,
11795 &no_bgp_distance_source_access_list_cmd);
11796 install_element(BGP_IPV6_NODE, &bgp_distance_cmd);
11797 install_element(BGP_IPV6_NODE, &no_bgp_distance_cmd);
11798 install_element(BGP_IPV6_NODE, &ipv6_bgp_distance_source_cmd);
11799 install_element(BGP_IPV6_NODE, &no_ipv6_bgp_distance_source_cmd);
11800 install_element(BGP_IPV6_NODE,
11801 &ipv6_bgp_distance_source_access_list_cmd);
11802 install_element(BGP_IPV6_NODE,
11803 &no_ipv6_bgp_distance_source_access_list_cmd);
11804 install_element(BGP_IPV6M_NODE, &bgp_distance_cmd);
11805 install_element(BGP_IPV6M_NODE, &no_bgp_distance_cmd);
11806 install_element(BGP_IPV6M_NODE, &ipv6_bgp_distance_source_cmd);
11807 install_element(BGP_IPV6M_NODE, &no_ipv6_bgp_distance_source_cmd);
11808 install_element(BGP_IPV6M_NODE,
11809 &ipv6_bgp_distance_source_access_list_cmd);
11810 install_element(BGP_IPV6M_NODE,
11811 &no_ipv6_bgp_distance_source_access_list_cmd);
11812
11813 install_element(BGP_NODE, &bgp_damp_set_cmd);
11814 install_element(BGP_NODE, &bgp_damp_unset_cmd);
11815 install_element(BGP_IPV4_NODE, &bgp_damp_set_cmd);
11816 install_element(BGP_IPV4_NODE, &bgp_damp_unset_cmd);
11817
11818 /* IPv4 Multicast Mode */
11819 install_element(BGP_IPV4M_NODE, &bgp_damp_set_cmd);
11820 install_element(BGP_IPV4M_NODE, &bgp_damp_unset_cmd);
11821
11822 /* Large Communities */
11823 install_element(VIEW_NODE, &show_ip_bgp_large_community_list_cmd);
11824 install_element(VIEW_NODE, &show_ip_bgp_large_community_cmd);
11825
11826 /* show bgp ipv4 flowspec detailed */
11827 install_element(VIEW_NODE, &show_ip_bgp_flowspec_routes_detailed_cmd);
11828
11829 install_element(VIEW_NODE, &show_bgp_peerhash_cmd);
11830 }
11831
11832 void bgp_route_finish(void)
11833 {
11834 afi_t afi;
11835 safi_t safi;
11836
11837 FOREACH_AFI_SAFI (afi, safi) {
11838 bgp_table_unlock(bgp_distance_table[afi][safi]);
11839 bgp_distance_table[afi][safi] = NULL;
11840 }
11841 }
FRRouting mirror