]> 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 pull request #3163 from donaldsharp/more_vty_errors
[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 {
5487 static struct aspath *ae = NULL;
5488
5489 if (!ae)
5490 ae = aspath_empty();
5491
5492 if (!pi)
5493 return 0;
5494
5495 if (origin != pi->attr->origin)
5496 return 0;
5497
5498 if (!aspath_cmp(pi->attr->aspath, (aspath) ? aspath : ae))
5499 return 0;
5500
5501 if (!community_cmp(pi->attr->community, comm))
5502 return 0;
5503
5504 if (!CHECK_FLAG(pi->flags, BGP_PATH_VALID))
5505 return 0;
5506
5507 return 1;
5508 }
5509
5510 static void bgp_aggregate_install(struct bgp *bgp, afi_t afi, safi_t safi,
5511 struct prefix *p, uint8_t origin,
5512 struct aspath *aspath,
5513 struct community *community,
5514 uint8_t atomic_aggregate,
5515 struct bgp_aggregate *aggregate)
5516 {
5517 struct bgp_node *rn;
5518 struct bgp_table *table;
5519 struct bgp_path_info *pi, *new;
5520
5521 table = bgp->rib[afi][safi];
5522
5523 rn = bgp_node_get(table, p);
5524
5525 for (pi = rn->info; pi; pi = pi->next)
5526 if (pi->peer == bgp->peer_self && pi->type == ZEBRA_ROUTE_BGP
5527 && pi->sub_type == BGP_ROUTE_AGGREGATE)
5528 break;
5529
5530 if (aggregate->count > 0) {
5531 /*
5532 * If the aggregate information has not changed
5533 * no need to re-install it again.
5534 */
5535 if (bgp_aggregate_info_same(rn->info, origin, aspath,
5536 community)) {
5537 bgp_unlock_node(rn);
5538
5539 if (aspath)
5540 aspath_free(aspath);
5541 if (community)
5542 community_free(community);
5543
5544 return;
5545 }
5546
5547 /*
5548 * Mark the old as unusable
5549 */
5550 if (pi)
5551 bgp_path_info_delete(rn, pi);
5552
5553 new = info_make(
5554 ZEBRA_ROUTE_BGP, BGP_ROUTE_AGGREGATE, 0, bgp->peer_self,
5555 bgp_attr_aggregate_intern(bgp, origin, aspath,
5556 community, aggregate->as_set,
5557 atomic_aggregate),
5558 rn);
5559 SET_FLAG(new->flags, BGP_PATH_VALID);
5560
5561 bgp_path_info_add(rn, new);
5562 bgp_process(bgp, rn, afi, safi);
5563 } else {
5564 for (pi = rn->info; pi; pi = pi->next)
5565 if (pi->peer == bgp->peer_self
5566 && pi->type == ZEBRA_ROUTE_BGP
5567 && pi->sub_type == BGP_ROUTE_AGGREGATE)
5568 break;
5569
5570 /* Withdraw static BGP route from routing table. */
5571 if (pi) {
5572 bgp_path_info_delete(rn, pi);
5573 bgp_process(bgp, rn, afi, safi);
5574 }
5575 }
5576
5577 bgp_unlock_node(rn);
5578 }
5579
5580 /* Update an aggregate as routes are added/removed from the BGP table */
5581 static void bgp_aggregate_route(struct bgp *bgp, struct prefix *p,
5582 struct bgp_path_info *pinew, afi_t afi,
5583 safi_t safi, struct bgp_path_info *del,
5584 struct bgp_aggregate *aggregate)
5585 {
5586 struct bgp_table *table;
5587 struct bgp_node *top;
5588 struct bgp_node *rn;
5589 uint8_t origin;
5590 struct aspath *aspath = NULL;
5591 struct aspath *asmerge = NULL;
5592 struct community *community = NULL;
5593 struct community *commerge = NULL;
5594 struct bgp_path_info *pi;
5595 unsigned long match = 0;
5596 uint8_t atomic_aggregate = 0;
5597
5598 /* ORIGIN attribute: If at least one route among routes that are
5599 aggregated has ORIGIN with the value INCOMPLETE, then the
5600 aggregated route must have the ORIGIN attribute with the value
5601 INCOMPLETE. Otherwise, if at least one route among routes that
5602 are aggregated has ORIGIN with the value EGP, then the aggregated
5603 route must have the origin attribute with the value EGP. In all
5604 other case the value of the ORIGIN attribute of the aggregated
5605 route is INTERNAL. */
5606 origin = BGP_ORIGIN_IGP;
5607
5608 table = bgp->rib[afi][safi];
5609
5610 top = bgp_node_get(table, p);
5611 for (rn = bgp_node_get(table, p); rn;
5612 rn = bgp_route_next_until(rn, top)) {
5613 if (rn->p.prefixlen <= p->prefixlen)
5614 continue;
5615
5616 match = 0;
5617
5618 for (pi = rn->info; pi; pi = pi->next) {
5619 if (BGP_PATH_HOLDDOWN(pi))
5620 continue;
5621
5622 if (del && pi == del)
5623 continue;
5624
5625 if (pi->attr->flag
5626 & ATTR_FLAG_BIT(BGP_ATTR_ATOMIC_AGGREGATE))
5627 atomic_aggregate = 1;
5628
5629 if (pi->sub_type == BGP_ROUTE_AGGREGATE)
5630 continue;
5631
5632 /*
5633 * summary-only aggregate route suppress
5634 * aggregated route announcements.
5635 */
5636 if (aggregate->summary_only) {
5637 (bgp_path_info_extra_get(pi))->suppress++;
5638 bgp_path_info_set_flag(rn, pi,
5639 BGP_PATH_ATTR_CHANGED);
5640 match++;
5641 }
5642
5643 aggregate->count++;
5644
5645 /*
5646 * If at least one route among routes that are
5647 * aggregated has ORIGIN with the value INCOMPLETE,
5648 * then the aggregated route MUST have the ORIGIN
5649 * attribute with the value INCOMPLETE. Otherwise, if
5650 * at least one route among routes that are aggregated
5651 * has ORIGIN with the value EGP, then the aggregated
5652 * route MUST have the ORIGIN attribute with the value
5653 * EGP.
5654 */
5655 if (origin < pi->attr->origin)
5656 origin = pi->attr->origin;
5657
5658 if (!aggregate->as_set)
5659 continue;
5660
5661 /*
5662 * as-set aggregate route generate origin, as path,
5663 * and community aggregation.
5664 */
5665 if (aspath) {
5666 asmerge = aspath_aggregate(aspath,
5667 pi->attr->aspath);
5668 aspath_free(aspath);
5669 aspath = asmerge;
5670 } else
5671 aspath = aspath_dup(pi->attr->aspath);
5672
5673 if (!pi->attr->community)
5674 continue;
5675
5676 if (community) {
5677 commerge = community_merge(community,
5678 pi->attr->community);
5679 community = community_uniq_sort(commerge);
5680 community_free(commerge);
5681 } else
5682 community = community_dup(pi->attr->community);
5683 }
5684 if (match)
5685 bgp_process(bgp, rn, afi, safi);
5686 }
5687 bgp_unlock_node(top);
5688
5689 if (pinew) {
5690 aggregate->count++;
5691
5692 if (aggregate->summary_only)
5693 (bgp_path_info_extra_get(pinew))->suppress++;
5694
5695 if (origin < pinew->attr->origin)
5696 origin = pinew->attr->origin;
5697
5698 if (aggregate->as_set) {
5699 if (aspath) {
5700 asmerge = aspath_aggregate(aspath,
5701 pinew->attr->aspath);
5702 aspath_free(aspath);
5703 aspath = asmerge;
5704 } else
5705 aspath = aspath_dup(pinew->attr->aspath);
5706
5707 if (pinew->attr->community) {
5708 if (community) {
5709 commerge = community_merge(
5710 community,
5711 pinew->attr->community);
5712 community =
5713 community_uniq_sort(commerge);
5714 community_free(commerge);
5715 } else
5716 community = community_dup(
5717 pinew->attr->community);
5718 }
5719 }
5720 }
5721
5722 bgp_aggregate_install(bgp, afi, safi, p, origin, aspath, community,
5723 atomic_aggregate, aggregate);
5724
5725 if (aggregate->count == 0) {
5726 if (aspath)
5727 aspath_free(aspath);
5728 if (community)
5729 community_free(community);
5730 }
5731 }
5732
5733 static void bgp_aggregate_delete(struct bgp *bgp, struct prefix *p, afi_t afi,
5734 safi_t safi, struct bgp_aggregate *aggregate)
5735 {
5736 struct bgp_table *table;
5737 struct bgp_node *top;
5738 struct bgp_node *rn;
5739 struct bgp_path_info *pi;
5740 unsigned long match;
5741
5742 table = bgp->rib[afi][safi];
5743
5744 /* If routes exists below this node, generate aggregate routes. */
5745 top = bgp_node_get(table, p);
5746 for (rn = bgp_node_get(table, p); rn;
5747 rn = bgp_route_next_until(rn, top)) {
5748 if (rn->p.prefixlen <= p->prefixlen)
5749 continue;
5750 match = 0;
5751
5752 for (pi = rn->info; pi; pi = pi->next) {
5753 if (BGP_PATH_HOLDDOWN(pi))
5754 continue;
5755
5756 if (pi->sub_type == BGP_ROUTE_AGGREGATE)
5757 continue;
5758
5759 if (aggregate->summary_only && pi->extra) {
5760 pi->extra->suppress--;
5761
5762 if (pi->extra->suppress == 0) {
5763 bgp_path_info_set_flag(
5764 rn, pi, BGP_PATH_ATTR_CHANGED);
5765 match++;
5766 }
5767 }
5768 aggregate->count--;
5769 }
5770
5771 /* If this node was suppressed, process the change. */
5772 if (match)
5773 bgp_process(bgp, rn, afi, safi);
5774 }
5775 bgp_unlock_node(top);
5776 }
5777
5778 void bgp_aggregate_increment(struct bgp *bgp, struct prefix *p,
5779 struct bgp_path_info *pi, afi_t afi, safi_t safi)
5780 {
5781 struct bgp_node *child;
5782 struct bgp_node *rn;
5783 struct bgp_aggregate *aggregate;
5784 struct bgp_table *table;
5785
5786 table = bgp->aggregate[afi][safi];
5787
5788 /* No aggregates configured. */
5789 if (bgp_table_top_nolock(table) == NULL)
5790 return;
5791
5792 if (p->prefixlen == 0)
5793 return;
5794
5795 if (BGP_PATH_HOLDDOWN(pi))
5796 return;
5797
5798 child = bgp_node_get(table, p);
5799
5800 /* Aggregate address configuration check. */
5801 for (rn = child; rn; rn = bgp_node_parent_nolock(rn)) {
5802 aggregate = bgp_aggregate_get_node_info(rn);
5803 if (aggregate != NULL && rn->p.prefixlen < p->prefixlen) {
5804 bgp_aggregate_delete(bgp, &rn->p, afi, safi, aggregate);
5805 bgp_aggregate_route(bgp, &rn->p, pi, afi, safi, NULL,
5806 aggregate);
5807 }
5808 }
5809 bgp_unlock_node(child);
5810 }
5811
5812 void bgp_aggregate_decrement(struct bgp *bgp, struct prefix *p,
5813 struct bgp_path_info *del, afi_t afi, safi_t safi)
5814 {
5815 struct bgp_node *child;
5816 struct bgp_node *rn;
5817 struct bgp_aggregate *aggregate;
5818 struct bgp_table *table;
5819
5820 table = bgp->aggregate[afi][safi];
5821
5822 /* No aggregates configured. */
5823 if (bgp_table_top_nolock(table) == NULL)
5824 return;
5825
5826 if (p->prefixlen == 0)
5827 return;
5828
5829 child = bgp_node_get(table, p);
5830
5831 /* Aggregate address configuration check. */
5832 for (rn = child; rn; rn = bgp_node_parent_nolock(rn)) {
5833 aggregate = bgp_aggregate_get_node_info(rn);
5834 if (aggregate != NULL && rn->p.prefixlen < p->prefixlen) {
5835 bgp_aggregate_delete(bgp, &rn->p, afi, safi, aggregate);
5836 bgp_aggregate_route(bgp, &rn->p, NULL, afi, safi, del,
5837 aggregate);
5838 }
5839 }
5840 bgp_unlock_node(child);
5841 }
5842
5843 /* Aggregate route attribute. */
5844 #define AGGREGATE_SUMMARY_ONLY 1
5845 #define AGGREGATE_AS_SET 1
5846
5847 static int bgp_aggregate_unset(struct vty *vty, const char *prefix_str,
5848 afi_t afi, safi_t safi)
5849 {
5850 VTY_DECLVAR_CONTEXT(bgp, bgp);
5851 int ret;
5852 struct prefix p;
5853 struct bgp_node *rn;
5854 struct bgp_aggregate *aggregate;
5855
5856 /* Convert string to prefix structure. */
5857 ret = str2prefix(prefix_str, &p);
5858 if (!ret) {
5859 vty_out(vty, "Malformed prefix\n");
5860 return CMD_WARNING_CONFIG_FAILED;
5861 }
5862 apply_mask(&p);
5863
5864 /* Old configuration check. */
5865 rn = bgp_node_lookup(bgp->aggregate[afi][safi], &p);
5866 if (!rn) {
5867 vty_out(vty,
5868 "%% There is no aggregate-address configuration.\n");
5869 return CMD_WARNING_CONFIG_FAILED;
5870 }
5871
5872 aggregate = bgp_aggregate_get_node_info(rn);
5873 bgp_aggregate_delete(bgp, &p, afi, safi, aggregate);
5874 bgp_aggregate_install(bgp, afi, safi, &p, 0, NULL, NULL, 0, aggregate);
5875
5876 /* Unlock aggregate address configuration. */
5877 bgp_aggregate_set_node_info(rn, NULL);
5878 bgp_aggregate_free(aggregate);
5879 bgp_unlock_node(rn);
5880 bgp_unlock_node(rn);
5881
5882 return CMD_SUCCESS;
5883 }
5884
5885 static int bgp_aggregate_set(struct vty *vty, const char *prefix_str, afi_t afi,
5886 safi_t safi, uint8_t summary_only, uint8_t as_set)
5887 {
5888 VTY_DECLVAR_CONTEXT(bgp, bgp);
5889 int ret;
5890 struct prefix p;
5891 struct bgp_node *rn;
5892 struct bgp_aggregate *aggregate;
5893
5894 /* Convert string to prefix structure. */
5895 ret = str2prefix(prefix_str, &p);
5896 if (!ret) {
5897 vty_out(vty, "Malformed prefix\n");
5898 return CMD_WARNING_CONFIG_FAILED;
5899 }
5900 apply_mask(&p);
5901
5902 if ((afi == AFI_IP && p.prefixlen == IPV4_MAX_BITLEN) ||
5903 (afi == AFI_IP6 && p.prefixlen == IPV6_MAX_BITLEN)) {
5904 vty_out(vty, "Specified prefix: %s will not result in any useful aggregation, disallowing\n",
5905 prefix_str);
5906 return CMD_WARNING_CONFIG_FAILED;
5907 }
5908
5909 /* Old configuration check. */
5910 rn = bgp_node_get(bgp->aggregate[afi][safi], &p);
5911
5912 if (rn->info) {
5913 vty_out(vty, "There is already same aggregate network.\n");
5914 /* try to remove the old entry */
5915 ret = bgp_aggregate_unset(vty, prefix_str, afi, safi);
5916 if (ret) {
5917 vty_out(vty, "Error deleting aggregate.\n");
5918 bgp_unlock_node(rn);
5919 return CMD_WARNING_CONFIG_FAILED;
5920 }
5921 }
5922
5923 /* Make aggregate address structure. */
5924 aggregate = bgp_aggregate_new();
5925 aggregate->summary_only = summary_only;
5926 aggregate->as_set = as_set;
5927 aggregate->safi = safi;
5928 bgp_aggregate_set_node_info(rn, aggregate);
5929
5930 /* Aggregate address insert into BGP routing table. */
5931 bgp_aggregate_route(bgp, &p, NULL, afi, safi, NULL, aggregate);
5932
5933 return CMD_SUCCESS;
5934 }
5935
5936 DEFUN (aggregate_address,
5937 aggregate_address_cmd,
5938 "aggregate-address A.B.C.D/M [<as-set [summary-only]|summary-only [as-set]>]",
5939 "Configure BGP aggregate entries\n"
5940 "Aggregate prefix\n"
5941 "Generate AS set path information\n"
5942 "Filter more specific routes from updates\n"
5943 "Filter more specific routes from updates\n"
5944 "Generate AS set path information\n")
5945 {
5946 int idx = 0;
5947 argv_find(argv, argc, "A.B.C.D/M", &idx);
5948 char *prefix = argv[idx]->arg;
5949 int as_set =
5950 argv_find(argv, argc, "as-set", &idx) ? AGGREGATE_AS_SET : 0;
5951 idx = 0;
5952 int summary_only = argv_find(argv, argc, "summary-only", &idx)
5953 ? AGGREGATE_SUMMARY_ONLY
5954 : 0;
5955
5956 return bgp_aggregate_set(vty, prefix, AFI_IP, bgp_node_safi(vty),
5957 summary_only, as_set);
5958 }
5959
5960 DEFUN (aggregate_address_mask,
5961 aggregate_address_mask_cmd,
5962 "aggregate-address A.B.C.D A.B.C.D [<as-set [summary-only]|summary-only [as-set]>]",
5963 "Configure BGP aggregate entries\n"
5964 "Aggregate address\n"
5965 "Aggregate mask\n"
5966 "Generate AS set path information\n"
5967 "Filter more specific routes from updates\n"
5968 "Filter more specific routes from updates\n"
5969 "Generate AS set path information\n")
5970 {
5971 int idx = 0;
5972 argv_find(argv, argc, "A.B.C.D", &idx);
5973 char *prefix = argv[idx]->arg;
5974 char *mask = argv[idx + 1]->arg;
5975 int as_set =
5976 argv_find(argv, argc, "as-set", &idx) ? AGGREGATE_AS_SET : 0;
5977 idx = 0;
5978 int summary_only = argv_find(argv, argc, "summary-only", &idx)
5979 ? AGGREGATE_SUMMARY_ONLY
5980 : 0;
5981
5982 char prefix_str[BUFSIZ];
5983 int ret = netmask_str2prefix_str(prefix, mask, prefix_str);
5984
5985 if (!ret) {
5986 vty_out(vty, "%% Inconsistent address and mask\n");
5987 return CMD_WARNING_CONFIG_FAILED;
5988 }
5989
5990 return bgp_aggregate_set(vty, prefix_str, AFI_IP, bgp_node_safi(vty),
5991 summary_only, as_set);
5992 }
5993
5994 DEFUN (no_aggregate_address,
5995 no_aggregate_address_cmd,
5996 "no aggregate-address A.B.C.D/M [<as-set [summary-only]|summary-only [as-set]>]",
5997 NO_STR
5998 "Configure BGP aggregate entries\n"
5999 "Aggregate prefix\n"
6000 "Generate AS set path information\n"
6001 "Filter more specific routes from updates\n"
6002 "Filter more specific routes from updates\n"
6003 "Generate AS set path information\n")
6004 {
6005 int idx = 0;
6006 argv_find(argv, argc, "A.B.C.D/M", &idx);
6007 char *prefix = argv[idx]->arg;
6008 return bgp_aggregate_unset(vty, prefix, AFI_IP, bgp_node_safi(vty));
6009 }
6010
6011 DEFUN (no_aggregate_address_mask,
6012 no_aggregate_address_mask_cmd,
6013 "no aggregate-address A.B.C.D A.B.C.D [<as-set [summary-only]|summary-only [as-set]>]",
6014 NO_STR
6015 "Configure BGP aggregate entries\n"
6016 "Aggregate address\n"
6017 "Aggregate mask\n"
6018 "Generate AS set path information\n"
6019 "Filter more specific routes from updates\n"
6020 "Filter more specific routes from updates\n"
6021 "Generate AS set path information\n")
6022 {
6023 int idx = 0;
6024 argv_find(argv, argc, "A.B.C.D", &idx);
6025 char *prefix = argv[idx]->arg;
6026 char *mask = argv[idx + 1]->arg;
6027
6028 char prefix_str[BUFSIZ];
6029 int ret = netmask_str2prefix_str(prefix, mask, prefix_str);
6030
6031 if (!ret) {
6032 vty_out(vty, "%% Inconsistent address and mask\n");
6033 return CMD_WARNING_CONFIG_FAILED;
6034 }
6035
6036 return bgp_aggregate_unset(vty, prefix_str, AFI_IP, bgp_node_safi(vty));
6037 }
6038
6039 DEFUN (ipv6_aggregate_address,
6040 ipv6_aggregate_address_cmd,
6041 "aggregate-address X:X::X:X/M [summary-only]",
6042 "Configure BGP aggregate entries\n"
6043 "Aggregate prefix\n"
6044 "Filter more specific routes from updates\n")
6045 {
6046 int idx = 0;
6047 argv_find(argv, argc, "X:X::X:X/M", &idx);
6048 char *prefix = argv[idx]->arg;
6049 int sum_only = argv_find(argv, argc, "summary-only", &idx)
6050 ? AGGREGATE_SUMMARY_ONLY
6051 : 0;
6052 return bgp_aggregate_set(vty, prefix, AFI_IP6, SAFI_UNICAST, sum_only,
6053 0);
6054 }
6055
6056 DEFUN (no_ipv6_aggregate_address,
6057 no_ipv6_aggregate_address_cmd,
6058 "no aggregate-address X:X::X:X/M [summary-only]",
6059 NO_STR
6060 "Configure BGP aggregate entries\n"
6061 "Aggregate prefix\n"
6062 "Filter more specific routes from updates\n")
6063 {
6064 int idx = 0;
6065 argv_find(argv, argc, "X:X::X:X/M", &idx);
6066 char *prefix = argv[idx]->arg;
6067 return bgp_aggregate_unset(vty, prefix, AFI_IP6, SAFI_UNICAST);
6068 }
6069
6070 /* Redistribute route treatment. */
6071 void bgp_redistribute_add(struct bgp *bgp, struct prefix *p,
6072 const union g_addr *nexthop, ifindex_t ifindex,
6073 enum nexthop_types_t nhtype, uint32_t metric,
6074 uint8_t type, unsigned short instance,
6075 route_tag_t tag)
6076 {
6077 struct bgp_path_info *new;
6078 struct bgp_path_info *bpi;
6079 struct bgp_path_info rmap_path;
6080 struct bgp_node *bn;
6081 struct attr attr;
6082 struct attr *new_attr;
6083 afi_t afi;
6084 int ret;
6085 struct bgp_redist *red;
6086
6087 /* Make default attribute. */
6088 bgp_attr_default_set(&attr, BGP_ORIGIN_INCOMPLETE);
6089
6090 switch (nhtype) {
6091 case NEXTHOP_TYPE_IFINDEX:
6092 break;
6093 case NEXTHOP_TYPE_IPV4:
6094 case NEXTHOP_TYPE_IPV4_IFINDEX:
6095 attr.nexthop = nexthop->ipv4;
6096 break;
6097 case NEXTHOP_TYPE_IPV6:
6098 case NEXTHOP_TYPE_IPV6_IFINDEX:
6099 attr.mp_nexthop_global = nexthop->ipv6;
6100 attr.mp_nexthop_len = BGP_ATTR_NHLEN_IPV6_GLOBAL;
6101 break;
6102 case NEXTHOP_TYPE_BLACKHOLE:
6103 switch (p->family) {
6104 case AF_INET:
6105 attr.nexthop.s_addr = INADDR_ANY;
6106 break;
6107 case AF_INET6:
6108 memset(&attr.mp_nexthop_global, 0,
6109 sizeof(attr.mp_nexthop_global));
6110 attr.mp_nexthop_len = BGP_ATTR_NHLEN_IPV6_GLOBAL;
6111 break;
6112 }
6113 break;
6114 }
6115 attr.nh_ifindex = ifindex;
6116
6117 attr.med = metric;
6118 attr.flag |= ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC);
6119 attr.tag = tag;
6120
6121 afi = family2afi(p->family);
6122
6123 red = bgp_redist_lookup(bgp, afi, type, instance);
6124 if (red) {
6125 struct attr attr_new;
6126
6127 /* Copy attribute for modification. */
6128 bgp_attr_dup(&attr_new, &attr);
6129
6130 if (red->redist_metric_flag)
6131 attr_new.med = red->redist_metric;
6132
6133 /* Apply route-map. */
6134 if (red->rmap.name) {
6135 memset(&rmap_path, 0, sizeof(struct bgp_path_info));
6136 rmap_path.peer = bgp->peer_self;
6137 rmap_path.attr = &attr_new;
6138
6139 SET_FLAG(bgp->peer_self->rmap_type,
6140 PEER_RMAP_TYPE_REDISTRIBUTE);
6141
6142 ret = route_map_apply(red->rmap.map, p, RMAP_BGP,
6143 &rmap_path);
6144
6145 bgp->peer_self->rmap_type = 0;
6146
6147 if (ret == RMAP_DENYMATCH) {
6148 /* Free uninterned attribute. */
6149 bgp_attr_flush(&attr_new);
6150
6151 /* Unintern original. */
6152 aspath_unintern(&attr.aspath);
6153 bgp_redistribute_delete(bgp, p, type, instance);
6154 return;
6155 }
6156 }
6157
6158 if (bgp_flag_check(bgp, BGP_FLAG_GRACEFUL_SHUTDOWN))
6159 bgp_attr_add_gshut_community(&attr_new);
6160
6161 bn = bgp_afi_node_get(bgp->rib[afi][SAFI_UNICAST], afi,
6162 SAFI_UNICAST, p, NULL);
6163
6164 new_attr = bgp_attr_intern(&attr_new);
6165
6166 for (bpi = bn->info; bpi; bpi = bpi->next)
6167 if (bpi->peer == bgp->peer_self
6168 && bpi->sub_type == BGP_ROUTE_REDISTRIBUTE)
6169 break;
6170
6171 if (bpi) {
6172 /* Ensure the (source route) type is updated. */
6173 bpi->type = type;
6174 if (attrhash_cmp(bpi->attr, new_attr)
6175 && !CHECK_FLAG(bpi->flags, BGP_PATH_REMOVED)) {
6176 bgp_attr_unintern(&new_attr);
6177 aspath_unintern(&attr.aspath);
6178 bgp_unlock_node(bn);
6179 return;
6180 } else {
6181 /* The attribute is changed. */
6182 bgp_path_info_set_flag(bn, bpi,
6183 BGP_PATH_ATTR_CHANGED);
6184
6185 /* Rewrite BGP route information. */
6186 if (CHECK_FLAG(bpi->flags, BGP_PATH_REMOVED))
6187 bgp_path_info_restore(bn, bpi);
6188 else
6189 bgp_aggregate_decrement(
6190 bgp, p, bpi, afi, SAFI_UNICAST);
6191 bgp_attr_unintern(&bpi->attr);
6192 bpi->attr = new_attr;
6193 bpi->uptime = bgp_clock();
6194
6195 /* Process change. */
6196 bgp_aggregate_increment(bgp, p, bpi, afi,
6197 SAFI_UNICAST);
6198 bgp_process(bgp, bn, afi, SAFI_UNICAST);
6199 bgp_unlock_node(bn);
6200 aspath_unintern(&attr.aspath);
6201
6202 if ((bgp->inst_type == BGP_INSTANCE_TYPE_VRF)
6203 || (bgp->inst_type
6204 == BGP_INSTANCE_TYPE_DEFAULT)) {
6205
6206 vpn_leak_from_vrf_update(
6207 bgp_get_default(), bgp, bpi);
6208 }
6209 return;
6210 }
6211 }
6212
6213 new = info_make(type, BGP_ROUTE_REDISTRIBUTE, instance,
6214 bgp->peer_self, new_attr, bn);
6215 SET_FLAG(new->flags, BGP_PATH_VALID);
6216
6217 bgp_aggregate_increment(bgp, p, new, afi, SAFI_UNICAST);
6218 bgp_path_info_add(bn, new);
6219 bgp_unlock_node(bn);
6220 bgp_process(bgp, bn, afi, SAFI_UNICAST);
6221
6222 if ((bgp->inst_type == BGP_INSTANCE_TYPE_VRF)
6223 || (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
6224
6225 vpn_leak_from_vrf_update(bgp_get_default(), bgp, new);
6226 }
6227 }
6228
6229 /* Unintern original. */
6230 aspath_unintern(&attr.aspath);
6231 }
6232
6233 void bgp_redistribute_delete(struct bgp *bgp, struct prefix *p, uint8_t type,
6234 unsigned short instance)
6235 {
6236 afi_t afi;
6237 struct bgp_node *rn;
6238 struct bgp_path_info *pi;
6239 struct bgp_redist *red;
6240
6241 afi = family2afi(p->family);
6242
6243 red = bgp_redist_lookup(bgp, afi, type, instance);
6244 if (red) {
6245 rn = bgp_afi_node_get(bgp->rib[afi][SAFI_UNICAST], afi,
6246 SAFI_UNICAST, p, NULL);
6247
6248 for (pi = rn->info; pi; pi = pi->next)
6249 if (pi->peer == bgp->peer_self && pi->type == type)
6250 break;
6251
6252 if (pi) {
6253 if ((bgp->inst_type == BGP_INSTANCE_TYPE_VRF)
6254 || (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
6255
6256 vpn_leak_from_vrf_withdraw(bgp_get_default(),
6257 bgp, pi);
6258 }
6259 bgp_aggregate_decrement(bgp, p, pi, afi, SAFI_UNICAST);
6260 bgp_path_info_delete(rn, pi);
6261 bgp_process(bgp, rn, afi, SAFI_UNICAST);
6262 }
6263 bgp_unlock_node(rn);
6264 }
6265 }
6266
6267 /* Withdraw specified route type's route. */
6268 void bgp_redistribute_withdraw(struct bgp *bgp, afi_t afi, int type,
6269 unsigned short instance)
6270 {
6271 struct bgp_node *rn;
6272 struct bgp_path_info *pi;
6273 struct bgp_table *table;
6274
6275 table = bgp->rib[afi][SAFI_UNICAST];
6276
6277 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn)) {
6278 for (pi = rn->info; pi; pi = pi->next)
6279 if (pi->peer == bgp->peer_self && pi->type == type
6280 && pi->instance == instance)
6281 break;
6282
6283 if (pi) {
6284 if ((bgp->inst_type == BGP_INSTANCE_TYPE_VRF)
6285 || (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)) {
6286
6287 vpn_leak_from_vrf_withdraw(bgp_get_default(),
6288 bgp, pi);
6289 }
6290 bgp_aggregate_decrement(bgp, &rn->p, pi, afi,
6291 SAFI_UNICAST);
6292 bgp_path_info_delete(rn, pi);
6293 bgp_process(bgp, rn, afi, SAFI_UNICAST);
6294 }
6295 }
6296 }
6297
6298 /* Static function to display route. */
6299 static void route_vty_out_route(struct prefix *p, struct vty *vty,
6300 json_object *json)
6301 {
6302 int len = 0;
6303 char buf[BUFSIZ];
6304 char buf2[BUFSIZ];
6305
6306 if (p->family == AF_INET) {
6307 if (!json) {
6308 len = vty_out(
6309 vty, "%s/%d",
6310 inet_ntop(p->family, &p->u.prefix, buf, BUFSIZ),
6311 p->prefixlen);
6312 } else {
6313 json_object_string_add(json, "prefix",
6314 inet_ntop(p->family,
6315 &p->u.prefix, buf,
6316 BUFSIZ));
6317 json_object_int_add(json, "prefixLen", p->prefixlen);
6318 prefix2str(p, buf2, PREFIX_STRLEN);
6319 json_object_string_add(json, "network", buf2);
6320 }
6321 } else if (p->family == AF_ETHERNET) {
6322 prefix2str(p, buf, PREFIX_STRLEN);
6323 len = vty_out(vty, "%s", buf);
6324 } else if (p->family == AF_EVPN) {
6325 if (!json)
6326 len = vty_out(
6327 vty, "%s",
6328 bgp_evpn_route2str((struct prefix_evpn *)p, buf,
6329 BUFSIZ));
6330 else
6331 bgp_evpn_route2json((struct prefix_evpn *)p, json);
6332 } else if (p->family == AF_FLOWSPEC) {
6333 route_vty_out_flowspec(vty, p, NULL,
6334 json ?
6335 NLRI_STRING_FORMAT_JSON_SIMPLE :
6336 NLRI_STRING_FORMAT_MIN, json);
6337 } else {
6338 if (!json)
6339 len = vty_out(
6340 vty, "%s/%d",
6341 inet_ntop(p->family, &p->u.prefix, buf, BUFSIZ),
6342 p->prefixlen);
6343 else {
6344 json_object_string_add(json, "prefix",
6345 inet_ntop(p->family,
6346 &p->u.prefix, buf,
6347 BUFSIZ));
6348 json_object_int_add(json, "prefixLen", p->prefixlen);
6349 prefix2str(p, buf2, PREFIX_STRLEN);
6350 json_object_string_add(json, "network", buf2);
6351 }
6352 }
6353
6354 if (!json) {
6355 len = 17 - len;
6356 if (len < 1)
6357 vty_out(vty, "\n%*s", 20, " ");
6358 else
6359 vty_out(vty, "%*s", len, " ");
6360 }
6361 }
6362
6363 enum bgp_display_type {
6364 normal_list,
6365 };
6366
6367 /* Print the short form route status for a bgp_path_info */
6368 static void route_vty_short_status_out(struct vty *vty,
6369 struct bgp_path_info *path,
6370 json_object *json_path)
6371 {
6372 if (json_path) {
6373
6374 /* Route status display. */
6375 if (CHECK_FLAG(path->flags, BGP_PATH_REMOVED))
6376 json_object_boolean_true_add(json_path, "removed");
6377
6378 if (CHECK_FLAG(path->flags, BGP_PATH_STALE))
6379 json_object_boolean_true_add(json_path, "stale");
6380
6381 if (path->extra && path->extra->suppress)
6382 json_object_boolean_true_add(json_path, "suppressed");
6383
6384 if (CHECK_FLAG(path->flags, BGP_PATH_VALID)
6385 && !CHECK_FLAG(path->flags, BGP_PATH_HISTORY))
6386 json_object_boolean_true_add(json_path, "valid");
6387
6388 /* Selected */
6389 if (CHECK_FLAG(path->flags, BGP_PATH_HISTORY))
6390 json_object_boolean_true_add(json_path, "history");
6391
6392 if (CHECK_FLAG(path->flags, BGP_PATH_DAMPED))
6393 json_object_boolean_true_add(json_path, "damped");
6394
6395 if (CHECK_FLAG(path->flags, BGP_PATH_SELECTED))
6396 json_object_boolean_true_add(json_path, "bestpath");
6397
6398 if (CHECK_FLAG(path->flags, BGP_PATH_MULTIPATH))
6399 json_object_boolean_true_add(json_path, "multipath");
6400
6401 /* Internal route. */
6402 if ((path->peer->as)
6403 && (path->peer->as == path->peer->local_as))
6404 json_object_string_add(json_path, "pathFrom",
6405 "internal");
6406 else
6407 json_object_string_add(json_path, "pathFrom",
6408 "external");
6409
6410 return;
6411 }
6412
6413 /* Route status display. */
6414 if (CHECK_FLAG(path->flags, BGP_PATH_REMOVED))
6415 vty_out(vty, "R");
6416 else if (CHECK_FLAG(path->flags, BGP_PATH_STALE))
6417 vty_out(vty, "S");
6418 else if (path->extra && path->extra->suppress)
6419 vty_out(vty, "s");
6420 else if (CHECK_FLAG(path->flags, BGP_PATH_VALID)
6421 && !CHECK_FLAG(path->flags, BGP_PATH_HISTORY))
6422 vty_out(vty, "*");
6423 else
6424 vty_out(vty, " ");
6425
6426 /* Selected */
6427 if (CHECK_FLAG(path->flags, BGP_PATH_HISTORY))
6428 vty_out(vty, "h");
6429 else if (CHECK_FLAG(path->flags, BGP_PATH_DAMPED))
6430 vty_out(vty, "d");
6431 else if (CHECK_FLAG(path->flags, BGP_PATH_SELECTED))
6432 vty_out(vty, ">");
6433 else if (CHECK_FLAG(path->flags, BGP_PATH_MULTIPATH))
6434 vty_out(vty, "=");
6435 else
6436 vty_out(vty, " ");
6437
6438 /* Internal route. */
6439 if (path->peer && (path->peer->as)
6440 && (path->peer->as == path->peer->local_as))
6441 vty_out(vty, "i");
6442 else
6443 vty_out(vty, " ");
6444 }
6445
6446 /* called from terminal list command */
6447 void route_vty_out(struct vty *vty, struct prefix *p,
6448 struct bgp_path_info *path, int display, safi_t safi,
6449 json_object *json_paths)
6450 {
6451 struct attr *attr;
6452 json_object *json_path = NULL;
6453 json_object *json_nexthops = NULL;
6454 json_object *json_nexthop_global = NULL;
6455 json_object *json_nexthop_ll = NULL;
6456 char vrf_id_str[VRF_NAMSIZ] = {0};
6457 bool nexthop_self =
6458 CHECK_FLAG(path->flags, BGP_PATH_ANNC_NH_SELF) ? true : false;
6459 bool nexthop_othervrf = false;
6460 vrf_id_t nexthop_vrfid = VRF_DEFAULT;
6461 const char *nexthop_vrfname = "Default";
6462
6463 if (json_paths)
6464 json_path = json_object_new_object();
6465
6466 /* short status lead text */
6467 route_vty_short_status_out(vty, path, json_path);
6468
6469 if (!json_paths) {
6470 /* print prefix and mask */
6471 if (!display)
6472 route_vty_out_route(p, vty, json_path);
6473 else
6474 vty_out(vty, "%*s", 17, " ");
6475 } else {
6476 route_vty_out_route(p, vty, json_path);
6477 }
6478
6479 /* Print attribute */
6480 attr = path->attr;
6481 if (!attr) {
6482 if (json_paths)
6483 json_object_array_add(json_paths, json_path);
6484 else
6485 vty_out(vty, "\n");
6486
6487 return;
6488 }
6489
6490 /*
6491 * If vrf id of nexthop is different from that of prefix,
6492 * set up printable string to append
6493 */
6494 if (path->extra && path->extra->bgp_orig) {
6495 const char *self = "";
6496
6497 if (nexthop_self)
6498 self = "<";
6499
6500 nexthop_othervrf = true;
6501 nexthop_vrfid = path->extra->bgp_orig->vrf_id;
6502
6503 if (path->extra->bgp_orig->vrf_id == VRF_UNKNOWN)
6504 snprintf(vrf_id_str, sizeof(vrf_id_str),
6505 "@%s%s", VRFID_NONE_STR, self);
6506 else
6507 snprintf(vrf_id_str, sizeof(vrf_id_str), "@%u%s",
6508 path->extra->bgp_orig->vrf_id, self);
6509
6510 if (path->extra->bgp_orig->inst_type
6511 != BGP_INSTANCE_TYPE_DEFAULT)
6512
6513 nexthop_vrfname = path->extra->bgp_orig->name;
6514 } else {
6515 const char *self = "";
6516
6517 if (nexthop_self)
6518 self = "<";
6519
6520 snprintf(vrf_id_str, sizeof(vrf_id_str), "%s", self);
6521 }
6522
6523 /*
6524 * For ENCAP and EVPN routes, nexthop address family is not
6525 * neccessarily the same as the prefix address family.
6526 * Both SAFI_MPLS_VPN and SAFI_ENCAP use the MP nexthop field
6527 * EVPN routes are also exchanged with a MP nexthop. Currently,
6528 * this
6529 * is only IPv4, the value will be present in either
6530 * attr->nexthop or
6531 * attr->mp_nexthop_global_in
6532 */
6533 if ((safi == SAFI_ENCAP) || (safi == SAFI_MPLS_VPN)) {
6534 char buf[BUFSIZ];
6535 char nexthop[128];
6536 int af = NEXTHOP_FAMILY(attr->mp_nexthop_len);
6537
6538 switch (af) {
6539 case AF_INET:
6540 sprintf(nexthop, "%s",
6541 inet_ntop(af, &attr->mp_nexthop_global_in, buf,
6542 BUFSIZ));
6543 break;
6544 case AF_INET6:
6545 sprintf(nexthop, "%s",
6546 inet_ntop(af, &attr->mp_nexthop_global, buf,
6547 BUFSIZ));
6548 break;
6549 default:
6550 sprintf(nexthop, "?");
6551 break;
6552 }
6553
6554 if (json_paths) {
6555 json_nexthop_global = json_object_new_object();
6556
6557 json_object_string_add(json_nexthop_global, "afi",
6558 (af == AF_INET) ? "ip" : "ipv6");
6559 json_object_string_add(json_nexthop_global,
6560 (af == AF_INET) ? "ip" : "ipv6",
6561 nexthop);
6562 json_object_boolean_true_add(json_nexthop_global,
6563 "used");
6564 } else
6565 vty_out(vty, "%s%s", nexthop, vrf_id_str);
6566 } else if (safi == SAFI_EVPN) {
6567 if (json_paths) {
6568 json_nexthop_global = json_object_new_object();
6569
6570 json_object_string_add(json_nexthop_global, "ip",
6571 inet_ntoa(attr->nexthop));
6572 json_object_string_add(json_nexthop_global, "afi",
6573 "ipv4");
6574 json_object_boolean_true_add(json_nexthop_global,
6575 "used");
6576 } else
6577 vty_out(vty, "%-16s%s", inet_ntoa(attr->nexthop),
6578 vrf_id_str);
6579 } else if (safi == SAFI_FLOWSPEC) {
6580 if (attr->nexthop.s_addr != 0) {
6581 if (json_paths) {
6582 json_nexthop_global = json_object_new_object();
6583 json_object_string_add(
6584 json_nexthop_global, "ip",
6585 inet_ntoa(attr->nexthop));
6586 json_object_string_add(json_nexthop_global,
6587 "afi", "ipv4");
6588 json_object_boolean_true_add(json_nexthop_global,
6589 "used");
6590 } else {
6591 vty_out(vty, "%-16s", inet_ntoa(attr->nexthop));
6592 }
6593 }
6594 } else if (p->family == AF_INET && !BGP_ATTR_NEXTHOP_AFI_IP6(attr)) {
6595 if (json_paths) {
6596 json_nexthop_global = json_object_new_object();
6597
6598 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_EVPN))
6599 json_object_string_add(
6600 json_nexthop_global, "ip",
6601 inet_ntoa(attr->mp_nexthop_global_in));
6602 else
6603 json_object_string_add(
6604 json_nexthop_global, "ip",
6605 inet_ntoa(attr->nexthop));
6606
6607 json_object_string_add(json_nexthop_global, "afi",
6608 "ipv4");
6609 json_object_boolean_true_add(json_nexthop_global,
6610 "used");
6611 } else {
6612 char buf[BUFSIZ];
6613
6614 snprintf(buf, sizeof(buf), "%s%s",
6615 inet_ntoa(attr->nexthop), vrf_id_str);
6616 vty_out(vty, "%-16s", buf);
6617 }
6618 }
6619
6620 /* IPv6 Next Hop */
6621 else if (p->family == AF_INET6 || BGP_ATTR_NEXTHOP_AFI_IP6(attr)) {
6622 int len;
6623 char buf[BUFSIZ];
6624
6625 if (json_paths) {
6626 json_nexthop_global = json_object_new_object();
6627 json_object_string_add(
6628 json_nexthop_global, "ip",
6629 inet_ntop(AF_INET6, &attr->mp_nexthop_global,
6630 buf, BUFSIZ));
6631 json_object_string_add(json_nexthop_global, "afi",
6632 "ipv6");
6633 json_object_string_add(json_nexthop_global, "scope",
6634 "global");
6635
6636 /* We display both LL & GL if both have been
6637 * received */
6638 if ((attr->mp_nexthop_len == 32)
6639 || (path->peer->conf_if)) {
6640 json_nexthop_ll = json_object_new_object();
6641 json_object_string_add(
6642 json_nexthop_ll, "ip",
6643 inet_ntop(AF_INET6,
6644 &attr->mp_nexthop_local, buf,
6645 BUFSIZ));
6646 json_object_string_add(json_nexthop_ll, "afi",
6647 "ipv6");
6648 json_object_string_add(json_nexthop_ll, "scope",
6649 "link-local");
6650
6651 if ((IPV6_ADDR_CMP(&attr->mp_nexthop_global,
6652 &attr->mp_nexthop_local)
6653 != 0)
6654 && !attr->mp_nexthop_prefer_global)
6655 json_object_boolean_true_add(
6656 json_nexthop_ll, "used");
6657 else
6658 json_object_boolean_true_add(
6659 json_nexthop_global, "used");
6660 } else
6661 json_object_boolean_true_add(
6662 json_nexthop_global, "used");
6663 } else {
6664 /* Display LL if LL/Global both in table unless
6665 * prefer-global is set */
6666 if (((attr->mp_nexthop_len == 32)
6667 && !attr->mp_nexthop_prefer_global)
6668 || (path->peer->conf_if)) {
6669 if (path->peer->conf_if) {
6670 len = vty_out(vty, "%s",
6671 path->peer->conf_if);
6672 len = 16 - len; /* len of IPv6
6673 addr + max
6674 len of def
6675 ifname */
6676
6677 if (len < 1)
6678 vty_out(vty, "\n%*s", 36, " ");
6679 else
6680 vty_out(vty, "%*s", len, " ");
6681 } else {
6682 len = vty_out(
6683 vty, "%s%s",
6684 inet_ntop(
6685 AF_INET6,
6686 &attr->mp_nexthop_local,
6687 buf, BUFSIZ),
6688 vrf_id_str);
6689 len = 16 - len;
6690
6691 if (len < 1)
6692 vty_out(vty, "\n%*s", 36, " ");
6693 else
6694 vty_out(vty, "%*s", len, " ");
6695 }
6696 } else {
6697 len = vty_out(
6698 vty, "%s%s",
6699 inet_ntop(AF_INET6,
6700 &attr->mp_nexthop_global, buf,
6701 BUFSIZ),
6702 vrf_id_str);
6703 len = 16 - len;
6704
6705 if (len < 1)
6706 vty_out(vty, "\n%*s", 36, " ");
6707 else
6708 vty_out(vty, "%*s", len, " ");
6709 }
6710 }
6711 }
6712
6713 /* MED/Metric */
6714 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC))
6715 if (json_paths)
6716 json_object_int_add(json_path, "med", attr->med);
6717 else
6718 vty_out(vty, "%10u", attr->med);
6719 else if (!json_paths)
6720 vty_out(vty, " ");
6721
6722 /* Local Pref */
6723 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF))
6724 if (json_paths)
6725 json_object_int_add(json_path, "localpref",
6726 attr->local_pref);
6727 else
6728 vty_out(vty, "%7u", attr->local_pref);
6729 else if (!json_paths)
6730 vty_out(vty, " ");
6731
6732 if (json_paths)
6733 json_object_int_add(json_path, "weight", attr->weight);
6734 else
6735 vty_out(vty, "%7u ", attr->weight);
6736
6737 if (json_paths) {
6738 char buf[BUFSIZ];
6739 json_object_string_add(
6740 json_path, "peerId",
6741 sockunion2str(&path->peer->su, buf, SU_ADDRSTRLEN));
6742 }
6743
6744 /* Print aspath */
6745 if (attr->aspath) {
6746 if (json_paths)
6747 json_object_string_add(json_path, "aspath",
6748 attr->aspath->str);
6749 else
6750 aspath_print_vty(vty, "%s", attr->aspath, " ");
6751 }
6752
6753 /* Print origin */
6754 if (json_paths)
6755 json_object_string_add(json_path, "origin",
6756 bgp_origin_long_str[attr->origin]);
6757 else
6758 vty_out(vty, "%s", bgp_origin_str[attr->origin]);
6759
6760 if (json_paths) {
6761 if (nexthop_self)
6762 json_object_boolean_true_add(json_path,
6763 "announceNexthopSelf");
6764 if (nexthop_othervrf) {
6765 json_object_string_add(json_path, "nhVrfName",
6766 nexthop_vrfname);
6767
6768 json_object_int_add(json_path, "nhVrfId",
6769 ((nexthop_vrfid == VRF_UNKNOWN)
6770 ? -1
6771 : (int)nexthop_vrfid));
6772 }
6773 }
6774
6775 if (json_paths) {
6776 if (json_nexthop_global || json_nexthop_ll) {
6777 json_nexthops = json_object_new_array();
6778
6779 if (json_nexthop_global)
6780 json_object_array_add(json_nexthops,
6781 json_nexthop_global);
6782
6783 if (json_nexthop_ll)
6784 json_object_array_add(json_nexthops,
6785 json_nexthop_ll);
6786
6787 json_object_object_add(json_path, "nexthops",
6788 json_nexthops);
6789 }
6790
6791 json_object_array_add(json_paths, json_path);
6792 } else {
6793 vty_out(vty, "\n");
6794 #if ENABLE_BGP_VNC
6795 /* prints an additional line, indented, with VNC info, if
6796 * present */
6797 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_ENCAP))
6798 rfapi_vty_out_vncinfo(vty, p, path, safi);
6799 #endif
6800 }
6801 }
6802
6803 /* called from terminal list command */
6804 void route_vty_out_tmp(struct vty *vty, struct prefix *p, struct attr *attr,
6805 safi_t safi, bool use_json, json_object *json_ar)
6806 {
6807 json_object *json_status = NULL;
6808 json_object *json_net = NULL;
6809 char buff[BUFSIZ];
6810 char buf2[BUFSIZ];
6811 /* Route status display. */
6812 if (use_json) {
6813 json_status = json_object_new_object();
6814 json_net = json_object_new_object();
6815 } else {
6816 vty_out(vty, "*");
6817 vty_out(vty, ">");
6818 vty_out(vty, " ");
6819 }
6820
6821 /* print prefix and mask */
6822 if (use_json) {
6823 json_object_string_add(
6824 json_net, "addrPrefix",
6825 inet_ntop(p->family, &p->u.prefix, buff, BUFSIZ));
6826 json_object_int_add(json_net, "prefixLen", p->prefixlen);
6827 prefix2str(p, buf2, PREFIX_STRLEN);
6828 json_object_string_add(json_net, "network", buf2);
6829 } else
6830 route_vty_out_route(p, vty, NULL);
6831
6832 /* Print attribute */
6833 if (attr) {
6834 if (use_json) {
6835 if (p->family == AF_INET
6836 && (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
6837 || safi == SAFI_EVPN
6838 || !BGP_ATTR_NEXTHOP_AFI_IP6(attr))) {
6839 if (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
6840 || safi == SAFI_EVPN)
6841 json_object_string_add(
6842 json_net, "nextHop",
6843 inet_ntoa(
6844 attr->mp_nexthop_global_in));
6845 else
6846 json_object_string_add(
6847 json_net, "nextHop",
6848 inet_ntoa(attr->nexthop));
6849 } else if (p->family == AF_INET6
6850 || BGP_ATTR_NEXTHOP_AFI_IP6(attr)) {
6851 char buf[BUFSIZ];
6852
6853 json_object_string_add(
6854 json_net, "nextHopGlobal",
6855 inet_ntop(AF_INET6,
6856 &attr->mp_nexthop_global, buf,
6857 BUFSIZ));
6858 }
6859
6860 if (attr->flag
6861 & ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC))
6862 json_object_int_add(json_net, "metric",
6863 attr->med);
6864
6865 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF))
6866 json_object_int_add(json_net, "localPref",
6867 attr->local_pref);
6868
6869 json_object_int_add(json_net, "weight", attr->weight);
6870
6871 /* Print aspath */
6872 if (attr->aspath)
6873 json_object_string_add(json_net, "asPath",
6874 attr->aspath->str);
6875
6876 /* Print origin */
6877 json_object_string_add(json_net, "bgpOriginCode",
6878 bgp_origin_str[attr->origin]);
6879 } else {
6880 if (p->family == AF_INET
6881 && (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
6882 || safi == SAFI_EVPN
6883 || !BGP_ATTR_NEXTHOP_AFI_IP6(attr))) {
6884 if (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
6885 || safi == SAFI_EVPN)
6886 vty_out(vty, "%-16s",
6887 inet_ntoa(
6888 attr->mp_nexthop_global_in));
6889 else
6890 vty_out(vty, "%-16s",
6891 inet_ntoa(attr->nexthop));
6892 } else if (p->family == AF_INET6
6893 || BGP_ATTR_NEXTHOP_AFI_IP6(attr)) {
6894 int len;
6895 char buf[BUFSIZ];
6896
6897 len = vty_out(
6898 vty, "%s",
6899 inet_ntop(AF_INET6,
6900 &attr->mp_nexthop_global, buf,
6901 BUFSIZ));
6902 len = 16 - len;
6903 if (len < 1)
6904 vty_out(vty, "\n%*s", 36, " ");
6905 else
6906 vty_out(vty, "%*s", len, " ");
6907 }
6908 if (attr->flag
6909 & ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC))
6910 vty_out(vty, "%10u", attr->med);
6911 else
6912 vty_out(vty, " ");
6913
6914 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF))
6915 vty_out(vty, "%7u", attr->local_pref);
6916 else
6917 vty_out(vty, " ");
6918
6919 vty_out(vty, "%7u ", attr->weight);
6920
6921 /* Print aspath */
6922 if (attr->aspath)
6923 aspath_print_vty(vty, "%s", attr->aspath, " ");
6924
6925 /* Print origin */
6926 vty_out(vty, "%s", bgp_origin_str[attr->origin]);
6927 }
6928 }
6929 if (use_json) {
6930 json_object_boolean_true_add(json_status, "*");
6931 json_object_boolean_true_add(json_status, ">");
6932 json_object_object_add(json_net, "appliedStatusSymbols",
6933 json_status);
6934 char buf_cut[BUFSIZ];
6935 json_object_object_add(
6936 json_ar,
6937 inet_ntop(p->family, &p->u.prefix, buf_cut, BUFSIZ),
6938 json_net);
6939 } else
6940 vty_out(vty, "\n");
6941 }
6942
6943 void route_vty_out_tag(struct vty *vty, struct prefix *p,
6944 struct bgp_path_info *path, int display, safi_t safi,
6945 json_object *json)
6946 {
6947 json_object *json_out = NULL;
6948 struct attr *attr;
6949 mpls_label_t label = MPLS_INVALID_LABEL;
6950
6951 if (!path->extra)
6952 return;
6953
6954 if (json)
6955 json_out = json_object_new_object();
6956
6957 /* short status lead text */
6958 route_vty_short_status_out(vty, path, json_out);
6959
6960 /* print prefix and mask */
6961 if (json == NULL) {
6962 if (!display)
6963 route_vty_out_route(p, vty, NULL);
6964 else
6965 vty_out(vty, "%*s", 17, " ");
6966 }
6967
6968 /* Print attribute */
6969 attr = path->attr;
6970 if (attr) {
6971 if (((p->family == AF_INET)
6972 && ((safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP)))
6973 || (safi == SAFI_EVPN && !BGP_ATTR_NEXTHOP_AFI_IP6(attr))
6974 || (!BGP_ATTR_NEXTHOP_AFI_IP6(attr))) {
6975 if (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
6976 || safi == SAFI_EVPN) {
6977 if (json)
6978 json_object_string_add(
6979 json_out, "mpNexthopGlobalIn",
6980 inet_ntoa(
6981 attr->mp_nexthop_global_in));
6982 else
6983 vty_out(vty, "%-16s",
6984 inet_ntoa(
6985 attr->mp_nexthop_global_in));
6986 } else {
6987 if (json)
6988 json_object_string_add(
6989 json_out, "nexthop",
6990 inet_ntoa(attr->nexthop));
6991 else
6992 vty_out(vty, "%-16s",
6993 inet_ntoa(attr->nexthop));
6994 }
6995 } else if (((p->family == AF_INET6)
6996 && ((safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP)))
6997 || (safi == SAFI_EVPN
6998 && BGP_ATTR_NEXTHOP_AFI_IP6(attr))
6999 || (BGP_ATTR_NEXTHOP_AFI_IP6(attr))) {
7000 char buf_a[512];
7001 char buf_b[512];
7002 char buf_c[BUFSIZ];
7003 if (attr->mp_nexthop_len
7004 == BGP_ATTR_NHLEN_IPV6_GLOBAL) {
7005 if (json)
7006 json_object_string_add(
7007 json_out, "mpNexthopGlobalIn",
7008 inet_ntop(
7009 AF_INET6,
7010 &attr->mp_nexthop_global,
7011 buf_a, sizeof(buf_a)));
7012 else
7013 vty_out(vty, "%s",
7014 inet_ntop(
7015 AF_INET6,
7016 &attr->mp_nexthop_global,
7017 buf_a, sizeof(buf_a)));
7018 } else if (attr->mp_nexthop_len
7019 == BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL) {
7020 if (json) {
7021 inet_ntop(AF_INET6,
7022 &attr->mp_nexthop_global,
7023 buf_a, sizeof(buf_a));
7024 inet_ntop(AF_INET6,
7025 &attr->mp_nexthop_local,
7026 buf_b, sizeof(buf_b));
7027 sprintf(buf_c, "%s(%s)", buf_a, buf_b);
7028 json_object_string_add(
7029 json_out,
7030 "mpNexthopGlobalLocal", buf_c);
7031 } else
7032 vty_out(vty, "%s(%s)",
7033 inet_ntop(
7034 AF_INET6,
7035 &attr->mp_nexthop_global,
7036 buf_a, sizeof(buf_a)),
7037 inet_ntop(
7038 AF_INET6,
7039 &attr->mp_nexthop_local,
7040 buf_b, sizeof(buf_b)));
7041 }
7042 }
7043 }
7044
7045 label = decode_label(&path->extra->label[0]);
7046
7047 if (bgp_is_valid_label(&label)) {
7048 if (json) {
7049 json_object_int_add(json_out, "notag", label);
7050 json_object_array_add(json, json_out);
7051 } else {
7052 vty_out(vty, "notag/%d", label);
7053 vty_out(vty, "\n");
7054 }
7055 }
7056 }
7057
7058 void route_vty_out_overlay(struct vty *vty, struct prefix *p,
7059 struct bgp_path_info *path, int display,
7060 json_object *json_paths)
7061 {
7062 struct attr *attr;
7063 char buf[BUFSIZ];
7064 json_object *json_path = NULL;
7065
7066 if (json_paths)
7067 json_path = json_object_new_object();
7068
7069 if (!path->extra)
7070 return;
7071
7072 /* short status lead text */
7073 route_vty_short_status_out(vty, path, json_path);
7074
7075 /* print prefix and mask */
7076 if (!display)
7077 route_vty_out_route(p, vty, NULL);
7078 else
7079 vty_out(vty, "%*s", 17, " ");
7080
7081 /* Print attribute */
7082 attr = path->attr;
7083 if (attr) {
7084 char buf1[BUFSIZ];
7085 int af = NEXTHOP_FAMILY(attr->mp_nexthop_len);
7086
7087 switch (af) {
7088 case AF_INET:
7089 vty_out(vty, "%-16s",
7090 inet_ntop(af, &attr->mp_nexthop_global_in, buf,
7091 BUFSIZ));
7092 break;
7093 case AF_INET6:
7094 vty_out(vty, "%s(%s)",
7095 inet_ntop(af, &attr->mp_nexthop_global, buf,
7096 BUFSIZ),
7097 inet_ntop(af, &attr->mp_nexthop_local, buf1,
7098 BUFSIZ));
7099 break;
7100 default:
7101 vty_out(vty, "?");
7102 }
7103
7104 char *str = esi2str(&(attr->evpn_overlay.eth_s_id));
7105
7106 vty_out(vty, "%s", str);
7107 XFREE(MTYPE_TMP, str);
7108
7109 if (is_evpn_prefix_ipaddr_v4((struct prefix_evpn *)p)) {
7110 vty_out(vty, "/%s",
7111 inet_ntoa(attr->evpn_overlay.gw_ip.ipv4));
7112 } else if (is_evpn_prefix_ipaddr_v6((struct prefix_evpn *)p)) {
7113 vty_out(vty, "/%s",
7114 inet_ntop(AF_INET6,
7115 &(attr->evpn_overlay.gw_ip.ipv6), buf,
7116 BUFSIZ));
7117 }
7118 if (attr->ecommunity) {
7119 char *mac = NULL;
7120 struct ecommunity_val *routermac = ecommunity_lookup(
7121 attr->ecommunity, ECOMMUNITY_ENCODE_EVPN,
7122 ECOMMUNITY_EVPN_SUBTYPE_ROUTERMAC);
7123 if (routermac)
7124 mac = ecom_mac2str((char *)routermac->val);
7125 if (mac) {
7126 vty_out(vty, "/%s", (char *)mac);
7127 XFREE(MTYPE_TMP, mac);
7128 }
7129 }
7130 vty_out(vty, "\n");
7131 }
7132
7133 }
7134
7135 /* dampening route */
7136 static void damp_route_vty_out(struct vty *vty, struct prefix *p,
7137 struct bgp_path_info *path, int display,
7138 safi_t safi, bool use_json, json_object *json)
7139 {
7140 struct attr *attr;
7141 int len;
7142 char timebuf[BGP_UPTIME_LEN];
7143
7144 /* short status lead text */
7145 route_vty_short_status_out(vty, path, json);
7146
7147 /* print prefix and mask */
7148 if (!use_json) {
7149 if (!display)
7150 route_vty_out_route(p, vty, NULL);
7151 else
7152 vty_out(vty, "%*s", 17, " ");
7153 }
7154
7155 len = vty_out(vty, "%s", path->peer->host);
7156 len = 17 - len;
7157 if (len < 1) {
7158 if (!use_json)
7159 vty_out(vty, "\n%*s", 34, " ");
7160 } else {
7161 if (use_json)
7162 json_object_int_add(json, "peerHost", len);
7163 else
7164 vty_out(vty, "%*s", len, " ");
7165 }
7166
7167 if (use_json)
7168 bgp_damp_reuse_time_vty(vty, path, timebuf, BGP_UPTIME_LEN,
7169 use_json, json);
7170 else
7171 vty_out(vty, "%s ",
7172 bgp_damp_reuse_time_vty(vty, path, timebuf,
7173 BGP_UPTIME_LEN, use_json,
7174 json));
7175
7176 /* Print attribute */
7177 attr = path->attr;
7178 if (attr) {
7179 /* Print aspath */
7180 if (attr->aspath) {
7181 if (use_json)
7182 json_object_string_add(json, "asPath",
7183 attr->aspath->str);
7184 else
7185 aspath_print_vty(vty, "%s", attr->aspath, " ");
7186 }
7187
7188 /* Print origin */
7189 if (use_json)
7190 json_object_string_add(json, "origin",
7191 bgp_origin_str[attr->origin]);
7192 else
7193 vty_out(vty, "%s", bgp_origin_str[attr->origin]);
7194 }
7195 if (!use_json)
7196 vty_out(vty, "\n");
7197 }
7198
7199 /* flap route */
7200 static void flap_route_vty_out(struct vty *vty, struct prefix *p,
7201 struct bgp_path_info *path, int display,
7202 safi_t safi, bool use_json, json_object *json)
7203 {
7204 struct attr *attr;
7205 struct bgp_damp_info *bdi;
7206 char timebuf[BGP_UPTIME_LEN];
7207 int len;
7208
7209 if (!path->extra)
7210 return;
7211
7212 bdi = path->extra->damp_info;
7213
7214 /* short status lead text */
7215 route_vty_short_status_out(vty, path, json);
7216
7217 /* print prefix and mask */
7218 if (!use_json) {
7219 if (!display)
7220 route_vty_out_route(p, vty, NULL);
7221 else
7222 vty_out(vty, "%*s", 17, " ");
7223 }
7224
7225 len = vty_out(vty, "%s", path->peer->host);
7226 len = 16 - len;
7227 if (len < 1) {
7228 if (!use_json)
7229 vty_out(vty, "\n%*s", 33, " ");
7230 } else {
7231 if (use_json)
7232 json_object_int_add(json, "peerHost", len);
7233 else
7234 vty_out(vty, "%*s", len, " ");
7235 }
7236
7237 len = vty_out(vty, "%d", bdi->flap);
7238 len = 5 - len;
7239 if (len < 1) {
7240 if (!use_json)
7241 vty_out(vty, " ");
7242 } else {
7243 if (use_json)
7244 json_object_int_add(json, "bdiFlap", len);
7245 else
7246 vty_out(vty, "%*s", len, " ");
7247 }
7248
7249 if (use_json)
7250 peer_uptime(bdi->start_time, timebuf, BGP_UPTIME_LEN, use_json,
7251 json);
7252 else
7253 vty_out(vty, "%s ", peer_uptime(bdi->start_time, timebuf,
7254 BGP_UPTIME_LEN, 0, NULL));
7255
7256 if (CHECK_FLAG(path->flags, BGP_PATH_DAMPED)
7257 && !CHECK_FLAG(path->flags, BGP_PATH_HISTORY)) {
7258 if (use_json)
7259 bgp_damp_reuse_time_vty(vty, path, timebuf,
7260 BGP_UPTIME_LEN, use_json, json);
7261 else
7262 vty_out(vty, "%s ",
7263 bgp_damp_reuse_time_vty(vty, path, timebuf,
7264 BGP_UPTIME_LEN,
7265 use_json, json));
7266 } else {
7267 if (!use_json)
7268 vty_out(vty, "%*s ", 8, " ");
7269 }
7270
7271 /* Print attribute */
7272 attr = path->attr;
7273 if (attr) {
7274 /* Print aspath */
7275 if (attr->aspath) {
7276 if (use_json)
7277 json_object_string_add(json, "asPath",
7278 attr->aspath->str);
7279 else
7280 aspath_print_vty(vty, "%s", attr->aspath, " ");
7281 }
7282
7283 /* Print origin */
7284 if (use_json)
7285 json_object_string_add(json, "origin",
7286 bgp_origin_str[attr->origin]);
7287 else
7288 vty_out(vty, "%s", bgp_origin_str[attr->origin]);
7289 }
7290 if (!use_json)
7291 vty_out(vty, "\n");
7292 }
7293
7294 static void route_vty_out_advertised_to(struct vty *vty, struct peer *peer,
7295 int *first, const char *header,
7296 json_object *json_adv_to)
7297 {
7298 char buf1[INET6_ADDRSTRLEN];
7299 json_object *json_peer = NULL;
7300
7301 if (json_adv_to) {
7302 /* 'advertised-to' is a dictionary of peers we have advertised
7303 * this
7304 * prefix too. The key is the peer's IP or swpX, the value is
7305 * the
7306 * hostname if we know it and "" if not.
7307 */
7308 json_peer = json_object_new_object();
7309
7310 if (peer->hostname)
7311 json_object_string_add(json_peer, "hostname",
7312 peer->hostname);
7313
7314 if (peer->conf_if)
7315 json_object_object_add(json_adv_to, peer->conf_if,
7316 json_peer);
7317 else
7318 json_object_object_add(
7319 json_adv_to,
7320 sockunion2str(&peer->su, buf1, SU_ADDRSTRLEN),
7321 json_peer);
7322 } else {
7323 if (*first) {
7324 vty_out(vty, "%s", header);
7325 *first = 0;
7326 }
7327
7328 if (peer->hostname
7329 && bgp_flag_check(peer->bgp, BGP_FLAG_SHOW_HOSTNAME)) {
7330 if (peer->conf_if)
7331 vty_out(vty, " %s(%s)", peer->hostname,
7332 peer->conf_if);
7333 else
7334 vty_out(vty, " %s(%s)", peer->hostname,
7335 sockunion2str(&peer->su, buf1,
7336 SU_ADDRSTRLEN));
7337 } else {
7338 if (peer->conf_if)
7339 vty_out(vty, " %s", peer->conf_if);
7340 else
7341 vty_out(vty, " %s",
7342 sockunion2str(&peer->su, buf1,
7343 SU_ADDRSTRLEN));
7344 }
7345 }
7346 }
7347
7348 void route_vty_out_detail(struct vty *vty, struct bgp *bgp, struct prefix *p,
7349 struct bgp_path_info *path, afi_t afi, safi_t safi,
7350 json_object *json_paths)
7351 {
7352 char buf[INET6_ADDRSTRLEN];
7353 char buf1[BUFSIZ];
7354 char buf2[EVPN_ROUTE_STRLEN];
7355 struct attr *attr;
7356 int sockunion_vty_out(struct vty *, union sockunion *);
7357 time_t tbuf;
7358 json_object *json_bestpath = NULL;
7359 json_object *json_cluster_list = NULL;
7360 json_object *json_cluster_list_list = NULL;
7361 json_object *json_ext_community = NULL;
7362 json_object *json_last_update = NULL;
7363 json_object *json_pmsi = NULL;
7364 json_object *json_nexthop_global = NULL;
7365 json_object *json_nexthop_ll = NULL;
7366 json_object *json_nexthops = NULL;
7367 json_object *json_path = NULL;
7368 json_object *json_peer = NULL;
7369 json_object *json_string = NULL;
7370 json_object *json_adv_to = NULL;
7371 int first = 0;
7372 struct listnode *node, *nnode;
7373 struct peer *peer;
7374 int addpath_capable;
7375 int has_adj;
7376 unsigned int first_as;
7377 bool nexthop_self =
7378 CHECK_FLAG(path->flags, BGP_PATH_ANNC_NH_SELF) ? true : false;
7379
7380 if (json_paths) {
7381 json_path = json_object_new_object();
7382 json_peer = json_object_new_object();
7383 json_nexthop_global = json_object_new_object();
7384 }
7385
7386 if (!json_paths && safi == SAFI_EVPN) {
7387 char tag_buf[30];
7388
7389 bgp_evpn_route2str((struct prefix_evpn *)p, buf2, sizeof(buf2));
7390 vty_out(vty, " Route %s", buf2);
7391 tag_buf[0] = '\0';
7392 if (path->extra && path->extra->num_labels) {
7393 bgp_evpn_label2str(path->extra->label,
7394 path->extra->num_labels, tag_buf,
7395 sizeof(tag_buf));
7396 vty_out(vty, " VNI %s", tag_buf);
7397 }
7398 vty_out(vty, "\n");
7399 if (path->extra && path->extra->parent) {
7400 struct bgp_path_info *parent_ri;
7401 struct bgp_node *rn, *prn;
7402
7403 parent_ri = (struct bgp_path_info *)path->extra->parent;
7404 rn = parent_ri->net;
7405 if (rn && rn->prn) {
7406 prn = rn->prn;
7407 vty_out(vty, " Imported from %s:%s\n",
7408 prefix_rd2str(
7409 (struct prefix_rd *)&prn->p,
7410 buf1, sizeof(buf1)),
7411 buf2);
7412 }
7413 }
7414 }
7415
7416 attr = path->attr;
7417
7418 if (attr) {
7419 /* Line1 display AS-path, Aggregator */
7420 if (attr->aspath) {
7421 if (json_paths) {
7422 if (!attr->aspath->json)
7423 aspath_str_update(attr->aspath, true);
7424 json_object_lock(attr->aspath->json);
7425 json_object_object_add(json_path, "aspath",
7426 attr->aspath->json);
7427 } else {
7428 if (attr->aspath->segments)
7429 aspath_print_vty(vty, " %s",
7430 attr->aspath, "");
7431 else
7432 vty_out(vty, " Local");
7433 }
7434 }
7435
7436 if (CHECK_FLAG(path->flags, BGP_PATH_REMOVED)) {
7437 if (json_paths)
7438 json_object_boolean_true_add(json_path,
7439 "removed");
7440 else
7441 vty_out(vty, ", (removed)");
7442 }
7443
7444 if (CHECK_FLAG(path->flags, BGP_PATH_STALE)) {
7445 if (json_paths)
7446 json_object_boolean_true_add(json_path,
7447 "stale");
7448 else
7449 vty_out(vty, ", (stale)");
7450 }
7451
7452 if (CHECK_FLAG(attr->flag,
7453 ATTR_FLAG_BIT(BGP_ATTR_AGGREGATOR))) {
7454 if (json_paths) {
7455 json_object_int_add(json_path, "aggregatorAs",
7456 attr->aggregator_as);
7457 json_object_string_add(
7458 json_path, "aggregatorId",
7459 inet_ntoa(attr->aggregator_addr));
7460 } else {
7461 vty_out(vty, ", (aggregated by %u %s)",
7462 attr->aggregator_as,
7463 inet_ntoa(attr->aggregator_addr));
7464 }
7465 }
7466
7467 if (CHECK_FLAG(path->peer->af_flags[afi][safi],
7468 PEER_FLAG_REFLECTOR_CLIENT)) {
7469 if (json_paths)
7470 json_object_boolean_true_add(
7471 json_path, "rxedFromRrClient");
7472 else
7473 vty_out(vty, ", (Received from a RR-client)");
7474 }
7475
7476 if (CHECK_FLAG(path->peer->af_flags[afi][safi],
7477 PEER_FLAG_RSERVER_CLIENT)) {
7478 if (json_paths)
7479 json_object_boolean_true_add(
7480 json_path, "rxedFromRsClient");
7481 else
7482 vty_out(vty, ", (Received from a RS-client)");
7483 }
7484
7485 if (CHECK_FLAG(path->flags, BGP_PATH_HISTORY)) {
7486 if (json_paths)
7487 json_object_boolean_true_add(
7488 json_path, "dampeningHistoryEntry");
7489 else
7490 vty_out(vty, ", (history entry)");
7491 } else if (CHECK_FLAG(path->flags, BGP_PATH_DAMPED)) {
7492 if (json_paths)
7493 json_object_boolean_true_add(
7494 json_path, "dampeningSuppressed");
7495 else
7496 vty_out(vty, ", (suppressed due to dampening)");
7497 }
7498
7499 if (!json_paths)
7500 vty_out(vty, "\n");
7501
7502 /* Line2 display Next-hop, Neighbor, Router-id */
7503 /* Display the nexthop */
7504 if ((p->family == AF_INET || p->family == AF_ETHERNET
7505 || p->family == AF_EVPN)
7506 && (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
7507 || safi == SAFI_EVPN
7508 || !BGP_ATTR_NEXTHOP_AFI_IP6(attr))) {
7509 if (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
7510 || safi == SAFI_EVPN) {
7511 if (json_paths)
7512 json_object_string_add(
7513 json_nexthop_global, "ip",
7514 inet_ntoa(
7515 attr->mp_nexthop_global_in));
7516 else
7517 vty_out(vty, " %s",
7518 inet_ntoa(
7519 attr->mp_nexthop_global_in));
7520 } else {
7521 if (json_paths)
7522 json_object_string_add(
7523 json_nexthop_global, "ip",
7524 inet_ntoa(attr->nexthop));
7525 else
7526 vty_out(vty, " %s",
7527 inet_ntoa(attr->nexthop));
7528 }
7529
7530 if (json_paths)
7531 json_object_string_add(json_nexthop_global,
7532 "afi", "ipv4");
7533 } else {
7534 if (json_paths) {
7535 json_object_string_add(
7536 json_nexthop_global, "ip",
7537 inet_ntop(AF_INET6,
7538 &attr->mp_nexthop_global, buf,
7539 INET6_ADDRSTRLEN));
7540 json_object_string_add(json_nexthop_global,
7541 "afi", "ipv6");
7542 json_object_string_add(json_nexthop_global,
7543 "scope", "global");
7544 } else {
7545 vty_out(vty, " %s",
7546 inet_ntop(AF_INET6,
7547 &attr->mp_nexthop_global, buf,
7548 INET6_ADDRSTRLEN));
7549 }
7550 }
7551
7552 /* Display the IGP cost or 'inaccessible' */
7553 if (!CHECK_FLAG(path->flags, BGP_PATH_VALID)) {
7554 if (json_paths)
7555 json_object_boolean_false_add(
7556 json_nexthop_global, "accessible");
7557 else
7558 vty_out(vty, " (inaccessible)");
7559 } else {
7560 if (path->extra && path->extra->igpmetric) {
7561 if (json_paths)
7562 json_object_int_add(
7563 json_nexthop_global, "metric",
7564 path->extra->igpmetric);
7565 else
7566 vty_out(vty, " (metric %u)",
7567 path->extra->igpmetric);
7568 }
7569
7570 /* IGP cost is 0, display this only for json */
7571 else {
7572 if (json_paths)
7573 json_object_int_add(json_nexthop_global,
7574 "metric", 0);
7575 }
7576
7577 if (json_paths)
7578 json_object_boolean_true_add(
7579 json_nexthop_global, "accessible");
7580 }
7581
7582 /* Display peer "from" output */
7583 /* This path was originated locally */
7584 if (path->peer == bgp->peer_self) {
7585
7586 if (safi == SAFI_EVPN
7587 || (p->family == AF_INET
7588 && !BGP_ATTR_NEXTHOP_AFI_IP6(attr))) {
7589 if (json_paths)
7590 json_object_string_add(
7591 json_peer, "peerId", "0.0.0.0");
7592 else
7593 vty_out(vty, " from 0.0.0.0 ");
7594 } else {
7595 if (json_paths)
7596 json_object_string_add(json_peer,
7597 "peerId", "::");
7598 else
7599 vty_out(vty, " from :: ");
7600 }
7601
7602 if (json_paths)
7603 json_object_string_add(
7604 json_peer, "routerId",
7605 inet_ntoa(bgp->router_id));
7606 else
7607 vty_out(vty, "(%s)", inet_ntoa(bgp->router_id));
7608 }
7609
7610 /* We RXed this path from one of our peers */
7611 else {
7612
7613 if (json_paths) {
7614 json_object_string_add(
7615 json_peer, "peerId",
7616 sockunion2str(&path->peer->su, buf,
7617 SU_ADDRSTRLEN));
7618 json_object_string_add(
7619 json_peer, "routerId",
7620 inet_ntop(AF_INET,
7621 &path->peer->remote_id, buf1,
7622 sizeof(buf1)));
7623
7624 if (path->peer->hostname)
7625 json_object_string_add(
7626 json_peer, "hostname",
7627 path->peer->hostname);
7628
7629 if (path->peer->domainname)
7630 json_object_string_add(
7631 json_peer, "domainname",
7632 path->peer->domainname);
7633
7634 if (path->peer->conf_if)
7635 json_object_string_add(
7636 json_peer, "interface",
7637 path->peer->conf_if);
7638 } else {
7639 if (path->peer->conf_if) {
7640 if (path->peer->hostname
7641 && bgp_flag_check(
7642 path->peer->bgp,
7643 BGP_FLAG_SHOW_HOSTNAME))
7644 vty_out(vty, " from %s(%s)",
7645 path->peer->hostname,
7646 path->peer->conf_if);
7647 else
7648 vty_out(vty, " from %s",
7649 path->peer->conf_if);
7650 } else {
7651 if (path->peer->hostname
7652 && bgp_flag_check(
7653 path->peer->bgp,
7654 BGP_FLAG_SHOW_HOSTNAME))
7655 vty_out(vty, " from %s(%s)",
7656 path->peer->hostname,
7657 path->peer->host);
7658 else
7659 vty_out(vty, " from %s",
7660 sockunion2str(
7661 &path->peer->su,
7662 buf,
7663 SU_ADDRSTRLEN));
7664 }
7665
7666 if (attr->flag
7667 & ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID))
7668 vty_out(vty, " (%s)",
7669 inet_ntoa(attr->originator_id));
7670 else
7671 vty_out(vty, " (%s)",
7672 inet_ntop(
7673 AF_INET,
7674 &path->peer->remote_id,
7675 buf1, sizeof(buf1)));
7676 }
7677 }
7678
7679 /*
7680 * Note when vrfid of nexthop is different from that of prefix
7681 */
7682 if (path->extra && path->extra->bgp_orig) {
7683 vrf_id_t nexthop_vrfid = path->extra->bgp_orig->vrf_id;
7684
7685 if (json_paths) {
7686 const char *vn;
7687
7688 if (path->extra->bgp_orig->inst_type
7689 == BGP_INSTANCE_TYPE_DEFAULT)
7690
7691 vn = "Default";
7692 else
7693 vn = path->extra->bgp_orig->name;
7694
7695 json_object_string_add(json_path, "nhVrfName",
7696 vn);
7697
7698 if (nexthop_vrfid == VRF_UNKNOWN) {
7699 json_object_int_add(json_path,
7700 "nhVrfId", -1);
7701 } else {
7702 json_object_int_add(json_path,
7703 "nhVrfId", (int)nexthop_vrfid);
7704 }
7705 } else {
7706 if (nexthop_vrfid == VRF_UNKNOWN)
7707 vty_out(vty, " vrf ?");
7708 else
7709 vty_out(vty, " vrf %u", nexthop_vrfid);
7710 }
7711 }
7712
7713 if (nexthop_self) {
7714 if (json_paths) {
7715 json_object_boolean_true_add(json_path,
7716 "announceNexthopSelf");
7717 } else {
7718 vty_out(vty, " announce-nh-self");
7719 }
7720 }
7721
7722 if (!json_paths)
7723 vty_out(vty, "\n");
7724
7725 /* display the link-local nexthop */
7726 if (attr->mp_nexthop_len == BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL) {
7727 if (json_paths) {
7728 json_nexthop_ll = json_object_new_object();
7729 json_object_string_add(
7730 json_nexthop_ll, "ip",
7731 inet_ntop(AF_INET6,
7732 &attr->mp_nexthop_local, buf,
7733 INET6_ADDRSTRLEN));
7734 json_object_string_add(json_nexthop_ll, "afi",
7735 "ipv6");
7736 json_object_string_add(json_nexthop_ll, "scope",
7737 "link-local");
7738
7739 json_object_boolean_true_add(json_nexthop_ll,
7740 "accessible");
7741
7742 if (!attr->mp_nexthop_prefer_global)
7743 json_object_boolean_true_add(
7744 json_nexthop_ll, "used");
7745 else
7746 json_object_boolean_true_add(
7747 json_nexthop_global, "used");
7748 } else {
7749 vty_out(vty, " (%s) %s\n",
7750 inet_ntop(AF_INET6,
7751 &attr->mp_nexthop_local, buf,
7752 INET6_ADDRSTRLEN),
7753 attr->mp_nexthop_prefer_global
7754 ? "(prefer-global)"
7755 : "(used)");
7756 }
7757 }
7758 /* If we do not have a link-local nexthop then we must flag the
7759 global as "used" */
7760 else {
7761 if (json_paths)
7762 json_object_boolean_true_add(
7763 json_nexthop_global, "used");
7764 }
7765
7766 /* Line 3 display Origin, Med, Locpref, Weight, Tag, valid,
7767 * Int/Ext/Local, Atomic, best */
7768 if (json_paths)
7769 json_object_string_add(
7770 json_path, "origin",
7771 bgp_origin_long_str[attr->origin]);
7772 else
7773 vty_out(vty, " Origin %s",
7774 bgp_origin_long_str[attr->origin]);
7775
7776 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC)) {
7777 if (json_paths)
7778 json_object_int_add(json_path, "med",
7779 attr->med);
7780 else
7781 vty_out(vty, ", metric %u", attr->med);
7782 }
7783
7784 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF)) {
7785 if (json_paths)
7786 json_object_int_add(json_path, "localpref",
7787 attr->local_pref);
7788 else
7789 vty_out(vty, ", localpref %u",
7790 attr->local_pref);
7791 }
7792
7793 if (attr->weight != 0) {
7794 if (json_paths)
7795 json_object_int_add(json_path, "weight",
7796 attr->weight);
7797 else
7798 vty_out(vty, ", weight %u", attr->weight);
7799 }
7800
7801 if (attr->tag != 0) {
7802 if (json_paths)
7803 json_object_int_add(json_path, "tag",
7804 attr->tag);
7805 else
7806 vty_out(vty, ", tag %" ROUTE_TAG_PRI,
7807 attr->tag);
7808 }
7809
7810 if (!CHECK_FLAG(path->flags, BGP_PATH_VALID)) {
7811 if (json_paths)
7812 json_object_boolean_false_add(json_path,
7813 "valid");
7814 else
7815 vty_out(vty, ", invalid");
7816 } else if (!CHECK_FLAG(path->flags, BGP_PATH_HISTORY)) {
7817 if (json_paths)
7818 json_object_boolean_true_add(json_path,
7819 "valid");
7820 else
7821 vty_out(vty, ", valid");
7822 }
7823
7824 if (path->peer != bgp->peer_self) {
7825 if (path->peer->as == path->peer->local_as) {
7826 if (CHECK_FLAG(bgp->config,
7827 BGP_CONFIG_CONFEDERATION)) {
7828 if (json_paths)
7829 json_object_string_add(
7830 json_peer, "type",
7831 "confed-internal");
7832 else
7833 vty_out(vty,
7834 ", confed-internal");
7835 } else {
7836 if (json_paths)
7837 json_object_string_add(
7838 json_peer, "type",
7839 "internal");
7840 else
7841 vty_out(vty, ", internal");
7842 }
7843 } else {
7844 if (bgp_confederation_peers_check(
7845 bgp, path->peer->as)) {
7846 if (json_paths)
7847 json_object_string_add(
7848 json_peer, "type",
7849 "confed-external");
7850 else
7851 vty_out(vty,
7852 ", confed-external");
7853 } else {
7854 if (json_paths)
7855 json_object_string_add(
7856 json_peer, "type",
7857 "external");
7858 else
7859 vty_out(vty, ", external");
7860 }
7861 }
7862 } else if (path->sub_type == BGP_ROUTE_AGGREGATE) {
7863 if (json_paths) {
7864 json_object_boolean_true_add(json_path,
7865 "aggregated");
7866 json_object_boolean_true_add(json_path,
7867 "local");
7868 } else {
7869 vty_out(vty, ", aggregated, local");
7870 }
7871 } else if (path->type != ZEBRA_ROUTE_BGP) {
7872 if (json_paths)
7873 json_object_boolean_true_add(json_path,
7874 "sourced");
7875 else
7876 vty_out(vty, ", sourced");
7877 } else {
7878 if (json_paths) {
7879 json_object_boolean_true_add(json_path,
7880 "sourced");
7881 json_object_boolean_true_add(json_path,
7882 "local");
7883 } else {
7884 vty_out(vty, ", sourced, local");
7885 }
7886 }
7887
7888 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_ATOMIC_AGGREGATE)) {
7889 if (json_paths)
7890 json_object_boolean_true_add(json_path,
7891 "atomicAggregate");
7892 else
7893 vty_out(vty, ", atomic-aggregate");
7894 }
7895
7896 if (CHECK_FLAG(path->flags, BGP_PATH_MULTIPATH)
7897 || (CHECK_FLAG(path->flags, BGP_PATH_SELECTED)
7898 && bgp_path_info_mpath_count(path))) {
7899 if (json_paths)
7900 json_object_boolean_true_add(json_path,
7901 "multipath");
7902 else
7903 vty_out(vty, ", multipath");
7904 }
7905
7906 // Mark the bestpath(s)
7907 if (CHECK_FLAG(path->flags, BGP_PATH_DMED_SELECTED)) {
7908 first_as = aspath_get_first_as(attr->aspath);
7909
7910 if (json_paths) {
7911 if (!json_bestpath)
7912 json_bestpath =
7913 json_object_new_object();
7914 json_object_int_add(json_bestpath,
7915 "bestpathFromAs", first_as);
7916 } else {
7917 if (first_as)
7918 vty_out(vty, ", bestpath-from-AS %u",
7919 first_as);
7920 else
7921 vty_out(vty,
7922 ", bestpath-from-AS Local");
7923 }
7924 }
7925
7926 if (CHECK_FLAG(path->flags, BGP_PATH_SELECTED)) {
7927 if (json_paths) {
7928 if (!json_bestpath)
7929 json_bestpath =
7930 json_object_new_object();
7931 json_object_boolean_true_add(json_bestpath,
7932 "overall");
7933 } else
7934 vty_out(vty, ", best");
7935 }
7936
7937 if (json_bestpath)
7938 json_object_object_add(json_path, "bestpath",
7939 json_bestpath);
7940
7941 if (!json_paths)
7942 vty_out(vty, "\n");
7943
7944 /* Line 4 display Community */
7945 if (attr->community) {
7946 if (json_paths) {
7947 if (!attr->community->json)
7948 community_str(attr->community, true);
7949 json_object_lock(attr->community->json);
7950 json_object_object_add(json_path, "community",
7951 attr->community->json);
7952 } else {
7953 vty_out(vty, " Community: %s\n",
7954 attr->community->str);
7955 }
7956 }
7957
7958 /* Line 5 display Extended-community */
7959 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_EXT_COMMUNITIES)) {
7960 if (json_paths) {
7961 json_ext_community = json_object_new_object();
7962 json_object_string_add(json_ext_community,
7963 "string",
7964 attr->ecommunity->str);
7965 json_object_object_add(json_path,
7966 "extendedCommunity",
7967 json_ext_community);
7968 } else {
7969 vty_out(vty, " Extended Community: %s\n",
7970 attr->ecommunity->str);
7971 }
7972 }
7973
7974 /* Line 6 display Large community */
7975 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_LARGE_COMMUNITIES)) {
7976 if (json_paths) {
7977 if (!attr->lcommunity->json)
7978 lcommunity_str(attr->lcommunity, true);
7979 json_object_lock(attr->lcommunity->json);
7980 json_object_object_add(json_path,
7981 "largeCommunity",
7982 attr->lcommunity->json);
7983 } else {
7984 vty_out(vty, " Large Community: %s\n",
7985 attr->lcommunity->str);
7986 }
7987 }
7988
7989 /* Line 7 display Originator, Cluster-id */
7990 if ((attr->flag & ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID))
7991 || (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_CLUSTER_LIST))) {
7992 if (attr->flag
7993 & ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID)) {
7994 if (json_paths)
7995 json_object_string_add(
7996 json_path, "originatorId",
7997 inet_ntoa(attr->originator_id));
7998 else
7999 vty_out(vty, " Originator: %s",
8000 inet_ntoa(attr->originator_id));
8001 }
8002
8003 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_CLUSTER_LIST)) {
8004 int i;
8005
8006 if (json_paths) {
8007 json_cluster_list =
8008 json_object_new_object();
8009 json_cluster_list_list =
8010 json_object_new_array();
8011
8012 for (i = 0;
8013 i < attr->cluster->length / 4;
8014 i++) {
8015 json_string = json_object_new_string(
8016 inet_ntoa(
8017 attr->cluster->list
8018 [i]));
8019 json_object_array_add(
8020 json_cluster_list_list,
8021 json_string);
8022 }
8023
8024 /* struct cluster_list does not have
8025 "str" variable like
8026 * aspath and community do. Add this
8027 someday if someone
8028 * asks for it.
8029 json_object_string_add(json_cluster_list,
8030 "string", attr->cluster->str);
8031 */
8032 json_object_object_add(
8033 json_cluster_list, "list",
8034 json_cluster_list_list);
8035 json_object_object_add(
8036 json_path, "clusterList",
8037 json_cluster_list);
8038 } else {
8039 vty_out(vty, ", Cluster list: ");
8040
8041 for (i = 0;
8042 i < attr->cluster->length / 4;
8043 i++) {
8044 vty_out(vty, "%s ",
8045 inet_ntoa(
8046 attr->cluster->list
8047 [i]));
8048 }
8049 }
8050 }
8051
8052 if (!json_paths)
8053 vty_out(vty, "\n");
8054 }
8055
8056 if (path->extra && path->extra->damp_info)
8057 bgp_damp_info_vty(vty, path, json_path);
8058
8059 /* Remote Label */
8060 if (path->extra && bgp_is_valid_label(&path->extra->label[0])
8061 && safi != SAFI_EVPN) {
8062 mpls_label_t label = label_pton(&path->extra->label[0]);
8063
8064 if (json_paths)
8065 json_object_int_add(json_path, "remoteLabel",
8066 label);
8067 else
8068 vty_out(vty, " Remote label: %d\n", label);
8069 }
8070
8071 /* Label Index */
8072 if (attr->label_index != BGP_INVALID_LABEL_INDEX) {
8073 if (json_paths)
8074 json_object_int_add(json_path, "labelIndex",
8075 attr->label_index);
8076 else
8077 vty_out(vty, " Label Index: %d\n",
8078 attr->label_index);
8079 }
8080
8081 /* Line 8 display Addpath IDs */
8082 if (path->addpath_rx_id || path->addpath_tx_id) {
8083 if (json_paths) {
8084 json_object_int_add(json_path, "addpathRxId",
8085 path->addpath_rx_id);
8086 json_object_int_add(json_path, "addpathTxId",
8087 path->addpath_tx_id);
8088 } else {
8089 vty_out(vty, " AddPath ID: RX %u, TX %u\n",
8090 path->addpath_rx_id,
8091 path->addpath_tx_id);
8092 }
8093 }
8094
8095 /* If we used addpath to TX a non-bestpath we need to display
8096 * "Advertised to" on a path-by-path basis */
8097 if (bgp->addpath_tx_used[afi][safi]) {
8098 first = 1;
8099
8100 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
8101 addpath_capable =
8102 bgp_addpath_encode_tx(peer, afi, safi);
8103 has_adj = bgp_adj_out_lookup(
8104 peer, path->net, path->addpath_tx_id);
8105
8106 if ((addpath_capable && has_adj)
8107 || (!addpath_capable && has_adj
8108 && CHECK_FLAG(path->flags,
8109 BGP_PATH_SELECTED))) {
8110 if (json_path && !json_adv_to)
8111 json_adv_to =
8112 json_object_new_object();
8113
8114 route_vty_out_advertised_to(
8115 vty, peer, &first,
8116 " Advertised to:",
8117 json_adv_to);
8118 }
8119 }
8120
8121 if (json_path) {
8122 if (json_adv_to) {
8123 json_object_object_add(json_path,
8124 "advertisedTo",
8125 json_adv_to);
8126 }
8127 } else {
8128 if (!first) {
8129 vty_out(vty, "\n");
8130 }
8131 }
8132 }
8133
8134 /* Line 9 display Uptime */
8135 tbuf = time(NULL) - (bgp_clock() - path->uptime);
8136 if (json_paths) {
8137 json_last_update = json_object_new_object();
8138 json_object_int_add(json_last_update, "epoch", tbuf);
8139 json_object_string_add(json_last_update, "string",
8140 ctime(&tbuf));
8141 json_object_object_add(json_path, "lastUpdate",
8142 json_last_update);
8143 } else
8144 vty_out(vty, " Last update: %s", ctime(&tbuf));
8145
8146 /* Line 10 display PMSI tunnel attribute, if present */
8147 if (attr->flag & ATTR_FLAG_BIT(BGP_ATTR_PMSI_TUNNEL)) {
8148 const char *str = lookup_msg(bgp_pmsi_tnltype_str,
8149 attr->pmsi_tnl_type,
8150 PMSI_TNLTYPE_STR_DEFAULT);
8151
8152 if (json_paths) {
8153 json_pmsi = json_object_new_object();
8154 json_object_string_add(json_pmsi,
8155 "tunnelType", str);
8156 json_object_object_add(json_path, "pmsi",
8157 json_pmsi);
8158 } else
8159 vty_out(vty, " PMSI Tunnel Type: %s\n",
8160 str);
8161 }
8162
8163 }
8164
8165 /* We've constructed the json object for this path, add it to the json
8166 * array of paths
8167 */
8168 if (json_paths) {
8169 if (json_nexthop_global || json_nexthop_ll) {
8170 json_nexthops = json_object_new_array();
8171
8172 if (json_nexthop_global)
8173 json_object_array_add(json_nexthops,
8174 json_nexthop_global);
8175
8176 if (json_nexthop_ll)
8177 json_object_array_add(json_nexthops,
8178 json_nexthop_ll);
8179
8180 json_object_object_add(json_path, "nexthops",
8181 json_nexthops);
8182 }
8183
8184 json_object_object_add(json_path, "peer", json_peer);
8185 json_object_array_add(json_paths, json_path);
8186 } else
8187 vty_out(vty, "\n");
8188 }
8189
8190 #define BGP_SHOW_HEADER_CSV "Flags, Network, Next Hop, Metric, LocPrf, Weight, Path"
8191 #define BGP_SHOW_DAMP_HEADER " Network From Reuse Path\n"
8192 #define BGP_SHOW_FLAP_HEADER " Network From Flaps Duration Reuse Path\n"
8193
8194 static int bgp_show_prefix_list(struct vty *vty, struct bgp *bgp,
8195 const char *prefix_list_str, afi_t afi,
8196 safi_t safi, enum bgp_show_type type);
8197 static int bgp_show_filter_list(struct vty *vty, struct bgp *bgp,
8198 const char *filter, afi_t afi, safi_t safi,
8199 enum bgp_show_type type);
8200 static int bgp_show_route_map(struct vty *vty, struct bgp *bgp,
8201 const char *rmap_str, afi_t afi, safi_t safi,
8202 enum bgp_show_type type);
8203 static int bgp_show_community_list(struct vty *vty, struct bgp *bgp,
8204 const char *com, int exact, afi_t afi,
8205 safi_t safi);
8206 static int bgp_show_prefix_longer(struct vty *vty, struct bgp *bgp,
8207 const char *prefix, afi_t afi, safi_t safi,
8208 enum bgp_show_type type);
8209 static int bgp_show_regexp(struct vty *vty, struct bgp *bgp, const char *regstr,
8210 afi_t afi, safi_t safi, enum bgp_show_type type);
8211 static int bgp_show_community(struct vty *vty, struct bgp *bgp,
8212 const char *comstr, int exact, afi_t afi,
8213 safi_t safi, bool use_json);
8214
8215
8216 static int bgp_show_table(struct vty *vty, struct bgp *bgp, safi_t safi,
8217 struct bgp_table *table, enum bgp_show_type type,
8218 void *output_arg, bool use_json, char *rd,
8219 int is_last, unsigned long *output_cum,
8220 unsigned long *total_cum,
8221 unsigned long *json_header_depth)
8222 {
8223 struct bgp_path_info *pi;
8224 struct bgp_node *rn;
8225 int header = 1;
8226 int display;
8227 unsigned long output_count = 0;
8228 unsigned long total_count = 0;
8229 struct prefix *p;
8230 char buf[BUFSIZ];
8231 char buf2[BUFSIZ];
8232 json_object *json_paths = NULL;
8233 int first = 1;
8234
8235 if (output_cum && *output_cum != 0)
8236 header = 0;
8237
8238 if (use_json && !*json_header_depth) {
8239 vty_out(vty,
8240 "{\n \"vrfId\": %d,\n \"vrfName\": \"%s\",\n \"tableVersion\": %" PRId64
8241 ",\n \"routerId\": \"%s\",\n \"routes\": { ",
8242 bgp->vrf_id == VRF_UNKNOWN ? -1 : (int)bgp->vrf_id,
8243 bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT ? "Default"
8244 : bgp->name,
8245 table->version, inet_ntoa(bgp->router_id));
8246 *json_header_depth = 2;
8247 if (rd) {
8248 vty_out(vty, " \"routeDistinguishers\" : {");
8249 ++*json_header_depth;
8250 }
8251 }
8252
8253 if (use_json && rd) {
8254 vty_out(vty, " \"%s\" : { ", rd);
8255 }
8256
8257 /* Start processing of routes. */
8258 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn)) {
8259 if (rn->info == NULL)
8260 continue;
8261
8262 display = 0;
8263 if (use_json)
8264 json_paths = json_object_new_array();
8265 else
8266 json_paths = NULL;
8267
8268 for (pi = rn->info; pi; pi = pi->next) {
8269 total_count++;
8270 if (type == bgp_show_type_flap_statistics
8271 || type == bgp_show_type_flap_neighbor
8272 || type == bgp_show_type_dampend_paths
8273 || type == bgp_show_type_damp_neighbor) {
8274 if (!(pi->extra && pi->extra->damp_info))
8275 continue;
8276 }
8277 if (type == bgp_show_type_regexp) {
8278 regex_t *regex = output_arg;
8279
8280 if (bgp_regexec(regex, pi->attr->aspath)
8281 == REG_NOMATCH)
8282 continue;
8283 }
8284 if (type == bgp_show_type_prefix_list) {
8285 struct prefix_list *plist = output_arg;
8286
8287 if (prefix_list_apply(plist, &rn->p)
8288 != PREFIX_PERMIT)
8289 continue;
8290 }
8291 if (type == bgp_show_type_filter_list) {
8292 struct as_list *as_list = output_arg;
8293
8294 if (as_list_apply(as_list, pi->attr->aspath)
8295 != AS_FILTER_PERMIT)
8296 continue;
8297 }
8298 if (type == bgp_show_type_route_map) {
8299 struct route_map *rmap = output_arg;
8300 struct bgp_path_info path;
8301 struct attr dummy_attr;
8302 int ret;
8303
8304 bgp_attr_dup(&dummy_attr, pi->attr);
8305
8306 path.peer = pi->peer;
8307 path.attr = &dummy_attr;
8308
8309 ret = route_map_apply(rmap, &rn->p, RMAP_BGP,
8310 &path);
8311 if (ret == RMAP_DENYMATCH)
8312 continue;
8313 }
8314 if (type == bgp_show_type_neighbor
8315 || type == bgp_show_type_flap_neighbor
8316 || type == bgp_show_type_damp_neighbor) {
8317 union sockunion *su = output_arg;
8318
8319 if (pi->peer == NULL
8320 || pi->peer->su_remote == NULL
8321 || !sockunion_same(pi->peer->su_remote, su))
8322 continue;
8323 }
8324 if (type == bgp_show_type_cidr_only) {
8325 uint32_t destination;
8326
8327 destination = ntohl(rn->p.u.prefix4.s_addr);
8328 if (IN_CLASSC(destination)
8329 && rn->p.prefixlen == 24)
8330 continue;
8331 if (IN_CLASSB(destination)
8332 && rn->p.prefixlen == 16)
8333 continue;
8334 if (IN_CLASSA(destination)
8335 && rn->p.prefixlen == 8)
8336 continue;
8337 }
8338 if (type == bgp_show_type_prefix_longer) {
8339 p = output_arg;
8340 if (!prefix_match(p, &rn->p))
8341 continue;
8342 }
8343 if (type == bgp_show_type_community_all) {
8344 if (!pi->attr->community)
8345 continue;
8346 }
8347 if (type == bgp_show_type_community) {
8348 struct community *com = output_arg;
8349
8350 if (!pi->attr->community
8351 || !community_match(pi->attr->community,
8352 com))
8353 continue;
8354 }
8355 if (type == bgp_show_type_community_exact) {
8356 struct community *com = output_arg;
8357
8358 if (!pi->attr->community
8359 || !community_cmp(pi->attr->community, com))
8360 continue;
8361 }
8362 if (type == bgp_show_type_community_list) {
8363 struct community_list *list = output_arg;
8364
8365 if (!community_list_match(pi->attr->community,
8366 list))
8367 continue;
8368 }
8369 if (type == bgp_show_type_community_list_exact) {
8370 struct community_list *list = output_arg;
8371
8372 if (!community_list_exact_match(
8373 pi->attr->community, list))
8374 continue;
8375 }
8376 if (type == bgp_show_type_lcommunity) {
8377 struct lcommunity *lcom = output_arg;
8378
8379 if (!pi->attr->lcommunity
8380 || !lcommunity_match(pi->attr->lcommunity,
8381 lcom))
8382 continue;
8383 }
8384 if (type == bgp_show_type_lcommunity_list) {
8385 struct community_list *list = output_arg;
8386
8387 if (!lcommunity_list_match(pi->attr->lcommunity,
8388 list))
8389 continue;
8390 }
8391 if (type == bgp_show_type_lcommunity_all) {
8392 if (!pi->attr->lcommunity)
8393 continue;
8394 }
8395 if (type == bgp_show_type_dampend_paths
8396 || type == bgp_show_type_damp_neighbor) {
8397 if (!CHECK_FLAG(pi->flags, BGP_PATH_DAMPED)
8398 || CHECK_FLAG(pi->flags, BGP_PATH_HISTORY))
8399 continue;
8400 }
8401
8402 if (!use_json && header) {
8403 vty_out(vty, "BGP table version is %" PRIu64
8404 ", local router ID is %s, vrf id ",
8405 table->version,
8406 inet_ntoa(bgp->router_id));
8407 if (bgp->vrf_id == VRF_UNKNOWN)
8408 vty_out(vty, "%s", VRFID_NONE_STR);
8409 else
8410 vty_out(vty, "%u", bgp->vrf_id);
8411 vty_out(vty, "\n");
8412 vty_out(vty, BGP_SHOW_SCODE_HEADER);
8413 vty_out(vty, BGP_SHOW_NCODE_HEADER);
8414 vty_out(vty, BGP_SHOW_OCODE_HEADER);
8415 if (type == bgp_show_type_dampend_paths
8416 || type == bgp_show_type_damp_neighbor)
8417 vty_out(vty, BGP_SHOW_DAMP_HEADER);
8418 else if (type == bgp_show_type_flap_statistics
8419 || type == bgp_show_type_flap_neighbor)
8420 vty_out(vty, BGP_SHOW_FLAP_HEADER);
8421 else
8422 vty_out(vty, BGP_SHOW_HEADER);
8423 header = 0;
8424 }
8425 if (rd != NULL && !display && !output_count) {
8426 if (!use_json)
8427 vty_out(vty,
8428 "Route Distinguisher: %s\n",
8429 rd);
8430 }
8431 if (type == bgp_show_type_dampend_paths
8432 || type == bgp_show_type_damp_neighbor)
8433 damp_route_vty_out(vty, &rn->p, pi, display,
8434 safi, use_json, json_paths);
8435 else if (type == bgp_show_type_flap_statistics
8436 || type == bgp_show_type_flap_neighbor)
8437 flap_route_vty_out(vty, &rn->p, pi, display,
8438 safi, use_json, json_paths);
8439 else
8440 route_vty_out(vty, &rn->p, pi, display, safi,
8441 json_paths);
8442 display++;
8443 }
8444
8445 if (display) {
8446 output_count++;
8447 if (!use_json)
8448 continue;
8449
8450 p = &rn->p;
8451 sprintf(buf2, "%s/%d",
8452 inet_ntop(p->family, &p->u.prefix, buf, BUFSIZ),
8453 p->prefixlen);
8454 if (first)
8455 vty_out(vty, "\"%s\": ", buf2);
8456 else
8457 vty_out(vty, ",\"%s\": ", buf2);
8458
8459 vty_out(vty, "%s",
8460 json_object_to_json_string(json_paths));
8461 json_object_free(json_paths);
8462 json_paths = NULL;
8463 first = 0;
8464 }
8465 }
8466
8467 if (output_cum) {
8468 output_count += *output_cum;
8469 *output_cum = output_count;
8470 }
8471 if (total_cum) {
8472 total_count += *total_cum;
8473 *total_cum = total_count;
8474 }
8475 if (use_json) {
8476 if (rd) {
8477 vty_out(vty, " }%s ", (is_last ? "" : ","));
8478 }
8479 if (is_last) {
8480 unsigned long i;
8481 for (i = 0; i < *json_header_depth; ++i)
8482 vty_out(vty, " } ");
8483 }
8484 } else {
8485 if (is_last) {
8486 /* No route is displayed */
8487 if (output_count == 0) {
8488 if (type == bgp_show_type_normal)
8489 vty_out(vty,
8490 "No BGP prefixes displayed, %ld exist\n",
8491 total_count);
8492 } else
8493 vty_out(vty,
8494 "\nDisplayed %ld routes and %ld total paths\n",
8495 output_count, total_count);
8496 }
8497 }
8498
8499 return CMD_SUCCESS;
8500 }
8501
8502 int bgp_show_table_rd(struct vty *vty, struct bgp *bgp, safi_t safi,
8503 struct bgp_table *table, struct prefix_rd *prd_match,
8504 enum bgp_show_type type, void *output_arg, bool use_json)
8505 {
8506 struct bgp_node *rn, *next;
8507 unsigned long output_cum = 0;
8508 unsigned long total_cum = 0;
8509 unsigned long json_header_depth = 0;
8510 bool show_msg;
8511
8512 show_msg = (!use_json && type == bgp_show_type_normal);
8513
8514 for (rn = bgp_table_top(table); rn; rn = next) {
8515 next = bgp_route_next(rn);
8516 if (prd_match && memcmp(rn->p.u.val, prd_match->val, 8) != 0)
8517 continue;
8518 if (rn->info != NULL) {
8519 struct prefix_rd prd;
8520 char rd[RD_ADDRSTRLEN];
8521
8522 memcpy(&prd, &(rn->p), sizeof(struct prefix_rd));
8523 prefix_rd2str(&prd, rd, sizeof(rd));
8524 bgp_show_table(vty, bgp, safi, rn->info, type,
8525 output_arg, use_json, rd, next == NULL,
8526 &output_cum, &total_cum,
8527 &json_header_depth);
8528 if (next == NULL)
8529 show_msg = false;
8530 }
8531 }
8532 if (show_msg) {
8533 if (output_cum == 0)
8534 vty_out(vty, "No BGP prefixes displayed, %ld exist\n",
8535 total_cum);
8536 else
8537 vty_out(vty,
8538 "\nDisplayed %ld routes and %ld total paths\n",
8539 output_cum, total_cum);
8540 }
8541 return CMD_SUCCESS;
8542 }
8543 static int bgp_show(struct vty *vty, struct bgp *bgp, afi_t afi, safi_t safi,
8544 enum bgp_show_type type, void *output_arg, bool use_json)
8545 {
8546 struct bgp_table *table;
8547 unsigned long json_header_depth = 0;
8548
8549 if (bgp == NULL) {
8550 bgp = bgp_get_default();
8551 }
8552
8553 if (bgp == NULL) {
8554 if (!use_json)
8555 vty_out(vty, "No BGP process is configured\n");
8556 else
8557 vty_out(vty, "{}\n");
8558 return CMD_WARNING;
8559 }
8560
8561 table = bgp->rib[afi][safi];
8562 /* use MPLS and ENCAP specific shows until they are merged */
8563 if (safi == SAFI_MPLS_VPN) {
8564 return bgp_show_table_rd(vty, bgp, safi, table, NULL, type,
8565 output_arg, use_json);
8566 }
8567
8568 if (safi == SAFI_FLOWSPEC && type == bgp_show_type_detail) {
8569 return bgp_show_table_flowspec(vty, bgp, afi, table, type,
8570 output_arg, use_json,
8571 1, NULL, NULL);
8572 }
8573 /* labeled-unicast routes live in the unicast table */
8574 else if (safi == SAFI_LABELED_UNICAST)
8575 safi = SAFI_UNICAST;
8576
8577 return bgp_show_table(vty, bgp, safi, table, type, output_arg, use_json,
8578 NULL, 1, NULL, NULL, &json_header_depth);
8579 }
8580
8581 static void bgp_show_all_instances_routes_vty(struct vty *vty, afi_t afi,
8582 safi_t safi, bool use_json)
8583 {
8584 struct listnode *node, *nnode;
8585 struct bgp *bgp;
8586 int is_first = 1;
8587 bool route_output = false;
8588
8589 if (use_json)
8590 vty_out(vty, "{\n");
8591
8592 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp)) {
8593 route_output = true;
8594 if (use_json) {
8595 if (!is_first)
8596 vty_out(vty, ",\n");
8597 else
8598 is_first = 0;
8599
8600 vty_out(vty, "\"%s\":",
8601 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
8602 ? "Default"
8603 : bgp->name);
8604 } else {
8605 vty_out(vty, "\nInstance %s:\n",
8606 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
8607 ? "Default"
8608 : bgp->name);
8609 }
8610 bgp_show(vty, bgp, afi, safi, bgp_show_type_normal, NULL,
8611 use_json);
8612 }
8613
8614 if (use_json)
8615 vty_out(vty, "}\n");
8616 else if (!route_output)
8617 vty_out(vty, "%% BGP instance not found\n");
8618 }
8619
8620 /* Header of detailed BGP route information */
8621 void route_vty_out_detail_header(struct vty *vty, struct bgp *bgp,
8622 struct bgp_node *rn, struct prefix_rd *prd,
8623 afi_t afi, safi_t safi, json_object *json)
8624 {
8625 struct bgp_path_info *pi;
8626 struct prefix *p;
8627 struct peer *peer;
8628 struct listnode *node, *nnode;
8629 char buf1[RD_ADDRSTRLEN];
8630 char buf2[INET6_ADDRSTRLEN];
8631 char buf3[EVPN_ROUTE_STRLEN];
8632 char prefix_str[BUFSIZ];
8633 int count = 0;
8634 int best = 0;
8635 int suppress = 0;
8636 int accept_own = 0;
8637 int route_filter_translated_v4 = 0;
8638 int route_filter_v4 = 0;
8639 int route_filter_translated_v6 = 0;
8640 int route_filter_v6 = 0;
8641 int llgr_stale = 0;
8642 int no_llgr = 0;
8643 int accept_own_nexthop = 0;
8644 int blackhole = 0;
8645 int no_export = 0;
8646 int no_advertise = 0;
8647 int local_as = 0;
8648 int no_peer = 0;
8649 int first = 1;
8650 int has_valid_label = 0;
8651 mpls_label_t label = 0;
8652 json_object *json_adv_to = NULL;
8653
8654 p = &rn->p;
8655 has_valid_label = bgp_is_valid_label(&rn->local_label);
8656
8657 if (has_valid_label)
8658 label = label_pton(&rn->local_label);
8659
8660 if (json) {
8661 if (has_valid_label)
8662 json_object_int_add(json, "localLabel", label);
8663
8664 json_object_string_add(
8665 json, "prefix",
8666 prefix2str(p, prefix_str, sizeof(prefix_str)));
8667 } else {
8668 if (safi == SAFI_EVPN)
8669 vty_out(vty, "BGP routing table entry for %s%s%s\n",
8670 prd ? prefix_rd2str(prd, buf1, sizeof(buf1))
8671 : "",
8672 prd ? ":" : "",
8673 bgp_evpn_route2str((struct prefix_evpn *)p,
8674 buf3, sizeof(buf3)));
8675 else
8676 vty_out(vty, "BGP routing table entry for %s%s%s/%d\n",
8677 ((safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP)
8678 ? prefix_rd2str(prd, buf1,
8679 sizeof(buf1))
8680 : ""),
8681 safi == SAFI_MPLS_VPN ? ":" : "",
8682 inet_ntop(p->family, &p->u.prefix, buf2,
8683 INET6_ADDRSTRLEN),
8684 p->prefixlen);
8685
8686 if (has_valid_label)
8687 vty_out(vty, "Local label: %d\n", label);
8688 if (bgp_labeled_safi(safi) && safi != SAFI_EVPN)
8689 vty_out(vty, "not allocated\n");
8690 }
8691
8692 for (pi = rn->info; pi; pi = pi->next) {
8693 count++;
8694 if (CHECK_FLAG(pi->flags, BGP_PATH_SELECTED)) {
8695 best = count;
8696 if (pi->extra && pi->extra->suppress)
8697 suppress = 1;
8698
8699 if (pi->attr->community == NULL)
8700 continue;
8701
8702 no_advertise += community_include(
8703 pi->attr->community, COMMUNITY_NO_ADVERTISE);
8704 no_export += community_include(pi->attr->community,
8705 COMMUNITY_NO_EXPORT);
8706 local_as += community_include(pi->attr->community,
8707 COMMUNITY_LOCAL_AS);
8708 accept_own += community_include(pi->attr->community,
8709 COMMUNITY_ACCEPT_OWN);
8710 route_filter_translated_v4 += community_include(
8711 pi->attr->community,
8712 COMMUNITY_ROUTE_FILTER_TRANSLATED_v4);
8713 route_filter_translated_v6 += community_include(
8714 pi->attr->community,
8715 COMMUNITY_ROUTE_FILTER_TRANSLATED_v6);
8716 route_filter_v4 += community_include(
8717 pi->attr->community, COMMUNITY_ROUTE_FILTER_v4);
8718 route_filter_v6 += community_include(
8719 pi->attr->community, COMMUNITY_ROUTE_FILTER_v6);
8720 llgr_stale += community_include(pi->attr->community,
8721 COMMUNITY_LLGR_STALE);
8722 no_llgr += community_include(pi->attr->community,
8723 COMMUNITY_NO_LLGR);
8724 accept_own_nexthop +=
8725 community_include(pi->attr->community,
8726 COMMUNITY_ACCEPT_OWN_NEXTHOP);
8727 blackhole += community_include(pi->attr->community,
8728 COMMUNITY_BLACKHOLE);
8729 no_peer += community_include(pi->attr->community,
8730 COMMUNITY_NO_PEER);
8731 }
8732 }
8733
8734 if (!json) {
8735 vty_out(vty, "Paths: (%d available", count);
8736 if (best) {
8737 vty_out(vty, ", best #%d", best);
8738 if (safi == SAFI_UNICAST)
8739 vty_out(vty, ", table %s",
8740 (bgp->inst_type
8741 == BGP_INSTANCE_TYPE_DEFAULT)
8742 ? "Default-IP-Routing-Table"
8743 : bgp->name);
8744 } else
8745 vty_out(vty, ", no best path");
8746
8747 if (accept_own)
8748 vty_out(vty,
8749 ", accept own local route exported and imported in different VRF");
8750 else if (route_filter_translated_v4)
8751 vty_out(vty,
8752 ", mark translated RTs for VPNv4 route filtering");
8753 else if (route_filter_v4)
8754 vty_out(vty,
8755 ", attach RT as-is for VPNv4 route filtering");
8756 else if (route_filter_translated_v6)
8757 vty_out(vty,
8758 ", mark translated RTs for VPNv6 route filtering");
8759 else if (route_filter_v6)
8760 vty_out(vty,
8761 ", attach RT as-is for VPNv6 route filtering");
8762 else if (llgr_stale)
8763 vty_out(vty,
8764 ", mark routes to be retained for a longer time. Requeres support for Long-lived BGP Graceful Restart");
8765 else if (no_llgr)
8766 vty_out(vty,
8767 ", mark routes to not be treated according to Long-lived BGP Graceful Restart operations");
8768 else if (accept_own_nexthop)
8769 vty_out(vty,
8770 ", accept local nexthop");
8771 else if (blackhole)
8772 vty_out(vty, ", inform peer to blackhole prefix");
8773 else if (no_export)
8774 vty_out(vty, ", not advertised to EBGP peer");
8775 else if (no_advertise)
8776 vty_out(vty, ", not advertised to any peer");
8777 else if (local_as)
8778 vty_out(vty, ", not advertised outside local AS");
8779 else if (no_peer)
8780 vty_out(vty,
8781 ", inform EBGP peer not to advertise to their EBGP peers");
8782
8783 if (suppress)
8784 vty_out(vty,
8785 ", Advertisements suppressed by an aggregate.");
8786 vty_out(vty, ")\n");
8787 }
8788
8789 /* If we are not using addpath then we can display Advertised to and
8790 * that will
8791 * show what peers we advertised the bestpath to. If we are using
8792 * addpath
8793 * though then we must display Advertised to on a path-by-path basis. */
8794 if (!bgp->addpath_tx_used[afi][safi]) {
8795 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
8796 if (bgp_adj_out_lookup(peer, rn, 0)) {
8797 if (json && !json_adv_to)
8798 json_adv_to = json_object_new_object();
8799
8800 route_vty_out_advertised_to(
8801 vty, peer, &first,
8802 " Advertised to non peer-group peers:\n ",
8803 json_adv_to);
8804 }
8805 }
8806
8807 if (json) {
8808 if (json_adv_to) {
8809 json_object_object_add(json, "advertisedTo",
8810 json_adv_to);
8811 }
8812 } else {
8813 if (first)
8814 vty_out(vty, " Not advertised to any peer");
8815 vty_out(vty, "\n");
8816 }
8817 }
8818 }
8819
8820 /* Display specified route of BGP table. */
8821 static int bgp_show_route_in_table(struct vty *vty, struct bgp *bgp,
8822 struct bgp_table *rib, const char *ip_str,
8823 afi_t afi, safi_t safi,
8824 struct prefix_rd *prd, int prefix_check,
8825 enum bgp_path_type pathtype, bool use_json)
8826 {
8827 int ret;
8828 int header;
8829 int display = 0;
8830 struct prefix match;
8831 struct bgp_node *rn;
8832 struct bgp_node *rm;
8833 struct bgp_path_info *pi;
8834 struct bgp_table *table;
8835 json_object *json = NULL;
8836 json_object *json_paths = NULL;
8837
8838 /* Check IP address argument. */
8839 ret = str2prefix(ip_str, &match);
8840 if (!ret) {
8841 vty_out(vty, "address is malformed\n");
8842 return CMD_WARNING;
8843 }
8844
8845 match.family = afi2family(afi);
8846
8847 if (use_json) {
8848 json = json_object_new_object();
8849 json_paths = json_object_new_array();
8850 }
8851
8852 if (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP || safi == SAFI_EVPN) {
8853 for (rn = bgp_table_top(rib); rn; rn = bgp_route_next(rn)) {
8854 if (prd && memcmp(rn->p.u.val, prd->val, 8) != 0)
8855 continue;
8856
8857 if ((table = rn->info) == NULL)
8858 continue;
8859
8860 header = 1;
8861
8862 if ((rm = bgp_node_match(table, &match)) == NULL)
8863 continue;
8864
8865 if (prefix_check
8866 && rm->p.prefixlen != match.prefixlen) {
8867 bgp_unlock_node(rm);
8868 continue;
8869 }
8870
8871 for (pi = rm->info; pi; pi = pi->next) {
8872 if (header) {
8873 route_vty_out_detail_header(
8874 vty, bgp, rm,
8875 (struct prefix_rd *)&rn->p,
8876 AFI_IP, safi, json);
8877 header = 0;
8878 }
8879 display++;
8880
8881 if (pathtype == BGP_PATH_SHOW_ALL
8882 || (pathtype == BGP_PATH_SHOW_BESTPATH
8883 && CHECK_FLAG(pi->flags,
8884 BGP_PATH_SELECTED))
8885 || (pathtype == BGP_PATH_SHOW_MULTIPATH
8886 && (CHECK_FLAG(pi->flags,
8887 BGP_PATH_MULTIPATH)
8888 || CHECK_FLAG(pi->flags,
8889 BGP_PATH_SELECTED))))
8890 route_vty_out_detail(vty, bgp, &rm->p,
8891 pi, AFI_IP, safi,
8892 json_paths);
8893 }
8894
8895 bgp_unlock_node(rm);
8896 }
8897 } else if (safi == SAFI_FLOWSPEC) {
8898 display = bgp_flowspec_display_match_per_ip(afi, rib,
8899 &match, prefix_check,
8900 vty,
8901 use_json,
8902 json_paths);
8903 } else {
8904 header = 1;
8905
8906 if ((rn = bgp_node_match(rib, &match)) != NULL) {
8907 if (!prefix_check
8908 || rn->p.prefixlen == match.prefixlen) {
8909 for (pi = rn->info; pi; pi = pi->next) {
8910 if (header) {
8911 route_vty_out_detail_header(
8912 vty, bgp, rn, NULL, afi,
8913 safi, json);
8914 header = 0;
8915 }
8916 display++;
8917
8918 if (pathtype == BGP_PATH_SHOW_ALL
8919 || (pathtype
8920 == BGP_PATH_SHOW_BESTPATH
8921 && CHECK_FLAG(
8922 pi->flags,
8923 BGP_PATH_SELECTED))
8924 || (pathtype
8925 == BGP_PATH_SHOW_MULTIPATH
8926 && (CHECK_FLAG(
8927 pi->flags,
8928 BGP_PATH_MULTIPATH)
8929 || CHECK_FLAG(
8930 pi->flags,
8931 BGP_PATH_SELECTED))))
8932 route_vty_out_detail(
8933 vty, bgp, &rn->p, pi,
8934 afi, safi, json_paths);
8935 }
8936 }
8937
8938 bgp_unlock_node(rn);
8939 }
8940 }
8941
8942 if (use_json) {
8943 if (display)
8944 json_object_object_add(json, "paths", json_paths);
8945
8946 vty_out(vty, "%s\n", json_object_to_json_string_ext(
8947 json, JSON_C_TO_STRING_PRETTY));
8948 json_object_free(json);
8949 } else {
8950 if (!display) {
8951 vty_out(vty, "%% Network not in table\n");
8952 return CMD_WARNING;
8953 }
8954 }
8955
8956 return CMD_SUCCESS;
8957 }
8958
8959 /* Display specified route of Main RIB */
8960 static int bgp_show_route(struct vty *vty, struct bgp *bgp, const char *ip_str,
8961 afi_t afi, safi_t safi, struct prefix_rd *prd,
8962 int prefix_check, enum bgp_path_type pathtype,
8963 bool use_json)
8964 {
8965 if (!bgp) {
8966 bgp = bgp_get_default();
8967 if (!bgp) {
8968 if (!use_json)
8969 vty_out(vty, "No BGP process is configured\n");
8970 else
8971 vty_out(vty, "{}\n");
8972 return CMD_WARNING;
8973 }
8974 }
8975
8976 /* labeled-unicast routes live in the unicast table */
8977 if (safi == SAFI_LABELED_UNICAST)
8978 safi = SAFI_UNICAST;
8979
8980 return bgp_show_route_in_table(vty, bgp, bgp->rib[afi][safi], ip_str,
8981 afi, safi, prd, prefix_check, pathtype,
8982 use_json);
8983 }
8984
8985 static int bgp_show_lcommunity(struct vty *vty, struct bgp *bgp, int argc,
8986 struct cmd_token **argv, afi_t afi, safi_t safi,
8987 bool uj)
8988 {
8989 struct lcommunity *lcom;
8990 struct buffer *b;
8991 int i;
8992 char *str;
8993 int first = 0;
8994
8995 b = buffer_new(1024);
8996 for (i = 0; i < argc; i++) {
8997 if (first)
8998 buffer_putc(b, ' ');
8999 else {
9000 if (strmatch(argv[i]->text, "AA:BB:CC")) {
9001 first = 1;
9002 buffer_putstr(b, argv[i]->arg);
9003 }
9004 }
9005 }
9006 buffer_putc(b, '\0');
9007
9008 str = buffer_getstr(b);
9009 buffer_free(b);
9010
9011 lcom = lcommunity_str2com(str);
9012 XFREE(MTYPE_TMP, str);
9013 if (!lcom) {
9014 vty_out(vty, "%% Large-community malformed\n");
9015 return CMD_WARNING;
9016 }
9017
9018 return bgp_show(vty, bgp, afi, safi, bgp_show_type_lcommunity, lcom,
9019 uj);
9020 }
9021
9022 static int bgp_show_lcommunity_list(struct vty *vty, struct bgp *bgp,
9023 const char *lcom, afi_t afi, safi_t safi,
9024 bool uj)
9025 {
9026 struct community_list *list;
9027
9028 list = community_list_lookup(bgp_clist, lcom,
9029 LARGE_COMMUNITY_LIST_MASTER);
9030 if (list == NULL) {
9031 vty_out(vty, "%% %s is not a valid large-community-list name\n",
9032 lcom);
9033 return CMD_WARNING;
9034 }
9035
9036 return bgp_show(vty, bgp, afi, safi, bgp_show_type_lcommunity_list,
9037 list, uj);
9038 }
9039
9040 DEFUN (show_ip_bgp_large_community_list,
9041 show_ip_bgp_large_community_list_cmd,
9042 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] large-community-list <(1-500)|WORD> [json]",
9043 SHOW_STR
9044 IP_STR
9045 BGP_STR
9046 BGP_INSTANCE_HELP_STR
9047 BGP_AFI_HELP_STR
9048 BGP_SAFI_WITH_LABEL_HELP_STR
9049 "Display routes matching the large-community-list\n"
9050 "large-community-list number\n"
9051 "large-community-list name\n"
9052 JSON_STR)
9053 {
9054 char *vrf = NULL;
9055 afi_t afi = AFI_IP6;
9056 safi_t safi = SAFI_UNICAST;
9057 int idx = 0;
9058
9059 if (argv_find(argv, argc, "ip", &idx))
9060 afi = AFI_IP;
9061 if (argv_find(argv, argc, "view", &idx)
9062 || argv_find(argv, argc, "vrf", &idx))
9063 vrf = argv[++idx]->arg;
9064 if (argv_find(argv, argc, "ipv4", &idx)
9065 || argv_find(argv, argc, "ipv6", &idx)) {
9066 afi = strmatch(argv[idx]->text, "ipv6") ? AFI_IP6 : AFI_IP;
9067 if (argv_find(argv, argc, "unicast", &idx)
9068 || argv_find(argv, argc, "multicast", &idx))
9069 safi = bgp_vty_safi_from_str(argv[idx]->text);
9070 }
9071
9072 bool uj = use_json(argc, argv);
9073
9074 struct bgp *bgp = bgp_lookup_by_name(vrf);
9075 if (bgp == NULL) {
9076 vty_out(vty, "Can't find BGP instance %s\n", vrf);
9077 return CMD_WARNING;
9078 }
9079
9080 argv_find(argv, argc, "large-community-list", &idx);
9081 return bgp_show_lcommunity_list(vty, bgp, argv[idx + 1]->arg, afi, safi,
9082 uj);
9083 }
9084 DEFUN (show_ip_bgp_large_community,
9085 show_ip_bgp_large_community_cmd,
9086 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] large-community [AA:BB:CC] [json]",
9087 SHOW_STR
9088 IP_STR
9089 BGP_STR
9090 BGP_INSTANCE_HELP_STR
9091 BGP_AFI_HELP_STR
9092 BGP_SAFI_WITH_LABEL_HELP_STR
9093 "Display routes matching the large-communities\n"
9094 "List of large-community numbers\n"
9095 JSON_STR)
9096 {
9097 char *vrf = NULL;
9098 afi_t afi = AFI_IP6;
9099 safi_t safi = SAFI_UNICAST;
9100 int idx = 0;
9101
9102 if (argv_find(argv, argc, "ip", &idx))
9103 afi = AFI_IP;
9104 if (argv_find(argv, argc, "view", &idx)
9105 || argv_find(argv, argc, "vrf", &idx))
9106 vrf = argv[++idx]->arg;
9107 if (argv_find(argv, argc, "ipv4", &idx)
9108 || argv_find(argv, argc, "ipv6", &idx)) {
9109 afi = strmatch(argv[idx]->text, "ipv6") ? AFI_IP6 : AFI_IP;
9110 if (argv_find(argv, argc, "unicast", &idx)
9111 || argv_find(argv, argc, "multicast", &idx))
9112 safi = bgp_vty_safi_from_str(argv[idx]->text);
9113 }
9114
9115 bool uj = use_json(argc, argv);
9116
9117 struct bgp *bgp = bgp_lookup_by_name(vrf);
9118 if (bgp == NULL) {
9119 vty_out(vty, "Can't find BGP instance %s\n", vrf);
9120 return CMD_WARNING;
9121 }
9122
9123 if (argv_find(argv, argc, "AA:BB:CC", &idx))
9124 return bgp_show_lcommunity(vty, bgp, argc, argv, afi, safi, uj);
9125 else
9126 return bgp_show(vty, bgp, afi, safi,
9127 bgp_show_type_lcommunity_all, NULL, uj);
9128 }
9129
9130 static int bgp_table_stats(struct vty *vty, struct bgp *bgp, afi_t afi,
9131 safi_t safi);
9132
9133
9134 /* BGP route print out function without JSON */
9135 DEFUN (show_ip_bgp,
9136 show_ip_bgp_cmd,
9137 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]]\
9138 <dampening <parameters>\
9139 |route-map WORD\
9140 |prefix-list WORD\
9141 |filter-list WORD\
9142 |statistics\
9143 |community-list <(1-500)|WORD> [exact-match]\
9144 |A.B.C.D/M longer-prefixes\
9145 |X:X::X:X/M longer-prefixes\
9146 >",
9147 SHOW_STR
9148 IP_STR
9149 BGP_STR
9150 BGP_INSTANCE_HELP_STR
9151 BGP_AFI_HELP_STR
9152 BGP_SAFI_WITH_LABEL_HELP_STR
9153 "Display detailed information about dampening\n"
9154 "Display detail of configured dampening parameters\n"
9155 "Display routes matching the route-map\n"
9156 "A route-map to match on\n"
9157 "Display routes conforming to the prefix-list\n"
9158 "Prefix-list name\n"
9159 "Display routes conforming to the filter-list\n"
9160 "Regular expression access list name\n"
9161 "BGP RIB advertisement statistics\n"
9162 "Display routes matching the community-list\n"
9163 "community-list number\n"
9164 "community-list name\n"
9165 "Exact match of the communities\n"
9166 "IPv4 prefix\n"
9167 "Display route and more specific routes\n"
9168 "IPv6 prefix\n"
9169 "Display route and more specific routes\n")
9170 {
9171 afi_t afi = AFI_IP6;
9172 safi_t safi = SAFI_UNICAST;
9173 int exact_match = 0;
9174 struct bgp *bgp = NULL;
9175 int idx = 0;
9176
9177 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
9178 &bgp, false);
9179 if (!idx)
9180 return CMD_WARNING;
9181
9182 if (argv_find(argv, argc, "dampening", &idx)) {
9183 if (argv_find(argv, argc, "parameters", &idx))
9184 return bgp_show_dampening_parameters(vty, afi, safi);
9185 }
9186
9187 if (argv_find(argv, argc, "prefix-list", &idx))
9188 return bgp_show_prefix_list(vty, bgp, argv[idx + 1]->arg, afi,
9189 safi, bgp_show_type_prefix_list);
9190
9191 if (argv_find(argv, argc, "filter-list", &idx))
9192 return bgp_show_filter_list(vty, bgp, argv[idx + 1]->arg, afi,
9193 safi, bgp_show_type_filter_list);
9194
9195 if (argv_find(argv, argc, "statistics", &idx))
9196 return bgp_table_stats(vty, bgp, afi, safi);
9197
9198 if (argv_find(argv, argc, "route-map", &idx))
9199 return bgp_show_route_map(vty, bgp, argv[idx + 1]->arg, afi,
9200 safi, bgp_show_type_route_map);
9201
9202 if (argv_find(argv, argc, "community-list", &idx)) {
9203 const char *clist_number_or_name = argv[++idx]->arg;
9204 if (++idx < argc && strmatch(argv[idx]->text, "exact-match"))
9205 exact_match = 1;
9206 return bgp_show_community_list(vty, bgp, clist_number_or_name,
9207 exact_match, afi, safi);
9208 }
9209 /* prefix-longer */
9210 if (argv_find(argv, argc, "A.B.C.D/M", &idx)
9211 || argv_find(argv, argc, "X:X::X:X/M", &idx))
9212 return bgp_show_prefix_longer(vty, bgp, argv[idx]->arg, afi,
9213 safi,
9214 bgp_show_type_prefix_longer);
9215
9216 return CMD_WARNING;
9217 }
9218
9219 /* BGP route print out function with JSON */
9220 DEFUN (show_ip_bgp_json,
9221 show_ip_bgp_json_cmd,
9222 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]]\
9223 [cidr-only\
9224 |dampening <flap-statistics|dampened-paths>\
9225 |community [AA:NN|local-AS|no-advertise|no-export\
9226 |graceful-shutdown|no-peer|blackhole|llgr-stale|no-llgr\
9227 |accept-own|accept-own-nexthop|route-filter-v6\
9228 |route-filter-v4|route-filter-translated-v6\
9229 |route-filter-translated-v4] [exact-match]\
9230 ] [json]",
9231 SHOW_STR
9232 IP_STR
9233 BGP_STR
9234 BGP_INSTANCE_HELP_STR
9235 BGP_AFI_HELP_STR
9236 BGP_SAFI_WITH_LABEL_HELP_STR
9237 "Display only routes with non-natural netmasks\n"
9238 "Display detailed information about dampening\n"
9239 "Display flap statistics of routes\n"
9240 "Display paths suppressed due to dampening\n"
9241 "Display routes matching the communities\n"
9242 COMMUNITY_AANN_STR
9243 "Do not send outside local AS (well-known community)\n"
9244 "Do not advertise to any peer (well-known community)\n"
9245 "Do not export to next AS (well-known community)\n"
9246 "Graceful shutdown (well-known community)\n"
9247 "Do not export to any peer (well-known community)\n"
9248 "Inform EBGP peers to blackhole traffic to prefix (well-known community)\n"
9249 "Staled Long-lived Graceful Restart VPN route (well-known community)\n"
9250 "Removed because Long-lived Graceful Restart was not enabled for VPN route (well-known community)\n"
9251 "Should accept local VPN route if exported and imported into different VRF (well-known community)\n"
9252 "Should accept VPN route with local nexthop (well-known community)\n"
9253 "RT VPNv6 route filtering (well-known community)\n"
9254 "RT VPNv4 route filtering (well-known community)\n"
9255 "RT translated VPNv6 route filtering (well-known community)\n"
9256 "RT translated VPNv4 route filtering (well-known community)\n"
9257 "Exact match of the communities\n"
9258 JSON_STR)
9259 {
9260 afi_t afi = AFI_IP6;
9261 safi_t safi = SAFI_UNICAST;
9262 enum bgp_show_type sh_type = bgp_show_type_normal;
9263 struct bgp *bgp = NULL;
9264 int idx = 0;
9265 int exact_match = 0;
9266 bool uj = use_json(argc, argv);
9267
9268 if (uj)
9269 argc--;
9270
9271 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
9272 &bgp, uj);
9273 if (!idx)
9274 return CMD_WARNING;
9275
9276 if (argv_find(argv, argc, "cidr-only", &idx))
9277 return bgp_show(vty, bgp, afi, safi, bgp_show_type_cidr_only,
9278 NULL, uj);
9279
9280 if (argv_find(argv, argc, "dampening", &idx)) {
9281 if (argv_find(argv, argc, "dampened-paths", &idx))
9282 return bgp_show(vty, bgp, afi, safi,
9283 bgp_show_type_dampend_paths, NULL, uj);
9284 else if (argv_find(argv, argc, "flap-statistics", &idx))
9285 return bgp_show(vty, bgp, afi, safi,
9286 bgp_show_type_flap_statistics, NULL,
9287 uj);
9288 }
9289
9290 if (argv_find(argv, argc, "community", &idx)) {
9291 char *maybecomm = idx + 1 < argc ? argv[idx + 1]->text : NULL;
9292 char *community = NULL;
9293
9294 if (maybecomm && !strmatch(maybecomm, "json")
9295 && !strmatch(maybecomm, "exact-match"))
9296 community = maybecomm;
9297
9298 if (argv_find(argv, argc, "exact-match", &idx))
9299 exact_match = 1;
9300
9301 if (community)
9302 return bgp_show_community(vty, bgp, community,
9303 exact_match, afi, safi, uj);
9304 else
9305 return (bgp_show(vty, bgp, afi, safi,
9306 bgp_show_type_community_all, NULL,
9307 uj));
9308 }
9309
9310 return bgp_show(vty, bgp, afi, safi, sh_type, NULL, uj);
9311 }
9312
9313 DEFUN (show_ip_bgp_route,
9314 show_ip_bgp_route_cmd,
9315 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]]"
9316 "<A.B.C.D|A.B.C.D/M|X:X::X:X|X:X::X:X/M> [<bestpath|multipath>] [json]",
9317 SHOW_STR
9318 IP_STR
9319 BGP_STR
9320 BGP_INSTANCE_HELP_STR
9321 BGP_AFI_HELP_STR
9322 BGP_SAFI_WITH_LABEL_HELP_STR
9323 "Network in the BGP routing table to display\n"
9324 "IPv4 prefix\n"
9325 "Network in the BGP routing table to display\n"
9326 "IPv6 prefix\n"
9327 "Display only the bestpath\n"
9328 "Display only multipaths\n"
9329 JSON_STR)
9330 {
9331 int prefix_check = 0;
9332
9333 afi_t afi = AFI_IP6;
9334 safi_t safi = SAFI_UNICAST;
9335 char *prefix = NULL;
9336 struct bgp *bgp = NULL;
9337 enum bgp_path_type path_type;
9338 bool uj = use_json(argc, argv);
9339
9340 int idx = 0;
9341
9342 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
9343 &bgp, uj);
9344 if (!idx)
9345 return CMD_WARNING;
9346
9347 if (!bgp) {
9348 vty_out(vty,
9349 "Specified 'all' vrf's but this command currently only works per view/vrf\n");
9350 return CMD_WARNING;
9351 }
9352
9353 /* <A.B.C.D|A.B.C.D/M|X:X::X:X|X:X::X:X/M> */
9354 if (argv_find(argv, argc, "A.B.C.D", &idx)
9355 || argv_find(argv, argc, "X:X::X:X", &idx))
9356 prefix_check = 0;
9357 else if (argv_find(argv, argc, "A.B.C.D/M", &idx)
9358 || argv_find(argv, argc, "X:X::X:X/M", &idx))
9359 prefix_check = 1;
9360
9361 if ((argv[idx]->type == IPV6_TKN || argv[idx]->type == IPV6_PREFIX_TKN)
9362 && afi != AFI_IP6) {
9363 vty_out(vty,
9364 "%% Cannot specify IPv6 address or prefix with IPv4 AFI\n");
9365 return CMD_WARNING;
9366 }
9367 if ((argv[idx]->type == IPV4_TKN || argv[idx]->type == IPV4_PREFIX_TKN)
9368 && afi != AFI_IP) {
9369 vty_out(vty,
9370 "%% Cannot specify IPv4 address or prefix with IPv6 AFI\n");
9371 return CMD_WARNING;
9372 }
9373
9374 prefix = argv[idx]->arg;
9375
9376 /* [<bestpath|multipath>] */
9377 if (argv_find(argv, argc, "bestpath", &idx))
9378 path_type = BGP_PATH_SHOW_BESTPATH;
9379 else if (argv_find(argv, argc, "multipath", &idx))
9380 path_type = BGP_PATH_SHOW_MULTIPATH;
9381 else
9382 path_type = BGP_PATH_SHOW_ALL;
9383
9384 return bgp_show_route(vty, bgp, prefix, afi, safi, NULL, prefix_check,
9385 path_type, uj);
9386 }
9387
9388 DEFUN (show_ip_bgp_regexp,
9389 show_ip_bgp_regexp_cmd,
9390 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] regexp REGEX...",
9391 SHOW_STR
9392 IP_STR
9393 BGP_STR
9394 BGP_INSTANCE_HELP_STR
9395 BGP_AFI_HELP_STR
9396 BGP_SAFI_WITH_LABEL_HELP_STR
9397 "Display routes matching the AS path regular expression\n"
9398 "A regular-expression to match the BGP AS paths\n")
9399 {
9400 afi_t afi = AFI_IP6;
9401 safi_t safi = SAFI_UNICAST;
9402 struct bgp *bgp = NULL;
9403
9404 int idx = 0;
9405 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
9406 &bgp, false);
9407 if (!idx)
9408 return CMD_WARNING;
9409
9410 // get index of regex
9411 argv_find(argv, argc, "regexp", &idx);
9412 idx++;
9413
9414 char *regstr = argv_concat(argv, argc, idx);
9415 int rc = bgp_show_regexp(vty, bgp, (const char *)regstr, afi, safi,
9416 bgp_show_type_regexp);
9417 XFREE(MTYPE_TMP, regstr);
9418 return rc;
9419 }
9420
9421 DEFUN (show_ip_bgp_instance_all,
9422 show_ip_bgp_instance_all_cmd,
9423 "show [ip] bgp <view|vrf> all ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] [json]",
9424 SHOW_STR
9425 IP_STR
9426 BGP_STR
9427 BGP_INSTANCE_ALL_HELP_STR
9428 BGP_AFI_HELP_STR
9429 BGP_SAFI_WITH_LABEL_HELP_STR
9430 JSON_STR)
9431 {
9432 afi_t afi = AFI_IP;
9433 safi_t safi = SAFI_UNICAST;
9434 struct bgp *bgp = NULL;
9435 int idx = 0;
9436 bool uj = use_json(argc, argv);
9437
9438 if (uj)
9439 argc--;
9440
9441 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
9442 &bgp, uj);
9443 if (!idx)
9444 return CMD_WARNING;
9445
9446 bgp_show_all_instances_routes_vty(vty, afi, safi, uj);
9447 return CMD_SUCCESS;
9448 }
9449
9450 static int bgp_show_regexp(struct vty *vty, struct bgp *bgp, const char *regstr,
9451 afi_t afi, safi_t safi, enum bgp_show_type type)
9452 {
9453 regex_t *regex;
9454 int rc;
9455
9456 regex = bgp_regcomp(regstr);
9457 if (!regex) {
9458 vty_out(vty, "Can't compile regexp %s\n", regstr);
9459 return CMD_WARNING;
9460 }
9461
9462 rc = bgp_show(vty, bgp, afi, safi, type, regex, 0);
9463 bgp_regex_free(regex);
9464 return rc;
9465 }
9466
9467 static int bgp_show_prefix_list(struct vty *vty, struct bgp *bgp,
9468 const char *prefix_list_str, afi_t afi,
9469 safi_t safi, enum bgp_show_type type)
9470 {
9471 struct prefix_list *plist;
9472
9473 plist = prefix_list_lookup(afi, prefix_list_str);
9474 if (plist == NULL) {
9475 vty_out(vty, "%% %s is not a valid prefix-list name\n",
9476 prefix_list_str);
9477 return CMD_WARNING;
9478 }
9479
9480 return bgp_show(vty, bgp, afi, safi, type, plist, 0);
9481 }
9482
9483 static int bgp_show_filter_list(struct vty *vty, struct bgp *bgp,
9484 const char *filter, afi_t afi, safi_t safi,
9485 enum bgp_show_type type)
9486 {
9487 struct as_list *as_list;
9488
9489 as_list = as_list_lookup(filter);
9490 if (as_list == NULL) {
9491 vty_out(vty, "%% %s is not a valid AS-path access-list name\n",
9492 filter);
9493 return CMD_WARNING;
9494 }
9495
9496 return bgp_show(vty, bgp, afi, safi, type, as_list, 0);
9497 }
9498
9499 static int bgp_show_route_map(struct vty *vty, struct bgp *bgp,
9500 const char *rmap_str, afi_t afi, safi_t safi,
9501 enum bgp_show_type type)
9502 {
9503 struct route_map *rmap;
9504
9505 rmap = route_map_lookup_by_name(rmap_str);
9506 if (!rmap) {
9507 vty_out(vty, "%% %s is not a valid route-map name\n", rmap_str);
9508 return CMD_WARNING;
9509 }
9510
9511 return bgp_show(vty, bgp, afi, safi, type, rmap, 0);
9512 }
9513
9514 static int bgp_show_community(struct vty *vty, struct bgp *bgp,
9515 const char *comstr, int exact, afi_t afi,
9516 safi_t safi, bool use_json)
9517 {
9518 struct community *com;
9519 int ret = 0;
9520
9521 com = community_str2com(comstr);
9522 if (!com) {
9523 vty_out(vty, "%% Community malformed: %s\n", comstr);
9524 return CMD_WARNING;
9525 }
9526
9527 ret = bgp_show(vty, bgp, afi, safi,
9528 (exact ? bgp_show_type_community_exact
9529 : bgp_show_type_community),
9530 com, use_json);
9531 community_free(com);
9532
9533 return ret;
9534 }
9535
9536 static int bgp_show_community_list(struct vty *vty, struct bgp *bgp,
9537 const char *com, int exact, afi_t afi,
9538 safi_t safi)
9539 {
9540 struct community_list *list;
9541
9542 list = community_list_lookup(bgp_clist, com, COMMUNITY_LIST_MASTER);
9543 if (list == NULL) {
9544 vty_out(vty, "%% %s is not a valid community-list name\n", com);
9545 return CMD_WARNING;
9546 }
9547
9548 return bgp_show(vty, bgp, afi, safi,
9549 (exact ? bgp_show_type_community_list_exact
9550 : bgp_show_type_community_list),
9551 list, 0);
9552 }
9553
9554 static int bgp_show_prefix_longer(struct vty *vty, struct bgp *bgp,
9555 const char *prefix, afi_t afi, safi_t safi,
9556 enum bgp_show_type type)
9557 {
9558 int ret;
9559 struct prefix *p;
9560
9561 p = prefix_new();
9562
9563 ret = str2prefix(prefix, p);
9564 if (!ret) {
9565 vty_out(vty, "%% Malformed Prefix\n");
9566 return CMD_WARNING;
9567 }
9568
9569 ret = bgp_show(vty, bgp, afi, safi, type, p, 0);
9570 prefix_free(p);
9571 return ret;
9572 }
9573
9574 static struct peer *peer_lookup_in_view(struct vty *vty, struct bgp *bgp,
9575 const char *ip_str, bool use_json)
9576 {
9577 int ret;
9578 struct peer *peer;
9579 union sockunion su;
9580
9581 /* Get peer sockunion. */
9582 ret = str2sockunion(ip_str, &su);
9583 if (ret < 0) {
9584 peer = peer_lookup_by_conf_if(bgp, ip_str);
9585 if (!peer) {
9586 peer = peer_lookup_by_hostname(bgp, ip_str);
9587
9588 if (!peer) {
9589 if (use_json) {
9590 json_object *json_no = NULL;
9591 json_no = json_object_new_object();
9592 json_object_string_add(
9593 json_no,
9594 "malformedAddressOrName",
9595 ip_str);
9596 vty_out(vty, "%s\n",
9597 json_object_to_json_string_ext(
9598 json_no,
9599 JSON_C_TO_STRING_PRETTY));
9600 json_object_free(json_no);
9601 } else
9602 vty_out(vty,
9603 "%% Malformed address or name: %s\n",
9604 ip_str);
9605 return NULL;
9606 }
9607 }
9608 return peer;
9609 }
9610
9611 /* Peer structure lookup. */
9612 peer = peer_lookup(bgp, &su);
9613 if (!peer) {
9614 if (use_json) {
9615 json_object *json_no = NULL;
9616 json_no = json_object_new_object();
9617 json_object_string_add(json_no, "warning",
9618 "No such neighbor in this view/vrf");
9619 vty_out(vty, "%s\n",
9620 json_object_to_json_string_ext(
9621 json_no, JSON_C_TO_STRING_PRETTY));
9622 json_object_free(json_no);
9623 } else
9624 vty_out(vty, "No such neighbor in this view/vrf\n");
9625 return NULL;
9626 }
9627
9628 return peer;
9629 }
9630
9631 enum bgp_stats {
9632 BGP_STATS_MAXBITLEN = 0,
9633 BGP_STATS_RIB,
9634 BGP_STATS_PREFIXES,
9635 BGP_STATS_TOTPLEN,
9636 BGP_STATS_UNAGGREGATEABLE,
9637 BGP_STATS_MAX_AGGREGATEABLE,
9638 BGP_STATS_AGGREGATES,
9639 BGP_STATS_SPACE,
9640 BGP_STATS_ASPATH_COUNT,
9641 BGP_STATS_ASPATH_MAXHOPS,
9642 BGP_STATS_ASPATH_TOTHOPS,
9643 BGP_STATS_ASPATH_MAXSIZE,
9644 BGP_STATS_ASPATH_TOTSIZE,
9645 BGP_STATS_ASN_HIGHEST,
9646 BGP_STATS_MAX,
9647 };
9648
9649 static const char *table_stats_strs[] = {
9650 [BGP_STATS_PREFIXES] = "Total Prefixes",
9651 [BGP_STATS_TOTPLEN] = "Average prefix length",
9652 [BGP_STATS_RIB] = "Total Advertisements",
9653 [BGP_STATS_UNAGGREGATEABLE] = "Unaggregateable prefixes",
9654 [BGP_STATS_MAX_AGGREGATEABLE] =
9655 "Maximum aggregateable prefixes",
9656 [BGP_STATS_AGGREGATES] = "BGP Aggregate advertisements",
9657 [BGP_STATS_SPACE] = "Address space advertised",
9658 [BGP_STATS_ASPATH_COUNT] = "Advertisements with paths",
9659 [BGP_STATS_ASPATH_MAXHOPS] = "Longest AS-Path (hops)",
9660 [BGP_STATS_ASPATH_MAXSIZE] = "Largest AS-Path (bytes)",
9661 [BGP_STATS_ASPATH_TOTHOPS] = "Average AS-Path length (hops)",
9662 [BGP_STATS_ASPATH_TOTSIZE] = "Average AS-Path size (bytes)",
9663 [BGP_STATS_ASN_HIGHEST] = "Highest public ASN",
9664 [BGP_STATS_MAX] = NULL,
9665 };
9666
9667 struct bgp_table_stats {
9668 struct bgp_table *table;
9669 unsigned long long counts[BGP_STATS_MAX];
9670 double total_space;
9671 };
9672
9673 #if 0
9674 #define TALLY_SIGFIG 100000
9675 static unsigned long
9676 ravg_tally (unsigned long count, unsigned long oldavg, unsigned long newval)
9677 {
9678 unsigned long newtot = (count-1) * oldavg + (newval * TALLY_SIGFIG);
9679 unsigned long res = (newtot * TALLY_SIGFIG) / count;
9680 unsigned long ret = newtot / count;
9681
9682 if ((res % TALLY_SIGFIG) > (TALLY_SIGFIG/2))
9683 return ret + 1;
9684 else
9685 return ret;
9686 }
9687 #endif
9688
9689 static int bgp_table_stats_walker(struct thread *t)
9690 {
9691 struct bgp_node *rn;
9692 struct bgp_node *top;
9693 struct bgp_table_stats *ts = THREAD_ARG(t);
9694 unsigned int space = 0;
9695
9696 if (!(top = bgp_table_top(ts->table)))
9697 return 0;
9698
9699 switch (top->p.family) {
9700 case AF_INET:
9701 space = IPV4_MAX_BITLEN;
9702 break;
9703 case AF_INET6:
9704 space = IPV6_MAX_BITLEN;
9705 break;
9706 }
9707
9708 ts->counts[BGP_STATS_MAXBITLEN] = space;
9709
9710 for (rn = top; rn; rn = bgp_route_next(rn)) {
9711 struct bgp_path_info *pi;
9712 struct bgp_node *prn = bgp_node_parent_nolock(rn);
9713 unsigned int pinum = 0;
9714
9715 if (rn == top)
9716 continue;
9717
9718 if (!rn->info)
9719 continue;
9720
9721 ts->counts[BGP_STATS_PREFIXES]++;
9722 ts->counts[BGP_STATS_TOTPLEN] += rn->p.prefixlen;
9723
9724 #if 0
9725 ts->counts[BGP_STATS_AVGPLEN]
9726 = ravg_tally (ts->counts[BGP_STATS_PREFIXES],
9727 ts->counts[BGP_STATS_AVGPLEN],
9728 rn->p.prefixlen);
9729 #endif
9730
9731 /* check if the prefix is included by any other announcements */
9732 while (prn && !prn->info)
9733 prn = bgp_node_parent_nolock(prn);
9734
9735 if (prn == NULL || prn == top) {
9736 ts->counts[BGP_STATS_UNAGGREGATEABLE]++;
9737 /* announced address space */
9738 if (space)
9739 ts->total_space +=
9740 pow(2.0, space - rn->p.prefixlen);
9741 } else if (prn->info)
9742 ts->counts[BGP_STATS_MAX_AGGREGATEABLE]++;
9743
9744 for (pi = rn->info; pi; pi = pi->next) {
9745 pinum++;
9746 ts->counts[BGP_STATS_RIB]++;
9747
9748 if (pi->attr
9749 && (CHECK_FLAG(pi->attr->flag,
9750 ATTR_FLAG_BIT(
9751 BGP_ATTR_ATOMIC_AGGREGATE))))
9752 ts->counts[BGP_STATS_AGGREGATES]++;
9753
9754 /* as-path stats */
9755 if (pi->attr && pi->attr->aspath) {
9756 unsigned int hops =
9757 aspath_count_hops(pi->attr->aspath);
9758 unsigned int size =
9759 aspath_size(pi->attr->aspath);
9760 as_t highest = aspath_highest(pi->attr->aspath);
9761
9762 ts->counts[BGP_STATS_ASPATH_COUNT]++;
9763
9764 if (hops > ts->counts[BGP_STATS_ASPATH_MAXHOPS])
9765 ts->counts[BGP_STATS_ASPATH_MAXHOPS] =
9766 hops;
9767
9768 if (size > ts->counts[BGP_STATS_ASPATH_MAXSIZE])
9769 ts->counts[BGP_STATS_ASPATH_MAXSIZE] =
9770 size;
9771
9772 ts->counts[BGP_STATS_ASPATH_TOTHOPS] += hops;
9773 ts->counts[BGP_STATS_ASPATH_TOTSIZE] += size;
9774 #if 0
9775 ts->counts[BGP_STATS_ASPATH_AVGHOPS]
9776 = ravg_tally (ts->counts[BGP_STATS_ASPATH_COUNT],
9777 ts->counts[BGP_STATS_ASPATH_AVGHOPS],
9778 hops);
9779 ts->counts[BGP_STATS_ASPATH_AVGSIZE]
9780 = ravg_tally (ts->counts[BGP_STATS_ASPATH_COUNT],
9781 ts->counts[BGP_STATS_ASPATH_AVGSIZE],
9782 size);
9783 #endif
9784 if (highest > ts->counts[BGP_STATS_ASN_HIGHEST])
9785 ts->counts[BGP_STATS_ASN_HIGHEST] =
9786 highest;
9787 }
9788 }
9789 }
9790 return 0;
9791 }
9792
9793 static int bgp_table_stats(struct vty *vty, struct bgp *bgp, afi_t afi,
9794 safi_t safi)
9795 {
9796 struct bgp_table_stats ts;
9797 unsigned int i;
9798
9799 if (!bgp->rib[afi][safi]) {
9800 vty_out(vty, "%% No RIB exist's for the AFI(%d)/SAFI(%d)\n",
9801 afi, safi);
9802 return CMD_WARNING;
9803 }
9804
9805 vty_out(vty, "BGP %s RIB statistics\n", afi_safi_print(afi, safi));
9806
9807 /* labeled-unicast routes live in the unicast table */
9808 if (safi == SAFI_LABELED_UNICAST)
9809 safi = SAFI_UNICAST;
9810
9811 memset(&ts, 0, sizeof(ts));
9812 ts.table = bgp->rib[afi][safi];
9813 thread_execute(bm->master, bgp_table_stats_walker, &ts, 0);
9814
9815 for (i = 0; i < BGP_STATS_MAX; i++) {
9816 if (!table_stats_strs[i])
9817 continue;
9818
9819 switch (i) {
9820 #if 0
9821 case BGP_STATS_ASPATH_AVGHOPS:
9822 case BGP_STATS_ASPATH_AVGSIZE:
9823 case BGP_STATS_AVGPLEN:
9824 vty_out (vty, "%-30s: ", table_stats_strs[i]);
9825 vty_out (vty, "%12.2f",
9826 (float)ts.counts[i] / (float)TALLY_SIGFIG);
9827 break;
9828 #endif
9829 case BGP_STATS_ASPATH_TOTHOPS:
9830 case BGP_STATS_ASPATH_TOTSIZE:
9831 vty_out(vty, "%-30s: ", table_stats_strs[i]);
9832 vty_out(vty, "%12.2f",
9833 ts.counts[i]
9834 ? (float)ts.counts[i]
9835 / (float)ts.counts
9836 [BGP_STATS_ASPATH_COUNT]
9837 : 0);
9838 break;
9839 case BGP_STATS_TOTPLEN:
9840 vty_out(vty, "%-30s: ", table_stats_strs[i]);
9841 vty_out(vty, "%12.2f",
9842 ts.counts[i]
9843 ? (float)ts.counts[i]
9844 / (float)ts.counts
9845 [BGP_STATS_PREFIXES]
9846 : 0);
9847 break;
9848 case BGP_STATS_SPACE:
9849 vty_out(vty, "%-30s: ", table_stats_strs[i]);
9850 vty_out(vty, "%12g\n", ts.total_space);
9851
9852 if (afi == AFI_IP6) {
9853 vty_out(vty, "%30s: ", "/32 equivalent ");
9854 vty_out(vty, "%12g\n",
9855 ts.total_space * pow(2.0, -128 + 32));
9856 vty_out(vty, "%30s: ", "/48 equivalent ");
9857 vty_out(vty, "%12g\n",
9858 ts.total_space * pow(2.0, -128 + 48));
9859 } else {
9860 vty_out(vty, "%30s: ", "% announced ");
9861 vty_out(vty, "%12.2f\n",
9862 ts.total_space * 100. * pow(2.0, -32));
9863 vty_out(vty, "%30s: ", "/8 equivalent ");
9864 vty_out(vty, "%12.2f\n",
9865 ts.total_space * pow(2.0, -32 + 8));
9866 vty_out(vty, "%30s: ", "/24 equivalent ");
9867 vty_out(vty, "%12.2f\n",
9868 ts.total_space * pow(2.0, -32 + 24));
9869 }
9870 break;
9871 default:
9872 vty_out(vty, "%-30s: ", table_stats_strs[i]);
9873 vty_out(vty, "%12llu", ts.counts[i]);
9874 }
9875
9876 vty_out(vty, "\n");
9877 }
9878 return CMD_SUCCESS;
9879 }
9880
9881 enum bgp_pcounts {
9882 PCOUNT_ADJ_IN = 0,
9883 PCOUNT_DAMPED,
9884 PCOUNT_REMOVED,
9885 PCOUNT_HISTORY,
9886 PCOUNT_STALE,
9887 PCOUNT_VALID,
9888 PCOUNT_ALL,
9889 PCOUNT_COUNTED,
9890 PCOUNT_PFCNT, /* the figure we display to users */
9891 PCOUNT_MAX,
9892 };
9893
9894 static const char *pcount_strs[] = {
9895 [PCOUNT_ADJ_IN] = "Adj-in",
9896 [PCOUNT_DAMPED] = "Damped",
9897 [PCOUNT_REMOVED] = "Removed",
9898 [PCOUNT_HISTORY] = "History",
9899 [PCOUNT_STALE] = "Stale",
9900 [PCOUNT_VALID] = "Valid",
9901 [PCOUNT_ALL] = "All RIB",
9902 [PCOUNT_COUNTED] = "PfxCt counted",
9903 [PCOUNT_PFCNT] = "Useable",
9904 [PCOUNT_MAX] = NULL,
9905 };
9906
9907 struct peer_pcounts {
9908 unsigned int count[PCOUNT_MAX];
9909 const struct peer *peer;
9910 const struct bgp_table *table;
9911 };
9912
9913 static int bgp_peer_count_walker(struct thread *t)
9914 {
9915 struct bgp_node *rn;
9916 struct peer_pcounts *pc = THREAD_ARG(t);
9917 const struct peer *peer = pc->peer;
9918
9919 for (rn = bgp_table_top(pc->table); rn; rn = bgp_route_next(rn)) {
9920 struct bgp_adj_in *ain;
9921 struct bgp_path_info *pi;
9922
9923 for (ain = rn->adj_in; ain; ain = ain->next)
9924 if (ain->peer == peer)
9925 pc->count[PCOUNT_ADJ_IN]++;
9926
9927 for (pi = rn->info; pi; pi = pi->next) {
9928 if (pi->peer != peer)
9929 continue;
9930
9931 pc->count[PCOUNT_ALL]++;
9932
9933 if (CHECK_FLAG(pi->flags, BGP_PATH_DAMPED))
9934 pc->count[PCOUNT_DAMPED]++;
9935 if (CHECK_FLAG(pi->flags, BGP_PATH_HISTORY))
9936 pc->count[PCOUNT_HISTORY]++;
9937 if (CHECK_FLAG(pi->flags, BGP_PATH_REMOVED))
9938 pc->count[PCOUNT_REMOVED]++;
9939 if (CHECK_FLAG(pi->flags, BGP_PATH_STALE))
9940 pc->count[PCOUNT_STALE]++;
9941 if (CHECK_FLAG(pi->flags, BGP_PATH_VALID))
9942 pc->count[PCOUNT_VALID]++;
9943 if (!CHECK_FLAG(pi->flags, BGP_PATH_UNUSEABLE))
9944 pc->count[PCOUNT_PFCNT]++;
9945
9946 if (CHECK_FLAG(pi->flags, BGP_PATH_COUNTED)) {
9947 pc->count[PCOUNT_COUNTED]++;
9948 if (CHECK_FLAG(pi->flags, BGP_PATH_UNUSEABLE))
9949 flog_err(
9950 EC_LIB_DEVELOPMENT,
9951 "Attempting to count but flags say it is unusable");
9952 } else {
9953 if (!CHECK_FLAG(pi->flags, BGP_PATH_UNUSEABLE))
9954 flog_err(
9955 EC_LIB_DEVELOPMENT,
9956 "Not counted but flags say we should");
9957 }
9958 }
9959 }
9960 return 0;
9961 }
9962
9963 static int bgp_peer_counts(struct vty *vty, struct peer *peer, afi_t afi,
9964 safi_t safi, bool use_json)
9965 {
9966 struct peer_pcounts pcounts = {.peer = peer};
9967 unsigned int i;
9968 json_object *json = NULL;
9969 json_object *json_loop = NULL;
9970
9971 if (use_json) {
9972 json = json_object_new_object();
9973 json_loop = json_object_new_object();
9974 }
9975
9976 if (!peer || !peer->bgp || !peer->afc[afi][safi]
9977 || !peer->bgp->rib[afi][safi]) {
9978 if (use_json) {
9979 json_object_string_add(
9980 json, "warning",
9981 "No such neighbor or address family");
9982 vty_out(vty, "%s\n", json_object_to_json_string(json));
9983 json_object_free(json);
9984 } else
9985 vty_out(vty, "%% No such neighbor or address family\n");
9986
9987 return CMD_WARNING;
9988 }
9989
9990 memset(&pcounts, 0, sizeof(pcounts));
9991 pcounts.peer = peer;
9992 pcounts.table = peer->bgp->rib[afi][safi];
9993
9994 /* in-place call via thread subsystem so as to record execution time
9995 * stats for the thread-walk (i.e. ensure this can't be blamed on
9996 * on just vty_read()).
9997 */
9998 thread_execute(bm->master, bgp_peer_count_walker, &pcounts, 0);
9999
10000 if (use_json) {
10001 json_object_string_add(json, "prefixCountsFor", peer->host);
10002 json_object_string_add(json, "multiProtocol",
10003 afi_safi_print(afi, safi));
10004 json_object_int_add(json, "pfxCounter",
10005 peer->pcount[afi][safi]);
10006
10007 for (i = 0; i < PCOUNT_MAX; i++)
10008 json_object_int_add(json_loop, pcount_strs[i],
10009 pcounts.count[i]);
10010
10011 json_object_object_add(json, "ribTableWalkCounters", json_loop);
10012
10013 if (pcounts.count[PCOUNT_PFCNT] != peer->pcount[afi][safi]) {
10014 json_object_string_add(json, "pfxctDriftFor",
10015 peer->host);
10016 json_object_string_add(
10017 json, "recommended",
10018 "Please report this bug, with the above command output");
10019 }
10020 vty_out(vty, "%s\n", json_object_to_json_string_ext(
10021 json, JSON_C_TO_STRING_PRETTY));
10022 json_object_free(json);
10023 } else {
10024
10025 if (peer->hostname
10026 && bgp_flag_check(peer->bgp, BGP_FLAG_SHOW_HOSTNAME)) {
10027 vty_out(vty, "Prefix counts for %s/%s, %s\n",
10028 peer->hostname, peer->host,
10029 afi_safi_print(afi, safi));
10030 } else {
10031 vty_out(vty, "Prefix counts for %s, %s\n", peer->host,
10032 afi_safi_print(afi, safi));
10033 }
10034
10035 vty_out(vty, "PfxCt: %ld\n", peer->pcount[afi][safi]);
10036 vty_out(vty, "\nCounts from RIB table walk:\n\n");
10037
10038 for (i = 0; i < PCOUNT_MAX; i++)
10039 vty_out(vty, "%20s: %-10d\n", pcount_strs[i],
10040 pcounts.count[i]);
10041
10042 if (pcounts.count[PCOUNT_PFCNT] != peer->pcount[afi][safi]) {
10043 vty_out(vty, "%s [pcount] PfxCt drift!\n", peer->host);
10044 vty_out(vty,
10045 "Please report this bug, with the above command output\n");
10046 }
10047 }
10048
10049 return CMD_SUCCESS;
10050 }
10051
10052 DEFUN (show_ip_bgp_instance_neighbor_prefix_counts,
10053 show_ip_bgp_instance_neighbor_prefix_counts_cmd,
10054 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_CMD_STR"]] "
10055 "neighbors <A.B.C.D|X:X::X:X|WORD> prefix-counts [json]",
10056 SHOW_STR
10057 IP_STR
10058 BGP_STR
10059 BGP_INSTANCE_HELP_STR
10060 BGP_AFI_HELP_STR
10061 BGP_SAFI_HELP_STR
10062 "Detailed information on TCP and BGP neighbor connections\n"
10063 "Neighbor to display information about\n"
10064 "Neighbor to display information about\n"
10065 "Neighbor on BGP configured interface\n"
10066 "Display detailed prefix count information\n"
10067 JSON_STR)
10068 {
10069 afi_t afi = AFI_IP6;
10070 safi_t safi = SAFI_UNICAST;
10071 struct peer *peer;
10072 int idx = 0;
10073 struct bgp *bgp = NULL;
10074 bool uj = use_json(argc, argv);
10075
10076 if (uj)
10077 argc--;
10078
10079 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
10080 &bgp, uj);
10081 if (!idx)
10082 return CMD_WARNING;
10083
10084 argv_find(argv, argc, "neighbors", &idx);
10085 peer = peer_lookup_in_view(vty, bgp, argv[idx + 1]->arg, uj);
10086 if (!peer)
10087 return CMD_WARNING;
10088
10089 return bgp_peer_counts(vty, peer, AFI_IP, SAFI_UNICAST, uj);
10090 }
10091
10092 #ifdef KEEP_OLD_VPN_COMMANDS
10093 DEFUN (show_ip_bgp_vpn_neighbor_prefix_counts,
10094 show_ip_bgp_vpn_neighbor_prefix_counts_cmd,
10095 "show [ip] bgp <vpnv4|vpnv6> all neighbors <A.B.C.D|X:X::X:X|WORD> prefix-counts [json]",
10096 SHOW_STR
10097 IP_STR
10098 BGP_STR
10099 BGP_VPNVX_HELP_STR
10100 "Display information about all VPNv4 NLRIs\n"
10101 "Detailed information on TCP and BGP neighbor connections\n"
10102 "Neighbor to display information about\n"
10103 "Neighbor to display information about\n"
10104 "Neighbor on BGP configured interface\n"
10105 "Display detailed prefix count information\n"
10106 JSON_STR)
10107 {
10108 int idx_peer = 6;
10109 struct peer *peer;
10110 bool uj = use_json(argc, argv);
10111
10112 peer = peer_lookup_in_view(vty, NULL, argv[idx_peer]->arg, uj);
10113 if (!peer)
10114 return CMD_WARNING;
10115
10116 return bgp_peer_counts(vty, peer, AFI_IP, SAFI_MPLS_VPN, uj);
10117 }
10118
10119 DEFUN (show_ip_bgp_vpn_all_route_prefix,
10120 show_ip_bgp_vpn_all_route_prefix_cmd,
10121 "show [ip] bgp <vpnv4|vpnv6> all <A.B.C.D|A.B.C.D/M> [json]",
10122 SHOW_STR
10123 IP_STR
10124 BGP_STR
10125 BGP_VPNVX_HELP_STR
10126 "Display information about all VPNv4 NLRIs\n"
10127 "Network in the BGP routing table to display\n"
10128 "Network in the BGP routing table to display\n"
10129 JSON_STR)
10130 {
10131 int idx = 0;
10132 char *network = NULL;
10133 struct bgp *bgp = bgp_get_default();
10134 if (!bgp) {
10135 vty_out(vty, "Can't find default instance\n");
10136 return CMD_WARNING;
10137 }
10138
10139 if (argv_find(argv, argc, "A.B.C.D", &idx))
10140 network = argv[idx]->arg;
10141 else if (argv_find(argv, argc, "A.B.C.D/M", &idx))
10142 network = argv[idx]->arg;
10143 else {
10144 vty_out(vty, "Unable to figure out Network\n");
10145 return CMD_WARNING;
10146 }
10147
10148 return bgp_show_route(vty, bgp, network, AFI_IP, SAFI_MPLS_VPN, NULL, 0,
10149 BGP_PATH_SHOW_ALL, use_json(argc, argv));
10150 }
10151 #endif /* KEEP_OLD_VPN_COMMANDS */
10152
10153 DEFUN (show_ip_bgp_l2vpn_evpn_all_route_prefix,
10154 show_ip_bgp_l2vpn_evpn_all_route_prefix_cmd,
10155 "show [ip] bgp l2vpn evpn all <A.B.C.D|A.B.C.D/M> [json]",
10156 SHOW_STR
10157 IP_STR
10158 BGP_STR
10159 L2VPN_HELP_STR
10160 EVPN_HELP_STR
10161 "Display information about all EVPN NLRIs\n"
10162 "Network in the BGP routing table to display\n"
10163 "Network in the BGP routing table to display\n"
10164 JSON_STR)
10165 {
10166 int idx = 0;
10167 char *network = NULL;
10168
10169 if (argv_find(argv, argc, "A.B.C.D", &idx))
10170 network = argv[idx]->arg;
10171 else if (argv_find(argv, argc, "A.B.C.D/M", &idx))
10172 network = argv[idx]->arg;
10173 else {
10174 vty_out(vty, "Unable to figure out Network\n");
10175 return CMD_WARNING;
10176 }
10177 return bgp_show_route(vty, NULL, network, AFI_L2VPN, SAFI_EVPN, NULL, 0,
10178 BGP_PATH_SHOW_ALL, use_json(argc, argv));
10179 }
10180
10181 static void show_adj_route(struct vty *vty, struct peer *peer, afi_t afi,
10182 safi_t safi, enum bgp_show_adj_route_type type,
10183 const char *rmap_name, bool use_json,
10184 json_object *json)
10185 {
10186 struct bgp_table *table;
10187 struct bgp_adj_in *ain;
10188 struct bgp_adj_out *adj;
10189 unsigned long output_count;
10190 unsigned long filtered_count;
10191 struct bgp_node *rn;
10192 int header1 = 1;
10193 struct bgp *bgp;
10194 int header2 = 1;
10195 struct attr attr;
10196 int ret;
10197 struct update_subgroup *subgrp;
10198 json_object *json_scode = NULL;
10199 json_object *json_ocode = NULL;
10200 json_object *json_ar = NULL;
10201 struct peer_af *paf;
10202 bool route_filtered;
10203
10204 if (use_json) {
10205 json_scode = json_object_new_object();
10206 json_ocode = json_object_new_object();
10207 json_ar = json_object_new_object();
10208
10209 json_object_string_add(json_scode, "suppressed", "s");
10210 json_object_string_add(json_scode, "damped", "d");
10211 json_object_string_add(json_scode, "history", "h");
10212 json_object_string_add(json_scode, "valid", "*");
10213 json_object_string_add(json_scode, "best", ">");
10214 json_object_string_add(json_scode, "multipath", "=");
10215 json_object_string_add(json_scode, "internal", "i");
10216 json_object_string_add(json_scode, "ribFailure", "r");
10217 json_object_string_add(json_scode, "stale", "S");
10218 json_object_string_add(json_scode, "removed", "R");
10219
10220 json_object_string_add(json_ocode, "igp", "i");
10221 json_object_string_add(json_ocode, "egp", "e");
10222 json_object_string_add(json_ocode, "incomplete", "?");
10223 }
10224
10225 bgp = peer->bgp;
10226
10227 if (!bgp) {
10228 if (use_json) {
10229 json_object_string_add(json, "alert", "no BGP");
10230 vty_out(vty, "%s\n", json_object_to_json_string(json));
10231 json_object_free(json);
10232 } else
10233 vty_out(vty, "%% No bgp\n");
10234 return;
10235 }
10236
10237 table = bgp->rib[afi][safi];
10238
10239 output_count = filtered_count = 0;
10240 subgrp = peer_subgroup(peer, afi, safi);
10241
10242 if (type == bgp_show_adj_route_advertised && subgrp
10243 && CHECK_FLAG(subgrp->sflags, SUBGRP_STATUS_DEFAULT_ORIGINATE)) {
10244 if (use_json) {
10245 json_object_int_add(json, "bgpTableVersion",
10246 table->version);
10247 json_object_string_add(json, "bgpLocalRouterId",
10248 inet_ntoa(bgp->router_id));
10249 json_object_object_add(json, "bgpStatusCodes",
10250 json_scode);
10251 json_object_object_add(json, "bgpOriginCodes",
10252 json_ocode);
10253 json_object_string_add(
10254 json, "bgpOriginatingDefaultNetwork",
10255 (afi == AFI_IP) ? "0.0.0.0/0" : "::/0");
10256 } else {
10257 vty_out(vty, "BGP table version is %" PRIu64
10258 ", local router ID is %s, vrf id ",
10259 table->version, inet_ntoa(bgp->router_id));
10260 if (bgp->vrf_id == VRF_UNKNOWN)
10261 vty_out(vty, "%s", VRFID_NONE_STR);
10262 else
10263 vty_out(vty, "%u", bgp->vrf_id);
10264 vty_out(vty, "\n");
10265 vty_out(vty, BGP_SHOW_SCODE_HEADER);
10266 vty_out(vty, BGP_SHOW_NCODE_HEADER);
10267 vty_out(vty, BGP_SHOW_OCODE_HEADER);
10268
10269 vty_out(vty, "Originating default network %s\n\n",
10270 (afi == AFI_IP) ? "0.0.0.0/0" : "::/0");
10271 }
10272 header1 = 0;
10273 }
10274
10275 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn)) {
10276 if (type == bgp_show_adj_route_received
10277 || type == bgp_show_adj_route_filtered) {
10278 for (ain = rn->adj_in; ain; ain = ain->next) {
10279 if (ain->peer != peer || !ain->attr)
10280 continue;
10281
10282 if (header1) {
10283 if (use_json) {
10284 json_object_int_add(
10285 json, "bgpTableVersion",
10286 0);
10287 json_object_string_add(
10288 json,
10289 "bgpLocalRouterId",
10290 inet_ntoa(
10291 bgp->router_id));
10292 json_object_object_add(
10293 json, "bgpStatusCodes",
10294 json_scode);
10295 json_object_object_add(
10296 json, "bgpOriginCodes",
10297 json_ocode);
10298 } else {
10299 vty_out(vty,
10300 "BGP table version is 0, local router ID is %s, vrf id ",
10301 inet_ntoa(
10302 bgp->router_id));
10303 if (bgp->vrf_id == VRF_UNKNOWN)
10304 vty_out(vty, "%s",
10305 VRFID_NONE_STR);
10306 else
10307 vty_out(vty, "%u",
10308 bgp->vrf_id);
10309 vty_out(vty, "\n");
10310 vty_out(vty,
10311 BGP_SHOW_SCODE_HEADER);
10312 vty_out(vty,
10313 BGP_SHOW_NCODE_HEADER);
10314 vty_out(vty,
10315 BGP_SHOW_OCODE_HEADER);
10316 }
10317 header1 = 0;
10318 }
10319 if (header2) {
10320 if (!use_json)
10321 vty_out(vty, BGP_SHOW_HEADER);
10322 header2 = 0;
10323 }
10324
10325 bgp_attr_dup(&attr, ain->attr);
10326 route_filtered = false;
10327
10328 /* Filter prefix using distribute list,
10329 * filter list or prefix list
10330 */
10331 if ((bgp_input_filter(peer, &rn->p, &attr, afi,
10332 safi)) == FILTER_DENY)
10333 route_filtered = true;
10334
10335 /* Filter prefix using route-map */
10336 ret = bgp_input_modifier(peer, &rn->p, &attr,
10337 afi, safi, rmap_name);
10338
10339 if (type == bgp_show_adj_route_filtered &&
10340 !route_filtered && ret != RMAP_DENY) {
10341 bgp_attr_undup(&attr, ain->attr);
10342 continue;
10343 }
10344
10345 if (type == bgp_show_adj_route_received &&
10346 (route_filtered || ret == RMAP_DENY))
10347 filtered_count++;
10348
10349 route_vty_out_tmp(vty, &rn->p, &attr, safi,
10350 use_json, json_ar);
10351 bgp_attr_undup(&attr, ain->attr);
10352 output_count++;
10353 }
10354 } else if (type == bgp_show_adj_route_advertised) {
10355 for (adj = rn->adj_out; adj; adj = adj->next)
10356 SUBGRP_FOREACH_PEER (adj->subgroup, paf) {
10357 if (paf->peer != peer || !adj->attr)
10358 continue;
10359
10360 if (header1) {
10361 if (use_json) {
10362 json_object_int_add(
10363 json,
10364 "bgpTableVersion",
10365 table->version);
10366 json_object_string_add(
10367 json,
10368 "bgpLocalRouterId",
10369 inet_ntoa(
10370 bgp->router_id));
10371 json_object_object_add(
10372 json,
10373 "bgpStatusCodes",
10374 json_scode);
10375 json_object_object_add(
10376 json,
10377 "bgpOriginCodes",
10378 json_ocode);
10379 } else {
10380 vty_out(vty,
10381 "BGP table version is %" PRIu64
10382 ", local router ID is %s, vrf id ",
10383 table->version,
10384 inet_ntoa(
10385 bgp->router_id));
10386 if (bgp->vrf_id ==
10387 VRF_UNKNOWN)
10388 vty_out(vty,
10389 "%s",
10390 VRFID_NONE_STR);
10391 else
10392 vty_out(vty,
10393 "%u",
10394 bgp->vrf_id);
10395 vty_out(vty, "\n");
10396 vty_out(vty,
10397 BGP_SHOW_SCODE_HEADER);
10398 vty_out(vty,
10399 BGP_SHOW_NCODE_HEADER);
10400 vty_out(vty,
10401 BGP_SHOW_OCODE_HEADER);
10402 }
10403 header1 = 0;
10404 }
10405 if (header2) {
10406 if (!use_json)
10407 vty_out(vty,
10408 BGP_SHOW_HEADER);
10409 header2 = 0;
10410 }
10411
10412 bgp_attr_dup(&attr, adj->attr);
10413 ret = bgp_output_modifier(
10414 peer, &rn->p, &attr, afi, safi,
10415 rmap_name);
10416
10417 if (ret != RMAP_DENY) {
10418 route_vty_out_tmp(vty, &rn->p,
10419 &attr, safi,
10420 use_json,
10421 json_ar);
10422 output_count++;
10423 } else {
10424 filtered_count++;
10425 }
10426
10427 bgp_attr_undup(&attr, adj->attr);
10428 }
10429 }
10430 }
10431
10432 if (use_json) {
10433 json_object_object_add(json, "advertisedRoutes", json_ar);
10434 json_object_int_add(json, "totalPrefixCounter", output_count);
10435 json_object_int_add(json, "filteredPrefixCounter",
10436 filtered_count);
10437
10438 vty_out(vty, "%s\n", json_object_to_json_string_ext(
10439 json, JSON_C_TO_STRING_PRETTY));
10440 json_object_free(json);
10441 } else if (output_count > 0) {
10442 if (filtered_count > 0)
10443 vty_out(vty,
10444 "\nTotal number of prefixes %ld (%ld filtered)\n",
10445 output_count, filtered_count);
10446 else
10447 vty_out(vty, "\nTotal number of prefixes %ld\n",
10448 output_count);
10449 }
10450 }
10451
10452 static int peer_adj_routes(struct vty *vty, struct peer *peer, afi_t afi,
10453 safi_t safi, enum bgp_show_adj_route_type type,
10454 const char *rmap_name, bool use_json)
10455 {
10456 json_object *json = NULL;
10457
10458 if (use_json)
10459 json = json_object_new_object();
10460
10461 /* labeled-unicast routes live in the unicast table */
10462 if (safi == SAFI_LABELED_UNICAST)
10463 safi = SAFI_UNICAST;
10464
10465 if (!peer || !peer->afc[afi][safi]) {
10466 if (use_json) {
10467 json_object_string_add(
10468 json, "warning",
10469 "No such neighbor or address family");
10470 vty_out(vty, "%s\n", json_object_to_json_string(json));
10471 json_object_free(json);
10472 } else
10473 vty_out(vty, "%% No such neighbor or address family\n");
10474
10475 return CMD_WARNING;
10476 }
10477
10478 if ((type == bgp_show_adj_route_received
10479 || type == bgp_show_adj_route_filtered)
10480 && !CHECK_FLAG(peer->af_flags[afi][safi],
10481 PEER_FLAG_SOFT_RECONFIG)) {
10482 if (use_json) {
10483 json_object_string_add(
10484 json, "warning",
10485 "Inbound soft reconfiguration not enabled");
10486 vty_out(vty, "%s\n", json_object_to_json_string(json));
10487 json_object_free(json);
10488 } else
10489 vty_out(vty,
10490 "%% Inbound soft reconfiguration not enabled\n");
10491
10492 return CMD_WARNING;
10493 }
10494
10495 show_adj_route(vty, peer, afi, safi, type, rmap_name, use_json, json);
10496
10497 return CMD_SUCCESS;
10498 }
10499
10500 DEFUN (show_ip_bgp_instance_neighbor_advertised_route,
10501 show_ip_bgp_instance_neighbor_advertised_route_cmd,
10502 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] "
10503 "neighbors <A.B.C.D|X:X::X:X|WORD> <advertised-routes|received-routes|filtered-routes> [route-map WORD] [json]",
10504 SHOW_STR
10505 IP_STR
10506 BGP_STR
10507 BGP_INSTANCE_HELP_STR
10508 BGP_AFI_HELP_STR
10509 BGP_SAFI_WITH_LABEL_HELP_STR
10510 "Detailed information on TCP and BGP neighbor connections\n"
10511 "Neighbor to display information about\n"
10512 "Neighbor to display information about\n"
10513 "Neighbor on BGP configured interface\n"
10514 "Display the routes advertised to a BGP neighbor\n"
10515 "Display the received routes from neighbor\n"
10516 "Display the filtered routes received from neighbor\n"
10517 "Route-map to modify the attributes\n"
10518 "Name of the route map\n"
10519 JSON_STR)
10520 {
10521 afi_t afi = AFI_IP6;
10522 safi_t safi = SAFI_UNICAST;
10523 char *rmap_name = NULL;
10524 char *peerstr = NULL;
10525 struct bgp *bgp = NULL;
10526 struct peer *peer;
10527 enum bgp_show_adj_route_type type = bgp_show_adj_route_advertised;
10528 int idx = 0;
10529 bool uj = use_json(argc, argv);
10530
10531 if (uj)
10532 argc--;
10533
10534 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
10535 &bgp, uj);
10536 if (!idx)
10537 return CMD_WARNING;
10538
10539 /* neighbors <A.B.C.D|X:X::X:X|WORD> */
10540 argv_find(argv, argc, "neighbors", &idx);
10541 peerstr = argv[++idx]->arg;
10542
10543 peer = peer_lookup_in_view(vty, bgp, peerstr, uj);
10544 if (!peer)
10545 return CMD_WARNING;
10546
10547 if (argv_find(argv, argc, "advertised-routes", &idx))
10548 type = bgp_show_adj_route_advertised;
10549 else if (argv_find(argv, argc, "received-routes", &idx))
10550 type = bgp_show_adj_route_received;
10551 else if (argv_find(argv, argc, "filtered-routes", &idx))
10552 type = bgp_show_adj_route_filtered;
10553
10554 if (argv_find(argv, argc, "route-map", &idx))
10555 rmap_name = argv[++idx]->arg;
10556
10557 return peer_adj_routes(vty, peer, afi, safi, type, rmap_name, uj);
10558 }
10559
10560 DEFUN (show_ip_bgp_neighbor_received_prefix_filter,
10561 show_ip_bgp_neighbor_received_prefix_filter_cmd,
10562 "show [ip] bgp [<ipv4|ipv6> [unicast]] neighbors <A.B.C.D|X:X::X:X|WORD> received prefix-filter [json]",
10563 SHOW_STR
10564 IP_STR
10565 BGP_STR
10566 "Address Family\n"
10567 "Address Family\n"
10568 "Address Family modifier\n"
10569 "Detailed information on TCP and BGP neighbor connections\n"
10570 "Neighbor to display information about\n"
10571 "Neighbor to display information about\n"
10572 "Neighbor on BGP configured interface\n"
10573 "Display information received from a BGP neighbor\n"
10574 "Display the prefixlist filter\n"
10575 JSON_STR)
10576 {
10577 afi_t afi = AFI_IP6;
10578 safi_t safi = SAFI_UNICAST;
10579 char *peerstr = NULL;
10580
10581 char name[BUFSIZ];
10582 union sockunion su;
10583 struct peer *peer;
10584 int count, ret;
10585
10586 int idx = 0;
10587
10588 /* show [ip] bgp */
10589 if (argv_find(argv, argc, "ip", &idx))
10590 afi = AFI_IP;
10591 /* [<ipv4|ipv6> [unicast]] */
10592 if (argv_find(argv, argc, "ipv4", &idx))
10593 afi = AFI_IP;
10594 if (argv_find(argv, argc, "ipv6", &idx))
10595 afi = AFI_IP6;
10596 /* neighbors <A.B.C.D|X:X::X:X|WORD> */
10597 argv_find(argv, argc, "neighbors", &idx);
10598 peerstr = argv[++idx]->arg;
10599
10600 bool uj = use_json(argc, argv);
10601
10602 ret = str2sockunion(peerstr, &su);
10603 if (ret < 0) {
10604 peer = peer_lookup_by_conf_if(NULL, peerstr);
10605 if (!peer) {
10606 if (uj)
10607 vty_out(vty, "{}\n");
10608 else
10609 vty_out(vty,
10610 "%% Malformed address or name: %s\n",
10611 peerstr);
10612 return CMD_WARNING;
10613 }
10614 } else {
10615 peer = peer_lookup(NULL, &su);
10616 if (!peer) {
10617 if (uj)
10618 vty_out(vty, "{}\n");
10619 else
10620 vty_out(vty, "No peer\n");
10621 return CMD_WARNING;
10622 }
10623 }
10624
10625 sprintf(name, "%s.%d.%d", peer->host, afi, safi);
10626 count = prefix_bgp_show_prefix_list(NULL, afi, name, uj);
10627 if (count) {
10628 if (!uj)
10629 vty_out(vty, "Address Family: %s\n",
10630 afi_safi_print(afi, safi));
10631 prefix_bgp_show_prefix_list(vty, afi, name, uj);
10632 } else {
10633 if (uj)
10634 vty_out(vty, "{}\n");
10635 else
10636 vty_out(vty, "No functional output\n");
10637 }
10638
10639 return CMD_SUCCESS;
10640 }
10641
10642 static int bgp_show_neighbor_route(struct vty *vty, struct peer *peer,
10643 afi_t afi, safi_t safi,
10644 enum bgp_show_type type, bool use_json)
10645 {
10646 /* labeled-unicast routes live in the unicast table */
10647 if (safi == SAFI_LABELED_UNICAST)
10648 safi = SAFI_UNICAST;
10649
10650 if (!peer || !peer->afc[afi][safi]) {
10651 if (use_json) {
10652 json_object *json_no = NULL;
10653 json_no = json_object_new_object();
10654 json_object_string_add(
10655 json_no, "warning",
10656 "No such neighbor or address family");
10657 vty_out(vty, "%s\n",
10658 json_object_to_json_string(json_no));
10659 json_object_free(json_no);
10660 } else
10661 vty_out(vty, "%% No such neighbor or address family\n");
10662 return CMD_WARNING;
10663 }
10664
10665 return bgp_show(vty, peer->bgp, afi, safi, type, &peer->su, use_json);
10666 }
10667
10668 DEFUN (show_ip_bgp_flowspec_routes_detailed,
10669 show_ip_bgp_flowspec_routes_detailed_cmd,
10670 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" flowspec] detail [json]",
10671 SHOW_STR
10672 IP_STR
10673 BGP_STR
10674 BGP_INSTANCE_HELP_STR
10675 BGP_AFI_HELP_STR
10676 "SAFI Flowspec\n"
10677 "Detailed information on flowspec entries\n"
10678 JSON_STR)
10679 {
10680 afi_t afi = AFI_IP;
10681 safi_t safi = SAFI_UNICAST;
10682 struct bgp *bgp = NULL;
10683 int idx = 0;
10684 bool uj = use_json(argc, argv);
10685
10686 if (uj)
10687 argc--;
10688
10689 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
10690 &bgp, uj);
10691 if (!idx)
10692 return CMD_WARNING;
10693
10694 return bgp_show(vty, bgp, afi, safi, bgp_show_type_detail, NULL, uj);
10695 }
10696
10697 DEFUN (show_ip_bgp_neighbor_routes,
10698 show_ip_bgp_neighbor_routes_cmd,
10699 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] "
10700 "neighbors <A.B.C.D|X:X::X:X|WORD> <flap-statistics|dampened-routes|routes> [json]",
10701 SHOW_STR
10702 IP_STR
10703 BGP_STR
10704 BGP_INSTANCE_HELP_STR
10705 BGP_AFI_HELP_STR
10706 BGP_SAFI_WITH_LABEL_HELP_STR
10707 "Detailed information on TCP and BGP neighbor connections\n"
10708 "Neighbor to display information about\n"
10709 "Neighbor to display information about\n"
10710 "Neighbor on BGP configured interface\n"
10711 "Display flap statistics of the routes learned from neighbor\n"
10712 "Display the dampened routes received from neighbor\n"
10713 "Display routes learned from neighbor\n"
10714 JSON_STR)
10715 {
10716 char *peerstr = NULL;
10717 struct bgp *bgp = NULL;
10718 afi_t afi = AFI_IP6;
10719 safi_t safi = SAFI_UNICAST;
10720 struct peer *peer;
10721 enum bgp_show_type sh_type = bgp_show_type_neighbor;
10722 int idx = 0;
10723 bool uj = use_json(argc, argv);
10724
10725 if (uj)
10726 argc--;
10727
10728 bgp_vty_find_and_parse_afi_safi_bgp(vty, argv, argc, &idx, &afi, &safi,
10729 &bgp, uj);
10730 if (!idx)
10731 return CMD_WARNING;
10732
10733 /* neighbors <A.B.C.D|X:X::X:X|WORD> */
10734 argv_find(argv, argc, "neighbors", &idx);
10735 peerstr = argv[++idx]->arg;
10736
10737 peer = peer_lookup_in_view(vty, bgp, peerstr, uj);
10738 if (!peer)
10739 return CMD_WARNING;
10740
10741 if (argv_find(argv, argc, "flap-statistics", &idx))
10742 sh_type = bgp_show_type_flap_neighbor;
10743 else if (argv_find(argv, argc, "dampened-routes", &idx))
10744 sh_type = bgp_show_type_damp_neighbor;
10745 else if (argv_find(argv, argc, "routes", &idx))
10746 sh_type = bgp_show_type_neighbor;
10747
10748 return bgp_show_neighbor_route(vty, peer, afi, safi, sh_type, uj);
10749 }
10750
10751 struct bgp_table *bgp_distance_table[AFI_MAX][SAFI_MAX];
10752
10753 struct bgp_distance {
10754 /* Distance value for the IP source prefix. */
10755 uint8_t distance;
10756
10757 /* Name of the access-list to be matched. */
10758 char *access_list;
10759 };
10760
10761 DEFUN (show_bgp_afi_vpn_rd_route,
10762 show_bgp_afi_vpn_rd_route_cmd,
10763 "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]",
10764 SHOW_STR
10765 BGP_STR
10766 BGP_AFI_HELP_STR
10767 "Address Family modifier\n"
10768 "Display information for a route distinguisher\n"
10769 "Route Distinguisher\n"
10770 "Network in the BGP routing table to display\n"
10771 "Network in the BGP routing table to display\n"
10772 JSON_STR)
10773 {
10774 int ret;
10775 struct prefix_rd prd;
10776 afi_t afi = AFI_MAX;
10777 int idx = 0;
10778
10779 if (!argv_find_and_parse_afi(argv, argc, &idx, &afi)) {
10780 vty_out(vty, "%% Malformed Address Family\n");
10781 return CMD_WARNING;
10782 }
10783
10784 ret = str2prefix_rd(argv[5]->arg, &prd);
10785 if (!ret) {
10786 vty_out(vty, "%% Malformed Route Distinguisher\n");
10787 return CMD_WARNING;
10788 }
10789
10790 return bgp_show_route(vty, NULL, argv[6]->arg, afi, SAFI_MPLS_VPN, &prd,
10791 0, BGP_PATH_SHOW_ALL, use_json(argc, argv));
10792 }
10793
10794 static struct bgp_distance *bgp_distance_new(void)
10795 {
10796 return XCALLOC(MTYPE_BGP_DISTANCE, sizeof(struct bgp_distance));
10797 }
10798
10799 static void bgp_distance_free(struct bgp_distance *bdistance)
10800 {
10801 XFREE(MTYPE_BGP_DISTANCE, bdistance);
10802 }
10803
10804 static int bgp_distance_set(struct vty *vty, const char *distance_str,
10805 const char *ip_str, const char *access_list_str)
10806 {
10807 int ret;
10808 afi_t afi;
10809 safi_t safi;
10810 struct prefix p;
10811 uint8_t distance;
10812 struct bgp_node *rn;
10813 struct bgp_distance *bdistance;
10814
10815 afi = bgp_node_afi(vty);
10816 safi = bgp_node_safi(vty);
10817
10818 ret = str2prefix(ip_str, &p);
10819 if (ret == 0) {
10820 vty_out(vty, "Malformed prefix\n");
10821 return CMD_WARNING_CONFIG_FAILED;
10822 }
10823
10824 distance = atoi(distance_str);
10825
10826 /* Get BGP distance node. */
10827 rn = bgp_node_get(bgp_distance_table[afi][safi], (struct prefix *)&p);
10828 bdistance = bgp_distance_get_node(rn);
10829 if (bdistance)
10830 bgp_unlock_node(rn);
10831 else {
10832 bdistance = bgp_distance_new();
10833 bgp_distance_set_node_info(rn, bdistance);
10834 }
10835
10836 /* Set distance value. */
10837 bdistance->distance = distance;
10838
10839 /* Reset access-list configuration. */
10840 if (bdistance->access_list) {
10841 XFREE(MTYPE_AS_LIST, bdistance->access_list);
10842 bdistance->access_list = NULL;
10843 }
10844 if (access_list_str)
10845 bdistance->access_list =
10846 XSTRDUP(MTYPE_AS_LIST, access_list_str);
10847
10848 return CMD_SUCCESS;
10849 }
10850
10851 static int bgp_distance_unset(struct vty *vty, const char *distance_str,
10852 const char *ip_str, const char *access_list_str)
10853 {
10854 int ret;
10855 afi_t afi;
10856 safi_t safi;
10857 struct prefix p;
10858 int distance;
10859 struct bgp_node *rn;
10860 struct bgp_distance *bdistance;
10861
10862 afi = bgp_node_afi(vty);
10863 safi = bgp_node_safi(vty);
10864
10865 ret = str2prefix(ip_str, &p);
10866 if (ret == 0) {
10867 vty_out(vty, "Malformed prefix\n");
10868 return CMD_WARNING_CONFIG_FAILED;
10869 }
10870
10871 rn = bgp_node_lookup(bgp_distance_table[afi][safi],
10872 (struct prefix *)&p);
10873 if (!rn) {
10874 vty_out(vty, "Can't find specified prefix\n");
10875 return CMD_WARNING_CONFIG_FAILED;
10876 }
10877
10878 bdistance = bgp_distance_get_node(rn);
10879 distance = atoi(distance_str);
10880
10881 if (bdistance->distance != distance) {
10882 vty_out(vty, "Distance does not match configured\n");
10883 return CMD_WARNING_CONFIG_FAILED;
10884 }
10885
10886 if (bdistance->access_list)
10887 XFREE(MTYPE_AS_LIST, bdistance->access_list);
10888 bgp_distance_free(bdistance);
10889
10890 rn->info = NULL;
10891 bgp_unlock_node(rn);
10892 bgp_unlock_node(rn);
10893
10894 return CMD_SUCCESS;
10895 }
10896
10897 /* Apply BGP information to distance method. */
10898 uint8_t bgp_distance_apply(struct prefix *p, struct bgp_path_info *pinfo,
10899 afi_t afi, safi_t safi, struct bgp *bgp)
10900 {
10901 struct bgp_node *rn;
10902 struct prefix q;
10903 struct peer *peer;
10904 struct bgp_distance *bdistance;
10905 struct access_list *alist;
10906 struct bgp_static *bgp_static;
10907
10908 if (!bgp)
10909 return 0;
10910
10911 peer = pinfo->peer;
10912
10913 /* Check source address. */
10914 sockunion2hostprefix(&peer->su, &q);
10915 rn = bgp_node_match(bgp_distance_table[afi][safi], &q);
10916 if (rn) {
10917 bdistance = bgp_distance_get_node(rn);
10918 bgp_unlock_node(rn);
10919
10920 if (bdistance->access_list) {
10921 alist = access_list_lookup(afi, bdistance->access_list);
10922 if (alist
10923 && access_list_apply(alist, p) == FILTER_PERMIT)
10924 return bdistance->distance;
10925 } else
10926 return bdistance->distance;
10927 }
10928
10929 /* Backdoor check. */
10930 rn = bgp_node_lookup(bgp->route[afi][safi], p);
10931 if (rn) {
10932 bgp_static = bgp_static_get_node_info(rn);
10933 bgp_unlock_node(rn);
10934
10935 if (bgp_static->backdoor) {
10936 if (bgp->distance_local[afi][safi])
10937 return bgp->distance_local[afi][safi];
10938 else
10939 return ZEBRA_IBGP_DISTANCE_DEFAULT;
10940 }
10941 }
10942
10943 if (peer->sort == BGP_PEER_EBGP) {
10944 if (bgp->distance_ebgp[afi][safi])
10945 return bgp->distance_ebgp[afi][safi];
10946 return ZEBRA_EBGP_DISTANCE_DEFAULT;
10947 } else {
10948 if (bgp->distance_ibgp[afi][safi])
10949 return bgp->distance_ibgp[afi][safi];
10950 return ZEBRA_IBGP_DISTANCE_DEFAULT;
10951 }
10952 }
10953
10954 DEFUN (bgp_distance,
10955 bgp_distance_cmd,
10956 "distance bgp (1-255) (1-255) (1-255)",
10957 "Define an administrative distance\n"
10958 "BGP distance\n"
10959 "Distance for routes external to the AS\n"
10960 "Distance for routes internal to the AS\n"
10961 "Distance for local routes\n")
10962 {
10963 VTY_DECLVAR_CONTEXT(bgp, bgp);
10964 int idx_number = 2;
10965 int idx_number_2 = 3;
10966 int idx_number_3 = 4;
10967 afi_t afi;
10968 safi_t safi;
10969
10970 afi = bgp_node_afi(vty);
10971 safi = bgp_node_safi(vty);
10972
10973 bgp->distance_ebgp[afi][safi] = atoi(argv[idx_number]->arg);
10974 bgp->distance_ibgp[afi][safi] = atoi(argv[idx_number_2]->arg);
10975 bgp->distance_local[afi][safi] = atoi(argv[idx_number_3]->arg);
10976 return CMD_SUCCESS;
10977 }
10978
10979 DEFUN (no_bgp_distance,
10980 no_bgp_distance_cmd,
10981 "no distance bgp [(1-255) (1-255) (1-255)]",
10982 NO_STR
10983 "Define an administrative distance\n"
10984 "BGP distance\n"
10985 "Distance for routes external to the AS\n"
10986 "Distance for routes internal to the AS\n"
10987 "Distance for local routes\n")
10988 {
10989 VTY_DECLVAR_CONTEXT(bgp, bgp);
10990 afi_t afi;
10991 safi_t safi;
10992
10993 afi = bgp_node_afi(vty);
10994 safi = bgp_node_safi(vty);
10995
10996 bgp->distance_ebgp[afi][safi] = 0;
10997 bgp->distance_ibgp[afi][safi] = 0;
10998 bgp->distance_local[afi][safi] = 0;
10999 return CMD_SUCCESS;
11000 }
11001
11002
11003 DEFUN (bgp_distance_source,
11004 bgp_distance_source_cmd,
11005 "distance (1-255) A.B.C.D/M",
11006 "Define an administrative distance\n"
11007 "Administrative distance\n"
11008 "IP source prefix\n")
11009 {
11010 int idx_number = 1;
11011 int idx_ipv4_prefixlen = 2;
11012 bgp_distance_set(vty, argv[idx_number]->arg,
11013 argv[idx_ipv4_prefixlen]->arg, NULL);
11014 return CMD_SUCCESS;
11015 }
11016
11017 DEFUN (no_bgp_distance_source,
11018 no_bgp_distance_source_cmd,
11019 "no distance (1-255) A.B.C.D/M",
11020 NO_STR
11021 "Define an administrative distance\n"
11022 "Administrative distance\n"
11023 "IP source prefix\n")
11024 {
11025 int idx_number = 2;
11026 int idx_ipv4_prefixlen = 3;
11027 bgp_distance_unset(vty, argv[idx_number]->arg,
11028 argv[idx_ipv4_prefixlen]->arg, NULL);
11029 return CMD_SUCCESS;
11030 }
11031
11032 DEFUN (bgp_distance_source_access_list,
11033 bgp_distance_source_access_list_cmd,
11034 "distance (1-255) A.B.C.D/M WORD",
11035 "Define an administrative distance\n"
11036 "Administrative distance\n"
11037 "IP source prefix\n"
11038 "Access list name\n")
11039 {
11040 int idx_number = 1;
11041 int idx_ipv4_prefixlen = 2;
11042 int idx_word = 3;
11043 bgp_distance_set(vty, argv[idx_number]->arg,
11044 argv[idx_ipv4_prefixlen]->arg, argv[idx_word]->arg);
11045 return CMD_SUCCESS;
11046 }
11047
11048 DEFUN (no_bgp_distance_source_access_list,
11049 no_bgp_distance_source_access_list_cmd,
11050 "no distance (1-255) A.B.C.D/M WORD",
11051 NO_STR
11052 "Define an administrative distance\n"
11053 "Administrative distance\n"
11054 "IP source prefix\n"
11055 "Access list name\n")
11056 {
11057 int idx_number = 2;
11058 int idx_ipv4_prefixlen = 3;
11059 int idx_word = 4;
11060 bgp_distance_unset(vty, argv[idx_number]->arg,
11061 argv[idx_ipv4_prefixlen]->arg, argv[idx_word]->arg);
11062 return CMD_SUCCESS;
11063 }
11064
11065 DEFUN (ipv6_bgp_distance_source,
11066 ipv6_bgp_distance_source_cmd,
11067 "distance (1-255) X:X::X:X/M",
11068 "Define an administrative distance\n"
11069 "Administrative distance\n"
11070 "IP source prefix\n")
11071 {
11072 bgp_distance_set(vty, argv[1]->arg, argv[2]->arg, NULL);
11073 return CMD_SUCCESS;
11074 }
11075
11076 DEFUN (no_ipv6_bgp_distance_source,
11077 no_ipv6_bgp_distance_source_cmd,
11078 "no distance (1-255) X:X::X:X/M",
11079 NO_STR
11080 "Define an administrative distance\n"
11081 "Administrative distance\n"
11082 "IP source prefix\n")
11083 {
11084 bgp_distance_unset(vty, argv[2]->arg, argv[3]->arg, NULL);
11085 return CMD_SUCCESS;
11086 }
11087
11088 DEFUN (ipv6_bgp_distance_source_access_list,
11089 ipv6_bgp_distance_source_access_list_cmd,
11090 "distance (1-255) X:X::X:X/M WORD",
11091 "Define an administrative distance\n"
11092 "Administrative distance\n"
11093 "IP source prefix\n"
11094 "Access list name\n")
11095 {
11096 bgp_distance_set(vty, argv[1]->arg, argv[2]->arg, argv[3]->arg);
11097 return CMD_SUCCESS;
11098 }
11099
11100 DEFUN (no_ipv6_bgp_distance_source_access_list,
11101 no_ipv6_bgp_distance_source_access_list_cmd,
11102 "no distance (1-255) X:X::X:X/M WORD",
11103 NO_STR
11104 "Define an administrative distance\n"
11105 "Administrative distance\n"
11106 "IP source prefix\n"
11107 "Access list name\n")
11108 {
11109 bgp_distance_unset(vty, argv[2]->arg, argv[3]->arg, argv[4]->arg);
11110 return CMD_SUCCESS;
11111 }
11112
11113 DEFUN (bgp_damp_set,
11114 bgp_damp_set_cmd,
11115 "bgp dampening [(1-45) [(1-20000) (1-20000) (1-255)]]",
11116 "BGP Specific commands\n"
11117 "Enable route-flap dampening\n"
11118 "Half-life time for the penalty\n"
11119 "Value to start reusing a route\n"
11120 "Value to start suppressing a route\n"
11121 "Maximum duration to suppress a stable route\n")
11122 {
11123 VTY_DECLVAR_CONTEXT(bgp, bgp);
11124 int idx_half_life = 2;
11125 int idx_reuse = 3;
11126 int idx_suppress = 4;
11127 int idx_max_suppress = 5;
11128 int half = DEFAULT_HALF_LIFE * 60;
11129 int reuse = DEFAULT_REUSE;
11130 int suppress = DEFAULT_SUPPRESS;
11131 int max = 4 * half;
11132
11133 if (argc == 6) {
11134 half = atoi(argv[idx_half_life]->arg) * 60;
11135 reuse = atoi(argv[idx_reuse]->arg);
11136 suppress = atoi(argv[idx_suppress]->arg);
11137 max = atoi(argv[idx_max_suppress]->arg) * 60;
11138 } else if (argc == 3) {
11139 half = atoi(argv[idx_half_life]->arg) * 60;
11140 max = 4 * half;
11141 }
11142
11143 if (suppress < reuse) {
11144 vty_out(vty,
11145 "Suppress value cannot be less than reuse value \n");
11146 return 0;
11147 }
11148
11149 return bgp_damp_enable(bgp, bgp_node_afi(vty), bgp_node_safi(vty), half,
11150 reuse, suppress, max);
11151 }
11152
11153 DEFUN (bgp_damp_unset,
11154 bgp_damp_unset_cmd,
11155 "no bgp dampening [(1-45) [(1-20000) (1-20000) (1-255)]]",
11156 NO_STR
11157 "BGP Specific commands\n"
11158 "Enable route-flap dampening\n"
11159 "Half-life time for the penalty\n"
11160 "Value to start reusing a route\n"
11161 "Value to start suppressing a route\n"
11162 "Maximum duration to suppress a stable route\n")
11163 {
11164 VTY_DECLVAR_CONTEXT(bgp, bgp);
11165 return bgp_damp_disable(bgp, bgp_node_afi(vty), bgp_node_safi(vty));
11166 }
11167
11168 /* Display specified route of BGP table. */
11169 static int bgp_clear_damp_route(struct vty *vty, const char *view_name,
11170 const char *ip_str, afi_t afi, safi_t safi,
11171 struct prefix_rd *prd, int prefix_check)
11172 {
11173 int ret;
11174 struct prefix match;
11175 struct bgp_node *rn;
11176 struct bgp_node *rm;
11177 struct bgp_path_info *pi;
11178 struct bgp_path_info *pi_temp;
11179 struct bgp *bgp;
11180 struct bgp_table *table;
11181
11182 /* BGP structure lookup. */
11183 if (view_name) {
11184 bgp = bgp_lookup_by_name(view_name);
11185 if (bgp == NULL) {
11186 vty_out(vty, "%% Can't find BGP instance %s\n",
11187 view_name);
11188 return CMD_WARNING;
11189 }
11190 } else {
11191 bgp = bgp_get_default();
11192 if (bgp == NULL) {
11193 vty_out(vty, "%% No BGP process is configured\n");
11194 return CMD_WARNING;
11195 }
11196 }
11197
11198 /* Check IP address argument. */
11199 ret = str2prefix(ip_str, &match);
11200 if (!ret) {
11201 vty_out(vty, "%% address is malformed\n");
11202 return CMD_WARNING;
11203 }
11204
11205 match.family = afi2family(afi);
11206
11207 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_ENCAP)
11208 || (safi == SAFI_EVPN)) {
11209 for (rn = bgp_table_top(bgp->rib[AFI_IP][safi]); rn;
11210 rn = bgp_route_next(rn)) {
11211 if (prd && memcmp(rn->p.u.val, prd->val, 8) != 0)
11212 continue;
11213 if ((table = rn->info) == NULL)
11214 continue;
11215 if ((rm = bgp_node_match(table, &match)) == NULL)
11216 continue;
11217
11218 if (!prefix_check
11219 || rm->p.prefixlen == match.prefixlen) {
11220 pi = rm->info;
11221 while (pi) {
11222 if (pi->extra && pi->extra->damp_info) {
11223 pi_temp = pi->next;
11224 bgp_damp_info_free(
11225 pi->extra->damp_info,
11226 1);
11227 pi = pi_temp;
11228 } else
11229 pi = pi->next;
11230 }
11231 }
11232
11233 bgp_unlock_node(rm);
11234 }
11235 } else {
11236 if ((rn = bgp_node_match(bgp->rib[afi][safi], &match))
11237 != NULL) {
11238 if (!prefix_check
11239 || rn->p.prefixlen == match.prefixlen) {
11240 pi = rn->info;
11241 while (pi) {
11242 if (pi->extra && pi->extra->damp_info) {
11243 pi_temp = pi->next;
11244 bgp_damp_info_free(
11245 pi->extra->damp_info,
11246 1);
11247 pi = pi_temp;
11248 } else
11249 pi = pi->next;
11250 }
11251 }
11252
11253 bgp_unlock_node(rn);
11254 }
11255 }
11256
11257 return CMD_SUCCESS;
11258 }
11259
11260 DEFUN (clear_ip_bgp_dampening,
11261 clear_ip_bgp_dampening_cmd,
11262 "clear ip bgp dampening",
11263 CLEAR_STR
11264 IP_STR
11265 BGP_STR
11266 "Clear route flap dampening information\n")
11267 {
11268 bgp_damp_info_clean();
11269 return CMD_SUCCESS;
11270 }
11271
11272 DEFUN (clear_ip_bgp_dampening_prefix,
11273 clear_ip_bgp_dampening_prefix_cmd,
11274 "clear ip bgp dampening A.B.C.D/M",
11275 CLEAR_STR
11276 IP_STR
11277 BGP_STR
11278 "Clear route flap dampening information\n"
11279 "IPv4 prefix\n")
11280 {
11281 int idx_ipv4_prefixlen = 4;
11282 return bgp_clear_damp_route(vty, NULL, argv[idx_ipv4_prefixlen]->arg,
11283 AFI_IP, SAFI_UNICAST, NULL, 1);
11284 }
11285
11286 DEFUN (clear_ip_bgp_dampening_address,
11287 clear_ip_bgp_dampening_address_cmd,
11288 "clear ip bgp dampening A.B.C.D",
11289 CLEAR_STR
11290 IP_STR
11291 BGP_STR
11292 "Clear route flap dampening information\n"
11293 "Network to clear damping information\n")
11294 {
11295 int idx_ipv4 = 4;
11296 return bgp_clear_damp_route(vty, NULL, argv[idx_ipv4]->arg, AFI_IP,
11297 SAFI_UNICAST, NULL, 0);
11298 }
11299
11300 DEFUN (clear_ip_bgp_dampening_address_mask,
11301 clear_ip_bgp_dampening_address_mask_cmd,
11302 "clear ip bgp dampening A.B.C.D A.B.C.D",
11303 CLEAR_STR
11304 IP_STR
11305 BGP_STR
11306 "Clear route flap dampening information\n"
11307 "Network to clear damping information\n"
11308 "Network mask\n")
11309 {
11310 int idx_ipv4 = 4;
11311 int idx_ipv4_2 = 5;
11312 int ret;
11313 char prefix_str[BUFSIZ];
11314
11315 ret = netmask_str2prefix_str(argv[idx_ipv4]->arg, argv[idx_ipv4_2]->arg,
11316 prefix_str);
11317 if (!ret) {
11318 vty_out(vty, "%% Inconsistent address and mask\n");
11319 return CMD_WARNING;
11320 }
11321
11322 return bgp_clear_damp_route(vty, NULL, prefix_str, AFI_IP, SAFI_UNICAST,
11323 NULL, 0);
11324 }
11325
11326 static void show_bgp_peerhash_entry(struct hash_backet *backet, void *arg)
11327 {
11328 struct vty *vty = arg;
11329 struct peer *peer = backet->data;
11330 char buf[SU_ADDRSTRLEN];
11331
11332 vty_out(vty, "\tPeer: %s %s\n", peer->host,
11333 sockunion2str(&peer->su, buf, sizeof(buf)));
11334 }
11335
11336 DEFUN (show_bgp_peerhash,
11337 show_bgp_peerhash_cmd,
11338 "show bgp peerhash",
11339 SHOW_STR
11340 BGP_STR
11341 "Display information about the BGP peerhash\n")
11342 {
11343 struct list *instances = bm->bgp;
11344 struct listnode *node;
11345 struct bgp *bgp;
11346
11347 for (ALL_LIST_ELEMENTS_RO(instances, node, bgp)) {
11348 vty_out(vty, "BGP: %s\n", bgp->name);
11349 hash_iterate(bgp->peerhash, show_bgp_peerhash_entry,
11350 vty);
11351 }
11352
11353 return CMD_SUCCESS;
11354 }
11355
11356 /* also used for encap safi */
11357 static void bgp_config_write_network_vpn(struct vty *vty, struct bgp *bgp,
11358 afi_t afi, safi_t safi)
11359 {
11360 struct bgp_node *prn;
11361 struct bgp_node *rn;
11362 struct bgp_table *table;
11363 struct prefix *p;
11364 struct prefix_rd *prd;
11365 struct bgp_static *bgp_static;
11366 mpls_label_t label;
11367 char buf[SU_ADDRSTRLEN];
11368 char rdbuf[RD_ADDRSTRLEN];
11369
11370 /* Network configuration. */
11371 for (prn = bgp_table_top(bgp->route[afi][safi]); prn;
11372 prn = bgp_route_next(prn)) {
11373 if ((table = prn->info) == NULL)
11374 continue;
11375
11376 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn)) {
11377 bgp_static = bgp_static_get_node_info(rn);
11378 if (bgp_static == NULL)
11379 continue;
11380
11381 p = &rn->p;
11382 prd = (struct prefix_rd *)&prn->p;
11383
11384 /* "network" configuration display. */
11385 prefix_rd2str(prd, rdbuf, sizeof(rdbuf));
11386 label = decode_label(&bgp_static->label);
11387
11388 vty_out(vty, " network %s/%d rd %s",
11389 inet_ntop(p->family, &p->u.prefix, buf,
11390 SU_ADDRSTRLEN),
11391 p->prefixlen, rdbuf);
11392 if (safi == SAFI_MPLS_VPN)
11393 vty_out(vty, " label %u", label);
11394
11395 if (bgp_static->rmap.name)
11396 vty_out(vty, " route-map %s",
11397 bgp_static->rmap.name);
11398
11399 if (bgp_static->backdoor)
11400 vty_out(vty, " backdoor");
11401
11402 vty_out(vty, "\n");
11403 }
11404 }
11405 }
11406
11407 static void bgp_config_write_network_evpn(struct vty *vty, struct bgp *bgp,
11408 afi_t afi, safi_t safi)
11409 {
11410 struct bgp_node *prn;
11411 struct bgp_node *rn;
11412 struct bgp_table *table;
11413 struct prefix *p;
11414 struct prefix_rd *prd;
11415 struct bgp_static *bgp_static;
11416 char buf[PREFIX_STRLEN * 2];
11417 char buf2[SU_ADDRSTRLEN];
11418 char rdbuf[RD_ADDRSTRLEN];
11419
11420 /* Network configuration. */
11421 for (prn = bgp_table_top(bgp->route[afi][safi]); prn;
11422 prn = bgp_route_next(prn)) {
11423 if ((table = prn->info) == NULL)
11424 continue;
11425
11426 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn)) {
11427 bgp_static = bgp_static_get_node_info(rn);
11428 if (bgp_static == NULL)
11429 continue;
11430
11431 char *macrouter = NULL;
11432 char *esi = NULL;
11433
11434 if (bgp_static->router_mac)
11435 macrouter = prefix_mac2str(
11436 bgp_static->router_mac, NULL, 0);
11437 if (bgp_static->eth_s_id)
11438 esi = esi2str(bgp_static->eth_s_id);
11439 p = &rn->p;
11440 prd = (struct prefix_rd *)&prn->p;
11441
11442 /* "network" configuration display. */
11443 prefix_rd2str(prd, rdbuf, sizeof(rdbuf));
11444 if (p->u.prefix_evpn.route_type == 5) {
11445 char local_buf[PREFIX_STRLEN];
11446 uint8_t family = is_evpn_prefix_ipaddr_v4((
11447 struct prefix_evpn *)p)
11448 ? AF_INET
11449 : AF_INET6;
11450 inet_ntop(family,
11451 &p->u.prefix_evpn.prefix_addr.ip.ip.addr,
11452 local_buf, PREFIX_STRLEN);
11453 sprintf(buf, "%s/%u", local_buf,
11454 p->u.prefix_evpn.prefix_addr.ip_prefix_length);
11455 } else {
11456 prefix2str(p, buf, sizeof(buf));
11457 }
11458
11459 if (bgp_static->gatewayIp.family == AF_INET
11460 || bgp_static->gatewayIp.family == AF_INET6)
11461 inet_ntop(bgp_static->gatewayIp.family,
11462 &bgp_static->gatewayIp.u.prefix, buf2,
11463 sizeof(buf2));
11464 vty_out(vty,
11465 " network %s rd %s ethtag %u label %u esi %s gwip %s routermac %s\n",
11466 buf, rdbuf,
11467 p->u.prefix_evpn.prefix_addr.eth_tag,
11468 decode_label(&bgp_static->label), esi, buf2,
11469 macrouter);
11470
11471 if (macrouter)
11472 XFREE(MTYPE_TMP, macrouter);
11473 if (esi)
11474 XFREE(MTYPE_TMP, esi);
11475 }
11476 }
11477 }
11478
11479 /* Configuration of static route announcement and aggregate
11480 information. */
11481 void bgp_config_write_network(struct vty *vty, struct bgp *bgp, afi_t afi,
11482 safi_t safi)
11483 {
11484 struct bgp_node *rn;
11485 struct prefix *p;
11486 struct bgp_static *bgp_static;
11487 struct bgp_aggregate *bgp_aggregate;
11488 char buf[SU_ADDRSTRLEN];
11489
11490 if ((safi == SAFI_MPLS_VPN) || (safi == SAFI_ENCAP)) {
11491 bgp_config_write_network_vpn(vty, bgp, afi, safi);
11492 return;
11493 }
11494
11495 if (afi == AFI_L2VPN && safi == SAFI_EVPN) {
11496 bgp_config_write_network_evpn(vty, bgp, afi, safi);
11497 return;
11498 }
11499
11500 /* Network configuration. */
11501 for (rn = bgp_table_top(bgp->route[afi][safi]); rn;
11502 rn = bgp_route_next(rn)) {
11503 bgp_static = bgp_static_get_node_info(rn);
11504 if (bgp_static == NULL)
11505 continue;
11506
11507 p = &rn->p;
11508
11509 /* "network" configuration display. */
11510 if (bgp_option_check(BGP_OPT_CONFIG_CISCO) && afi == AFI_IP) {
11511 uint32_t destination;
11512 struct in_addr netmask;
11513
11514 destination = ntohl(p->u.prefix4.s_addr);
11515 masklen2ip(p->prefixlen, &netmask);
11516 vty_out(vty, " network %s",
11517 inet_ntop(p->family, &p->u.prefix, buf,
11518 SU_ADDRSTRLEN));
11519
11520 if ((IN_CLASSC(destination) && p->prefixlen == 24)
11521 || (IN_CLASSB(destination) && p->prefixlen == 16)
11522 || (IN_CLASSA(destination) && p->prefixlen == 8)
11523 || p->u.prefix4.s_addr == 0) {
11524 /* Natural mask is not display. */
11525 } else
11526 vty_out(vty, " mask %s", inet_ntoa(netmask));
11527 } else {
11528 vty_out(vty, " network %s/%d",
11529 inet_ntop(p->family, &p->u.prefix, buf,
11530 SU_ADDRSTRLEN),
11531 p->prefixlen);
11532 }
11533
11534 if (bgp_static->label_index != BGP_INVALID_LABEL_INDEX)
11535 vty_out(vty, " label-index %u",
11536 bgp_static->label_index);
11537
11538 if (bgp_static->rmap.name)
11539 vty_out(vty, " route-map %s", bgp_static->rmap.name);
11540
11541 if (bgp_static->backdoor)
11542 vty_out(vty, " backdoor");
11543
11544 vty_out(vty, "\n");
11545 }
11546
11547 /* Aggregate-address configuration. */
11548 for (rn = bgp_table_top(bgp->aggregate[afi][safi]); rn;
11549 rn = bgp_route_next(rn)) {
11550 bgp_aggregate = bgp_aggregate_get_node_info(rn);
11551 if (bgp_aggregate == NULL)
11552 continue;
11553
11554 p = &rn->p;
11555
11556 if (bgp_option_check(BGP_OPT_CONFIG_CISCO) && afi == AFI_IP) {
11557 struct in_addr netmask;
11558
11559 masklen2ip(p->prefixlen, &netmask);
11560 vty_out(vty, " aggregate-address %s %s",
11561 inet_ntop(p->family, &p->u.prefix, buf,
11562 SU_ADDRSTRLEN),
11563 inet_ntoa(netmask));
11564 } else {
11565 vty_out(vty, " aggregate-address %s/%d",
11566 inet_ntop(p->family, &p->u.prefix, buf,
11567 SU_ADDRSTRLEN),
11568 p->prefixlen);
11569 }
11570
11571 if (bgp_aggregate->as_set)
11572 vty_out(vty, " as-set");
11573
11574 if (bgp_aggregate->summary_only)
11575 vty_out(vty, " summary-only");
11576
11577 vty_out(vty, "\n");
11578 }
11579 }
11580
11581 void bgp_config_write_distance(struct vty *vty, struct bgp *bgp, afi_t afi,
11582 safi_t safi)
11583 {
11584 struct bgp_node *rn;
11585 struct bgp_distance *bdistance;
11586
11587 /* Distance configuration. */
11588 if (bgp->distance_ebgp[afi][safi] && bgp->distance_ibgp[afi][safi]
11589 && bgp->distance_local[afi][safi]
11590 && (bgp->distance_ebgp[afi][safi] != ZEBRA_EBGP_DISTANCE_DEFAULT
11591 || bgp->distance_ibgp[afi][safi] != ZEBRA_IBGP_DISTANCE_DEFAULT
11592 || bgp->distance_local[afi][safi]
11593 != ZEBRA_IBGP_DISTANCE_DEFAULT)) {
11594 vty_out(vty, " distance bgp %d %d %d\n",
11595 bgp->distance_ebgp[afi][safi],
11596 bgp->distance_ibgp[afi][safi],
11597 bgp->distance_local[afi][safi]);
11598 }
11599
11600 for (rn = bgp_table_top(bgp_distance_table[afi][safi]); rn;
11601 rn = bgp_route_next(rn)) {
11602 bdistance = bgp_distance_get_node(rn);
11603 if (bdistance != NULL) {
11604 char buf[PREFIX_STRLEN];
11605
11606 vty_out(vty, " distance %d %s %s\n",
11607 bdistance->distance,
11608 prefix2str(&rn->p, buf, sizeof(buf)),
11609 bdistance->access_list ? bdistance->access_list
11610 : "");
11611 }
11612 }
11613 }
11614
11615 /* Allocate routing table structure and install commands. */
11616 void bgp_route_init(void)
11617 {
11618 afi_t afi;
11619 safi_t safi;
11620
11621 /* Init BGP distance table. */
11622 FOREACH_AFI_SAFI (afi, safi)
11623 bgp_distance_table[afi][safi] = bgp_table_init(NULL, afi, safi);
11624
11625 /* IPv4 BGP commands. */
11626 install_element(BGP_NODE, &bgp_table_map_cmd);
11627 install_element(BGP_NODE, &bgp_network_cmd);
11628 install_element(BGP_NODE, &no_bgp_table_map_cmd);
11629
11630 install_element(BGP_NODE, &aggregate_address_cmd);
11631 install_element(BGP_NODE, &aggregate_address_mask_cmd);
11632 install_element(BGP_NODE, &no_aggregate_address_cmd);
11633 install_element(BGP_NODE, &no_aggregate_address_mask_cmd);
11634
11635 /* IPv4 unicast configuration. */
11636 install_element(BGP_IPV4_NODE, &bgp_table_map_cmd);
11637 install_element(BGP_IPV4_NODE, &bgp_network_cmd);
11638 install_element(BGP_IPV4_NODE, &no_bgp_table_map_cmd);
11639
11640 install_element(BGP_IPV4_NODE, &aggregate_address_cmd);
11641 install_element(BGP_IPV4_NODE, &aggregate_address_mask_cmd);
11642 install_element(BGP_IPV4_NODE, &no_aggregate_address_cmd);
11643 install_element(BGP_IPV4_NODE, &no_aggregate_address_mask_cmd);
11644
11645 /* IPv4 multicast configuration. */
11646 install_element(BGP_IPV4M_NODE, &bgp_table_map_cmd);
11647 install_element(BGP_IPV4M_NODE, &bgp_network_cmd);
11648 install_element(BGP_IPV4M_NODE, &no_bgp_table_map_cmd);
11649 install_element(BGP_IPV4M_NODE, &aggregate_address_cmd);
11650 install_element(BGP_IPV4M_NODE, &aggregate_address_mask_cmd);
11651 install_element(BGP_IPV4M_NODE, &no_aggregate_address_cmd);
11652 install_element(BGP_IPV4M_NODE, &no_aggregate_address_mask_cmd);
11653
11654 /* IPv4 labeled-unicast configuration. */
11655 install_element(VIEW_NODE, &show_ip_bgp_instance_all_cmd);
11656 install_element(VIEW_NODE, &show_ip_bgp_cmd);
11657 install_element(VIEW_NODE, &show_ip_bgp_json_cmd);
11658 install_element(VIEW_NODE, &show_ip_bgp_route_cmd);
11659 install_element(VIEW_NODE, &show_ip_bgp_regexp_cmd);
11660
11661 install_element(VIEW_NODE,
11662 &show_ip_bgp_instance_neighbor_advertised_route_cmd);
11663 install_element(VIEW_NODE, &show_ip_bgp_neighbor_routes_cmd);
11664 install_element(VIEW_NODE,
11665 &show_ip_bgp_neighbor_received_prefix_filter_cmd);
11666 #ifdef KEEP_OLD_VPN_COMMANDS
11667 install_element(VIEW_NODE, &show_ip_bgp_vpn_all_route_prefix_cmd);
11668 #endif /* KEEP_OLD_VPN_COMMANDS */
11669 install_element(VIEW_NODE, &show_bgp_afi_vpn_rd_route_cmd);
11670 install_element(VIEW_NODE,
11671 &show_ip_bgp_l2vpn_evpn_all_route_prefix_cmd);
11672
11673 /* BGP dampening clear commands */
11674 install_element(ENABLE_NODE, &clear_ip_bgp_dampening_cmd);
11675 install_element(ENABLE_NODE, &clear_ip_bgp_dampening_prefix_cmd);
11676
11677 install_element(ENABLE_NODE, &clear_ip_bgp_dampening_address_cmd);
11678 install_element(ENABLE_NODE, &clear_ip_bgp_dampening_address_mask_cmd);
11679
11680 /* prefix count */
11681 install_element(ENABLE_NODE,
11682 &show_ip_bgp_instance_neighbor_prefix_counts_cmd);
11683 #ifdef KEEP_OLD_VPN_COMMANDS
11684 install_element(ENABLE_NODE,
11685 &show_ip_bgp_vpn_neighbor_prefix_counts_cmd);
11686 #endif /* KEEP_OLD_VPN_COMMANDS */
11687
11688 /* New config IPv6 BGP commands. */
11689 install_element(BGP_IPV6_NODE, &bgp_table_map_cmd);
11690 install_element(BGP_IPV6_NODE, &ipv6_bgp_network_cmd);
11691 install_element(BGP_IPV6_NODE, &no_bgp_table_map_cmd);
11692
11693 install_element(BGP_IPV6_NODE, &ipv6_aggregate_address_cmd);
11694 install_element(BGP_IPV6_NODE, &no_ipv6_aggregate_address_cmd);
11695
11696 install_element(BGP_IPV6M_NODE, &ipv6_bgp_network_cmd);
11697
11698 install_element(BGP_NODE, &bgp_distance_cmd);
11699 install_element(BGP_NODE, &no_bgp_distance_cmd);
11700 install_element(BGP_NODE, &bgp_distance_source_cmd);
11701 install_element(BGP_NODE, &no_bgp_distance_source_cmd);
11702 install_element(BGP_NODE, &bgp_distance_source_access_list_cmd);
11703 install_element(BGP_NODE, &no_bgp_distance_source_access_list_cmd);
11704 install_element(BGP_IPV4_NODE, &bgp_distance_cmd);
11705 install_element(BGP_IPV4_NODE, &no_bgp_distance_cmd);
11706 install_element(BGP_IPV4_NODE, &bgp_distance_source_cmd);
11707 install_element(BGP_IPV4_NODE, &no_bgp_distance_source_cmd);
11708 install_element(BGP_IPV4_NODE, &bgp_distance_source_access_list_cmd);
11709 install_element(BGP_IPV4_NODE, &no_bgp_distance_source_access_list_cmd);
11710 install_element(BGP_IPV4M_NODE, &bgp_distance_cmd);
11711 install_element(BGP_IPV4M_NODE, &no_bgp_distance_cmd);
11712 install_element(BGP_IPV4M_NODE, &bgp_distance_source_cmd);
11713 install_element(BGP_IPV4M_NODE, &no_bgp_distance_source_cmd);
11714 install_element(BGP_IPV4M_NODE, &bgp_distance_source_access_list_cmd);
11715 install_element(BGP_IPV4M_NODE,
11716 &no_bgp_distance_source_access_list_cmd);
11717 install_element(BGP_IPV6_NODE, &bgp_distance_cmd);
11718 install_element(BGP_IPV6_NODE, &no_bgp_distance_cmd);
11719 install_element(BGP_IPV6_NODE, &ipv6_bgp_distance_source_cmd);
11720 install_element(BGP_IPV6_NODE, &no_ipv6_bgp_distance_source_cmd);
11721 install_element(BGP_IPV6_NODE,
11722 &ipv6_bgp_distance_source_access_list_cmd);
11723 install_element(BGP_IPV6_NODE,
11724 &no_ipv6_bgp_distance_source_access_list_cmd);
11725 install_element(BGP_IPV6M_NODE, &bgp_distance_cmd);
11726 install_element(BGP_IPV6M_NODE, &no_bgp_distance_cmd);
11727 install_element(BGP_IPV6M_NODE, &ipv6_bgp_distance_source_cmd);
11728 install_element(BGP_IPV6M_NODE, &no_ipv6_bgp_distance_source_cmd);
11729 install_element(BGP_IPV6M_NODE,
11730 &ipv6_bgp_distance_source_access_list_cmd);
11731 install_element(BGP_IPV6M_NODE,
11732 &no_ipv6_bgp_distance_source_access_list_cmd);
11733
11734 install_element(BGP_NODE, &bgp_damp_set_cmd);
11735 install_element(BGP_NODE, &bgp_damp_unset_cmd);
11736 install_element(BGP_IPV4_NODE, &bgp_damp_set_cmd);
11737 install_element(BGP_IPV4_NODE, &bgp_damp_unset_cmd);
11738
11739 /* IPv4 Multicast Mode */
11740 install_element(BGP_IPV4M_NODE, &bgp_damp_set_cmd);
11741 install_element(BGP_IPV4M_NODE, &bgp_damp_unset_cmd);
11742
11743 /* Large Communities */
11744 install_element(VIEW_NODE, &show_ip_bgp_large_community_list_cmd);
11745 install_element(VIEW_NODE, &show_ip_bgp_large_community_cmd);
11746
11747 /* show bgp ipv4 flowspec detailed */
11748 install_element(VIEW_NODE, &show_ip_bgp_flowspec_routes_detailed_cmd);
11749
11750 install_element(VIEW_NODE, &show_bgp_peerhash_cmd);
11751 }
11752
11753 void bgp_route_finish(void)
11754 {
11755 afi_t afi;
11756 safi_t safi;
11757
11758 FOREACH_AFI_SAFI (afi, safi) {
11759 bgp_table_unlock(bgp_distance_table[afi][safi]);
11760 bgp_distance_table[afi][safi] = NULL;
11761 }
11762 }
FRRouting mirror