]> git.proxmox.com Git - mirror_frr.git/blame - bgpd/bgp_vty.c
projects / mirror_frr.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
bgpd: Fixes for VRF route leaking
[mirror_frr.git] / bgpd / bgp_vty.c
CommitLineData
718e3744 1/* BGP VTY interface.
896014f4
DL		 2 * Copyright (C) 1996, 97, 98, 99, 2000 Kunihiro Ishiguro
3 *
4 * This file is part of GNU Zebra.
5 *
6 * GNU Zebra is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU General Public License as published by the
8 * Free Software Foundation; either version 2, or (at your option) any
9 * later version.
10 *
11 * GNU Zebra is distributed in the hope that it will be useful, but
12 * WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License along
17 * with this program; see the file COPYING; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
19 */
718e3744 20
21#include <zebra.h>
22
23#include "command.h"
afec25d9 24#include "lib/json.h"
718e3744 25#include "prefix.h"
26#include "plist.h"
27#include "buffer.h"
28#include "linklist.h"
29#include "stream.h"
30#include "thread.h"
31#include "log.h"
3b8b1855 32#include "memory.h"
fc7948fa 33#include "memory_vty.h"
4bf6a362 34#include "hash.h"
3f9c7369 35#include "queue.h"
039f3a34 36#include "filter.h"
718e3744 37
38#include "bgpd/bgpd.h"
4bf6a362 39#include "bgpd/bgp_advertise.h"
718e3744 40#include "bgpd/bgp_attr.h"
41#include "bgpd/bgp_aspath.h"
42#include "bgpd/bgp_community.h"
4bf6a362 43#include "bgpd/bgp_ecommunity.h"
57d187bc 44#include "bgpd/bgp_lcommunity.h"
4bf6a362 45#include "bgpd/bgp_damp.h"
718e3744 46#include "bgpd/bgp_debug.h"
e0701b79 47#include "bgpd/bgp_fsm.h"
4bf6a362 48#include "bgpd/bgp_nexthop.h"
718e3744 49#include "bgpd/bgp_open.h"
4bf6a362 50#include "bgpd/bgp_regex.h"
718e3744 51#include "bgpd/bgp_route.h"
c016b6c7 52#include "bgpd/bgp_mplsvpn.h"
718e3744 53#include "bgpd/bgp_zebra.h"
fee0f4c6 54#include "bgpd/bgp_table.h"
94f2b392 55#include "bgpd/bgp_vty.h"
165b5fff 56#include "bgpd/bgp_mpath.h"
cb1faec9 57#include "bgpd/bgp_packet.h"
3f9c7369 58#include "bgpd/bgp_updgrp.h"
c43ed2e4 59#include "bgpd/bgp_bfd.h"
555e09d4 60#include "bgpd/bgp_io.h"
94c2f693 61#include "bgpd/bgp_evpn.h"
718e3744 62
d62a17ae 63static struct peer_group *listen_range_exists(struct bgp *bgp,
64 struct prefix *range, int exact);
65
66static enum node_type bgp_node_type(afi_t afi, safi_t safi)
67{
68 switch (afi) {
69 case AFI_IP:
70 switch (safi) {
71 case SAFI_UNICAST:
72 return BGP_IPV4_NODE;
73 break;
74 case SAFI_MULTICAST:
75 return BGP_IPV4M_NODE;
76 break;
77 case SAFI_LABELED_UNICAST:
78 return BGP_IPV4L_NODE;
79 break;
80 case SAFI_MPLS_VPN:
81 return BGP_VPNV4_NODE;
82 break;
7c40bf39 83 case SAFI_FLOWSPEC:
84 return BGP_FLOWSPECV4_NODE;
5c525538
RW		 85 default:
86 /* not expected */
87 return BGP_IPV4_NODE;
88 break;
d62a17ae 89 }
90 break;
91 case AFI_IP6:
92 switch (safi) {
93 case SAFI_UNICAST:
94 return BGP_IPV6_NODE;
95 break;
96 case SAFI_MULTICAST:
97 return BGP_IPV6M_NODE;
98 break;
99 case SAFI_LABELED_UNICAST:
100 return BGP_IPV6L_NODE;
101 break;
102 case SAFI_MPLS_VPN:
103 return BGP_VPNV6_NODE;
104 break;
7c40bf39 105 case SAFI_FLOWSPEC:
106 return BGP_FLOWSPECV6_NODE;
5c525538
RW		 107 default:
108 /* not expected */
109 return BGP_IPV4_NODE;
110 break;
d62a17ae 111 }
112 break;
113 case AFI_L2VPN:
114 return BGP_EVPN_NODE;
115 break;
116 case AFI_MAX:
117 // We should never be here but to clarify the switch statement..
118 return BGP_IPV4_NODE;
119 break;
120 }
121
122 // Impossible to happen
123 return BGP_IPV4_NODE;
f51bae9c 124}
20eb8864 125
718e3744 126/* Utility function to get address family from current node. */
d62a17ae 127afi_t bgp_node_afi(struct vty *vty)
128{
129 afi_t afi;
130 switch (vty->node) {
131 case BGP_IPV6_NODE:
132 case BGP_IPV6M_NODE:
133 case BGP_IPV6L_NODE:
134 case BGP_VPNV6_NODE:
7c40bf39 135 case BGP_FLOWSPECV6_NODE:
d62a17ae 136 afi = AFI_IP6;
137 break;
138 case BGP_EVPN_NODE:
139 afi = AFI_L2VPN;
140 break;
141 default:
142 afi = AFI_IP;
143 break;
144 }
145 return afi;
718e3744 146}
147
148/* Utility function to get subsequent address family from current
149 node. */
d62a17ae 150safi_t bgp_node_safi(struct vty *vty)
151{
152 safi_t safi;
153 switch (vty->node) {
154 case BGP_VPNV4_NODE:
155 case BGP_VPNV6_NODE:
156 safi = SAFI_MPLS_VPN;
157 break;
158 case BGP_IPV4M_NODE:
159 case BGP_IPV6M_NODE:
160 safi = SAFI_MULTICAST;
161 break;
162 case BGP_EVPN_NODE:
163 safi = SAFI_EVPN;
164 break;
165 case BGP_IPV4L_NODE:
166 case BGP_IPV6L_NODE:
167 safi = SAFI_LABELED_UNICAST;
168 break;
7c40bf39 169 case BGP_FLOWSPECV4_NODE:
170 case BGP_FLOWSPECV6_NODE:
171 safi = SAFI_FLOWSPEC;
172 break;
d62a17ae 173 default:
174 safi = SAFI_UNICAST;
175 break;
176 }
177 return safi;
718e3744 178}
179
55f91488
QY		 180/**
181 * Converts an AFI in string form to afi_t
182 *
183 * @param afi string, one of
184 * - "ipv4"
185 * - "ipv6"
186 * @return the corresponding afi_t
187 */
d62a17ae 188afi_t bgp_vty_afi_from_str(const char *afi_str)
189{
190 afi_t afi = AFI_MAX; /* unknown */
191 if (strmatch(afi_str, "ipv4"))
192 afi = AFI_IP;
193 else if (strmatch(afi_str, "ipv6"))
194 afi = AFI_IP6;
195 return afi;
196}
197
198int argv_find_and_parse_afi(struct cmd_token **argv, int argc, int *index,
199 afi_t *afi)
200{
201 int ret = 0;
202 if (argv_find(argv, argc, "ipv4", index)) {
203 ret = 1;
204 if (afi)
205 *afi = AFI_IP;
206 } else if (argv_find(argv, argc, "ipv6", index)) {
207 ret = 1;
208 if (afi)
209 *afi = AFI_IP6;
210 }
211 return ret;
46f296b4
LB		 212}
213
375a2e67 214/* supports <unicast|multicast|vpn|labeled-unicast> */
d62a17ae 215safi_t bgp_vty_safi_from_str(const char *safi_str)
216{
217 safi_t safi = SAFI_MAX; /* unknown */
218 if (strmatch(safi_str, "multicast"))
219 safi = SAFI_MULTICAST;
220 else if (strmatch(safi_str, "unicast"))
221 safi = SAFI_UNICAST;
222 else if (strmatch(safi_str, "vpn"))
223 safi = SAFI_MPLS_VPN;
224 else if (strmatch(safi_str, "labeled-unicast"))
225 safi = SAFI_LABELED_UNICAST;
7c40bf39 226 else if (strmatch(safi_str, "flowspec"))
227 safi = SAFI_FLOWSPEC;
d62a17ae 228 return safi;
229}
230
231int argv_find_and_parse_safi(struct cmd_token **argv, int argc, int *index,
232 safi_t *safi)
233{
234 int ret = 0;
235 if (argv_find(argv, argc, "unicast", index)) {
236 ret = 1;
237 if (safi)
238 *safi = SAFI_UNICAST;
239 } else if (argv_find(argv, argc, "multicast", index)) {
240 ret = 1;
241 if (safi)
242 *safi = SAFI_MULTICAST;
243 } else if (argv_find(argv, argc, "labeled-unicast", index)) {
244 ret = 1;
245 if (safi)
246 *safi = SAFI_LABELED_UNICAST;
247 } else if (argv_find(argv, argc, "vpn", index)) {
248 ret = 1;
249 if (safi)
250 *safi = SAFI_MPLS_VPN;
7c40bf39 251 } else if (argv_find(argv, argc, "flowspec", index)) {
252 ret = 1;
253 if (safi)
254 *safi = SAFI_FLOWSPEC;
d62a17ae 255 }
256 return ret;
46f296b4
LB		 257}
258
7eeee51e 259/*
f212a857 260 * bgp_vty_find_and_parse_afi_safi_bgp
7eeee51e 261 *
f212a857
DS		 262 * For a given 'show ...' command, correctly parse the afi/safi/bgp out from it
263 * This function *assumes* that the calling function pre-sets the afi/safi/bgp
7eeee51e
DS		 264 * to appropriate values for the calling function. This is to allow the
265 * calling function to make decisions appropriate for the show command
266 * that is being parsed.
267 *
268 * The show commands are generally of the form:
d62a17ae 269 * "show [ip] bgp [<view|vrf> VIEWVRFNAME] [<ipv4|ipv6>
270 * [<unicast|multicast|vpn|labeled-unicast>]] ..."
7eeee51e
DS		 271 *
272 * Since we use argv_find if the show command in particular doesn't have:
273 * [ip]
18c57037 274 * [<view|vrf> VIEWVRFNAME]
375a2e67 275 * [<ipv4|ipv6> [<unicast|multicast|vpn|labeled-unicast>]]
7eeee51e
DS		 276 * The command parsing should still be ok.
277 *
278 * vty -> The vty for the command so we can output some useful data in
279 * the event of a parse error in the vrf.
280 * argv -> The command tokens
281 * argc -> How many command tokens we have
d62a17ae 282 * idx -> The current place in the command, generally should be 0 for this
283 * function
7eeee51e
DS		 284 * afi -> The parsed afi if it was included in the show command, returned here
285 * safi -> The parsed safi if it was included in the show command, returned here
f212a857 286 * bgp -> Pointer to the bgp data structure we need to fill in.
7eeee51e
DS		 287 *
288 * The function returns the correct location in the parse tree for the
289 * last token found.
0e37c258
DS		 290 *
291 * Returns 0 for failure to parse correctly, else the idx position of where
292 * it found the last token.
7eeee51e 293 */
d62a17ae 294int bgp_vty_find_and_parse_afi_safi_bgp(struct vty *vty,
295 struct cmd_token **argv, int argc,
296 int *idx, afi_t *afi, safi_t *safi,
297 struct bgp **bgp)
298{
299 char *vrf_name = NULL;
300
301 assert(afi);
302 assert(safi);
303 assert(bgp);
304
305 if (argv_find(argv, argc, "ip", idx))
306 *afi = AFI_IP;
307
308 if (argv_find(argv, argc, "view", idx)
309 || argv_find(argv, argc, "vrf", idx)) {
310 vrf_name = argv[*idx + 1]->arg;
311
312 if (strmatch(vrf_name, "all"))
313 *bgp = NULL;
314 else {
315 *bgp = bgp_lookup_by_name(vrf_name);
316 if (!*bgp) {
317 vty_out(vty,
318 "View/Vrf specified is unknown: %s\n",
319 vrf_name);
320 *idx = 0;
321 return 0;
322 }
323 }
324 } else {
325 *bgp = bgp_get_default();
326 if (!*bgp) {
327 vty_out(vty, "Unable to find default BGP instance\n");
328 *idx = 0;
329 return 0;
330 }
331 }
332
333 if (argv_find_and_parse_afi(argv, argc, idx, afi))
334 argv_find_and_parse_safi(argv, argc, idx, safi);
335
336 *idx += 1;
337 return *idx;
338}
339
340static int peer_address_self_check(struct bgp *bgp, union sockunion *su)
341{
342 struct interface *ifp = NULL;
343
344 if (su->sa.sa_family == AF_INET)
345 ifp = if_lookup_by_ipv4_exact(&su->sin.sin_addr, bgp->vrf_id);
346 else if (su->sa.sa_family == AF_INET6)
347 ifp = if_lookup_by_ipv6_exact(&su->sin6.sin6_addr,
348 su->sin6.sin6_scope_id,
349 bgp->vrf_id);
350
351 if (ifp)
352 return 1;
353
354 return 0;
718e3744 355}
356
357/* Utility function for looking up peer from VTY. */
f14e6fdb
DS		 358/* This is used only for configuration, so disallow if attempted on
359 * a dynamic neighbor.
360 */
d62a17ae 361static struct peer *peer_lookup_vty(struct vty *vty, const char *ip_str)
362{
363 struct bgp *bgp = VTY_GET_CONTEXT(bgp);
364 int ret;
365 union sockunion su;
366 struct peer *peer;
367
368 if (!bgp) {
369 return NULL;
370 }
371
372 ret = str2sockunion(ip_str, &su);
373 if (ret < 0) {
374 peer = peer_lookup_by_conf_if(bgp, ip_str);
375 if (!peer) {
376 if ((peer = peer_lookup_by_hostname(bgp, ip_str))
377 == NULL) {
378 vty_out(vty,
379 "%% Malformed address or name: %s\n",
380 ip_str);
381 return NULL;
382 }
383 }
384 } else {
385 peer = peer_lookup(bgp, &su);
386 if (!peer) {
387 vty_out(vty,
388 "%% Specify remote-as or peer-group commands first\n");
389 return NULL;
390 }
391 if (peer_dynamic_neighbor(peer)) {
392 vty_out(vty,
393 "%% Operation not allowed on a dynamic neighbor\n");
394 return NULL;
395 }
396 }
397 return peer;
718e3744 398}
399
400/* Utility function for looking up peer or peer group. */
f14e6fdb
DS		 401/* This is used only for configuration, so disallow if attempted on
402 * a dynamic neighbor.
403 */
d62a17ae 404struct peer *peer_and_group_lookup_vty(struct vty *vty, const char *peer_str)
405{
406 struct bgp *bgp = VTY_GET_CONTEXT(bgp);
407 int ret;
408 union sockunion su;
409 struct peer *peer = NULL;
410 struct peer_group *group = NULL;
411
412 if (!bgp) {
413 return NULL;
414 }
415
416 ret = str2sockunion(peer_str, &su);
417 if (ret == 0) {
418 /* IP address, locate peer. */
419 peer = peer_lookup(bgp, &su);
420 } else {
421 /* Not IP, could match either peer configured on interface or a
422 * group. */
423 peer = peer_lookup_by_conf_if(bgp, peer_str);
424 if (!peer)
425 group = peer_group_lookup(bgp, peer_str);
426 }
427
428 if (peer) {
429 if (peer_dynamic_neighbor(peer)) {
430 vty_out(vty,
431 "%% Operation not allowed on a dynamic neighbor\n");
432 return NULL;
433 }
434
435 return peer;
436 }
437
438 if (group)
439 return group->conf;
440
441 vty_out(vty, "%% Specify remote-as or peer-group commands first\n");
442
443 return NULL;
444}
445
446int bgp_vty_return(struct vty *vty, int ret)
447{
448 const char *str = NULL;
449
450 switch (ret) {
451 case BGP_ERR_INVALID_VALUE:
452 str = "Invalid value";
453 break;
454 case BGP_ERR_INVALID_FLAG:
455 str = "Invalid flag";
456 break;
457 case BGP_ERR_PEER_GROUP_SHUTDOWN:
458 str = "Peer-group has been shutdown. Activate the peer-group first";
459 break;
460 case BGP_ERR_PEER_FLAG_CONFLICT:
461 str = "Can't set override-capability and strict-capability-match at the same time";
462 break;
463 case BGP_ERR_PEER_GROUP_NO_REMOTE_AS:
464 str = "Specify remote-as or peer-group remote AS first";
465 break;
466 case BGP_ERR_PEER_GROUP_CANT_CHANGE:
467 str = "Cannot change the peer-group. Deconfigure first";
468 break;
469 case BGP_ERR_PEER_GROUP_MISMATCH:
470 str = "Peer is not a member of this peer-group";
471 break;
472 case BGP_ERR_PEER_FILTER_CONFLICT:
473 str = "Prefix/distribute list can not co-exist";
474 break;
475 case BGP_ERR_NOT_INTERNAL_PEER:
476 str = "Invalid command. Not an internal neighbor";
477 break;
478 case BGP_ERR_REMOVE_PRIVATE_AS:
479 str = "remove-private-AS cannot be configured for IBGP peers";
480 break;
481 case BGP_ERR_LOCAL_AS_ALLOWED_ONLY_FOR_EBGP:
482 str = "Local-AS allowed only for EBGP peers";
483 break;
484 case BGP_ERR_CANNOT_HAVE_LOCAL_AS_SAME_AS:
485 str = "Cannot have local-as same as BGP AS number";
486 break;
487 case BGP_ERR_TCPSIG_FAILED:
488 str = "Error while applying TCP-Sig to session(s)";
489 break;
490 case BGP_ERR_NO_EBGP_MULTIHOP_WITH_TTLHACK:
491 str = "ebgp-multihop and ttl-security cannot be configured together";
492 break;
493 case BGP_ERR_NO_IBGP_WITH_TTLHACK:
494 str = "ttl-security only allowed for EBGP peers";
495 break;
496 case BGP_ERR_AS_OVERRIDE:
497 str = "as-override cannot be configured for IBGP peers";
498 break;
499 case BGP_ERR_INVALID_DYNAMIC_NEIGHBORS_LIMIT:
500 str = "Invalid limit for number of dynamic neighbors";
501 break;
502 case BGP_ERR_DYNAMIC_NEIGHBORS_RANGE_EXISTS:
503 str = "Dynamic neighbor listen range already exists";
504 break;
505 case BGP_ERR_INVALID_FOR_DYNAMIC_PEER:
506 str = "Operation not allowed on a dynamic neighbor";
507 break;
508 case BGP_ERR_INVALID_FOR_DIRECT_PEER:
509 str = "Operation not allowed on a directly connected neighbor";
510 break;
511 case BGP_ERR_PEER_SAFI_CONFLICT:
512 str = "Cannot activate peer for both 'ipv4 unicast' and 'ipv4 labeled-unicast'";
513 break;
514 }
515 if (str) {
516 vty_out(vty, "%% %s\n", str);
517 return CMD_WARNING_CONFIG_FAILED;
518 }
519 return CMD_SUCCESS;
718e3744 520}
521
7aafcaca 522/* BGP clear sort. */
d62a17ae 523enum clear_sort {
524 clear_all,
525 clear_peer,
526 clear_group,
527 clear_external,
528 clear_as
7aafcaca
DS		 529};
530
d62a17ae 531static void bgp_clear_vty_error(struct vty *vty, struct peer *peer, afi_t afi,
532 safi_t safi, int error)
533{
534 switch (error) {
535 case BGP_ERR_AF_UNCONFIGURED:
536 vty_out(vty,
537 "%%BGP: Enable %s address family for the neighbor %s\n",
538 afi_safi_print(afi, safi), peer->host);
539 break;
540 case BGP_ERR_SOFT_RECONFIG_UNCONFIGURED:
541 vty_out(vty,
542 "%%BGP: Inbound soft reconfig for %s not possible as it\n has neither refresh capability, nor inbound soft reconfig\n",
543 peer->host);
544 break;
545 default:
546 break;
547 }
7aafcaca
DS		 548}
549
550/* `clear ip bgp' functions. */
d62a17ae 551static int bgp_clear(struct vty *vty, struct bgp *bgp, afi_t afi, safi_t safi,
552 enum clear_sort sort, enum bgp_clear_type stype,
553 const char *arg)
554{
555 int ret;
556 struct peer *peer;
557 struct listnode *node, *nnode;
558
559 /* Clear all neighbors. */
560 /*
561 * Pass along pointer to next node to peer_clear() when walking all
562 * nodes
563 * on the BGP instance as that may get freed if it is a doppelganger
564 */
565 if (sort == clear_all) {
566 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
567 if (stype == BGP_CLEAR_SOFT_NONE)
568 ret = peer_clear(peer, &nnode);
569 else if (peer->afc[afi][safi])
570 ret = peer_clear_soft(peer, afi, safi, stype);
571 else
572 ret = 0;
573
574 if (ret < 0)
575 bgp_clear_vty_error(vty, peer, afi, safi, ret);
04b6bdc0 576 }
d62a17ae 577
578 /* This is to apply read-only mode on this clear. */
579 if (stype == BGP_CLEAR_SOFT_NONE)
580 bgp->update_delay_over = 0;
581
582 return CMD_SUCCESS;
7aafcaca
DS		 583 }
584
d62a17ae 585 /* Clear specified neighbors. */
586 if (sort == clear_peer) {
587 union sockunion su;
588 int ret;
589
590 /* Make sockunion for lookup. */
591 ret = str2sockunion(arg, &su);
592 if (ret < 0) {
593 peer = peer_lookup_by_conf_if(bgp, arg);
594 if (!peer) {
595 peer = peer_lookup_by_hostname(bgp, arg);
596 if (!peer) {
597 vty_out(vty,
598 "Malformed address or name: %s\n",
599 arg);
600 return CMD_WARNING;
601 }
602 }
603 } else {
604 peer = peer_lookup(bgp, &su);
605 if (!peer) {
606 vty_out(vty,
607 "%%BGP: Unknown neighbor - \"%s\"\n",
608 arg);
609 return CMD_WARNING;
610 }
611 }
7aafcaca 612
d62a17ae 613 if (stype == BGP_CLEAR_SOFT_NONE)
614 ret = peer_clear(peer, NULL);
615 else
616 ret = peer_clear_soft(peer, afi, safi, stype);
7aafcaca 617
d62a17ae 618 if (ret < 0)
619 bgp_clear_vty_error(vty, peer, afi, safi, ret);
7aafcaca 620
d62a17ae 621 return CMD_SUCCESS;
7aafcaca 622 }
7aafcaca 623
d62a17ae 624 /* Clear all peer-group members. */
625 if (sort == clear_group) {
626 struct peer_group *group;
7aafcaca 627
d62a17ae 628 group = peer_group_lookup(bgp, arg);
629 if (!group) {
630 vty_out(vty, "%%BGP: No such peer-group %s\n", arg);
631 return CMD_WARNING;
632 }
633
634 for (ALL_LIST_ELEMENTS(group->peer, node, nnode, peer)) {
635 if (stype == BGP_CLEAR_SOFT_NONE) {
636 peer_clear(peer, NULL);
637 continue;
638 }
639
640 if (!peer->afc[afi][safi])
641 continue;
642
643 ret = peer_clear_soft(peer, afi, safi, stype);
7aafcaca 644
d62a17ae 645 if (ret < 0)
646 bgp_clear_vty_error(vty, peer, afi, safi, ret);
647 }
648 return CMD_SUCCESS;
7aafcaca 649 }
7aafcaca 650
d62a17ae 651 if (sort == clear_external) {
652 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
653 if (peer->sort == BGP_PEER_IBGP)
654 continue;
7aafcaca 655
d62a17ae 656 if (stype == BGP_CLEAR_SOFT_NONE)
657 ret = peer_clear(peer, &nnode);
658 else
659 ret = peer_clear_soft(peer, afi, safi, stype);
7aafcaca 660
d62a17ae 661 if (ret < 0)
662 bgp_clear_vty_error(vty, peer, afi, safi, ret);
663 }
664 return CMD_SUCCESS;
665 }
666
667 if (sort == clear_as) {
668 as_t as;
669 int find = 0;
670
671 as = strtoul(arg, NULL, 10);
672
673 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
674 if (peer->as != as)
675 continue;
676
677 find = 1;
678 if (stype == BGP_CLEAR_SOFT_NONE)
679 ret = peer_clear(peer, &nnode);
680 else
681 ret = peer_clear_soft(peer, afi, safi, stype);
682
683 if (ret < 0)
684 bgp_clear_vty_error(vty, peer, afi, safi, ret);
685 }
686 if (!find)
687 vty_out(vty,
688 "%%BGP: No peer is configured with AS %s\n",
689 arg);
690 return CMD_SUCCESS;
691 }
692
693 return CMD_SUCCESS;
694}
695
696static int bgp_clear_vty(struct vty *vty, const char *name, afi_t afi,
697 safi_t safi, enum clear_sort sort,
698 enum bgp_clear_type stype, const char *arg)
699{
700 struct bgp *bgp;
701
702 /* BGP structure lookup. */
703 if (name) {
704 bgp = bgp_lookup_by_name(name);
705 if (bgp == NULL) {
706 vty_out(vty, "Can't find BGP instance %s\n", name);
707 return CMD_WARNING;
708 }
709 } else {
710 bgp = bgp_get_default();
711 if (bgp == NULL) {
712 vty_out(vty, "No BGP process is configured\n");
713 return CMD_WARNING;
714 }
715 }
716
717 return bgp_clear(vty, bgp, afi, safi, sort, stype, arg);
7aafcaca
DS		 718}
719
720/* clear soft inbound */
d62a17ae 721static void bgp_clear_star_soft_in(struct vty *vty, const char *name)
7aafcaca 722{
d62a17ae 723 bgp_clear_vty(vty, name, AFI_IP, SAFI_UNICAST, clear_all,
724 BGP_CLEAR_SOFT_IN, NULL);
725 bgp_clear_vty(vty, name, AFI_IP6, SAFI_UNICAST, clear_all,
726 BGP_CLEAR_SOFT_IN, NULL);
7aafcaca
DS		 727}
728
729/* clear soft outbound */
d62a17ae 730static void bgp_clear_star_soft_out(struct vty *vty, const char *name)
7aafcaca 731{
d62a17ae 732 bgp_clear_vty(vty, name, AFI_IP, SAFI_UNICAST, clear_all,
733 BGP_CLEAR_SOFT_OUT, NULL);
734 bgp_clear_vty(vty, name, AFI_IP6, SAFI_UNICAST, clear_all,
735 BGP_CLEAR_SOFT_OUT, NULL);
7aafcaca
DS		 736}
737
738
f787d7a0 739#ifndef VTYSH_EXTRACT_PL
2e4c2296 740#include "bgpd/bgp_vty_clippy.c"
f787d7a0
DL		 741#endif
742
718e3744 743/* BGP global configuration. */
744
745DEFUN (bgp_multiple_instance_func,
746 bgp_multiple_instance_cmd,
747 "bgp multiple-instance",
748 BGP_STR
749 "Enable bgp multiple instance\n")
750{
d62a17ae 751 bgp_option_set(BGP_OPT_MULTIPLE_INSTANCE);
752 return CMD_SUCCESS;
718e3744 753}
754
755DEFUN (no_bgp_multiple_instance,
756 no_bgp_multiple_instance_cmd,
757 "no bgp multiple-instance",
758 NO_STR
759 BGP_STR
760 "BGP multiple instance\n")
761{
d62a17ae 762 int ret;
718e3744 763
d62a17ae 764 ret = bgp_option_unset(BGP_OPT_MULTIPLE_INSTANCE);
765 if (ret < 0) {
766 vty_out(vty, "%% There are more than two BGP instances\n");
767 return CMD_WARNING_CONFIG_FAILED;
768 }
769 return CMD_SUCCESS;
718e3744 770}
771
772DEFUN (bgp_config_type,
773 bgp_config_type_cmd,
6147e2c6 774 "bgp config-type <cisco|zebra>",
718e3744 775 BGP_STR
776 "Configuration type\n"
777 "cisco\n"
778 "zebra\n")
779{
d62a17ae 780 int idx = 0;
781 if (argv_find(argv, argc, "cisco", &idx))
782 bgp_option_set(BGP_OPT_CONFIG_CISCO);
783 else
784 bgp_option_unset(BGP_OPT_CONFIG_CISCO);
718e3744 785
d62a17ae 786 return CMD_SUCCESS;
718e3744 787}
788
789DEFUN (no_bgp_config_type,
790 no_bgp_config_type_cmd,
c7178fe7 791 "no bgp config-type [<cisco|zebra>]",
718e3744 792 NO_STR
793 BGP_STR
838758ac
DW		 794 "Display configuration type\n"
795 "cisco\n"
796 "zebra\n")
718e3744 797{
d62a17ae 798 bgp_option_unset(BGP_OPT_CONFIG_CISCO);
799 return CMD_SUCCESS;
718e3744 800}
801
813d4307 802
718e3744 803DEFUN (no_synchronization,
804 no_synchronization_cmd,
805 "no synchronization",
806 NO_STR
807 "Perform IGP synchronization\n")
808{
d62a17ae 809 return CMD_SUCCESS;
718e3744 810}
811
812DEFUN (no_auto_summary,
813 no_auto_summary_cmd,
814 "no auto-summary",
815 NO_STR
816 "Enable automatic network number summarization\n")
817{
d62a17ae 818 return CMD_SUCCESS;
718e3744 819}
3d515fd9 820
718e3744 821/* "router bgp" commands. */
505e5056 822DEFUN_NOSH (router_bgp,
f412b39a 823 router_bgp_cmd,
18c57037 824 "router bgp [(1-4294967295) [<view|vrf> VIEWVRFNAME]]",
718e3744 825 ROUTER_STR
826 BGP_STR
31500417
DW		 827 AS_STR
828 BGP_INSTANCE_HELP_STR)
718e3744 829{
d62a17ae 830 int idx_asn = 2;
831 int idx_view_vrf = 3;
832 int idx_vrf = 4;
833 int ret;
834 as_t as;
835 struct bgp *bgp;
836 const char *name = NULL;
837 enum bgp_instance_type inst_type;
838
839 // "router bgp" without an ASN
840 if (argc == 2) {
841 // Pending: Make VRF option available for ASN less config
842 bgp = bgp_get_default();
843
844 if (bgp == NULL) {
845 vty_out(vty, "%% No BGP process is configured\n");
846 return CMD_WARNING_CONFIG_FAILED;
847 }
848
849 if (listcount(bm->bgp) > 1) {
996c9314 850 vty_out(vty, "%% Please specify ASN and VRF\n");
d62a17ae 851 return CMD_WARNING_CONFIG_FAILED;
852 }
853 }
854
855 // "router bgp X"
856 else {
857 as = strtoul(argv[idx_asn]->arg, NULL, 10);
858
859 inst_type = BGP_INSTANCE_TYPE_DEFAULT;
860 if (argc > 3) {
861 name = argv[idx_vrf]->arg;
862
863 if (!strcmp(argv[idx_view_vrf]->text, "vrf"))
864 inst_type = BGP_INSTANCE_TYPE_VRF;
865 else if (!strcmp(argv[idx_view_vrf]->text, "view"))
866 inst_type = BGP_INSTANCE_TYPE_VIEW;
867 }
868
869 ret = bgp_get(&bgp, &as, name, inst_type);
870 switch (ret) {
871 case BGP_ERR_MULTIPLE_INSTANCE_NOT_SET:
872 vty_out(vty,
873 "Please specify 'bgp multiple-instance' first\n");
874 return CMD_WARNING_CONFIG_FAILED;
875 case BGP_ERR_AS_MISMATCH:
876 vty_out(vty, "BGP is already running; AS is %u\n", as);
877 return CMD_WARNING_CONFIG_FAILED;
878 case BGP_ERR_INSTANCE_MISMATCH:
879 vty_out(vty,
880 "BGP instance name and AS number mismatch\n");
881 vty_out(vty,
882 "BGP instance is already running; AS is %u\n",
883 as);
884 return CMD_WARNING_CONFIG_FAILED;
885 }
886
887 /* Pending: handle when user tries to change a view to vrf n vv.
888 */
889 }
890
0b5131c9
MK		 891 /* unset the auto created flag as the user config is now present */
892 UNSET_FLAG(bgp->vrf_flags, BGP_VRF_AUTO);
d62a17ae 893 VTY_PUSH_CONTEXT(BGP_NODE, bgp);
894
895 return CMD_SUCCESS;
718e3744 896}
897
718e3744 898/* "no router bgp" commands. */
899DEFUN (no_router_bgp,
900 no_router_bgp_cmd,
18c57037 901 "no router bgp [(1-4294967295) [<view|vrf> VIEWVRFNAME]]",
718e3744 902 NO_STR
903 ROUTER_STR
904 BGP_STR
31500417
DW		 905 AS_STR
906 BGP_INSTANCE_HELP_STR)
718e3744 907{
d62a17ae 908 int idx_asn = 3;
909 int idx_vrf = 5;
910 as_t as;
911 struct bgp *bgp;
912 const char *name = NULL;
718e3744 913
d62a17ae 914 // "no router bgp" without an ASN
915 if (argc == 3) {
916 // Pending: Make VRF option available for ASN less config
917 bgp = bgp_get_default();
718e3744 918
d62a17ae 919 if (bgp == NULL) {
920 vty_out(vty, "%% No BGP process is configured\n");
921 return CMD_WARNING_CONFIG_FAILED;
922 }
7fb21a9f 923
d62a17ae 924 if (listcount(bm->bgp) > 1) {
996c9314 925 vty_out(vty, "%% Please specify ASN and VRF\n");
d62a17ae 926 return CMD_WARNING_CONFIG_FAILED;
927 }
0b5131c9
MK		 928
929 if (bgp->l3vni) {
930 vty_out(vty, "%% Please unconfigure l3vni %u",
931 bgp->l3vni);
932 return CMD_WARNING_CONFIG_FAILED;
933 }
d62a17ae 934 } else {
935 as = strtoul(argv[idx_asn]->arg, NULL, 10);
7fb21a9f 936
d62a17ae 937 if (argc > 4)
938 name = argv[idx_vrf]->arg;
7fb21a9f 939
d62a17ae 940 /* Lookup bgp structure. */
941 bgp = bgp_lookup(as, name);
942 if (!bgp) {
943 vty_out(vty, "%% Can't find BGP instance\n");
944 return CMD_WARNING_CONFIG_FAILED;
945 }
0b5131c9
MK		 946
947 if (bgp->l3vni) {
948 vty_out(vty, "%% Please unconfigure l3vni %u",
949 bgp->l3vni);
950 return CMD_WARNING_CONFIG_FAILED;
951 }
d62a17ae 952 }
718e3744 953
d62a17ae 954 bgp_delete(bgp);
718e3744 955
d62a17ae 956 return CMD_SUCCESS;
718e3744 957}
958
6b0655a2 959
718e3744 960/* BGP router-id. */
961
f787d7a0 962DEFPY (bgp_router_id,
718e3744 963 bgp_router_id_cmd,
964 "bgp router-id A.B.C.D",
965 BGP_STR
966 "Override configured router identifier\n"
967 "Manually configured router identifier\n")
968{
d62a17ae 969 VTY_DECLVAR_CONTEXT(bgp, bgp);
970 bgp_router_id_static_set(bgp, router_id);
971 return CMD_SUCCESS;
718e3744 972}
973
f787d7a0 974DEFPY (no_bgp_router_id,
718e3744 975 no_bgp_router_id_cmd,
31500417 976 "no bgp router-id [A.B.C.D]",
718e3744 977 NO_STR
978 BGP_STR
31500417
DW		 979 "Override configured router identifier\n"
980 "Manually configured router identifier\n")
718e3744 981{
d62a17ae 982 VTY_DECLVAR_CONTEXT(bgp, bgp);
718e3744 983
d62a17ae 984 if (router_id_str) {
985 if (!IPV4_ADDR_SAME(&bgp->router_id_static, &router_id)) {
986 vty_out(vty, "%% BGP router-id doesn't match\n");
987 return CMD_WARNING_CONFIG_FAILED;
988 }
e018c7cc 989 }
718e3744 990
d62a17ae 991 router_id.s_addr = 0;
992 bgp_router_id_static_set(bgp, router_id);
718e3744 993
d62a17ae 994 return CMD_SUCCESS;
718e3744 995}
996
6b0655a2 997
718e3744 998/* BGP Cluster ID. */
718e3744 999DEFUN (bgp_cluster_id,
1000 bgp_cluster_id_cmd,
838758ac 1001 "bgp cluster-id <A.B.C.D|(1-4294967295)>",
718e3744 1002 BGP_STR
1003 "Configure Route-Reflector Cluster-id\n"
838758ac
DW		 1004 "Route-Reflector Cluster-id in IP address format\n"
1005 "Route-Reflector Cluster-id as 32 bit quantity\n")
718e3744 1006{
d62a17ae 1007 VTY_DECLVAR_CONTEXT(bgp, bgp);
1008 int idx_ipv4 = 2;
1009 int ret;
1010 struct in_addr cluster;
718e3744 1011
d62a17ae 1012 ret = inet_aton(argv[idx_ipv4]->arg, &cluster);
1013 if (!ret) {
1014 vty_out(vty, "%% Malformed bgp cluster identifier\n");
1015 return CMD_WARNING_CONFIG_FAILED;
1016 }
718e3744 1017
d62a17ae 1018 bgp_cluster_id_set(bgp, &cluster);
1019 bgp_clear_star_soft_out(vty, bgp->name);
718e3744 1020
d62a17ae 1021 return CMD_SUCCESS;
718e3744 1022}
1023
718e3744 1024DEFUN (no_bgp_cluster_id,
1025 no_bgp_cluster_id_cmd,
c7178fe7 1026 "no bgp cluster-id [<A.B.C.D|(1-4294967295)>]",
718e3744 1027 NO_STR
1028 BGP_STR
838758ac
DW		 1029 "Configure Route-Reflector Cluster-id\n"
1030 "Route-Reflector Cluster-id in IP address format\n"
1031 "Route-Reflector Cluster-id as 32 bit quantity\n")
718e3744 1032{
d62a17ae 1033 VTY_DECLVAR_CONTEXT(bgp, bgp);
1034 bgp_cluster_id_unset(bgp);
1035 bgp_clear_star_soft_out(vty, bgp->name);
718e3744 1036
d62a17ae 1037 return CMD_SUCCESS;
718e3744 1038}
1039
718e3744 1040DEFUN (bgp_confederation_identifier,
1041 bgp_confederation_identifier_cmd,
9ccf14f7 1042 "bgp confederation identifier (1-4294967295)",
718e3744 1043 "BGP specific commands\n"
1044 "AS confederation parameters\n"
1045 "AS number\n"
1046 "Set routing domain confederation AS\n")
1047{
d62a17ae 1048 VTY_DECLVAR_CONTEXT(bgp, bgp);
1049 int idx_number = 3;
1050 as_t as;
718e3744 1051
d62a17ae 1052 as = strtoul(argv[idx_number]->arg, NULL, 10);
718e3744 1053
d62a17ae 1054 bgp_confederation_id_set(bgp, as);
718e3744 1055
d62a17ae 1056 return CMD_SUCCESS;
718e3744 1057}
1058
1059DEFUN (no_bgp_confederation_identifier,
1060 no_bgp_confederation_identifier_cmd,
838758ac 1061 "no bgp confederation identifier [(1-4294967295)]",
718e3744 1062 NO_STR
1063 "BGP specific commands\n"
1064 "AS confederation parameters\n"
3a2d747c
QY		 1065 "AS number\n"
1066 "Set routing domain confederation AS\n")
718e3744 1067{
d62a17ae 1068 VTY_DECLVAR_CONTEXT(bgp, bgp);
1069 bgp_confederation_id_unset(bgp);
718e3744 1070
d62a17ae 1071 return CMD_SUCCESS;
718e3744 1072}
1073
718e3744 1074DEFUN (bgp_confederation_peers,
1075 bgp_confederation_peers_cmd,
12dcf78e 1076 "bgp confederation peers (1-4294967295)...",
718e3744 1077 "BGP specific commands\n"
1078 "AS confederation parameters\n"
1079 "Peer ASs in BGP confederation\n"
1080 AS_STR)
1081{
d62a17ae 1082 VTY_DECLVAR_CONTEXT(bgp, bgp);
1083 int idx_asn = 3;
1084 as_t as;
1085 int i;
718e3744 1086
d62a17ae 1087 for (i = idx_asn; i < argc; i++) {
1088 as = strtoul(argv[i]->arg, NULL, 10);
718e3744 1089
d62a17ae 1090 if (bgp->as == as) {
1091 vty_out(vty,
1092 "%% Local member-AS not allowed in confed peer list\n");
1093 continue;
1094 }
718e3744 1095
d62a17ae 1096 bgp_confederation_peers_add(bgp, as);
1097 }
1098 return CMD_SUCCESS;
718e3744 1099}
1100
1101DEFUN (no_bgp_confederation_peers,
1102 no_bgp_confederation_peers_cmd,
e83a9414 1103 "no bgp confederation peers (1-4294967295)...",
718e3744 1104 NO_STR
1105 "BGP specific commands\n"
1106 "AS confederation parameters\n"
1107 "Peer ASs in BGP confederation\n"
1108 AS_STR)
1109{
d62a17ae 1110 VTY_DECLVAR_CONTEXT(bgp, bgp);
1111 int idx_asn = 4;
1112 as_t as;
1113 int i;
718e3744 1114
d62a17ae 1115 for (i = idx_asn; i < argc; i++) {
1116 as = strtoul(argv[i]->arg, NULL, 10);
0b2aa3a0 1117
d62a17ae 1118 bgp_confederation_peers_remove(bgp, as);
1119 }
1120 return CMD_SUCCESS;
718e3744 1121}
6b0655a2 1122
5e242b0d
DS		 1123/**
1124 * Central routine for maximum-paths configuration.
1125 * @peer_type: BGP_PEER_EBGP or BGP_PEER_IBGP
1126 * @set: 1 for setting values, 0 for removing the max-paths config.
1127 */
d62a17ae 1128static int bgp_maxpaths_config_vty(struct vty *vty, int peer_type,
d7c0a89a 1129 const char *mpaths, uint16_t options,
d62a17ae 1130 int set)
1131{
1132 VTY_DECLVAR_CONTEXT(bgp, bgp);
d7c0a89a 1133 uint16_t maxpaths = 0;
d62a17ae 1134 int ret;
1135 afi_t afi;
1136 safi_t safi;
1137
1138 afi = bgp_node_afi(vty);
1139 safi = bgp_node_safi(vty);
1140
1141 if (set) {
1142 maxpaths = strtol(mpaths, NULL, 10);
1143 if (maxpaths > multipath_num) {
1144 vty_out(vty,
1145 "%% Maxpaths Specified: %d is > than multipath num specified on bgp command line %d",
1146 maxpaths, multipath_num);
1147 return CMD_WARNING_CONFIG_FAILED;
1148 }
1149 ret = bgp_maximum_paths_set(bgp, afi, safi, peer_type, maxpaths,
1150 options);
1151 } else
1152 ret = bgp_maximum_paths_unset(bgp, afi, safi, peer_type);
1153
1154 if (ret < 0) {
1155 vty_out(vty,
1156 "%% Failed to %sset maximum-paths %s %u for afi %u, safi %u\n",
1157 (set == 1) ? "" : "un",
1158 (peer_type == BGP_PEER_EBGP) ? "ebgp" : "ibgp",
1159 maxpaths, afi, safi);
1160 return CMD_WARNING_CONFIG_FAILED;
1161 }
1162
1163 bgp_recalculate_all_bestpaths(bgp);
1164
1165 return CMD_SUCCESS;
165b5fff
JB		 1166}
1167
abc920f8
DS		 1168DEFUN (bgp_maxmed_admin,
1169 bgp_maxmed_admin_cmd,
1170 "bgp max-med administrative ",
1171 BGP_STR
1172 "Advertise routes with max-med\n"
1173 "Administratively applied, for an indefinite period\n")
1174{
d62a17ae 1175 VTY_DECLVAR_CONTEXT(bgp, bgp);
abc920f8 1176
d62a17ae 1177 bgp->v_maxmed_admin = 1;
1178 bgp->maxmed_admin_value = BGP_MAXMED_VALUE_DEFAULT;
abc920f8 1179
d62a17ae 1180 bgp_maxmed_update(bgp);
abc920f8 1181
d62a17ae 1182 return CMD_SUCCESS;
abc920f8
DS		 1183}
1184
1185DEFUN (bgp_maxmed_admin_medv,
1186 bgp_maxmed_admin_medv_cmd,
4668a151 1187 "bgp max-med administrative (0-4294967295)",
abc920f8
DS		 1188 BGP_STR
1189 "Advertise routes with max-med\n"
1190 "Administratively applied, for an indefinite period\n"
1191 "Max MED value to be used\n")
1192{
d62a17ae 1193 VTY_DECLVAR_CONTEXT(bgp, bgp);
1194 int idx_number = 3;
abc920f8 1195
d62a17ae 1196 bgp->v_maxmed_admin = 1;
1197 bgp->maxmed_admin_value = strtoul(argv[idx_number]->arg, NULL, 10);
abc920f8 1198
d62a17ae 1199 bgp_maxmed_update(bgp);
abc920f8 1200
d62a17ae 1201 return CMD_SUCCESS;
abc920f8
DS		 1202}
1203
1204DEFUN (no_bgp_maxmed_admin,
1205 no_bgp_maxmed_admin_cmd,
4668a151 1206 "no bgp max-med administrative [(0-4294967295)]",
abc920f8
DS		 1207 NO_STR
1208 BGP_STR
1209 "Advertise routes with max-med\n"
838758ac
DW		 1210 "Administratively applied, for an indefinite period\n"
1211 "Max MED value to be used\n")
abc920f8 1212{
d62a17ae 1213 VTY_DECLVAR_CONTEXT(bgp, bgp);
1214 bgp->v_maxmed_admin = BGP_MAXMED_ADMIN_UNCONFIGURED;
1215 bgp->maxmed_admin_value = BGP_MAXMED_VALUE_DEFAULT;
1216 bgp_maxmed_update(bgp);
abc920f8 1217
d62a17ae 1218 return CMD_SUCCESS;
abc920f8
DS		 1219}
1220
abc920f8
DS		 1221DEFUN (bgp_maxmed_onstartup,
1222 bgp_maxmed_onstartup_cmd,
4668a151 1223 "bgp max-med on-startup (5-86400) [(0-4294967295)]",
abc920f8
DS		 1224 BGP_STR
1225 "Advertise routes with max-med\n"
1226 "Effective on a startup\n"
1227 "Time (seconds) period for max-med\n"
1228 "Max MED value to be used\n")
1229{
d62a17ae 1230 VTY_DECLVAR_CONTEXT(bgp, bgp);
1231 int idx = 0;
4668a151 1232
d62a17ae 1233 argv_find(argv, argc, "(5-86400)", &idx);
1234 bgp->v_maxmed_onstartup = strtoul(argv[idx]->arg, NULL, 10);
1235 if (argv_find(argv, argc, "(0-4294967295)", &idx))
1236 bgp->maxmed_onstartup_value = strtoul(argv[idx]->arg, NULL, 10);
1237 else
1238 bgp->maxmed_onstartup_value = BGP_MAXMED_VALUE_DEFAULT;
4668a151 1239
d62a17ae 1240 bgp_maxmed_update(bgp);
abc920f8 1241
d62a17ae 1242 return CMD_SUCCESS;
abc920f8
DS		 1243}
1244
1245DEFUN (no_bgp_maxmed_onstartup,
1246 no_bgp_maxmed_onstartup_cmd,
4668a151 1247 "no bgp max-med on-startup [(5-86400) [(0-4294967295)]]",
abc920f8
DS		 1248 NO_STR
1249 BGP_STR
1250 "Advertise routes with max-med\n"
838758ac
DW		 1251 "Effective on a startup\n"
1252 "Time (seconds) period for max-med\n"
1253 "Max MED value to be used\n")
abc920f8 1254{
d62a17ae 1255 VTY_DECLVAR_CONTEXT(bgp, bgp);
abc920f8 1256
d62a17ae 1257 /* Cancel max-med onstartup if its on */
1258 if (bgp->t_maxmed_onstartup) {
1259 THREAD_TIMER_OFF(bgp->t_maxmed_onstartup);
1260 bgp->maxmed_onstartup_over = 1;
1261 }
abc920f8 1262
d62a17ae 1263 bgp->v_maxmed_onstartup = BGP_MAXMED_ONSTARTUP_UNCONFIGURED;
1264 bgp->maxmed_onstartup_value = BGP_MAXMED_VALUE_DEFAULT;
abc920f8 1265
d62a17ae 1266 bgp_maxmed_update(bgp);
abc920f8 1267
d62a17ae 1268 return CMD_SUCCESS;
abc920f8
DS		 1269}
1270
d62a17ae 1271static int bgp_update_delay_config_vty(struct vty *vty, const char *delay,
1272 const char *wait)
f188f2c4 1273{
d62a17ae 1274 VTY_DECLVAR_CONTEXT(bgp, bgp);
d7c0a89a
QY		 1275 uint16_t update_delay;
1276 uint16_t establish_wait;
f188f2c4 1277
d62a17ae 1278 update_delay = strtoul(delay, NULL, 10);
f188f2c4 1279
d62a17ae 1280 if (!wait) /* update-delay <delay> */
1281 {
1282 bgp->v_update_delay = update_delay;
1283 bgp->v_establish_wait = bgp->v_update_delay;
1284 return CMD_SUCCESS;
1285 }
f188f2c4 1286
d62a17ae 1287 /* update-delay <delay> <establish-wait> */
1288 establish_wait = atoi(wait);
1289 if (update_delay < establish_wait) {
1290 vty_out(vty,
1291 "%%Failed: update-delay less than the establish-wait!\n");
1292 return CMD_WARNING_CONFIG_FAILED;
1293 }
f188f2c4 1294
d62a17ae 1295 bgp->v_update_delay = update_delay;
1296 bgp->v_establish_wait = establish_wait;
f188f2c4 1297
d62a17ae 1298 return CMD_SUCCESS;
f188f2c4
DS		 1299}
1300
d62a17ae 1301static int bgp_update_delay_deconfig_vty(struct vty *vty)
f188f2c4 1302{
d62a17ae 1303 VTY_DECLVAR_CONTEXT(bgp, bgp);
f188f2c4 1304
d62a17ae 1305 bgp->v_update_delay = BGP_UPDATE_DELAY_DEF;
1306 bgp->v_establish_wait = bgp->v_update_delay;
f188f2c4 1307
d62a17ae 1308 return CMD_SUCCESS;
f188f2c4
DS		 1309}
1310
2b791107 1311void bgp_config_write_update_delay(struct vty *vty, struct bgp *bgp)
f188f2c4 1312{
d62a17ae 1313 if (bgp->v_update_delay != BGP_UPDATE_DELAY_DEF) {
1314 vty_out(vty, " update-delay %d", bgp->v_update_delay);
1315 if (bgp->v_update_delay != bgp->v_establish_wait)
1316 vty_out(vty, " %d", bgp->v_establish_wait);
1317 vty_out(vty, "\n");
1318 }
f188f2c4
DS		 1319}
1320
1321
1322/* Update-delay configuration */
1323DEFUN (bgp_update_delay,
1324 bgp_update_delay_cmd,
6147e2c6 1325 "update-delay (0-3600)",
f188f2c4
DS		 1326 "Force initial delay for best-path and updates\n"
1327 "Seconds\n")
1328{
d62a17ae 1329 int idx_number = 1;
1330 return bgp_update_delay_config_vty(vty, argv[idx_number]->arg, NULL);
f188f2c4
DS		 1331}
1332
1333DEFUN (bgp_update_delay_establish_wait,
1334 bgp_update_delay_establish_wait_cmd,
6147e2c6 1335 "update-delay (0-3600) (1-3600)",
f188f2c4
DS		 1336 "Force initial delay for best-path and updates\n"
1337 "Seconds\n"
f188f2c4
DS		 1338 "Seconds\n")
1339{
d62a17ae 1340 int idx_number = 1;
1341 int idx_number_2 = 2;
1342 return bgp_update_delay_config_vty(vty, argv[idx_number]->arg,
1343 argv[idx_number_2]->arg);
f188f2c4
DS		 1344}
1345
1346/* Update-delay deconfiguration */
1347DEFUN (no_bgp_update_delay,
1348 no_bgp_update_delay_cmd,
838758ac
DW		 1349 "no update-delay [(0-3600) [(1-3600)]]",
1350 NO_STR
f188f2c4 1351 "Force initial delay for best-path and updates\n"
838758ac 1352 "Seconds\n"
7111c1a0 1353 "Seconds\n")
f188f2c4 1354{
d62a17ae 1355 return bgp_update_delay_deconfig_vty(vty);
f188f2c4
DS		 1356}
1357
5e242b0d 1358
d62a17ae 1359static int bgp_wpkt_quanta_config_vty(struct vty *vty, const char *num,
1360 char set)
cb1faec9 1361{
d62a17ae 1362 VTY_DECLVAR_CONTEXT(bgp, bgp);
cb1faec9 1363
555e09d4
QY		 1364 if (set) {
1365 uint32_t quanta = strtoul(num, NULL, 10);
1366 atomic_store_explicit(&bgp->wpkt_quanta, quanta,
1367 memory_order_relaxed);
1368 } else {
1369 atomic_store_explicit(&bgp->wpkt_quanta, BGP_WRITE_PACKET_MAX,
1370 memory_order_relaxed);
1371 }
1372
1373 return CMD_SUCCESS;
1374}
1375
1376static int bgp_rpkt_quanta_config_vty(struct vty *vty, const char *num,
1377 char set)
1378{
1379 VTY_DECLVAR_CONTEXT(bgp, bgp);
1380
1381 if (set) {
1382 uint32_t quanta = strtoul(num, NULL, 10);
1383 atomic_store_explicit(&bgp->rpkt_quanta, quanta,
1384 memory_order_relaxed);
1385 } else {
1386 atomic_store_explicit(&bgp->rpkt_quanta, BGP_READ_PACKET_MAX,
1387 memory_order_relaxed);
1388 }
cb1faec9 1389
d62a17ae 1390 return CMD_SUCCESS;
cb1faec9
DS		 1391}
1392
2b791107 1393void bgp_config_write_wpkt_quanta(struct vty *vty, struct bgp *bgp)
cb1faec9 1394{
555e09d4
QY		 1395 uint32_t quanta =
1396 atomic_load_explicit(&bgp->wpkt_quanta, memory_order_relaxed);
1397 if (quanta != BGP_WRITE_PACKET_MAX)
152456fe 1398 vty_out(vty, " write-quanta %d\n", quanta);
cb1faec9
DS		 1399}
1400
555e09d4
QY		 1401void bgp_config_write_rpkt_quanta(struct vty *vty, struct bgp *bgp)
1402{
1403 uint32_t quanta =
1404 atomic_load_explicit(&bgp->rpkt_quanta, memory_order_relaxed);
1405 if (quanta != BGP_READ_PACKET_MAX)
152456fe 1406 vty_out(vty, " read-quanta %d\n", quanta);
555e09d4 1407}
cb1faec9 1408
555e09d4 1409/* Packet quanta configuration */
cb1faec9
DS		 1410DEFUN (bgp_wpkt_quanta,
1411 bgp_wpkt_quanta_cmd,
555e09d4 1412 "write-quanta (1-10)",
cb1faec9
DS		 1413 "How many packets to write to peer socket per run\n"
1414 "Number of packets\n")
1415{
d62a17ae 1416 int idx_number = 1;
1417 return bgp_wpkt_quanta_config_vty(vty, argv[idx_number]->arg, 1);
cb1faec9
DS		 1418}
1419
cb1faec9
DS		 1420DEFUN (no_bgp_wpkt_quanta,
1421 no_bgp_wpkt_quanta_cmd,
555e09d4 1422 "no write-quanta (1-10)",
d7fa34c1 1423 NO_STR
555e09d4 1424 "How many packets to write to peer socket per I/O cycle\n"
cb1faec9
DS		 1425 "Number of packets\n")
1426{
d62a17ae 1427 int idx_number = 2;
1428 return bgp_wpkt_quanta_config_vty(vty, argv[idx_number]->arg, 0);
cb1faec9
DS		 1429}
1430
555e09d4
QY		 1431DEFUN (bgp_rpkt_quanta,
1432 bgp_rpkt_quanta_cmd,
1433 "read-quanta (1-10)",
1434 "How many packets to read from peer socket per I/O cycle\n"
1435 "Number of packets\n")
1436{
1437 int idx_number = 1;
1438 return bgp_rpkt_quanta_config_vty(vty, argv[idx_number]->arg, 1);
1439}
1440
1441DEFUN (no_bgp_rpkt_quanta,
1442 no_bgp_rpkt_quanta_cmd,
1443 "no read-quanta (1-10)",
1444 NO_STR
1445 "How many packets to read from peer socket per I/O cycle\n"
1446 "Number of packets\n")
1447{
1448 int idx_number = 2;
1449 return bgp_rpkt_quanta_config_vty(vty, argv[idx_number]->arg, 0);
1450}
1451
2b791107 1452void bgp_config_write_coalesce_time(struct vty *vty, struct bgp *bgp)
3f9c7369 1453{
37a333fe 1454 if (!bgp->heuristic_coalesce)
d62a17ae 1455 vty_out(vty, " coalesce-time %u\n", bgp->coalesce_time);
3f9c7369
DS		 1456}
1457
1458
1459DEFUN (bgp_coalesce_time,
1460 bgp_coalesce_time_cmd,
6147e2c6 1461 "coalesce-time (0-4294967295)",
3f9c7369
DS		 1462 "Subgroup coalesce timer\n"
1463 "Subgroup coalesce timer value (in ms)\n")
1464{
d62a17ae 1465 VTY_DECLVAR_CONTEXT(bgp, bgp);
4668a151 1466
d62a17ae 1467 int idx = 0;
1468 argv_find(argv, argc, "(0-4294967295)", &idx);
37a333fe 1469 bgp->heuristic_coalesce = false;
d62a17ae 1470 bgp->coalesce_time = strtoul(argv[idx]->arg, NULL, 10);
1471 return CMD_SUCCESS;
3f9c7369
DS		 1472}
1473
1474DEFUN (no_bgp_coalesce_time,
1475 no_bgp_coalesce_time_cmd,
6147e2c6 1476 "no coalesce-time (0-4294967295)",
3a2d747c 1477 NO_STR
3f9c7369
DS		 1478 "Subgroup coalesce timer\n"
1479 "Subgroup coalesce timer value (in ms)\n")
1480{
d62a17ae 1481 VTY_DECLVAR_CONTEXT(bgp, bgp);
4668a151 1482
37a333fe 1483 bgp->heuristic_coalesce = true;
d62a17ae 1484 bgp->coalesce_time = BGP_DEFAULT_SUBGROUP_COALESCE_TIME;
1485 return CMD_SUCCESS;
3f9c7369
DS		 1486}
1487
5e242b0d
DS		 1488/* Maximum-paths configuration */
1489DEFUN (bgp_maxpaths,
1490 bgp_maxpaths_cmd,
6319fd63 1491 "maximum-paths " CMD_RANGE_STR(1, MULTIPATH_NUM),
5e242b0d
DS		 1492 "Forward packets over multiple paths\n"
1493 "Number of paths\n")
1494{
d62a17ae 1495 int idx_number = 1;
1496 return bgp_maxpaths_config_vty(vty, BGP_PEER_EBGP,
1497 argv[idx_number]->arg, 0, 1);
5e242b0d
DS		 1498}
1499
d62a17ae 1500ALIAS_HIDDEN(bgp_maxpaths, bgp_maxpaths_hidden_cmd,
1501 "maximum-paths " CMD_RANGE_STR(1, MULTIPATH_NUM),
1502 "Forward packets over multiple paths\n"
1503 "Number of paths\n")
596c17ba 1504
165b5fff
JB		 1505DEFUN (bgp_maxpaths_ibgp,
1506 bgp_maxpaths_ibgp_cmd,
6319fd63 1507 "maximum-paths ibgp " CMD_RANGE_STR(1, MULTIPATH_NUM),
165b5fff
JB		 1508 "Forward packets over multiple paths\n"
1509 "iBGP-multipath\n"
1510 "Number of paths\n")
1511{
d62a17ae 1512 int idx_number = 2;
1513 return bgp_maxpaths_config_vty(vty, BGP_PEER_IBGP,
1514 argv[idx_number]->arg, 0, 1);
5e242b0d 1515}
165b5fff 1516
d62a17ae 1517ALIAS_HIDDEN(bgp_maxpaths_ibgp, bgp_maxpaths_ibgp_hidden_cmd,
1518 "maximum-paths ibgp " CMD_RANGE_STR(1, MULTIPATH_NUM),
1519 "Forward packets over multiple paths\n"
1520 "iBGP-multipath\n"
1521 "Number of paths\n")
596c17ba 1522
5e242b0d
DS		 1523DEFUN (bgp_maxpaths_ibgp_cluster,
1524 bgp_maxpaths_ibgp_cluster_cmd,
6319fd63 1525 "maximum-paths ibgp " CMD_RANGE_STR(1, MULTIPATH_NUM) " equal-cluster-length",
5e242b0d
DS		 1526 "Forward packets over multiple paths\n"
1527 "iBGP-multipath\n"
1528 "Number of paths\n"
1529 "Match the cluster length\n")
1530{
d62a17ae 1531 int idx_number = 2;
1532 return bgp_maxpaths_config_vty(
1533 vty, BGP_PEER_IBGP, argv[idx_number]->arg,
1534 BGP_FLAG_IBGP_MULTIPATH_SAME_CLUSTERLEN, 1);
165b5fff
JB		 1535}
1536
d62a17ae 1537ALIAS_HIDDEN(bgp_maxpaths_ibgp_cluster, bgp_maxpaths_ibgp_cluster_hidden_cmd,
1538 "maximum-paths ibgp " CMD_RANGE_STR(
1539 1, MULTIPATH_NUM) " equal-cluster-length",
1540 "Forward packets over multiple paths\n"
1541 "iBGP-multipath\n"
1542 "Number of paths\n"
1543 "Match the cluster length\n")
596c17ba 1544
165b5fff
JB		 1545DEFUN (no_bgp_maxpaths,
1546 no_bgp_maxpaths_cmd,
6319fd63 1547 "no maximum-paths [" CMD_RANGE_STR(1, MULTIPATH_NUM) "]",
165b5fff
JB		 1548 NO_STR
1549 "Forward packets over multiple paths\n"
1550 "Number of paths\n")
1551{
d62a17ae 1552 return bgp_maxpaths_config_vty(vty, BGP_PEER_EBGP, NULL, 0, 0);
165b5fff
JB		 1553}
1554
d62a17ae 1555ALIAS_HIDDEN(no_bgp_maxpaths, no_bgp_maxpaths_hidden_cmd,
996c9314 1556 "no maximum-paths [" CMD_RANGE_STR(1, MULTIPATH_NUM) "]", NO_STR
d62a17ae 1557 "Forward packets over multiple paths\n"
1558 "Number of paths\n")
596c17ba 1559
165b5fff
JB		 1560DEFUN (no_bgp_maxpaths_ibgp,
1561 no_bgp_maxpaths_ibgp_cmd,
6319fd63 1562 "no maximum-paths ibgp [" CMD_RANGE_STR(1, MULTIPATH_NUM) " [equal-cluster-length]]",
165b5fff
JB		 1563 NO_STR
1564 "Forward packets over multiple paths\n"
1565 "iBGP-multipath\n"
838758ac
DW		 1566 "Number of paths\n"
1567 "Match the cluster length\n")
165b5fff 1568{
d62a17ae 1569 return bgp_maxpaths_config_vty(vty, BGP_PEER_IBGP, NULL, 0, 0);
165b5fff
JB		 1570}
1571
d62a17ae 1572ALIAS_HIDDEN(no_bgp_maxpaths_ibgp, no_bgp_maxpaths_ibgp_hidden_cmd,
1573 "no maximum-paths ibgp [" CMD_RANGE_STR(
1574 1, MULTIPATH_NUM) " [equal-cluster-length]]",
1575 NO_STR
1576 "Forward packets over multiple paths\n"
1577 "iBGP-multipath\n"
1578 "Number of paths\n"
1579 "Match the cluster length\n")
596c17ba 1580
2b791107 1581void bgp_config_write_maxpaths(struct vty *vty, struct bgp *bgp, afi_t afi,
60466a63 1582 safi_t safi)
165b5fff 1583{
d62a17ae 1584 if (bgp->maxpaths[afi][safi].maxpaths_ebgp != MULTIPATH_NUM) {
d62a17ae 1585 vty_out(vty, " maximum-paths %d\n",
1586 bgp->maxpaths[afi][safi].maxpaths_ebgp);
1587 }
165b5fff 1588
d62a17ae 1589 if (bgp->maxpaths[afi][safi].maxpaths_ibgp != MULTIPATH_NUM) {
d62a17ae 1590 vty_out(vty, " maximum-paths ibgp %d",
1591 bgp->maxpaths[afi][safi].maxpaths_ibgp);
1592 if (CHECK_FLAG(bgp->maxpaths[afi][safi].ibgp_flags,
1593 BGP_FLAG_IBGP_MULTIPATH_SAME_CLUSTERLEN))
1594 vty_out(vty, " equal-cluster-length");
1595 vty_out(vty, "\n");
1596 }
165b5fff 1597}
6b0655a2 1598
718e3744 1599/* BGP timers. */
1600
1601DEFUN (bgp_timers,
1602 bgp_timers_cmd,
6147e2c6 1603 "timers bgp (0-65535) (0-65535)",
718e3744 1604 "Adjust routing timers\n"
1605 "BGP timers\n"
1606 "Keepalive interval\n"
1607 "Holdtime\n")
1608{
d62a17ae 1609 VTY_DECLVAR_CONTEXT(bgp, bgp);
1610 int idx_number = 2;
1611 int idx_number_2 = 3;
1612 unsigned long keepalive = 0;
1613 unsigned long holdtime = 0;
718e3744 1614
d62a17ae 1615 keepalive = strtoul(argv[idx_number]->arg, NULL, 10);
1616 holdtime = strtoul(argv[idx_number_2]->arg, NULL, 10);
718e3744 1617
d62a17ae 1618 /* Holdtime value check. */
1619 if (holdtime < 3 && holdtime != 0) {
1620 vty_out(vty,
1621 "%% hold time value must be either 0 or greater than 3\n");
1622 return CMD_WARNING_CONFIG_FAILED;
1623 }
718e3744 1624
d62a17ae 1625 bgp_timers_set(bgp, keepalive, holdtime);
718e3744 1626
d62a17ae 1627 return CMD_SUCCESS;
718e3744 1628}
1629
1630DEFUN (no_bgp_timers,
1631 no_bgp_timers_cmd,
838758ac 1632 "no timers bgp [(0-65535) (0-65535)]",
718e3744 1633 NO_STR
1634 "Adjust routing timers\n"
838758ac
DW		 1635 "BGP timers\n"
1636 "Keepalive interval\n"
1637 "Holdtime\n")
718e3744 1638{
d62a17ae 1639 VTY_DECLVAR_CONTEXT(bgp, bgp);
1640 bgp_timers_unset(bgp);
718e3744 1641
d62a17ae 1642 return CMD_SUCCESS;
718e3744 1643}
1644
6b0655a2 1645
718e3744 1646DEFUN (bgp_client_to_client_reflection,
1647 bgp_client_to_client_reflection_cmd,
1648 "bgp client-to-client reflection",
1649 "BGP specific commands\n"
1650 "Configure client to client route reflection\n"
1651 "reflection of routes allowed\n")
1652{
d62a17ae 1653 VTY_DECLVAR_CONTEXT(bgp, bgp);
1654 bgp_flag_unset(bgp, BGP_FLAG_NO_CLIENT_TO_CLIENT);
1655 bgp_clear_star_soft_out(vty, bgp->name);
7aafcaca 1656
d62a17ae 1657 return CMD_SUCCESS;
718e3744 1658}
1659
1660DEFUN (no_bgp_client_to_client_reflection,
1661 no_bgp_client_to_client_reflection_cmd,
1662 "no bgp client-to-client reflection",
1663 NO_STR
1664 "BGP specific commands\n"
1665 "Configure client to client route reflection\n"
1666 "reflection of routes allowed\n")
1667{
d62a17ae 1668 VTY_DECLVAR_CONTEXT(bgp, bgp);
1669 bgp_flag_set(bgp, BGP_FLAG_NO_CLIENT_TO_CLIENT);
1670 bgp_clear_star_soft_out(vty, bgp->name);
7aafcaca 1671
d62a17ae 1672 return CMD_SUCCESS;
718e3744 1673}
1674
1675/* "bgp always-compare-med" configuration. */
1676DEFUN (bgp_always_compare_med,
1677 bgp_always_compare_med_cmd,
1678 "bgp always-compare-med",
1679 "BGP specific commands\n"
1680 "Allow comparing MED from different neighbors\n")
1681{
d62a17ae 1682 VTY_DECLVAR_CONTEXT(bgp, bgp);
1683 bgp_flag_set(bgp, BGP_FLAG_ALWAYS_COMPARE_MED);
1684 bgp_recalculate_all_bestpaths(bgp);
7aafcaca 1685
d62a17ae 1686 return CMD_SUCCESS;
718e3744 1687}
1688
1689DEFUN (no_bgp_always_compare_med,
1690 no_bgp_always_compare_med_cmd,
1691 "no bgp always-compare-med",
1692 NO_STR
1693 "BGP specific commands\n"
1694 "Allow comparing MED from different neighbors\n")
1695{
d62a17ae 1696 VTY_DECLVAR_CONTEXT(bgp, bgp);
1697 bgp_flag_unset(bgp, BGP_FLAG_ALWAYS_COMPARE_MED);
1698 bgp_recalculate_all_bestpaths(bgp);
7aafcaca 1699
d62a17ae 1700 return CMD_SUCCESS;
718e3744 1701}
6b0655a2 1702
718e3744 1703/* "bgp deterministic-med" configuration. */
1704DEFUN (bgp_deterministic_med,
1705 bgp_deterministic_med_cmd,
1706 "bgp deterministic-med",
1707 "BGP specific commands\n"
1708 "Pick the best-MED path among paths advertised from the neighboring AS\n")
1709{
d62a17ae 1710 VTY_DECLVAR_CONTEXT(bgp, bgp);
1475ac87 1711
d62a17ae 1712 if (!bgp_flag_check(bgp, BGP_FLAG_DETERMINISTIC_MED)) {
1713 bgp_flag_set(bgp, BGP_FLAG_DETERMINISTIC_MED);
1714 bgp_recalculate_all_bestpaths(bgp);
1715 }
7aafcaca 1716
d62a17ae 1717 return CMD_SUCCESS;
718e3744 1718}
1719
1720DEFUN (no_bgp_deterministic_med,
1721 no_bgp_deterministic_med_cmd,
1722 "no bgp deterministic-med",
1723 NO_STR
1724 "BGP specific commands\n"
1725 "Pick the best-MED path among paths advertised from the neighboring AS\n")
1726{
d62a17ae 1727 VTY_DECLVAR_CONTEXT(bgp, bgp);
1728 int bestpath_per_as_used;
1729 afi_t afi;
1730 safi_t safi;
1731 struct peer *peer;
1732 struct listnode *node, *nnode;
1733
1734 if (bgp_flag_check(bgp, BGP_FLAG_DETERMINISTIC_MED)) {
1735 bestpath_per_as_used = 0;
1736
1737 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
05c7a1cc
QY		 1738 FOREACH_AFI_SAFI (afi, safi)
1739 if (CHECK_FLAG(
1740 peer->af_flags[afi][safi],
1741 PEER_FLAG_ADDPATH_TX_BESTPATH_PER_AS)) {
1742 bestpath_per_as_used = 1;
1743 break;
1744 }
d62a17ae 1745
1746 if (bestpath_per_as_used)
1747 break;
1748 }
1749
1750 if (bestpath_per_as_used) {
1751 vty_out(vty,
1752 "bgp deterministic-med cannot be disabled while addpath-tx-bestpath-per-AS is in use\n");
1753 return CMD_WARNING_CONFIG_FAILED;
1754 } else {
1755 bgp_flag_unset(bgp, BGP_FLAG_DETERMINISTIC_MED);
1756 bgp_recalculate_all_bestpaths(bgp);
1757 }
1758 }
1759
1760 return CMD_SUCCESS;
718e3744 1761}
538621f2 1762
1763/* "bgp graceful-restart" configuration. */
1764DEFUN (bgp_graceful_restart,
1765 bgp_graceful_restart_cmd,
1766 "bgp graceful-restart",
1767 "BGP specific commands\n"
1768 "Graceful restart capability parameters\n")
1769{
d62a17ae 1770 VTY_DECLVAR_CONTEXT(bgp, bgp);
1771 bgp_flag_set(bgp, BGP_FLAG_GRACEFUL_RESTART);
1772 return CMD_SUCCESS;
538621f2 1773}
1774
1775DEFUN (no_bgp_graceful_restart,
1776 no_bgp_graceful_restart_cmd,
1777 "no bgp graceful-restart",
1778 NO_STR
1779 "BGP specific commands\n"
1780 "Graceful restart capability parameters\n")
1781{
d62a17ae 1782 VTY_DECLVAR_CONTEXT(bgp, bgp);
1783 bgp_flag_unset(bgp, BGP_FLAG_GRACEFUL_RESTART);
1784 return CMD_SUCCESS;
538621f2 1785}
1786
93406d87 1787DEFUN (bgp_graceful_restart_stalepath_time,
1788 bgp_graceful_restart_stalepath_time_cmd,
6147e2c6 1789 "bgp graceful-restart stalepath-time (1-3600)",
93406d87 1790 "BGP specific commands\n"
1791 "Graceful restart capability parameters\n"
1792 "Set the max time to hold onto restarting peer's stale paths\n"
1793 "Delay value (seconds)\n")
1794{
d62a17ae 1795 VTY_DECLVAR_CONTEXT(bgp, bgp);
1796 int idx_number = 3;
d7c0a89a 1797 uint32_t stalepath;
93406d87 1798
d62a17ae 1799 stalepath = strtoul(argv[idx_number]->arg, NULL, 10);
1800 bgp->stalepath_time = stalepath;
1801 return CMD_SUCCESS;
93406d87 1802}
1803
eb6f1b41
PG		 1804DEFUN (bgp_graceful_restart_restart_time,
1805 bgp_graceful_restart_restart_time_cmd,
6147e2c6 1806 "bgp graceful-restart restart-time (1-3600)",
eb6f1b41
PG		 1807 "BGP specific commands\n"
1808 "Graceful restart capability parameters\n"
1809 "Set the time to wait to delete stale routes before a BGP open message is received\n"
1810 "Delay value (seconds)\n")
1811{
d62a17ae 1812 VTY_DECLVAR_CONTEXT(bgp, bgp);
1813 int idx_number = 3;
d7c0a89a 1814 uint32_t restart;
eb6f1b41 1815
d62a17ae 1816 restart = strtoul(argv[idx_number]->arg, NULL, 10);
1817 bgp->restart_time = restart;
1818 return CMD_SUCCESS;
eb6f1b41
PG		 1819}
1820
93406d87 1821DEFUN (no_bgp_graceful_restart_stalepath_time,
1822 no_bgp_graceful_restart_stalepath_time_cmd,
838758ac 1823 "no bgp graceful-restart stalepath-time [(1-3600)]",
93406d87 1824 NO_STR
1825 "BGP specific commands\n"
1826 "Graceful restart capability parameters\n"
838758ac
DW		 1827 "Set the max time to hold onto restarting peer's stale paths\n"
1828 "Delay value (seconds)\n")
93406d87 1829{
d62a17ae 1830 VTY_DECLVAR_CONTEXT(bgp, bgp);
93406d87 1831
d62a17ae 1832 bgp->stalepath_time = BGP_DEFAULT_STALEPATH_TIME;
1833 return CMD_SUCCESS;
93406d87 1834}
1835
eb6f1b41
PG		 1836DEFUN (no_bgp_graceful_restart_restart_time,
1837 no_bgp_graceful_restart_restart_time_cmd,
838758ac 1838 "no bgp graceful-restart restart-time [(1-3600)]",
eb6f1b41
PG		 1839 NO_STR
1840 "BGP specific commands\n"
1841 "Graceful restart capability parameters\n"
838758ac
DW		 1842 "Set the time to wait to delete stale routes before a BGP open message is received\n"
1843 "Delay value (seconds)\n")
eb6f1b41 1844{
d62a17ae 1845 VTY_DECLVAR_CONTEXT(bgp, bgp);
eb6f1b41 1846
d62a17ae 1847 bgp->restart_time = BGP_DEFAULT_RESTART_TIME;
1848 return CMD_SUCCESS;
eb6f1b41
PG		 1849}
1850
43fc21b3
JC		 1851DEFUN (bgp_graceful_restart_preserve_fw,
1852 bgp_graceful_restart_preserve_fw_cmd,
1853 "bgp graceful-restart preserve-fw-state",
1854 "BGP specific commands\n"
1855 "Graceful restart capability parameters\n"
1856 "Sets F-bit indication that fib is preserved while doing Graceful Restart\n")
1857{
d62a17ae 1858 VTY_DECLVAR_CONTEXT(bgp, bgp);
1859 bgp_flag_set(bgp, BGP_FLAG_GR_PRESERVE_FWD);
1860 return CMD_SUCCESS;
43fc21b3
JC		 1861}
1862
1863DEFUN (no_bgp_graceful_restart_preserve_fw,
1864 no_bgp_graceful_restart_preserve_fw_cmd,
1865 "no bgp graceful-restart preserve-fw-state",
1866 NO_STR
1867 "BGP specific commands\n"
1868 "Graceful restart capability parameters\n"
1869 "Unsets F-bit indication that fib is preserved while doing Graceful Restart\n")
1870{
d62a17ae 1871 VTY_DECLVAR_CONTEXT(bgp, bgp);
1872 bgp_flag_unset(bgp, BGP_FLAG_GR_PRESERVE_FWD);
1873 return CMD_SUCCESS;
43fc21b3
JC		 1874}
1875
7f323236
DW		 1876static void bgp_redistribute_redo(struct bgp *bgp)
1877{
1878 afi_t afi;
1879 int i;
1880 struct list *red_list;
1881 struct listnode *node;
1882 struct bgp_redist *red;
1883
a4d82a8a
PZ		 1884 for (afi = AFI_IP; afi < AFI_MAX; afi++) {
1885 for (i = 0; i < ZEBRA_ROUTE_MAX; i++) {
7f323236 1886
a4d82a8a
PZ		 1887 red_list = bgp->redist[afi][i];
1888 if (!red_list)
1889 continue;
7f323236 1890
a4d82a8a 1891 for (ALL_LIST_ELEMENTS_RO(red_list, node, red)) {
7f323236
DW		 1892 bgp_redistribute_resend(bgp, afi, i,
1893 red->instance);
1894 }
1895 }
1896 }
1897}
1898
1899/* "bgp graceful-shutdown" configuration */
1900DEFUN (bgp_graceful_shutdown,
1901 bgp_graceful_shutdown_cmd,
1902 "bgp graceful-shutdown",
1903 BGP_STR
1904 "Graceful shutdown parameters\n")
1905{
1906 VTY_DECLVAR_CONTEXT(bgp, bgp);
1907
1908 if (!bgp_flag_check(bgp, BGP_FLAG_GRACEFUL_SHUTDOWN)) {
1909 bgp_flag_set(bgp, BGP_FLAG_GRACEFUL_SHUTDOWN);
1910 bgp_static_redo_import_check(bgp);
1911 bgp_redistribute_redo(bgp);
1912 bgp_clear_star_soft_out(vty, bgp->name);
1913 bgp_clear_star_soft_in(vty, bgp->name);
1914 }
1915
1916 return CMD_SUCCESS;
1917}
1918
1919DEFUN (no_bgp_graceful_shutdown,
1920 no_bgp_graceful_shutdown_cmd,
1921 "no bgp graceful-shutdown",
1922 NO_STR
1923 BGP_STR
1924 "Graceful shutdown parameters\n")
1925{
1926 VTY_DECLVAR_CONTEXT(bgp, bgp);
1927
1928 if (bgp_flag_check(bgp, BGP_FLAG_GRACEFUL_SHUTDOWN)) {
1929 bgp_flag_unset(bgp, BGP_FLAG_GRACEFUL_SHUTDOWN);
1930 bgp_static_redo_import_check(bgp);
1931 bgp_redistribute_redo(bgp);
1932 bgp_clear_star_soft_out(vty, bgp->name);
1933 bgp_clear_star_soft_in(vty, bgp->name);
1934 }
1935
1936 return CMD_SUCCESS;
1937}
1938
718e3744 1939/* "bgp fast-external-failover" configuration. */
1940DEFUN (bgp_fast_external_failover,
1941 bgp_fast_external_failover_cmd,
1942 "bgp fast-external-failover",
1943 BGP_STR
1944 "Immediately reset session if a link to a directly connected external peer goes down\n")
1945{
d62a17ae 1946 VTY_DECLVAR_CONTEXT(bgp, bgp);
1947 bgp_flag_unset(bgp, BGP_FLAG_NO_FAST_EXT_FAILOVER);
1948 return CMD_SUCCESS;
718e3744 1949}
1950
1951DEFUN (no_bgp_fast_external_failover,
1952 no_bgp_fast_external_failover_cmd,
1953 "no bgp fast-external-failover",
1954 NO_STR
1955 BGP_STR
1956 "Immediately reset session if a link to a directly connected external peer goes down\n")
1957{
d62a17ae 1958 VTY_DECLVAR_CONTEXT(bgp, bgp);
1959 bgp_flag_set(bgp, BGP_FLAG_NO_FAST_EXT_FAILOVER);
1960 return CMD_SUCCESS;
718e3744 1961}
6b0655a2 1962
718e3744 1963/* "bgp enforce-first-as" configuration. */
1964DEFUN (bgp_enforce_first_as,
1965 bgp_enforce_first_as_cmd,
1966 "bgp enforce-first-as",
1967 BGP_STR
1968 "Enforce the first AS for EBGP routes\n")
1969{
d62a17ae 1970 VTY_DECLVAR_CONTEXT(bgp, bgp);
1971 bgp_flag_set(bgp, BGP_FLAG_ENFORCE_FIRST_AS);
1972 bgp_clear_star_soft_in(vty, bgp->name);
7aafcaca 1973
d62a17ae 1974 return CMD_SUCCESS;
718e3744 1975}
1976
1977DEFUN (no_bgp_enforce_first_as,
1978 no_bgp_enforce_first_as_cmd,
1979 "no bgp enforce-first-as",
1980 NO_STR
1981 BGP_STR
1982 "Enforce the first AS for EBGP routes\n")
1983{
d62a17ae 1984 VTY_DECLVAR_CONTEXT(bgp, bgp);
1985 bgp_flag_unset(bgp, BGP_FLAG_ENFORCE_FIRST_AS);
1986 bgp_clear_star_soft_in(vty, bgp->name);
7aafcaca 1987
d62a17ae 1988 return CMD_SUCCESS;
718e3744 1989}
6b0655a2 1990
718e3744 1991/* "bgp bestpath compare-routerid" configuration. */
1992DEFUN (bgp_bestpath_compare_router_id,
1993 bgp_bestpath_compare_router_id_cmd,
1994 "bgp bestpath compare-routerid",
1995 "BGP specific commands\n"
1996 "Change the default bestpath selection\n"
1997 "Compare router-id for identical EBGP paths\n")
1998{
d62a17ae 1999 VTY_DECLVAR_CONTEXT(bgp, bgp);
2000 bgp_flag_set(bgp, BGP_FLAG_COMPARE_ROUTER_ID);
2001 bgp_recalculate_all_bestpaths(bgp);
7aafcaca 2002
d62a17ae 2003 return CMD_SUCCESS;
718e3744 2004}
2005
2006DEFUN (no_bgp_bestpath_compare_router_id,
2007 no_bgp_bestpath_compare_router_id_cmd,
2008 "no bgp bestpath compare-routerid",
2009 NO_STR
2010 "BGP specific commands\n"
2011 "Change the default bestpath selection\n"
2012 "Compare router-id for identical EBGP paths\n")
2013{
d62a17ae 2014 VTY_DECLVAR_CONTEXT(bgp, bgp);
2015 bgp_flag_unset(bgp, BGP_FLAG_COMPARE_ROUTER_ID);
2016 bgp_recalculate_all_bestpaths(bgp);
7aafcaca 2017
d62a17ae 2018 return CMD_SUCCESS;
718e3744 2019}
6b0655a2 2020
718e3744 2021/* "bgp bestpath as-path ignore" configuration. */
2022DEFUN (bgp_bestpath_aspath_ignore,
2023 bgp_bestpath_aspath_ignore_cmd,
2024 "bgp bestpath as-path ignore",
2025 "BGP specific commands\n"
2026 "Change the default bestpath selection\n"
2027 "AS-path attribute\n"
2028 "Ignore as-path length in selecting a route\n")
2029{
d62a17ae 2030 VTY_DECLVAR_CONTEXT(bgp, bgp);
2031 bgp_flag_set(bgp, BGP_FLAG_ASPATH_IGNORE);
2032 bgp_recalculate_all_bestpaths(bgp);
7aafcaca 2033
d62a17ae 2034 return CMD_SUCCESS;
718e3744 2035}
2036
2037DEFUN (no_bgp_bestpath_aspath_ignore,
2038 no_bgp_bestpath_aspath_ignore_cmd,
2039 "no bgp bestpath as-path ignore",
2040 NO_STR
2041 "BGP specific commands\n"
2042 "Change the default bestpath selection\n"
2043 "AS-path attribute\n"
2044 "Ignore as-path length in selecting a route\n")
2045{
d62a17ae 2046 VTY_DECLVAR_CONTEXT(bgp, bgp);
2047 bgp_flag_unset(bgp, BGP_FLAG_ASPATH_IGNORE);
2048 bgp_recalculate_all_bestpaths(bgp);
7aafcaca 2049
d62a17ae 2050 return CMD_SUCCESS;
718e3744 2051}
6b0655a2 2052
6811845b 2053/* "bgp bestpath as-path confed" configuration. */
2054DEFUN (bgp_bestpath_aspath_confed,
2055 bgp_bestpath_aspath_confed_cmd,
2056 "bgp bestpath as-path confed",
2057 "BGP specific commands\n"
2058 "Change the default bestpath selection\n"
2059 "AS-path attribute\n"
2060 "Compare path lengths including confederation sets & sequences in selecting a route\n")
2061{
d62a17ae 2062 VTY_DECLVAR_CONTEXT(bgp, bgp);
2063 bgp_flag_set(bgp, BGP_FLAG_ASPATH_CONFED);
2064 bgp_recalculate_all_bestpaths(bgp);
7aafcaca 2065
d62a17ae 2066 return CMD_SUCCESS;
6811845b 2067}
2068
2069DEFUN (no_bgp_bestpath_aspath_confed,
2070 no_bgp_bestpath_aspath_confed_cmd,
2071 "no bgp bestpath as-path confed",
2072 NO_STR
2073 "BGP specific commands\n"
2074 "Change the default bestpath selection\n"
2075 "AS-path attribute\n"
2076 "Compare path lengths including confederation sets & sequences in selecting a route\n")
2077{
d62a17ae 2078 VTY_DECLVAR_CONTEXT(bgp, bgp);
2079 bgp_flag_unset(bgp, BGP_FLAG_ASPATH_CONFED);
2080 bgp_recalculate_all_bestpaths(bgp);
7aafcaca 2081
d62a17ae 2082 return CMD_SUCCESS;
6811845b 2083}
6b0655a2 2084
2fdd455c
PM		 2085/* "bgp bestpath as-path multipath-relax" configuration. */
2086DEFUN (bgp_bestpath_aspath_multipath_relax,
2087 bgp_bestpath_aspath_multipath_relax_cmd,
c7178fe7 2088 "bgp bestpath as-path multipath-relax [<as-set|no-as-set>]",
16fc1eec
DS		 2089 "BGP specific commands\n"
2090 "Change the default bestpath selection\n"
2091 "AS-path attribute\n"
2092 "Allow load sharing across routes that have different AS paths (but same length)\n"
219178b6 2093 "Generate an AS_SET\n"
16fc1eec
DS		 2094 "Do not generate an AS_SET\n")
2095{
d62a17ae 2096 VTY_DECLVAR_CONTEXT(bgp, bgp);
2097 int idx = 0;
2098 bgp_flag_set(bgp, BGP_FLAG_ASPATH_MULTIPATH_RELAX);
219178b6 2099
d62a17ae 2100 /* no-as-set is now the default behavior so we can silently
2101 * ignore it */
2102 if (argv_find(argv, argc, "as-set", &idx))
2103 bgp_flag_set(bgp, BGP_FLAG_MULTIPATH_RELAX_AS_SET);
2104 else
2105 bgp_flag_unset(bgp, BGP_FLAG_MULTIPATH_RELAX_AS_SET);
219178b6 2106
d62a17ae 2107 bgp_recalculate_all_bestpaths(bgp);
7aafcaca 2108
d62a17ae 2109 return CMD_SUCCESS;
16fc1eec
DS		 2110}
2111
219178b6
DW		 2112DEFUN (no_bgp_bestpath_aspath_multipath_relax,
2113 no_bgp_bestpath_aspath_multipath_relax_cmd,
c7178fe7 2114 "no bgp bestpath as-path multipath-relax [<as-set|no-as-set>]",
16fc1eec
DS		 2115 NO_STR
2116 "BGP specific commands\n"
2117 "Change the default bestpath selection\n"
2118 "AS-path attribute\n"
2119 "Allow load sharing across routes that have different AS paths (but same length)\n"
219178b6 2120 "Generate an AS_SET\n"
16fc1eec
DS		 2121 "Do not generate an AS_SET\n")
2122{
d62a17ae 2123 VTY_DECLVAR_CONTEXT(bgp, bgp);
2124 bgp_flag_unset(bgp, BGP_FLAG_ASPATH_MULTIPATH_RELAX);
2125 bgp_flag_unset(bgp, BGP_FLAG_MULTIPATH_RELAX_AS_SET);
2126 bgp_recalculate_all_bestpaths(bgp);
7aafcaca 2127
d62a17ae 2128 return CMD_SUCCESS;
2fdd455c 2129}
6b0655a2 2130
848973c7 2131/* "bgp log-neighbor-changes" configuration. */
2132DEFUN (bgp_log_neighbor_changes,
2133 bgp_log_neighbor_changes_cmd,
2134 "bgp log-neighbor-changes",
2135 "BGP specific commands\n"
2136 "Log neighbor up/down and reset reason\n")
2137{
d62a17ae 2138 VTY_DECLVAR_CONTEXT(bgp, bgp);
2139 bgp_flag_set(bgp, BGP_FLAG_LOG_NEIGHBOR_CHANGES);
2140 return CMD_SUCCESS;
848973c7 2141}
2142
2143DEFUN (no_bgp_log_neighbor_changes,
2144 no_bgp_log_neighbor_changes_cmd,
2145 "no bgp log-neighbor-changes",
2146 NO_STR
2147 "BGP specific commands\n"
2148 "Log neighbor up/down and reset reason\n")
2149{
d62a17ae 2150 VTY_DECLVAR_CONTEXT(bgp, bgp);
2151 bgp_flag_unset(bgp, BGP_FLAG_LOG_NEIGHBOR_CHANGES);
2152 return CMD_SUCCESS;
848973c7 2153}
6b0655a2 2154
718e3744 2155/* "bgp bestpath med" configuration. */
2156DEFUN (bgp_bestpath_med,
2157 bgp_bestpath_med_cmd,
2d8c1a4d 2158 "bgp bestpath med <confed [missing-as-worst]|missing-as-worst [confed]>",
718e3744 2159 "BGP specific commands\n"
2160 "Change the default bestpath selection\n"
2161 "MED attribute\n"
2162 "Compare MED among confederation paths\n"
838758ac
DW		 2163 "Treat missing MED as the least preferred one\n"
2164 "Treat missing MED as the least preferred one\n"
2165 "Compare MED among confederation paths\n")
718e3744 2166{
d62a17ae 2167 VTY_DECLVAR_CONTEXT(bgp, bgp);
6cbd1915 2168
d62a17ae 2169 int idx = 0;
2170 if (argv_find(argv, argc, "confed", &idx))
2171 bgp_flag_set(bgp, BGP_FLAG_MED_CONFED);
2172 idx = 0;
2173 if (argv_find(argv, argc, "missing-as-worst", &idx))
2174 bgp_flag_set(bgp, BGP_FLAG_MED_MISSING_AS_WORST);
e52702f2 2175
d62a17ae 2176 bgp_recalculate_all_bestpaths(bgp);
7aafcaca 2177
d62a17ae 2178 return CMD_SUCCESS;
718e3744 2179}
2180
718e3744 2181DEFUN (no_bgp_bestpath_med,
2182 no_bgp_bestpath_med_cmd,
2d8c1a4d 2183 "no bgp bestpath med <confed [missing-as-worst]|missing-as-worst [confed]>",
718e3744 2184 NO_STR
2185 "BGP specific commands\n"
2186 "Change the default bestpath selection\n"
2187 "MED attribute\n"
2188 "Compare MED among confederation paths\n"
3a2d747c
QY		 2189 "Treat missing MED as the least preferred one\n"
2190 "Treat missing MED as the least preferred one\n"
2191 "Compare MED among confederation paths\n")
718e3744 2192{
d62a17ae 2193 VTY_DECLVAR_CONTEXT(bgp, bgp);
e52702f2 2194
d62a17ae 2195 int idx = 0;
2196 if (argv_find(argv, argc, "confed", &idx))
2197 bgp_flag_unset(bgp, BGP_FLAG_MED_CONFED);
2198 idx = 0;
2199 if (argv_find(argv, argc, "missing-as-worst", &idx))
2200 bgp_flag_unset(bgp, BGP_FLAG_MED_MISSING_AS_WORST);
718e3744 2201
d62a17ae 2202 bgp_recalculate_all_bestpaths(bgp);
7aafcaca 2203
d62a17ae 2204 return CMD_SUCCESS;
718e3744 2205}
2206
718e3744 2207/* "no bgp default ipv4-unicast". */
2208DEFUN (no_bgp_default_ipv4_unicast,
2209 no_bgp_default_ipv4_unicast_cmd,
2210 "no bgp default ipv4-unicast",
2211 NO_STR
2212 "BGP specific commands\n"
2213 "Configure BGP defaults\n"
2214 "Activate ipv4-unicast for a peer by default\n")
2215{
d62a17ae 2216 VTY_DECLVAR_CONTEXT(bgp, bgp);
2217 bgp_flag_set(bgp, BGP_FLAG_NO_DEFAULT_IPV4);
2218 return CMD_SUCCESS;
718e3744 2219}
2220
2221DEFUN (bgp_default_ipv4_unicast,
2222 bgp_default_ipv4_unicast_cmd,
2223 "bgp default ipv4-unicast",
2224 "BGP specific commands\n"
2225 "Configure BGP defaults\n"
2226 "Activate ipv4-unicast for a peer by default\n")
2227{
d62a17ae 2228 VTY_DECLVAR_CONTEXT(bgp, bgp);
2229 bgp_flag_unset(bgp, BGP_FLAG_NO_DEFAULT_IPV4);
2230 return CMD_SUCCESS;
718e3744 2231}
6b0655a2 2232
04b6bdc0
DW		 2233/* Display hostname in certain command outputs */
2234DEFUN (bgp_default_show_hostname,
2235 bgp_default_show_hostname_cmd,
2236 "bgp default show-hostname",
2237 "BGP specific commands\n"
2238 "Configure BGP defaults\n"
2239 "Show hostname in certain command ouputs\n")
2240{
d62a17ae 2241 VTY_DECLVAR_CONTEXT(bgp, bgp);
2242 bgp_flag_set(bgp, BGP_FLAG_SHOW_HOSTNAME);
2243 return CMD_SUCCESS;
04b6bdc0
DW		 2244}
2245
2246DEFUN (no_bgp_default_show_hostname,
2247 no_bgp_default_show_hostname_cmd,
2248 "no bgp default show-hostname",
2249 NO_STR
2250 "BGP specific commands\n"
2251 "Configure BGP defaults\n"
2252 "Show hostname in certain command ouputs\n")
2253{
d62a17ae 2254 VTY_DECLVAR_CONTEXT(bgp, bgp);
2255 bgp_flag_unset(bgp, BGP_FLAG_SHOW_HOSTNAME);
2256 return CMD_SUCCESS;
04b6bdc0
DW		 2257}
2258
8233ef81 2259/* "bgp network import-check" configuration. */
718e3744 2260DEFUN (bgp_network_import_check,
2261 bgp_network_import_check_cmd,
5623e905 2262 "bgp network import-check",
718e3744 2263 "BGP specific commands\n"
2264 "BGP network command\n"
5623e905 2265 "Check BGP network route exists in IGP\n")
718e3744 2266{
d62a17ae 2267 VTY_DECLVAR_CONTEXT(bgp, bgp);
2268 if (!bgp_flag_check(bgp, BGP_FLAG_IMPORT_CHECK)) {
2269 bgp_flag_set(bgp, BGP_FLAG_IMPORT_CHECK);
2270 bgp_static_redo_import_check(bgp);
2271 }
078430f6 2272
d62a17ae 2273 return CMD_SUCCESS;
718e3744 2274}
2275
d62a17ae 2276ALIAS_HIDDEN(bgp_network_import_check, bgp_network_import_check_exact_cmd,
2277 "bgp network import-check exact",
2278 "BGP specific commands\n"
2279 "BGP network command\n"
2280 "Check BGP network route exists in IGP\n"
2281 "Match route precisely\n")
8233ef81 2282
718e3744 2283DEFUN (no_bgp_network_import_check,
2284 no_bgp_network_import_check_cmd,
5623e905 2285 "no bgp network import-check",
718e3744 2286 NO_STR
2287 "BGP specific commands\n"
2288 "BGP network command\n"
2289 "Check BGP network route exists in IGP\n")
2290{
d62a17ae 2291 VTY_DECLVAR_CONTEXT(bgp, bgp);
2292 if (bgp_flag_check(bgp, BGP_FLAG_IMPORT_CHECK)) {
2293 bgp_flag_unset(bgp, BGP_FLAG_IMPORT_CHECK);
2294 bgp_static_redo_import_check(bgp);
2295 }
5623e905 2296
d62a17ae 2297 return CMD_SUCCESS;
718e3744 2298}
6b0655a2 2299
718e3744 2300DEFUN (bgp_default_local_preference,
2301 bgp_default_local_preference_cmd,
6147e2c6 2302 "bgp default local-preference (0-4294967295)",
718e3744 2303 "BGP specific commands\n"
2304 "Configure BGP defaults\n"
2305 "local preference (higher=more preferred)\n"
2306 "Configure default local preference value\n")
2307{
d62a17ae 2308 VTY_DECLVAR_CONTEXT(bgp, bgp);
2309 int idx_number = 3;
d7c0a89a 2310 uint32_t local_pref;
718e3744 2311
d62a17ae 2312 local_pref = strtoul(argv[idx_number]->arg, NULL, 10);
718e3744 2313
d62a17ae 2314 bgp_default_local_preference_set(bgp, local_pref);
2315 bgp_clear_star_soft_in(vty, bgp->name);
718e3744 2316
d62a17ae 2317 return CMD_SUCCESS;
718e3744 2318}
2319
2320DEFUN (no_bgp_default_local_preference,
2321 no_bgp_default_local_preference_cmd,
838758ac 2322 "no bgp default local-preference [(0-4294967295)]",
718e3744 2323 NO_STR
2324 "BGP specific commands\n"
2325 "Configure BGP defaults\n"
838758ac
DW		 2326 "local preference (higher=more preferred)\n"
2327 "Configure default local preference value\n")
718e3744 2328{
d62a17ae 2329 VTY_DECLVAR_CONTEXT(bgp, bgp);
2330 bgp_default_local_preference_unset(bgp);
2331 bgp_clear_star_soft_in(vty, bgp->name);
7aafcaca 2332
d62a17ae 2333 return CMD_SUCCESS;
718e3744 2334}
2335
6b0655a2 2336
3f9c7369
DS		 2337DEFUN (bgp_default_subgroup_pkt_queue_max,
2338 bgp_default_subgroup_pkt_queue_max_cmd,
6147e2c6 2339 "bgp default subgroup-pkt-queue-max (20-100)",
3f9c7369
DS		 2340 "BGP specific commands\n"
2341 "Configure BGP defaults\n"
2342 "subgroup-pkt-queue-max\n"
2343 "Configure subgroup packet queue max\n")
8bd9d948 2344{
d62a17ae 2345 VTY_DECLVAR_CONTEXT(bgp, bgp);
2346 int idx_number = 3;
d7c0a89a 2347 uint32_t max_size;
8bd9d948 2348
d62a17ae 2349 max_size = strtoul(argv[idx_number]->arg, NULL, 10);
3f9c7369 2350
d62a17ae 2351 bgp_default_subgroup_pkt_queue_max_set(bgp, max_size);
3f9c7369 2352
d62a17ae 2353 return CMD_SUCCESS;
3f9c7369
DS		 2354}
2355
2356DEFUN (no_bgp_default_subgroup_pkt_queue_max,
2357 no_bgp_default_subgroup_pkt_queue_max_cmd,
838758ac 2358 "no bgp default subgroup-pkt-queue-max [(20-100)]",
3f9c7369
DS		 2359 NO_STR
2360 "BGP specific commands\n"
2361 "Configure BGP defaults\n"
838758ac
DW		 2362 "subgroup-pkt-queue-max\n"
2363 "Configure subgroup packet queue max\n")
3f9c7369 2364{
d62a17ae 2365 VTY_DECLVAR_CONTEXT(bgp, bgp);
2366 bgp_default_subgroup_pkt_queue_max_unset(bgp);
2367 return CMD_SUCCESS;
8bd9d948
DS		 2368}
2369
813d4307 2370
8bd9d948
DS		 2371DEFUN (bgp_rr_allow_outbound_policy,
2372 bgp_rr_allow_outbound_policy_cmd,
2373 "bgp route-reflector allow-outbound-policy",
2374 "BGP specific commands\n"
2375 "Allow modifications made by out route-map\n"
2376 "on ibgp neighbors\n")
2377{
d62a17ae 2378 VTY_DECLVAR_CONTEXT(bgp, bgp);
8bd9d948 2379
d62a17ae 2380 if (!bgp_flag_check(bgp, BGP_FLAG_RR_ALLOW_OUTBOUND_POLICY)) {
2381 bgp_flag_set(bgp, BGP_FLAG_RR_ALLOW_OUTBOUND_POLICY);
2382 update_group_announce_rrclients(bgp);
2383 bgp_clear_star_soft_out(vty, bgp->name);
2384 }
8bd9d948 2385
d62a17ae 2386 return CMD_SUCCESS;
8bd9d948
DS		 2387}
2388
2389DEFUN (no_bgp_rr_allow_outbound_policy,
2390 no_bgp_rr_allow_outbound_policy_cmd,
2391 "no bgp route-reflector allow-outbound-policy",
2392 NO_STR
2393 "BGP specific commands\n"
2394 "Allow modifications made by out route-map\n"
2395 "on ibgp neighbors\n")
2396{
d62a17ae 2397 VTY_DECLVAR_CONTEXT(bgp, bgp);
8bd9d948 2398
d62a17ae 2399 if (bgp_flag_check(bgp, BGP_FLAG_RR_ALLOW_OUTBOUND_POLICY)) {
2400 bgp_flag_unset(bgp, BGP_FLAG_RR_ALLOW_OUTBOUND_POLICY);
2401 update_group_announce_rrclients(bgp);
2402 bgp_clear_star_soft_out(vty, bgp->name);
2403 }
8bd9d948 2404
d62a17ae 2405 return CMD_SUCCESS;
8bd9d948
DS		 2406}
2407
f14e6fdb
DS		 2408DEFUN (bgp_listen_limit,
2409 bgp_listen_limit_cmd,
9ccf14f7 2410 "bgp listen limit (1-5000)",
f14e6fdb
DS		 2411 "BGP specific commands\n"
2412 "Configure BGP defaults\n"
2413 "maximum number of BGP Dynamic Neighbors that can be created\n"
2414 "Configure Dynamic Neighbors listen limit value\n")
2415{
d62a17ae 2416 VTY_DECLVAR_CONTEXT(bgp, bgp);
2417 int idx_number = 3;
2418 int listen_limit;
f14e6fdb 2419
d62a17ae 2420 listen_limit = strtoul(argv[idx_number]->arg, NULL, 10);
f14e6fdb 2421
d62a17ae 2422 bgp_listen_limit_set(bgp, listen_limit);
f14e6fdb 2423
d62a17ae 2424 return CMD_SUCCESS;
f14e6fdb
DS		 2425}
2426
2427DEFUN (no_bgp_listen_limit,
2428 no_bgp_listen_limit_cmd,
838758ac 2429 "no bgp listen limit [(1-5000)]",
f14e6fdb
DS		 2430 "BGP specific commands\n"
2431 "Configure BGP defaults\n"
2432 "unset maximum number of BGP Dynamic Neighbors that can be created\n"
838758ac
DW		 2433 "Configure Dynamic Neighbors listen limit value to default\n"
2434 "Configure Dynamic Neighbors listen limit value\n")
f14e6fdb 2435{
d62a17ae 2436 VTY_DECLVAR_CONTEXT(bgp, bgp);
2437 bgp_listen_limit_unset(bgp);
2438 return CMD_SUCCESS;
f14e6fdb
DS		 2439}
2440
2441
20eb8864 2442/*
2443 * Check if this listen range is already configured. Check for exact
2444 * match or overlap based on input.
2445 */
d62a17ae 2446static struct peer_group *listen_range_exists(struct bgp *bgp,
2447 struct prefix *range, int exact)
2448{
2449 struct listnode *node, *nnode;
2450 struct listnode *node1, *nnode1;
2451 struct peer_group *group;
2452 struct prefix *lr;
2453 afi_t afi;
2454 int match;
2455
2456 afi = family2afi(range->family);
2457 for (ALL_LIST_ELEMENTS(bgp->group, node, nnode, group)) {
2458 for (ALL_LIST_ELEMENTS(group->listen_range[afi], node1, nnode1,
2459 lr)) {
2460 if (exact)
2461 match = prefix_same(range, lr);
2462 else
2463 match = (prefix_match(range, lr)
2464 || prefix_match(lr, range));
2465 if (match)
2466 return group;
2467 }
2468 }
2469
2470 return NULL;
20eb8864 2471}
2472
f14e6fdb
DS		 2473DEFUN (bgp_listen_range,
2474 bgp_listen_range_cmd,
9ccf14f7 2475 "bgp listen range <A.B.C.D/M|X:X::X:X/M> peer-group WORD",
f14e6fdb 2476 "BGP specific commands\n"
d7fa34c1
QY		 2477 "Configure BGP dynamic neighbors listen range\n"
2478 "Configure BGP dynamic neighbors listen range\n"
16cedbb0
QY		 2479 NEIGHBOR_ADDR_STR
2480 "Member of the peer-group\n"
2481 "Peer-group name\n")
f14e6fdb 2482{
d62a17ae 2483 VTY_DECLVAR_CONTEXT(bgp, bgp);
2484 struct prefix range;
2485 struct peer_group *group, *existing_group;
2486 afi_t afi;
2487 int ret;
2488 int idx = 0;
2489
2490 argv_find(argv, argc, "A.B.C.D/M", &idx);
2491 argv_find(argv, argc, "X:X::X:X/M", &idx);
2492 char *prefix = argv[idx]->arg;
2493 argv_find(argv, argc, "WORD", &idx);
2494 char *peergroup = argv[idx]->arg;
2495
2496 /* Convert IP prefix string to struct prefix. */
2497 ret = str2prefix(prefix, &range);
2498 if (!ret) {
2499 vty_out(vty, "%% Malformed listen range\n");
2500 return CMD_WARNING_CONFIG_FAILED;
2501 }
2502
2503 afi = family2afi(range.family);
2504
2505 if (afi == AFI_IP6 && IN6_IS_ADDR_LINKLOCAL(&range.u.prefix6)) {
2506 vty_out(vty,
2507 "%% Malformed listen range (link-local address)\n");
2508 return CMD_WARNING_CONFIG_FAILED;
2509 }
2510
2511 apply_mask(&range);
2512
2513 /* Check if same listen range is already configured. */
2514 existing_group = listen_range_exists(bgp, &range, 1);
2515 if (existing_group) {
2516 if (strcmp(existing_group->name, peergroup) == 0)
2517 return CMD_SUCCESS;
2518 else {
2519 vty_out(vty,
2520 "%% Same listen range is attached to peer-group %s\n",
2521 existing_group->name);
2522 return CMD_WARNING_CONFIG_FAILED;
2523 }
2524 }
2525
2526 /* Check if an overlapping listen range exists. */
2527 if (listen_range_exists(bgp, &range, 0)) {
2528 vty_out(vty,
2529 "%% Listen range overlaps with existing listen range\n");
2530 return CMD_WARNING_CONFIG_FAILED;
2531 }
2532
2533 group = peer_group_lookup(bgp, peergroup);
2534 if (!group) {
2535 vty_out(vty, "%% Configure the peer-group first\n");
2536 return CMD_WARNING_CONFIG_FAILED;
2537 }
2538
2539 ret = peer_group_listen_range_add(group, &range);
2540 return bgp_vty_return(vty, ret);
f14e6fdb
DS		 2541}
2542
2543DEFUN (no_bgp_listen_range,
2544 no_bgp_listen_range_cmd,
d7fa34c1
QY		 2545 "no bgp listen range <A.B.C.D/M|X:X::X:X/M> peer-group WORD",
2546 NO_STR
f14e6fdb 2547 "BGP specific commands\n"
d7fa34c1
QY		 2548 "Unconfigure BGP dynamic neighbors listen range\n"
2549 "Unconfigure BGP dynamic neighbors listen range\n"
2550 NEIGHBOR_ADDR_STR
2551 "Member of the peer-group\n"
2552 "Peer-group name\n")
f14e6fdb 2553{
d62a17ae 2554 VTY_DECLVAR_CONTEXT(bgp, bgp);
2555 struct prefix range;
2556 struct peer_group *group;
2557 afi_t afi;
2558 int ret;
2559 int idx = 0;
2560
2561 argv_find(argv, argc, "A.B.C.D/M", &idx);
2562 argv_find(argv, argc, "X:X::X:X/M", &idx);
2563 char *prefix = argv[idx]->arg;
2564 argv_find(argv, argc, "WORD", &idx);
2565 char *peergroup = argv[idx]->arg;
2566
2567 /* Convert IP prefix string to struct prefix. */
2568 ret = str2prefix(prefix, &range);
2569 if (!ret) {
2570 vty_out(vty, "%% Malformed listen range\n");
2571 return CMD_WARNING_CONFIG_FAILED;
2572 }
2573
2574 afi = family2afi(range.family);
2575
2576 if (afi == AFI_IP6 && IN6_IS_ADDR_LINKLOCAL(&range.u.prefix6)) {
2577 vty_out(vty,
2578 "%% Malformed listen range (link-local address)\n");
2579 return CMD_WARNING_CONFIG_FAILED;
2580 }
2581
2582 apply_mask(&range);
2583
2584 group = peer_group_lookup(bgp, peergroup);
2585 if (!group) {
2586 vty_out(vty, "%% Peer-group does not exist\n");
2587 return CMD_WARNING_CONFIG_FAILED;
2588 }
2589
2590 ret = peer_group_listen_range_del(group, &range);
2591 return bgp_vty_return(vty, ret);
2592}
2593
2b791107 2594void bgp_config_write_listen(struct vty *vty, struct bgp *bgp)
d62a17ae 2595{
2596 struct peer_group *group;
2597 struct listnode *node, *nnode, *rnode, *nrnode;
2598 struct prefix *range;
2599 afi_t afi;
2600 char buf[PREFIX2STR_BUFFER];
2601
2602 if (bgp->dynamic_neighbors_limit != BGP_DYNAMIC_NEIGHBORS_LIMIT_DEFAULT)
2603 vty_out(vty, " bgp listen limit %d\n",
2604 bgp->dynamic_neighbors_limit);
2605
2606 for (ALL_LIST_ELEMENTS(bgp->group, node, nnode, group)) {
2607 for (afi = AFI_IP; afi < AFI_MAX; afi++) {
2608 for (ALL_LIST_ELEMENTS(group->listen_range[afi], rnode,
2609 nrnode, range)) {
2610 prefix2str(range, buf, sizeof(buf));
2611 vty_out(vty,
2612 " bgp listen range %s peer-group %s\n",
2613 buf, group->name);
2614 }
2615 }
2616 }
f14e6fdb
DS		 2617}
2618
2619
907f92c8
DS		 2620DEFUN (bgp_disable_connected_route_check,
2621 bgp_disable_connected_route_check_cmd,
2622 "bgp disable-ebgp-connected-route-check",
2623 "BGP specific commands\n"
2624 "Disable checking if nexthop is connected on ebgp sessions\n")
2625{
d62a17ae 2626 VTY_DECLVAR_CONTEXT(bgp, bgp);
2627 bgp_flag_set(bgp, BGP_FLAG_DISABLE_NH_CONNECTED_CHK);
2628 bgp_clear_star_soft_in(vty, bgp->name);
7aafcaca 2629
d62a17ae 2630 return CMD_SUCCESS;
907f92c8
DS		 2631}
2632
2633DEFUN (no_bgp_disable_connected_route_check,
2634 no_bgp_disable_connected_route_check_cmd,
2635 "no bgp disable-ebgp-connected-route-check",
2636 NO_STR
2637 "BGP specific commands\n"
2638 "Disable checking if nexthop is connected on ebgp sessions\n")
2639{
d62a17ae 2640 VTY_DECLVAR_CONTEXT(bgp, bgp);
2641 bgp_flag_unset(bgp, BGP_FLAG_DISABLE_NH_CONNECTED_CHK);
2642 bgp_clear_star_soft_in(vty, bgp->name);
2643
2644 return CMD_SUCCESS;
2645}
2646
2647
2648static int peer_remote_as_vty(struct vty *vty, const char *peer_str,
2649 const char *as_str, afi_t afi, safi_t safi)
2650{
2651 VTY_DECLVAR_CONTEXT(bgp, bgp);
2652 int ret;
2653 as_t as;
2654 int as_type = AS_SPECIFIED;
2655 union sockunion su;
2656
2657 if (as_str[0] == 'i') {
2658 as = 0;
2659 as_type = AS_INTERNAL;
2660 } else if (as_str[0] == 'e') {
2661 as = 0;
2662 as_type = AS_EXTERNAL;
2663 } else {
2664 /* Get AS number. */
2665 as = strtoul(as_str, NULL, 10);
2666 }
2667
2668 /* If peer is peer group, call proper function. */
2669 ret = str2sockunion(peer_str, &su);
2670 if (ret < 0) {
2671 /* Check for peer by interface */
2672 ret = peer_remote_as(bgp, NULL, peer_str, &as, as_type, afi,
2673 safi);
2674 if (ret < 0) {
2675 ret = peer_group_remote_as(bgp, peer_str, &as, as_type);
2676 if (ret < 0) {
2677 vty_out(vty,
2678 "%% Create the peer-group or interface first\n");
2679 return CMD_WARNING_CONFIG_FAILED;
2680 }
2681 return CMD_SUCCESS;
2682 }
2683 } else {
2684 if (peer_address_self_check(bgp, &su)) {
2685 vty_out(vty,
2686 "%% Can not configure the local system as neighbor\n");
2687 return CMD_WARNING_CONFIG_FAILED;
2688 }
2689 ret = peer_remote_as(bgp, &su, NULL, &as, as_type, afi, safi);
2690 }
2691
2692 /* This peer belongs to peer group. */
2693 switch (ret) {
2694 case BGP_ERR_PEER_GROUP_MEMBER:
2695 vty_out(vty,
2696 "%% Peer-group AS %u. Cannot configure remote-as for member\n",
2697 as);
2698 return CMD_WARNING_CONFIG_FAILED;
2699 case BGP_ERR_PEER_GROUP_PEER_TYPE_DIFFERENT:
2700 vty_out(vty,
2701 "%% The AS# can not be changed from %u to %s, peer-group members must be all internal or all external\n",
2702 as, as_str);
2703 return CMD_WARNING_CONFIG_FAILED;
2704 }
2705 return bgp_vty_return(vty, ret);
718e3744 2706}
2707
f26845f9
QY		 2708DEFUN (bgp_default_shutdown,
2709 bgp_default_shutdown_cmd,
2710 "[no] bgp default shutdown",
2711 NO_STR
2712 BGP_STR
2713 "Configure BGP defaults\n"
b012cbe2 2714 "Apply administrative shutdown to newly configured peers\n")
f26845f9
QY		 2715{
2716 VTY_DECLVAR_CONTEXT(bgp, bgp);
2717 bgp->autoshutdown = !strmatch(argv[0]->text, "no");
2718 return CMD_SUCCESS;
2719}
2720
718e3744 2721DEFUN (neighbor_remote_as,
2722 neighbor_remote_as_cmd,
3a2d747c 2723 "neighbor <A.B.C.D|X:X::X:X|WORD> remote-as <(1-4294967295)|internal|external>",
718e3744 2724 NEIGHBOR_STR
2725 NEIGHBOR_ADDR_STR2
2726 "Specify a BGP neighbor\n"
d7fa34c1 2727 AS_STR
3a2d747c
QY		 2728 "Internal BGP peer\n"
2729 "External BGP peer\n")
718e3744 2730{
d62a17ae 2731 int idx_peer = 1;
2732 int idx_remote_as = 3;
2733 return peer_remote_as_vty(vty, argv[idx_peer]->arg,
2734 argv[idx_remote_as]->arg, AFI_IP,
2735 SAFI_UNICAST);
2736}
2737
2738static int peer_conf_interface_get(struct vty *vty, const char *conf_if,
2739 afi_t afi, safi_t safi, int v6only,
2740 const char *peer_group_name,
2741 const char *as_str)
2742{
2743 VTY_DECLVAR_CONTEXT(bgp, bgp);
2744 as_t as = 0;
2745 int as_type = AS_UNSPECIFIED;
2746 struct peer *peer;
2747 struct peer_group *group;
2748 int ret = 0;
2749 union sockunion su;
2750
2751 group = peer_group_lookup(bgp, conf_if);
2752
2753 if (group) {
2754 vty_out(vty, "%% Name conflict with peer-group \n");
2755 return CMD_WARNING_CONFIG_FAILED;
2756 }
2757
2758 if (as_str) {
2759 if (as_str[0] == 'i') {
2760 as_type = AS_INTERNAL;
2761 } else if (as_str[0] == 'e') {
2762 as_type = AS_EXTERNAL;
2763 } else {
2764 /* Get AS number. */
2765 as = strtoul(as_str, NULL, 10);
2766 as_type = AS_SPECIFIED;
2767 }
2768 }
2769
2770 peer = peer_lookup_by_conf_if(bgp, conf_if);
2771 if (peer) {
2772 if (as_str)
2773 ret = peer_remote_as(bgp, &su, conf_if, &as, as_type,
2774 afi, safi);
2775 } else {
2776 if (bgp_flag_check(bgp, BGP_FLAG_NO_DEFAULT_IPV4)
2777 && afi == AFI_IP && safi == SAFI_UNICAST)
2778 peer = peer_create(NULL, conf_if, bgp, bgp->as, as,
2779 as_type, 0, 0, NULL);
2780 else
2781 peer = peer_create(NULL, conf_if, bgp, bgp->as, as,
2782 as_type, afi, safi, NULL);
2783
2784 if (!peer) {
2785 vty_out(vty, "%% BGP failed to create peer\n");
2786 return CMD_WARNING_CONFIG_FAILED;
2787 }
2788
2789 if (v6only)
2790 SET_FLAG(peer->flags, PEER_FLAG_IFPEER_V6ONLY);
2791
2792 /* Request zebra to initiate IPv6 RAs on this interface. We do
2793 * this
2794 * any unnumbered peer in order to not worry about run-time
2795 * transitions
2796 * (e.g., peering is initially IPv4, but the IPv4 /30 or /31
2797 * address
2798 * gets deleted later etc.)
2799 */
2800 if (peer->ifp)
2801 bgp_zebra_initiate_radv(bgp, peer);
2802 }
2803
2804 if ((v6only && !CHECK_FLAG(peer->flags, PEER_FLAG_IFPEER_V6ONLY))
2805 || (!v6only && CHECK_FLAG(peer->flags, PEER_FLAG_IFPEER_V6ONLY))) {
2806 if (v6only)
2807 SET_FLAG(peer->flags, PEER_FLAG_IFPEER_V6ONLY);
2808 else
2809 UNSET_FLAG(peer->flags, PEER_FLAG_IFPEER_V6ONLY);
2810
2811 /* v6only flag changed. Reset bgp seesion */
2812 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
2813 peer->last_reset = PEER_DOWN_V6ONLY_CHANGE;
2814 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
2815 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
2816 } else
2817 bgp_session_reset(peer);
2818 }
2819
2820 if (!CHECK_FLAG(peer->flags, PEER_FLAG_CAPABILITY_ENHE))
2821 peer_flag_set(peer, PEER_FLAG_CAPABILITY_ENHE);
2822
2823 if (peer_group_name) {
2824 group = peer_group_lookup(bgp, peer_group_name);
2825 if (!group) {
2826 vty_out(vty, "%% Configure the peer-group first\n");
2827 return CMD_WARNING_CONFIG_FAILED;
2828 }
2829
2830 ret = peer_group_bind(bgp, &su, peer, group, &as);
2831 }
2832
2833 return bgp_vty_return(vty, ret);
a80beece
DS		 2834}
2835
4c48cf63
DW		 2836DEFUN (neighbor_interface_config,
2837 neighbor_interface_config_cmd,
31500417 2838 "neighbor WORD interface [peer-group WORD]",
4c48cf63
DW		 2839 NEIGHBOR_STR
2840 "Interface name or neighbor tag\n"
31500417
DW		 2841 "Enable BGP on interface\n"
2842 "Member of the peer-group\n"
16cedbb0 2843 "Peer-group name\n")
4c48cf63 2844{
d62a17ae 2845 int idx_word = 1;
2846 int idx_peer_group_word = 4;
31500417 2847
d62a17ae 2848 if (argc > idx_peer_group_word)
2849 return peer_conf_interface_get(
2850 vty, argv[idx_word]->arg, AFI_IP, SAFI_UNICAST, 0,
2851 argv[idx_peer_group_word]->arg, NULL);
2852 else
2853 return peer_conf_interface_get(vty, argv[idx_word]->arg, AFI_IP,
2854 SAFI_UNICAST, 0, NULL, NULL);
4c48cf63
DW		 2855}
2856
4c48cf63
DW		 2857DEFUN (neighbor_interface_config_v6only,
2858 neighbor_interface_config_v6only_cmd,
31500417 2859 "neighbor WORD interface v6only [peer-group WORD]",
4c48cf63
DW		 2860 NEIGHBOR_STR
2861 "Interface name or neighbor tag\n"
2862 "Enable BGP on interface\n"
31500417
DW		 2863 "Enable BGP with v6 link-local only\n"
2864 "Member of the peer-group\n"
16cedbb0 2865 "Peer-group name\n")
4c48cf63 2866{
d62a17ae 2867 int idx_word = 1;
2868 int idx_peer_group_word = 5;
31500417 2869
d62a17ae 2870 if (argc > idx_peer_group_word)
2871 return peer_conf_interface_get(
2872 vty, argv[idx_word]->arg, AFI_IP, SAFI_UNICAST, 1,
2873 argv[idx_peer_group_word]->arg, NULL);
31500417 2874
d62a17ae 2875 return peer_conf_interface_get(vty, argv[idx_word]->arg, AFI_IP,
2876 SAFI_UNICAST, 1, NULL, NULL);
4c48cf63
DW		 2877}
2878
a80beece 2879
b3a39dc5
DD		 2880DEFUN (neighbor_interface_config_remote_as,
2881 neighbor_interface_config_remote_as_cmd,
3a2d747c 2882 "neighbor WORD interface remote-as <(1-4294967295)|internal|external>",
b3a39dc5
DD		 2883 NEIGHBOR_STR
2884 "Interface name or neighbor tag\n"
2885 "Enable BGP on interface\n"
3a2d747c 2886 "Specify a BGP neighbor\n"
d7fa34c1 2887 AS_STR
3a2d747c
QY		 2888 "Internal BGP peer\n"
2889 "External BGP peer\n")
b3a39dc5 2890{
d62a17ae 2891 int idx_word = 1;
2892 int idx_remote_as = 4;
2893 return peer_conf_interface_get(vty, argv[idx_word]->arg, AFI_IP,
2894 SAFI_UNICAST, 0, NULL,
2895 argv[idx_remote_as]->arg);
b3a39dc5
DD		 2896}
2897
2898DEFUN (neighbor_interface_v6only_config_remote_as,
2899 neighbor_interface_v6only_config_remote_as_cmd,
3a2d747c 2900 "neighbor WORD interface v6only remote-as <(1-4294967295)|internal|external>",
b3a39dc5
DD		 2901 NEIGHBOR_STR
2902 "Interface name or neighbor tag\n"
3a2d747c 2903 "Enable BGP with v6 link-local only\n"
b3a39dc5 2904 "Enable BGP on interface\n"
3a2d747c 2905 "Specify a BGP neighbor\n"
d7fa34c1 2906 AS_STR
3a2d747c
QY		 2907 "Internal BGP peer\n"
2908 "External BGP peer\n")
b3a39dc5 2909{
d62a17ae 2910 int idx_word = 1;
2911 int idx_remote_as = 5;
2912 return peer_conf_interface_get(vty, argv[idx_word]->arg, AFI_IP,
2913 SAFI_UNICAST, 1, NULL,
2914 argv[idx_remote_as]->arg);
b3a39dc5
DD		 2915}
2916
718e3744 2917DEFUN (neighbor_peer_group,
2918 neighbor_peer_group_cmd,
2919 "neighbor WORD peer-group",
2920 NEIGHBOR_STR
a80beece 2921 "Interface name or neighbor tag\n"
718e3744 2922 "Configure peer-group\n")
2923{
d62a17ae 2924 VTY_DECLVAR_CONTEXT(bgp, bgp);
2925 int idx_word = 1;
2926 struct peer *peer;
2927 struct peer_group *group;
718e3744 2928
d62a17ae 2929 peer = peer_lookup_by_conf_if(bgp, argv[idx_word]->arg);
2930 if (peer) {
2931 vty_out(vty, "%% Name conflict with interface: \n");
2932 return CMD_WARNING_CONFIG_FAILED;
2933 }
718e3744 2934
d62a17ae 2935 group = peer_group_get(bgp, argv[idx_word]->arg);
2936 if (!group) {
2937 vty_out(vty, "%% BGP failed to find or create peer-group\n");
2938 return CMD_WARNING_CONFIG_FAILED;
2939 }
718e3744 2940
d62a17ae 2941 return CMD_SUCCESS;
718e3744 2942}
2943
2944DEFUN (no_neighbor,
2945 no_neighbor_cmd,
dab8cd00 2946 "no neighbor <WORD|<A.B.C.D|X:X::X:X> [remote-as <(1-4294967295)|internal|external>]>",
718e3744 2947 NO_STR
2948 NEIGHBOR_STR
3a2d747c
QY		 2949 NEIGHBOR_ADDR_STR2
2950 "Specify a BGP neighbor\n"
2951 AS_STR
2952 "Internal BGP peer\n"
2953 "External BGP peer\n")
718e3744 2954{
d62a17ae 2955 VTY_DECLVAR_CONTEXT(bgp, bgp);
2956 int idx_peer = 2;
2957 int ret;
2958 union sockunion su;
2959 struct peer_group *group;
2960 struct peer *peer;
2961 struct peer *other;
2962
2963 ret = str2sockunion(argv[idx_peer]->arg, &su);
2964 if (ret < 0) {
2965 /* look up for neighbor by interface name config. */
2966 peer = peer_lookup_by_conf_if(bgp, argv[idx_peer]->arg);
2967 if (peer) {
2968 /* Request zebra to terminate IPv6 RAs on this
2969 * interface. */
2970 if (peer->ifp)
2971 bgp_zebra_terminate_radv(peer->bgp, peer);
2972 peer_delete(peer);
2973 return CMD_SUCCESS;
2974 }
f14e6fdb 2975
d62a17ae 2976 group = peer_group_lookup(bgp, argv[idx_peer]->arg);
2977 if (group)
2978 peer_group_delete(group);
2979 else {
2980 vty_out(vty, "%% Create the peer-group first\n");
2981 return CMD_WARNING_CONFIG_FAILED;
2982 }
2983 } else {
2984 peer = peer_lookup(bgp, &su);
2985 if (peer) {
2986 if (peer_dynamic_neighbor(peer)) {
2987 vty_out(vty,
2988 "%% Operation not allowed on a dynamic neighbor\n");
2989 return CMD_WARNING_CONFIG_FAILED;
2990 }
2991
2992 other = peer->doppelganger;
2993 peer_delete(peer);
2994 if (other && other->status != Deleted)
2995 peer_delete(other);
2996 }
1ff9a340 2997 }
718e3744 2998
d62a17ae 2999 return CMD_SUCCESS;
718e3744 3000}
3001
a80beece
DS		 3002DEFUN (no_neighbor_interface_config,
3003 no_neighbor_interface_config_cmd,
31500417 3004 "no neighbor WORD interface [v6only] [peer-group WORD] [remote-as <(1-4294967295)|internal|external>]",
a80beece
DS		 3005 NO_STR
3006 NEIGHBOR_STR
3007 "Interface name\n"
31500417
DW		 3008 "Configure BGP on interface\n"
3009 "Enable BGP with v6 link-local only\n"
3010 "Member of the peer-group\n"
16cedbb0 3011 "Peer-group name\n"
3a2d747c
QY		 3012 "Specify a BGP neighbor\n"
3013 AS_STR
3014 "Internal BGP peer\n"
3015 "External BGP peer\n")
a80beece 3016{
d62a17ae 3017 VTY_DECLVAR_CONTEXT(bgp, bgp);
3018 int idx_word = 2;
3019 struct peer *peer;
3020
3021 /* look up for neighbor by interface name config. */
3022 peer = peer_lookup_by_conf_if(bgp, argv[idx_word]->arg);
3023 if (peer) {
3024 /* Request zebra to terminate IPv6 RAs on this interface. */
3025 if (peer->ifp)
3026 bgp_zebra_terminate_radv(peer->bgp, peer);
3027 peer_delete(peer);
3028 } else {
3029 vty_out(vty, "%% Create the bgp interface first\n");
3030 return CMD_WARNING_CONFIG_FAILED;
3031 }
3032 return CMD_SUCCESS;
a80beece
DS		 3033}
3034
718e3744 3035DEFUN (no_neighbor_peer_group,
3036 no_neighbor_peer_group_cmd,
3037 "no neighbor WORD peer-group",
3038 NO_STR
3039 NEIGHBOR_STR
3040 "Neighbor tag\n"
3041 "Configure peer-group\n")
3042{
d62a17ae 3043 VTY_DECLVAR_CONTEXT(bgp, bgp);
3044 int idx_word = 2;
3045 struct peer_group *group;
718e3744 3046
d62a17ae 3047 group = peer_group_lookup(bgp, argv[idx_word]->arg);
3048 if (group)
3049 peer_group_delete(group);
3050 else {
3051 vty_out(vty, "%% Create the peer-group first\n");
3052 return CMD_WARNING_CONFIG_FAILED;
3053 }
3054 return CMD_SUCCESS;
718e3744 3055}
3056
a80beece
DS		 3057DEFUN (no_neighbor_interface_peer_group_remote_as,
3058 no_neighbor_interface_peer_group_remote_as_cmd,
9ccf14f7 3059 "no neighbor WORD remote-as <(1-4294967295)|internal|external>",
718e3744 3060 NO_STR
3061 NEIGHBOR_STR
a80beece 3062 "Interface name or neighbor tag\n"
718e3744 3063 "Specify a BGP neighbor\n"
3a2d747c
QY		 3064 AS_STR
3065 "Internal BGP peer\n"
3066 "External BGP peer\n")
718e3744 3067{
d62a17ae 3068 VTY_DECLVAR_CONTEXT(bgp, bgp);
3069 int idx_word = 2;
3070 struct peer_group *group;
3071 struct peer *peer;
3072
3073 /* look up for neighbor by interface name config. */
3074 peer = peer_lookup_by_conf_if(bgp, argv[idx_word]->arg);
3075 if (peer) {
3076 peer_as_change(peer, 0, AS_SPECIFIED);
3077 return CMD_SUCCESS;
3078 }
3079
3080 group = peer_group_lookup(bgp, argv[idx_word]->arg);
3081 if (group)
3082 peer_group_remote_as_delete(group);
3083 else {
3084 vty_out(vty, "%% Create the peer-group or interface first\n");
3085 return CMD_WARNING_CONFIG_FAILED;
3086 }
3087 return CMD_SUCCESS;
718e3744 3088}
6b0655a2 3089
718e3744 3090DEFUN (neighbor_local_as,
3091 neighbor_local_as_cmd,
9ccf14f7 3092 "neighbor <A.B.C.D|X:X::X:X|WORD> local-as (1-4294967295)",
718e3744 3093 NEIGHBOR_STR
3094 NEIGHBOR_ADDR_STR2
3095 "Specify a local-as number\n"
3096 "AS number used as local AS\n")
3097{
d62a17ae 3098 int idx_peer = 1;
3099 int idx_number = 3;
3100 struct peer *peer;
3101 int ret;
3102 as_t as;
718e3744 3103
d62a17ae 3104 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
3105 if (!peer)
3106 return CMD_WARNING_CONFIG_FAILED;
718e3744 3107
d62a17ae 3108 as = strtoul(argv[idx_number]->arg, NULL, 10);
3109 ret = peer_local_as_set(peer, as, 0, 0);
3110 return bgp_vty_return(vty, ret);
718e3744 3111}
3112
3113DEFUN (neighbor_local_as_no_prepend,
3114 neighbor_local_as_no_prepend_cmd,
9ccf14f7 3115 "neighbor <A.B.C.D|X:X::X:X|WORD> local-as (1-4294967295) no-prepend",
718e3744 3116 NEIGHBOR_STR
3117 NEIGHBOR_ADDR_STR2
3118 "Specify a local-as number\n"
3119 "AS number used as local AS\n"
3120 "Do not prepend local-as to updates from ebgp peers\n")
3121{
d62a17ae 3122 int idx_peer = 1;
3123 int idx_number = 3;
3124 struct peer *peer;
3125 int ret;
3126 as_t as;
718e3744 3127
d62a17ae 3128 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
3129 if (!peer)
3130 return CMD_WARNING_CONFIG_FAILED;
718e3744 3131
d62a17ae 3132 as = strtoul(argv[idx_number]->arg, NULL, 10);
3133 ret = peer_local_as_set(peer, as, 1, 0);
3134 return bgp_vty_return(vty, ret);
718e3744 3135}
3136
9d3f9705
AC		 3137DEFUN (neighbor_local_as_no_prepend_replace_as,
3138 neighbor_local_as_no_prepend_replace_as_cmd,
9ccf14f7 3139 "neighbor <A.B.C.D|X:X::X:X|WORD> local-as (1-4294967295) no-prepend replace-as",
9d3f9705
AC		 3140 NEIGHBOR_STR
3141 NEIGHBOR_ADDR_STR2
3142 "Specify a local-as number\n"
3143 "AS number used as local AS\n"
3144 "Do not prepend local-as to updates from ebgp peers\n"
3145 "Do not prepend local-as to updates from ibgp peers\n")
3146{
d62a17ae 3147 int idx_peer = 1;
3148 int idx_number = 3;
3149 struct peer *peer;
3150 int ret;
3151 as_t as;
9d3f9705 3152
d62a17ae 3153 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
3154 if (!peer)
3155 return CMD_WARNING_CONFIG_FAILED;
9d3f9705 3156
d62a17ae 3157 as = strtoul(argv[idx_number]->arg, NULL, 10);
3158 ret = peer_local_as_set(peer, as, 1, 1);
3159 return bgp_vty_return(vty, ret);
9d3f9705
AC		 3160}
3161
718e3744 3162DEFUN (no_neighbor_local_as,
3163 no_neighbor_local_as_cmd,
a636c635 3164 "no neighbor <A.B.C.D|X:X::X:X|WORD> local-as [(1-4294967295) [no-prepend [replace-as]]]",
718e3744 3165 NO_STR
3166 NEIGHBOR_STR
3167 NEIGHBOR_ADDR_STR2
a636c635
DW		 3168 "Specify a local-as number\n"
3169 "AS number used as local AS\n"
3170 "Do not prepend local-as to updates from ebgp peers\n"
3171 "Do not prepend local-as to updates from ibgp peers\n")
718e3744 3172{
d62a17ae 3173 int idx_peer = 2;
3174 struct peer *peer;
3175 int ret;
718e3744 3176
d62a17ae 3177 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
3178 if (!peer)
3179 return CMD_WARNING_CONFIG_FAILED;
718e3744 3180
d62a17ae 3181 ret = peer_local_as_unset(peer);
3182 return bgp_vty_return(vty, ret);
718e3744 3183}
3184
718e3744 3185
3f9c7369
DS		 3186DEFUN (neighbor_solo,
3187 neighbor_solo_cmd,
9ccf14f7 3188 "neighbor <A.B.C.D|X:X::X:X|WORD> solo",
3f9c7369
DS		 3189 NEIGHBOR_STR
3190 NEIGHBOR_ADDR_STR2
3191 "Solo peer - part of its own update group\n")
3192{
d62a17ae 3193 int idx_peer = 1;
3194 struct peer *peer;
3195 int ret;
3f9c7369 3196
d62a17ae 3197 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
3198 if (!peer)
3199 return CMD_WARNING_CONFIG_FAILED;
3f9c7369 3200
d62a17ae 3201 ret = update_group_adjust_soloness(peer, 1);
3202 return bgp_vty_return(vty, ret);
3f9c7369
DS		 3203}
3204
3205DEFUN (no_neighbor_solo,
3206 no_neighbor_solo_cmd,
9ccf14f7 3207 "no neighbor <A.B.C.D|X:X::X:X|WORD> solo",
3f9c7369
DS		 3208 NO_STR
3209 NEIGHBOR_STR
3210 NEIGHBOR_ADDR_STR2
3211 "Solo peer - part of its own update group\n")
3212{
d62a17ae 3213 int idx_peer = 2;
3214 struct peer *peer;
3215 int ret;
3f9c7369 3216
d62a17ae 3217 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
3218 if (!peer)
3219 return CMD_WARNING_CONFIG_FAILED;
3f9c7369 3220
d62a17ae 3221 ret = update_group_adjust_soloness(peer, 0);
3222 return bgp_vty_return(vty, ret);
3f9c7369
DS		 3223}
3224
0df7c91f
PJ		 3225DEFUN (neighbor_password,
3226 neighbor_password_cmd,
9ccf14f7 3227 "neighbor <A.B.C.D|X:X::X:X|WORD> password LINE",
0df7c91f
PJ		 3228 NEIGHBOR_STR
3229 NEIGHBOR_ADDR_STR2
3230 "Set a password\n"
3231 "The password\n")
3232{
d62a17ae 3233 int idx_peer = 1;
3234 int idx_line = 3;
3235 struct peer *peer;
3236 int ret;
0df7c91f 3237
d62a17ae 3238 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
3239 if (!peer)
3240 return CMD_WARNING_CONFIG_FAILED;
0df7c91f 3241
d62a17ae 3242 ret = peer_password_set(peer, argv[idx_line]->arg);
3243 return bgp_vty_return(vty, ret);
0df7c91f
PJ		 3244}
3245
3246DEFUN (no_neighbor_password,
3247 no_neighbor_password_cmd,
a636c635 3248 "no neighbor <A.B.C.D|X:X::X:X|WORD> password [LINE]",
0df7c91f
PJ		 3249 NO_STR
3250 NEIGHBOR_STR
3251 NEIGHBOR_ADDR_STR2
16cedbb0
QY		 3252 "Set a password\n"
3253 "The password\n")
0df7c91f 3254{
d62a17ae 3255 int idx_peer = 2;
3256 struct peer *peer;
3257 int ret;
0df7c91f 3258
d62a17ae 3259 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
3260 if (!peer)
3261 return CMD_WARNING_CONFIG_FAILED;
0df7c91f 3262
d62a17ae 3263 ret = peer_password_unset(peer);
3264 return bgp_vty_return(vty, ret);
0df7c91f 3265}
6b0655a2 3266
718e3744 3267DEFUN (neighbor_activate,
3268 neighbor_activate_cmd,
9ccf14f7 3269 "neighbor <A.B.C.D|X:X::X:X|WORD> activate",
718e3744 3270 NEIGHBOR_STR
3271 NEIGHBOR_ADDR_STR2
3272 "Enable the Address Family for this Neighbor\n")
3273{
d62a17ae 3274 int idx_peer = 1;
3275 int ret;
3276 struct peer *peer;
718e3744 3277
d62a17ae 3278 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
3279 if (!peer)
3280 return CMD_WARNING_CONFIG_FAILED;
718e3744 3281
d62a17ae 3282 ret = peer_activate(peer, bgp_node_afi(vty), bgp_node_safi(vty));
3283 return bgp_vty_return(vty, ret);
718e3744 3284}
3285
d62a17ae 3286ALIAS_HIDDEN(neighbor_activate, neighbor_activate_hidden_cmd,
3287 "neighbor <A.B.C.D|X:X::X:X|WORD> activate",
3288 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3289 "Enable the Address Family for this Neighbor\n")
596c17ba 3290
718e3744 3291DEFUN (no_neighbor_activate,
3292 no_neighbor_activate_cmd,
9ccf14f7 3293 "no neighbor <A.B.C.D|X:X::X:X|WORD> activate",
718e3744 3294 NO_STR
3295 NEIGHBOR_STR
3296 NEIGHBOR_ADDR_STR2
3297 "Enable the Address Family for this Neighbor\n")
3298{
d62a17ae 3299 int idx_peer = 2;
3300 int ret;
3301 struct peer *peer;
718e3744 3302
d62a17ae 3303 /* Lookup peer. */
3304 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
3305 if (!peer)
3306 return CMD_WARNING_CONFIG_FAILED;
718e3744 3307
d62a17ae 3308 ret = peer_deactivate(peer, bgp_node_afi(vty), bgp_node_safi(vty));
3309 return bgp_vty_return(vty, ret);
718e3744 3310}
6b0655a2 3311
d62a17ae 3312ALIAS_HIDDEN(no_neighbor_activate, no_neighbor_activate_hidden_cmd,
3313 "no neighbor <A.B.C.D|X:X::X:X|WORD> activate",
3314 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3315 "Enable the Address Family for this Neighbor\n")
596c17ba 3316
718e3744 3317DEFUN (neighbor_set_peer_group,
3318 neighbor_set_peer_group_cmd,
9ccf14f7 3319 "neighbor <A.B.C.D|X:X::X:X|WORD> peer-group WORD",
718e3744 3320 NEIGHBOR_STR
a80beece 3321 NEIGHBOR_ADDR_STR2
718e3744 3322 "Member of the peer-group\n"
16cedbb0 3323 "Peer-group name\n")
718e3744 3324{
d62a17ae 3325 VTY_DECLVAR_CONTEXT(bgp, bgp);
3326 int idx_peer = 1;
3327 int idx_word = 3;
3328 int ret;
3329 as_t as;
3330 union sockunion su;
3331 struct peer *peer;
3332 struct peer_group *group;
3333
3334 peer = NULL;
3335
3336 ret = str2sockunion(argv[idx_peer]->arg, &su);
3337 if (ret < 0) {
3338 peer = peer_lookup_by_conf_if(bgp, argv[idx_peer]->arg);
3339 if (!peer) {
3340 vty_out(vty, "%% Malformed address or name: %s\n",
3341 argv[idx_peer]->arg);
3342 return CMD_WARNING_CONFIG_FAILED;
3343 }
3344 } else {
3345 if (peer_address_self_check(bgp, &su)) {
3346 vty_out(vty,
3347 "%% Can not configure the local system as neighbor\n");
3348 return CMD_WARNING_CONFIG_FAILED;
3349 }
3350
3351 /* Disallow for dynamic neighbor. */
3352 peer = peer_lookup(bgp, &su);
3353 if (peer && peer_dynamic_neighbor(peer)) {
3354 vty_out(vty,
3355 "%% Operation not allowed on a dynamic neighbor\n");
3356 return CMD_WARNING_CONFIG_FAILED;
3357 }
3358 }
3359
3360 group = peer_group_lookup(bgp, argv[idx_word]->arg);
3361 if (!group) {
3362 vty_out(vty, "%% Configure the peer-group first\n");
3363 return CMD_WARNING_CONFIG_FAILED;
3364 }
3365
3366 ret = peer_group_bind(bgp, &su, peer, group, &as);
3367
3368 if (ret == BGP_ERR_PEER_GROUP_PEER_TYPE_DIFFERENT) {
3369 vty_out(vty,
3370 "%% Peer with AS %u cannot be in this peer-group, members must be all internal or all external\n",
3371 as);
3372 return CMD_WARNING_CONFIG_FAILED;
3373 }
3374
3375 return bgp_vty_return(vty, ret);
3376}
3377
3378ALIAS_HIDDEN(neighbor_set_peer_group, neighbor_set_peer_group_hidden_cmd,
3379 "neighbor <A.B.C.D|X:X::X:X|WORD> peer-group WORD",
3380 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3381 "Member of the peer-group\n"
3382 "Peer-group name\n")
596c17ba 3383
718e3744 3384DEFUN (no_neighbor_set_peer_group,
3385 no_neighbor_set_peer_group_cmd,
9ccf14f7 3386 "no neighbor <A.B.C.D|X:X::X:X|WORD> peer-group WORD",
718e3744 3387 NO_STR
3388 NEIGHBOR_STR
a80beece 3389 NEIGHBOR_ADDR_STR2
718e3744 3390 "Member of the peer-group\n"
16cedbb0 3391 "Peer-group name\n")
718e3744 3392{
d62a17ae 3393 VTY_DECLVAR_CONTEXT(bgp, bgp);
3394 int idx_peer = 2;
3395 int idx_word = 4;
3396 int ret;
3397 struct peer *peer;
3398 struct peer_group *group;
3399
3400 peer = peer_lookup_vty(vty, argv[idx_peer]->arg);
3401 if (!peer)
3402 return CMD_WARNING_CONFIG_FAILED;
3403
3404 group = peer_group_lookup(bgp, argv[idx_word]->arg);
3405 if (!group) {
3406 vty_out(vty, "%% Configure the peer-group first\n");
3407 return CMD_WARNING_CONFIG_FAILED;
3408 }
718e3744 3409
827ed707 3410 ret = peer_delete(peer);
718e3744 3411
d62a17ae 3412 return bgp_vty_return(vty, ret);
718e3744 3413}
6b0655a2 3414
d62a17ae 3415ALIAS_HIDDEN(no_neighbor_set_peer_group, no_neighbor_set_peer_group_hidden_cmd,
3416 "no neighbor <A.B.C.D|X:X::X:X|WORD> peer-group WORD",
3417 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3418 "Member of the peer-group\n"
3419 "Peer-group name\n")
596c17ba 3420
d62a17ae 3421static int peer_flag_modify_vty(struct vty *vty, const char *ip_str,
d7c0a89a 3422 uint16_t flag, int set)
718e3744 3423{
d62a17ae 3424 int ret;
3425 struct peer *peer;
718e3744 3426
d62a17ae 3427 peer = peer_and_group_lookup_vty(vty, ip_str);
3428 if (!peer)
3429 return CMD_WARNING_CONFIG_FAILED;
718e3744 3430
7ebe625c
QY		 3431 /*
3432 * If 'neighbor <interface>', then this is for directly connected peers,
3433 * we should not accept disable-connected-check.
3434 */
3435 if (peer->conf_if && (flag == PEER_FLAG_DISABLE_CONNECTED_CHECK)) {
3436 vty_out(vty,
3437 "%s is directly connected peer, cannot accept disable-"
3438 "connected-check\n",
3439 ip_str);
3440 return CMD_WARNING_CONFIG_FAILED;
3441 }
3442
d62a17ae 3443 if (!set && flag == PEER_FLAG_SHUTDOWN)
3444 peer_tx_shutdown_message_unset(peer);
ae9b0e11 3445
d62a17ae 3446 if (set)
3447 ret = peer_flag_set(peer, flag);
3448 else
3449 ret = peer_flag_unset(peer, flag);
718e3744 3450
d62a17ae 3451 return bgp_vty_return(vty, ret);
718e3744 3452}
3453
d7c0a89a 3454static int peer_flag_set_vty(struct vty *vty, const char *ip_str, uint16_t flag)
718e3744 3455{
d62a17ae 3456 return peer_flag_modify_vty(vty, ip_str, flag, 1);
718e3744 3457}
3458
d62a17ae 3459static int peer_flag_unset_vty(struct vty *vty, const char *ip_str,
d7c0a89a 3460 uint16_t flag)
718e3744 3461{
d62a17ae 3462 return peer_flag_modify_vty(vty, ip_str, flag, 0);
718e3744 3463}
3464
3465/* neighbor passive. */
3466DEFUN (neighbor_passive,
3467 neighbor_passive_cmd,
9ccf14f7 3468 "neighbor <A.B.C.D|X:X::X:X|WORD> passive",
718e3744 3469 NEIGHBOR_STR
3470 NEIGHBOR_ADDR_STR2
3471 "Don't send open messages to this neighbor\n")
3472{
d62a17ae 3473 int idx_peer = 1;
3474 return peer_flag_set_vty(vty, argv[idx_peer]->arg, PEER_FLAG_PASSIVE);
718e3744 3475}
3476
3477DEFUN (no_neighbor_passive,
3478 no_neighbor_passive_cmd,
9ccf14f7 3479 "no neighbor <A.B.C.D|X:X::X:X|WORD> passive",
718e3744 3480 NO_STR
3481 NEIGHBOR_STR
3482 NEIGHBOR_ADDR_STR2
3483 "Don't send open messages to this neighbor\n")
3484{
d62a17ae 3485 int idx_peer = 2;
3486 return peer_flag_unset_vty(vty, argv[idx_peer]->arg, PEER_FLAG_PASSIVE);
718e3744 3487}
6b0655a2 3488
718e3744 3489/* neighbor shutdown. */
73d70fa6
DL		 3490DEFUN (neighbor_shutdown_msg,
3491 neighbor_shutdown_msg_cmd,
3492 "neighbor <A.B.C.D|X:X::X:X|WORD> shutdown message MSG...",
718e3744 3493 NEIGHBOR_STR
3494 NEIGHBOR_ADDR_STR2
73d70fa6
DL		 3495 "Administratively shut down this neighbor\n"
3496 "Add a shutdown message (draft-ietf-idr-shutdown-06)\n"
3497 "Shutdown message\n")
718e3744 3498{
d62a17ae 3499 int idx_peer = 1;
73d70fa6 3500
d62a17ae 3501 if (argc >= 5) {
3502 struct peer *peer =
3503 peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
3504 char *message;
73d70fa6 3505
d62a17ae 3506 if (!peer)
3507 return CMD_WARNING_CONFIG_FAILED;
3508 message = argv_concat(argv, argc, 4);
3509 peer_tx_shutdown_message_set(peer, message);
3510 XFREE(MTYPE_TMP, message);
3511 }
73d70fa6 3512
d62a17ae 3513 return peer_flag_set_vty(vty, argv[idx_peer]->arg, PEER_FLAG_SHUTDOWN);
718e3744 3514}
3515
d62a17ae 3516ALIAS(neighbor_shutdown_msg, neighbor_shutdown_cmd,
3517 "neighbor <A.B.C.D|X:X::X:X|WORD> shutdown",
3518 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3519 "Administratively shut down this neighbor\n")
73d70fa6
DL		 3520
3521DEFUN (no_neighbor_shutdown_msg,
3522 no_neighbor_shutdown_msg_cmd,
3523 "no neighbor <A.B.C.D|X:X::X:X|WORD> shutdown message MSG...",
3524 NO_STR
3525 NEIGHBOR_STR
3526 NEIGHBOR_ADDR_STR2
3527 "Administratively shut down this neighbor\n"
3528 "Remove a shutdown message (draft-ietf-idr-shutdown-06)\n"
3529 "Shutdown message\n")
718e3744 3530{
d62a17ae 3531 int idx_peer = 2;
73d70fa6 3532
d62a17ae 3533 return peer_flag_unset_vty(vty, argv[idx_peer]->arg,
3534 PEER_FLAG_SHUTDOWN);
718e3744 3535}
6b0655a2 3536
d62a17ae 3537ALIAS(no_neighbor_shutdown_msg, no_neighbor_shutdown_cmd,
3538 "no neighbor <A.B.C.D|X:X::X:X|WORD> shutdown",
3539 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3540 "Administratively shut down this neighbor\n")
73d70fa6 3541
718e3744 3542/* neighbor capability dynamic. */
3543DEFUN (neighbor_capability_dynamic,
3544 neighbor_capability_dynamic_cmd,
9ccf14f7 3545 "neighbor <A.B.C.D|X:X::X:X|WORD> capability dynamic",
718e3744 3546 NEIGHBOR_STR
3547 NEIGHBOR_ADDR_STR2
3548 "Advertise capability to the peer\n"
3549 "Advertise dynamic capability to this neighbor\n")
3550{
d62a17ae 3551 int idx_peer = 1;
3552 return peer_flag_set_vty(vty, argv[idx_peer]->arg,
3553 PEER_FLAG_DYNAMIC_CAPABILITY);
718e3744 3554}
3555
3556DEFUN (no_neighbor_capability_dynamic,
3557 no_neighbor_capability_dynamic_cmd,
9ccf14f7 3558 "no neighbor <A.B.C.D|X:X::X:X|WORD> capability dynamic",
718e3744 3559 NO_STR
3560 NEIGHBOR_STR
3561 NEIGHBOR_ADDR_STR2
3562 "Advertise capability to the peer\n"
3563 "Advertise dynamic capability to this neighbor\n")
3564{
d62a17ae 3565 int idx_peer = 2;
3566 return peer_flag_unset_vty(vty, argv[idx_peer]->arg,
3567 PEER_FLAG_DYNAMIC_CAPABILITY);
718e3744 3568}
6b0655a2 3569
718e3744 3570/* neighbor dont-capability-negotiate */
3571DEFUN (neighbor_dont_capability_negotiate,
3572 neighbor_dont_capability_negotiate_cmd,
9ccf14f7 3573 "neighbor <A.B.C.D|X:X::X:X|WORD> dont-capability-negotiate",
718e3744 3574 NEIGHBOR_STR
3575 NEIGHBOR_ADDR_STR2
3576 "Do not perform capability negotiation\n")
3577{
d62a17ae 3578 int idx_peer = 1;
3579 return peer_flag_set_vty(vty, argv[idx_peer]->arg,
3580 PEER_FLAG_DONT_CAPABILITY);
718e3744 3581}
3582
3583DEFUN (no_neighbor_dont_capability_negotiate,
3584 no_neighbor_dont_capability_negotiate_cmd,
9ccf14f7 3585 "no neighbor <A.B.C.D|X:X::X:X|WORD> dont-capability-negotiate",
718e3744 3586 NO_STR
3587 NEIGHBOR_STR
3588 NEIGHBOR_ADDR_STR2
3589 "Do not perform capability negotiation\n")
3590{
d62a17ae 3591 int idx_peer = 2;
3592 return peer_flag_unset_vty(vty, argv[idx_peer]->arg,
3593 PEER_FLAG_DONT_CAPABILITY);
718e3744 3594}
6b0655a2 3595
8a92a8a0
DS		 3596/* neighbor capability extended next hop encoding */
3597DEFUN (neighbor_capability_enhe,
3598 neighbor_capability_enhe_cmd,
9ccf14f7 3599 "neighbor <A.B.C.D|X:X::X:X|WORD> capability extended-nexthop",
8a92a8a0
DS		 3600 NEIGHBOR_STR
3601 NEIGHBOR_ADDR_STR2
3602 "Advertise capability to the peer\n"
3603 "Advertise extended next-hop capability to the peer\n")
3604{
d62a17ae 3605 int idx_peer = 1;
3606 return peer_flag_set_vty(vty, argv[idx_peer]->arg,
3607 PEER_FLAG_CAPABILITY_ENHE);
8a92a8a0
DS		 3608}
3609
3610DEFUN (no_neighbor_capability_enhe,
3611 no_neighbor_capability_enhe_cmd,
9ccf14f7 3612 "no neighbor <A.B.C.D|X:X::X:X|WORD> capability extended-nexthop",
8a92a8a0
DS		 3613 NO_STR
3614 NEIGHBOR_STR
3615 NEIGHBOR_ADDR_STR2
3616 "Advertise capability to the peer\n"
3617 "Advertise extended next-hop capability to the peer\n")
3618{
d62a17ae 3619 int idx_peer = 2;
3620 return peer_flag_unset_vty(vty, argv[idx_peer]->arg,
3621 PEER_FLAG_CAPABILITY_ENHE);
8a92a8a0
DS		 3622}
3623
d62a17ae 3624static int peer_af_flag_modify_vty(struct vty *vty, const char *peer_str,
d7c0a89a 3625 afi_t afi, safi_t safi, uint32_t flag,
d62a17ae 3626 int set)
718e3744 3627{
d62a17ae 3628 int ret;
3629 struct peer *peer;
718e3744 3630
d62a17ae 3631 peer = peer_and_group_lookup_vty(vty, peer_str);
3632 if (!peer)
3633 return CMD_WARNING_CONFIG_FAILED;
718e3744 3634
d62a17ae 3635 if (set)
3636 ret = peer_af_flag_set(peer, afi, safi, flag);
3637 else
3638 ret = peer_af_flag_unset(peer, afi, safi, flag);
718e3744 3639
d62a17ae 3640 return bgp_vty_return(vty, ret);
718e3744 3641}
3642
d62a17ae 3643static int peer_af_flag_set_vty(struct vty *vty, const char *peer_str,
d7c0a89a 3644 afi_t afi, safi_t safi, uint32_t flag)
718e3744 3645{
d62a17ae 3646 return peer_af_flag_modify_vty(vty, peer_str, afi, safi, flag, 1);
718e3744 3647}
3648
d62a17ae 3649static int peer_af_flag_unset_vty(struct vty *vty, const char *peer_str,
d7c0a89a 3650 afi_t afi, safi_t safi, uint32_t flag)
718e3744 3651{
d62a17ae 3652 return peer_af_flag_modify_vty(vty, peer_str, afi, safi, flag, 0);
718e3744 3653}
6b0655a2 3654
718e3744 3655/* neighbor capability orf prefix-list. */
3656DEFUN (neighbor_capability_orf_prefix,
3657 neighbor_capability_orf_prefix_cmd,
9ccf14f7 3658 "neighbor <A.B.C.D|X:X::X:X|WORD> capability orf prefix-list <both|send|receive>",
718e3744 3659 NEIGHBOR_STR
3660 NEIGHBOR_ADDR_STR2
3661 "Advertise capability to the peer\n"
3662 "Advertise ORF capability to the peer\n"
3663 "Advertise prefixlist ORF capability to this neighbor\n"
3664 "Capability to SEND and RECEIVE the ORF to/from this neighbor\n"
3665 "Capability to RECEIVE the ORF from this neighbor\n"
3666 "Capability to SEND the ORF to this neighbor\n")
3667{
d62a17ae 3668 int idx_peer = 1;
3669 int idx_send_recv = 5;
d7c0a89a 3670 uint16_t flag = 0;
d62a17ae 3671
3672 if (strmatch(argv[idx_send_recv]->text, "send"))
3673 flag = PEER_FLAG_ORF_PREFIX_SM;
3674 else if (strmatch(argv[idx_send_recv]->text, "receive"))
3675 flag = PEER_FLAG_ORF_PREFIX_RM;
3676 else if (strmatch(argv[idx_send_recv]->text, "both"))
3677 flag = PEER_FLAG_ORF_PREFIX_SM | PEER_FLAG_ORF_PREFIX_RM;
3678 else {
3679 vty_out(vty, "%% BGP invalid orf prefix-list option\n");
3680 return CMD_WARNING_CONFIG_FAILED;
3681 }
3682
3683 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
3684 bgp_node_safi(vty), flag);
3685}
3686
3687ALIAS_HIDDEN(
3688 neighbor_capability_orf_prefix,
3689 neighbor_capability_orf_prefix_hidden_cmd,
3690 "neighbor <A.B.C.D|X:X::X:X|WORD> capability orf prefix-list <both|send|receive>",
3691 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3692 "Advertise capability to the peer\n"
3693 "Advertise ORF capability to the peer\n"
3694 "Advertise prefixlist ORF capability to this neighbor\n"
3695 "Capability to SEND and RECEIVE the ORF to/from this neighbor\n"
3696 "Capability to RECEIVE the ORF from this neighbor\n"
3697 "Capability to SEND the ORF to this neighbor\n")
596c17ba 3698
718e3744 3699DEFUN (no_neighbor_capability_orf_prefix,
3700 no_neighbor_capability_orf_prefix_cmd,
9ccf14f7 3701 "no neighbor <A.B.C.D|X:X::X:X|WORD> capability orf prefix-list <both|send|receive>",
718e3744 3702 NO_STR
3703 NEIGHBOR_STR
3704 NEIGHBOR_ADDR_STR2
3705 "Advertise capability to the peer\n"
3706 "Advertise ORF capability to the peer\n"
3707 "Advertise prefixlist ORF capability to this neighbor\n"
3708 "Capability to SEND and RECEIVE the ORF to/from this neighbor\n"
3709 "Capability to RECEIVE the ORF from this neighbor\n"
3710 "Capability to SEND the ORF to this neighbor\n")
3711{
d62a17ae 3712 int idx_peer = 2;
3713 int idx_send_recv = 6;
d7c0a89a 3714 uint16_t flag = 0;
d62a17ae 3715
3716 if (strmatch(argv[idx_send_recv]->text, "send"))
3717 flag = PEER_FLAG_ORF_PREFIX_SM;
3718 else if (strmatch(argv[idx_send_recv]->text, "receive"))
3719 flag = PEER_FLAG_ORF_PREFIX_RM;
3720 else if (strmatch(argv[idx_send_recv]->text, "both"))
3721 flag = PEER_FLAG_ORF_PREFIX_SM | PEER_FLAG_ORF_PREFIX_RM;
3722 else {
3723 vty_out(vty, "%% BGP invalid orf prefix-list option\n");
3724 return CMD_WARNING_CONFIG_FAILED;
3725 }
3726
3727 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
3728 bgp_node_afi(vty), bgp_node_safi(vty),
3729 flag);
3730}
3731
3732ALIAS_HIDDEN(
3733 no_neighbor_capability_orf_prefix,
3734 no_neighbor_capability_orf_prefix_hidden_cmd,
3735 "no neighbor <A.B.C.D|X:X::X:X|WORD> capability orf prefix-list <both|send|receive>",
3736 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3737 "Advertise capability to the peer\n"
3738 "Advertise ORF capability to the peer\n"
3739 "Advertise prefixlist ORF capability to this neighbor\n"
3740 "Capability to SEND and RECEIVE the ORF to/from this neighbor\n"
3741 "Capability to RECEIVE the ORF from this neighbor\n"
3742 "Capability to SEND the ORF to this neighbor\n")
596c17ba 3743
718e3744 3744/* neighbor next-hop-self. */
3745DEFUN (neighbor_nexthop_self,
3746 neighbor_nexthop_self_cmd,
9ccf14f7 3747 "neighbor <A.B.C.D|X:X::X:X|WORD> next-hop-self",
718e3744 3748 NEIGHBOR_STR
3749 NEIGHBOR_ADDR_STR2
a538debe 3750 "Disable the next hop calculation for this neighbor\n")
718e3744 3751{
d62a17ae 3752 int idx_peer = 1;
3753 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
3754 bgp_node_safi(vty), PEER_FLAG_NEXTHOP_SELF);
a538debe 3755}
9e7a53c1 3756
d62a17ae 3757ALIAS_HIDDEN(neighbor_nexthop_self, neighbor_nexthop_self_hidden_cmd,
3758 "neighbor <A.B.C.D|X:X::X:X|WORD> next-hop-self",
3759 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3760 "Disable the next hop calculation for this neighbor\n")
596c17ba 3761
a538debe
DS		 3762/* neighbor next-hop-self. */
3763DEFUN (neighbor_nexthop_self_force,
3764 neighbor_nexthop_self_force_cmd,
9ccf14f7 3765 "neighbor <A.B.C.D|X:X::X:X|WORD> next-hop-self force",
a538debe
DS		 3766 NEIGHBOR_STR
3767 NEIGHBOR_ADDR_STR2
3768 "Disable the next hop calculation for this neighbor\n"
3769 "Set the next hop to self for reflected routes\n")
3770{
d62a17ae 3771 int idx_peer = 1;
3772 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
3773 bgp_node_safi(vty),
3774 PEER_FLAG_FORCE_NEXTHOP_SELF);
718e3744 3775}
3776
d62a17ae 3777ALIAS_HIDDEN(neighbor_nexthop_self_force,
3778 neighbor_nexthop_self_force_hidden_cmd,
3779 "neighbor <A.B.C.D|X:X::X:X|WORD> next-hop-self force",
3780 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3781 "Disable the next hop calculation for this neighbor\n"
3782 "Set the next hop to self for reflected routes\n")
596c17ba 3783
718e3744 3784DEFUN (no_neighbor_nexthop_self,
3785 no_neighbor_nexthop_self_cmd,
9ccf14f7 3786 "no neighbor <A.B.C.D|X:X::X:X|WORD> next-hop-self",
718e3744 3787 NO_STR
3788 NEIGHBOR_STR
3789 NEIGHBOR_ADDR_STR2
a538debe 3790 "Disable the next hop calculation for this neighbor\n")
718e3744 3791{
d62a17ae 3792 int idx_peer = 2;
3793 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
3794 bgp_node_afi(vty), bgp_node_safi(vty),
3795 PEER_FLAG_NEXTHOP_SELF);
718e3744 3796}
6b0655a2 3797
d62a17ae 3798ALIAS_HIDDEN(no_neighbor_nexthop_self, no_neighbor_nexthop_self_hidden_cmd,
3799 "no neighbor <A.B.C.D|X:X::X:X|WORD> next-hop-self",
3800 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3801 "Disable the next hop calculation for this neighbor\n")
596c17ba 3802
88b8ed8d 3803DEFUN (no_neighbor_nexthop_self_force,
a538debe 3804 no_neighbor_nexthop_self_force_cmd,
9ccf14f7 3805 "no neighbor <A.B.C.D|X:X::X:X|WORD> next-hop-self force",
a538debe
DS		 3806 NO_STR
3807 NEIGHBOR_STR
3808 NEIGHBOR_ADDR_STR2
3809 "Disable the next hop calculation for this neighbor\n"
3810 "Set the next hop to self for reflected routes\n")
88b8ed8d 3811{
d62a17ae 3812 int idx_peer = 2;
3813 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
3814 bgp_node_afi(vty), bgp_node_safi(vty),
3815 PEER_FLAG_FORCE_NEXTHOP_SELF);
88b8ed8d 3816}
a538debe 3817
d62a17ae 3818ALIAS_HIDDEN(no_neighbor_nexthop_self_force,
3819 no_neighbor_nexthop_self_force_hidden_cmd,
3820 "no neighbor <A.B.C.D|X:X::X:X|WORD> next-hop-self force",
3821 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3822 "Disable the next hop calculation for this neighbor\n"
3823 "Set the next hop to self for reflected routes\n")
596c17ba 3824
c7122e14
DS		 3825/* neighbor as-override */
3826DEFUN (neighbor_as_override,
3827 neighbor_as_override_cmd,
9ccf14f7 3828 "neighbor <A.B.C.D|X:X::X:X|WORD> as-override",
c7122e14
DS		 3829 NEIGHBOR_STR
3830 NEIGHBOR_ADDR_STR2
3831 "Override ASNs in outbound updates if aspath equals remote-as\n")
3832{
d62a17ae 3833 int idx_peer = 1;
3834 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
3835 bgp_node_safi(vty), PEER_FLAG_AS_OVERRIDE);
c7122e14
DS		 3836}
3837
d62a17ae 3838ALIAS_HIDDEN(neighbor_as_override, neighbor_as_override_hidden_cmd,
3839 "neighbor <A.B.C.D|X:X::X:X|WORD> as-override",
3840 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3841 "Override ASNs in outbound updates if aspath equals remote-as\n")
596c17ba 3842
c7122e14
DS		 3843DEFUN (no_neighbor_as_override,
3844 no_neighbor_as_override_cmd,
9ccf14f7 3845 "no neighbor <A.B.C.D|X:X::X:X|WORD> as-override",
c7122e14
DS		 3846 NO_STR
3847 NEIGHBOR_STR
3848 NEIGHBOR_ADDR_STR2
3849 "Override ASNs in outbound updates if aspath equals remote-as\n")
3850{
d62a17ae 3851 int idx_peer = 2;
3852 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
3853 bgp_node_afi(vty), bgp_node_safi(vty),
3854 PEER_FLAG_AS_OVERRIDE);
c7122e14
DS		 3855}
3856
d62a17ae 3857ALIAS_HIDDEN(no_neighbor_as_override, no_neighbor_as_override_hidden_cmd,
3858 "no neighbor <A.B.C.D|X:X::X:X|WORD> as-override",
3859 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3860 "Override ASNs in outbound updates if aspath equals remote-as\n")
596c17ba 3861
718e3744 3862/* neighbor remove-private-AS. */
3863DEFUN (neighbor_remove_private_as,
3864 neighbor_remove_private_as_cmd,
9ccf14f7 3865 "neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS",
718e3744 3866 NEIGHBOR_STR
3867 NEIGHBOR_ADDR_STR2
5000f21c 3868 "Remove private ASNs in outbound updates\n")
718e3744 3869{
d62a17ae 3870 int idx_peer = 1;
3871 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
3872 bgp_node_safi(vty),
3873 PEER_FLAG_REMOVE_PRIVATE_AS);
718e3744 3874}
3875
d62a17ae 3876ALIAS_HIDDEN(neighbor_remove_private_as, neighbor_remove_private_as_hidden_cmd,
3877 "neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS",
3878 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3879 "Remove private ASNs in outbound updates\n")
596c17ba 3880
5000f21c
DS		 3881DEFUN (neighbor_remove_private_as_all,
3882 neighbor_remove_private_as_all_cmd,
9ccf14f7 3883 "neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS all",
5000f21c
DS		 3884 NEIGHBOR_STR
3885 NEIGHBOR_ADDR_STR2
3886 "Remove private ASNs in outbound updates\n"
efd7904e 3887 "Apply to all AS numbers\n")
5000f21c 3888{
d62a17ae 3889 int idx_peer = 1;
3890 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
3891 bgp_node_safi(vty),
3892 PEER_FLAG_REMOVE_PRIVATE_AS_ALL);
5000f21c
DS		 3893}
3894
d62a17ae 3895ALIAS_HIDDEN(neighbor_remove_private_as_all,
3896 neighbor_remove_private_as_all_hidden_cmd,
3897 "neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS all",
3898 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3899 "Remove private ASNs in outbound updates\n"
3900 "Apply to all AS numbers")
596c17ba 3901
5000f21c
DS		 3902DEFUN (neighbor_remove_private_as_replace_as,
3903 neighbor_remove_private_as_replace_as_cmd,
9ccf14f7 3904 "neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS replace-AS",
5000f21c
DS		 3905 NEIGHBOR_STR
3906 NEIGHBOR_ADDR_STR2
3907 "Remove private ASNs in outbound updates\n"
3908 "Replace private ASNs with our ASN in outbound updates\n")
3909{
d62a17ae 3910 int idx_peer = 1;
3911 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
3912 bgp_node_safi(vty),
3913 PEER_FLAG_REMOVE_PRIVATE_AS_REPLACE);
5000f21c
DS		 3914}
3915
d62a17ae 3916ALIAS_HIDDEN(neighbor_remove_private_as_replace_as,
3917 neighbor_remove_private_as_replace_as_hidden_cmd,
3918 "neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS replace-AS",
3919 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3920 "Remove private ASNs in outbound updates\n"
3921 "Replace private ASNs with our ASN in outbound updates\n")
596c17ba 3922
5000f21c
DS		 3923DEFUN (neighbor_remove_private_as_all_replace_as,
3924 neighbor_remove_private_as_all_replace_as_cmd,
9ccf14f7 3925 "neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS all replace-AS",
5000f21c
DS		 3926 NEIGHBOR_STR
3927 NEIGHBOR_ADDR_STR2
3928 "Remove private ASNs in outbound updates\n"
16cedbb0 3929 "Apply to all AS numbers\n"
5000f21c
DS		 3930 "Replace private ASNs with our ASN in outbound updates\n")
3931{
d62a17ae 3932 int idx_peer = 1;
3933 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
3934 bgp_node_safi(vty),
3935 PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE);
5000f21c
DS		 3936}
3937
d62a17ae 3938ALIAS_HIDDEN(
3939 neighbor_remove_private_as_all_replace_as,
3940 neighbor_remove_private_as_all_replace_as_hidden_cmd,
3941 "neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS all replace-AS",
3942 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3943 "Remove private ASNs in outbound updates\n"
3944 "Apply to all AS numbers\n"
3945 "Replace private ASNs with our ASN in outbound updates\n")
596c17ba 3946
718e3744 3947DEFUN (no_neighbor_remove_private_as,
3948 no_neighbor_remove_private_as_cmd,
9ccf14f7 3949 "no neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS",
718e3744 3950 NO_STR
3951 NEIGHBOR_STR
3952 NEIGHBOR_ADDR_STR2
5000f21c 3953 "Remove private ASNs in outbound updates\n")
718e3744 3954{
d62a17ae 3955 int idx_peer = 2;
3956 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
3957 bgp_node_afi(vty), bgp_node_safi(vty),
3958 PEER_FLAG_REMOVE_PRIVATE_AS);
718e3744 3959}
6b0655a2 3960
d62a17ae 3961ALIAS_HIDDEN(no_neighbor_remove_private_as,
3962 no_neighbor_remove_private_as_hidden_cmd,
3963 "no neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS",
3964 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3965 "Remove private ASNs in outbound updates\n")
596c17ba 3966
88b8ed8d 3967DEFUN (no_neighbor_remove_private_as_all,
5000f21c 3968 no_neighbor_remove_private_as_all_cmd,
9ccf14f7 3969 "no neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS all",
5000f21c
DS		 3970 NO_STR
3971 NEIGHBOR_STR
3972 NEIGHBOR_ADDR_STR2
3973 "Remove private ASNs in outbound updates\n"
16cedbb0 3974 "Apply to all AS numbers\n")
88b8ed8d 3975{
d62a17ae 3976 int idx_peer = 2;
3977 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
3978 bgp_node_afi(vty), bgp_node_safi(vty),
3979 PEER_FLAG_REMOVE_PRIVATE_AS_ALL);
88b8ed8d 3980}
5000f21c 3981
d62a17ae 3982ALIAS_HIDDEN(no_neighbor_remove_private_as_all,
3983 no_neighbor_remove_private_as_all_hidden_cmd,
3984 "no neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS all",
3985 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
3986 "Remove private ASNs in outbound updates\n"
3987 "Apply to all AS numbers\n")
596c17ba 3988
88b8ed8d 3989DEFUN (no_neighbor_remove_private_as_replace_as,
5000f21c 3990 no_neighbor_remove_private_as_replace_as_cmd,
9ccf14f7 3991 "no neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS replace-AS",
5000f21c
DS		 3992 NO_STR
3993 NEIGHBOR_STR
3994 NEIGHBOR_ADDR_STR2
3995 "Remove private ASNs in outbound updates\n"
3996 "Replace private ASNs with our ASN in outbound updates\n")
88b8ed8d 3997{
d62a17ae 3998 int idx_peer = 2;
3999 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
4000 bgp_node_afi(vty), bgp_node_safi(vty),
4001 PEER_FLAG_REMOVE_PRIVATE_AS_REPLACE);
88b8ed8d 4002}
5000f21c 4003
d62a17ae 4004ALIAS_HIDDEN(no_neighbor_remove_private_as_replace_as,
4005 no_neighbor_remove_private_as_replace_as_hidden_cmd,
4006 "no neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS replace-AS",
4007 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4008 "Remove private ASNs in outbound updates\n"
4009 "Replace private ASNs with our ASN in outbound updates\n")
596c17ba 4010
88b8ed8d 4011DEFUN (no_neighbor_remove_private_as_all_replace_as,
5000f21c 4012 no_neighbor_remove_private_as_all_replace_as_cmd,
9ccf14f7 4013 "no neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS all replace-AS",
5000f21c
DS		 4014 NO_STR
4015 NEIGHBOR_STR
4016 NEIGHBOR_ADDR_STR2
4017 "Remove private ASNs in outbound updates\n"
16cedbb0 4018 "Apply to all AS numbers\n"
5000f21c 4019 "Replace private ASNs with our ASN in outbound updates\n")
88b8ed8d 4020{
d62a17ae 4021 int idx_peer = 2;
4022 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
4023 bgp_node_afi(vty), bgp_node_safi(vty),
4024 PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE);
88b8ed8d 4025}
5000f21c 4026
d62a17ae 4027ALIAS_HIDDEN(
4028 no_neighbor_remove_private_as_all_replace_as,
4029 no_neighbor_remove_private_as_all_replace_as_hidden_cmd,
4030 "no neighbor <A.B.C.D|X:X::X:X|WORD> remove-private-AS all replace-AS",
4031 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4032 "Remove private ASNs in outbound updates\n"
4033 "Apply to all AS numbers\n"
4034 "Replace private ASNs with our ASN in outbound updates\n")
596c17ba 4035
5000f21c 4036
718e3744 4037/* neighbor send-community. */
4038DEFUN (neighbor_send_community,
4039 neighbor_send_community_cmd,
9ccf14f7 4040 "neighbor <A.B.C.D|X:X::X:X|WORD> send-community",
718e3744 4041 NEIGHBOR_STR
4042 NEIGHBOR_ADDR_STR2
4043 "Send Community attribute to this neighbor\n")
4044{
d62a17ae 4045 int idx_peer = 1;
4046 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
4047 bgp_node_safi(vty),
4048 PEER_FLAG_SEND_COMMUNITY);
718e3744 4049}
4050
d62a17ae 4051ALIAS_HIDDEN(neighbor_send_community, neighbor_send_community_hidden_cmd,
4052 "neighbor <A.B.C.D|X:X::X:X|WORD> send-community",
4053 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4054 "Send Community attribute to this neighbor\n")
596c17ba 4055
718e3744 4056DEFUN (no_neighbor_send_community,
4057 no_neighbor_send_community_cmd,
9ccf14f7 4058 "no neighbor <A.B.C.D|X:X::X:X|WORD> send-community",
718e3744 4059 NO_STR
4060 NEIGHBOR_STR
4061 NEIGHBOR_ADDR_STR2
4062 "Send Community attribute to this neighbor\n")
4063{
d62a17ae 4064 int idx_peer = 2;
4065 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
4066 bgp_node_afi(vty), bgp_node_safi(vty),
4067 PEER_FLAG_SEND_COMMUNITY);
718e3744 4068}
6b0655a2 4069
d62a17ae 4070ALIAS_HIDDEN(no_neighbor_send_community, no_neighbor_send_community_hidden_cmd,
4071 "no neighbor <A.B.C.D|X:X::X:X|WORD> send-community",
4072 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4073 "Send Community attribute to this neighbor\n")
596c17ba 4074
718e3744 4075/* neighbor send-community extended. */
4076DEFUN (neighbor_send_community_type,
4077 neighbor_send_community_type_cmd,
57d187bc 4078 "neighbor <A.B.C.D|X:X::X:X|WORD> send-community <both|all|extended|standard|large>",
718e3744 4079 NEIGHBOR_STR
4080 NEIGHBOR_ADDR_STR2
4081 "Send Community attribute to this neighbor\n"
4082 "Send Standard and Extended Community attributes\n"
57d187bc 4083 "Send Standard, Large and Extended Community attributes\n"
718e3744 4084 "Send Extended Community attributes\n"
57d187bc
JS		 4085 "Send Standard Community attributes\n"
4086 "Send Large Community attributes\n")
718e3744 4087{
d62a17ae 4088 int idx = 0;
d7c0a89a 4089 uint32_t flag = 0;
d62a17ae 4090
4091 char *peer = argv[1]->arg;
4092
4093 if (argv_find(argv, argc, "standard", &idx))
4094 SET_FLAG(flag, PEER_FLAG_SEND_COMMUNITY);
4095 else if (argv_find(argv, argc, "extended", &idx))
4096 SET_FLAG(flag, PEER_FLAG_SEND_EXT_COMMUNITY);
4097 else if (argv_find(argv, argc, "large", &idx))
4098 SET_FLAG(flag, PEER_FLAG_SEND_LARGE_COMMUNITY);
4099 else if (argv_find(argv, argc, "both", &idx)) {
4100 SET_FLAG(flag, PEER_FLAG_SEND_COMMUNITY);
4101 SET_FLAG(flag, PEER_FLAG_SEND_EXT_COMMUNITY);
4102 } else {
4103 SET_FLAG(flag, PEER_FLAG_SEND_COMMUNITY);
4104 SET_FLAG(flag, PEER_FLAG_SEND_EXT_COMMUNITY);
4105 SET_FLAG(flag, PEER_FLAG_SEND_LARGE_COMMUNITY);
4106 }
4107
4108 return peer_af_flag_set_vty(vty, peer, bgp_node_afi(vty),
4109 bgp_node_safi(vty), flag);
4110}
4111
4112ALIAS_HIDDEN(
4113 neighbor_send_community_type, neighbor_send_community_type_hidden_cmd,
4114 "neighbor <A.B.C.D|X:X::X:X|WORD> send-community <both|all|extended|standard|large>",
4115 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4116 "Send Community attribute to this neighbor\n"
4117 "Send Standard and Extended Community attributes\n"
4118 "Send Standard, Large and Extended Community attributes\n"
4119 "Send Extended Community attributes\n"
4120 "Send Standard Community attributes\n"
4121 "Send Large Community attributes\n")
596c17ba 4122
718e3744 4123DEFUN (no_neighbor_send_community_type,
4124 no_neighbor_send_community_type_cmd,
57d187bc 4125 "no neighbor <A.B.C.D|X:X::X:X|WORD> send-community <both|all|extended|standard|large>",
718e3744 4126 NO_STR
4127 NEIGHBOR_STR
4128 NEIGHBOR_ADDR_STR2
4129 "Send Community attribute to this neighbor\n"
4130 "Send Standard and Extended Community attributes\n"
57d187bc 4131 "Send Standard, Large and Extended Community attributes\n"
718e3744 4132 "Send Extended Community attributes\n"
57d187bc
JS		 4133 "Send Standard Community attributes\n"
4134 "Send Large Community attributes\n")
718e3744 4135{
d62a17ae 4136 int idx_peer = 2;
4137
4138 const char *type = argv[argc - 1]->text;
4139
4140 if (strmatch(type, "standard"))
4141 return peer_af_flag_unset_vty(
4142 vty, argv[idx_peer]->arg, bgp_node_afi(vty),
4143 bgp_node_safi(vty), PEER_FLAG_SEND_COMMUNITY);
4144 if (strmatch(type, "extended"))
4145 return peer_af_flag_unset_vty(
4146 vty, argv[idx_peer]->arg, bgp_node_afi(vty),
4147 bgp_node_safi(vty), PEER_FLAG_SEND_EXT_COMMUNITY);
4148 if (strmatch(type, "large"))
4149 return peer_af_flag_unset_vty(
4150 vty, argv[idx_peer]->arg, bgp_node_afi(vty),
4151 bgp_node_safi(vty), PEER_FLAG_SEND_LARGE_COMMUNITY);
4152 if (strmatch(type, "both"))
4153 return peer_af_flag_unset_vty(
4154 vty, argv[idx_peer]->arg, bgp_node_afi(vty),
4155 bgp_node_safi(vty),
4156 PEER_FLAG_SEND_COMMUNITY
4157 | PEER_FLAG_SEND_EXT_COMMUNITY);
4158
4159 /* if (strmatch (type, "all")) */
4160 return peer_af_flag_unset_vty(
4161 vty, argv[idx_peer]->arg, bgp_node_afi(vty), bgp_node_safi(vty),
4162 (PEER_FLAG_SEND_COMMUNITY | PEER_FLAG_SEND_EXT_COMMUNITY
4163 | PEER_FLAG_SEND_LARGE_COMMUNITY));
4164}
4165
4166ALIAS_HIDDEN(
4167 no_neighbor_send_community_type,
4168 no_neighbor_send_community_type_hidden_cmd,
4169 "no neighbor <A.B.C.D|X:X::X:X|WORD> send-community <both|all|extended|standard|large>",
4170 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4171 "Send Community attribute to this neighbor\n"
4172 "Send Standard and Extended Community attributes\n"
4173 "Send Standard, Large and Extended Community attributes\n"
4174 "Send Extended Community attributes\n"
4175 "Send Standard Community attributes\n"
4176 "Send Large Community attributes\n")
596c17ba 4177
718e3744 4178/* neighbor soft-reconfig. */
4179DEFUN (neighbor_soft_reconfiguration,
4180 neighbor_soft_reconfiguration_cmd,
9ccf14f7 4181 "neighbor <A.B.C.D|X:X::X:X|WORD> soft-reconfiguration inbound",
718e3744 4182 NEIGHBOR_STR
4183 NEIGHBOR_ADDR_STR2
4184 "Per neighbor soft reconfiguration\n"
4185 "Allow inbound soft reconfiguration for this neighbor\n")
4186{
d62a17ae 4187 int idx_peer = 1;
4188 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
4189 bgp_node_safi(vty),
4190 PEER_FLAG_SOFT_RECONFIG);
718e3744 4191}
4192
d62a17ae 4193ALIAS_HIDDEN(neighbor_soft_reconfiguration,
4194 neighbor_soft_reconfiguration_hidden_cmd,
4195 "neighbor <A.B.C.D|X:X::X:X|WORD> soft-reconfiguration inbound",
4196 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4197 "Per neighbor soft reconfiguration\n"
4198 "Allow inbound soft reconfiguration for this neighbor\n")
596c17ba 4199
718e3744 4200DEFUN (no_neighbor_soft_reconfiguration,
4201 no_neighbor_soft_reconfiguration_cmd,
9ccf14f7 4202 "no neighbor <A.B.C.D|X:X::X:X|WORD> soft-reconfiguration inbound",
718e3744 4203 NO_STR
4204 NEIGHBOR_STR
4205 NEIGHBOR_ADDR_STR2
4206 "Per neighbor soft reconfiguration\n"
4207 "Allow inbound soft reconfiguration for this neighbor\n")
4208{
d62a17ae 4209 int idx_peer = 2;
4210 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
4211 bgp_node_afi(vty), bgp_node_safi(vty),
4212 PEER_FLAG_SOFT_RECONFIG);
718e3744 4213}
6b0655a2 4214
d62a17ae 4215ALIAS_HIDDEN(no_neighbor_soft_reconfiguration,
4216 no_neighbor_soft_reconfiguration_hidden_cmd,
4217 "no neighbor <A.B.C.D|X:X::X:X|WORD> soft-reconfiguration inbound",
4218 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4219 "Per neighbor soft reconfiguration\n"
4220 "Allow inbound soft reconfiguration for this neighbor\n")
596c17ba 4221
718e3744 4222DEFUN (neighbor_route_reflector_client,
4223 neighbor_route_reflector_client_cmd,
9ccf14f7 4224 "neighbor <A.B.C.D|X:X::X:X|WORD> route-reflector-client",
718e3744 4225 NEIGHBOR_STR
4226 NEIGHBOR_ADDR_STR2
4227 "Configure a neighbor as Route Reflector client\n")
4228{
d62a17ae 4229 int idx_peer = 1;
4230 struct peer *peer;
718e3744 4231
4232
d62a17ae 4233 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
4234 if (!peer)
4235 return CMD_WARNING_CONFIG_FAILED;
718e3744 4236
d62a17ae 4237 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
4238 bgp_node_safi(vty),
4239 PEER_FLAG_REFLECTOR_CLIENT);
718e3744 4240}
4241
d62a17ae 4242ALIAS_HIDDEN(neighbor_route_reflector_client,
4243 neighbor_route_reflector_client_hidden_cmd,
4244 "neighbor <A.B.C.D|X:X::X:X|WORD> route-reflector-client",
4245 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4246 "Configure a neighbor as Route Reflector client\n")
596c17ba 4247
718e3744 4248DEFUN (no_neighbor_route_reflector_client,
4249 no_neighbor_route_reflector_client_cmd,
9ccf14f7 4250 "no neighbor <A.B.C.D|X:X::X:X|WORD> route-reflector-client",
718e3744 4251 NO_STR
4252 NEIGHBOR_STR
4253 NEIGHBOR_ADDR_STR2
4254 "Configure a neighbor as Route Reflector client\n")
4255{
d62a17ae 4256 int idx_peer = 2;
4257 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
4258 bgp_node_afi(vty), bgp_node_safi(vty),
4259 PEER_FLAG_REFLECTOR_CLIENT);
718e3744 4260}
6b0655a2 4261
d62a17ae 4262ALIAS_HIDDEN(no_neighbor_route_reflector_client,
4263 no_neighbor_route_reflector_client_hidden_cmd,
4264 "no neighbor <A.B.C.D|X:X::X:X|WORD> route-reflector-client",
4265 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4266 "Configure a neighbor as Route Reflector client\n")
596c17ba 4267
718e3744 4268/* neighbor route-server-client. */
4269DEFUN (neighbor_route_server_client,
4270 neighbor_route_server_client_cmd,
9ccf14f7 4271 "neighbor <A.B.C.D|X:X::X:X|WORD> route-server-client",
718e3744 4272 NEIGHBOR_STR
4273 NEIGHBOR_ADDR_STR2
4274 "Configure a neighbor as Route Server client\n")
4275{
d62a17ae 4276 int idx_peer = 1;
4277 struct peer *peer;
2a3d5731 4278
d62a17ae 4279 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
4280 if (!peer)
4281 return CMD_WARNING_CONFIG_FAILED;
4282 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
4283 bgp_node_safi(vty),
4284 PEER_FLAG_RSERVER_CLIENT);
718e3744 4285}
4286
d62a17ae 4287ALIAS_HIDDEN(neighbor_route_server_client,
4288 neighbor_route_server_client_hidden_cmd,
4289 "neighbor <A.B.C.D|X:X::X:X|WORD> route-server-client",
4290 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4291 "Configure a neighbor as Route Server client\n")
596c17ba 4292
718e3744 4293DEFUN (no_neighbor_route_server_client,
4294 no_neighbor_route_server_client_cmd,
9ccf14f7 4295 "no neighbor <A.B.C.D|X:X::X:X|WORD> route-server-client",
718e3744 4296 NO_STR
4297 NEIGHBOR_STR
4298 NEIGHBOR_ADDR_STR2
4299 "Configure a neighbor as Route Server client\n")
fee0f4c6 4300{
d62a17ae 4301 int idx_peer = 2;
4302 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
4303 bgp_node_afi(vty), bgp_node_safi(vty),
4304 PEER_FLAG_RSERVER_CLIENT);
fee0f4c6 4305}
6b0655a2 4306
d62a17ae 4307ALIAS_HIDDEN(no_neighbor_route_server_client,
4308 no_neighbor_route_server_client_hidden_cmd,
4309 "no neighbor <A.B.C.D|X:X::X:X|WORD> route-server-client",
4310 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4311 "Configure a neighbor as Route Server client\n")
596c17ba 4312
fee0f4c6 4313DEFUN (neighbor_nexthop_local_unchanged,
4314 neighbor_nexthop_local_unchanged_cmd,
9ccf14f7 4315 "neighbor <A.B.C.D|X:X::X:X|WORD> nexthop-local unchanged",
fee0f4c6 4316 NEIGHBOR_STR
4317 NEIGHBOR_ADDR_STR2
4318 "Configure treatment of outgoing link-local nexthop attribute\n"
4319 "Leave link-local nexthop unchanged for this peer\n")
4320{
d62a17ae 4321 int idx_peer = 1;
4322 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
4323 bgp_node_safi(vty),
4324 PEER_FLAG_NEXTHOP_LOCAL_UNCHANGED);
fee0f4c6 4325}
6b0655a2 4326
fee0f4c6 4327DEFUN (no_neighbor_nexthop_local_unchanged,
4328 no_neighbor_nexthop_local_unchanged_cmd,
9ccf14f7 4329 "no neighbor <A.B.C.D|X:X::X:X|WORD> nexthop-local unchanged",
fee0f4c6 4330 NO_STR
4331 NEIGHBOR_STR
4332 NEIGHBOR_ADDR_STR2
4333 "Configure treatment of outgoing link-local-nexthop attribute\n"
4334 "Leave link-local nexthop unchanged for this peer\n")
718e3744 4335{
d62a17ae 4336 int idx_peer = 2;
4337 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
4338 bgp_node_afi(vty), bgp_node_safi(vty),
4339 PEER_FLAG_NEXTHOP_LOCAL_UNCHANGED);
718e3744 4340}
6b0655a2 4341
718e3744 4342DEFUN (neighbor_attr_unchanged,
4343 neighbor_attr_unchanged_cmd,
a8206004 4344 "neighbor <A.B.C.D|X:X::X:X|WORD> attribute-unchanged [{as-path|next-hop|med}]",
718e3744 4345 NEIGHBOR_STR
4346 NEIGHBOR_ADDR_STR2
4347 "BGP attribute is propagated unchanged to this neighbor\n"
4348 "As-path attribute\n"
4349 "Nexthop attribute\n"
a8206004 4350 "Med attribute\n")
718e3744 4351{
d62a17ae 4352 int idx = 0;
8eeb0335
DW		 4353 char *peer_str = argv[1]->arg;
4354 struct peer *peer;
d7c0a89a 4355 uint16_t flags = 0;
8eeb0335
DW		 4356 afi_t afi = bgp_node_afi(vty);
4357 safi_t safi = bgp_node_safi(vty);
4358
4359 peer = peer_and_group_lookup_vty(vty, peer_str);
4360 if (!peer)
4361 return CMD_WARNING_CONFIG_FAILED;
d62a17ae 4362
4363 if (argv_find(argv, argc, "as-path", &idx))
4364 SET_FLAG(flags, PEER_FLAG_AS_PATH_UNCHANGED);
4365 idx = 0;
4366 if (argv_find(argv, argc, "next-hop", &idx))
4367 SET_FLAG(flags, PEER_FLAG_NEXTHOP_UNCHANGED);
4368 idx = 0;
4369 if (argv_find(argv, argc, "med", &idx))
4370 SET_FLAG(flags, PEER_FLAG_MED_UNCHANGED);
4371
8eeb0335
DW		 4372 /* no flags means all of them! */
4373 if (!flags) {
d62a17ae 4374 SET_FLAG(flags, PEER_FLAG_AS_PATH_UNCHANGED);
4375 SET_FLAG(flags, PEER_FLAG_NEXTHOP_UNCHANGED);
4376 SET_FLAG(flags, PEER_FLAG_MED_UNCHANGED);
8eeb0335 4377 } else {
a4d82a8a
PZ		 4378 if (!CHECK_FLAG(flags, PEER_FLAG_AS_PATH_UNCHANGED)
4379 && peer_af_flag_check(peer, afi, safi,
4380 PEER_FLAG_AS_PATH_UNCHANGED)) {
8eeb0335
DW		 4381 peer_af_flag_unset_vty(vty, peer_str, afi, safi,
4382 PEER_FLAG_AS_PATH_UNCHANGED);
4383 }
4384
a4d82a8a
PZ		 4385 if (!CHECK_FLAG(flags, PEER_FLAG_NEXTHOP_UNCHANGED)
4386 && peer_af_flag_check(peer, afi, safi,
4387 PEER_FLAG_NEXTHOP_UNCHANGED)) {
8eeb0335
DW		 4388 peer_af_flag_unset_vty(vty, peer_str, afi, safi,
4389 PEER_FLAG_NEXTHOP_UNCHANGED);
4390 }
4391
a4d82a8a
PZ		 4392 if (!CHECK_FLAG(flags, PEER_FLAG_MED_UNCHANGED)
4393 && peer_af_flag_check(peer, afi, safi,
4394 PEER_FLAG_MED_UNCHANGED)) {
8eeb0335
DW		 4395 peer_af_flag_unset_vty(vty, peer_str, afi, safi,
4396 PEER_FLAG_MED_UNCHANGED);
4397 }
d62a17ae 4398 }
4399
8eeb0335 4400 return peer_af_flag_set_vty(vty, peer_str, afi, safi, flags);
d62a17ae 4401}
4402
4403ALIAS_HIDDEN(
4404 neighbor_attr_unchanged, neighbor_attr_unchanged_hidden_cmd,
4405 "neighbor <A.B.C.D|X:X::X:X|WORD> attribute-unchanged [{as-path|next-hop|med}]",
4406 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4407 "BGP attribute is propagated unchanged to this neighbor\n"
4408 "As-path attribute\n"
4409 "Nexthop attribute\n"
4410 "Med attribute\n")
596c17ba 4411
718e3744 4412DEFUN (no_neighbor_attr_unchanged,
4413 no_neighbor_attr_unchanged_cmd,
a8206004 4414 "no neighbor <A.B.C.D|X:X::X:X|WORD> attribute-unchanged [{as-path|next-hop|med}]",
e52702f2 4415 NO_STR
718e3744 4416 NEIGHBOR_STR
4417 NEIGHBOR_ADDR_STR2
31500417
DW		 4418 "BGP attribute is propagated unchanged to this neighbor\n"
4419 "As-path attribute\n"
40e718b5 4420 "Nexthop attribute\n"
a8206004 4421 "Med attribute\n")
718e3744 4422{
d62a17ae 4423 int idx = 0;
4424 char *peer = argv[2]->arg;
d7c0a89a 4425 uint16_t flags = 0;
d62a17ae 4426
4427 if (argv_find(argv, argc, "as-path", &idx))
4428 SET_FLAG(flags, PEER_FLAG_AS_PATH_UNCHANGED);
4429 idx = 0;
4430 if (argv_find(argv, argc, "next-hop", &idx))
4431 SET_FLAG(flags, PEER_FLAG_NEXTHOP_UNCHANGED);
4432 idx = 0;
4433 if (argv_find(argv, argc, "med", &idx))
4434 SET_FLAG(flags, PEER_FLAG_MED_UNCHANGED);
4435
4436 if (!flags) // no flags means all of them!
4437 {
4438 SET_FLAG(flags, PEER_FLAG_AS_PATH_UNCHANGED);
4439 SET_FLAG(flags, PEER_FLAG_NEXTHOP_UNCHANGED);
4440 SET_FLAG(flags, PEER_FLAG_MED_UNCHANGED);
4441 }
4442
4443 return peer_af_flag_unset_vty(vty, peer, bgp_node_afi(vty),
4444 bgp_node_safi(vty), flags);
4445}
4446
4447ALIAS_HIDDEN(
4448 no_neighbor_attr_unchanged, no_neighbor_attr_unchanged_hidden_cmd,
4449 "no neighbor <A.B.C.D|X:X::X:X|WORD> attribute-unchanged [{as-path|next-hop|med}]",
4450 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4451 "BGP attribute is propagated unchanged to this neighbor\n"
4452 "As-path attribute\n"
4453 "Nexthop attribute\n"
4454 "Med attribute\n")
718e3744 4455
718e3744 4456/* EBGP multihop configuration. */
d62a17ae 4457static int peer_ebgp_multihop_set_vty(struct vty *vty, const char *ip_str,
4458 const char *ttl_str)
718e3744 4459{
d62a17ae 4460 struct peer *peer;
4461 unsigned int ttl;
718e3744 4462
d62a17ae 4463 peer = peer_and_group_lookup_vty(vty, ip_str);
4464 if (!peer)
4465 return CMD_WARNING_CONFIG_FAILED;
718e3744 4466
d62a17ae 4467 if (peer->conf_if)
4468 return bgp_vty_return(vty, BGP_ERR_INVALID_FOR_DIRECT_PEER);
63fa10b5 4469
d62a17ae 4470 if (!ttl_str)
4471 ttl = MAXTTL;
4472 else
4473 ttl = strtoul(ttl_str, NULL, 10);
718e3744 4474
d62a17ae 4475 return bgp_vty_return(vty, peer_ebgp_multihop_set(peer, ttl));
718e3744 4476}
4477
d62a17ae 4478static int peer_ebgp_multihop_unset_vty(struct vty *vty, const char *ip_str)
718e3744 4479{
d62a17ae 4480 struct peer *peer;
718e3744 4481
d62a17ae 4482 peer = peer_and_group_lookup_vty(vty, ip_str);
4483 if (!peer)
4484 return CMD_WARNING_CONFIG_FAILED;
718e3744 4485
d62a17ae 4486 return bgp_vty_return(vty, peer_ebgp_multihop_unset(peer));
718e3744 4487}
4488
4489/* neighbor ebgp-multihop. */
4490DEFUN (neighbor_ebgp_multihop,
4491 neighbor_ebgp_multihop_cmd,
9ccf14f7 4492 "neighbor <A.B.C.D|X:X::X:X|WORD> ebgp-multihop",
718e3744 4493 NEIGHBOR_STR
4494 NEIGHBOR_ADDR_STR2
4495 "Allow EBGP neighbors not on directly connected networks\n")
4496{
d62a17ae 4497 int idx_peer = 1;
4498 return peer_ebgp_multihop_set_vty(vty, argv[idx_peer]->arg, NULL);
718e3744 4499}
4500
4501DEFUN (neighbor_ebgp_multihop_ttl,
4502 neighbor_ebgp_multihop_ttl_cmd,
9ccf14f7 4503 "neighbor <A.B.C.D|X:X::X:X|WORD> ebgp-multihop (1-255)",
718e3744 4504 NEIGHBOR_STR
4505 NEIGHBOR_ADDR_STR2
4506 "Allow EBGP neighbors not on directly connected networks\n"
4507 "maximum hop count\n")
4508{
d62a17ae 4509 int idx_peer = 1;
4510 int idx_number = 3;
4511 return peer_ebgp_multihop_set_vty(vty, argv[idx_peer]->arg,
4512 argv[idx_number]->arg);
718e3744 4513}
4514
4515DEFUN (no_neighbor_ebgp_multihop,
4516 no_neighbor_ebgp_multihop_cmd,
a636c635 4517 "no neighbor <A.B.C.D|X:X::X:X|WORD> ebgp-multihop [(1-255)]",
718e3744 4518 NO_STR
4519 NEIGHBOR_STR
4520 NEIGHBOR_ADDR_STR2
a636c635
DW		 4521 "Allow EBGP neighbors not on directly connected networks\n"
4522 "maximum hop count\n")
718e3744 4523{
d62a17ae 4524 int idx_peer = 2;
4525 return peer_ebgp_multihop_unset_vty(vty, argv[idx_peer]->arg);
718e3744 4526}
4527
6b0655a2 4528
6ffd2079 4529/* disable-connected-check */
4530DEFUN (neighbor_disable_connected_check,
4531 neighbor_disable_connected_check_cmd,
7ebe625c 4532 "neighbor <A.B.C.D|X:X::X:X|WORD> <disable-connected-check|enforce-multihop>",
6ffd2079 4533 NEIGHBOR_STR
7ebe625c 4534 NEIGHBOR_ADDR_STR2
a636c635
DW		 4535 "one-hop away EBGP peer using loopback address\n"
4536 "Enforce EBGP neighbors perform multihop\n")
6ffd2079 4537{
d62a17ae 4538 int idx_peer = 1;
4539 return peer_flag_set_vty(vty, argv[idx_peer]->arg,
4540 PEER_FLAG_DISABLE_CONNECTED_CHECK);
6ffd2079 4541}
4542
4543DEFUN (no_neighbor_disable_connected_check,
4544 no_neighbor_disable_connected_check_cmd,
7ebe625c 4545 "no neighbor <A.B.C.D|X:X::X:X|WORD> <disable-connected-check|enforce-multihop>",
6ffd2079 4546 NO_STR
4547 NEIGHBOR_STR
7ebe625c 4548 NEIGHBOR_ADDR_STR2
a636c635
DW		 4549 "one-hop away EBGP peer using loopback address\n"
4550 "Enforce EBGP neighbors perform multihop\n")
6ffd2079 4551{
d62a17ae 4552 int idx_peer = 2;
4553 return peer_flag_unset_vty(vty, argv[idx_peer]->arg,
4554 PEER_FLAG_DISABLE_CONNECTED_CHECK);
6ffd2079 4555}
4556
718e3744 4557DEFUN (neighbor_description,
4558 neighbor_description_cmd,
e961923c 4559 "neighbor <A.B.C.D|X:X::X:X|WORD> description LINE...",
718e3744 4560 NEIGHBOR_STR
4561 NEIGHBOR_ADDR_STR2
4562 "Neighbor specific description\n"
4563 "Up to 80 characters describing this neighbor\n")
4564{
d62a17ae 4565 int idx_peer = 1;
4566 int idx_line = 3;
4567 struct peer *peer;
4568 char *str;
718e3744 4569
d62a17ae 4570 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
4571 if (!peer)
4572 return CMD_WARNING_CONFIG_FAILED;
718e3744 4573
d62a17ae 4574 str = argv_concat(argv, argc, idx_line);
718e3744 4575
d62a17ae 4576 peer_description_set(peer, str);
718e3744 4577
d62a17ae 4578 XFREE(MTYPE_TMP, str);
718e3744 4579
d62a17ae 4580 return CMD_SUCCESS;
718e3744 4581}
4582
4583DEFUN (no_neighbor_description,
4584 no_neighbor_description_cmd,
a636c635 4585 "no neighbor <A.B.C.D|X:X::X:X|WORD> description [LINE]",
718e3744 4586 NO_STR
4587 NEIGHBOR_STR
4588 NEIGHBOR_ADDR_STR2
a636c635
DW		 4589 "Neighbor specific description\n"
4590 "Up to 80 characters describing this neighbor\n")
718e3744 4591{
d62a17ae 4592 int idx_peer = 2;
4593 struct peer *peer;
718e3744 4594
d62a17ae 4595 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
4596 if (!peer)
4597 return CMD_WARNING_CONFIG_FAILED;
718e3744 4598
d62a17ae 4599 peer_description_unset(peer);
718e3744 4600
d62a17ae 4601 return CMD_SUCCESS;
718e3744 4602}
4603
6b0655a2 4604
718e3744 4605/* Neighbor update-source. */
d62a17ae 4606static int peer_update_source_vty(struct vty *vty, const char *peer_str,
4607 const char *source_str)
4608{
4609 struct peer *peer;
4610 struct prefix p;
4611
4612 peer = peer_and_group_lookup_vty(vty, peer_str);
4613 if (!peer)
4614 return CMD_WARNING_CONFIG_FAILED;
4615
4616 if (peer->conf_if)
4617 return CMD_WARNING;
4618
4619 if (source_str) {
4620 union sockunion su;
4621 int ret = str2sockunion(source_str, &su);
4622
4623 if (ret == 0)
4624 peer_update_source_addr_set(peer, &su);
4625 else {
4626 if (str2prefix(source_str, &p)) {
4627 vty_out(vty,
4628 "%% Invalid update-source, remove prefix length \n");
4629 return CMD_WARNING_CONFIG_FAILED;
4630 } else
4631 peer_update_source_if_set(peer, source_str);
4632 }
4633 } else
4634 peer_update_source_unset(peer);
4635
4636 return CMD_SUCCESS;
4637}
4638
4639#define BGP_UPDATE_SOURCE_HELP_STR \
4640 "IPv4 address\n" \
4641 "IPv6 address\n" \
4642 "Interface name (requires zebra to be running)\n"
369688c0 4643
718e3744 4644DEFUN (neighbor_update_source,
4645 neighbor_update_source_cmd,
9ccf14f7 4646 "neighbor <A.B.C.D|X:X::X:X|WORD> update-source <A.B.C.D|X:X::X:X|WORD>",
718e3744 4647 NEIGHBOR_STR
4648 NEIGHBOR_ADDR_STR2
4649 "Source of routing updates\n"
369688c0 4650 BGP_UPDATE_SOURCE_HELP_STR)
718e3744 4651{
d62a17ae 4652 int idx_peer = 1;
4653 int idx_peer_2 = 3;
4654 return peer_update_source_vty(vty, argv[idx_peer]->arg,
4655 argv[idx_peer_2]->arg);
718e3744 4656}
4657
4658DEFUN (no_neighbor_update_source,
4659 no_neighbor_update_source_cmd,
c7178fe7 4660 "no neighbor <A.B.C.D|X:X::X:X|WORD> update-source [<A.B.C.D|X:X::X:X|WORD>]",
718e3744 4661 NO_STR
4662 NEIGHBOR_STR
4663 NEIGHBOR_ADDR_STR2
dcb52bd5
DS		 4664 "Source of routing updates\n"
4665 BGP_UPDATE_SOURCE_HELP_STR)
718e3744 4666{
d62a17ae 4667 int idx_peer = 2;
4668 return peer_update_source_vty(vty, argv[idx_peer]->arg, NULL);
718e3744 4669}
6b0655a2 4670
d62a17ae 4671static int peer_default_originate_set_vty(struct vty *vty, const char *peer_str,
4672 afi_t afi, safi_t safi,
4673 const char *rmap, int set)
718e3744 4674{
d62a17ae 4675 int ret;
4676 struct peer *peer;
718e3744 4677
d62a17ae 4678 peer = peer_and_group_lookup_vty(vty, peer_str);
4679 if (!peer)
4680 return CMD_WARNING_CONFIG_FAILED;
718e3744 4681
d62a17ae 4682 if (set)
4683 ret = peer_default_originate_set(peer, afi, safi, rmap);
4684 else
4685 ret = peer_default_originate_unset(peer, afi, safi);
718e3744 4686
d62a17ae 4687 return bgp_vty_return(vty, ret);
718e3744 4688}
4689
4690/* neighbor default-originate. */
4691DEFUN (neighbor_default_originate,
4692 neighbor_default_originate_cmd,
9ccf14f7 4693 "neighbor <A.B.C.D|X:X::X:X|WORD> default-originate",
718e3744 4694 NEIGHBOR_STR
4695 NEIGHBOR_ADDR_STR2
4696 "Originate default route to this neighbor\n")
4697{
d62a17ae 4698 int idx_peer = 1;
4699 return peer_default_originate_set_vty(vty, argv[idx_peer]->arg,
4700 bgp_node_afi(vty),
4701 bgp_node_safi(vty), NULL, 1);
718e3744 4702}
4703
d62a17ae 4704ALIAS_HIDDEN(neighbor_default_originate, neighbor_default_originate_hidden_cmd,
4705 "neighbor <A.B.C.D|X:X::X:X|WORD> default-originate",
4706 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4707 "Originate default route to this neighbor\n")
596c17ba 4708
718e3744 4709DEFUN (neighbor_default_originate_rmap,
4710 neighbor_default_originate_rmap_cmd,
9ccf14f7 4711 "neighbor <A.B.C.D|X:X::X:X|WORD> default-originate route-map WORD",
718e3744 4712 NEIGHBOR_STR
4713 NEIGHBOR_ADDR_STR2
4714 "Originate default route to this neighbor\n"
4715 "Route-map to specify criteria to originate default\n"
4716 "route-map name\n")
4717{
d62a17ae 4718 int idx_peer = 1;
4719 int idx_word = 4;
4720 return peer_default_originate_set_vty(
4721 vty, argv[idx_peer]->arg, bgp_node_afi(vty), bgp_node_safi(vty),
4722 argv[idx_word]->arg, 1);
718e3744 4723}
4724
d62a17ae 4725ALIAS_HIDDEN(
4726 neighbor_default_originate_rmap,
4727 neighbor_default_originate_rmap_hidden_cmd,
4728 "neighbor <A.B.C.D|X:X::X:X|WORD> default-originate route-map WORD",
4729 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4730 "Originate default route to this neighbor\n"
4731 "Route-map to specify criteria to originate default\n"
4732 "route-map name\n")
596c17ba 4733
718e3744 4734DEFUN (no_neighbor_default_originate,
4735 no_neighbor_default_originate_cmd,
a636c635 4736 "no neighbor <A.B.C.D|X:X::X:X|WORD> default-originate [route-map WORD]",
718e3744 4737 NO_STR
4738 NEIGHBOR_STR
4739 NEIGHBOR_ADDR_STR2
a636c635
DW		 4740 "Originate default route to this neighbor\n"
4741 "Route-map to specify criteria to originate default\n"
4742 "route-map name\n")
718e3744 4743{
d62a17ae 4744 int idx_peer = 2;
4745 return peer_default_originate_set_vty(vty, argv[idx_peer]->arg,
4746 bgp_node_afi(vty),
4747 bgp_node_safi(vty), NULL, 0);
718e3744 4748}
4749
d62a17ae 4750ALIAS_HIDDEN(
4751 no_neighbor_default_originate, no_neighbor_default_originate_hidden_cmd,
4752 "no neighbor <A.B.C.D|X:X::X:X|WORD> default-originate [route-map WORD]",
4753 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4754 "Originate default route to this neighbor\n"
4755 "Route-map to specify criteria to originate default\n"
4756 "route-map name\n")
596c17ba 4757
6b0655a2 4758
718e3744 4759/* Set neighbor's BGP port. */
d62a17ae 4760static int peer_port_vty(struct vty *vty, const char *ip_str, int afi,
4761 const char *port_str)
4762{
4763 struct peer *peer;
d7c0a89a 4764 uint16_t port;
d62a17ae 4765 struct servent *sp;
4766
4767 peer = peer_lookup_vty(vty, ip_str);
4768 if (!peer)
4769 return CMD_WARNING_CONFIG_FAILED;
4770
4771 if (!port_str) {
4772 sp = getservbyname("bgp", "tcp");
4773 port = (sp == NULL) ? BGP_PORT_DEFAULT : ntohs(sp->s_port);
4774 } else {
4775 port = strtoul(port_str, NULL, 10);
4776 }
718e3744 4777
d62a17ae 4778 peer_port_set(peer, port);
718e3744 4779
d62a17ae 4780 return CMD_SUCCESS;
718e3744 4781}
4782
f418446b 4783/* Set specified peer's BGP port. */
718e3744 4784DEFUN (neighbor_port,
4785 neighbor_port_cmd,
9ccf14f7 4786 "neighbor <A.B.C.D|X:X::X:X> port (0-65535)",
718e3744 4787 NEIGHBOR_STR
4788 NEIGHBOR_ADDR_STR
4789 "Neighbor's BGP port\n"
4790 "TCP port number\n")
4791{
d62a17ae 4792 int idx_ip = 1;
4793 int idx_number = 3;
4794 return peer_port_vty(vty, argv[idx_ip]->arg, AFI_IP,
4795 argv[idx_number]->arg);
718e3744 4796}
4797
4798DEFUN (no_neighbor_port,
4799 no_neighbor_port_cmd,
9ccf14f7 4800 "no neighbor <A.B.C.D|X:X::X:X> port [(0-65535)]",
718e3744 4801 NO_STR
4802 NEIGHBOR_STR
4803 NEIGHBOR_ADDR_STR
8334fd5a
DW		 4804 "Neighbor's BGP port\n"
4805 "TCP port number\n")
718e3744 4806{
d62a17ae 4807 int idx_ip = 2;
4808 return peer_port_vty(vty, argv[idx_ip]->arg, AFI_IP, NULL);
718e3744 4809}
4810
6b0655a2 4811
718e3744 4812/* neighbor weight. */
d62a17ae 4813static int peer_weight_set_vty(struct vty *vty, const char *ip_str, afi_t afi,
4814 safi_t safi, const char *weight_str)
718e3744 4815{
d62a17ae 4816 int ret;
4817 struct peer *peer;
4818 unsigned long weight;
718e3744 4819
d62a17ae 4820 peer = peer_and_group_lookup_vty(vty, ip_str);
4821 if (!peer)
4822 return CMD_WARNING_CONFIG_FAILED;
718e3744 4823
d62a17ae 4824 weight = strtoul(weight_str, NULL, 10);
718e3744 4825
d62a17ae 4826 ret = peer_weight_set(peer, afi, safi, weight);
4827 return bgp_vty_return(vty, ret);
718e3744 4828}
4829
d62a17ae 4830static int peer_weight_unset_vty(struct vty *vty, const char *ip_str, afi_t afi,
4831 safi_t safi)
718e3744 4832{
d62a17ae 4833 int ret;
4834 struct peer *peer;
718e3744 4835
d62a17ae 4836 peer = peer_and_group_lookup_vty(vty, ip_str);
4837 if (!peer)
4838 return CMD_WARNING_CONFIG_FAILED;
718e3744 4839
d62a17ae 4840 ret = peer_weight_unset(peer, afi, safi);
4841 return bgp_vty_return(vty, ret);
718e3744 4842}
4843
4844DEFUN (neighbor_weight,
4845 neighbor_weight_cmd,
9ccf14f7 4846 "neighbor <A.B.C.D|X:X::X:X|WORD> weight (0-65535)",
718e3744 4847 NEIGHBOR_STR
4848 NEIGHBOR_ADDR_STR2
4849 "Set default weight for routes from this neighbor\n"
4850 "default weight\n")
4851{
d62a17ae 4852 int idx_peer = 1;
4853 int idx_number = 3;
4854 return peer_weight_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
4855 bgp_node_safi(vty), argv[idx_number]->arg);
718e3744 4856}
4857
d62a17ae 4858ALIAS_HIDDEN(neighbor_weight, neighbor_weight_hidden_cmd,
4859 "neighbor <A.B.C.D|X:X::X:X|WORD> weight (0-65535)",
4860 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4861 "Set default weight for routes from this neighbor\n"
4862 "default weight\n")
596c17ba 4863
718e3744 4864DEFUN (no_neighbor_weight,
4865 no_neighbor_weight_cmd,
9ccf14f7 4866 "no neighbor <A.B.C.D|X:X::X:X|WORD> weight [(0-65535)]",
718e3744 4867 NO_STR
4868 NEIGHBOR_STR
4869 NEIGHBOR_ADDR_STR2
8334fd5a
DW		 4870 "Set default weight for routes from this neighbor\n"
4871 "default weight\n")
718e3744 4872{
d62a17ae 4873 int idx_peer = 2;
4874 return peer_weight_unset_vty(vty, argv[idx_peer]->arg,
4875 bgp_node_afi(vty), bgp_node_safi(vty));
718e3744 4876}
4877
d62a17ae 4878ALIAS_HIDDEN(no_neighbor_weight, no_neighbor_weight_hidden_cmd,
4879 "no neighbor <A.B.C.D|X:X::X:X|WORD> weight [(0-65535)]",
4880 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
4881 "Set default weight for routes from this neighbor\n"
4882 "default weight\n")
596c17ba 4883
6b0655a2 4884
718e3744 4885/* Override capability negotiation. */
4886DEFUN (neighbor_override_capability,
4887 neighbor_override_capability_cmd,
9ccf14f7 4888 "neighbor <A.B.C.D|X:X::X:X|WORD> override-capability",
718e3744 4889 NEIGHBOR_STR
4890 NEIGHBOR_ADDR_STR2
4891 "Override capability negotiation result\n")
4892{
d62a17ae 4893 int idx_peer = 1;
4894 return peer_flag_set_vty(vty, argv[idx_peer]->arg,
4895 PEER_FLAG_OVERRIDE_CAPABILITY);
718e3744 4896}
4897
4898DEFUN (no_neighbor_override_capability,
4899 no_neighbor_override_capability_cmd,
9ccf14f7 4900 "no neighbor <A.B.C.D|X:X::X:X|WORD> override-capability",
718e3744 4901 NO_STR
4902 NEIGHBOR_STR
4903 NEIGHBOR_ADDR_STR2
4904 "Override capability negotiation result\n")
4905{
d62a17ae 4906 int idx_peer = 2;
4907 return peer_flag_unset_vty(vty, argv[idx_peer]->arg,
4908 PEER_FLAG_OVERRIDE_CAPABILITY);
718e3744 4909}
6b0655a2 4910
718e3744 4911DEFUN (neighbor_strict_capability,
4912 neighbor_strict_capability_cmd,
9ccf14f7 4913 "neighbor <A.B.C.D|X:X::X:X> strict-capability-match",
718e3744 4914 NEIGHBOR_STR
4915 NEIGHBOR_ADDR_STR
4916 "Strict capability negotiation match\n")
4917{
d62a17ae 4918 int idx_ip = 1;
4919 return peer_flag_set_vty(vty, argv[idx_ip]->arg,
4920 PEER_FLAG_STRICT_CAP_MATCH);
718e3744 4921}
4922
4923DEFUN (no_neighbor_strict_capability,
4924 no_neighbor_strict_capability_cmd,
9ccf14f7 4925 "no neighbor <A.B.C.D|X:X::X:X> strict-capability-match",
718e3744 4926 NO_STR
4927 NEIGHBOR_STR
4928 NEIGHBOR_ADDR_STR
4929 "Strict capability negotiation match\n")
4930{
d62a17ae 4931 int idx_ip = 2;
4932 return peer_flag_unset_vty(vty, argv[idx_ip]->arg,
4933 PEER_FLAG_STRICT_CAP_MATCH);
718e3744 4934}
6b0655a2 4935
d62a17ae 4936static int peer_timers_set_vty(struct vty *vty, const char *ip_str,
4937 const char *keep_str, const char *hold_str)
718e3744 4938{
d62a17ae 4939 int ret;
4940 struct peer *peer;
d7c0a89a
QY		 4941 uint32_t keepalive;
4942 uint32_t holdtime;
718e3744 4943
d62a17ae 4944 peer = peer_and_group_lookup_vty(vty, ip_str);
4945 if (!peer)
4946 return CMD_WARNING_CONFIG_FAILED;
718e3744 4947
d62a17ae 4948 keepalive = strtoul(keep_str, NULL, 10);
4949 holdtime = strtoul(hold_str, NULL, 10);
718e3744 4950
d62a17ae 4951 ret = peer_timers_set(peer, keepalive, holdtime);
718e3744 4952
d62a17ae 4953 return bgp_vty_return(vty, ret);
718e3744 4954}
6b0655a2 4955
d62a17ae 4956static int peer_timers_unset_vty(struct vty *vty, const char *ip_str)
718e3744 4957{
d62a17ae 4958 int ret;
4959 struct peer *peer;
718e3744 4960
d62a17ae 4961 peer = peer_and_group_lookup_vty(vty, ip_str);
4962 if (!peer)
4963 return CMD_WARNING_CONFIG_FAILED;
718e3744 4964
d62a17ae 4965 ret = peer_timers_unset(peer);
718e3744 4966
d62a17ae 4967 return bgp_vty_return(vty, ret);
718e3744 4968}
4969
4970DEFUN (neighbor_timers,
4971 neighbor_timers_cmd,
9ccf14f7 4972 "neighbor <A.B.C.D|X:X::X:X|WORD> timers (0-65535) (0-65535)",
718e3744 4973 NEIGHBOR_STR
4974 NEIGHBOR_ADDR_STR2
4975 "BGP per neighbor timers\n"
4976 "Keepalive interval\n"
4977 "Holdtime\n")
4978{
d62a17ae 4979 int idx_peer = 1;
4980 int idx_number = 3;
4981 int idx_number_2 = 4;
4982 return peer_timers_set_vty(vty, argv[idx_peer]->arg,
4983 argv[idx_number]->arg,
4984 argv[idx_number_2]->arg);
718e3744 4985}
4986
4987DEFUN (no_neighbor_timers,
4988 no_neighbor_timers_cmd,
9ccf14f7 4989 "no neighbor <A.B.C.D|X:X::X:X|WORD> timers [(0-65535) (0-65535)]",
718e3744 4990 NO_STR
4991 NEIGHBOR_STR
4992 NEIGHBOR_ADDR_STR2
8334fd5a
DW		 4993 "BGP per neighbor timers\n"
4994 "Keepalive interval\n"
4995 "Holdtime\n")
718e3744 4996{
d62a17ae 4997 int idx_peer = 2;
4998 return peer_timers_unset_vty(vty, argv[idx_peer]->arg);
718e3744 4999}
6b0655a2 5000
813d4307 5001
d62a17ae 5002static int peer_timers_connect_set_vty(struct vty *vty, const char *ip_str,
5003 const char *time_str)
718e3744 5004{
d62a17ae 5005 int ret;
5006 struct peer *peer;
d7c0a89a 5007 uint32_t connect;
718e3744 5008
d62a17ae 5009 peer = peer_and_group_lookup_vty(vty, ip_str);
5010 if (!peer)
5011 return CMD_WARNING_CONFIG_FAILED;
718e3744 5012
d62a17ae 5013 connect = strtoul(time_str, NULL, 10);
718e3744 5014
d62a17ae 5015 ret = peer_timers_connect_set(peer, connect);
718e3744 5016
d62a17ae 5017 return bgp_vty_return(vty, ret);
718e3744 5018}
5019
d62a17ae 5020static int peer_timers_connect_unset_vty(struct vty *vty, const char *ip_str)
718e3744 5021{
d62a17ae 5022 int ret;
5023 struct peer *peer;
718e3744 5024
d62a17ae 5025 peer = peer_and_group_lookup_vty(vty, ip_str);
5026 if (!peer)
5027 return CMD_WARNING_CONFIG_FAILED;
718e3744 5028
d62a17ae 5029 ret = peer_timers_connect_unset(peer);
718e3744 5030
d62a17ae 5031 return bgp_vty_return(vty, ret);
718e3744 5032}
5033
5034DEFUN (neighbor_timers_connect,
5035 neighbor_timers_connect_cmd,
9ccf14f7 5036 "neighbor <A.B.C.D|X:X::X:X|WORD> timers connect (1-65535)",
718e3744 5037 NEIGHBOR_STR
966f821c 5038 NEIGHBOR_ADDR_STR2
718e3744 5039 "BGP per neighbor timers\n"
5040 "BGP connect timer\n"
5041 "Connect timer\n")
5042{
d62a17ae 5043 int idx_peer = 1;
5044 int idx_number = 4;
5045 return peer_timers_connect_set_vty(vty, argv[idx_peer]->arg,
5046 argv[idx_number]->arg);
718e3744 5047}
5048
5049DEFUN (no_neighbor_timers_connect,
5050 no_neighbor_timers_connect_cmd,
9ccf14f7 5051 "no neighbor <A.B.C.D|X:X::X:X|WORD> timers connect [(1-65535)]",
718e3744 5052 NO_STR
5053 NEIGHBOR_STR
966f821c 5054 NEIGHBOR_ADDR_STR2
718e3744 5055 "BGP per neighbor timers\n"
8334fd5a
DW		 5056 "BGP connect timer\n"
5057 "Connect timer\n")
718e3744 5058{
d62a17ae 5059 int idx_peer = 2;
5060 return peer_timers_connect_unset_vty(vty, argv[idx_peer]->arg);
718e3744 5061}
5062
6b0655a2 5063
d62a17ae 5064static int peer_advertise_interval_vty(struct vty *vty, const char *ip_str,
5065 const char *time_str, int set)
718e3744 5066{
d62a17ae 5067 int ret;
5068 struct peer *peer;
d7c0a89a 5069 uint32_t routeadv = 0;
718e3744 5070
d62a17ae 5071 peer = peer_and_group_lookup_vty(vty, ip_str);
5072 if (!peer)
5073 return CMD_WARNING_CONFIG_FAILED;
718e3744 5074
d62a17ae 5075 if (time_str)
5076 routeadv = strtoul(time_str, NULL, 10);
718e3744 5077
d62a17ae 5078 if (set)
5079 ret = peer_advertise_interval_set(peer, routeadv);
5080 else
5081 ret = peer_advertise_interval_unset(peer);
718e3744 5082
d62a17ae 5083 return bgp_vty_return(vty, ret);
718e3744 5084}
5085
5086DEFUN (neighbor_advertise_interval,
5087 neighbor_advertise_interval_cmd,
9ccf14f7 5088 "neighbor <A.B.C.D|X:X::X:X|WORD> advertisement-interval (0-600)",
718e3744 5089 NEIGHBOR_STR
966f821c 5090 NEIGHBOR_ADDR_STR2
718e3744 5091 "Minimum interval between sending BGP routing updates\n"
5092 "time in seconds\n")
5093{
d62a17ae 5094 int idx_peer = 1;
5095 int idx_number = 3;
5096 return peer_advertise_interval_vty(vty, argv[idx_peer]->arg,
5097 argv[idx_number]->arg, 1);
718e3744 5098}
5099
5100DEFUN (no_neighbor_advertise_interval,
5101 no_neighbor_advertise_interval_cmd,
9ccf14f7 5102 "no neighbor <A.B.C.D|X:X::X:X|WORD> advertisement-interval [(0-600)]",
718e3744 5103 NO_STR
5104 NEIGHBOR_STR
966f821c 5105 NEIGHBOR_ADDR_STR2
8334fd5a
DW		 5106 "Minimum interval between sending BGP routing updates\n"
5107 "time in seconds\n")
718e3744 5108{
d62a17ae 5109 int idx_peer = 2;
5110 return peer_advertise_interval_vty(vty, argv[idx_peer]->arg, NULL, 0);
718e3744 5111}
5112
6b0655a2 5113
518f0eb1
DS		 5114/* Time to wait before processing route-map updates */
5115DEFUN (bgp_set_route_map_delay_timer,
5116 bgp_set_route_map_delay_timer_cmd,
6147e2c6 5117 "bgp route-map delay-timer (0-600)",
518f0eb1
DS		 5118 SET_STR
5119 "BGP route-map delay timer\n"
5120 "Time in secs to wait before processing route-map changes\n"
f414725f 5121 "0 disables the timer, no route updates happen when route-maps change\n")
518f0eb1 5122{
d62a17ae 5123 int idx_number = 3;
d7c0a89a 5124 uint32_t rmap_delay_timer;
d62a17ae 5125
5126 if (argv[idx_number]->arg) {
5127 rmap_delay_timer = strtoul(argv[idx_number]->arg, NULL, 10);
5128 bm->rmap_update_timer = rmap_delay_timer;
5129
5130 /* if the dynamic update handling is being disabled, and a timer
5131 * is
5132 * running, stop the timer and act as if the timer has already
5133 * fired.
5134 */
5135 if (!rmap_delay_timer && bm->t_rmap_update) {
5136 BGP_TIMER_OFF(bm->t_rmap_update);
5137 thread_execute(bm->master, bgp_route_map_update_timer,
5138 NULL, 0);
5139 }
5140 return CMD_SUCCESS;
5141 } else {
5142 vty_out(vty, "%% BGP invalid route-map delay-timer\n");
5143 return CMD_WARNING_CONFIG_FAILED;
518f0eb1 5144 }
518f0eb1
DS		 5145}
5146
5147DEFUN (no_bgp_set_route_map_delay_timer,
5148 no_bgp_set_route_map_delay_timer_cmd,
8334fd5a 5149 "no bgp route-map delay-timer [(0-600)]",
518f0eb1 5150 NO_STR
3a2d747c 5151 BGP_STR
518f0eb1 5152 "Default BGP route-map delay timer\n"
8334fd5a
DW		 5153 "Reset to default time to wait for processing route-map changes\n"
5154 "0 disables the timer, no route updates happen when route-maps change\n")
518f0eb1 5155{
518f0eb1 5156
d62a17ae 5157 bm->rmap_update_timer = RMAP_DEFAULT_UPDATE_TIMER;
518f0eb1 5158
d62a17ae 5159 return CMD_SUCCESS;
518f0eb1
DS		 5160}
5161
f414725f 5162
718e3744 5163/* neighbor interface */
d62a17ae 5164static int peer_interface_vty(struct vty *vty, const char *ip_str,
5165 const char *str)
718e3744 5166{
d62a17ae 5167 struct peer *peer;
718e3744 5168
d62a17ae 5169 peer = peer_lookup_vty(vty, ip_str);
5170 if (!peer || peer->conf_if) {
5171 vty_out(vty, "%% BGP invalid peer %s\n", ip_str);
5172 return CMD_WARNING_CONFIG_FAILED;
5173 }
718e3744 5174
d62a17ae 5175 if (str)
5176 peer_interface_set(peer, str);
5177 else
5178 peer_interface_unset(peer);
718e3744 5179
d62a17ae 5180 return CMD_SUCCESS;
718e3744 5181}
5182
5183DEFUN (neighbor_interface,
5184 neighbor_interface_cmd,
9ccf14f7 5185 "neighbor <A.B.C.D|X:X::X:X> interface WORD",
718e3744 5186 NEIGHBOR_STR
5187 NEIGHBOR_ADDR_STR
5188 "Interface\n"
5189 "Interface name\n")
5190{
d62a17ae 5191 int idx_ip = 1;
5192 int idx_word = 3;
5193 return peer_interface_vty(vty, argv[idx_ip]->arg, argv[idx_word]->arg);
718e3744 5194}
5195
5196DEFUN (no_neighbor_interface,
5197 no_neighbor_interface_cmd,
9ccf14f7 5198 "no neighbor <A.B.C.D|X:X::X:X|WORD> interface WORD",
718e3744 5199 NO_STR
5200 NEIGHBOR_STR
16cedbb0 5201 NEIGHBOR_ADDR_STR2
718e3744 5202 "Interface\n"
5203 "Interface name\n")
5204{
d62a17ae 5205 int idx_peer = 2;
5206 return peer_interface_vty(vty, argv[idx_peer]->arg, NULL);
718e3744 5207}
6b0655a2 5208
718e3744 5209DEFUN (neighbor_distribute_list,
5210 neighbor_distribute_list_cmd,
9ccf14f7 5211 "neighbor <A.B.C.D|X:X::X:X|WORD> distribute-list <(1-199)|(1300-2699)|WORD> <in|out>",
718e3744 5212 NEIGHBOR_STR
5213 NEIGHBOR_ADDR_STR2
5214 "Filter updates to/from this neighbor\n"
5215 "IP access-list number\n"
5216 "IP access-list number (expanded range)\n"
5217 "IP Access-list name\n"
5218 "Filter incoming updates\n"
5219 "Filter outgoing updates\n")
5220{
d62a17ae 5221 int idx_peer = 1;
5222 int idx_acl = 3;
5223 int direct, ret;
5224 struct peer *peer;
a8206004 5225
d62a17ae 5226 const char *pstr = argv[idx_peer]->arg;
5227 const char *acl = argv[idx_acl]->arg;
5228 const char *inout = argv[argc - 1]->text;
a8206004 5229
d62a17ae 5230 peer = peer_and_group_lookup_vty(vty, pstr);
5231 if (!peer)
5232 return CMD_WARNING_CONFIG_FAILED;
a8206004 5233
d62a17ae 5234 /* Check filter direction. */
5235 direct = strmatch(inout, "in") ? FILTER_IN : FILTER_OUT;
5236 ret = peer_distribute_set(peer, bgp_node_afi(vty), bgp_node_safi(vty),
5237 direct, acl);
a8206004 5238
d62a17ae 5239 return bgp_vty_return(vty, ret);
718e3744 5240}
5241
d62a17ae 5242ALIAS_HIDDEN(
5243 neighbor_distribute_list, neighbor_distribute_list_hidden_cmd,
5244 "neighbor <A.B.C.D|X:X::X:X|WORD> distribute-list <(1-199)|(1300-2699)|WORD> <in|out>",
5245 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5246 "Filter updates to/from this neighbor\n"
5247 "IP access-list number\n"
5248 "IP access-list number (expanded range)\n"
5249 "IP Access-list name\n"
5250 "Filter incoming updates\n"
5251 "Filter outgoing updates\n")
596c17ba 5252
718e3744 5253DEFUN (no_neighbor_distribute_list,
5254 no_neighbor_distribute_list_cmd,
9ccf14f7 5255 "no neighbor <A.B.C.D|X:X::X:X|WORD> distribute-list <(1-199)|(1300-2699)|WORD> <in|out>",
718e3744 5256 NO_STR
5257 NEIGHBOR_STR
5258 NEIGHBOR_ADDR_STR2
5259 "Filter updates to/from this neighbor\n"
5260 "IP access-list number\n"
5261 "IP access-list number (expanded range)\n"
5262 "IP Access-list name\n"
5263 "Filter incoming updates\n"
5264 "Filter outgoing updates\n")
5265{
d62a17ae 5266 int idx_peer = 2;
5267 int direct, ret;
5268 struct peer *peer;
a8206004 5269
d62a17ae 5270 const char *pstr = argv[idx_peer]->arg;
5271 const char *inout = argv[argc - 1]->text;
a8206004 5272
d62a17ae 5273 peer = peer_and_group_lookup_vty(vty, pstr);
5274 if (!peer)
5275 return CMD_WARNING_CONFIG_FAILED;
a8206004 5276
d62a17ae 5277 /* Check filter direction. */
5278 direct = strmatch(inout, "in") ? FILTER_IN : FILTER_OUT;
5279 ret = peer_distribute_unset(peer, bgp_node_afi(vty), bgp_node_safi(vty),
5280 direct);
a8206004 5281
d62a17ae 5282 return bgp_vty_return(vty, ret);
718e3744 5283}
6b0655a2 5284
d62a17ae 5285ALIAS_HIDDEN(
5286 no_neighbor_distribute_list, no_neighbor_distribute_list_hidden_cmd,
5287 "no neighbor <A.B.C.D|X:X::X:X|WORD> distribute-list <(1-199)|(1300-2699)|WORD> <in|out>",
5288 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5289 "Filter updates to/from this neighbor\n"
5290 "IP access-list number\n"
5291 "IP access-list number (expanded range)\n"
5292 "IP Access-list name\n"
5293 "Filter incoming updates\n"
5294 "Filter outgoing updates\n")
596c17ba 5295
718e3744 5296/* Set prefix list to the peer. */
d62a17ae 5297static int peer_prefix_list_set_vty(struct vty *vty, const char *ip_str,
5298 afi_t afi, safi_t safi,
5299 const char *name_str,
5300 const char *direct_str)
718e3744 5301{
d62a17ae 5302 int ret;
5303 struct peer *peer;
5304 int direct = FILTER_IN;
718e3744 5305
d62a17ae 5306 peer = peer_and_group_lookup_vty(vty, ip_str);
5307 if (!peer)
5308 return CMD_WARNING_CONFIG_FAILED;
718e3744 5309
d62a17ae 5310 /* Check filter direction. */
5311 if (strncmp(direct_str, "i", 1) == 0)
5312 direct = FILTER_IN;
5313 else if (strncmp(direct_str, "o", 1) == 0)
5314 direct = FILTER_OUT;
718e3744 5315
d62a17ae 5316 ret = peer_prefix_list_set(peer, afi, safi, direct, name_str);
718e3744 5317
d62a17ae 5318 return bgp_vty_return(vty, ret);
718e3744 5319}
5320
d62a17ae 5321static int peer_prefix_list_unset_vty(struct vty *vty, const char *ip_str,
5322 afi_t afi, safi_t safi,
5323 const char *direct_str)
718e3744 5324{
d62a17ae 5325 int ret;
5326 struct peer *peer;
5327 int direct = FILTER_IN;
718e3744 5328
d62a17ae 5329 peer = peer_and_group_lookup_vty(vty, ip_str);
5330 if (!peer)
5331 return CMD_WARNING_CONFIG_FAILED;
e52702f2 5332
d62a17ae 5333 /* Check filter direction. */
5334 if (strncmp(direct_str, "i", 1) == 0)
5335 direct = FILTER_IN;
5336 else if (strncmp(direct_str, "o", 1) == 0)
5337 direct = FILTER_OUT;
718e3744 5338
d62a17ae 5339 ret = peer_prefix_list_unset(peer, afi, safi, direct);
718e3744 5340
d62a17ae 5341 return bgp_vty_return(vty, ret);
718e3744 5342}
5343
5344DEFUN (neighbor_prefix_list,
5345 neighbor_prefix_list_cmd,
9ccf14f7 5346 "neighbor <A.B.C.D|X:X::X:X|WORD> prefix-list WORD <in|out>",
718e3744 5347 NEIGHBOR_STR
5348 NEIGHBOR_ADDR_STR2
5349 "Filter updates to/from this neighbor\n"
5350 "Name of a prefix list\n"
5351 "Filter incoming updates\n"
5352 "Filter outgoing updates\n")
5353{
d62a17ae 5354 int idx_peer = 1;
5355 int idx_word = 3;
5356 int idx_in_out = 4;
5357 return peer_prefix_list_set_vty(
5358 vty, argv[idx_peer]->arg, bgp_node_afi(vty), bgp_node_safi(vty),
5359 argv[idx_word]->arg, argv[idx_in_out]->arg);
718e3744 5360}
5361
d62a17ae 5362ALIAS_HIDDEN(neighbor_prefix_list, neighbor_prefix_list_hidden_cmd,
5363 "neighbor <A.B.C.D|X:X::X:X|WORD> prefix-list WORD <in|out>",
5364 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5365 "Filter updates to/from this neighbor\n"
5366 "Name of a prefix list\n"
5367 "Filter incoming updates\n"
5368 "Filter outgoing updates\n")
596c17ba 5369
718e3744 5370DEFUN (no_neighbor_prefix_list,
5371 no_neighbor_prefix_list_cmd,
9ccf14f7 5372 "no neighbor <A.B.C.D|X:X::X:X|WORD> prefix-list WORD <in|out>",
718e3744 5373 NO_STR
5374 NEIGHBOR_STR
5375 NEIGHBOR_ADDR_STR2
5376 "Filter updates to/from this neighbor\n"
5377 "Name of a prefix list\n"
5378 "Filter incoming updates\n"
5379 "Filter outgoing updates\n")
5380{
d62a17ae 5381 int idx_peer = 2;
5382 int idx_in_out = 5;
5383 return peer_prefix_list_unset_vty(vty, argv[idx_peer]->arg,
5384 bgp_node_afi(vty), bgp_node_safi(vty),
5385 argv[idx_in_out]->arg);
718e3744 5386}
6b0655a2 5387
d62a17ae 5388ALIAS_HIDDEN(no_neighbor_prefix_list, no_neighbor_prefix_list_hidden_cmd,
5389 "no neighbor <A.B.C.D|X:X::X:X|WORD> prefix-list WORD <in|out>",
5390 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5391 "Filter updates to/from this neighbor\n"
5392 "Name of a prefix list\n"
5393 "Filter incoming updates\n"
5394 "Filter outgoing updates\n")
596c17ba 5395
d62a17ae 5396static int peer_aslist_set_vty(struct vty *vty, const char *ip_str, afi_t afi,
5397 safi_t safi, const char *name_str,
5398 const char *direct_str)
718e3744 5399{
d62a17ae 5400 int ret;
5401 struct peer *peer;
5402 int direct = FILTER_IN;
718e3744 5403
d62a17ae 5404 peer = peer_and_group_lookup_vty(vty, ip_str);
5405 if (!peer)
5406 return CMD_WARNING_CONFIG_FAILED;
718e3744 5407
d62a17ae 5408 /* Check filter direction. */
5409 if (strncmp(direct_str, "i", 1) == 0)
5410 direct = FILTER_IN;
5411 else if (strncmp(direct_str, "o", 1) == 0)
5412 direct = FILTER_OUT;
718e3744 5413
d62a17ae 5414 ret = peer_aslist_set(peer, afi, safi, direct, name_str);
718e3744 5415
d62a17ae 5416 return bgp_vty_return(vty, ret);
718e3744 5417}
5418
d62a17ae 5419static int peer_aslist_unset_vty(struct vty *vty, const char *ip_str, afi_t afi,
5420 safi_t safi, const char *direct_str)
718e3744 5421{
d62a17ae 5422 int ret;
5423 struct peer *peer;
5424 int direct = FILTER_IN;
718e3744 5425
d62a17ae 5426 peer = peer_and_group_lookup_vty(vty, ip_str);
5427 if (!peer)
5428 return CMD_WARNING_CONFIG_FAILED;
718e3744 5429
d62a17ae 5430 /* Check filter direction. */
5431 if (strncmp(direct_str, "i", 1) == 0)
5432 direct = FILTER_IN;
5433 else if (strncmp(direct_str, "o", 1) == 0)
5434 direct = FILTER_OUT;
718e3744 5435
d62a17ae 5436 ret = peer_aslist_unset(peer, afi, safi, direct);
718e3744 5437
d62a17ae 5438 return bgp_vty_return(vty, ret);
718e3744 5439}
5440
5441DEFUN (neighbor_filter_list,
5442 neighbor_filter_list_cmd,
9ccf14f7 5443 "neighbor <A.B.C.D|X:X::X:X|WORD> filter-list WORD <in|out>",
718e3744 5444 NEIGHBOR_STR
5445 NEIGHBOR_ADDR_STR2
5446 "Establish BGP filters\n"
5447 "AS path access-list name\n"
5448 "Filter incoming routes\n"
5449 "Filter outgoing routes\n")
5450{
d62a17ae 5451 int idx_peer = 1;
5452 int idx_word = 3;
5453 int idx_in_out = 4;
5454 return peer_aslist_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
5455 bgp_node_safi(vty), argv[idx_word]->arg,
5456 argv[idx_in_out]->arg);
718e3744 5457}
5458
d62a17ae 5459ALIAS_HIDDEN(neighbor_filter_list, neighbor_filter_list_hidden_cmd,
5460 "neighbor <A.B.C.D|X:X::X:X|WORD> filter-list WORD <in|out>",
5461 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5462 "Establish BGP filters\n"
5463 "AS path access-list name\n"
5464 "Filter incoming routes\n"
5465 "Filter outgoing routes\n")
596c17ba 5466
718e3744 5467DEFUN (no_neighbor_filter_list,
5468 no_neighbor_filter_list_cmd,
9ccf14f7 5469 "no neighbor <A.B.C.D|X:X::X:X|WORD> filter-list WORD <in|out>",
718e3744 5470 NO_STR
5471 NEIGHBOR_STR
5472 NEIGHBOR_ADDR_STR2
5473 "Establish BGP filters\n"
5474 "AS path access-list name\n"
5475 "Filter incoming routes\n"
5476 "Filter outgoing routes\n")
5477{
d62a17ae 5478 int idx_peer = 2;
5479 int idx_in_out = 5;
5480 return peer_aslist_unset_vty(vty, argv[idx_peer]->arg,
5481 bgp_node_afi(vty), bgp_node_safi(vty),
5482 argv[idx_in_out]->arg);
718e3744 5483}
6b0655a2 5484
d62a17ae 5485ALIAS_HIDDEN(no_neighbor_filter_list, no_neighbor_filter_list_hidden_cmd,
5486 "no neighbor <A.B.C.D|X:X::X:X|WORD> filter-list WORD <in|out>",
5487 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5488 "Establish BGP filters\n"
5489 "AS path access-list name\n"
5490 "Filter incoming routes\n"
5491 "Filter outgoing routes\n")
596c17ba 5492
718e3744 5493/* Set route-map to the peer. */
d62a17ae 5494static int peer_route_map_set_vty(struct vty *vty, const char *ip_str,
5495 afi_t afi, safi_t safi, const char *name_str,
5496 const char *direct_str)
718e3744 5497{
d62a17ae 5498 int ret;
5499 struct peer *peer;
5500 int direct = RMAP_IN;
718e3744 5501
d62a17ae 5502 peer = peer_and_group_lookup_vty(vty, ip_str);
5503 if (!peer)
5504 return CMD_WARNING_CONFIG_FAILED;
718e3744 5505
d62a17ae 5506 /* Check filter direction. */
5507 if (strncmp(direct_str, "in", 2) == 0)
5508 direct = RMAP_IN;
5509 else if (strncmp(direct_str, "o", 1) == 0)
5510 direct = RMAP_OUT;
718e3744 5511
d62a17ae 5512 ret = peer_route_map_set(peer, afi, safi, direct, name_str);
718e3744 5513
d62a17ae 5514 return bgp_vty_return(vty, ret);
718e3744 5515}
5516
d62a17ae 5517static int peer_route_map_unset_vty(struct vty *vty, const char *ip_str,
5518 afi_t afi, safi_t safi,
5519 const char *direct_str)
718e3744 5520{
d62a17ae 5521 int ret;
5522 struct peer *peer;
5523 int direct = RMAP_IN;
718e3744 5524
d62a17ae 5525 peer = peer_and_group_lookup_vty(vty, ip_str);
5526 if (!peer)
5527 return CMD_WARNING_CONFIG_FAILED;
718e3744 5528
d62a17ae 5529 /* Check filter direction. */
5530 if (strncmp(direct_str, "in", 2) == 0)
5531 direct = RMAP_IN;
5532 else if (strncmp(direct_str, "o", 1) == 0)
5533 direct = RMAP_OUT;
718e3744 5534
d62a17ae 5535 ret = peer_route_map_unset(peer, afi, safi, direct);
718e3744 5536
d62a17ae 5537 return bgp_vty_return(vty, ret);
718e3744 5538}
5539
5540DEFUN (neighbor_route_map,
5541 neighbor_route_map_cmd,
9ccf14f7 5542 "neighbor <A.B.C.D|X:X::X:X|WORD> route-map WORD <in|out>",
718e3744 5543 NEIGHBOR_STR
5544 NEIGHBOR_ADDR_STR2
5545 "Apply route map to neighbor\n"
5546 "Name of route map\n"
5547 "Apply map to incoming routes\n"
2a3d5731 5548 "Apply map to outbound routes\n")
718e3744 5549{
d62a17ae 5550 int idx_peer = 1;
5551 int idx_word = 3;
5552 int idx_in_out = 4;
5553 return peer_route_map_set_vty(
5554 vty, argv[idx_peer]->arg, bgp_node_afi(vty), bgp_node_safi(vty),
5555 argv[idx_word]->arg, argv[idx_in_out]->arg);
718e3744 5556}
5557
d62a17ae 5558ALIAS_HIDDEN(neighbor_route_map, neighbor_route_map_hidden_cmd,
5559 "neighbor <A.B.C.D|X:X::X:X|WORD> route-map WORD <in|out>",
5560 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5561 "Apply route map to neighbor\n"
5562 "Name of route map\n"
5563 "Apply map to incoming routes\n"
5564 "Apply map to outbound routes\n")
596c17ba 5565
718e3744 5566DEFUN (no_neighbor_route_map,
5567 no_neighbor_route_map_cmd,
9ccf14f7 5568 "no neighbor <A.B.C.D|X:X::X:X|WORD> route-map WORD <in|out>",
718e3744 5569 NO_STR
5570 NEIGHBOR_STR
5571 NEIGHBOR_ADDR_STR2
5572 "Apply route map to neighbor\n"
5573 "Name of route map\n"
5574 "Apply map to incoming routes\n"
2a3d5731 5575 "Apply map to outbound routes\n")
718e3744 5576{
d62a17ae 5577 int idx_peer = 2;
5578 int idx_in_out = 5;
5579 return peer_route_map_unset_vty(vty, argv[idx_peer]->arg,
5580 bgp_node_afi(vty), bgp_node_safi(vty),
5581 argv[idx_in_out]->arg);
718e3744 5582}
6b0655a2 5583
d62a17ae 5584ALIAS_HIDDEN(no_neighbor_route_map, no_neighbor_route_map_hidden_cmd,
5585 "no neighbor <A.B.C.D|X:X::X:X|WORD> route-map WORD <in|out>",
5586 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5587 "Apply route map to neighbor\n"
5588 "Name of route map\n"
5589 "Apply map to incoming routes\n"
5590 "Apply map to outbound routes\n")
596c17ba 5591
718e3744 5592/* Set unsuppress-map to the peer. */
d62a17ae 5593static int peer_unsuppress_map_set_vty(struct vty *vty, const char *ip_str,
5594 afi_t afi, safi_t safi,
5595 const char *name_str)
718e3744 5596{
d62a17ae 5597 int ret;
5598 struct peer *peer;
718e3744 5599
d62a17ae 5600 peer = peer_and_group_lookup_vty(vty, ip_str);
5601 if (!peer)
5602 return CMD_WARNING_CONFIG_FAILED;
718e3744 5603
d62a17ae 5604 ret = peer_unsuppress_map_set(peer, afi, safi, name_str);
718e3744 5605
d62a17ae 5606 return bgp_vty_return(vty, ret);
718e3744 5607}
5608
5609/* Unset route-map from the peer. */
d62a17ae 5610static int peer_unsuppress_map_unset_vty(struct vty *vty, const char *ip_str,
5611 afi_t afi, safi_t safi)
718e3744 5612{
d62a17ae 5613 int ret;
5614 struct peer *peer;
718e3744 5615
d62a17ae 5616 peer = peer_and_group_lookup_vty(vty, ip_str);
5617 if (!peer)
5618 return CMD_WARNING_CONFIG_FAILED;
718e3744 5619
d62a17ae 5620 ret = peer_unsuppress_map_unset(peer, afi, safi);
718e3744 5621
d62a17ae 5622 return bgp_vty_return(vty, ret);
718e3744 5623}
5624
5625DEFUN (neighbor_unsuppress_map,
5626 neighbor_unsuppress_map_cmd,
9ccf14f7 5627 "neighbor <A.B.C.D|X:X::X:X|WORD> unsuppress-map WORD",
718e3744 5628 NEIGHBOR_STR
5629 NEIGHBOR_ADDR_STR2
5630 "Route-map to selectively unsuppress suppressed routes\n"
5631 "Name of route map\n")
5632{
d62a17ae 5633 int idx_peer = 1;
5634 int idx_word = 3;
5635 return peer_unsuppress_map_set_vty(
5636 vty, argv[idx_peer]->arg, bgp_node_afi(vty), bgp_node_safi(vty),
5637 argv[idx_word]->arg);
718e3744 5638}
5639
d62a17ae 5640ALIAS_HIDDEN(neighbor_unsuppress_map, neighbor_unsuppress_map_hidden_cmd,
5641 "neighbor <A.B.C.D|X:X::X:X|WORD> unsuppress-map WORD",
5642 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5643 "Route-map to selectively unsuppress suppressed routes\n"
5644 "Name of route map\n")
596c17ba 5645
718e3744 5646DEFUN (no_neighbor_unsuppress_map,
5647 no_neighbor_unsuppress_map_cmd,
9ccf14f7 5648 "no neighbor <A.B.C.D|X:X::X:X|WORD> unsuppress-map WORD",
718e3744 5649 NO_STR
5650 NEIGHBOR_STR
5651 NEIGHBOR_ADDR_STR2
5652 "Route-map to selectively unsuppress suppressed routes\n"
5653 "Name of route map\n")
5654{
d62a17ae 5655 int idx_peer = 2;
5656 return peer_unsuppress_map_unset_vty(vty, argv[idx_peer]->arg,
5657 bgp_node_afi(vty),
5658 bgp_node_safi(vty));
718e3744 5659}
6b0655a2 5660
d62a17ae 5661ALIAS_HIDDEN(no_neighbor_unsuppress_map, no_neighbor_unsuppress_map_hidden_cmd,
5662 "no neighbor <A.B.C.D|X:X::X:X|WORD> unsuppress-map WORD",
5663 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5664 "Route-map to selectively unsuppress suppressed routes\n"
5665 "Name of route map\n")
596c17ba 5666
d62a17ae 5667static int peer_maximum_prefix_set_vty(struct vty *vty, const char *ip_str,
5668 afi_t afi, safi_t safi,
5669 const char *num_str,
5670 const char *threshold_str, int warning,
5671 const char *restart_str)
718e3744 5672{
d62a17ae 5673 int ret;
5674 struct peer *peer;
d7c0a89a
QY		 5675 uint32_t max;
5676 uint8_t threshold;
5677 uint16_t restart;
718e3744 5678
d62a17ae 5679 peer = peer_and_group_lookup_vty(vty, ip_str);
5680 if (!peer)
5681 return CMD_WARNING_CONFIG_FAILED;
718e3744 5682
d62a17ae 5683 max = strtoul(num_str, NULL, 10);
5684 if (threshold_str)
5685 threshold = atoi(threshold_str);
5686 else
5687 threshold = MAXIMUM_PREFIX_THRESHOLD_DEFAULT;
718e3744 5688
d62a17ae 5689 if (restart_str)
5690 restart = atoi(restart_str);
5691 else
5692 restart = 0;
0a486e5f 5693
d62a17ae 5694 ret = peer_maximum_prefix_set(peer, afi, safi, max, threshold, warning,
5695 restart);
718e3744 5696
d62a17ae 5697 return bgp_vty_return(vty, ret);
718e3744 5698}
5699
d62a17ae 5700static int peer_maximum_prefix_unset_vty(struct vty *vty, const char *ip_str,
5701 afi_t afi, safi_t safi)
718e3744 5702{
d62a17ae 5703 int ret;
5704 struct peer *peer;
718e3744 5705
d62a17ae 5706 peer = peer_and_group_lookup_vty(vty, ip_str);
5707 if (!peer)
5708 return CMD_WARNING_CONFIG_FAILED;
718e3744 5709
d62a17ae 5710 ret = peer_maximum_prefix_unset(peer, afi, safi);
718e3744 5711
d62a17ae 5712 return bgp_vty_return(vty, ret);
718e3744 5713}
5714
5715/* Maximum number of prefix configuration. prefix count is different
5716 for each peer configuration. So this configuration can be set for
5717 each peer configuration. */
5718DEFUN (neighbor_maximum_prefix,
5719 neighbor_maximum_prefix_cmd,
9ccf14f7 5720 "neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix (1-4294967295)",
718e3744 5721 NEIGHBOR_STR
5722 NEIGHBOR_ADDR_STR2
5723 "Maximum number of prefix accept from this peer\n"
5724 "maximum no. of prefix limit\n")
5725{
d62a17ae 5726 int idx_peer = 1;
5727 int idx_number = 3;
5728 return peer_maximum_prefix_set_vty(
5729 vty, argv[idx_peer]->arg, bgp_node_afi(vty), bgp_node_safi(vty),
5730 argv[idx_number]->arg, NULL, 0, NULL);
718e3744 5731}
5732
d62a17ae 5733ALIAS_HIDDEN(neighbor_maximum_prefix, neighbor_maximum_prefix_hidden_cmd,
5734 "neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix (1-4294967295)",
5735 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5736 "Maximum number of prefix accept from this peer\n"
5737 "maximum no. of prefix limit\n")
596c17ba 5738
e0701b79 5739DEFUN (neighbor_maximum_prefix_threshold,
5740 neighbor_maximum_prefix_threshold_cmd,
9ccf14f7 5741 "neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix (1-4294967295) (1-100)",
e0701b79 5742 NEIGHBOR_STR
5743 NEIGHBOR_ADDR_STR2
5744 "Maximum number of prefix accept from this peer\n"
5745 "maximum no. of prefix limit\n"
5746 "Threshold value (%) at which to generate a warning msg\n")
5747{
d62a17ae 5748 int idx_peer = 1;
5749 int idx_number = 3;
5750 int idx_number_2 = 4;
5751 return peer_maximum_prefix_set_vty(
5752 vty, argv[idx_peer]->arg, bgp_node_afi(vty), bgp_node_safi(vty),
5753 argv[idx_number]->arg, argv[idx_number_2]->arg, 0, NULL);
0a486e5f 5754}
e0701b79 5755
d62a17ae 5756ALIAS_HIDDEN(
5757 neighbor_maximum_prefix_threshold,
5758 neighbor_maximum_prefix_threshold_hidden_cmd,
5759 "neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix (1-4294967295) (1-100)",
5760 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5761 "Maximum number of prefix accept from this peer\n"
5762 "maximum no. of prefix limit\n"
5763 "Threshold value (%) at which to generate a warning msg\n")
596c17ba 5764
718e3744 5765DEFUN (neighbor_maximum_prefix_warning,
5766 neighbor_maximum_prefix_warning_cmd,
9ccf14f7 5767 "neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix (1-4294967295) warning-only",
718e3744 5768 NEIGHBOR_STR
5769 NEIGHBOR_ADDR_STR2
5770 "Maximum number of prefix accept from this peer\n"
5771 "maximum no. of prefix limit\n"
5772 "Only give warning message when limit is exceeded\n")
5773{
d62a17ae 5774 int idx_peer = 1;
5775 int idx_number = 3;
5776 return peer_maximum_prefix_set_vty(
5777 vty, argv[idx_peer]->arg, bgp_node_afi(vty), bgp_node_safi(vty),
5778 argv[idx_number]->arg, NULL, 1, NULL);
718e3744 5779}
5780
d62a17ae 5781ALIAS_HIDDEN(
5782 neighbor_maximum_prefix_warning,
5783 neighbor_maximum_prefix_warning_hidden_cmd,
5784 "neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix (1-4294967295) warning-only",
5785 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5786 "Maximum number of prefix accept from this peer\n"
5787 "maximum no. of prefix limit\n"
5788 "Only give warning message when limit is exceeded\n")
596c17ba 5789
e0701b79 5790DEFUN (neighbor_maximum_prefix_threshold_warning,
5791 neighbor_maximum_prefix_threshold_warning_cmd,
9ccf14f7 5792 "neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix (1-4294967295) (1-100) warning-only",
e0701b79 5793 NEIGHBOR_STR
5794 NEIGHBOR_ADDR_STR2
5795 "Maximum number of prefix accept from this peer\n"
5796 "maximum no. of prefix limit\n"
5797 "Threshold value (%) at which to generate a warning msg\n"
5798 "Only give warning message when limit is exceeded\n")
5799{
d62a17ae 5800 int idx_peer = 1;
5801 int idx_number = 3;
5802 int idx_number_2 = 4;
5803 return peer_maximum_prefix_set_vty(
5804 vty, argv[idx_peer]->arg, bgp_node_afi(vty), bgp_node_safi(vty),
5805 argv[idx_number]->arg, argv[idx_number_2]->arg, 1, NULL);
0a486e5f 5806}
5807
d62a17ae 5808ALIAS_HIDDEN(
5809 neighbor_maximum_prefix_threshold_warning,
5810 neighbor_maximum_prefix_threshold_warning_hidden_cmd,
5811 "neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix (1-4294967295) (1-100) warning-only",
5812 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5813 "Maximum number of prefix accept from this peer\n"
5814 "maximum no. of prefix limit\n"
5815 "Threshold value (%) at which to generate a warning msg\n"
5816 "Only give warning message when limit is exceeded\n")
596c17ba 5817
0a486e5f 5818DEFUN (neighbor_maximum_prefix_restart,
5819 neighbor_maximum_prefix_restart_cmd,
9ccf14f7 5820 "neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix (1-4294967295) restart (1-65535)",
0a486e5f 5821 NEIGHBOR_STR
5822 NEIGHBOR_ADDR_STR2
5823 "Maximum number of prefix accept from this peer\n"
5824 "maximum no. of prefix limit\n"
5825 "Restart bgp connection after limit is exceeded\n"
efd7904e 5826 "Restart interval in minutes\n")
0a486e5f 5827{
d62a17ae 5828 int idx_peer = 1;
5829 int idx_number = 3;
5830 int idx_number_2 = 5;
5831 return peer_maximum_prefix_set_vty(
5832 vty, argv[idx_peer]->arg, bgp_node_afi(vty), bgp_node_safi(vty),
5833 argv[idx_number]->arg, NULL, 0, argv[idx_number_2]->arg);
0a486e5f 5834}
5835
d62a17ae 5836ALIAS_HIDDEN(
5837 neighbor_maximum_prefix_restart,
5838 neighbor_maximum_prefix_restart_hidden_cmd,
5839 "neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix (1-4294967295) restart (1-65535)",
5840 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5841 "Maximum number of prefix accept from this peer\n"
5842 "maximum no. of prefix limit\n"
5843 "Restart bgp connection after limit is exceeded\n"
efd7904e 5844 "Restart interval in minutes\n")
596c17ba 5845
0a486e5f 5846DEFUN (neighbor_maximum_prefix_threshold_restart,
5847 neighbor_maximum_prefix_threshold_restart_cmd,
9ccf14f7 5848 "neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix (1-4294967295) (1-100) restart (1-65535)",
0a486e5f 5849 NEIGHBOR_STR
5850 NEIGHBOR_ADDR_STR2
16cedbb0 5851 "Maximum number of prefixes to accept from this peer\n"
0a486e5f 5852 "maximum no. of prefix limit\n"
5853 "Threshold value (%) at which to generate a warning msg\n"
5854 "Restart bgp connection after limit is exceeded\n"
16cedbb0 5855 "Restart interval in minutes\n")
0a486e5f 5856{
d62a17ae 5857 int idx_peer = 1;
5858 int idx_number = 3;
5859 int idx_number_2 = 4;
5860 int idx_number_3 = 6;
5861 return peer_maximum_prefix_set_vty(
5862 vty, argv[idx_peer]->arg, bgp_node_afi(vty), bgp_node_safi(vty),
5863 argv[idx_number]->arg, argv[idx_number_2]->arg, 0,
5864 argv[idx_number_3]->arg);
5865}
5866
5867ALIAS_HIDDEN(
5868 neighbor_maximum_prefix_threshold_restart,
5869 neighbor_maximum_prefix_threshold_restart_hidden_cmd,
5870 "neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix (1-4294967295) (1-100) restart (1-65535)",
5871 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5872 "Maximum number of prefixes to accept from this peer\n"
5873 "maximum no. of prefix limit\n"
5874 "Threshold value (%) at which to generate a warning msg\n"
5875 "Restart bgp connection after limit is exceeded\n"
5876 "Restart interval in minutes\n")
596c17ba 5877
718e3744 5878DEFUN (no_neighbor_maximum_prefix,
5879 no_neighbor_maximum_prefix_cmd,
d04c479d 5880 "no neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix [(1-4294967295) [(1-100)] [restart (1-65535)] [warning-only]]",
718e3744 5881 NO_STR
5882 NEIGHBOR_STR
5883 NEIGHBOR_ADDR_STR2
16cedbb0 5884 "Maximum number of prefixes to accept from this peer\n"
31500417
DW		 5885 "maximum no. of prefix limit\n"
5886 "Threshold value (%) at which to generate a warning msg\n"
5887 "Restart bgp connection after limit is exceeded\n"
16cedbb0 5888 "Restart interval in minutes\n"
31500417 5889 "Only give warning message when limit is exceeded\n")
718e3744 5890{
d62a17ae 5891 int idx_peer = 2;
5892 return peer_maximum_prefix_unset_vty(vty, argv[idx_peer]->arg,
5893 bgp_node_afi(vty),
5894 bgp_node_safi(vty));
718e3744 5895}
e52702f2 5896
d62a17ae 5897ALIAS_HIDDEN(
5898 no_neighbor_maximum_prefix, no_neighbor_maximum_prefix_hidden_cmd,
5899 "no neighbor <A.B.C.D|X:X::X:X|WORD> maximum-prefix [(1-4294967295) [(1-100)] [restart (1-65535)] [warning-only]]",
5900 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5901 "Maximum number of prefixes to accept from this peer\n"
5902 "maximum no. of prefix limit\n"
5903 "Threshold value (%) at which to generate a warning msg\n"
5904 "Restart bgp connection after limit is exceeded\n"
5905 "Restart interval in minutes\n"
5906 "Only give warning message when limit is exceeded\n")
596c17ba 5907
718e3744 5908
718e3744 5909/* "neighbor allowas-in" */
5910DEFUN (neighbor_allowas_in,
5911 neighbor_allowas_in_cmd,
fd8503f5 5912 "neighbor <A.B.C.D|X:X::X:X|WORD> allowas-in [<(1-10)|origin>]",
718e3744 5913 NEIGHBOR_STR
5914 NEIGHBOR_ADDR_STR2
31500417 5915 "Accept as-path with my AS present in it\n"
fd8503f5
QY		 5916 "Number of occurances of AS number\n"
5917 "Only accept my AS in the as-path if the route was originated in my AS\n")
718e3744 5918{
d62a17ae 5919 int idx_peer = 1;
5920 int idx_number_origin = 3;
5921 int ret;
5922 int origin = 0;
5923 struct peer *peer;
5924 int allow_num = 0;
5925
5926 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
5927 if (!peer)
5928 return CMD_WARNING_CONFIG_FAILED;
5929
5930 if (argc <= idx_number_origin)
5931 allow_num = 3;
5932 else {
5933 if (argv[idx_number_origin]->type == WORD_TKN)
5934 origin = 1;
5935 else
5936 allow_num = atoi(argv[idx_number_origin]->arg);
5937 }
5938
5939 ret = peer_allowas_in_set(peer, bgp_node_afi(vty), bgp_node_safi(vty),
5940 allow_num, origin);
5941
5942 return bgp_vty_return(vty, ret);
5943}
5944
5945ALIAS_HIDDEN(
5946 neighbor_allowas_in, neighbor_allowas_in_hidden_cmd,
5947 "neighbor <A.B.C.D|X:X::X:X|WORD> allowas-in [<(1-10)|origin>]",
5948 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5949 "Accept as-path with my AS present in it\n"
5950 "Number of occurances of AS number\n"
5951 "Only accept my AS in the as-path if the route was originated in my AS\n")
596c17ba 5952
718e3744 5953DEFUN (no_neighbor_allowas_in,
5954 no_neighbor_allowas_in_cmd,
fd8503f5 5955 "no neighbor <A.B.C.D|X:X::X:X|WORD> allowas-in [<(1-10)|origin>]",
718e3744 5956 NO_STR
5957 NEIGHBOR_STR
5958 NEIGHBOR_ADDR_STR2
8334fd5a 5959 "allow local ASN appears in aspath attribute\n"
fd8503f5
QY		 5960 "Number of occurances of AS number\n"
5961 "Only accept my AS in the as-path if the route was originated in my AS\n")
718e3744 5962{
d62a17ae 5963 int idx_peer = 2;
5964 int ret;
5965 struct peer *peer;
718e3744 5966
d62a17ae 5967 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
5968 if (!peer)
5969 return CMD_WARNING_CONFIG_FAILED;
718e3744 5970
d62a17ae 5971 ret = peer_allowas_in_unset(peer, bgp_node_afi(vty),
5972 bgp_node_safi(vty));
718e3744 5973
d62a17ae 5974 return bgp_vty_return(vty, ret);
718e3744 5975}
6b0655a2 5976
d62a17ae 5977ALIAS_HIDDEN(
5978 no_neighbor_allowas_in, no_neighbor_allowas_in_hidden_cmd,
5979 "no neighbor <A.B.C.D|X:X::X:X|WORD> allowas-in [<(1-10)|origin>]",
5980 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
5981 "allow local ASN appears in aspath attribute\n"
5982 "Number of occurances of AS number\n"
5983 "Only accept my AS in the as-path if the route was originated in my AS\n")
596c17ba 5984
fa411a21
NH		 5985DEFUN (neighbor_ttl_security,
5986 neighbor_ttl_security_cmd,
7ebe625c 5987 "neighbor <A.B.C.D|X:X::X:X|WORD> ttl-security hops (1-254)",
fa411a21 5988 NEIGHBOR_STR
7ebe625c 5989 NEIGHBOR_ADDR_STR2
16cedbb0 5990 "BGP ttl-security parameters\n"
d7fa34c1
QY		 5991 "Specify the maximum number of hops to the BGP peer\n"
5992 "Number of hops to BGP peer\n")
fa411a21 5993{
d62a17ae 5994 int idx_peer = 1;
5995 int idx_number = 4;
5996 struct peer *peer;
5997 int gtsm_hops;
5998
5999 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
6000 if (!peer)
6001 return CMD_WARNING_CONFIG_FAILED;
6002
6003 gtsm_hops = strtoul(argv[idx_number]->arg, NULL, 10);
6004
7ebe625c
QY		 6005 /*
6006 * If 'neighbor swpX', then this is for directly connected peers,
6007 * we should not accept a ttl-security hops value greater than 1.
6008 */
6009 if (peer->conf_if && (gtsm_hops > 1)) {
6010 vty_out(vty,
6011 "%s is directly connected peer, hops cannot exceed 1\n",
6012 argv[idx_peer]->arg);
6013 return CMD_WARNING_CONFIG_FAILED;
6014 }
6015
d62a17ae 6016 return bgp_vty_return(vty, peer_ttl_security_hops_set(peer, gtsm_hops));
fa411a21
NH		 6017}
6018
6019DEFUN (no_neighbor_ttl_security,
6020 no_neighbor_ttl_security_cmd,
7ebe625c 6021 "no neighbor <A.B.C.D|X:X::X:X|WORD> ttl-security hops (1-254)",
fa411a21
NH		 6022 NO_STR
6023 NEIGHBOR_STR
7ebe625c 6024 NEIGHBOR_ADDR_STR2
16cedbb0 6025 "BGP ttl-security parameters\n"
3a2d747c
QY		 6026 "Specify the maximum number of hops to the BGP peer\n"
6027 "Number of hops to BGP peer\n")
fa411a21 6028{
d62a17ae 6029 int idx_peer = 2;
6030 struct peer *peer;
fa411a21 6031
d62a17ae 6032 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
6033 if (!peer)
6034 return CMD_WARNING_CONFIG_FAILED;
fa411a21 6035
d62a17ae 6036 return bgp_vty_return(vty, peer_ttl_security_hops_unset(peer));
fa411a21 6037}
6b0655a2 6038
adbac85e
DW		 6039DEFUN (neighbor_addpath_tx_all_paths,
6040 neighbor_addpath_tx_all_paths_cmd,
9ccf14f7 6041 "neighbor <A.B.C.D|X:X::X:X|WORD> addpath-tx-all-paths",
adbac85e
DW		 6042 NEIGHBOR_STR
6043 NEIGHBOR_ADDR_STR2
6044 "Use addpath to advertise all paths to a neighbor\n")
6045{
d62a17ae 6046 int idx_peer = 1;
6047 struct peer *peer;
adbac85e 6048
d62a17ae 6049 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
6050 if (!peer)
6051 return CMD_WARNING_CONFIG_FAILED;
adbac85e 6052
d62a17ae 6053 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
6054 bgp_node_safi(vty),
6055 PEER_FLAG_ADDPATH_TX_ALL_PATHS);
adbac85e
DW		 6056}
6057
d62a17ae 6058ALIAS_HIDDEN(neighbor_addpath_tx_all_paths,
6059 neighbor_addpath_tx_all_paths_hidden_cmd,
6060 "neighbor <A.B.C.D|X:X::X:X|WORD> addpath-tx-all-paths",
6061 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
6062 "Use addpath to advertise all paths to a neighbor\n")
596c17ba 6063
adbac85e
DW		 6064DEFUN (no_neighbor_addpath_tx_all_paths,
6065 no_neighbor_addpath_tx_all_paths_cmd,
9ccf14f7 6066 "no neighbor <A.B.C.D|X:X::X:X|WORD> addpath-tx-all-paths",
adbac85e
DW		 6067 NO_STR
6068 NEIGHBOR_STR
6069 NEIGHBOR_ADDR_STR2
6070 "Use addpath to advertise all paths to a neighbor\n")
6071{
d62a17ae 6072 int idx_peer = 2;
6073 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
6074 bgp_node_afi(vty), bgp_node_safi(vty),
6075 PEER_FLAG_ADDPATH_TX_ALL_PATHS);
adbac85e
DW		 6076}
6077
d62a17ae 6078ALIAS_HIDDEN(no_neighbor_addpath_tx_all_paths,
6079 no_neighbor_addpath_tx_all_paths_hidden_cmd,
6080 "no neighbor <A.B.C.D|X:X::X:X|WORD> addpath-tx-all-paths",
6081 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
6082 "Use addpath to advertise all paths to a neighbor\n")
596c17ba 6083
06370dac
DW		 6084DEFUN (neighbor_addpath_tx_bestpath_per_as,
6085 neighbor_addpath_tx_bestpath_per_as_cmd,
9ccf14f7 6086 "neighbor <A.B.C.D|X:X::X:X|WORD> addpath-tx-bestpath-per-AS",
06370dac
DW		 6087 NEIGHBOR_STR
6088 NEIGHBOR_ADDR_STR2
6089 "Use addpath to advertise the bestpath per each neighboring AS\n")
6090{
d62a17ae 6091 int idx_peer = 1;
6092 struct peer *peer;
06370dac 6093
d62a17ae 6094 peer = peer_and_group_lookup_vty(vty, argv[idx_peer]->arg);
6095 if (!peer)
6096 return CMD_WARNING_CONFIG_FAILED;
06370dac 6097
d62a17ae 6098 return peer_af_flag_set_vty(vty, argv[idx_peer]->arg, bgp_node_afi(vty),
6099 bgp_node_safi(vty),
6100 PEER_FLAG_ADDPATH_TX_BESTPATH_PER_AS);
06370dac
DW		 6101}
6102
d62a17ae 6103ALIAS_HIDDEN(neighbor_addpath_tx_bestpath_per_as,
6104 neighbor_addpath_tx_bestpath_per_as_hidden_cmd,
6105 "neighbor <A.B.C.D|X:X::X:X|WORD> addpath-tx-bestpath-per-AS",
6106 NEIGHBOR_STR NEIGHBOR_ADDR_STR2
6107 "Use addpath to advertise the bestpath per each neighboring AS\n")
596c17ba 6108
06370dac
DW		 6109DEFUN (no_neighbor_addpath_tx_bestpath_per_as,
6110 no_neighbor_addpath_tx_bestpath_per_as_cmd,
9ccf14f7 6111 "no neighbor <A.B.C.D|X:X::X:X|WORD> addpath-tx-bestpath-per-AS",
06370dac
DW		 6112 NO_STR
6113 NEIGHBOR_STR
6114 NEIGHBOR_ADDR_STR2
6115 "Use addpath to advertise the bestpath per each neighboring AS\n")
6116{
d62a17ae 6117 int idx_peer = 2;
6118 return peer_af_flag_unset_vty(vty, argv[idx_peer]->arg,
6119 bgp_node_afi(vty), bgp_node_safi(vty),
6120 PEER_FLAG_ADDPATH_TX_BESTPATH_PER_AS);
06370dac
DW		 6121}
6122
d62a17ae 6123ALIAS_HIDDEN(no_neighbor_addpath_tx_bestpath_per_as,
6124 no_neighbor_addpath_tx_bestpath_per_as_hidden_cmd,
6125 "no neighbor <A.B.C.D|X:X::X:X|WORD> addpath-tx-bestpath-per-AS",
6126 NO_STR NEIGHBOR_STR NEIGHBOR_ADDR_STR2
6127 "Use addpath to advertise the bestpath per each neighboring AS\n")
596c17ba 6128
b9c7bc5a
PZ		 6129static int set_ecom_list(struct vty *vty, int argc, struct cmd_token **argv,
6130 struct ecommunity **list)
ddb5b488 6131{
b9c7bc5a
PZ		 6132 struct ecommunity *ecom = NULL;
6133 struct ecommunity *ecomadd;
ddb5b488 6134
b9c7bc5a 6135 for (; argc; --argc, ++argv) {
ddb5b488 6136
b9c7bc5a
PZ		 6137 ecomadd = ecommunity_str2com(argv[0]->arg,
6138 ECOMMUNITY_ROUTE_TARGET, 0);
6139 if (!ecomadd) {
6140 vty_out(vty, "Malformed community-list value\n");
6141 if (ecom)
6142 ecommunity_free(&ecom);
6143 return CMD_WARNING_CONFIG_FAILED;
6144 }
ddb5b488 6145
b9c7bc5a
PZ		 6146 if (ecom) {
6147 ecommunity_merge(ecom, ecomadd);
6148 ecommunity_free(&ecomadd);
6149 } else {
6150 ecom = ecomadd;
6151 }
6152 }
6153
6154 if (*list) {
6155 ecommunity_free(&*list);
ddb5b488 6156 }
b9c7bc5a
PZ		 6157 *list = ecom;
6158
6159 return CMD_SUCCESS;
ddb5b488
PZ		 6160}
6161
b9c7bc5a 6162static int vpn_policy_getafi(struct vty *vty, int *doafi)
ddb5b488
PZ		 6163{
6164 switch (vty->node) {
b9c7bc5a 6165 case BGP_IPV4_NODE:
ddb5b488
PZ		 6166 doafi[AFI_IP] = 1;
6167 break;
b9c7bc5a 6168 case BGP_IPV6_NODE:
ddb5b488
PZ		 6169 doafi[AFI_IP6] = 1;
6170 break;
6171 default:
6172 vty_out(vty,
b9c7bc5a 6173 "%% context error: valid only in address-family <ipv4|ipv6> unicast block\n");
ddb5b488
PZ		 6174 return CMD_WARNING_CONFIG_FAILED;
6175 }
6176 return CMD_SUCCESS;
6177}
6178
b9c7bc5a
PZ		 6179DEFPY (af_rd_vpn_export,
6180 af_rd_vpn_export_cmd,
6181 "[no] rd vpn export ASN:NN_OR_IP-ADDRESS:NN$rd_str",
6182 NO_STR
ddb5b488 6183 "Specify route distinguisher\n"
b9c7bc5a
PZ		 6184 "Between current address-family and vpn\n"
6185 "For routes leaked from current address-family to vpn\n"
ddb5b488
PZ		 6186 "Route Distinguisher (<as-number>:<number> | <ip-address>:<number>)\n")
6187{
6188 VTY_DECLVAR_CONTEXT(bgp, bgp);
6189 struct prefix_rd prd;
6190 int ret;
6191 int doafi[AFI_MAX] = {0};
6192 afi_t afi;
b9c7bc5a
PZ		 6193 int idx = 0;
6194 int yes = 1;
ddb5b488 6195
b9c7bc5a 6196 if (argv_find(argv, argc, "no", &idx))
d555f3e9 6197 yes = 0;
b9c7bc5a
PZ		 6198
6199 if (yes) {
6200 ret = str2prefix_rd(rd_str, &prd);
6201 if (!ret) {
6202 vty_out(vty, "%% Malformed rd\n");
6203 return CMD_WARNING_CONFIG_FAILED;
6204 }
ddb5b488
PZ		 6205 }
6206
b9c7bc5a 6207 ret = vpn_policy_getafi(vty, doafi);
ddb5b488
PZ		 6208 if (ret != CMD_SUCCESS)
6209 return ret;
6210
6211
6212 for (afi = 0; afi < AFI_MAX; ++afi) {
6213 if (!doafi[afi])
6214 continue;
6215
6216 /* pre-change: un-export vpn routes (vpn->vrf routes unaffected)
6217 */
6218 vpn_leak_prechange(BGP_VPN_POLICY_DIR_TOVPN, afi,
6219 bgp_get_default(), bgp);
6220
b9c7bc5a
PZ		 6221 if (yes) {
6222 bgp->vpn_policy[afi].tovpn_rd = prd;
6223 SET_FLAG(bgp->vpn_policy[afi].flags,
6224 BGP_VPN_POLICY_TOVPN_RD_SET);
6225 } else {
6226 UNSET_FLAG(bgp->vpn_policy[afi].flags,
6227 BGP_VPN_POLICY_TOVPN_RD_SET);
6228 }
ddb5b488
PZ		 6229
6230 /* post-change: re-export vpn routes */
6231 vpn_leak_postchange(BGP_VPN_POLICY_DIR_TOVPN, afi,
6232 bgp_get_default(), bgp);
6233 }
6234
6235 return CMD_SUCCESS;
6236}
6237
b9c7bc5a
PZ		 6238ALIAS (af_rd_vpn_export,
6239 af_no_rd_vpn_export_cmd,
6240 "no rd vpn export",
ddb5b488 6241 NO_STR
b9c7bc5a
PZ		 6242 "Specify route distinguisher\n"
6243 "Between current address-family and vpn\n"
6244 "For routes leaked from current address-family to vpn\n")
ddb5b488 6245
b9c7bc5a
PZ		 6246DEFPY (af_label_vpn_export,
6247 af_label_vpn_export_cmd,
e70e9f8e 6248 "[no] label vpn export <(0-1048575)$label_val|auto$label_auto>",
b9c7bc5a 6249 NO_STR
ddb5b488 6250 "label value for VRF\n"
b9c7bc5a
PZ		 6251 "Between current address-family and vpn\n"
6252 "For routes leaked from current address-family to vpn\n"
e70e9f8e
PZ		 6253 "Label Value <0-1048575>\n"
6254 "Automatically assign a label\n")
ddb5b488
PZ		 6255{
6256 VTY_DECLVAR_CONTEXT(bgp, bgp);
b9c7bc5a 6257 mpls_label_t label = MPLS_LABEL_NONE;
ddb5b488
PZ		 6258 int doafi[AFI_MAX] = {0};
6259 afi_t afi;
6260 int ret;
b9c7bc5a
PZ		 6261 int idx = 0;
6262 int yes = 1;
6263
6264 if (argv_find(argv, argc, "no", &idx))
d555f3e9 6265 yes = 0;
ddb5b488 6266
e70e9f8e
PZ		 6267 if (yes) {
6268 if (!label_auto)
6269 label = label_val; /* parser should force unsigned */
6270 }
ddb5b488 6271
b9c7bc5a 6272 ret = vpn_policy_getafi(vty, doafi);
ddb5b488
PZ		 6273 if (ret != CMD_SUCCESS)
6274 return ret;
6275
6276 for (afi = 0; afi < AFI_MAX; ++afi) {
6277 if (!doafi[afi])
6278 continue;
6279
e70e9f8e
PZ		 6280 if (label_auto && CHECK_FLAG(bgp->vpn_policy[afi].flags,
6281 BGP_VPN_POLICY_TOVPN_LABEL_AUTO))
6282
6283 continue; /* no change */
6284
b9c7bc5a
PZ		 6285 /*
6286 * pre-change: un-export vpn routes (vpn->vrf routes unaffected)
ddb5b488
PZ		 6287 */
6288 vpn_leak_prechange(BGP_VPN_POLICY_DIR_TOVPN, afi,
6289 bgp_get_default(), bgp);
6290
e70e9f8e
PZ		 6291 if (!label_auto && CHECK_FLAG(bgp->vpn_policy[afi].flags,
6292 BGP_VPN_POLICY_TOVPN_LABEL_AUTO)) {
6293
6294 if (bgp->vpn_policy[afi].tovpn_label !=
6295 MPLS_LABEL_NONE) {
6296
6297 /*
6298 * label has previously been automatically
6299 * assigned by labelpool: release it
6300 *
6301 * NB if tovpn_label == MPLS_LABEL_NONE it
6302 * means the automatic assignment is in flight
6303 * and therefore the labelpool callback must
6304 * detect that the auto label is not needed.
6305 */
6306
6307 bgp_lp_release(LP_TYPE_VRF,
6308 &bgp->vpn_policy[afi],
6309 bgp->vpn_policy[afi].tovpn_label);
6310 }
6311 UNSET_FLAG(bgp->vpn_policy[afi].flags,
6312 BGP_VPN_POLICY_TOVPN_LABEL_AUTO);
6313 }
6314
ddb5b488 6315 bgp->vpn_policy[afi].tovpn_label = label;
e70e9f8e
PZ		 6316 if (label_auto) {
6317 SET_FLAG(bgp->vpn_policy[afi].flags,
6318 BGP_VPN_POLICY_TOVPN_LABEL_AUTO);
6319 bgp_lp_get(LP_TYPE_VRF, &bgp->vpn_policy[afi],
6320 vpn_leak_label_callback);
6321 }
ddb5b488
PZ		 6322
6323 /* post-change: re-export vpn routes */
6324 vpn_leak_postchange(BGP_VPN_POLICY_DIR_TOVPN, afi,
6325 bgp_get_default(), bgp);
6326 }
6327
6328 return CMD_SUCCESS;
6329}
6330
b9c7bc5a
PZ		 6331ALIAS (af_label_vpn_export,
6332 af_no_label_vpn_export_cmd,
6333 "no label vpn export",
6334 NO_STR
6335 "label value for VRF\n"
6336 "Between current address-family and vpn\n"
6337 "For routes leaked from current address-family to vpn\n")
ddb5b488 6338
b9c7bc5a
PZ		 6339DEFPY (af_nexthop_vpn_export,
6340 af_nexthop_vpn_export_cmd,
6341 "[no] nexthop vpn export <A.B.C.D|X:X::X:X>$nexthop_str",
6342 NO_STR
ddb5b488 6343 "Specify next hop to use for VRF advertised prefixes\n"
b9c7bc5a
PZ		 6344 "Between current address-family and vpn\n"
6345 "For routes leaked from current address-family to vpn\n"
ddb5b488
PZ		 6346 "IPv4 prefix\n"
6347 "IPv6 prefix\n")
6348{
6349 VTY_DECLVAR_CONTEXT(bgp, bgp);
6350 int doafi[AFI_MAX] = {0};
6351 afi_t afi;
6352 int ret;
6353 struct prefix p;
b9c7bc5a
PZ		 6354 int idx = 0;
6355 int yes = 1;
ddb5b488 6356
b9c7bc5a 6357 if (argv_find(argv, argc, "no", &idx))
d555f3e9 6358 yes = 0;
b9c7bc5a
PZ		 6359
6360 if (yes) {
6361 if (!sockunion2hostprefix(nexthop_str, &p))
6362 return CMD_WARNING_CONFIG_FAILED;
6363 }
ddb5b488 6364
b9c7bc5a 6365 ret = vpn_policy_getafi(vty, doafi);
ddb5b488
PZ		 6366 if (ret != CMD_SUCCESS)
6367 return ret;
6368
6369 for (afi = 0; afi < AFI_MAX; ++afi) {
6370 if (!doafi[afi])
6371 continue;
6372
6373 /*
6374 * pre-change: un-export vpn routes (vpn->vrf routes unaffected)
6375 */
6376 vpn_leak_prechange(BGP_VPN_POLICY_DIR_TOVPN, afi,
6377 bgp_get_default(), bgp);
6378
b9c7bc5a
PZ		 6379 if (yes) {
6380 bgp->vpn_policy[afi].tovpn_nexthop = p;
6381 SET_FLAG(bgp->vpn_policy[afi].flags,
6382 BGP_VPN_POLICY_TOVPN_NEXTHOP_SET);
6383 } else {
6384 UNSET_FLAG(bgp->vpn_policy[afi].flags,
6385 BGP_VPN_POLICY_TOVPN_NEXTHOP_SET);
6386 }
ddb5b488
PZ		 6387
6388 /* post-change: re-export vpn routes */
6389 vpn_leak_postchange(BGP_VPN_POLICY_DIR_TOVPN, afi,
6390 bgp_get_default(), bgp);
6391 }
6392
6393 return CMD_SUCCESS;
6394}
6395
b9c7bc5a
PZ		 6396ALIAS (af_nexthop_vpn_export,
6397 af_no_nexthop_vpn_export_cmd,
6398 "no nexthop vpn export",
ddb5b488 6399 NO_STR
b9c7bc5a
PZ		 6400 "Specify next hop to use for VRF advertised prefixes\n"
6401 "Between current address-family and vpn\n"
6402 "For routes leaked from current address-family to vpn\n")
ddb5b488 6403
b9c7bc5a 6404static int vpn_policy_getdirs(struct vty *vty, const char *dstr, int *dodir)
ddb5b488 6405{
b9c7bc5a
PZ		 6406 if (!strcmp(dstr, "import")) {
6407 dodir[BGP_VPN_POLICY_DIR_FROMVPN] = 1;
6408 } else if (!strcmp(dstr, "export")) {
6409 dodir[BGP_VPN_POLICY_DIR_TOVPN] = 1;
6410 } else if (!strcmp(dstr, "both")) {
6411 dodir[BGP_VPN_POLICY_DIR_FROMVPN] = 1;
6412 dodir[BGP_VPN_POLICY_DIR_TOVPN] = 1;
6413 } else {
6414 vty_out(vty, "%% direction parse error\n");
6415 return CMD_WARNING_CONFIG_FAILED;
ddb5b488 6416 }
ddb5b488
PZ		 6417 return CMD_SUCCESS;
6418}
6419
b9c7bc5a
PZ		 6420DEFPY (af_rt_vpn_imexport,
6421 af_rt_vpn_imexport_cmd,
6422 "[no] <rt|route-target> vpn <import|export|both>$direction_str RTLIST...",
6423 NO_STR
6424 "Specify route target list\n"
ddb5b488 6425 "Specify route target list\n"
b9c7bc5a
PZ		 6426 "Between current address-family and vpn\n"
6427 "For routes leaked from vpn to current address-family: match any\n"
6428 "For routes leaked from current address-family to vpn: set\n"
6429 "both import: match any and export: set\n"
ddb5b488
PZ		 6430 "Space separated route target list (A.B.C.D:MN|EF:OPQR|GHJK:MN)\n")
6431{
6432 VTY_DECLVAR_CONTEXT(bgp, bgp);
6433 int ret;
6434 struct ecommunity *ecom = NULL;
6435 int dodir[BGP_VPN_POLICY_DIR_MAX] = {0};
6436 int doafi[AFI_MAX] = {0};
6437 vpn_policy_direction_t dir;
6438 afi_t afi;
6439 int idx = 0;
b9c7bc5a 6440 int yes = 1;
ddb5b488 6441
b9c7bc5a 6442 if (argv_find(argv, argc, "no", &idx))
d555f3e9 6443 yes = 0;
b9c7bc5a
PZ		 6444
6445 ret = vpn_policy_getafi(vty, doafi);
ddb5b488
PZ		 6446 if (ret != CMD_SUCCESS)
6447 return ret;
6448
b9c7bc5a 6449 ret = vpn_policy_getdirs(vty, direction_str, dodir);
ddb5b488
PZ		 6450 if (ret != CMD_SUCCESS)
6451 return ret;
6452
b9c7bc5a
PZ		 6453 if (yes) {
6454 if (!argv_find(argv, argc, "RTLIST", &idx)) {
6455 vty_out(vty, "%% Missing RTLIST\n");
6456 return CMD_WARNING_CONFIG_FAILED;
6457 }
6458 ret = set_ecom_list(vty, argc - idx, argv + idx, &ecom);
6459 if (ret != CMD_SUCCESS) {
6460 return ret;
6461 }
ddb5b488
PZ		 6462 }
6463
6464 for (afi = 0; afi < AFI_MAX; ++afi) {
6465 if (!doafi[afi])
6466 continue;
6467 for (dir = 0; dir < BGP_VPN_POLICY_DIR_MAX; ++dir) {
6468 if (!dodir[dir])
6469 continue;
6470
6471 vpn_leak_prechange(dir, afi, bgp_get_default(), bgp);
6472
b9c7bc5a
PZ		 6473 if (yes) {
6474 if (bgp->vpn_policy[afi].rtlist[dir])
6475 ecommunity_free(
6476 &bgp->vpn_policy[afi].rtlist[dir]);
6477 bgp->vpn_policy[afi].rtlist[dir] =
6478 ecommunity_dup(ecom);
6479 } else {
6480 if (bgp->vpn_policy[afi].rtlist[dir])
6481 ecommunity_free(
6482 &bgp->vpn_policy[afi].rtlist[dir]);
6483 bgp->vpn_policy[afi].rtlist[dir] = NULL;
6484 }
ddb5b488
PZ		 6485
6486 vpn_leak_postchange(dir, afi, bgp_get_default(), bgp);
6487 }
6488 }
d555f3e9
PZ		 6489 if (ecom)
6490 ecommunity_free(&ecom);
ddb5b488
PZ		 6491
6492 return CMD_SUCCESS;
6493}
6494
b9c7bc5a
PZ		 6495ALIAS (af_rt_vpn_imexport,
6496 af_no_rt_vpn_imexport_cmd,
6497 "no <rt|route-target> vpn <import|export|both>$direction_str",
ddb5b488
PZ		 6498 NO_STR
6499 "Specify route target list\n"
b9c7bc5a
PZ		 6500 "Specify route target list\n"
6501 "Between current address-family and vpn\n"
6502 "For routes leaked from vpn to current address-family\n"
6503 "For routes leaked from current address-family to vpn\n"
6504 "both import and export\n")
6505
6506DEFPY (af_route_map_vpn_imexport,
6507 af_route_map_vpn_imexport_cmd,
6508/* future: "route-map <vpn|evpn|vrf NAME> <import|export> RMAP" */
6509 "[no] route-map vpn <import|export>$direction_str RMAP$rmap_str",
6510 NO_STR
ddb5b488 6511 "Specify route map\n"
b9c7bc5a
PZ		 6512 "Between current address-family and vpn\n"
6513 "For routes leaked from vpn to current address-family\n"
6514 "For routes leaked from current address-family to vpn\n"
ddb5b488
PZ		 6515 "name of route-map\n")
6516{
6517 VTY_DECLVAR_CONTEXT(bgp, bgp);
6518 int ret;
6519 int dodir[BGP_VPN_POLICY_DIR_MAX] = {0};
6520 int doafi[AFI_MAX] = {0};
6521 vpn_policy_direction_t dir;
6522 afi_t afi;
ddb5b488 6523 int idx = 0;
b9c7bc5a 6524 int yes = 1;
ddb5b488 6525
b9c7bc5a 6526 if (argv_find(argv, argc, "no", &idx))
d555f3e9 6527 yes = 0;
b9c7bc5a
PZ		 6528
6529 ret = vpn_policy_getafi(vty, doafi);
ddb5b488
PZ		 6530 if (ret != CMD_SUCCESS)
6531 return ret;
6532
b9c7bc5a 6533 ret = vpn_policy_getdirs(vty, direction_str, dodir);
ddb5b488
PZ		 6534 if (ret != CMD_SUCCESS)
6535 return ret;
6536
6537 for (afi = 0; afi < AFI_MAX; ++afi) {
6538 if (!doafi[afi])
6539 continue;
6540 for (dir = 0; dir < BGP_VPN_POLICY_DIR_MAX; ++dir) {
6541 if (!dodir[dir])
6542 continue;
6543
6544 vpn_leak_prechange(dir, afi, bgp_get_default(), bgp);
6545
b9c7bc5a
PZ		 6546 if (yes) {
6547 if (bgp->vpn_policy[afi].rmap_name[dir])
6548 XFREE(MTYPE_ROUTE_MAP_NAME,
6549 bgp->vpn_policy[afi].rmap_name[dir]);
6550 bgp->vpn_policy[afi].rmap_name[dir] = XSTRDUP(
6551 MTYPE_ROUTE_MAP_NAME, rmap_str);
6552 bgp->vpn_policy[afi].rmap[dir] =
6553 route_map_lookup_by_name(rmap_str);
6554 } else {
6555 if (bgp->vpn_policy[afi].rmap_name[dir])
6556 XFREE(MTYPE_ROUTE_MAP_NAME,
6557 bgp->vpn_policy[afi].rmap_name[dir]);
6558 bgp->vpn_policy[afi].rmap_name[dir] = NULL;
6559 bgp->vpn_policy[afi].rmap[dir] = NULL;
6560 }
ddb5b488
PZ		 6561
6562 vpn_leak_postchange(dir, afi, bgp_get_default(), bgp);
6563 }
6564 }
6565
6566 return CMD_SUCCESS;
6567}
6568
b9c7bc5a
PZ		 6569ALIAS (af_route_map_vpn_imexport,
6570 af_no_route_map_vpn_imexport_cmd,
6571 "no route-map vpn <import|export>$direction_str",
ddb5b488
PZ		 6572 NO_STR
6573 "Specify route map\n"
b9c7bc5a
PZ		 6574 "Between current address-family and vpn\n"
6575 "For routes leaked from vpn to current address-family\n"
6576 "For routes leaked from current address-family to vpn\n")
6577
12a844a5
DS		 6578DEFPY (bgp_imexport_vrf,
6579 bgp_imexport_vrf_cmd,
6580 "[no] import vrf NAME$import_name",
6581 NO_STR
6582 "Import routes from another VRF\n"
6583 "VRF to import from\n"
6584 "The name of the VRF\n")
6585{
6586 VTY_DECLVAR_CONTEXT(bgp, bgp);
6587 struct listnode *node;
6588 struct bgp *vrf_bgp;
6589 bool remove = false;
6590 int32_t idx = 0;
6591 char *vname;
12a844a5
DS		 6592 safi_t safi;
6593 afi_t afi;
6594
6595 if (argv_find(argv, argc, "no", &idx))
6596 remove = true;
6597
6598 afi = bgp_node_afi(vty);
6599 safi = bgp_node_safi(vty);
6600
6601 vrf_bgp = bgp_lookup_by_name(import_name);
6602 if (!vrf_bgp) {
6e2c7fe6
DS		 6603 int32_t ret;
6604 as_t as = bgp->as;
6605
6606 /* Auto-create assuming the same AS */
6607 ret = bgp_get(&vrf_bgp, &as, import_name,
6608 BGP_INSTANCE_TYPE_VRF);
6609 if (ret) {
6610 vty_out(vty, "VRF %s is not configured as a bgp instance\n",
6611 import_name);
6612 return CMD_WARNING;
6613 }
12a844a5
DS		 6614 }
6615
12a844a5 6616 if (remove) {
44338987 6617 vrf_unimport_from_vrf(bgp, vrf_bgp, afi, safi);
12a844a5 6618 } else {
44338987 6619 /* Already importing from "import_vrf"? */
12a844a5
DS		 6620 for (ALL_LIST_ELEMENTS_RO(bgp->vpn_policy[afi].import_vrf, node,
6621 vname)) {
6622 if (strcmp(vname, import_name) == 0)
6623 return CMD_WARNING;
6624 }
6625
44338987 6626 vrf_import_from_vrf(bgp, vrf_bgp, afi, safi);
12a844a5
DS		 6627 }
6628
6629 return CMD_SUCCESS;
6630}
6631
b9c7bc5a
PZ		 6632/* This command is valid only in a bgp vrf instance or the default instance */
6633DEFPY (bgp_imexport_vpn,
6634 bgp_imexport_vpn_cmd,
6635 "[no] <import|export>$direction_str vpn",
c7109e09
PZ		 6636 NO_STR
6637 "Import routes to this address-family\n"
6638 "Export routes from this address-family\n"
6639 "to/from default instance VPN RIB\n")
ddb5b488
PZ		 6640{
6641 VTY_DECLVAR_CONTEXT(bgp, bgp);
b9c7bc5a 6642 int previous_state;
ddb5b488 6643 afi_t afi;
b9c7bc5a 6644 safi_t safi;
ddb5b488 6645 int idx = 0;
b9c7bc5a
PZ		 6646 int yes = 1;
6647 int flag;
6648 vpn_policy_direction_t dir;
ddb5b488 6649
b9c7bc5a 6650 if (argv_find(argv, argc, "no", &idx))
d555f3e9 6651 yes = 0;
ddb5b488 6652
b9c7bc5a
PZ		 6653 if (BGP_INSTANCE_TYPE_VRF != bgp->inst_type &&
6654 BGP_INSTANCE_TYPE_DEFAULT != bgp->inst_type) {
ddb5b488 6655
b9c7bc5a
PZ		 6656 vty_out(vty, "%% import|export vpn valid only for bgp vrf or default instance\n");
6657 return CMD_WARNING_CONFIG_FAILED;
6658 }
ddb5b488 6659
b9c7bc5a
PZ		 6660 afi = bgp_node_afi(vty);
6661 safi = bgp_node_safi(vty);
6662 if ((SAFI_UNICAST != safi) || ((AFI_IP != afi) && (AFI_IP6 != afi))) {
6663 vty_out(vty, "%% import|export vpn valid only for unicast ipv4|ipv6\n");
6664 return CMD_WARNING_CONFIG_FAILED;
6665 }
ddb5b488 6666
b9c7bc5a
PZ		 6667 if (!strcmp(direction_str, "import")) {
6668 flag = BGP_CONFIG_MPLSVPN_TO_VRF_IMPORT;
6669 dir = BGP_VPN_POLICY_DIR_FROMVPN;
6670 } else if (!strcmp(direction_str, "export")) {
6671 flag = BGP_CONFIG_VRF_TO_MPLSVPN_EXPORT;
6672 dir = BGP_VPN_POLICY_DIR_TOVPN;
6673 } else {
6674 vty_out(vty, "%% unknown direction %s\n", direction_str);
6675 return CMD_WARNING_CONFIG_FAILED;
6676 }
6677
6678 previous_state = CHECK_FLAG(bgp->af_flags[afi][safi], flag);
ddb5b488 6679
b9c7bc5a
PZ		 6680 if (yes) {
6681 SET_FLAG(bgp->af_flags[afi][safi], flag);
6682 if (!previous_state) {
6683 /* trigger export current vrf */
ddb5b488
PZ		 6684 vpn_leak_postchange(dir, afi, bgp_get_default(), bgp);
6685 }
b9c7bc5a
PZ		 6686 } else {
6687 if (previous_state) {
6688 /* trigger un-export current vrf */
6689 vpn_leak_prechange(dir, afi, bgp_get_default(), bgp);
6690 }
6691 UNSET_FLAG(bgp->af_flags[afi][safi], flag);
ddb5b488
PZ		 6692 }
6693
6694 return CMD_SUCCESS;
6695}
6696
301ad80a
PG		 6697DEFPY (af_routetarget_import,
6698 af_routetarget_import_cmd,
6699 "[no] <rt|route-target> redirect import RTLIST...",
6700 NO_STR
6701 "Specify route target list\n"
6702 "Specify route target list\n"
6703 "Flow-spec redirect type route target\n"
6704 "Import routes to this address-family\n"
6705 "Space separated route target list (A.B.C.D:MN|EF:OPQR|GHJK:MN)\n")
6706{
6707 VTY_DECLVAR_CONTEXT(bgp, bgp);
6708 int ret;
6709 struct ecommunity *ecom = NULL;
6710 int doafi[AFI_MAX] = {0};
6711 afi_t afi;
6712 int idx = 0;
6713 int yes = 1;
6714
6715 if (argv_find(argv, argc, "no", &idx))
6716 yes = 0;
6717
6718 ret = vpn_policy_getafi(vty, doafi);
6719 if (ret != CMD_SUCCESS)
6720 return ret;
6721 if (yes) {
6722 if (!argv_find(argv, argc, "RTLIST", &idx)) {
6723 vty_out(vty, "%% Missing RTLIST\n");
6724 return CMD_WARNING_CONFIG_FAILED;
6725 }
6726 ret = set_ecom_list(vty, argc - idx, argv + idx, &ecom);
6727 if (ret != CMD_SUCCESS)
6728 return ret;
6729 }
6730 for (afi = 0; afi < AFI_MAX; ++afi) {
6731 if (!doafi[afi])
6732 continue;
6733 if (yes) {
6734 if (bgp->vpn_policy[afi].import_redirect_rtlist)
6735 ecommunity_free(
6736 &bgp->vpn_policy[afi]
6737 .import_redirect_rtlist);
6738 bgp->vpn_policy[afi].import_redirect_rtlist =
6739 ecommunity_dup(ecom);
6740 } else {
6741 if (bgp->vpn_policy[afi].import_redirect_rtlist)
6742 ecommunity_free(
6743 &bgp->vpn_policy[afi]
6744 .import_redirect_rtlist);
6745 bgp->vpn_policy[afi].import_redirect_rtlist = NULL;
6746 }
6747 }
6748 if (ecom)
6749 ecommunity_free(&ecom);
6750
6751 return CMD_SUCCESS;
6752}
6753
505e5056 6754DEFUN_NOSH (address_family_ipv4_safi,
7c40bf39 6755 address_family_ipv4_safi_cmd,
6756 "address-family ipv4 [<unicast|multicast|vpn|labeled-unicast|flowspec>]",
6757 "Enter Address Family command mode\n"
6758 "Address Family\n"
6759 BGP_SAFI_WITH_LABEL_HELP_STR)
718e3744 6760{
f51bae9c 6761
d62a17ae 6762 if (argc == 3) {
2131d5cf 6763 VTY_DECLVAR_CONTEXT(bgp, bgp);
d62a17ae 6764 safi_t safi = bgp_vty_safi_from_str(argv[2]->text);
a4d82a8a
PZ		 6765 if (bgp->inst_type != BGP_INSTANCE_TYPE_DEFAULT
6766 && safi != SAFI_UNICAST && safi != SAFI_MULTICAST
9d00a487 6767 && safi != SAFI_EVPN) {
31947174
MK		 6768 vty_out(vty,
6769 "Only Unicast/Multicast/EVPN SAFIs supported in non-core instances.\n");
2131d5cf
LB		 6770 return CMD_WARNING_CONFIG_FAILED;
6771 }
d62a17ae 6772 vty->node = bgp_node_type(AFI_IP, safi);
6773 } else
6774 vty->node = BGP_IPV4_NODE;
718e3744 6775
d62a17ae 6776 return CMD_SUCCESS;
718e3744 6777}
6778
505e5056 6779DEFUN_NOSH (address_family_ipv6_safi,
7c40bf39 6780 address_family_ipv6_safi_cmd,
6781 "address-family ipv6 [<unicast|multicast|vpn|labeled-unicast|flowspec>]",
6782 "Enter Address Family command mode\n"
6783 "Address Family\n"
6784 BGP_SAFI_WITH_LABEL_HELP_STR)
25ffbdc1 6785{
d62a17ae 6786 if (argc == 3) {
2131d5cf 6787 VTY_DECLVAR_CONTEXT(bgp, bgp);
d62a17ae 6788 safi_t safi = bgp_vty_safi_from_str(argv[2]->text);
a4d82a8a
PZ		 6789 if (bgp->inst_type != BGP_INSTANCE_TYPE_DEFAULT
6790 && safi != SAFI_UNICAST && safi != SAFI_MULTICAST
9d00a487 6791 && safi != SAFI_EVPN) {
31947174
MK		 6792 vty_out(vty,
6793 "Only Unicast/Multicast/EVPN SAFIs supported in non-core instances.\n");
2131d5cf
LB		 6794 return CMD_WARNING_CONFIG_FAILED;
6795 }
d62a17ae 6796 vty->node = bgp_node_type(AFI_IP6, safi);
6797 } else
6798 vty->node = BGP_IPV6_NODE;
25ffbdc1 6799
d62a17ae 6800 return CMD_SUCCESS;
25ffbdc1 6801}
718e3744 6802
d6902373 6803#ifdef KEEP_OLD_VPN_COMMANDS
505e5056 6804DEFUN_NOSH (address_family_vpnv4,
718e3744 6805 address_family_vpnv4_cmd,
8334fd5a 6806 "address-family vpnv4 [unicast]",
718e3744 6807 "Enter Address Family command mode\n"
8c3deaae 6808 "Address Family\n"
3a2d747c 6809 "Address Family modifier\n")
718e3744 6810{
d62a17ae 6811 vty->node = BGP_VPNV4_NODE;
6812 return CMD_SUCCESS;
718e3744 6813}
6814
505e5056 6815DEFUN_NOSH (address_family_vpnv6,
8ecd3266 6816 address_family_vpnv6_cmd,
8334fd5a 6817 "address-family vpnv6 [unicast]",
8ecd3266 6818 "Enter Address Family command mode\n"
8c3deaae 6819 "Address Family\n"
3a2d747c 6820 "Address Family modifier\n")
8ecd3266 6821{
d62a17ae 6822 vty->node = BGP_VPNV6_NODE;
6823 return CMD_SUCCESS;
8ecd3266 6824}
c016b6c7 6825#endif
d6902373 6826
505e5056 6827DEFUN_NOSH (address_family_evpn,
4e0b7b6d 6828 address_family_evpn_cmd,
7111c1a0 6829 "address-family l2vpn evpn",
4e0b7b6d 6830 "Enter Address Family command mode\n"
7111c1a0
QY		 6831 "Address Family\n"
6832 "Address Family modifier\n")
4e0b7b6d 6833{
2131d5cf 6834 VTY_DECLVAR_CONTEXT(bgp, bgp);
d62a17ae 6835 vty->node = BGP_EVPN_NODE;
6836 return CMD_SUCCESS;
4e0b7b6d
PG		 6837}
6838
505e5056 6839DEFUN_NOSH (exit_address_family,
718e3744 6840 exit_address_family_cmd,
6841 "exit-address-family",
6842 "Exit from Address Family configuration mode\n")
6843{
d62a17ae 6844 if (vty->node == BGP_IPV4_NODE || vty->node == BGP_IPV4M_NODE
6845 || vty->node == BGP_IPV4L_NODE || vty->node == BGP_VPNV4_NODE
6846 || vty->node == BGP_IPV6_NODE || vty->node == BGP_IPV6M_NODE
6847 || vty->node == BGP_IPV6L_NODE || vty->node == BGP_VPNV6_NODE
925bf671
PG		 6848 || vty->node == BGP_EVPN_NODE
6849 || vty->node == BGP_FLOWSPECV4_NODE
6850 || vty->node == BGP_FLOWSPECV6_NODE)
d62a17ae 6851 vty->node = BGP_NODE;
6852 return CMD_SUCCESS;
718e3744 6853}
6b0655a2 6854
8ad7271d 6855/* Recalculate bestpath and re-advertise a prefix */
d62a17ae 6856static int bgp_clear_prefix(struct vty *vty, const char *view_name,
6857 const char *ip_str, afi_t afi, safi_t safi,
6858 struct prefix_rd *prd)
6859{
6860 int ret;
6861 struct prefix match;
6862 struct bgp_node *rn;
6863 struct bgp_node *rm;
6864 struct bgp *bgp;
6865 struct bgp_table *table;
6866 struct bgp_table *rib;
6867
6868 /* BGP structure lookup. */
6869 if (view_name) {
6870 bgp = bgp_lookup_by_name(view_name);
6871 if (bgp == NULL) {
6872 vty_out(vty, "%% Can't find BGP instance %s\n",
6873 view_name);
6874 return CMD_WARNING;
6875 }
6876 } else {
6877 bgp = bgp_get_default();
6878 if (bgp == NULL) {
6879 vty_out(vty, "%% No BGP process is configured\n");
6880 return CMD_WARNING;
6881 }
6882 }
6883
6884 /* Check IP address argument. */
6885 ret = str2prefix(ip_str, &match);
6886 if (!ret) {
6887 vty_out(vty, "%% address is malformed\n");
6888 return CMD_WARNING;
6889 }
6890
6891 match.family = afi2family(afi);
6892 rib = bgp->rib[afi][safi];
6893
6894 if (safi == SAFI_MPLS_VPN) {
6895 for (rn = bgp_table_top(rib); rn; rn = bgp_route_next(rn)) {
6896 if (prd && memcmp(rn->p.u.val, prd->val, 8) != 0)
6897 continue;
6898
6899 if ((table = rn->info) != NULL) {
6900 if ((rm = bgp_node_match(table, &match))
6901 != NULL) {
6902 if (rm->p.prefixlen
6903 == match.prefixlen) {
6904 SET_FLAG(rn->flags,
6905 BGP_NODE_USER_CLEAR);
6906 bgp_process(bgp, rm, afi, safi);
6907 }
6908 bgp_unlock_node(rm);
6909 }
6910 }
6911 }
6912 } else {
6913 if ((rn = bgp_node_match(rib, &match)) != NULL) {
6914 if (rn->p.prefixlen == match.prefixlen) {
6915 SET_FLAG(rn->flags, BGP_NODE_USER_CLEAR);
6916 bgp_process(bgp, rn, afi, safi);
6917 }
6918 bgp_unlock_node(rn);
6919 }
6920 }
6921
6922 return CMD_SUCCESS;
8ad7271d
DS		 6923}
6924
b09b5ae0 6925/* one clear bgp command to rule them all */
718e3744 6926DEFUN (clear_ip_bgp_all,
6927 clear_ip_bgp_all_cmd,
c1a44e43 6928 "clear [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] <*|A.B.C.D|X:X::X:X|WORD|(1-4294967295)|external|peer-group WORD> [<soft [<in|out>]|in [prefix-filter]|out>]",
718e3744 6929 CLEAR_STR
6930 IP_STR
6931 BGP_STR
838758ac 6932 BGP_INSTANCE_HELP_STR
510afcd6
DS		 6933 BGP_AFI_HELP_STR
6934 BGP_SAFI_WITH_LABEL_HELP_STR
b09b5ae0
DW		 6935 "Clear all peers\n"
6936 "BGP neighbor address to clear\n"
a80beece 6937 "BGP IPv6 neighbor to clear\n"
838758ac 6938 "BGP neighbor on interface to clear\n"
b09b5ae0
DW		 6939 "Clear peers with the AS number\n"
6940 "Clear all external peers\n"
718e3744 6941 "Clear all members of peer-group\n"
b09b5ae0 6942 "BGP peer-group name\n"
b09b5ae0
DW		 6943 BGP_SOFT_STR
6944 BGP_SOFT_IN_STR
b09b5ae0
DW		 6945 BGP_SOFT_OUT_STR
6946 BGP_SOFT_IN_STR
6947 "Push out prefix-list ORF and do inbound soft reconfig\n"
b09b5ae0 6948 BGP_SOFT_OUT_STR)
718e3744 6949{
d62a17ae 6950 char *vrf = NULL;
6951
6952 afi_t afi = AFI_IP6;
6953 safi_t safi = SAFI_UNICAST;
6954 enum clear_sort clr_sort = clear_peer;
6955 enum bgp_clear_type clr_type;
6956 char *clr_arg = NULL;
6957
6958 int idx = 0;
6959
6960 /* clear [ip] bgp */
6961 if (argv_find(argv, argc, "ip", &idx))
6962 afi = AFI_IP;
6963
6964 /* [<view|vrf> VIEWVRFNAME] */
6965 if (argv_find(argv, argc, "view", &idx)
6966 || argv_find(argv, argc, "vrf", &idx)) {
6967 vrf = argv[idx + 1]->arg;
6968 idx += 2;
6969 }
6970
6971 /* ["BGP_AFI_CMD_STR" ["BGP_SAFI_CMD_STR"]] */
6972 if (argv_find_and_parse_afi(argv, argc, &idx, &afi))
6973 argv_find_and_parse_safi(argv, argc, &idx, &safi);
6974
6975 /* <*|A.B.C.D|X:X::X:X|WORD|(1-4294967295)|external|peer-group WORD> */
6976 if (argv_find(argv, argc, "*", &idx)) {
6977 clr_sort = clear_all;
6978 } else if (argv_find(argv, argc, "A.B.C.D", &idx)) {
6979 clr_sort = clear_peer;
6980 clr_arg = argv[idx]->arg;
6981 } else if (argv_find(argv, argc, "X:X::X:X", &idx)) {
6982 clr_sort = clear_peer;
6983 clr_arg = argv[idx]->arg;
6984 } else if (argv_find(argv, argc, "peer-group", &idx)) {
6985 clr_sort = clear_group;
6986 idx++;
6987 clr_arg = argv[idx]->arg;
6988 } else if (argv_find(argv, argc, "WORD", &idx)) {
6989 clr_sort = clear_peer;
6990 clr_arg = argv[idx]->arg;
6991 } else if (argv_find(argv, argc, "(1-4294967295)", &idx)) {
6992 clr_sort = clear_as;
6993 clr_arg = argv[idx]->arg;
6994 } else if (argv_find(argv, argc, "external", &idx)) {
6995 clr_sort = clear_external;
6996 }
6997
6998 /* [<soft [<in|out>]|in [prefix-filter]|out>] */
6999 if (argv_find(argv, argc, "soft", &idx)) {
7000 if (argv_find(argv, argc, "in", &idx)
7001 || argv_find(argv, argc, "out", &idx))
7002 clr_type = strmatch(argv[idx]->text, "in")
7003 ? BGP_CLEAR_SOFT_IN
7004 : BGP_CLEAR_SOFT_OUT;
7005 else
7006 clr_type = BGP_CLEAR_SOFT_BOTH;
7007 } else if (argv_find(argv, argc, "in", &idx)) {
7008 clr_type = argv_find(argv, argc, "prefix-filter", &idx)
7009 ? BGP_CLEAR_SOFT_IN_ORF_PREFIX
7010 : BGP_CLEAR_SOFT_IN;
7011 } else if (argv_find(argv, argc, "out", &idx)) {
7012 clr_type = BGP_CLEAR_SOFT_OUT;
7013 } else
7014 clr_type = BGP_CLEAR_SOFT_NONE;
7015
7016 return bgp_clear_vty(vty, vrf, afi, safi, clr_sort, clr_type, clr_arg);
838758ac 7017}
01080f7c 7018
8ad7271d
DS		 7019DEFUN (clear_ip_bgp_prefix,
7020 clear_ip_bgp_prefix_cmd,
18c57037 7021 "clear [ip] bgp [<view|vrf> VIEWVRFNAME] prefix A.B.C.D/M",
8ad7271d
DS		 7022 CLEAR_STR
7023 IP_STR
7024 BGP_STR
838758ac 7025 BGP_INSTANCE_HELP_STR
8ad7271d 7026 "Clear bestpath and re-advertise\n"
0c7b1b01 7027 "IPv4 prefix\n")
8ad7271d 7028{
d62a17ae 7029 char *vrf = NULL;
7030 char *prefix = NULL;
8ad7271d 7031
d62a17ae 7032 int idx = 0;
01080f7c 7033
d62a17ae 7034 /* [<view|vrf> VIEWVRFNAME] */
1d35f218 7035 if (argv_find(argv, argc, "VIEWVRFNAME", &idx))
d62a17ae 7036 vrf = argv[idx]->arg;
0c7b1b01 7037
d62a17ae 7038 prefix = argv[argc - 1]->arg;
8ad7271d 7039
d62a17ae 7040 return bgp_clear_prefix(vty, vrf, prefix, AFI_IP, SAFI_UNICAST, NULL);
838758ac 7041}
8ad7271d 7042
b09b5ae0
DW		 7043DEFUN (clear_bgp_ipv6_safi_prefix,
7044 clear_bgp_ipv6_safi_prefix_cmd,
46f296b4 7045 "clear [ip] bgp ipv6 "BGP_SAFI_CMD_STR" prefix X:X::X:X/M",
718e3744 7046 CLEAR_STR
3a2d747c 7047 IP_STR
718e3744 7048 BGP_STR
8c3deaae 7049 "Address Family\n"
46f296b4 7050 BGP_SAFI_HELP_STR
b09b5ae0 7051 "Clear bestpath and re-advertise\n"
0c7b1b01 7052 "IPv6 prefix\n")
718e3744 7053{
9b475e76
PG		 7054 int idx_safi = 0;
7055 int idx_ipv6_prefix = 0;
7056 safi_t safi = SAFI_UNICAST;
7057 char *prefix = argv_find(argv, argc, "X:X::X:X/M", &idx_ipv6_prefix) ?
7058 argv[idx_ipv6_prefix]->arg : NULL;
7059
7060 argv_find_and_parse_safi(argv, argc, &idx_safi, &safi);
d62a17ae 7061 return bgp_clear_prefix(
9b475e76
PG		 7062 vty, NULL, prefix, AFI_IP6,
7063 safi, NULL);
838758ac 7064}
01080f7c 7065
b09b5ae0
DW		 7066DEFUN (clear_bgp_instance_ipv6_safi_prefix,
7067 clear_bgp_instance_ipv6_safi_prefix_cmd,
18c57037 7068 "clear [ip] bgp <view|vrf> VIEWVRFNAME ipv6 "BGP_SAFI_CMD_STR" prefix X:X::X:X/M",
718e3744 7069 CLEAR_STR
3a2d747c 7070 IP_STR
718e3744 7071 BGP_STR
838758ac 7072 BGP_INSTANCE_HELP_STR
8c3deaae 7073 "Address Family\n"
46f296b4 7074 BGP_SAFI_HELP_STR
b09b5ae0 7075 "Clear bestpath and re-advertise\n"
0c7b1b01 7076 "IPv6 prefix\n")
718e3744 7077{
d62a17ae 7078 int idx_word = 3;
9b475e76
PG		 7079 int idx_safi = 0;
7080 int idx_ipv6_prefix = 0;
7081 safi_t safi = SAFI_UNICAST;
7082 char *prefix = argv_find(argv, argc, "X:X::X:X/M", &idx_ipv6_prefix) ?
7083 argv[idx_ipv6_prefix]->arg : NULL;
7084 /* [<view|vrf> VIEWVRFNAME] */
7085 char *vrfview = argv_find(argv, argc, "VIEWVRFNAME", &idx_word) ?
7086 argv[idx_word]->arg : NULL;
7087
7088 argv_find_and_parse_safi(argv, argc, &idx_safi, &safi);
7089
d62a17ae 7090 return bgp_clear_prefix(
9b475e76
PG		 7091 vty, vrfview, prefix,
7092 AFI_IP6, safi, NULL);
718e3744 7093}
7094
b09b5ae0
DW		 7095DEFUN (show_bgp_views,
7096 show_bgp_views_cmd,
d6e3c605 7097 "show [ip] bgp views",
b09b5ae0 7098 SHOW_STR
d6e3c605 7099 IP_STR
01080f7c 7100 BGP_STR
b09b5ae0 7101 "Show the defined BGP views\n")
01080f7c 7102{
d62a17ae 7103 struct list *inst = bm->bgp;
7104 struct listnode *node;
7105 struct bgp *bgp;
01080f7c 7106
d62a17ae 7107 if (!bgp_option_check(BGP_OPT_MULTIPLE_INSTANCE)) {
7108 vty_out(vty, "BGP Multiple Instance is not enabled\n");
7109 return CMD_WARNING;
7110 }
e52702f2 7111
d62a17ae 7112 vty_out(vty, "Defined BGP views:\n");
7113 for (ALL_LIST_ELEMENTS_RO(inst, node, bgp)) {
7114 /* Skip VRFs. */
7115 if (bgp->inst_type == BGP_INSTANCE_TYPE_VRF)
7116 continue;
7117 vty_out(vty, "\t%s (AS%u)\n", bgp->name ? bgp->name : "(null)",
7118 bgp->as);
7119 }
e52702f2 7120
d62a17ae 7121 return CMD_SUCCESS;
e0081f70
ML		 7122}
7123
8386ac43 7124DEFUN (show_bgp_vrfs,
7125 show_bgp_vrfs_cmd,
d6e3c605 7126 "show [ip] bgp vrfs [json]",
8386ac43 7127 SHOW_STR
d6e3c605 7128 IP_STR
8386ac43 7129 BGP_STR
7130 "Show BGP VRFs\n"
9973d184 7131 JSON_STR)
8386ac43 7132{
fe1dc5a3 7133 char buf[ETHER_ADDR_STRLEN];
d62a17ae 7134 struct list *inst = bm->bgp;
7135 struct listnode *node;
7136 struct bgp *bgp;
d7c0a89a 7137 uint8_t uj = use_json(argc, argv);
d62a17ae 7138 json_object *json = NULL;
7139 json_object *json_vrfs = NULL;
7140 int count = 0;
d62a17ae 7141
7142 if (!bgp_option_check(BGP_OPT_MULTIPLE_INSTANCE)) {
7143 vty_out(vty, "BGP Multiple Instance is not enabled\n");
7144 return CMD_WARNING;
7145 }
7146
7147 if (uj) {
7148 json = json_object_new_object();
7149 json_vrfs = json_object_new_object();
7150 }
7151
7152 for (ALL_LIST_ELEMENTS_RO(inst, node, bgp)) {
7153 const char *name, *type;
7154 struct peer *peer;
7155 struct listnode *node, *nnode;
7156 int peers_cfg, peers_estb;
7157 json_object *json_vrf = NULL;
d62a17ae 7158
7159 /* Skip Views. */
7160 if (bgp->inst_type == BGP_INSTANCE_TYPE_VIEW)
7161 continue;
7162
7163 count++;
7164 if (!uj && count == 1)
fe1dc5a3
MK		 7165 vty_out(vty,
7166 "%4s %-5s %-16s %9s %10s %-37s %-10s %-15s\n",
a4d82a8a
PZ		 7167 "Type", "Id", "routerId", "#PeersVfg",
7168 "#PeersEstb", "Name", "L3-VNI", "Rmac");
d62a17ae 7169
7170 peers_cfg = peers_estb = 0;
7171 if (uj)
7172 json_vrf = json_object_new_object();
7173
7174
7175 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
7176 if (!CHECK_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE))
7177 continue;
7178 peers_cfg++;
7179 if (peer->status == Established)
7180 peers_estb++;
7181 }
7182
7183 if (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT) {
7184 name = "Default";
7185 type = "DFLT";
7186 } else {
7187 name = bgp->name;
7188 type = "VRF";
7189 }
7190
a8bf7d9c 7191
d62a17ae 7192 if (uj) {
a4d82a8a
PZ		 7193 int64_t vrf_id_ui = (bgp->vrf_id == VRF_UNKNOWN)
7194 ? -1
7195 : (int64_t)bgp->vrf_id;
d62a17ae 7196 json_object_string_add(json_vrf, "type", type);
7197 json_object_int_add(json_vrf, "vrfId", vrf_id_ui);
7198 json_object_string_add(json_vrf, "routerId",
7199 inet_ntoa(bgp->router_id));
7200 json_object_int_add(json_vrf, "numConfiguredPeers",
7201 peers_cfg);
7202 json_object_int_add(json_vrf, "numEstablishedPeers",
7203 peers_estb);
7204
fe1dc5a3 7205 json_object_int_add(json_vrf, "l3vni", bgp->l3vni);
a4d82a8a
PZ		 7206 json_object_string_add(
7207 json_vrf, "rmac",
7208 prefix_mac2str(&bgp->rmac, buf, sizeof(buf)));
d62a17ae 7209 json_object_object_add(json_vrfs, name, json_vrf);
7210 } else
fe1dc5a3
MK		 7211 vty_out(vty,
7212 "%4s %-5d %-16s %9u %10u %-37s %-10u %-15s\n",
a4d82a8a
PZ		 7213 type,
7214 bgp->vrf_id == VRF_UNKNOWN ? -1
7215 : (int)bgp->vrf_id,
7216 inet_ntoa(bgp->router_id), peers_cfg,
7217 peers_estb, name, bgp->l3vni,
fe1dc5a3 7218 prefix_mac2str(&bgp->rmac, buf, sizeof(buf)));
d62a17ae 7219 }
7220
7221 if (uj) {
7222 json_object_object_add(json, "vrfs", json_vrfs);
7223
7224 json_object_int_add(json, "totalVrfs", count);
7225
996c9314
LB		 7226 vty_out(vty, "%s\n", json_object_to_json_string_ext(
7227 json, JSON_C_TO_STRING_PRETTY));
d62a17ae 7228 json_object_free(json);
7229 } else {
7230 if (count)
7231 vty_out(vty,
7232 "\nTotal number of VRFs (including default): %d\n",
7233 count);
7234 }
7235
7236 return CMD_SUCCESS;
8386ac43 7237}
7238
acf71666
MK		 7239static void show_address_entry(struct hash_backet *backet, void *args)
7240{
60466a63
QY		 7241 struct vty *vty = (struct vty *)args;
7242 struct bgp_addr *addr = (struct bgp_addr *)backet->data;
acf71666 7243
60466a63 7244 vty_out(vty, "addr: %s, count: %d\n", inet_ntoa(addr->addr),
acf71666
MK		 7245 addr->refcnt);
7246}
7247
7248static void show_tip_entry(struct hash_backet *backet, void *args)
7249{
0291c246 7250 struct vty *vty = (struct vty *)args;
60466a63 7251 struct tip_addr *tip = (struct tip_addr *)backet->data;
acf71666 7252
60466a63 7253 vty_out(vty, "addr: %s, count: %d\n", inet_ntoa(tip->addr),
acf71666
MK		 7254 tip->refcnt);
7255}
7256
7257static void bgp_show_martian_nexthops(struct vty *vty, struct bgp *bgp)
7258{
7259 vty_out(vty, "self nexthop database:\n");
7260 hash_iterate(bgp->address_hash,
7261 (void (*)(struct hash_backet *, void *))show_address_entry,
7262 vty);
7263
7264 vty_out(vty, "Tunnel-ip database:\n");
7265 hash_iterate(bgp->tip_hash,
7266 (void (*)(struct hash_backet *, void *))show_tip_entry,
7267 vty);
7268}
7269
15c81ca4
DS		 7270DEFUN(show_bgp_martian_nexthop_db, show_bgp_martian_nexthop_db_cmd,
7271 "show bgp [<view|vrf> VIEWVRFNAME] martian next-hop",
7272 SHOW_STR BGP_STR BGP_INSTANCE_HELP_STR
60466a63
QY		 7273 "martian next-hops\n"
7274 "martian next-hop database\n")
acf71666 7275{
0291c246 7276 struct bgp *bgp = NULL;
15c81ca4
DS		 7277 int idx = 0;
7278
7279 if (argv_find(argv, argc, "view", &idx)
7280 || argv_find(argv, argc, "vrf", &idx))
7281 bgp = bgp_lookup_by_name(argv[idx + 1]->arg);
7282 else
7283 bgp = bgp_get_default();
acf71666 7284
acf71666
MK		 7285 if (!bgp) {
7286 vty_out(vty, "%% No BGP process is configured\n");
7287 return CMD_WARNING;
7288 }
7289 bgp_show_martian_nexthops(vty, bgp);
7290
7291 return CMD_SUCCESS;
7292}
7293
f412b39a 7294DEFUN (show_bgp_memory,
4bf6a362 7295 show_bgp_memory_cmd,
7fa12b13 7296 "show [ip] bgp memory",
4bf6a362 7297 SHOW_STR
3a2d747c 7298 IP_STR
4bf6a362
PJ		 7299 BGP_STR
7300 "Global BGP memory statistics\n")
7301{
d62a17ae 7302 char memstrbuf[MTYPE_MEMSTR_LEN];
7303 unsigned long count;
7304
7305 /* RIB related usage stats */
7306 count = mtype_stats_alloc(MTYPE_BGP_NODE);
7307 vty_out(vty, "%ld RIB nodes, using %s of memory\n", count,
7308 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7309 count * sizeof(struct bgp_node)));
7310
7311 count = mtype_stats_alloc(MTYPE_BGP_ROUTE);
7312 vty_out(vty, "%ld BGP routes, using %s of memory\n", count,
7313 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7314 count * sizeof(struct bgp_info)));
7315 if ((count = mtype_stats_alloc(MTYPE_BGP_ROUTE_EXTRA)))
7316 vty_out(vty, "%ld BGP route ancillaries, using %s of memory\n",
7317 count,
7318 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7319 count * sizeof(struct bgp_info_extra)));
7320
7321 if ((count = mtype_stats_alloc(MTYPE_BGP_STATIC)))
7322 vty_out(vty, "%ld Static routes, using %s of memory\n", count,
7323 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7324 count * sizeof(struct bgp_static)));
7325
7326 if ((count = mtype_stats_alloc(MTYPE_BGP_PACKET)))
7327 vty_out(vty, "%ld Packets, using %s of memory\n", count,
7328 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7329 count * sizeof(struct bpacket)));
7330
7331 /* Adj-In/Out */
7332 if ((count = mtype_stats_alloc(MTYPE_BGP_ADJ_IN)))
7333 vty_out(vty, "%ld Adj-In entries, using %s of memory\n", count,
7334 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7335 count * sizeof(struct bgp_adj_in)));
7336 if ((count = mtype_stats_alloc(MTYPE_BGP_ADJ_OUT)))
7337 vty_out(vty, "%ld Adj-Out entries, using %s of memory\n", count,
7338 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7339 count * sizeof(struct bgp_adj_out)));
7340
7341 if ((count = mtype_stats_alloc(MTYPE_BGP_NEXTHOP_CACHE)))
7342 vty_out(vty, "%ld Nexthop cache entries, using %s of memory\n",
7343 count,
7344 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7345 count * sizeof(struct bgp_nexthop_cache)));
7346
7347 if ((count = mtype_stats_alloc(MTYPE_BGP_DAMP_INFO)))
7348 vty_out(vty, "%ld Dampening entries, using %s of memory\n",
7349 count,
7350 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7351 count * sizeof(struct bgp_damp_info)));
7352
7353 /* Attributes */
7354 count = attr_count();
7355 vty_out(vty, "%ld BGP attributes, using %s of memory\n", count,
7356 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7357 count * sizeof(struct attr)));
7358
7359 if ((count = attr_unknown_count()))
7360 vty_out(vty, "%ld unknown attributes\n", count);
7361
7362 /* AS_PATH attributes */
7363 count = aspath_count();
7364 vty_out(vty, "%ld BGP AS-PATH entries, using %s of memory\n", count,
7365 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7366 count * sizeof(struct aspath)));
7367
7368 count = mtype_stats_alloc(MTYPE_AS_SEG);
7369 vty_out(vty, "%ld BGP AS-PATH segments, using %s of memory\n", count,
7370 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7371 count * sizeof(struct assegment)));
7372
7373 /* Other attributes */
7374 if ((count = community_count()))
7375 vty_out(vty, "%ld BGP community entries, using %s of memory\n",
996c9314
LB		 7376 count, mtype_memstr(memstrbuf, sizeof(memstrbuf),
7377 count * sizeof(struct community)));
d62a17ae 7378 if ((count = mtype_stats_alloc(MTYPE_ECOMMUNITY)))
7379 vty_out(vty, "%ld BGP community entries, using %s of memory\n",
996c9314
LB		 7380 count, mtype_memstr(memstrbuf, sizeof(memstrbuf),
7381 count * sizeof(struct ecommunity)));
d62a17ae 7382 if ((count = mtype_stats_alloc(MTYPE_LCOMMUNITY)))
7383 vty_out(vty,
7384 "%ld BGP large-community entries, using %s of memory\n",
996c9314
LB		 7385 count, mtype_memstr(memstrbuf, sizeof(memstrbuf),
7386 count * sizeof(struct lcommunity)));
d62a17ae 7387
7388 if ((count = mtype_stats_alloc(MTYPE_CLUSTER)))
7389 vty_out(vty, "%ld Cluster lists, using %s of memory\n", count,
7390 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7391 count * sizeof(struct cluster_list)));
7392
7393 /* Peer related usage */
7394 count = mtype_stats_alloc(MTYPE_BGP_PEER);
7395 vty_out(vty, "%ld peers, using %s of memory\n", count,
7396 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7397 count * sizeof(struct peer)));
7398
7399 if ((count = mtype_stats_alloc(MTYPE_PEER_GROUP)))
7400 vty_out(vty, "%ld peer groups, using %s of memory\n", count,
7401 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7402 count * sizeof(struct peer_group)));
7403
7404 /* Other */
7405 if ((count = mtype_stats_alloc(MTYPE_HASH)))
7406 vty_out(vty, "%ld hash tables, using %s of memory\n", count,
7407 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7408 count * sizeof(struct hash)));
7409 if ((count = mtype_stats_alloc(MTYPE_HASH_BACKET)))
7410 vty_out(vty, "%ld hash buckets, using %s of memory\n", count,
7411 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7412 count * sizeof(struct hash_backet)));
7413 if ((count = mtype_stats_alloc(MTYPE_BGP_REGEXP)))
7414 vty_out(vty, "%ld compiled regexes, using %s of memory\n",
996c9314
LB		 7415 count, mtype_memstr(memstrbuf, sizeof(memstrbuf),
7416 count * sizeof(regex_t)));
d62a17ae 7417 return CMD_SUCCESS;
4bf6a362 7418}
fee0f4c6 7419
57a9c8a8
DS		 7420static void bgp_show_bestpath_json(struct bgp *bgp, json_object *json)
7421{
7422 json_object *bestpath = json_object_new_object();
7423
7424 if (bgp_flag_check(bgp, BGP_FLAG_ASPATH_IGNORE))
7425 json_object_string_add(bestpath, "asPath", "ignore");
7426
7427 if (bgp_flag_check(bgp, BGP_FLAG_ASPATH_CONFED))
7428 json_object_string_add(bestpath, "asPath", "confed");
7429
7430 if (bgp_flag_check(bgp, BGP_FLAG_ASPATH_MULTIPATH_RELAX)) {
a4d82a8a
PZ		 7431 if (bgp_flag_check(bgp, BGP_FLAG_MULTIPATH_RELAX_AS_SET))
7432 json_object_string_add(bestpath, "multiPathRelax",
57a9c8a8
DS		 7433 "as-set");
7434 else
a4d82a8a 7435 json_object_string_add(bestpath, "multiPathRelax",
57a9c8a8
DS		 7436 "true");
7437 } else
a4d82a8a 7438 json_object_string_add(bestpath, "multiPathRelax", "false");
57a9c8a8
DS		 7439
7440 if (bgp_flag_check(bgp, BGP_FLAG_COMPARE_ROUTER_ID))
7441 json_object_string_add(bestpath, "compareRouterId", "true");
7442 if (bgp_flag_check(bgp, BGP_FLAG_MED_CONFED)
7443 || bgp_flag_check(bgp, BGP_FLAG_MED_MISSING_AS_WORST)) {
7444 if (bgp_flag_check(bgp, BGP_FLAG_MED_CONFED))
a4d82a8a 7445 json_object_string_add(bestpath, "med", "confed");
57a9c8a8
DS		 7446 if (bgp_flag_check(bgp, BGP_FLAG_MED_MISSING_AS_WORST))
7447 json_object_string_add(bestpath, "med",
7448 "missing-as-worst");
7449 else
7450 json_object_string_add(bestpath, "med", "true");
7451 }
7452
7453 json_object_object_add(json, "bestPath", bestpath);
7454}
7455
718e3744 7456/* Show BGP peer's summary information. */
d62a17ae 7457static int bgp_show_summary(struct vty *vty, struct bgp *bgp, int afi, int safi,
d7c0a89a 7458 uint8_t use_json, json_object *json)
d62a17ae 7459{
7460 struct peer *peer;
7461 struct listnode *node, *nnode;
7462 unsigned int count = 0, dn_count = 0;
7463 char timebuf[BGP_UPTIME_LEN], dn_flag[2];
7464 char neighbor_buf[VTY_BUFSIZ];
7465 int neighbor_col_default_width = 16;
7466 int len;
7467 int max_neighbor_width = 0;
7468 int pfx_rcd_safi;
7469 json_object *json_peer = NULL;
7470 json_object *json_peers = NULL;
7471
7472 /* labeled-unicast routes are installed in the unicast table so in order
7473 * to
7474 * display the correct PfxRcd value we must look at SAFI_UNICAST
7475 */
7476 if (safi == SAFI_LABELED_UNICAST)
7477 pfx_rcd_safi = SAFI_UNICAST;
7478 else
7479 pfx_rcd_safi = safi;
7480
7481 if (use_json) {
7482 if (json == NULL)
7483 json = json_object_new_object();
7484
7485 json_peers = json_object_new_object();
7486 } else {
7487 /* Loop over all neighbors that will be displayed to determine
7488 * how many
7489 * characters are needed for the Neighbor column
7490 */
7491 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
7492 if (!CHECK_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE))
7493 continue;
7494
7495 if (peer->afc[afi][safi]) {
7496 memset(dn_flag, '\0', sizeof(dn_flag));
7497 if (peer_dynamic_neighbor(peer))
7498 dn_flag[0] = '*';
7499
7500 if (peer->hostname
7501 && bgp_flag_check(bgp,
7502 BGP_FLAG_SHOW_HOSTNAME))
7503 sprintf(neighbor_buf, "%s%s(%s) ",
7504 dn_flag, peer->hostname,
7505 peer->host);
7506 else
7507 sprintf(neighbor_buf, "%s%s ", dn_flag,
7508 peer->host);
7509
7510 len = strlen(neighbor_buf);
7511
7512 if (len > max_neighbor_width)
7513 max_neighbor_width = len;
7514 }
7515 }
f933309e 7516
d62a17ae 7517 /* Originally we displayed the Neighbor column as 16
7518 * characters wide so make that the default
7519 */
7520 if (max_neighbor_width < neighbor_col_default_width)
7521 max_neighbor_width = neighbor_col_default_width;
7522 }
f933309e 7523
d62a17ae 7524 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
7525 if (!CHECK_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE))
7526 continue;
7527
ea47320b
DL		 7528 if (!peer->afc[afi][safi])
7529 continue;
d62a17ae 7530
ea47320b
DL		 7531 if (!count) {
7532 unsigned long ents;
7533 char memstrbuf[MTYPE_MEMSTR_LEN];
a8bf7d9c 7534 int64_t vrf_id_ui;
d62a17ae 7535
a4d82a8a
PZ		 7536 vrf_id_ui = (bgp->vrf_id == VRF_UNKNOWN)
7537 ? -1
7538 : (int64_t)bgp->vrf_id;
ea47320b
DL		 7539
7540 /* Usage summary and header */
7541 if (use_json) {
7542 json_object_string_add(
7543 json, "routerId",
7544 inet_ntoa(bgp->router_id));
60466a63
QY		 7545 json_object_int_add(json, "as", bgp->as);
7546 json_object_int_add(json, "vrfId", vrf_id_ui);
ea47320b
DL		 7547 json_object_string_add(
7548 json, "vrfName",
7549 (bgp->inst_type
7550 == BGP_INSTANCE_TYPE_DEFAULT)
7551 ? "Default"
7552 : bgp->name);
7553 } else {
7554 vty_out(vty,
7555 "BGP router identifier %s, local AS number %u vrf-id %d",
60466a63 7556 inet_ntoa(bgp->router_id), bgp->as,
a4d82a8a
PZ		 7557 bgp->vrf_id == VRF_UNKNOWN
7558 ? -1
7559 : (int)bgp->vrf_id);
ea47320b
DL		 7560 vty_out(vty, "\n");
7561 }
d62a17ae 7562
ea47320b 7563 if (bgp_update_delay_configured(bgp)) {
d62a17ae 7564 if (use_json) {
ea47320b 7565 json_object_int_add(
60466a63 7566 json, "updateDelayLimit",
ea47320b 7567 bgp->v_update_delay);
d62a17ae 7568
ea47320b
DL		 7569 if (bgp->v_update_delay
7570 != bgp->v_establish_wait)
d62a17ae 7571 json_object_int_add(
7572 json,
ea47320b
DL		 7573 "updateDelayEstablishWait",
7574 bgp->v_establish_wait);
d62a17ae 7575
60466a63 7576 if (bgp_update_delay_active(bgp)) {
ea47320b
DL		 7577 json_object_string_add(
7578 json,
7579 "updateDelayFirstNeighbor",
7580 bgp->update_delay_begin_time);
7581 json_object_boolean_true_add(
7582 json,
7583 "updateDelayInProgress");
7584 } else {
7585 if (bgp->update_delay_over) {
d62a17ae 7586 json_object_string_add(
7587 json,
7588 "updateDelayFirstNeighbor",
7589 bgp->update_delay_begin_time);
ea47320b 7590 json_object_string_add(
d62a17ae 7591 json,
ea47320b
DL		 7592 "updateDelayBestpathResumed",
7593 bgp->update_delay_end_time);
7594 json_object_string_add(
d62a17ae 7595 json,
ea47320b
DL		 7596 "updateDelayZebraUpdateResume",
7597 bgp->update_delay_zebra_resume_time);
7598 json_object_string_add(
7599 json,
7600 "updateDelayPeerUpdateResume",
7601 bgp->update_delay_peers_resume_time);
d62a17ae 7602 }
ea47320b
DL		 7603 }
7604 } else {
7605 vty_out(vty,
7606 "Read-only mode update-delay limit: %d seconds\n",
7607 bgp->v_update_delay);
7608 if (bgp->v_update_delay
7609 != bgp->v_establish_wait)
d62a17ae 7610 vty_out(vty,
ea47320b
DL		 7611 " Establish wait: %d seconds\n",
7612 bgp->v_establish_wait);
d62a17ae 7613
60466a63 7614 if (bgp_update_delay_active(bgp)) {
ea47320b
DL		 7615 vty_out(vty,
7616 " First neighbor established: %s\n",
7617 bgp->update_delay_begin_time);
7618 vty_out(vty,
7619 " Delay in progress\n");
7620 } else {
7621 if (bgp->update_delay_over) {
d62a17ae 7622 vty_out(vty,
7623 " First neighbor established: %s\n",
7624 bgp->update_delay_begin_time);
7625 vty_out(vty,
ea47320b
DL		 7626 " Best-paths resumed: %s\n",
7627 bgp->update_delay_end_time);
7628 vty_out(vty,
7629 " zebra update resumed: %s\n",
7630 bgp->update_delay_zebra_resume_time);
7631 vty_out(vty,
7632 " peers update resumed: %s\n",
7633 bgp->update_delay_peers_resume_time);
d62a17ae 7634 }
7635 }
7636 }
ea47320b 7637 }
d62a17ae 7638
ea47320b
DL		 7639 if (use_json) {
7640 if (bgp_maxmed_onstartup_configured(bgp)
7641 && bgp->maxmed_active)
7642 json_object_boolean_true_add(
60466a63 7643 json, "maxMedOnStartup");
ea47320b
DL		 7644 if (bgp->v_maxmed_admin)
7645 json_object_boolean_true_add(
60466a63 7646 json, "maxMedAdministrative");
d62a17ae 7647
ea47320b
DL		 7648 json_object_int_add(
7649 json, "tableVersion",
60466a63 7650 bgp_table_version(bgp->rib[afi][safi]));
ea47320b 7651
60466a63
QY		 7652 ents = bgp_table_count(bgp->rib[afi][safi]);
7653 json_object_int_add(json, "ribCount", ents);
ea47320b
DL		 7654 json_object_int_add(
7655 json, "ribMemory",
7656 ents * sizeof(struct bgp_node));
d62a17ae 7657
ea47320b 7658 ents = listcount(bgp->peer);
60466a63
QY		 7659 json_object_int_add(json, "peerCount", ents);
7660 json_object_int_add(json, "peerMemory",
7661 ents * sizeof(struct peer));
d62a17ae 7662
ea47320b
DL		 7663 if ((ents = listcount(bgp->group))) {
7664 json_object_int_add(
60466a63 7665 json, "peerGroupCount", ents);
ea47320b
DL		 7666 json_object_int_add(
7667 json, "peerGroupMemory",
996c9314
LB		 7668 ents * sizeof(struct
7669 peer_group));
ea47320b 7670 }
d62a17ae 7671
ea47320b
DL		 7672 if (CHECK_FLAG(bgp->af_flags[afi][safi],
7673 BGP_CONFIG_DAMPENING))
7674 json_object_boolean_true_add(
60466a63 7675 json, "dampeningEnabled");
ea47320b
DL		 7676 } else {
7677 if (bgp_maxmed_onstartup_configured(bgp)
7678 && bgp->maxmed_active)
d62a17ae 7679 vty_out(vty,
ea47320b
DL		 7680 "Max-med on-startup active\n");
7681 if (bgp->v_maxmed_admin)
d62a17ae 7682 vty_out(vty,
ea47320b 7683 "Max-med administrative active\n");
d62a17ae 7684
60466a63
QY		 7685 vty_out(vty, "BGP table version %" PRIu64 "\n",
7686 bgp_table_version(bgp->rib[afi][safi]));
d62a17ae 7687
60466a63 7688 ents = bgp_table_count(bgp->rib[afi][safi]);
ea47320b
DL		 7689 vty_out(vty,
7690 "RIB entries %ld, using %s of memory\n",
7691 ents,
996c9314
LB		 7692 mtype_memstr(memstrbuf,
7693 sizeof(memstrbuf),
7694 ents * sizeof(struct
7695 bgp_node)));
ea47320b
DL		 7696
7697 /* Peer related usage */
7698 ents = listcount(bgp->peer);
60466a63 7699 vty_out(vty, "Peers %ld, using %s of memory\n",
ea47320b
DL		 7700 ents,
7701 mtype_memstr(
60466a63
QY		 7702 memstrbuf, sizeof(memstrbuf),
7703 ents * sizeof(struct peer)));
ea47320b
DL		 7704
7705 if ((ents = listcount(bgp->group)))
d62a17ae 7706 vty_out(vty,
ea47320b 7707 "Peer groups %ld, using %s of memory\n",
d62a17ae 7708 ents,
7709 mtype_memstr(
7710 memstrbuf,
7711 sizeof(memstrbuf),
996c9314
LB		 7712 ents * sizeof(struct
7713 peer_group)));
d62a17ae 7714
ea47320b
DL		 7715 if (CHECK_FLAG(bgp->af_flags[afi][safi],
7716 BGP_CONFIG_DAMPENING))
60466a63 7717 vty_out(vty, "Dampening enabled.\n");
ea47320b 7718 vty_out(vty, "\n");
d62a17ae 7719
ea47320b
DL		 7720 /* Subtract 8 here because 'Neighbor' is
7721 * 8 characters */
7722 vty_out(vty, "Neighbor");
60466a63
QY		 7723 vty_out(vty, "%*s", max_neighbor_width - 8,
7724 " ");
ea47320b
DL		 7725 vty_out(vty,
7726 "V AS MsgRcvd MsgSent TblVer InQ OutQ Up/Down State/PfxRcd\n");
d62a17ae 7727 }
ea47320b 7728 }
d62a17ae 7729
ea47320b 7730 count++;
d62a17ae 7731
ea47320b
DL		 7732 if (use_json) {
7733 json_peer = json_object_new_object();
d62a17ae 7734
ea47320b 7735 if (peer_dynamic_neighbor(peer))
60466a63
QY		 7736 json_object_boolean_true_add(json_peer,
7737 "dynamicPeer");
d62a17ae 7738
ea47320b 7739 if (peer->hostname)
60466a63 7740 json_object_string_add(json_peer, "hostname",
ea47320b 7741 peer->hostname);
d62a17ae 7742
ea47320b 7743 if (peer->domainname)
60466a63
QY		 7744 json_object_string_add(json_peer, "domainname",
7745 peer->domainname);
d62a17ae 7746
60466a63 7747 json_object_int_add(json_peer, "remoteAs", peer->as);
ea47320b 7748 json_object_int_add(json_peer, "version", 4);
60466a63 7749 json_object_int_add(json_peer, "msgRcvd",
0112e9e0 7750 PEER_TOTAL_RX(peer));
60466a63 7751 json_object_int_add(json_peer, "msgSent",
0112e9e0 7752 PEER_TOTAL_TX(peer));
ea47320b
DL		 7753
7754 json_object_int_add(json_peer, "tableVersion",
7755 peer->version[afi][safi]);
7756 json_object_int_add(json_peer, "outq",
7757 peer->obuf->count);
7758 json_object_int_add(json_peer, "inq", 0);
60466a63
QY		 7759 peer_uptime(peer->uptime, timebuf, BGP_UPTIME_LEN,
7760 use_json, json_peer);
7761 json_object_int_add(json_peer, "prefixReceivedCount",
7762 peer->pcount[afi][pfx_rcd_safi]);
d62a17ae 7763
ea47320b 7764 if (CHECK_FLAG(peer->flags, PEER_FLAG_SHUTDOWN))
60466a63 7765 json_object_string_add(json_peer, "state",
ea47320b 7766 "Idle (Admin)");
60466a63
QY		 7767 else if (CHECK_FLAG(peer->sflags,
7768 PEER_STATUS_PREFIX_OVERFLOW))
7769 json_object_string_add(json_peer, "state",
ea47320b
DL		 7770 "Idle (PfxCt)");
7771 else
7772 json_object_string_add(
7773 json_peer, "state",
60466a63
QY		 7774 lookup_msg(bgp_status_msg, peer->status,
7775 NULL));
ea47320b
DL		 7776
7777 if (peer->conf_if)
60466a63 7778 json_object_string_add(json_peer, "idType",
ea47320b
DL		 7779 "interface");
7780 else if (peer->su.sa.sa_family == AF_INET)
60466a63
QY		 7781 json_object_string_add(json_peer, "idType",
7782 "ipv4");
ea47320b 7783 else if (peer->su.sa.sa_family == AF_INET6)
60466a63
QY		 7784 json_object_string_add(json_peer, "idType",
7785 "ipv6");
d62a17ae 7786
ea47320b
DL		 7787 json_object_object_add(json_peers, peer->host,
7788 json_peer);
7789 } else {
7790 memset(dn_flag, '\0', sizeof(dn_flag));
7791 if (peer_dynamic_neighbor(peer)) {
7792 dn_count++;
7793 dn_flag[0] = '*';
7794 }
d62a17ae 7795
ea47320b 7796 if (peer->hostname
60466a63 7797 && bgp_flag_check(bgp, BGP_FLAG_SHOW_HOSTNAME))
ea47320b 7798 len = vty_out(vty, "%s%s(%s)", dn_flag,
60466a63 7799 peer->hostname, peer->host);
ea47320b 7800 else
60466a63 7801 len = vty_out(vty, "%s%s", dn_flag, peer->host);
ea47320b
DL		 7802
7803 /* pad the neighbor column with spaces */
7804 if (len < max_neighbor_width)
60466a63
QY		 7805 vty_out(vty, "%*s", max_neighbor_width - len,
7806 " ");
ea47320b 7807
86a55b99 7808 vty_out(vty, "4 %10u %7u %7u %8" PRIu64 " %4d %4zd %8s",
0112e9e0
QY		 7809 peer->as, PEER_TOTAL_RX(peer),
7810 PEER_TOTAL_TX(peer), peer->version[afi][safi],
7811 0, peer->obuf->count,
d62a17ae 7812 peer_uptime(peer->uptime, timebuf,
ea47320b 7813 BGP_UPTIME_LEN, 0, NULL));
d62a17ae 7814
ea47320b 7815 if (peer->status == Established)
95077abf
DW		 7816 if (peer->afc_recv[afi][pfx_rcd_safi])
7817 vty_out(vty, " %12ld",
a4d82a8a
PZ		 7818 peer->pcount[afi]
7819 [pfx_rcd_safi]);
95077abf
DW		 7820 else
7821 vty_out(vty, " NoNeg");
ea47320b 7822 else {
60466a63 7823 if (CHECK_FLAG(peer->flags, PEER_FLAG_SHUTDOWN))
ea47320b 7824 vty_out(vty, " Idle (Admin)");
60466a63
QY		 7825 else if (CHECK_FLAG(
7826 peer->sflags,
7827 PEER_STATUS_PREFIX_OVERFLOW))
ea47320b 7828 vty_out(vty, " Idle (PfxCt)");
d62a17ae 7829 else
ea47320b 7830 vty_out(vty, " %12s",
60466a63
QY		 7831 lookup_msg(bgp_status_msg,
7832 peer->status, NULL));
d62a17ae 7833 }
ea47320b 7834 vty_out(vty, "\n");
d62a17ae 7835 }
7836 }
f933309e 7837
d62a17ae 7838 if (use_json) {
7839 json_object_object_add(json, "peers", json_peers);
7840
7841 json_object_int_add(json, "totalPeers", count);
7842 json_object_int_add(json, "dynamicPeers", dn_count);
7843
57a9c8a8
DS		 7844 bgp_show_bestpath_json(bgp, json);
7845
996c9314
LB		 7846 vty_out(vty, "%s\n", json_object_to_json_string_ext(
7847 json, JSON_C_TO_STRING_PRETTY));
d62a17ae 7848 json_object_free(json);
7849 } else {
7850 if (count)
7851 vty_out(vty, "\nTotal number of neighbors %d\n", count);
7852 else {
7853 if (use_json)
7854 vty_out(vty,
7855 "{\"error\": {\"message\": \"No %s neighbor configured\"}}\n",
7856 afi_safi_print(afi, safi));
7857 else
7858 vty_out(vty, "No %s neighbor is configured\n",
7859 afi_safi_print(afi, safi));
7860 }
b05a1c8b 7861
d62a17ae 7862 if (dn_count && !use_json) {
7863 vty_out(vty, "* - dynamic neighbor\n");
7864 vty_out(vty, "%d dynamic neighbor(s), limit %d\n",
7865 dn_count, bgp->dynamic_neighbors_limit);
7866 }
7867 }
1ff9a340 7868
d62a17ae 7869 return CMD_SUCCESS;
718e3744 7870}
7871
d62a17ae 7872static void bgp_show_summary_afi_safi(struct vty *vty, struct bgp *bgp, int afi,
d7c0a89a 7873 int safi, uint8_t use_json,
d62a17ae 7874 json_object *json)
7875{
7876 int is_first = 1;
7877 int afi_wildcard = (afi == AFI_MAX);
7878 int safi_wildcard = (safi == SAFI_MAX);
7879 int is_wildcard = (afi_wildcard || safi_wildcard);
7880 bool json_output = false;
7881
7882 if (use_json && is_wildcard)
7883 vty_out(vty, "{\n");
7884 if (afi_wildcard)
7885 afi = 1; /* AFI_IP */
7886 while (afi < AFI_MAX) {
7887 if (safi_wildcard)
7888 safi = 1; /* SAFI_UNICAST */
7889 while (safi < SAFI_MAX) {
318cac96 7890 if (bgp_afi_safi_peer_exists(bgp, afi, safi)) {
d62a17ae 7891 json_output = true;
7892 if (is_wildcard) {
7893 /*
7894 * So limit output to those afi/safi
7895 * pairs that
7896 * actualy have something interesting in
7897 * them
7898 */
7899 if (use_json) {
7900 json = json_object_new_object();
7901
7902 if (!is_first)
7903 vty_out(vty, ",\n");
7904 else
7905 is_first = 0;
7906
7907 vty_out(vty, "\"%s\":",
7908 afi_safi_json(afi,
7909 safi));
7910 } else {
7911 vty_out(vty, "\n%s Summary:\n",
7912 afi_safi_print(afi,
7913 safi));
7914 }
7915 }
7916 bgp_show_summary(vty, bgp, afi, safi, use_json,
7917 json);
7918 }
7919 safi++;
d62a17ae 7920 if (!safi_wildcard)
7921 safi = SAFI_MAX;
7922 }
7923 afi++;
ee851c8c 7924 if (!afi_wildcard)
d62a17ae 7925 afi = AFI_MAX;
7926 }
7927
7928 if (use_json && is_wildcard)
7929 vty_out(vty, "}\n");
7930 else if (use_json && !json_output)
7931 vty_out(vty, "{}\n");
7932}
7933
7934static void bgp_show_all_instances_summary_vty(struct vty *vty, afi_t afi,
d7c0a89a 7935 safi_t safi, uint8_t use_json)
d62a17ae 7936{
7937 struct listnode *node, *nnode;
7938 struct bgp *bgp;
7939 json_object *json = NULL;
7940 int is_first = 1;
7941
7942 if (use_json)
7943 vty_out(vty, "{\n");
7944
7945 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp)) {
7946 if (use_json) {
7947 json = json_object_new_object();
7948
7949 if (!is_first)
7950 vty_out(vty, ",\n");
7951 else
7952 is_first = 0;
7953
7954 vty_out(vty, "\"%s\":",
7955 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
7956 ? "Default"
7957 : bgp->name);
7958 } else {
7959 vty_out(vty, "\nInstance %s:\n",
7960 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
7961 ? "Default"
7962 : bgp->name);
7963 }
7964 bgp_show_summary_afi_safi(vty, bgp, afi, safi, use_json, json);
7965 }
7966
7967 if (use_json)
7968 vty_out(vty, "}\n");
7969}
7970
7971int bgp_show_summary_vty(struct vty *vty, const char *name, afi_t afi,
d7c0a89a 7972 safi_t safi, uint8_t use_json)
d62a17ae 7973{
7974 struct bgp *bgp;
7975
7976 if (name) {
7977 if (strmatch(name, "all")) {
7978 bgp_show_all_instances_summary_vty(vty, afi, safi,
7979 use_json);
7980 return CMD_SUCCESS;
7981 } else {
7982 bgp = bgp_lookup_by_name(name);
7983
7984 if (!bgp) {
7985 if (use_json)
7986 vty_out(vty, "{}\n");
7987 else
7988 vty_out(vty,
7989 "%% No such BGP instance exist\n");
7990 return CMD_WARNING;
7991 }
7992
7993 bgp_show_summary_afi_safi(vty, bgp, afi, safi, use_json,
7994 NULL);
7995 return CMD_SUCCESS;
7996 }
7997 }
7998
7999 bgp = bgp_get_default();
8000
8001 if (bgp)
8002 bgp_show_summary_afi_safi(vty, bgp, afi, safi, use_json, NULL);
8003
8004 return CMD_SUCCESS;
4fb25c53
DW		 8005}
8006
716b2d8a 8007/* `show [ip] bgp summary' commands. */
47fc97cc 8008DEFUN (show_ip_bgp_summary,
718e3744 8009 show_ip_bgp_summary_cmd,
dd6bd0f1 8010 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] summary [json]",
718e3744 8011 SHOW_STR
8012 IP_STR
8013 BGP_STR
8386ac43 8014 BGP_INSTANCE_HELP_STR
46f296b4 8015 BGP_AFI_HELP_STR
dd6bd0f1 8016 BGP_SAFI_WITH_LABEL_HELP_STR
b05a1c8b 8017 "Summary of BGP neighbor status\n"
9973d184 8018 JSON_STR)
718e3744 8019{
d62a17ae 8020 char *vrf = NULL;
8021 afi_t afi = AFI_MAX;
8022 safi_t safi = SAFI_MAX;
8023
8024 int idx = 0;
8025
8026 /* show [ip] bgp */
8027 if (argv_find(argv, argc, "ip", &idx))
8028 afi = AFI_IP;
8029 /* [<view|vrf> VIEWVRFNAME] */
8030 if (argv_find(argv, argc, "view", &idx)
8031 || argv_find(argv, argc, "vrf", &idx))
8032 vrf = argv[++idx]->arg;
8033 /* ["BGP_AFI_CMD_STR" ["BGP_SAFI_CMD_STR"]] */
8034 if (argv_find_and_parse_afi(argv, argc, &idx, &afi)) {
8035 argv_find_and_parse_safi(argv, argc, &idx, &safi);
8036 }
8037
8038 int uj = use_json(argc, argv);
8039
8040 return bgp_show_summary_vty(vty, vrf, afi, safi, uj);
8041}
8042
8043const char *afi_safi_print(afi_t afi, safi_t safi)
8044{
8045 if (afi == AFI_IP && safi == SAFI_UNICAST)
8046 return "IPv4 Unicast";
8047 else if (afi == AFI_IP && safi == SAFI_MULTICAST)
8048 return "IPv4 Multicast";
8049 else if (afi == AFI_IP && safi == SAFI_LABELED_UNICAST)
8050 return "IPv4 Labeled Unicast";
8051 else if (afi == AFI_IP && safi == SAFI_MPLS_VPN)
8052 return "IPv4 VPN";
8053 else if (afi == AFI_IP && safi == SAFI_ENCAP)
8054 return "IPv4 Encap";
7c40bf39 8055 else if (afi == AFI_IP && safi == SAFI_FLOWSPEC)
8056 return "IPv4 Flowspec";
d62a17ae 8057 else if (afi == AFI_IP6 && safi == SAFI_UNICAST)
8058 return "IPv6 Unicast";
8059 else if (afi == AFI_IP6 && safi == SAFI_MULTICAST)
8060 return "IPv6 Multicast";
8061 else if (afi == AFI_IP6 && safi == SAFI_LABELED_UNICAST)
8062 return "IPv6 Labeled Unicast";
8063 else if (afi == AFI_IP6 && safi == SAFI_MPLS_VPN)
8064 return "IPv6 VPN";
8065 else if (afi == AFI_IP6 && safi == SAFI_ENCAP)
8066 return "IPv6 Encap";
7c40bf39 8067 else if (afi == AFI_IP6 && safi == SAFI_FLOWSPEC)
8068 return "IPv6 Flowspec";
d62a17ae 8069 else if (afi == AFI_L2VPN && safi == SAFI_EVPN)
8070 return "L2VPN EVPN";
8071 else
8072 return "Unknown";
538621f2 8073}
8074
b9f77ec8
DS		 8075/*
8076 * Please note that we have intentionally camelCased
8077 * the return strings here. So if you want
8078 * to use this function, please ensure you
8079 * are doing this within json output
8080 */
d62a17ae 8081const char *afi_safi_json(afi_t afi, safi_t safi)
8082{
8083 if (afi == AFI_IP && safi == SAFI_UNICAST)
8084 return "ipv4Unicast";
8085 else if (afi == AFI_IP && safi == SAFI_MULTICAST)
8086 return "ipv4Multicast";
8087 else if (afi == AFI_IP && safi == SAFI_LABELED_UNICAST)
8088 return "ipv4LabeledUnicast";
8089 else if (afi == AFI_IP && safi == SAFI_MPLS_VPN)
8090 return "ipv4Vpn";
8091 else if (afi == AFI_IP && safi == SAFI_ENCAP)
8092 return "ipv4Encap";
7c40bf39 8093 else if (afi == AFI_IP && safi == SAFI_FLOWSPEC)
8094 return "ipv4Flowspec";
d62a17ae 8095 else if (afi == AFI_IP6 && safi == SAFI_UNICAST)
8096 return "ipv6Unicast";
8097 else if (afi == AFI_IP6 && safi == SAFI_MULTICAST)
8098 return "ipv6Multicast";
8099 else if (afi == AFI_IP6 && safi == SAFI_LABELED_UNICAST)
8100 return "ipv6LabeledUnicast";
8101 else if (afi == AFI_IP6 && safi == SAFI_MPLS_VPN)
8102 return "ipv6Vpn";
8103 else if (afi == AFI_IP6 && safi == SAFI_ENCAP)
8104 return "ipv6Encap";
7c40bf39 8105 else if (afi == AFI_IP6 && safi == SAFI_FLOWSPEC)
8106 return "ipv6Flowspec";
d62a17ae 8107 else if (afi == AFI_L2VPN && safi == SAFI_EVPN)
8108 return "l2VpnEvpn";
8109 else
8110 return "Unknown";
27162734
LB		 8111}
8112
718e3744 8113/* Show BGP peer's information. */
d62a17ae 8114enum show_type { show_all, show_peer };
8115
8116static void bgp_show_peer_afi_orf_cap(struct vty *vty, struct peer *p,
8117 afi_t afi, safi_t safi,
d7c0a89a
QY		 8118 uint16_t adv_smcap, uint16_t adv_rmcap,
8119 uint16_t rcv_smcap, uint16_t rcv_rmcap,
8120 uint8_t use_json, json_object *json_pref)
d62a17ae 8121{
8122 /* Send-Mode */
8123 if (CHECK_FLAG(p->af_cap[afi][safi], adv_smcap)
8124 || CHECK_FLAG(p->af_cap[afi][safi], rcv_smcap)) {
8125 if (use_json) {
8126 if (CHECK_FLAG(p->af_cap[afi][safi], adv_smcap)
8127 && CHECK_FLAG(p->af_cap[afi][safi], rcv_smcap))
8128 json_object_string_add(json_pref, "sendMode",
8129 "advertisedAndReceived");
8130 else if (CHECK_FLAG(p->af_cap[afi][safi], adv_smcap))
8131 json_object_string_add(json_pref, "sendMode",
8132 "advertised");
8133 else if (CHECK_FLAG(p->af_cap[afi][safi], rcv_smcap))
8134 json_object_string_add(json_pref, "sendMode",
8135 "received");
8136 } else {
8137 vty_out(vty, " Send-mode: ");
8138 if (CHECK_FLAG(p->af_cap[afi][safi], adv_smcap))
8139 vty_out(vty, "advertised");
8140 if (CHECK_FLAG(p->af_cap[afi][safi], rcv_smcap))
8141 vty_out(vty, "%sreceived",
8142 CHECK_FLAG(p->af_cap[afi][safi],
8143 adv_smcap)
8144 ? ", "
8145 : "");
8146 vty_out(vty, "\n");
8147 }
8148 }
8149
8150 /* Receive-Mode */
8151 if (CHECK_FLAG(p->af_cap[afi][safi], adv_rmcap)
8152 || CHECK_FLAG(p->af_cap[afi][safi], rcv_rmcap)) {
8153 if (use_json) {
8154 if (CHECK_FLAG(p->af_cap[afi][safi], adv_rmcap)
8155 && CHECK_FLAG(p->af_cap[afi][safi], rcv_rmcap))
8156 json_object_string_add(json_pref, "recvMode",
8157 "advertisedAndReceived");
8158 else if (CHECK_FLAG(p->af_cap[afi][safi], adv_rmcap))
8159 json_object_string_add(json_pref, "recvMode",
8160 "advertised");
8161 else if (CHECK_FLAG(p->af_cap[afi][safi], rcv_rmcap))
8162 json_object_string_add(json_pref, "recvMode",
8163 "received");
8164 } else {
8165 vty_out(vty, " Receive-mode: ");
8166 if (CHECK_FLAG(p->af_cap[afi][safi], adv_rmcap))
8167 vty_out(vty, "advertised");
8168 if (CHECK_FLAG(p->af_cap[afi][safi], rcv_rmcap))
8169 vty_out(vty, "%sreceived",
8170 CHECK_FLAG(p->af_cap[afi][safi],
8171 adv_rmcap)
8172 ? ", "
8173 : "");
8174 vty_out(vty, "\n");
8175 }
8176 }
8177}
8178
8179static void bgp_show_peer_afi(struct vty *vty, struct peer *p, afi_t afi,
d7c0a89a 8180 safi_t safi, uint8_t use_json,
d62a17ae 8181 json_object *json_neigh)
8182{
0291c246
MK		 8183 struct bgp_filter *filter;
8184 struct peer_af *paf;
8185 char orf_pfx_name[BUFSIZ];
8186 int orf_pfx_count;
8187 json_object *json_af = NULL;
8188 json_object *json_prefA = NULL;
8189 json_object *json_prefB = NULL;
8190 json_object *json_addr = NULL;
d62a17ae 8191
8192 if (use_json) {
8193 json_addr = json_object_new_object();
8194 json_af = json_object_new_object();
8195 filter = &p->filter[afi][safi];
8196
8197 if (peer_group_active(p))
8198 json_object_string_add(json_addr, "peerGroupMember",
8199 p->group->name);
8200
8201 paf = peer_af_find(p, afi, safi);
8202 if (paf && PAF_SUBGRP(paf)) {
8203 json_object_int_add(json_addr, "updateGroupId",
8204 PAF_UPDGRP(paf)->id);
8205 json_object_int_add(json_addr, "subGroupId",
8206 PAF_SUBGRP(paf)->id);
8207 json_object_int_add(json_addr, "packetQueueLength",
8208 bpacket_queue_virtual_length(paf));
8209 }
8210
8211 if (CHECK_FLAG(p->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_SM_ADV)
8212 || CHECK_FLAG(p->af_cap[afi][safi],
8213 PEER_CAP_ORF_PREFIX_SM_RCV)
8214 || CHECK_FLAG(p->af_cap[afi][safi],
8215 PEER_CAP_ORF_PREFIX_RM_ADV)
8216 || CHECK_FLAG(p->af_cap[afi][safi],
8217 PEER_CAP_ORF_PREFIX_RM_RCV)) {
8218 json_object_int_add(json_af, "orfType",
8219 ORF_TYPE_PREFIX);
8220 json_prefA = json_object_new_object();
8221 bgp_show_peer_afi_orf_cap(vty, p, afi, safi,
8222 PEER_CAP_ORF_PREFIX_SM_ADV,
8223 PEER_CAP_ORF_PREFIX_RM_ADV,
8224 PEER_CAP_ORF_PREFIX_SM_RCV,
8225 PEER_CAP_ORF_PREFIX_RM_RCV,
8226 use_json, json_prefA);
8227 json_object_object_add(json_af, "orfPrefixList",
8228 json_prefA);
8229 }
8230
8231 if (CHECK_FLAG(p->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_SM_ADV)
8232 || CHECK_FLAG(p->af_cap[afi][safi],
8233 PEER_CAP_ORF_PREFIX_SM_OLD_RCV)
8234 || CHECK_FLAG(p->af_cap[afi][safi],
8235 PEER_CAP_ORF_PREFIX_RM_ADV)
8236 || CHECK_FLAG(p->af_cap[afi][safi],
8237 PEER_CAP_ORF_PREFIX_RM_OLD_RCV)) {
8238 json_object_int_add(json_af, "orfOldType",
8239 ORF_TYPE_PREFIX_OLD);
8240 json_prefB = json_object_new_object();
8241 bgp_show_peer_afi_orf_cap(
8242 vty, p, afi, safi, PEER_CAP_ORF_PREFIX_SM_ADV,
8243 PEER_CAP_ORF_PREFIX_RM_ADV,
8244 PEER_CAP_ORF_PREFIX_SM_OLD_RCV,
8245 PEER_CAP_ORF_PREFIX_RM_OLD_RCV, use_json,
8246 json_prefB);
8247 json_object_object_add(json_af, "orfOldPrefixList",
8248 json_prefB);
8249 }
8250
8251 if (CHECK_FLAG(p->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_SM_ADV)
8252 || CHECK_FLAG(p->af_cap[afi][safi],
8253 PEER_CAP_ORF_PREFIX_SM_RCV)
8254 || CHECK_FLAG(p->af_cap[afi][safi],
8255 PEER_CAP_ORF_PREFIX_SM_OLD_RCV)
8256 || CHECK_FLAG(p->af_cap[afi][safi],
8257 PEER_CAP_ORF_PREFIX_RM_ADV)
8258 || CHECK_FLAG(p->af_cap[afi][safi],
8259 PEER_CAP_ORF_PREFIX_RM_RCV)
8260 || CHECK_FLAG(p->af_cap[afi][safi],
8261 PEER_CAP_ORF_PREFIX_RM_OLD_RCV))
8262 json_object_object_add(json_addr, "afDependentCap",
8263 json_af);
8264 else
8265 json_object_free(json_af);
8266
8267 sprintf(orf_pfx_name, "%s.%d.%d", p->host, afi, safi);
8268 orf_pfx_count = prefix_bgp_show_prefix_list(
8269 NULL, afi, orf_pfx_name, use_json);
8270
8271 if (CHECK_FLAG(p->af_sflags[afi][safi],
8272 PEER_STATUS_ORF_PREFIX_SEND)
8273 || orf_pfx_count) {
8274 if (CHECK_FLAG(p->af_sflags[afi][safi],
8275 PEER_STATUS_ORF_PREFIX_SEND))
8276 json_object_boolean_true_add(json_neigh,
8277 "orfSent");
8278 if (orf_pfx_count)
8279 json_object_int_add(json_addr, "orfRecvCounter",
8280 orf_pfx_count);
8281 }
8282 if (CHECK_FLAG(p->af_sflags[afi][safi],
8283 PEER_STATUS_ORF_WAIT_REFRESH))
8284 json_object_string_add(
8285 json_addr, "orfFirstUpdate",
8286 "deferredUntilORFOrRouteRefreshRecvd");
8287
8288 if (CHECK_FLAG(p->af_flags[afi][safi],
8289 PEER_FLAG_REFLECTOR_CLIENT))
8290 json_object_boolean_true_add(json_addr,
8291 "routeReflectorClient");
8292 if (CHECK_FLAG(p->af_flags[afi][safi],
8293 PEER_FLAG_RSERVER_CLIENT))
8294 json_object_boolean_true_add(json_addr,
8295 "routeServerClient");
8296 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_SOFT_RECONFIG))
8297 json_object_boolean_true_add(json_addr,
8298 "inboundSoftConfigPermit");
8299
8300 if (CHECK_FLAG(p->af_flags[afi][safi],
8301 PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE))
8302 json_object_boolean_true_add(
8303 json_addr,
8304 "privateAsNumsAllReplacedInUpdatesToNbr");
8305 else if (CHECK_FLAG(p->af_flags[afi][safi],
8306 PEER_FLAG_REMOVE_PRIVATE_AS_REPLACE))
8307 json_object_boolean_true_add(
8308 json_addr,
8309 "privateAsNumsReplacedInUpdatesToNbr");
8310 else if (CHECK_FLAG(p->af_flags[afi][safi],
8311 PEER_FLAG_REMOVE_PRIVATE_AS_ALL))
8312 json_object_boolean_true_add(
8313 json_addr,
8314 "privateAsNumsAllRemovedInUpdatesToNbr");
8315 else if (CHECK_FLAG(p->af_flags[afi][safi],
8316 PEER_FLAG_REMOVE_PRIVATE_AS))
8317 json_object_boolean_true_add(
8318 json_addr,
8319 "privateAsNumsRemovedInUpdatesToNbr");
8320
8321 if (CHECK_FLAG(p->af_flags[afi][safi],
8322 PEER_FLAG_ADDPATH_TX_ALL_PATHS))
8323 json_object_boolean_true_add(json_addr,
8324 "addpathTxAllPaths");
8325
8326 if (CHECK_FLAG(p->af_flags[afi][safi],
8327 PEER_FLAG_ADDPATH_TX_BESTPATH_PER_AS))
8328 json_object_boolean_true_add(json_addr,
8329 "addpathTxBestpathPerAS");
8330
8331 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_AS_OVERRIDE))
8332 json_object_string_add(json_addr,
8333 "overrideASNsInOutboundUpdates",
8334 "ifAspathEqualRemoteAs");
8335
8336 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_NEXTHOP_SELF)
8337 || CHECK_FLAG(p->af_flags[afi][safi],
8338 PEER_FLAG_FORCE_NEXTHOP_SELF))
8339 json_object_boolean_true_add(json_addr,
8340 "routerAlwaysNextHop");
8341 if (CHECK_FLAG(p->af_flags[afi][safi],
8342 PEER_FLAG_AS_PATH_UNCHANGED))
8343 json_object_boolean_true_add(
8344 json_addr, "unchangedAsPathPropogatedToNbr");
8345 if (CHECK_FLAG(p->af_flags[afi][safi],
8346 PEER_FLAG_NEXTHOP_UNCHANGED))
8347 json_object_boolean_true_add(
8348 json_addr, "unchangedNextHopPropogatedToNbr");
8349 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_MED_UNCHANGED))
8350 json_object_boolean_true_add(
8351 json_addr, "unchangedMedPropogatedToNbr");
8352 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_SEND_COMMUNITY)
8353 || CHECK_FLAG(p->af_flags[afi][safi],
8354 PEER_FLAG_SEND_EXT_COMMUNITY)) {
8355 if (CHECK_FLAG(p->af_flags[afi][safi],
8356 PEER_FLAG_SEND_COMMUNITY)
8357 && CHECK_FLAG(p->af_flags[afi][safi],
8358 PEER_FLAG_SEND_EXT_COMMUNITY))
8359 json_object_string_add(json_addr,
8360 "commAttriSentToNbr",
8361 "extendedAndStandard");
8362 else if (CHECK_FLAG(p->af_flags[afi][safi],
8363 PEER_FLAG_SEND_EXT_COMMUNITY))
8364 json_object_string_add(json_addr,
8365 "commAttriSentToNbr",
8366 "extended");
8367 else
8368 json_object_string_add(json_addr,
8369 "commAttriSentToNbr",
8370 "standard");
8371 }
8372 if (CHECK_FLAG(p->af_flags[afi][safi],
8373 PEER_FLAG_DEFAULT_ORIGINATE)) {
8374 if (p->default_rmap[afi][safi].name)
8375 json_object_string_add(
8376 json_addr, "defaultRouteMap",
8377 p->default_rmap[afi][safi].name);
8378
8379 if (paf && PAF_SUBGRP(paf)
8380 && CHECK_FLAG(PAF_SUBGRP(paf)->sflags,
8381 SUBGRP_STATUS_DEFAULT_ORIGINATE))
8382 json_object_boolean_true_add(json_addr,
8383 "defaultSent");
8384 else
8385 json_object_boolean_true_add(json_addr,
8386 "defaultNotSent");
8387 }
8388
dff8f48d 8389 if (afi == AFI_L2VPN && safi == SAFI_EVPN) {
94c2f693 8390 if (is_evpn_enabled())
60466a63
QY		 8391 json_object_boolean_true_add(
8392 json_addr, "advertiseAllVnis");
dff8f48d
MK		 8393 }
8394
d62a17ae 8395 if (filter->plist[FILTER_IN].name
8396 || filter->dlist[FILTER_IN].name
8397 || filter->aslist[FILTER_IN].name
8398 || filter->map[RMAP_IN].name)
8399 json_object_boolean_true_add(json_addr,
8400 "inboundPathPolicyConfig");
8401 if (filter->plist[FILTER_OUT].name
8402 || filter->dlist[FILTER_OUT].name
8403 || filter->aslist[FILTER_OUT].name
8404 || filter->map[RMAP_OUT].name || filter->usmap.name)
8405 json_object_boolean_true_add(
8406 json_addr, "outboundPathPolicyConfig");
8407
8408 /* prefix-list */
8409 if (filter->plist[FILTER_IN].name)
8410 json_object_string_add(json_addr,
8411 "incomingUpdatePrefixFilterList",
8412 filter->plist[FILTER_IN].name);
8413 if (filter->plist[FILTER_OUT].name)
8414 json_object_string_add(json_addr,
8415 "outgoingUpdatePrefixFilterList",
8416 filter->plist[FILTER_OUT].name);
8417
8418 /* distribute-list */
8419 if (filter->dlist[FILTER_IN].name)
8420 json_object_string_add(
8421 json_addr, "incomingUpdateNetworkFilterList",
8422 filter->dlist[FILTER_IN].name);
8423 if (filter->dlist[FILTER_OUT].name)
8424 json_object_string_add(
8425 json_addr, "outgoingUpdateNetworkFilterList",
8426 filter->dlist[FILTER_OUT].name);
8427
8428 /* filter-list. */
8429 if (filter->aslist[FILTER_IN].name)
8430 json_object_string_add(json_addr,
8431 "incomingUpdateAsPathFilterList",
8432 filter->aslist[FILTER_IN].name);
8433 if (filter->aslist[FILTER_OUT].name)
8434 json_object_string_add(json_addr,
8435 "outgoingUpdateAsPathFilterList",
8436 filter->aslist[FILTER_OUT].name);
8437
8438 /* route-map. */
8439 if (filter->map[RMAP_IN].name)
8440 json_object_string_add(
8441 json_addr, "routeMapForIncomingAdvertisements",
8442 filter->map[RMAP_IN].name);
8443 if (filter->map[RMAP_OUT].name)
8444 json_object_string_add(
8445 json_addr, "routeMapForOutgoingAdvertisements",
8446 filter->map[RMAP_OUT].name);
8447
8448 /* unsuppress-map */
8449 if (filter->usmap.name)
8450 json_object_string_add(json_addr,
8451 "selectiveUnsuppressRouteMap",
8452 filter->usmap.name);
8453
8454 /* Receive prefix count */
8455 json_object_int_add(json_addr, "acceptedPrefixCounter",
8456 p->pcount[afi][safi]);
8457
8458 /* Maximum prefix */
8459 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_MAX_PREFIX)) {
8460 json_object_int_add(json_addr, "prefixAllowedMax",
8461 p->pmax[afi][safi]);
8462 if (CHECK_FLAG(p->af_flags[afi][safi],
8463 PEER_FLAG_MAX_PREFIX_WARNING))
8464 json_object_boolean_true_add(
8465 json_addr, "prefixAllowedMaxWarning");
8466 json_object_int_add(json_addr,
8467 "prefixAllowedWarningThresh",
8468 p->pmax_threshold[afi][safi]);
8469 if (p->pmax_restart[afi][safi])
8470 json_object_int_add(
8471 json_addr,
8472 "prefixAllowedRestartIntervalMsecs",
8473 p->pmax_restart[afi][safi] * 60000);
8474 }
8475 json_object_object_add(json_neigh, afi_safi_print(afi, safi),
8476 json_addr);
8477
8478 } else {
8479 filter = &p->filter[afi][safi];
8480
8481 vty_out(vty, " For address family: %s\n",
8482 afi_safi_print(afi, safi));
8483
8484 if (peer_group_active(p))
8485 vty_out(vty, " %s peer-group member\n",
8486 p->group->name);
8487
8488 paf = peer_af_find(p, afi, safi);
8489 if (paf && PAF_SUBGRP(paf)) {
996c9314
LB		 8490 vty_out(vty, " Update group %" PRIu64
8491 ", subgroup %" PRIu64 "\n",
d62a17ae 8492 PAF_UPDGRP(paf)->id, PAF_SUBGRP(paf)->id);
8493 vty_out(vty, " Packet Queue length %d\n",
8494 bpacket_queue_virtual_length(paf));
8495 } else {
8496 vty_out(vty, " Not part of any update group\n");
8497 }
8498 if (CHECK_FLAG(p->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_SM_ADV)
8499 || CHECK_FLAG(p->af_cap[afi][safi],
8500 PEER_CAP_ORF_PREFIX_SM_RCV)
8501 || CHECK_FLAG(p->af_cap[afi][safi],
8502 PEER_CAP_ORF_PREFIX_SM_OLD_RCV)
8503 || CHECK_FLAG(p->af_cap[afi][safi],
8504 PEER_CAP_ORF_PREFIX_RM_ADV)
8505 || CHECK_FLAG(p->af_cap[afi][safi],
8506 PEER_CAP_ORF_PREFIX_RM_RCV)
8507 || CHECK_FLAG(p->af_cap[afi][safi],
8508 PEER_CAP_ORF_PREFIX_RM_OLD_RCV))
8509 vty_out(vty, " AF-dependant capabilities:\n");
8510
8511 if (CHECK_FLAG(p->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_SM_ADV)
8512 || CHECK_FLAG(p->af_cap[afi][safi],
8513 PEER_CAP_ORF_PREFIX_SM_RCV)
8514 || CHECK_FLAG(p->af_cap[afi][safi],
8515 PEER_CAP_ORF_PREFIX_RM_ADV)
8516 || CHECK_FLAG(p->af_cap[afi][safi],
8517 PEER_CAP_ORF_PREFIX_RM_RCV)) {
8518 vty_out(vty,
8519 " Outbound Route Filter (ORF) type (%d) Prefix-list:\n",
8520 ORF_TYPE_PREFIX);
8521 bgp_show_peer_afi_orf_cap(
8522 vty, p, afi, safi, PEER_CAP_ORF_PREFIX_SM_ADV,
8523 PEER_CAP_ORF_PREFIX_RM_ADV,
8524 PEER_CAP_ORF_PREFIX_SM_RCV,
8525 PEER_CAP_ORF_PREFIX_RM_RCV, use_json, NULL);
8526 }
8527 if (CHECK_FLAG(p->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_SM_ADV)
8528 || CHECK_FLAG(p->af_cap[afi][safi],
8529 PEER_CAP_ORF_PREFIX_SM_OLD_RCV)
8530 || CHECK_FLAG(p->af_cap[afi][safi],
8531 PEER_CAP_ORF_PREFIX_RM_ADV)
8532 || CHECK_FLAG(p->af_cap[afi][safi],
8533 PEER_CAP_ORF_PREFIX_RM_OLD_RCV)) {
8534 vty_out(vty,
8535 " Outbound Route Filter (ORF) type (%d) Prefix-list:\n",
8536 ORF_TYPE_PREFIX_OLD);
8537 bgp_show_peer_afi_orf_cap(
8538 vty, p, afi, safi, PEER_CAP_ORF_PREFIX_SM_ADV,
8539 PEER_CAP_ORF_PREFIX_RM_ADV,
8540 PEER_CAP_ORF_PREFIX_SM_OLD_RCV,
8541 PEER_CAP_ORF_PREFIX_RM_OLD_RCV, use_json, NULL);
8542 }
8543
8544 sprintf(orf_pfx_name, "%s.%d.%d", p->host, afi, safi);
8545 orf_pfx_count = prefix_bgp_show_prefix_list(
8546 NULL, afi, orf_pfx_name, use_json);
8547
8548 if (CHECK_FLAG(p->af_sflags[afi][safi],
8549 PEER_STATUS_ORF_PREFIX_SEND)
8550 || orf_pfx_count) {
8551 vty_out(vty, " Outbound Route Filter (ORF):");
8552 if (CHECK_FLAG(p->af_sflags[afi][safi],
8553 PEER_STATUS_ORF_PREFIX_SEND))
8554 vty_out(vty, " sent;");
8555 if (orf_pfx_count)
8556 vty_out(vty, " received (%d entries)",
8557 orf_pfx_count);
8558 vty_out(vty, "\n");
8559 }
8560 if (CHECK_FLAG(p->af_sflags[afi][safi],
8561 PEER_STATUS_ORF_WAIT_REFRESH))
8562 vty_out(vty,
8563 " First update is deferred until ORF or ROUTE-REFRESH is received\n");
8564
8565 if (CHECK_FLAG(p->af_flags[afi][safi],
8566 PEER_FLAG_REFLECTOR_CLIENT))
8567 vty_out(vty, " Route-Reflector Client\n");
8568 if (CHECK_FLAG(p->af_flags[afi][safi],
8569 PEER_FLAG_RSERVER_CLIENT))
8570 vty_out(vty, " Route-Server Client\n");
8571 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_SOFT_RECONFIG))
8572 vty_out(vty,
8573 " Inbound soft reconfiguration allowed\n");
8574
8575 if (CHECK_FLAG(p->af_flags[afi][safi],
8576 PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE))
8577 vty_out(vty,
8578 " Private AS numbers (all) replaced in updates to this neighbor\n");
8579 else if (CHECK_FLAG(p->af_flags[afi][safi],
8580 PEER_FLAG_REMOVE_PRIVATE_AS_REPLACE))
8581 vty_out(vty,
8582 " Private AS numbers replaced in updates to this neighbor\n");
8583 else if (CHECK_FLAG(p->af_flags[afi][safi],
8584 PEER_FLAG_REMOVE_PRIVATE_AS_ALL))
8585 vty_out(vty,
8586 " Private AS numbers (all) removed in updates to this neighbor\n");
8587 else if (CHECK_FLAG(p->af_flags[afi][safi],
8588 PEER_FLAG_REMOVE_PRIVATE_AS))
8589 vty_out(vty,
8590 " Private AS numbers removed in updates to this neighbor\n");
8591
8592 if (CHECK_FLAG(p->af_flags[afi][safi],
8593 PEER_FLAG_ADDPATH_TX_ALL_PATHS))
8594 vty_out(vty, " Advertise all paths via addpath\n");
8595
8596 if (CHECK_FLAG(p->af_flags[afi][safi],
8597 PEER_FLAG_ADDPATH_TX_BESTPATH_PER_AS))
8598 vty_out(vty,
8599 " Advertise bestpath per AS via addpath\n");
8600
8601 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_AS_OVERRIDE))
8602 vty_out(vty,
8603 " Override ASNs in outbound updates if aspath equals remote-as\n");
8604
8605 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_NEXTHOP_SELF)
8606 || CHECK_FLAG(p->af_flags[afi][safi],
8607 PEER_FLAG_FORCE_NEXTHOP_SELF))
8608 vty_out(vty, " NEXT_HOP is always this router\n");
8609 if (CHECK_FLAG(p->af_flags[afi][safi],
8610 PEER_FLAG_AS_PATH_UNCHANGED))
8611 vty_out(vty,
8612 " AS_PATH is propagated unchanged to this neighbor\n");
8613 if (CHECK_FLAG(p->af_flags[afi][safi],
8614 PEER_FLAG_NEXTHOP_UNCHANGED))
8615 vty_out(vty,
8616 " NEXT_HOP is propagated unchanged to this neighbor\n");
8617 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_MED_UNCHANGED))
8618 vty_out(vty,
8619 " MED is propagated unchanged to this neighbor\n");
8620 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_SEND_COMMUNITY)
8621 || CHECK_FLAG(p->af_flags[afi][safi],
8622 PEER_FLAG_SEND_EXT_COMMUNITY)
8623 || CHECK_FLAG(p->af_flags[afi][safi],
8624 PEER_FLAG_SEND_LARGE_COMMUNITY)) {
8625 vty_out(vty,
8626 " Community attribute sent to this neighbor");
8627 if (CHECK_FLAG(p->af_flags[afi][safi],
8628 PEER_FLAG_SEND_COMMUNITY)
8629 && CHECK_FLAG(p->af_flags[afi][safi],
8630 PEER_FLAG_SEND_EXT_COMMUNITY)
8631 && CHECK_FLAG(p->af_flags[afi][safi],
8632 PEER_FLAG_SEND_LARGE_COMMUNITY))
8633 vty_out(vty, "(all)\n");
8634 else if (CHECK_FLAG(p->af_flags[afi][safi],
8635 PEER_FLAG_SEND_LARGE_COMMUNITY))
8636 vty_out(vty, "(large)\n");
8637 else if (CHECK_FLAG(p->af_flags[afi][safi],
8638 PEER_FLAG_SEND_EXT_COMMUNITY))
8639 vty_out(vty, "(extended)\n");
8640 else
8641 vty_out(vty, "(standard)\n");
8642 }
8643 if (CHECK_FLAG(p->af_flags[afi][safi],
8644 PEER_FLAG_DEFAULT_ORIGINATE)) {
8645 vty_out(vty, " Default information originate,");
8646
8647 if (p->default_rmap[afi][safi].name)
8648 vty_out(vty, " default route-map %s%s,",
8649 p->default_rmap[afi][safi].map ? "*"
8650 : "",
8651 p->default_rmap[afi][safi].name);
8652 if (paf && PAF_SUBGRP(paf)
8653 && CHECK_FLAG(PAF_SUBGRP(paf)->sflags,
8654 SUBGRP_STATUS_DEFAULT_ORIGINATE))
8655 vty_out(vty, " default sent\n");
8656 else
8657 vty_out(vty, " default not sent\n");
8658 }
8659
dff8f48d
MK		 8660 /* advertise-vni-all */
8661 if (afi == AFI_L2VPN && safi == SAFI_EVPN) {
94c2f693 8662 if (is_evpn_enabled())
dff8f48d
MK		 8663 vty_out(vty, " advertise-all-vni\n");
8664 }
8665
d62a17ae 8666 if (filter->plist[FILTER_IN].name
8667 || filter->dlist[FILTER_IN].name
8668 || filter->aslist[FILTER_IN].name
8669 || filter->map[RMAP_IN].name)
8670 vty_out(vty, " Inbound path policy configured\n");
8671 if (filter->plist[FILTER_OUT].name
8672 || filter->dlist[FILTER_OUT].name
8673 || filter->aslist[FILTER_OUT].name
8674 || filter->map[RMAP_OUT].name || filter->usmap.name)
8675 vty_out(vty, " Outbound path policy configured\n");
8676
8677 /* prefix-list */
8678 if (filter->plist[FILTER_IN].name)
8679 vty_out(vty,
8680 " Incoming update prefix filter list is %s%s\n",
8681 filter->plist[FILTER_IN].plist ? "*" : "",
8682 filter->plist[FILTER_IN].name);
8683 if (filter->plist[FILTER_OUT].name)
8684 vty_out(vty,
8685 " Outgoing update prefix filter list is %s%s\n",
8686 filter->plist[FILTER_OUT].plist ? "*" : "",
8687 filter->plist[FILTER_OUT].name);
8688
8689 /* distribute-list */
8690 if (filter->dlist[FILTER_IN].name)
8691 vty_out(vty,
8692 " Incoming update network filter list is %s%s\n",
8693 filter->dlist[FILTER_IN].alist ? "*" : "",
8694 filter->dlist[FILTER_IN].name);
8695 if (filter->dlist[FILTER_OUT].name)
8696 vty_out(vty,
8697 " Outgoing update network filter list is %s%s\n",
8698 filter->dlist[FILTER_OUT].alist ? "*" : "",
8699 filter->dlist[FILTER_OUT].name);
8700
8701 /* filter-list. */
8702 if (filter->aslist[FILTER_IN].name)
8703 vty_out(vty,
8704 " Incoming update AS path filter list is %s%s\n",
8705 filter->aslist[FILTER_IN].aslist ? "*" : "",
8706 filter->aslist[FILTER_IN].name);
8707 if (filter->aslist[FILTER_OUT].name)
8708 vty_out(vty,
8709 " Outgoing update AS path filter list is %s%s\n",
8710 filter->aslist[FILTER_OUT].aslist ? "*" : "",
8711 filter->aslist[FILTER_OUT].name);
8712
8713 /* route-map. */
8714 if (filter->map[RMAP_IN].name)
8715 vty_out(vty,
8716 " Route map for incoming advertisements is %s%s\n",
8717 filter->map[RMAP_IN].map ? "*" : "",
8718 filter->map[RMAP_IN].name);
8719 if (filter->map[RMAP_OUT].name)
8720 vty_out(vty,
8721 " Route map for outgoing advertisements is %s%s\n",
8722 filter->map[RMAP_OUT].map ? "*" : "",
8723 filter->map[RMAP_OUT].name);
8724
8725 /* unsuppress-map */
8726 if (filter->usmap.name)
8727 vty_out(vty,
8728 " Route map for selective unsuppress is %s%s\n",
8729 filter->usmap.map ? "*" : "",
8730 filter->usmap.name);
8731
8732 /* Receive prefix count */
8733 vty_out(vty, " %ld accepted prefixes\n", p->pcount[afi][safi]);
8734
8735 /* Maximum prefix */
8736 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_MAX_PREFIX)) {
8737 vty_out(vty, " Maximum prefixes allowed %ld%s\n",
8738 p->pmax[afi][safi],
8739 CHECK_FLAG(p->af_flags[afi][safi],
8740 PEER_FLAG_MAX_PREFIX_WARNING)
8741 ? " (warning-only)"
8742 : "");
8743 vty_out(vty, " Threshold for warning message %d%%",
8744 p->pmax_threshold[afi][safi]);
8745 if (p->pmax_restart[afi][safi])
8746 vty_out(vty, ", restart interval %d min",
8747 p->pmax_restart[afi][safi]);
8748 vty_out(vty, "\n");
8749 }
8750
8751 vty_out(vty, "\n");
8752 }
8753}
8754
d7c0a89a 8755static void bgp_show_peer(struct vty *vty, struct peer *p, uint8_t use_json,
d62a17ae 8756 json_object *json)
718e3744 8757{
d62a17ae 8758 struct bgp *bgp;
8759 char buf1[PREFIX2STR_BUFFER], buf[SU_ADDRSTRLEN];
8760 char timebuf[BGP_UPTIME_LEN];
8761 char dn_flag[2];
8762 const char *subcode_str;
8763 const char *code_str;
8764 afi_t afi;
8765 safi_t safi;
d7c0a89a
QY		 8766 uint16_t i;
8767 uint8_t *msg;
d62a17ae 8768 json_object *json_neigh = NULL;
8769 time_t epoch_tbuf;
718e3744 8770
d62a17ae 8771 bgp = p->bgp;
8772
8773 if (use_json)
8774 json_neigh = json_object_new_object();
8775
8776 memset(dn_flag, '\0', sizeof(dn_flag));
8777 if (!p->conf_if && peer_dynamic_neighbor(p))
8778 dn_flag[0] = '*';
8779
8780 if (!use_json) {
8781 if (p->conf_if) /* Configured interface name. */
8782 vty_out(vty, "BGP neighbor on %s: %s, ", p->conf_if,
8783 BGP_PEER_SU_UNSPEC(p)
8784 ? "None"
8785 : sockunion2str(&p->su, buf,
8786 SU_ADDRSTRLEN));
8787 else /* Configured IP address. */
8788 vty_out(vty, "BGP neighbor is %s%s, ", dn_flag,
8789 p->host);
8790 }
8791
8792 if (use_json) {
8793 if (p->conf_if && BGP_PEER_SU_UNSPEC(p))
8794 json_object_string_add(json_neigh, "bgpNeighborAddr",
8795 "none");
8796 else if (p->conf_if && !BGP_PEER_SU_UNSPEC(p))
8797 json_object_string_add(
8798 json_neigh, "bgpNeighborAddr",
8799 sockunion2str(&p->su, buf, SU_ADDRSTRLEN));
8800
8801 json_object_int_add(json_neigh, "remoteAs", p->as);
8802
8803 if (p->change_local_as)
8804 json_object_int_add(json_neigh, "localAs",
8805 p->change_local_as);
8806 else
8807 json_object_int_add(json_neigh, "localAs", p->local_as);
8808
8809 if (CHECK_FLAG(p->flags, PEER_FLAG_LOCAL_AS_NO_PREPEND))
8810 json_object_boolean_true_add(json_neigh,
8811 "localAsNoPrepend");
8812
8813 if (CHECK_FLAG(p->flags, PEER_FLAG_LOCAL_AS_REPLACE_AS))
8814 json_object_boolean_true_add(json_neigh,
8815 "localAsReplaceAs");
8816 } else {
8817 if ((p->as_type == AS_SPECIFIED) || (p->as_type == AS_EXTERNAL)
8818 || (p->as_type == AS_INTERNAL))
8819 vty_out(vty, "remote AS %u, ", p->as);
8820 else
8821 vty_out(vty, "remote AS Unspecified, ");
8822 vty_out(vty, "local AS %u%s%s, ",
8823 p->change_local_as ? p->change_local_as : p->local_as,
8824 CHECK_FLAG(p->flags, PEER_FLAG_LOCAL_AS_NO_PREPEND)
8825 ? " no-prepend"
8826 : "",
8827 CHECK_FLAG(p->flags, PEER_FLAG_LOCAL_AS_REPLACE_AS)
8828 ? " replace-as"
8829 : "");
8830 }
8831 /* peer type internal, external, confed-internal or confed-external */
8832 if (p->as == p->local_as) {
8833 if (use_json) {
8834 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION))
8835 json_object_boolean_true_add(
8836 json_neigh, "nbrConfedInternalLink");
8837 else
8838 json_object_boolean_true_add(json_neigh,
8839 "nbrInternalLink");
8840 } else {
8841 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION))
8842 vty_out(vty, "confed-internal link\n");
8843 else
8844 vty_out(vty, "internal link\n");
8845 }
8846 } else {
8847 if (use_json) {
8848 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION))
8849 json_object_boolean_true_add(
8850 json_neigh, "nbrConfedExternalLink");
8851 else
8852 json_object_boolean_true_add(json_neigh,
8853 "nbrExternalLink");
8854 } else {
8855 if (bgp_confederation_peers_check(bgp, p->as))
8856 vty_out(vty, "confed-external link\n");
8857 else
8858 vty_out(vty, "external link\n");
8859 }
8860 }
8861
8862 /* Description. */
8863 if (p->desc) {
8864 if (use_json)
8865 json_object_string_add(json_neigh, "nbrDesc", p->desc);
8866 else
8867 vty_out(vty, " Description: %s\n", p->desc);
8868 }
8869
8870 if (p->hostname) {
8871 if (use_json) {
8872 if (p->hostname)
8873 json_object_string_add(json_neigh, "hostname",
8874 p->hostname);
8875
8876 if (p->domainname)
8877 json_object_string_add(json_neigh, "domainname",
8878 p->domainname);
8879 } else {
8880 if (p->domainname && (p->domainname[0] != '\0'))
8881 vty_out(vty, "Hostname: %s.%s\n", p->hostname,
8882 p->domainname);
8883 else
8884 vty_out(vty, "Hostname: %s\n", p->hostname);
8885 }
8886 }
8887
8888 /* Peer-group */
8889 if (p->group) {
8890 if (use_json) {
8891 json_object_string_add(json_neigh, "peerGroup",
8892 p->group->name);
8893
8894 if (dn_flag[0]) {
8895 struct prefix prefix, *range = NULL;
8896
8897 sockunion2hostprefix(&(p->su), &prefix);
8898 range = peer_group_lookup_dynamic_neighbor_range(
8899 p->group, &prefix);
8900
8901 if (range) {
8902 prefix2str(range, buf1, sizeof(buf1));
8903 json_object_string_add(
8904 json_neigh,
8905 "peerSubnetRangeGroup", buf1);
8906 }
8907 }
8908 } else {
8909 vty_out(vty,
8910 " Member of peer-group %s for session parameters\n",
8911 p->group->name);
8912
8913 if (dn_flag[0]) {
8914 struct prefix prefix, *range = NULL;
8915
8916 sockunion2hostprefix(&(p->su), &prefix);
8917 range = peer_group_lookup_dynamic_neighbor_range(
8918 p->group, &prefix);
8919
8920 if (range) {
8921 prefix2str(range, buf1, sizeof(buf1));
8922 vty_out(vty,
8923 " Belongs to the subnet range group: %s\n",
8924 buf1);
8925 }
8926 }
8927 }
8928 }
8929
8930 if (use_json) {
8931 /* Administrative shutdown. */
8932 if (CHECK_FLAG(p->flags, PEER_FLAG_SHUTDOWN))
8933 json_object_boolean_true_add(json_neigh,
8934 "adminShutDown");
8935
8936 /* BGP Version. */
8937 json_object_int_add(json_neigh, "bgpVersion", 4);
8938 json_object_string_add(
8939 json_neigh, "remoteRouterId",
8940 inet_ntop(AF_INET, &p->remote_id, buf1, sizeof(buf1)));
8941
8942 /* Confederation */
8943 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION)
8944 && bgp_confederation_peers_check(bgp, p->as))
8945 json_object_boolean_true_add(json_neigh,
8946 "nbrCommonAdmin");
8947
8948 /* Status. */
8949 json_object_string_add(
8950 json_neigh, "bgpState",
8951 lookup_msg(bgp_status_msg, p->status, NULL));
8952
8953 if (p->status == Established) {
8954 time_t uptime;
d62a17ae 8955
8956 uptime = bgp_clock();
8957 uptime -= p->uptime;
d62a17ae 8958 epoch_tbuf = time(NULL) - uptime;
8959
e24be241 8960#if defined(VERSION_TYPE_DEV) && CONFDATE > 20200101
a4d82a8a
PZ		 8961 CPP_NOTICE(
8962 "bgpTimerUp should be deprecated and can be removed now");
d3c7efed
DS		 8963#endif
8964 /*
8965 * bgpTimerUp was miliseconds that was accurate
8966 * up to 1 day, then the value returned
8967 * became garbage. So in order to provide
8968 * some level of backwards compatability,
8969 * we still provde the data, but now
8970 * we are returning the correct value
8971 * and also adding a new bgpTimerUpMsec
8972 * which will allow us to deprecate
8973 * this eventually
8974 */
d62a17ae 8975 json_object_int_add(json_neigh, "bgpTimerUp",
e0330274 8976 uptime * 1000);
d3c7efed
DS		 8977 json_object_int_add(json_neigh, "bgpTimerUpMsec",
8978 uptime * 1000);
d62a17ae 8979 json_object_string_add(json_neigh, "bgpTimerUpString",
8980 peer_uptime(p->uptime, timebuf,
8981 BGP_UPTIME_LEN, 0,
8982 NULL));
8983 json_object_int_add(json_neigh,
8984 "bgpTimerUpEstablishedEpoch",
8985 epoch_tbuf);
8986 }
8987
8988 else if (p->status == Active) {
8989 if (CHECK_FLAG(p->flags, PEER_FLAG_PASSIVE))
8990 json_object_string_add(json_neigh, "bgpStateIs",
8991 "passive");
8992 else if (CHECK_FLAG(p->sflags, PEER_STATUS_NSF_WAIT))
8993 json_object_string_add(json_neigh, "bgpStateIs",
8994 "passiveNSF");
8995 }
8996
8997 /* read timer */
8998 time_t uptime;
8999 struct tm *tm;
9000
9001 uptime = bgp_clock();
9002 uptime -= p->readtime;
9003 tm = gmtime(&uptime);
9004 json_object_int_add(json_neigh, "bgpTimerLastRead",
9005 (tm->tm_sec * 1000) + (tm->tm_min * 60000)
9006 + (tm->tm_hour * 3600000));
9007
9008 uptime = bgp_clock();
9009 uptime -= p->last_write;
9010 tm = gmtime(&uptime);
9011 json_object_int_add(json_neigh, "bgpTimerLastWrite",
9012 (tm->tm_sec * 1000) + (tm->tm_min * 60000)
9013 + (tm->tm_hour * 3600000));
9014
9015 uptime = bgp_clock();
9016 uptime -= p->update_time;
9017 tm = gmtime(&uptime);
9018 json_object_int_add(json_neigh, "bgpInUpdateElapsedTimeMsecs",
9019 (tm->tm_sec * 1000) + (tm->tm_min * 60000)
9020 + (tm->tm_hour * 3600000));
9021
9022 /* Configured timer values. */
9023 json_object_int_add(json_neigh, "bgpTimerHoldTimeMsecs",
9024 p->v_holdtime * 1000);
9025 json_object_int_add(json_neigh,
9026 "bgpTimerKeepAliveIntervalMsecs",
9027 p->v_keepalive * 1000);
9028
d25e4efc 9029 if (PEER_OR_GROUP_TIMER_SET(p)) {
d62a17ae 9030 json_object_int_add(json_neigh,
9031 "bgpTimerConfiguredHoldTimeMsecs",
9032 p->holdtime * 1000);
9033 json_object_int_add(
9034 json_neigh,
9035 "bgpTimerConfiguredKeepAliveIntervalMsecs",
9036 p->keepalive * 1000);
d25e4efc 9037 } else if ((bgp->default_holdtime != BGP_DEFAULT_HOLDTIME)
a4d82a8a
PZ		 9038 || (bgp->default_keepalive
9039 != BGP_DEFAULT_KEEPALIVE)) {
d25e4efc
DS		 9040 json_object_int_add(json_neigh,
9041 "bgpTimerConfiguredHoldTimeMsecs",
9042 bgp->default_holdtime);
9043 json_object_int_add(
9044 json_neigh,
9045 "bgpTimerConfiguredKeepAliveIntervalMsecs",
9046 bgp->default_keepalive);
d62a17ae 9047 }
9048 } else {
9049 /* Administrative shutdown. */
9050 if (CHECK_FLAG(p->flags, PEER_FLAG_SHUTDOWN))
9051 vty_out(vty, " Administratively shut down\n");
9052
9053 /* BGP Version. */
9054 vty_out(vty, " BGP version 4");
9055 vty_out(vty, ", remote router ID %s\n",
9056 inet_ntop(AF_INET, &p->remote_id, buf1, sizeof(buf1)));
9057
9058 /* Confederation */
9059 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION)
9060 && bgp_confederation_peers_check(bgp, p->as))
9061 vty_out(vty,
9062 " Neighbor under common administration\n");
9063
9064 /* Status. */
9065 vty_out(vty, " BGP state = %s",
9066 lookup_msg(bgp_status_msg, p->status, NULL));
9067
9068 if (p->status == Established)
9069 vty_out(vty, ", up for %8s",
9070 peer_uptime(p->uptime, timebuf, BGP_UPTIME_LEN,
9071 0, NULL));
9072
9073 else if (p->status == Active) {
9074 if (CHECK_FLAG(p->flags, PEER_FLAG_PASSIVE))
9075 vty_out(vty, " (passive)");
9076 else if (CHECK_FLAG(p->sflags, PEER_STATUS_NSF_WAIT))
9077 vty_out(vty, " (NSF passive)");
9078 }
9079 vty_out(vty, "\n");
9080
9081 /* read timer */
9082 vty_out(vty, " Last read %s",
9083 peer_uptime(p->readtime, timebuf, BGP_UPTIME_LEN, 0,
9084 NULL));
9085 vty_out(vty, ", Last write %s\n",
9086 peer_uptime(p->last_write, timebuf, BGP_UPTIME_LEN, 0,
9087 NULL));
9088
9089 /* Configured timer values. */
9090 vty_out(vty,
9091 " Hold time is %d, keepalive interval is %d seconds\n",
9092 p->v_holdtime, p->v_keepalive);
d25e4efc 9093 if (PEER_OR_GROUP_TIMER_SET(p)) {
d62a17ae 9094 vty_out(vty, " Configured hold time is %d",
9095 p->holdtime);
9096 vty_out(vty, ", keepalive interval is %d seconds\n",
9097 p->keepalive);
d25e4efc 9098 } else if ((bgp->default_holdtime != BGP_DEFAULT_HOLDTIME)
a4d82a8a
PZ		 9099 || (bgp->default_keepalive
9100 != BGP_DEFAULT_KEEPALIVE)) {
d25e4efc
DS		 9101 vty_out(vty, " Configured hold time is %d",
9102 bgp->default_holdtime);
9103 vty_out(vty, ", keepalive interval is %d seconds\n",
9104 bgp->default_keepalive);
d62a17ae 9105 }
9106 }
9107 /* Capability. */
9108 if (p->status == Established) {
9109 if (p->cap || p->afc_adv[AFI_IP][SAFI_UNICAST]
9110 || p->afc_recv[AFI_IP][SAFI_UNICAST]
9111 || p->afc_adv[AFI_IP][SAFI_MULTICAST]
9112 || p->afc_recv[AFI_IP][SAFI_MULTICAST]
9113 || p->afc_adv[AFI_IP6][SAFI_UNICAST]
9114 || p->afc_recv[AFI_IP6][SAFI_UNICAST]
9115 || p->afc_adv[AFI_IP6][SAFI_MULTICAST]
9116 || p->afc_recv[AFI_IP6][SAFI_MULTICAST]
9117 || p->afc_adv[AFI_IP6][SAFI_MPLS_VPN]
9118 || p->afc_recv[AFI_IP6][SAFI_MPLS_VPN]
9119 || p->afc_adv[AFI_IP6][SAFI_ENCAP]
9120 || p->afc_recv[AFI_IP6][SAFI_ENCAP]
7c40bf39 9121 || p->afc_adv[AFI_IP6][SAFI_FLOWSPEC]
9122 || p->afc_recv[AFI_IP6][SAFI_FLOWSPEC]
d62a17ae 9123 || p->afc_adv[AFI_IP][SAFI_ENCAP]
9124 || p->afc_recv[AFI_IP][SAFI_ENCAP]
7c40bf39 9125 || p->afc_adv[AFI_IP][SAFI_FLOWSPEC]
9126 || p->afc_recv[AFI_IP][SAFI_FLOWSPEC]
d62a17ae 9127 || p->afc_adv[AFI_IP][SAFI_MPLS_VPN]
9128 || p->afc_recv[AFI_IP][SAFI_MPLS_VPN]) {
9129 if (use_json) {
9130 json_object *json_cap = NULL;
9131
9132 json_cap = json_object_new_object();
9133
9134 /* AS4 */
9135 if (CHECK_FLAG(p->cap, PEER_CAP_AS4_RCV)
9136 || CHECK_FLAG(p->cap, PEER_CAP_AS4_ADV)) {
9137 if (CHECK_FLAG(p->cap, PEER_CAP_AS4_ADV)
9138 && CHECK_FLAG(p->cap,
9139 PEER_CAP_AS4_RCV))
9140 json_object_string_add(
9141 json_cap, "4byteAs",
9142 "advertisedAndReceived");
9143 else if (CHECK_FLAG(p->cap,
9144 PEER_CAP_AS4_ADV))
9145 json_object_string_add(
9146 json_cap, "4byteAs",
9147 "advertised");
9148 else if (CHECK_FLAG(p->cap,
9149 PEER_CAP_AS4_RCV))
9150 json_object_string_add(
9151 json_cap, "4byteAs",
9152 "received");
9153 }
9154
9155 /* AddPath */
9156 if (CHECK_FLAG(p->cap, PEER_CAP_ADDPATH_RCV)
9157 || CHECK_FLAG(p->cap,
9158 PEER_CAP_ADDPATH_ADV)) {
9159 json_object *json_add = NULL;
9160 const char *print_store;
9161
9162 json_add = json_object_new_object();
9163
05c7a1cc
QY		 9164 FOREACH_AFI_SAFI (afi, safi) {
9165 json_object *json_sub = NULL;
9166 json_sub =
9167 json_object_new_object();
9168 print_store = afi_safi_print(
9169 afi, safi);
d62a17ae 9170
05c7a1cc
QY		 9171 if (CHECK_FLAG(
9172 p->af_cap[afi]
9173 [safi],
9174 PEER_CAP_ADDPATH_AF_TX_ADV)
9175 || CHECK_FLAG(
9176 p->af_cap[afi]
9177 [safi],
9178 PEER_CAP_ADDPATH_AF_TX_RCV)) {
d62a17ae 9179 if (CHECK_FLAG(
9180 p->af_cap
9181 [afi]
9182 [safi],
9183 PEER_CAP_ADDPATH_AF_TX_ADV)
05c7a1cc 9184 && CHECK_FLAG(
d62a17ae 9185 p->af_cap
9186 [afi]
9187 [safi],
05c7a1cc
QY		 9188 PEER_CAP_ADDPATH_AF_TX_RCV))
9189 json_object_boolean_true_add(
9190 json_sub,
9191 "txAdvertisedAndReceived");
9192 else if (
9193 CHECK_FLAG(
9194 p->af_cap
9195 [afi]
9196 [safi],
9197 PEER_CAP_ADDPATH_AF_TX_ADV))
9198 json_object_boolean_true_add(
9199 json_sub,
9200 "txAdvertised");
9201 else if (
9202 CHECK_FLAG(
9203 p->af_cap
9204 [afi]
9205 [safi],
9206 PEER_CAP_ADDPATH_AF_TX_RCV))
9207 json_object_boolean_true_add(
9208 json_sub,
9209 "txReceived");
9210 }
d62a17ae 9211
05c7a1cc
QY		 9212 if (CHECK_FLAG(
9213 p->af_cap[afi]
9214 [safi],
9215 PEER_CAP_ADDPATH_AF_RX_ADV)
9216 || CHECK_FLAG(
9217 p->af_cap[afi]
9218 [safi],
9219 PEER_CAP_ADDPATH_AF_RX_RCV)) {
d62a17ae 9220 if (CHECK_FLAG(
9221 p->af_cap
9222 [afi]
9223 [safi],
9224 PEER_CAP_ADDPATH_AF_RX_ADV)
05c7a1cc 9225 && CHECK_FLAG(
d62a17ae 9226 p->af_cap
9227 [afi]
9228 [safi],
9229 PEER_CAP_ADDPATH_AF_RX_RCV))
05c7a1cc
QY		 9230 json_object_boolean_true_add(
9231 json_sub,
9232 "rxAdvertisedAndReceived");
9233 else if (
9234 CHECK_FLAG(
9235 p->af_cap
9236 [afi]
9237 [safi],
9238 PEER_CAP_ADDPATH_AF_RX_ADV))
9239 json_object_boolean_true_add(
9240 json_sub,
9241 "rxAdvertised");
9242 else if (
9243 CHECK_FLAG(
9244 p->af_cap
9245 [afi]
9246 [safi],
9247 PEER_CAP_ADDPATH_AF_RX_RCV))
9248 json_object_boolean_true_add(
9249 json_sub,
9250 "rxReceived");
d62a17ae 9251 }
9252
05c7a1cc
QY		 9253 if (CHECK_FLAG(
9254 p->af_cap[afi]
9255 [safi],
9256 PEER_CAP_ADDPATH_AF_TX_ADV)
9257 || CHECK_FLAG(
9258 p->af_cap[afi]
9259 [safi],
9260 PEER_CAP_ADDPATH_AF_TX_RCV)
9261 || CHECK_FLAG(
9262 p->af_cap[afi]
9263 [safi],
9264 PEER_CAP_ADDPATH_AF_RX_ADV)
9265 || CHECK_FLAG(
9266 p->af_cap[afi]
9267 [safi],
9268 PEER_CAP_ADDPATH_AF_RX_RCV))
9269 json_object_object_add(
9270 json_add,
9271 print_store,
9272 json_sub);
9273 else
9274 json_object_free(
9275 json_sub);
9276 }
9277
d62a17ae 9278 json_object_object_add(
9279 json_cap, "addPath", json_add);
9280 }
9281
9282 /* Dynamic */
9283 if (CHECK_FLAG(p->cap, PEER_CAP_DYNAMIC_RCV)
9284 || CHECK_FLAG(p->cap,
9285 PEER_CAP_DYNAMIC_ADV)) {
9286 if (CHECK_FLAG(p->cap,
9287 PEER_CAP_DYNAMIC_ADV)
9288 && CHECK_FLAG(p->cap,
9289 PEER_CAP_DYNAMIC_RCV))
9290 json_object_string_add(
9291 json_cap, "dynamic",
9292 "advertisedAndReceived");
9293 else if (CHECK_FLAG(
9294 p->cap,
9295 PEER_CAP_DYNAMIC_ADV))
9296 json_object_string_add(
9297 json_cap, "dynamic",
9298 "advertised");
9299 else if (CHECK_FLAG(
9300 p->cap,
9301 PEER_CAP_DYNAMIC_RCV))
9302 json_object_string_add(
9303 json_cap, "dynamic",
9304 "received");
9305 }
9306
9307 /* Extended nexthop */
9308 if (CHECK_FLAG(p->cap, PEER_CAP_ENHE_RCV)
9309 || CHECK_FLAG(p->cap, PEER_CAP_ENHE_ADV)) {
9310 json_object *json_nxt = NULL;
9311 const char *print_store;
9312
9313
9314 if (CHECK_FLAG(p->cap,
9315 PEER_CAP_ENHE_ADV)
9316 && CHECK_FLAG(p->cap,
9317 PEER_CAP_ENHE_RCV))
9318 json_object_string_add(
9319 json_cap,
9320 "extendedNexthop",
9321 "advertisedAndReceived");
9322 else if (CHECK_FLAG(p->cap,
9323 PEER_CAP_ENHE_ADV))
9324 json_object_string_add(
9325 json_cap,
9326 "extendedNexthop",
9327 "advertised");
9328 else if (CHECK_FLAG(p->cap,
9329 PEER_CAP_ENHE_RCV))
9330 json_object_string_add(
9331 json_cap,
9332 "extendedNexthop",
9333 "received");
9334
9335 if (CHECK_FLAG(p->cap,
9336 PEER_CAP_ENHE_RCV)) {
9337 json_nxt =
9338 json_object_new_object();
9339
9340 for (safi = SAFI_UNICAST;
9341 safi < SAFI_MAX; safi++) {
9342 if (CHECK_FLAG(
9343 p->af_cap
9344 [AFI_IP]
9345 [safi],
9346 PEER_CAP_ENHE_AF_RCV)) {
9347 print_store = afi_safi_print(
9348 AFI_IP,
9349 safi);
9350 json_object_string_add(
9351 json_nxt,
9352 print_store,
9353 "recieved");
9354 }
9355 }
9356 json_object_object_add(
9357 json_cap,
9358 "extendedNexthopFamililesByPeer",
9359 json_nxt);
9360 }
9361 }
9362
9363 /* Route Refresh */
9364 if (CHECK_FLAG(p->cap, PEER_CAP_REFRESH_ADV)
9365 || CHECK_FLAG(p->cap,
9366 PEER_CAP_REFRESH_NEW_RCV)
9367 || CHECK_FLAG(p->cap,
9368 PEER_CAP_REFRESH_OLD_RCV)) {
9369 if (CHECK_FLAG(p->cap,
9370 PEER_CAP_REFRESH_ADV)
9371 && (CHECK_FLAG(
9372 p->cap,
9373 PEER_CAP_REFRESH_NEW_RCV)
9374 || CHECK_FLAG(
9375 p->cap,
9376 PEER_CAP_REFRESH_OLD_RCV))) {
9377 if (CHECK_FLAG(
9378 p->cap,
9379 PEER_CAP_REFRESH_OLD_RCV)
9380 && CHECK_FLAG(
9381 p->cap,
9382 PEER_CAP_REFRESH_NEW_RCV))
9383 json_object_string_add(
9384 json_cap,
9385 "routeRefresh",
9386 "advertisedAndReceivedOldNew");
9387 else {
9388 if (CHECK_FLAG(
9389 p->cap,
9390 PEER_CAP_REFRESH_OLD_RCV))
9391 json_object_string_add(
9392 json_cap,
9393 "routeRefresh",
9394 "advertisedAndReceivedOld");
9395 else
9396 json_object_string_add(
9397 json_cap,
9398 "routeRefresh",
9399 "advertisedAndReceivedNew");
9400 }
9401 } else if (
9402 CHECK_FLAG(
9403 p->cap,
9404 PEER_CAP_REFRESH_ADV))
9405 json_object_string_add(
9406 json_cap,
9407 "routeRefresh",
9408 "advertised");
9409 else if (
9410 CHECK_FLAG(
9411 p->cap,
9412 PEER_CAP_REFRESH_NEW_RCV)
9413 || CHECK_FLAG(
9414 p->cap,
9415 PEER_CAP_REFRESH_OLD_RCV))
9416 json_object_string_add(
9417 json_cap,
9418 "routeRefresh",
9419 "received");
9420 }
9421
9422 /* Multiprotocol Extensions */
9423 json_object *json_multi = NULL;
9424 json_multi = json_object_new_object();
9425
05c7a1cc
QY		 9426 FOREACH_AFI_SAFI (afi, safi) {
9427 if (p->afc_adv[afi][safi]
9428 || p->afc_recv[afi][safi]) {
9429 json_object *json_exten = NULL;
9430 json_exten =
9431 json_object_new_object();
9432
d62a17ae 9433 if (p->afc_adv[afi][safi]
05c7a1cc
QY		 9434 && p->afc_recv[afi][safi])
9435 json_object_boolean_true_add(
9436 json_exten,
9437 "advertisedAndReceived");
9438 else if (p->afc_adv[afi][safi])
9439 json_object_boolean_true_add(
9440 json_exten,
9441 "advertised");
9442 else if (p->afc_recv[afi][safi])
9443 json_object_boolean_true_add(
9444 json_exten,
9445 "received");
d62a17ae 9446
05c7a1cc
QY		 9447 json_object_object_add(
9448 json_multi,
9449 afi_safi_print(afi,
9450 safi),
9451 json_exten);
d62a17ae 9452 }
9453 }
9454 json_object_object_add(
9455 json_cap, "multiprotocolExtensions",
9456 json_multi);
9457
d77114b7 9458 /* Hostname capabilities */
60466a63 9459 json_object *json_hname = NULL;
d77114b7
MK		 9460
9461 json_hname = json_object_new_object();
9462
9463 if (CHECK_FLAG(p->cap, PEER_CAP_HOSTNAME_ADV)) {
9464 json_object_string_add(
60466a63
QY		 9465 json_hname, "advHostName",
9466 bgp->peer_self->hostname
9467 ? bgp->peer_self
9468 ->hostname
d77114b7
MK		 9469 : "n/a");
9470 json_object_string_add(
60466a63
QY		 9471 json_hname, "advDomainName",
9472 bgp->peer_self->domainname
9473 ? bgp->peer_self
9474 ->domainname
d77114b7
MK		 9475 : "n/a");
9476 }
9477
9478
9479 if (CHECK_FLAG(p->cap, PEER_CAP_HOSTNAME_RCV)) {
9480 json_object_string_add(
60466a63
QY		 9481 json_hname, "rcvHostName",
9482 p->hostname ? p->hostname
9483 : "n/a");
d77114b7 9484 json_object_string_add(
60466a63
QY		 9485 json_hname, "rcvDomainName",
9486 p->domainname ? p->domainname
9487 : "n/a");
d77114b7
MK		 9488 }
9489
60466a63 9490 json_object_object_add(json_cap, "hostName",
d77114b7
MK		 9491 json_hname);
9492
d62a17ae 9493 /* Gracefull Restart */
9494 if (CHECK_FLAG(p->cap, PEER_CAP_RESTART_RCV)
9495 || CHECK_FLAG(p->cap,
9496 PEER_CAP_RESTART_ADV)) {
9497 if (CHECK_FLAG(p->cap,
9498 PEER_CAP_RESTART_ADV)
9499 && CHECK_FLAG(p->cap,
9500 PEER_CAP_RESTART_RCV))
9501 json_object_string_add(
9502 json_cap,
9503 "gracefulRestart",
9504 "advertisedAndReceived");
9505 else if (CHECK_FLAG(
9506 p->cap,
9507 PEER_CAP_RESTART_ADV))
9508 json_object_string_add(
9509 json_cap,
9510 "gracefulRestartCapability",
9511 "advertised");
9512 else if (CHECK_FLAG(
9513 p->cap,
9514 PEER_CAP_RESTART_RCV))
9515 json_object_string_add(
9516 json_cap,
9517 "gracefulRestartCapability",
9518 "received");
9519
9520 if (CHECK_FLAG(p->cap,
9521 PEER_CAP_RESTART_RCV)) {
9522 int restart_af_count = 0;
9523 json_object *json_restart =
9524 NULL;
9525 json_restart =
9526 json_object_new_object();
9527
9528 json_object_int_add(
9529 json_cap,
9530 "gracefulRestartRemoteTimerMsecs",
9531 p->v_gr_restart * 1000);
9532
05c7a1cc
QY		 9533 FOREACH_AFI_SAFI (afi, safi) {
9534 if (CHECK_FLAG(
9535 p->af_cap
9536 [afi]
9537 [safi],
9538 PEER_CAP_RESTART_AF_RCV)) {
9539 json_object *
9540 json_sub =
9541 NULL;
9542 json_sub =
9543 json_object_new_object();
9544
d62a17ae 9545 if (CHECK_FLAG(
9546 p->af_cap
9547 [afi]
9548 [safi],
05c7a1cc
QY		 9549 PEER_CAP_RESTART_AF_PRESERVE_RCV))
9550 json_object_boolean_true_add(
9551 json_sub,
9552 "preserved");
9553 restart_af_count++;
9554 json_object_object_add(
9555 json_restart,
9556 afi_safi_print(
9557 afi,
9558 safi),
9559 json_sub);
d62a17ae 9560 }
9561 }
9562 if (!restart_af_count) {
9563 json_object_string_add(
9564 json_cap,
9565 "addressFamiliesByPeer",
9566 "none");
9567 json_object_free(
9568 json_restart);
9569 } else
9570 json_object_object_add(
9571 json_cap,
9572 "addressFamiliesByPeer",
9573 json_restart);
9574 }
9575 }
9576 json_object_object_add(json_neigh,
9577 "neighborCapabilities",
9578 json_cap);
9579 } else {
9580 vty_out(vty, " Neighbor capabilities:\n");
9581
9582 /* AS4 */
9583 if (CHECK_FLAG(p->cap, PEER_CAP_AS4_RCV)
9584 || CHECK_FLAG(p->cap, PEER_CAP_AS4_ADV)) {
9585 vty_out(vty, " 4 Byte AS:");
9586 if (CHECK_FLAG(p->cap,
9587 PEER_CAP_AS4_ADV))
9588 vty_out(vty, " advertised");
9589 if (CHECK_FLAG(p->cap,
9590 PEER_CAP_AS4_RCV))
9591 vty_out(vty, " %sreceived",
9592 CHECK_FLAG(
9593 p->cap,
9594 PEER_CAP_AS4_ADV)
9595 ? "and "
9596 : "");
9597 vty_out(vty, "\n");
9598 }
9599
9600 /* AddPath */
9601 if (CHECK_FLAG(p->cap, PEER_CAP_ADDPATH_RCV)
9602 || CHECK_FLAG(p->cap,
9603 PEER_CAP_ADDPATH_ADV)) {
9604 vty_out(vty, " AddPath:\n");
9605
05c7a1cc
QY		 9606 FOREACH_AFI_SAFI (afi, safi) {
9607 if (CHECK_FLAG(
9608 p->af_cap[afi]
9609 [safi],
9610 PEER_CAP_ADDPATH_AF_TX_ADV)
9611 || CHECK_FLAG(
9612 p->af_cap[afi]
9613 [safi],
9614 PEER_CAP_ADDPATH_AF_TX_RCV)) {
9615 vty_out(vty,
9616 " %s: TX ",
9617 afi_safi_print(
9618 afi,
9619 safi));
9620
d62a17ae 9621 if (CHECK_FLAG(
9622 p->af_cap
9623 [afi]
9624 [safi],
05c7a1cc 9625 PEER_CAP_ADDPATH_AF_TX_ADV))
d62a17ae 9626 vty_out(vty,
05c7a1cc 9627 "advertised %s",
d62a17ae 9628 afi_safi_print(
9629 afi,
9630 safi));
9631
05c7a1cc
QY		 9632 if (CHECK_FLAG(
9633 p->af_cap
9634 [afi]
9635 [safi],
9636 PEER_CAP_ADDPATH_AF_TX_RCV))
9637 vty_out(vty,
9638 "%sreceived",
9639 CHECK_FLAG(
9640 p->af_cap
9641 [afi]
9642 [safi],
9643 PEER_CAP_ADDPATH_AF_TX_ADV)
9644 ? " and "
9645 : "");
d62a17ae 9646
05c7a1cc
QY		 9647 vty_out(vty, "\n");
9648 }
d62a17ae 9649
05c7a1cc
QY		 9650 if (CHECK_FLAG(
9651 p->af_cap[afi]
9652 [safi],
9653 PEER_CAP_ADDPATH_AF_RX_ADV)
9654 || CHECK_FLAG(
9655 p->af_cap[afi]
9656 [safi],
9657 PEER_CAP_ADDPATH_AF_RX_RCV)) {
9658 vty_out(vty,
9659 " %s: RX ",
9660 afi_safi_print(
9661 afi,
9662 safi));
d62a17ae 9663
9664 if (CHECK_FLAG(
9665 p->af_cap
9666 [afi]
9667 [safi],
05c7a1cc 9668 PEER_CAP_ADDPATH_AF_RX_ADV))
d62a17ae 9669 vty_out(vty,
05c7a1cc 9670 "advertised %s",
d62a17ae 9671 afi_safi_print(
9672 afi,
9673 safi));
9674
05c7a1cc
QY		 9675 if (CHECK_FLAG(
9676 p->af_cap
9677 [afi]
9678 [safi],
9679 PEER_CAP_ADDPATH_AF_RX_RCV))
d62a17ae 9680 vty_out(vty,
05c7a1cc
QY		 9681 "%sreceived",
9682 CHECK_FLAG(
9683 p->af_cap
9684 [afi]
9685 [safi],
9686 PEER_CAP_ADDPATH_AF_RX_ADV)
9687 ? " and "
9688 : "");
9689
9690 vty_out(vty, "\n");
d62a17ae 9691 }
05c7a1cc 9692 }
d62a17ae 9693 }
9694
9695 /* Dynamic */
9696 if (CHECK_FLAG(p->cap, PEER_CAP_DYNAMIC_RCV)
9697 || CHECK_FLAG(p->cap,
9698 PEER_CAP_DYNAMIC_ADV)) {
9699 vty_out(vty, " Dynamic:");
9700 if (CHECK_FLAG(p->cap,
9701 PEER_CAP_DYNAMIC_ADV))
9702 vty_out(vty, " advertised");
9703 if (CHECK_FLAG(p->cap,
9704 PEER_CAP_DYNAMIC_RCV))
9705 vty_out(vty, " %sreceived",
9706 CHECK_FLAG(
9707 p->cap,
9708 PEER_CAP_DYNAMIC_ADV)
9709 ? "and "
9710 : "");
9711 vty_out(vty, "\n");
9712 }
9713
9714 /* Extended nexthop */
9715 if (CHECK_FLAG(p->cap, PEER_CAP_ENHE_RCV)
9716 || CHECK_FLAG(p->cap, PEER_CAP_ENHE_ADV)) {
9717 vty_out(vty, " Extended nexthop:");
9718 if (CHECK_FLAG(p->cap,
9719 PEER_CAP_ENHE_ADV))
9720 vty_out(vty, " advertised");
9721 if (CHECK_FLAG(p->cap,
9722 PEER_CAP_ENHE_RCV))
9723 vty_out(vty, " %sreceived",
9724 CHECK_FLAG(
9725 p->cap,
9726 PEER_CAP_ENHE_ADV)
9727 ? "and "
9728 : "");
9729 vty_out(vty, "\n");
9730
9731 if (CHECK_FLAG(p->cap,
9732 PEER_CAP_ENHE_RCV)) {
9733 vty_out(vty,
9734 " Address families by peer:\n ");
9735 for (safi = SAFI_UNICAST;
9736 safi < SAFI_MAX; safi++)
9737 if (CHECK_FLAG(
9738 p->af_cap
9739 [AFI_IP]
9740 [safi],
9741 PEER_CAP_ENHE_AF_RCV))
9742 vty_out(vty,
9743 " %s\n",
9744 afi_safi_print(
9745 AFI_IP,
9746 safi));
9747 }
9748 }
9749
9750 /* Route Refresh */
9751 if (CHECK_FLAG(p->cap, PEER_CAP_REFRESH_ADV)
9752 || CHECK_FLAG(p->cap,
9753 PEER_CAP_REFRESH_NEW_RCV)
9754 || CHECK_FLAG(p->cap,
9755 PEER_CAP_REFRESH_OLD_RCV)) {
9756 vty_out(vty, " Route refresh:");
9757 if (CHECK_FLAG(p->cap,
9758 PEER_CAP_REFRESH_ADV))
9759 vty_out(vty, " advertised");
9760 if (CHECK_FLAG(p->cap,
9761 PEER_CAP_REFRESH_NEW_RCV)
9762 || CHECK_FLAG(
9763 p->cap,
9764 PEER_CAP_REFRESH_OLD_RCV))
9765 vty_out(vty, " %sreceived(%s)",
9766 CHECK_FLAG(
9767 p->cap,
9768 PEER_CAP_REFRESH_ADV)
9769 ? "and "
9770 : "",
9771 (CHECK_FLAG(
9772 p->cap,
9773 PEER_CAP_REFRESH_OLD_RCV)
9774 && CHECK_FLAG(
9775 p->cap,
9776 PEER_CAP_REFRESH_NEW_RCV))
9777 ? "old & new"
9778 : CHECK_FLAG(
9779 p->cap,
9780 PEER_CAP_REFRESH_OLD_RCV)
9781 ? "old"
9782 : "new");
9783
9784 vty_out(vty, "\n");
9785 }
9786
9787 /* Multiprotocol Extensions */
05c7a1cc
QY		 9788 FOREACH_AFI_SAFI (afi, safi)
9789 if (p->afc_adv[afi][safi]
9790 || p->afc_recv[afi][safi]) {
9791 vty_out(vty,
9792 " Address Family %s:",
9793 afi_safi_print(afi,
9794 safi));
9795 if (p->afc_adv[afi][safi])
d62a17ae 9796 vty_out(vty,
05c7a1cc
QY		 9797 " advertised");
9798 if (p->afc_recv[afi][safi])
9799 vty_out(vty,
9800 " %sreceived",
9801 p->afc_adv[afi]
9802 [safi]
9803 ? "and "
9804 : "");
9805 vty_out(vty, "\n");
9806 }
d62a17ae 9807
9808 /* Hostname capability */
60466a63 9809 vty_out(vty, " Hostname Capability:");
d77114b7
MK		 9810
9811 if (CHECK_FLAG(p->cap, PEER_CAP_HOSTNAME_ADV)) {
57f7feb6
MK		 9812 vty_out(vty,
9813 " advertised (name: %s,domain name: %s)",
60466a63
QY		 9814 bgp->peer_self->hostname
9815 ? bgp->peer_self
9816 ->hostname
d77114b7 9817 : "n/a",
60466a63
QY		 9818 bgp->peer_self->domainname
9819 ? bgp->peer_self
9820 ->domainname
d77114b7
MK		 9821 : "n/a");
9822 } else {
9823 vty_out(vty, " not advertised");
d62a17ae 9824 }
9825
d77114b7 9826 if (CHECK_FLAG(p->cap, PEER_CAP_HOSTNAME_RCV)) {
57f7feb6
MK		 9827 vty_out(vty,
9828 " received (name: %s,domain name: %s)",
60466a63
QY		 9829 p->hostname ? p->hostname
9830 : "n/a",
9831 p->domainname ? p->domainname
9832 : "n/a");
d77114b7
MK		 9833 } else {
9834 vty_out(vty, " not received");
9835 }
9836
9837 vty_out(vty, "\n");
9838
d62a17ae 9839 /* Gracefull Restart */
9840 if (CHECK_FLAG(p->cap, PEER_CAP_RESTART_RCV)
9841 || CHECK_FLAG(p->cap,
9842 PEER_CAP_RESTART_ADV)) {
9843 vty_out(vty,
9844 " Graceful Restart Capabilty:");
9845 if (CHECK_FLAG(p->cap,
9846 PEER_CAP_RESTART_ADV))
9847 vty_out(vty, " advertised");
9848 if (CHECK_FLAG(p->cap,
9849 PEER_CAP_RESTART_RCV))
9850 vty_out(vty, " %sreceived",
9851 CHECK_FLAG(
9852 p->cap,
9853 PEER_CAP_RESTART_ADV)
9854 ? "and "
9855 : "");
9856 vty_out(vty, "\n");
9857
9858 if (CHECK_FLAG(p->cap,
9859 PEER_CAP_RESTART_RCV)) {
9860 int restart_af_count = 0;
9861
9862 vty_out(vty,
9863 " Remote Restart timer is %d seconds\n",
9864 p->v_gr_restart);
9865 vty_out(vty,
9866 " Address families by peer:\n ");
9867
05c7a1cc
QY		 9868 FOREACH_AFI_SAFI (afi, safi)
9869 if (CHECK_FLAG(
9870 p->af_cap
9871 [afi]
9872 [safi],
9873 PEER_CAP_RESTART_AF_RCV)) {
9874 vty_out(vty,
9875 "%s%s(%s)",
9876 restart_af_count
9877 ? ", "
9878 : "",
9879 afi_safi_print(
9880 afi,
9881 safi),
9882 CHECK_FLAG(
9883 p->af_cap
9884 [afi]
9885 [safi],
9886 PEER_CAP_RESTART_AF_PRESERVE_RCV)
9887 ? "preserved"
9888 : "not preserved");
9889 restart_af_count++;
9890 }
d62a17ae 9891 if (!restart_af_count)
9892 vty_out(vty, "none");
9893 vty_out(vty, "\n");
9894 }
9895 }
9896 }
9897 }
9898 }
9899
9900 /* graceful restart information */
9901 if (CHECK_FLAG(p->cap, PEER_CAP_RESTART_RCV) || p->t_gr_restart
9902 || p->t_gr_stale) {
9903 json_object *json_grace = NULL;
9904 json_object *json_grace_send = NULL;
9905 json_object *json_grace_recv = NULL;
9906 int eor_send_af_count = 0;
9907 int eor_receive_af_count = 0;
9908
9909 if (use_json) {
9910 json_grace = json_object_new_object();
9911 json_grace_send = json_object_new_object();
9912 json_grace_recv = json_object_new_object();
9913
9914 if (p->status == Established) {
05c7a1cc
QY		 9915 FOREACH_AFI_SAFI (afi, safi) {
9916 if (CHECK_FLAG(p->af_sflags[afi][safi],
9917 PEER_STATUS_EOR_SEND)) {
9918 json_object_boolean_true_add(
9919 json_grace_send,
9920 afi_safi_print(afi,
9921 safi));
9922 eor_send_af_count++;
d62a17ae 9923 }
9924 }
05c7a1cc
QY		 9925 FOREACH_AFI_SAFI (afi, safi) {
9926 if (CHECK_FLAG(
9927 p->af_sflags[afi][safi],
9928 PEER_STATUS_EOR_RECEIVED)) {
9929 json_object_boolean_true_add(
9930 json_grace_recv,
9931 afi_safi_print(afi,
9932 safi));
9933 eor_receive_af_count++;
d62a17ae 9934 }
9935 }
9936 }
9937
9938 json_object_object_add(json_grace, "endOfRibSend",
9939 json_grace_send);
9940 json_object_object_add(json_grace, "endOfRibRecv",
9941 json_grace_recv);
9942
9943 if (p->t_gr_restart)
9944 json_object_int_add(json_grace,
9945 "gracefulRestartTimerMsecs",
9946 thread_timer_remain_second(
9947 p->t_gr_restart)
9948 * 1000);
9949
9950 if (p->t_gr_stale)
9951 json_object_int_add(
9952 json_grace,
9953 "gracefulStalepathTimerMsecs",
9954 thread_timer_remain_second(
9955 p->t_gr_stale)
9956 * 1000);
9957
9958 json_object_object_add(
9959 json_neigh, "gracefulRestartInfo", json_grace);
9960 } else {
9961 vty_out(vty, " Graceful restart informations:\n");
9962 if (p->status == Established) {
9963 vty_out(vty, " End-of-RIB send: ");
05c7a1cc
QY		 9964 FOREACH_AFI_SAFI (afi, safi) {
9965 if (CHECK_FLAG(p->af_sflags[afi][safi],
9966 PEER_STATUS_EOR_SEND)) {
9967 vty_out(vty, "%s%s",
9968 eor_send_af_count ? ", "
9969 : "",
9970 afi_safi_print(afi,
9971 safi));
9972 eor_send_af_count++;
d62a17ae 9973 }
9974 }
9975 vty_out(vty, "\n");
9976 vty_out(vty, " End-of-RIB received: ");
05c7a1cc
QY		 9977 FOREACH_AFI_SAFI (afi, safi) {
9978 if (CHECK_FLAG(
9979 p->af_sflags[afi][safi],
9980 PEER_STATUS_EOR_RECEIVED)) {
9981 vty_out(vty, "%s%s",
9982 eor_receive_af_count
9983 ? ", "
9984 : "",
9985 afi_safi_print(afi,
9986 safi));
9987 eor_receive_af_count++;
d62a17ae 9988 }
9989 }
9990 vty_out(vty, "\n");
9991 }
9992
9993 if (p->t_gr_restart)
9994 vty_out(vty,
9995 " The remaining time of restart timer is %ld\n",
9996 thread_timer_remain_second(
9997 p->t_gr_restart));
9998
9999 if (p->t_gr_stale)
10000 vty_out(vty,
10001 " The remaining time of stalepath timer is %ld\n",
10002 thread_timer_remain_second(
10003 p->t_gr_stale));
10004 }
10005 }
10006 if (use_json) {
10007 json_object *json_stat = NULL;
10008 json_stat = json_object_new_object();
10009 /* Packet counts. */
10010 json_object_int_add(json_stat, "depthInq", 0);
10011 json_object_int_add(json_stat, "depthOutq",
10012 (unsigned long)p->obuf->count);
0112e9e0
QY		 10013 json_object_int_add(json_stat, "opensSent",
10014 atomic_load_explicit(&p->open_out,
10015 memory_order_relaxed));
10016 json_object_int_add(json_stat, "opensRecv",
10017 atomic_load_explicit(&p->open_in,
10018 memory_order_relaxed));
d62a17ae 10019 json_object_int_add(json_stat, "notificationsSent",
0112e9e0
QY		 10020 atomic_load_explicit(&p->notify_out,
10021 memory_order_relaxed));
d62a17ae 10022 json_object_int_add(json_stat, "notificationsRecv",
0112e9e0
QY		 10023 atomic_load_explicit(&p->notify_in,
10024 memory_order_relaxed));
10025 json_object_int_add(json_stat, "updatesSent",
10026 atomic_load_explicit(&p->update_out,
10027 memory_order_relaxed));
10028 json_object_int_add(json_stat, "updatesRecv",
10029 atomic_load_explicit(&p->update_in,
10030 memory_order_relaxed));
d62a17ae 10031 json_object_int_add(json_stat, "keepalivesSent",
0112e9e0
QY		 10032 atomic_load_explicit(&p->keepalive_out,
10033 memory_order_relaxed));
d62a17ae 10034 json_object_int_add(json_stat, "keepalivesRecv",
0112e9e0
QY		 10035 atomic_load_explicit(&p->keepalive_in,
10036 memory_order_relaxed));
d62a17ae 10037 json_object_int_add(json_stat, "routeRefreshSent",
0112e9e0
QY		 10038 atomic_load_explicit(&p->refresh_out,
10039 memory_order_relaxed));
d62a17ae 10040 json_object_int_add(json_stat, "routeRefreshRecv",
0112e9e0
QY		 10041 atomic_load_explicit(&p->refresh_in,
10042 memory_order_relaxed));
d62a17ae 10043 json_object_int_add(json_stat, "capabilitySent",
0112e9e0
QY		 10044 atomic_load_explicit(&p->dynamic_cap_out,
10045 memory_order_relaxed));
d62a17ae 10046 json_object_int_add(json_stat, "capabilityRecv",
0112e9e0
QY		 10047 atomic_load_explicit(&p->dynamic_cap_in,
10048 memory_order_relaxed));
10049 json_object_int_add(json_stat, "totalSent", PEER_TOTAL_TX(p));
10050 json_object_int_add(json_stat, "totalRecv", PEER_TOTAL_RX(p));
d62a17ae 10051 json_object_object_add(json_neigh, "messageStats", json_stat);
10052 } else {
10053 /* Packet counts. */
10054 vty_out(vty, " Message statistics:\n");
10055 vty_out(vty, " Inq depth is 0\n");
10056 vty_out(vty, " Outq depth is %lu\n",
10057 (unsigned long)p->obuf->count);
10058 vty_out(vty, " Sent Rcvd\n");
0112e9e0
QY		 10059 vty_out(vty, " Opens: %10d %10d\n",
10060 atomic_load_explicit(&p->open_out,
10061 memory_order_relaxed),
10062 atomic_load_explicit(&p->open_in,
10063 memory_order_relaxed));
10064 vty_out(vty, " Notifications: %10d %10d\n",
10065 atomic_load_explicit(&p->notify_out,
10066 memory_order_relaxed),
10067 atomic_load_explicit(&p->notify_in,
10068 memory_order_relaxed));
10069 vty_out(vty, " Updates: %10d %10d\n",
10070 atomic_load_explicit(&p->update_out,
10071 memory_order_relaxed),
10072 atomic_load_explicit(&p->update_in,
10073 memory_order_relaxed));
10074 vty_out(vty, " Keepalives: %10d %10d\n",
10075 atomic_load_explicit(&p->keepalive_out,
10076 memory_order_relaxed),
10077 atomic_load_explicit(&p->keepalive_in,
10078 memory_order_relaxed));
10079 vty_out(vty, " Route Refresh: %10d %10d\n",
10080 atomic_load_explicit(&p->refresh_out,
10081 memory_order_relaxed),
10082 atomic_load_explicit(&p->refresh_in,
10083 memory_order_relaxed));
d62a17ae 10084 vty_out(vty, " Capability: %10d %10d\n",
0112e9e0
QY		 10085 atomic_load_explicit(&p->dynamic_cap_out,
10086 memory_order_relaxed),
10087 atomic_load_explicit(&p->dynamic_cap_in,
10088 memory_order_relaxed));
10089 vty_out(vty, " Total: %10d %10d\n", PEER_TOTAL_TX(p),
10090 PEER_TOTAL_RX(p));
d62a17ae 10091 }
10092
10093 if (use_json) {
10094 /* advertisement-interval */
10095 json_object_int_add(json_neigh,
10096 "minBtwnAdvertisementRunsTimerMsecs",
10097 p->v_routeadv * 1000);
10098
10099 /* Update-source. */
10100 if (p->update_if || p->update_source) {
10101 if (p->update_if)
10102 json_object_string_add(json_neigh,
10103 "updateSource",
10104 p->update_if);
10105 else if (p->update_source)
10106 json_object_string_add(
10107 json_neigh, "updateSource",
10108 sockunion2str(p->update_source, buf1,
10109 SU_ADDRSTRLEN));
10110 }
10111 } else {
10112 /* advertisement-interval */
10113 vty_out(vty,
10114 " Minimum time between advertisement runs is %d seconds\n",
10115 p->v_routeadv);
10116
10117 /* Update-source. */
10118 if (p->update_if || p->update_source) {
10119 vty_out(vty, " Update source is ");
10120 if (p->update_if)
10121 vty_out(vty, "%s", p->update_if);
10122 else if (p->update_source)
10123 vty_out(vty, "%s",
10124 sockunion2str(p->update_source, buf1,
10125 SU_ADDRSTRLEN));
10126 vty_out(vty, "\n");
10127 }
10128
10129 vty_out(vty, "\n");
10130 }
10131
10132 /* Address Family Information */
10133 json_object *json_hold = NULL;
10134
10135 if (use_json)
10136 json_hold = json_object_new_object();
10137
05c7a1cc
QY		 10138 FOREACH_AFI_SAFI (afi, safi)
10139 if (p->afc[afi][safi])
10140 bgp_show_peer_afi(vty, p, afi, safi, use_json,
10141 json_hold);
d62a17ae 10142
10143 if (use_json) {
10144 json_object_object_add(json_neigh, "addressFamilyInfo",
10145 json_hold);
10146 json_object_int_add(json_neigh, "connectionsEstablished",
10147 p->established);
10148 json_object_int_add(json_neigh, "connectionsDropped",
10149 p->dropped);
10150 } else
10151 vty_out(vty, " Connections established %d; dropped %d\n",
10152 p->established, p->dropped);
10153
10154 if (!p->last_reset) {
10155 if (use_json)
10156 json_object_string_add(json_neigh, "lastReset",
10157 "never");
10158 else
10159 vty_out(vty, " Last reset never\n");
10160 } else {
10161 if (use_json) {
10162 time_t uptime;
10163 struct tm *tm;
10164
10165 uptime = bgp_clock();
10166 uptime -= p->resettime;
10167 tm = gmtime(&uptime);
10168 json_object_int_add(json_neigh, "lastResetTimerMsecs",
10169 (tm->tm_sec * 1000)
10170 + (tm->tm_min * 60000)
10171 + (tm->tm_hour * 3600000));
10172 json_object_string_add(
10173 json_neigh, "lastResetDueTo",
10174 peer_down_str[(int)p->last_reset]);
10175 if (p->last_reset == PEER_DOWN_NOTIFY_SEND
10176 || p->last_reset == PEER_DOWN_NOTIFY_RECEIVED) {
10177 char errorcodesubcode_hexstr[5];
10178 char errorcodesubcode_str[256];
10179
10180 code_str = bgp_notify_code_str(p->notify.code);
10181 subcode_str = bgp_notify_subcode_str(
10182 p->notify.code, p->notify.subcode);
10183
10184 sprintf(errorcodesubcode_hexstr, "%02X%02X",
10185 p->notify.code, p->notify.subcode);
10186 json_object_string_add(json_neigh,
10187 "lastErrorCodeSubcode",
10188 errorcodesubcode_hexstr);
10189 snprintf(errorcodesubcode_str, 255, "%s%s",
10190 code_str, subcode_str);
10191 json_object_string_add(json_neigh,
10192 "lastNotificationReason",
10193 errorcodesubcode_str);
10194 if (p->last_reset == PEER_DOWN_NOTIFY_RECEIVED
10195 && p->notify.code == BGP_NOTIFY_CEASE
10196 && (p->notify.subcode
10197 == BGP_NOTIFY_CEASE_ADMIN_SHUTDOWN
10198 || p->notify.subcode
10199 == BGP_NOTIFY_CEASE_ADMIN_RESET)
10200 && p->notify.length) {
10201 char msgbuf[1024];
10202 const char *msg_str;
10203
10204 msg_str = bgp_notify_admin_message(
10205 msgbuf, sizeof(msgbuf),
d7c0a89a 10206 (uint8_t *)p->notify.data,
d62a17ae 10207 p->notify.length);
10208 if (msg_str)
10209 json_object_string_add(
10210 json_neigh,
10211 "lastShutdownDescription",
10212 msg_str);
10213 }
10214 }
10215 } else {
10216 vty_out(vty, " Last reset %s, ",
10217 peer_uptime(p->resettime, timebuf,
10218 BGP_UPTIME_LEN, 0, NULL));
10219
10220 if (p->last_reset == PEER_DOWN_NOTIFY_SEND
10221 || p->last_reset == PEER_DOWN_NOTIFY_RECEIVED) {
10222 code_str = bgp_notify_code_str(p->notify.code);
10223 subcode_str = bgp_notify_subcode_str(
10224 p->notify.code, p->notify.subcode);
10225 vty_out(vty, "due to NOTIFICATION %s (%s%s)\n",
10226 p->last_reset == PEER_DOWN_NOTIFY_SEND
10227 ? "sent"
10228 : "received",
10229 code_str, subcode_str);
10230 if (p->last_reset == PEER_DOWN_NOTIFY_RECEIVED
10231 && p->notify.code == BGP_NOTIFY_CEASE
10232 && (p->notify.subcode
10233 == BGP_NOTIFY_CEASE_ADMIN_SHUTDOWN
10234 || p->notify.subcode
10235 == BGP_NOTIFY_CEASE_ADMIN_RESET)
10236 && p->notify.length) {
10237 char msgbuf[1024];
10238 const char *msg_str;
10239
10240 msg_str = bgp_notify_admin_message(
10241 msgbuf, sizeof(msgbuf),
d7c0a89a 10242 (uint8_t *)p->notify.data,
d62a17ae 10243 p->notify.length);
10244 if (msg_str)
10245 vty_out(vty,
10246 " Message: \"%s\"\n",
10247 msg_str);
10248 }
10249 } else {
10250 vty_out(vty, "due to %s\n",
10251 peer_down_str[(int)p->last_reset]);
10252 }
10253
10254 if (p->last_reset_cause_size) {
10255 msg = p->last_reset_cause;
10256 vty_out(vty,
10257 " Message received that caused BGP to send a NOTIFICATION:\n ");
10258 for (i = 1; i <= p->last_reset_cause_size;
10259 i++) {
10260 vty_out(vty, "%02X", *msg++);
10261
10262 if (i != p->last_reset_cause_size) {
10263 if (i % 16 == 0) {
10264 vty_out(vty, "\n ");
10265 } else if (i % 4 == 0) {
10266 vty_out(vty, " ");
10267 }
10268 }
10269 }
10270 vty_out(vty, "\n");
10271 }
10272 }
10273 }
10274
10275 if (CHECK_FLAG(p->sflags, PEER_STATUS_PREFIX_OVERFLOW)) {
10276 if (use_json)
10277 json_object_boolean_true_add(json_neigh,
10278 "prefixesConfigExceedMax");
10279 else
10280 vty_out(vty,
10281 " Peer had exceeded the max. no. of prefixes configured.\n");
10282
10283 if (p->t_pmax_restart) {
10284 if (use_json) {
10285 json_object_boolean_true_add(
10286 json_neigh, "reducePrefixNumFrom");
10287 json_object_int_add(json_neigh,
10288 "restartInTimerMsec",
10289 thread_timer_remain_second(
10290 p->t_pmax_restart)
10291 * 1000);
10292 } else
10293 vty_out(vty,
10294 " Reduce the no. of prefix from %s, will restart in %ld seconds\n",
996c9314
LB		 10295 p->host, thread_timer_remain_second(
10296 p->t_pmax_restart));
d62a17ae 10297 } else {
10298 if (use_json)
10299 json_object_boolean_true_add(
10300 json_neigh,
10301 "reducePrefixNumAndClearIpBgp");
10302 else
10303 vty_out(vty,
10304 " Reduce the no. of prefix and clear ip bgp %s to restore peering\n",
10305 p->host);
10306 }
10307 }
10308
10309 /* EBGP Multihop and GTSM */
10310 if (p->sort != BGP_PEER_IBGP) {
10311 if (use_json) {
10312 if (p->gtsm_hops > 0)
10313 json_object_int_add(json_neigh,
10314 "externalBgpNbrMaxHopsAway",
10315 p->gtsm_hops);
10316 else if (p->ttl > 1)
10317 json_object_int_add(json_neigh,
10318 "externalBgpNbrMaxHopsAway",
10319 p->ttl);
10320 } else {
10321 if (p->gtsm_hops > 0)
10322 vty_out(vty,
10323 " External BGP neighbor may be up to %d hops away.\n",
10324 p->gtsm_hops);
10325 else if (p->ttl > 1)
10326 vty_out(vty,
10327 " External BGP neighbor may be up to %d hops away.\n",
10328 p->ttl);
10329 }
10330 } else {
10331 if (p->gtsm_hops > 0) {
10332 if (use_json)
10333 json_object_int_add(json_neigh,
10334 "internalBgpNbrMaxHopsAway",
10335 p->gtsm_hops);
10336 else
10337 vty_out(vty,
10338 " Internal BGP neighbor may be up to %d hops away.\n",
10339 p->gtsm_hops);
10340 }
10341 }
10342
10343 /* Local address. */
10344 if (p->su_local) {
10345 if (use_json) {
10346 json_object_string_add(json_neigh, "hostLocal",
10347 sockunion2str(p->su_local, buf1,
10348 SU_ADDRSTRLEN));
10349 json_object_int_add(json_neigh, "portLocal",
10350 ntohs(p->su_local->sin.sin_port));
10351 } else
10352 vty_out(vty, "Local host: %s, Local port: %d\n",
10353 sockunion2str(p->su_local, buf1, SU_ADDRSTRLEN),
10354 ntohs(p->su_local->sin.sin_port));
10355 }
10356
10357 /* Remote address. */
10358 if (p->su_remote) {
10359 if (use_json) {
10360 json_object_string_add(json_neigh, "hostForeign",
10361 sockunion2str(p->su_remote, buf1,
10362 SU_ADDRSTRLEN));
10363 json_object_int_add(json_neigh, "portForeign",
10364 ntohs(p->su_remote->sin.sin_port));
10365 } else
10366 vty_out(vty, "Foreign host: %s, Foreign port: %d\n",
10367 sockunion2str(p->su_remote, buf1,
10368 SU_ADDRSTRLEN),
10369 ntohs(p->su_remote->sin.sin_port));
10370 }
10371
10372 /* Nexthop display. */
10373 if (p->su_local) {
10374 if (use_json) {
10375 json_object_string_add(json_neigh, "nexthop",
10376 inet_ntop(AF_INET,
10377 &p->nexthop.v4, buf1,
10378 sizeof(buf1)));
10379 json_object_string_add(json_neigh, "nexthopGlobal",
10380 inet_ntop(AF_INET6,
10381 &p->nexthop.v6_global,
10382 buf1, sizeof(buf1)));
10383 json_object_string_add(json_neigh, "nexthopLocal",
10384 inet_ntop(AF_INET6,
10385 &p->nexthop.v6_local,
10386 buf1, sizeof(buf1)));
10387 if (p->shared_network)
10388 json_object_string_add(json_neigh,
10389 "bgpConnection",
10390 "sharedNetwork");
10391 else
10392 json_object_string_add(json_neigh,
10393 "bgpConnection",
10394 "nonSharedNetwork");
10395 } else {
10396 vty_out(vty, "Nexthop: %s\n",
10397 inet_ntop(AF_INET, &p->nexthop.v4, buf1,
10398 sizeof(buf1)));
10399 vty_out(vty, "Nexthop global: %s\n",
10400 inet_ntop(AF_INET6, &p->nexthop.v6_global, buf1,
10401 sizeof(buf1)));
10402 vty_out(vty, "Nexthop local: %s\n",
10403 inet_ntop(AF_INET6, &p->nexthop.v6_local, buf1,
10404 sizeof(buf1)));
10405 vty_out(vty, "BGP connection: %s\n",
10406 p->shared_network ? "shared network"
10407 : "non shared network");
10408 }
10409 }
10410
10411 /* Timer information. */
10412 if (use_json) {
10413 json_object_int_add(json_neigh, "connectRetryTimer",
10414 p->v_connect);
10415 if (p->status == Established && p->rtt)
10416 json_object_int_add(json_neigh, "estimatedRttInMsecs",
10417 p->rtt);
10418 if (p->t_start)
10419 json_object_int_add(
10420 json_neigh, "nextStartTimerDueInMsecs",
10421 thread_timer_remain_second(p->t_start) * 1000);
10422 if (p->t_connect)
10423 json_object_int_add(
10424 json_neigh, "nextConnectTimerDueInMsecs",
10425 thread_timer_remain_second(p->t_connect)
10426 * 1000);
10427 if (p->t_routeadv) {
10428 json_object_int_add(json_neigh, "mraiInterval",
10429 p->v_routeadv);
10430 json_object_int_add(
10431 json_neigh, "mraiTimerExpireInMsecs",
10432 thread_timer_remain_second(p->t_routeadv)
10433 * 1000);
10434 }
10435 if (p->password)
10436 json_object_int_add(json_neigh, "authenticationEnabled",
10437 1);
10438
10439 if (p->t_read)
10440 json_object_string_add(json_neigh, "readThread", "on");
10441 else
10442 json_object_string_add(json_neigh, "readThread", "off");
49507a6f
QY		 10443
10444 if (CHECK_FLAG(p->thread_flags, PEER_THREAD_WRITES_ON))
d62a17ae 10445 json_object_string_add(json_neigh, "writeThread", "on");
10446 else
10447 json_object_string_add(json_neigh, "writeThread",
10448 "off");
10449 } else {
10450 vty_out(vty, "BGP Connect Retry Timer in Seconds: %d\n",
10451 p->v_connect);
10452 if (p->status == Established && p->rtt)
10453 vty_out(vty, "Estimated round trip time: %d ms\n",
10454 p->rtt);
10455 if (p->t_start)
10456 vty_out(vty, "Next start timer due in %ld seconds\n",
10457 thread_timer_remain_second(p->t_start));
10458 if (p->t_connect)
10459 vty_out(vty, "Next connect timer due in %ld seconds\n",
10460 thread_timer_remain_second(p->t_connect));
10461 if (p->t_routeadv)
10462 vty_out(vty,
10463 "MRAI (interval %u) timer expires in %ld seconds\n",
10464 p->v_routeadv,
10465 thread_timer_remain_second(p->t_routeadv));
10466 if (p->password)
10467 vty_out(vty, "Peer Authentication Enabled\n");
10468
10469 vty_out(vty, "Read thread: %s Write thread: %s\n",
49507a6f
QY		 10470 p->t_read ? "on" : "off",
10471 CHECK_FLAG(p->thread_flags, PEER_THREAD_WRITES_ON)
10472 ? "on"
10473 : "off");
d62a17ae 10474 }
10475
10476 if (p->notify.code == BGP_NOTIFY_OPEN_ERR
10477 && p->notify.subcode == BGP_NOTIFY_OPEN_UNSUP_CAPBL)
10478 bgp_capability_vty_out(vty, p, use_json, json_neigh);
10479
10480 if (!use_json)
10481 vty_out(vty, "\n");
10482
10483 /* BFD information. */
10484 bgp_bfd_show_info(vty, p, use_json, json_neigh);
10485
10486 if (use_json) {
10487 if (p->conf_if) /* Configured interface name. */
10488 json_object_object_add(json, p->conf_if, json_neigh);
10489 else /* Configured IP address. */
10490 json_object_object_add(json, p->host, json_neigh);
10491 }
10492}
10493
10494static int bgp_show_neighbor(struct vty *vty, struct bgp *bgp,
10495 enum show_type type, union sockunion *su,
d7c0a89a 10496 const char *conf_if, uint8_t use_json,
d62a17ae 10497 json_object *json)
10498{
10499 struct listnode *node, *nnode;
10500 struct peer *peer;
10501 int find = 0;
10502
10503 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
10504 if (!CHECK_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE))
10505 continue;
10506
10507 switch (type) {
10508 case show_all:
10509 bgp_show_peer(vty, peer, use_json, json);
10510 break;
10511 case show_peer:
10512 if (conf_if) {
10513 if ((peer->conf_if
10514 && !strcmp(peer->conf_if, conf_if))
10515 || (peer->hostname
10516 && !strcmp(peer->hostname, conf_if))) {
10517 find = 1;
10518 bgp_show_peer(vty, peer, use_json,
10519 json);
10520 }
10521 } else {
10522 if (sockunion_same(&peer->su, su)) {
10523 find = 1;
10524 bgp_show_peer(vty, peer, use_json,
10525 json);
10526 }
10527 }
10528 break;
10529 }
10530 }
10531
10532 if (type == show_peer && !find) {
10533 if (use_json)
10534 json_object_boolean_true_add(json, "bgpNoSuchNeighbor");
10535 else
10536 vty_out(vty, "%% No such neighbor\n");
10537 }
10538
10539 if (use_json) {
996c9314
LB		 10540 vty_out(vty, "%s\n", json_object_to_json_string_ext(
10541 json, JSON_C_TO_STRING_PRETTY));
d62a17ae 10542 json_object_free(json);
10543 } else {
10544 vty_out(vty, "\n");
10545 }
10546
10547 return CMD_SUCCESS;
10548}
10549
10550static void bgp_show_all_instances_neighbors_vty(struct vty *vty,
71aedaa3
DS		 10551 enum show_type type,
10552 const char *ip_str,
d7c0a89a 10553 uint8_t use_json)
d62a17ae 10554{
0291c246
MK		 10555 struct listnode *node, *nnode;
10556 struct bgp *bgp;
71aedaa3 10557 union sockunion su;
0291c246 10558 json_object *json = NULL;
71aedaa3 10559 int ret, is_first = 1;
d62a17ae 10560
10561 if (use_json)
10562 vty_out(vty, "{\n");
10563
10564 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp)) {
10565 if (use_json) {
10566 if (!(json = json_object_new_object())) {
10567 zlog_err(
10568 "Unable to allocate memory for JSON object");
10569 vty_out(vty,
10570 "{\"error\": {\"message:\": \"Unable to allocate memory for JSON object\"}}}\n");
10571 return;
10572 }
10573
10574 json_object_int_add(json, "vrfId",
10575 (bgp->vrf_id == VRF_UNKNOWN)
a4d82a8a
PZ		 10576 ? -1
10577 : (int64_t)bgp->vrf_id);
d62a17ae 10578 json_object_string_add(
10579 json, "vrfName",
10580 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
10581 ? "Default"
10582 : bgp->name);
10583
10584 if (!is_first)
10585 vty_out(vty, ",\n");
10586 else
10587 is_first = 0;
10588
10589 vty_out(vty, "\"%s\":",
10590 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
10591 ? "Default"
10592 : bgp->name);
10593 } else {
10594 vty_out(vty, "\nInstance %s:\n",
10595 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
10596 ? "Default"
10597 : bgp->name);
10598 }
71aedaa3
DS		 10599
10600 if (type == show_peer) {
10601 ret = str2sockunion(ip_str, &su);
10602 if (ret < 0)
10603 bgp_show_neighbor(vty, bgp, type, NULL, ip_str,
10604 use_json, json);
10605 else
10606 bgp_show_neighbor(vty, bgp, type, &su, NULL,
10607 use_json, json);
10608 } else {
10609 bgp_show_neighbor(vty, bgp, show_all, NULL, NULL,
10610 use_json, json);
10611 }
d62a17ae 10612 }
10613
10614 if (use_json)
10615 vty_out(vty, "}\n");
10616}
10617
10618static int bgp_show_neighbor_vty(struct vty *vty, const char *name,
10619 enum show_type type, const char *ip_str,
d7c0a89a 10620 uint8_t use_json)
d62a17ae 10621{
10622 int ret;
10623 struct bgp *bgp;
10624 union sockunion su;
10625 json_object *json = NULL;
10626
10627 if (name) {
10628 if (strmatch(name, "all")) {
71aedaa3
DS		 10629 bgp_show_all_instances_neighbors_vty(vty, type, ip_str,
10630 use_json);
d62a17ae 10631 return CMD_SUCCESS;
10632 } else {
10633 bgp = bgp_lookup_by_name(name);
10634 if (!bgp) {
10635 if (use_json) {
10636 json = json_object_new_object();
10637 json_object_boolean_true_add(
10638 json, "bgpNoSuchInstance");
10639 vty_out(vty, "%s\n",
10640 json_object_to_json_string_ext(
10641 json,
10642 JSON_C_TO_STRING_PRETTY));
10643 json_object_free(json);
10644 } else
10645 vty_out(vty,
10646 "%% No such BGP instance exist\n");
10647
10648 return CMD_WARNING;
10649 }
10650 }
10651 } else {
10652 bgp = bgp_get_default();
10653 }
10654
10655 if (bgp) {
10656 json = json_object_new_object();
10657 if (ip_str) {
10658 ret = str2sockunion(ip_str, &su);
10659 if (ret < 0)
10660 bgp_show_neighbor(vty, bgp, type, NULL, ip_str,
10661 use_json, json);
10662 else
10663 bgp_show_neighbor(vty, bgp, type, &su, NULL,
10664 use_json, json);
10665 } else {
10666 bgp_show_neighbor(vty, bgp, type, NULL, NULL, use_json,
10667 json);
10668 }
10669 json_object_free(json);
10670 }
10671
10672 return CMD_SUCCESS;
4fb25c53
DW		 10673}
10674
716b2d8a 10675/* "show [ip] bgp neighbors" commands. */
718e3744 10676DEFUN (show_ip_bgp_neighbors,
10677 show_ip_bgp_neighbors_cmd,
24345e82 10678 "show [ip] bgp [<view|vrf> VIEWVRFNAME] [<ipv4|ipv6>] neighbors [<A.B.C.D|X:X::X:X|WORD>] [json]",
718e3744 10679 SHOW_STR
10680 IP_STR
10681 BGP_STR
f2a8972b 10682 BGP_INSTANCE_HELP_STR
8c3deaae
QY		 10683 "Address Family\n"
10684 "Address Family\n"
718e3744 10685 "Detailed information on TCP and BGP neighbor connections\n"
10686 "Neighbor to display information about\n"
a80beece 10687 "Neighbor to display information about\n"
91d37724 10688 "Neighbor on BGP configured interface\n"
9973d184 10689 JSON_STR)
718e3744 10690{
d62a17ae 10691 char *vrf = NULL;
10692 char *sh_arg = NULL;
10693 enum show_type sh_type;
718e3744 10694
d7c0a89a 10695 uint8_t uj = use_json(argc, argv);
718e3744 10696
d62a17ae 10697 int idx = 0;
718e3744 10698
d62a17ae 10699 if (argv_find(argv, argc, "view", &idx)
10700 || argv_find(argv, argc, "vrf", &idx))
10701 vrf = argv[idx + 1]->arg;
718e3744 10702
d62a17ae 10703 idx++;
10704 if (argv_find(argv, argc, "A.B.C.D", &idx)
10705 || argv_find(argv, argc, "X:X::X:X", &idx)
10706 || argv_find(argv, argc, "WORD", &idx)) {
10707 sh_type = show_peer;
10708 sh_arg = argv[idx]->arg;
10709 } else
10710 sh_type = show_all;
856ca177 10711
d62a17ae 10712 return bgp_show_neighbor_vty(vty, vrf, sh_type, sh_arg, uj);
718e3744 10713}
10714
716b2d8a 10715/* Show BGP's AS paths internal data. There are both `show [ip] bgp
718e3744 10716 paths' and `show ip mbgp paths'. Those functions results are the
10717 same.*/
f412b39a 10718DEFUN (show_ip_bgp_paths,
718e3744 10719 show_ip_bgp_paths_cmd,
46f296b4 10720 "show [ip] bgp ["BGP_SAFI_CMD_STR"] paths",
718e3744 10721 SHOW_STR
10722 IP_STR
10723 BGP_STR
46f296b4 10724 BGP_SAFI_HELP_STR
718e3744 10725 "Path information\n")
10726{
d62a17ae 10727 vty_out(vty, "Address Refcnt Path\n");
10728 aspath_print_all_vty(vty);
10729 return CMD_SUCCESS;
718e3744 10730}
10731
718e3744 10732#include "hash.h"
10733
d62a17ae 10734static void community_show_all_iterator(struct hash_backet *backet,
10735 struct vty *vty)
718e3744 10736{
d62a17ae 10737 struct community *com;
718e3744 10738
d62a17ae 10739 com = (struct community *)backet->data;
3f65c5b1 10740 vty_out(vty, "[%p] (%ld) %s\n", (void *)com, com->refcnt,
a69ea8ae 10741 community_str(com, false));
718e3744 10742}
10743
10744/* Show BGP's community internal data. */
f412b39a 10745DEFUN (show_ip_bgp_community_info,
718e3744 10746 show_ip_bgp_community_info_cmd,
bec37ba5 10747 "show [ip] bgp community-info",
718e3744 10748 SHOW_STR
10749 IP_STR
10750 BGP_STR
10751 "List all bgp community information\n")
10752{
d62a17ae 10753 vty_out(vty, "Address Refcnt Community\n");
718e3744 10754
d62a17ae 10755 hash_iterate(community_hash(),
10756 (void (*)(struct hash_backet *,
10757 void *))community_show_all_iterator,
10758 vty);
718e3744 10759
d62a17ae 10760 return CMD_SUCCESS;
718e3744 10761}
10762
d62a17ae 10763static void lcommunity_show_all_iterator(struct hash_backet *backet,
10764 struct vty *vty)
57d187bc 10765{
d62a17ae 10766 struct lcommunity *lcom;
57d187bc 10767
d62a17ae 10768 lcom = (struct lcommunity *)backet->data;
3f65c5b1 10769 vty_out(vty, "[%p] (%ld) %s\n", (void *)lcom, lcom->refcnt,
d62a17ae 10770 lcommunity_str(lcom));
57d187bc
JS		 10771}
10772
10773/* Show BGP's community internal data. */
10774DEFUN (show_ip_bgp_lcommunity_info,
10775 show_ip_bgp_lcommunity_info_cmd,
10776 "show ip bgp large-community-info",
10777 SHOW_STR
10778 IP_STR
10779 BGP_STR
10780 "List all bgp large-community information\n")
10781{
d62a17ae 10782 vty_out(vty, "Address Refcnt Large-community\n");
57d187bc 10783
d62a17ae 10784 hash_iterate(lcommunity_hash(),
10785 (void (*)(struct hash_backet *,
10786 void *))lcommunity_show_all_iterator,
10787 vty);
57d187bc 10788
d62a17ae 10789 return CMD_SUCCESS;
57d187bc
JS		 10790}
10791
10792
f412b39a 10793DEFUN (show_ip_bgp_attr_info,
718e3744 10794 show_ip_bgp_attr_info_cmd,
bec37ba5 10795 "show [ip] bgp attribute-info",
718e3744 10796 SHOW_STR
10797 IP_STR
10798 BGP_STR
10799 "List all bgp attribute information\n")
10800{
d62a17ae 10801 attr_show_all(vty);
10802 return CMD_SUCCESS;
718e3744 10803}
6b0655a2 10804
d62a17ae 10805static void bgp_show_all_instances_updgrps_vty(struct vty *vty, afi_t afi,
10806 safi_t safi)
f186de26 10807{
d62a17ae 10808 struct listnode *node, *nnode;
10809 struct bgp *bgp;
f186de26 10810
d62a17ae 10811 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp)) {
10812 vty_out(vty, "\nInstance %s:\n",
10813 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
10814 ? "Default"
10815 : bgp->name);
10816 update_group_show(bgp, afi, safi, vty, 0);
10817 }
f186de26 10818}
10819
d62a17ae 10820static int bgp_show_update_groups(struct vty *vty, const char *name, int afi,
10821 int safi, uint64_t subgrp_id)
4fb25c53 10822{
d62a17ae 10823 struct bgp *bgp;
4fb25c53 10824
d62a17ae 10825 if (name) {
10826 if (strmatch(name, "all")) {
10827 bgp_show_all_instances_updgrps_vty(vty, afi, safi);
10828 return CMD_SUCCESS;
10829 } else {
10830 bgp = bgp_lookup_by_name(name);
10831 }
10832 } else {
10833 bgp = bgp_get_default();
10834 }
4fb25c53 10835
d62a17ae 10836 if (bgp)
10837 update_group_show(bgp, afi, safi, vty, subgrp_id);
10838 return CMD_SUCCESS;
4fb25c53
DW		 10839}
10840
8fe8a7f6
DS		 10841DEFUN (show_ip_bgp_updgrps,
10842 show_ip_bgp_updgrps_cmd,
c1a44e43 10843 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] update-groups [SUBGROUP-ID]",
8386ac43 10844 SHOW_STR
10845 IP_STR
10846 BGP_STR
10847 BGP_INSTANCE_HELP_STR
c9e571b4 10848 BGP_AFI_HELP_STR
9bedbb1e 10849 BGP_SAFI_WITH_LABEL_HELP_STR
5bf15956
DW		 10850 "Detailed info about dynamic update groups\n"
10851 "Specific subgroup to display detailed info for\n")
8386ac43 10852{
d62a17ae 10853 char *vrf = NULL;
10854 afi_t afi = AFI_IP6;
10855 safi_t safi = SAFI_UNICAST;
10856 uint64_t subgrp_id = 0;
10857
10858 int idx = 0;
10859
10860 /* show [ip] bgp */
10861 if (argv_find(argv, argc, "ip", &idx))
10862 afi = AFI_IP;
10863 /* [<view|vrf> VIEWVRFNAME] */
10864 if (argv_find(argv, argc, "view", &idx)
10865 || argv_find(argv, argc, "vrf", &idx))
10866 vrf = argv[++idx]->arg;
10867 /* ["BGP_AFI_CMD_STR" ["BGP_SAFI_CMD_STR"]] */
10868 if (argv_find_and_parse_afi(argv, argc, &idx, &afi)) {
10869 argv_find_and_parse_safi(argv, argc, &idx, &safi);
10870 }
5bf15956 10871
d62a17ae 10872 /* get subgroup id, if provided */
10873 idx = argc - 1;
10874 if (argv[idx]->type == VARIABLE_TKN)
10875 subgrp_id = strtoull(argv[idx]->arg, NULL, 10);
5bf15956 10876
d62a17ae 10877 return (bgp_show_update_groups(vty, vrf, afi, safi, subgrp_id));
8fe8a7f6
DS		 10878}
10879
f186de26 10880DEFUN (show_bgp_instance_all_ipv6_updgrps,
10881 show_bgp_instance_all_ipv6_updgrps_cmd,
716b2d8a 10882 "show [ip] bgp <view|vrf> all update-groups",
f186de26 10883 SHOW_STR
716b2d8a 10884 IP_STR
f186de26 10885 BGP_STR
10886 BGP_INSTANCE_ALL_HELP_STR
0c7b1b01 10887 "Detailed info about dynamic update groups\n")
f186de26 10888{
d62a17ae 10889 bgp_show_all_instances_updgrps_vty(vty, AFI_IP6, SAFI_UNICAST);
10890 return CMD_SUCCESS;
f186de26 10891}
10892
5bf15956
DW		 10893DEFUN (show_bgp_updgrps_stats,
10894 show_bgp_updgrps_stats_cmd,
716b2d8a 10895 "show [ip] bgp update-groups statistics",
3f9c7369 10896 SHOW_STR
716b2d8a 10897 IP_STR
3f9c7369 10898 BGP_STR
0c7b1b01 10899 "Detailed info about dynamic update groups\n"
3f9c7369
DS		 10900 "Statistics\n")
10901{
d62a17ae 10902 struct bgp *bgp;
3f9c7369 10903
d62a17ae 10904 bgp = bgp_get_default();
10905 if (bgp)
10906 update_group_show_stats(bgp, vty);
3f9c7369 10907
d62a17ae 10908 return CMD_SUCCESS;
3f9c7369
DS		 10909}
10910
8386ac43 10911DEFUN (show_bgp_instance_updgrps_stats,
10912 show_bgp_instance_updgrps_stats_cmd,
18c57037 10913 "show [ip] bgp <view|vrf> VIEWVRFNAME update-groups statistics",
8386ac43 10914 SHOW_STR
716b2d8a 10915 IP_STR
8386ac43 10916 BGP_STR
10917 BGP_INSTANCE_HELP_STR
0c7b1b01 10918 "Detailed info about dynamic update groups\n"
8386ac43 10919 "Statistics\n")
10920{
d62a17ae 10921 int idx_word = 3;
10922 struct bgp *bgp;
8386ac43 10923
d62a17ae 10924 bgp = bgp_lookup_by_name(argv[idx_word]->arg);
10925 if (bgp)
10926 update_group_show_stats(bgp, vty);
8386ac43 10927
d62a17ae 10928 return CMD_SUCCESS;
8386ac43 10929}
10930
d62a17ae 10931static void show_bgp_updgrps_adj_info_aux(struct vty *vty, const char *name,
10932 afi_t afi, safi_t safi,
10933 const char *what, uint64_t subgrp_id)
3f9c7369 10934{
d62a17ae 10935 struct bgp *bgp;
8386ac43 10936
d62a17ae 10937 if (name)
10938 bgp = bgp_lookup_by_name(name);
10939 else
10940 bgp = bgp_get_default();
8386ac43 10941
d62a17ae 10942 if (bgp) {
10943 if (!strcmp(what, "advertise-queue"))
10944 update_group_show_adj_queue(bgp, afi, safi, vty,
10945 subgrp_id);
10946 else if (!strcmp(what, "advertised-routes"))
10947 update_group_show_advertised(bgp, afi, safi, vty,
10948 subgrp_id);
10949 else if (!strcmp(what, "packet-queue"))
10950 update_group_show_packet_queue(bgp, afi, safi, vty,
10951 subgrp_id);
10952 }
3f9c7369
DS		 10953}
10954
dc64bdec
QY		 10955DEFPY(show_ip_bgp_instance_updgrps_adj_s,
10956 show_ip_bgp_instance_updgrps_adj_s_cmd,
10957 "show [ip]$ip bgp [<view|vrf> VIEWVRFNAME$vrf] [<ipv4|ipv6>$afi <unicast|multicast|vpn>$safi] update-groups [SUBGROUP-ID]$sgid <advertise-queue|advertised-routes|packet-queue>$rtq",
10958 SHOW_STR IP_STR BGP_STR BGP_INSTANCE_HELP_STR BGP_AFI_HELP_STR
10959 BGP_SAFI_HELP_STR
10960 "Detailed info about dynamic update groups\n"
10961 "Specific subgroup to display info for\n"
10962 "Advertisement queue\n"
10963 "Announced routes\n"
10964 "Packet queue\n")
3f9c7369 10965{
dc64bdec
QY		 10966 uint64_t subgrp_id = 0;
10967 afi_t afiz;
10968 safi_t safiz;
10969 if (sgid)
10970 subgrp_id = strtoull(sgid, NULL, 10);
10971
10972 if (!ip && !afi)
10973 afiz = AFI_IP6;
10974 if (!ip && afi)
10975 afiz = bgp_vty_afi_from_str(afi);
10976 if (ip && !afi)
10977 afiz = AFI_IP;
10978 if (ip && afi) {
10979 afiz = bgp_vty_afi_from_str(afi);
10980 if (afiz != AFI_IP)
10981 vty_out(vty,
10982 "%% Cannot specify both 'ip' and 'ipv6'\n");
10983 return CMD_WARNING;
10984 }
d62a17ae 10985
dc64bdec 10986 safiz = safi ? bgp_vty_safi_from_str(safi) : SAFI_UNICAST;
d62a17ae 10987
dc64bdec 10988 show_bgp_updgrps_adj_info_aux(vty, vrf, afiz, safiz, rtq, subgrp_id);
d62a17ae 10989 return CMD_SUCCESS;
10990}
10991
d62a17ae 10992static int bgp_show_one_peer_group(struct vty *vty, struct peer_group *group)
10993{
10994 struct listnode *node, *nnode;
10995 struct prefix *range;
10996 struct peer *conf;
10997 struct peer *peer;
10998 char buf[PREFIX2STR_BUFFER];
10999 afi_t afi;
11000 safi_t safi;
11001 const char *peer_status;
11002 const char *af_str;
11003 int lr_count;
11004 int dynamic;
11005 int af_cfgd;
11006
11007 conf = group->conf;
11008
11009 if (conf->as_type == AS_SPECIFIED || conf->as_type == AS_EXTERNAL) {
11010 vty_out(vty, "\nBGP peer-group %s, remote AS %d\n", group->name,
11011 conf->as);
11012 } else if (conf->as_type == AS_INTERNAL) {
11013 vty_out(vty, "\nBGP peer-group %s, remote AS %d\n", group->name,
11014 group->bgp->as);
11015 } else {
11016 vty_out(vty, "\nBGP peer-group %s\n", group->name);
11017 }
f14e6fdb 11018
d62a17ae 11019 if ((group->bgp->as == conf->as) || (conf->as_type == AS_INTERNAL))
11020 vty_out(vty, " Peer-group type is internal\n");
11021 else
11022 vty_out(vty, " Peer-group type is external\n");
11023
11024 /* Display AFs configured. */
11025 vty_out(vty, " Configured address-families:");
05c7a1cc
QY		 11026 FOREACH_AFI_SAFI (afi, safi) {
11027 if (conf->afc[afi][safi]) {
11028 af_cfgd = 1;
11029 vty_out(vty, " %s;", afi_safi_print(afi, safi));
d62a17ae 11030 }
05c7a1cc 11031 }
d62a17ae 11032 if (!af_cfgd)
11033 vty_out(vty, " none\n");
11034 else
11035 vty_out(vty, "\n");
11036
11037 /* Display listen ranges (for dynamic neighbors), if any */
11038 for (afi = AFI_IP; afi < AFI_MAX; afi++) {
11039 if (afi == AFI_IP)
11040 af_str = "IPv4";
11041 else if (afi == AFI_IP6)
11042 af_str = "IPv6";
11043 else
11044 af_str = "???";
11045 lr_count = listcount(group->listen_range[afi]);
11046 if (lr_count) {
11047 vty_out(vty, " %d %s listen range(s)\n", lr_count,
11048 af_str);
11049
11050
11051 for (ALL_LIST_ELEMENTS(group->listen_range[afi], node,
11052 nnode, range)) {
11053 prefix2str(range, buf, sizeof(buf));
11054 vty_out(vty, " %s\n", buf);
11055 }
11056 }
11057 }
f14e6fdb 11058
d62a17ae 11059 /* Display group members and their status */
11060 if (listcount(group->peer)) {
11061 vty_out(vty, " Peer-group members:\n");
11062 for (ALL_LIST_ELEMENTS(group->peer, node, nnode, peer)) {
11063 if (CHECK_FLAG(peer->flags, PEER_FLAG_SHUTDOWN))
11064 peer_status = "Idle (Admin)";
11065 else if (CHECK_FLAG(peer->sflags,
11066 PEER_STATUS_PREFIX_OVERFLOW))
11067 peer_status = "Idle (PfxCt)";
11068 else
11069 peer_status = lookup_msg(bgp_status_msg,
11070 peer->status, NULL);
11071
11072 dynamic = peer_dynamic_neighbor(peer);
11073 vty_out(vty, " %s %s %s \n", peer->host,
11074 dynamic ? "(dynamic)" : "", peer_status);
11075 }
11076 }
f14e6fdb 11077
d62a17ae 11078 return CMD_SUCCESS;
11079}
11080
ff9959b0
QY		 11081static int bgp_show_peer_group_vty(struct vty *vty, const char *name,
11082 const char *group_name)
d62a17ae 11083{
ff9959b0 11084 struct bgp *bgp;
d62a17ae 11085 struct listnode *node, *nnode;
11086 struct peer_group *group;
ff9959b0
QY		 11087 bool found = false;
11088
11089 bgp = name ? bgp_lookup_by_name(name) : bgp_get_default();
11090
11091 if (!bgp) {
11092 vty_out(vty, "%% No such BGP instance exists\n");
11093 return CMD_WARNING;
11094 }
d62a17ae 11095
11096 for (ALL_LIST_ELEMENTS(bgp->group, node, nnode, group)) {
ff9959b0
QY		 11097 if (group_name) {
11098 if (strmatch(group->name, group_name)) {
d62a17ae 11099 bgp_show_one_peer_group(vty, group);
ff9959b0
QY		 11100 found = true;
11101 break;
d62a17ae 11102 }
ff9959b0
QY		 11103 } else {
11104 bgp_show_one_peer_group(vty, group);
d62a17ae 11105 }
f14e6fdb 11106 }
f14e6fdb 11107
ff9959b0 11108 if (group_name && !found)
d62a17ae 11109 vty_out(vty, "%% No such peer-group\n");
f14e6fdb 11110
d62a17ae 11111 return CMD_SUCCESS;
f14e6fdb
DS		 11112}
11113
f14e6fdb
DS		 11114DEFUN (show_ip_bgp_peer_groups,
11115 show_ip_bgp_peer_groups_cmd,
18c57037 11116 "show [ip] bgp [<view|vrf> VIEWVRFNAME] peer-group [PGNAME]",
f14e6fdb
DS		 11117 SHOW_STR
11118 IP_STR
11119 BGP_STR
8386ac43 11120 BGP_INSTANCE_HELP_STR
d6e3c605
QY		 11121 "Detailed information on BGP peer groups\n"
11122 "Peer group name\n")
f14e6fdb 11123{
d62a17ae 11124 char *vrf, *pg;
11125 vrf = pg = NULL;
11126 int idx = 0;
f14e6fdb 11127
a4d82a8a
PZ		 11128 vrf = argv_find(argv, argc, "VIEWVRFNAME", &idx) ? argv[idx]->arg
11129 : NULL;
d62a17ae 11130 pg = argv_find(argv, argc, "PGNAME", &idx) ? argv[idx]->arg : NULL;
f14e6fdb 11131
ff9959b0 11132 return bgp_show_peer_group_vty(vty, vrf, pg);
f14e6fdb 11133}
3f9c7369 11134
d6e3c605 11135
718e3744 11136/* Redistribute VTY commands. */
11137
718e3744 11138DEFUN (bgp_redistribute_ipv4,
11139 bgp_redistribute_ipv4_cmd,
40d1cbfb 11140 "redistribute " FRR_IP_REDIST_STR_BGPD,
718e3744 11141 "Redistribute information from another routing protocol\n"
ab0181ee 11142 FRR_IP_REDIST_HELP_STR_BGPD)
718e3744 11143{
d62a17ae 11144 VTY_DECLVAR_CONTEXT(bgp, bgp);
11145 int idx_protocol = 1;
11146 int type;
718e3744 11147
d62a17ae 11148 type = proto_redistnum(AFI_IP, argv[idx_protocol]->text);
11149 if (type < 0) {
11150 vty_out(vty, "%% Invalid route type\n");
11151 return CMD_WARNING_CONFIG_FAILED;
11152 }
7f323236 11153
d62a17ae 11154 bgp_redist_add(bgp, AFI_IP, type, 0);
11155 return bgp_redistribute_set(bgp, AFI_IP, type, 0);
718e3744 11156}
11157
d62a17ae 11158ALIAS_HIDDEN(
11159 bgp_redistribute_ipv4, bgp_redistribute_ipv4_hidden_cmd,
11160 "redistribute " FRR_IP_REDIST_STR_BGPD,
11161 "Redistribute information from another routing protocol\n" FRR_IP_REDIST_HELP_STR_BGPD)
596c17ba 11162
718e3744 11163DEFUN (bgp_redistribute_ipv4_rmap,
11164 bgp_redistribute_ipv4_rmap_cmd,
40d1cbfb 11165 "redistribute " FRR_IP_REDIST_STR_BGPD " route-map WORD",
718e3744 11166 "Redistribute information from another routing protocol\n"
ab0181ee 11167 FRR_IP_REDIST_HELP_STR_BGPD
718e3744 11168 "Route map reference\n"
11169 "Pointer to route-map entries\n")
11170{
d62a17ae 11171 VTY_DECLVAR_CONTEXT(bgp, bgp);
11172 int idx_protocol = 1;
11173 int idx_word = 3;
11174 int type;
11175 struct bgp_redist *red;
718e3744 11176
d62a17ae 11177 type = proto_redistnum(AFI_IP, argv[idx_protocol]->text);
11178 if (type < 0) {
11179 vty_out(vty, "%% Invalid route type\n");
11180 return CMD_WARNING_CONFIG_FAILED;
11181 }
718e3744 11182
d62a17ae 11183 red = bgp_redist_add(bgp, AFI_IP, type, 0);
11184 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11185 return bgp_redistribute_set(bgp, AFI_IP, type, 0);
718e3744 11186}
11187
d62a17ae 11188ALIAS_HIDDEN(
11189 bgp_redistribute_ipv4_rmap, bgp_redistribute_ipv4_rmap_hidden_cmd,
11190 "redistribute " FRR_IP_REDIST_STR_BGPD " route-map WORD",
11191 "Redistribute information from another routing protocol\n" FRR_IP_REDIST_HELP_STR_BGPD
11192 "Route map reference\n"
11193 "Pointer to route-map entries\n")
596c17ba 11194
718e3744 11195DEFUN (bgp_redistribute_ipv4_metric,
11196 bgp_redistribute_ipv4_metric_cmd,
40d1cbfb 11197 "redistribute " FRR_IP_REDIST_STR_BGPD " metric (0-4294967295)",
718e3744 11198 "Redistribute information from another routing protocol\n"
ab0181ee 11199 FRR_IP_REDIST_HELP_STR_BGPD
718e3744 11200 "Metric for redistributed routes\n"
11201 "Default metric\n")
11202{
d62a17ae 11203 VTY_DECLVAR_CONTEXT(bgp, bgp);
11204 int idx_protocol = 1;
11205 int idx_number = 3;
11206 int type;
d7c0a89a 11207 uint32_t metric;
d62a17ae 11208 struct bgp_redist *red;
11209
11210 type = proto_redistnum(AFI_IP, argv[idx_protocol]->text);
11211 if (type < 0) {
11212 vty_out(vty, "%% Invalid route type\n");
11213 return CMD_WARNING_CONFIG_FAILED;
11214 }
11215 metric = strtoul(argv[idx_number]->arg, NULL, 10);
11216
11217 red = bgp_redist_add(bgp, AFI_IP, type, 0);
11218 bgp_redistribute_metric_set(bgp, red, AFI_IP, type, metric);
11219 return bgp_redistribute_set(bgp, AFI_IP, type, 0);
11220}
11221
11222ALIAS_HIDDEN(
11223 bgp_redistribute_ipv4_metric, bgp_redistribute_ipv4_metric_hidden_cmd,
11224 "redistribute " FRR_IP_REDIST_STR_BGPD " metric (0-4294967295)",
11225 "Redistribute information from another routing protocol\n" FRR_IP_REDIST_HELP_STR_BGPD
11226 "Metric for redistributed routes\n"
11227 "Default metric\n")
596c17ba 11228
718e3744 11229DEFUN (bgp_redistribute_ipv4_rmap_metric,
11230 bgp_redistribute_ipv4_rmap_metric_cmd,
40d1cbfb 11231 "redistribute " FRR_IP_REDIST_STR_BGPD " route-map WORD metric (0-4294967295)",
718e3744 11232 "Redistribute information from another routing protocol\n"
ab0181ee 11233 FRR_IP_REDIST_HELP_STR_BGPD
718e3744 11234 "Route map reference\n"
11235 "Pointer to route-map entries\n"
11236 "Metric for redistributed routes\n"
11237 "Default metric\n")
11238{
d62a17ae 11239 VTY_DECLVAR_CONTEXT(bgp, bgp);
11240 int idx_protocol = 1;
11241 int idx_word = 3;
11242 int idx_number = 5;
11243 int type;
d7c0a89a 11244 uint32_t metric;
d62a17ae 11245 struct bgp_redist *red;
11246
11247 type = proto_redistnum(AFI_IP, argv[idx_protocol]->text);
11248 if (type < 0) {
11249 vty_out(vty, "%% Invalid route type\n");
11250 return CMD_WARNING_CONFIG_FAILED;
11251 }
11252 metric = strtoul(argv[idx_number]->arg, NULL, 10);
11253
11254 red = bgp_redist_add(bgp, AFI_IP, type, 0);
11255 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11256 bgp_redistribute_metric_set(bgp, red, AFI_IP, type, metric);
11257 return bgp_redistribute_set(bgp, AFI_IP, type, 0);
11258}
11259
11260ALIAS_HIDDEN(
11261 bgp_redistribute_ipv4_rmap_metric,
11262 bgp_redistribute_ipv4_rmap_metric_hidden_cmd,
11263 "redistribute " FRR_IP_REDIST_STR_BGPD
11264 " route-map WORD metric (0-4294967295)",
11265 "Redistribute information from another routing protocol\n" FRR_IP_REDIST_HELP_STR_BGPD
11266 "Route map reference\n"
11267 "Pointer to route-map entries\n"
11268 "Metric for redistributed routes\n"
11269 "Default metric\n")
596c17ba 11270
718e3744 11271DEFUN (bgp_redistribute_ipv4_metric_rmap,
11272 bgp_redistribute_ipv4_metric_rmap_cmd,
40d1cbfb 11273 "redistribute " FRR_IP_REDIST_STR_BGPD " metric (0-4294967295) route-map WORD",
718e3744 11274 "Redistribute information from another routing protocol\n"
ab0181ee 11275 FRR_IP_REDIST_HELP_STR_BGPD
718e3744 11276 "Metric for redistributed routes\n"
11277 "Default metric\n"
11278 "Route map reference\n"
11279 "Pointer to route-map entries\n")
11280{
d62a17ae 11281 VTY_DECLVAR_CONTEXT(bgp, bgp);
11282 int idx_protocol = 1;
11283 int idx_number = 3;
11284 int idx_word = 5;
11285 int type;
d7c0a89a 11286 uint32_t metric;
d62a17ae 11287 struct bgp_redist *red;
11288
11289 type = proto_redistnum(AFI_IP, argv[idx_protocol]->text);
11290 if (type < 0) {
11291 vty_out(vty, "%% Invalid route type\n");
11292 return CMD_WARNING_CONFIG_FAILED;
11293 }
11294 metric = strtoul(argv[idx_number]->arg, NULL, 10);
11295
11296 red = bgp_redist_add(bgp, AFI_IP, type, 0);
11297 bgp_redistribute_metric_set(bgp, red, AFI_IP, type, metric);
11298 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11299 return bgp_redistribute_set(bgp, AFI_IP, type, 0);
11300}
11301
11302ALIAS_HIDDEN(
11303 bgp_redistribute_ipv4_metric_rmap,
11304 bgp_redistribute_ipv4_metric_rmap_hidden_cmd,
11305 "redistribute " FRR_IP_REDIST_STR_BGPD
11306 " metric (0-4294967295) route-map WORD",
11307 "Redistribute information from another routing protocol\n" FRR_IP_REDIST_HELP_STR_BGPD
11308 "Metric for redistributed routes\n"
11309 "Default metric\n"
11310 "Route map reference\n"
11311 "Pointer to route-map entries\n")
596c17ba 11312
7c8ff89e
DS		 11313DEFUN (bgp_redistribute_ipv4_ospf,
11314 bgp_redistribute_ipv4_ospf_cmd,
6147e2c6 11315 "redistribute <ospf|table> (1-65535)",
7c8ff89e
DS		 11316 "Redistribute information from another routing protocol\n"
11317 "Open Shortest Path First (OSPFv2)\n"
2d627ff5
DS		 11318 "Non-main Kernel Routing Table\n"
11319 "Instance ID/Table ID\n")
7c8ff89e 11320{
d62a17ae 11321 VTY_DECLVAR_CONTEXT(bgp, bgp);
11322 int idx_ospf_table = 1;
11323 int idx_number = 2;
d7c0a89a
QY		 11324 unsigned short instance;
11325 unsigned short protocol;
7c8ff89e 11326
d62a17ae 11327 instance = strtoul(argv[idx_number]->arg, NULL, 10);
7a4bb9c5 11328
d62a17ae 11329 if (strncmp(argv[idx_ospf_table]->arg, "o", 1) == 0)
11330 protocol = ZEBRA_ROUTE_OSPF;
11331 else
11332 protocol = ZEBRA_ROUTE_TABLE;
7a4bb9c5 11333
d62a17ae 11334 bgp_redist_add(bgp, AFI_IP, protocol, instance);
11335 return bgp_redistribute_set(bgp, AFI_IP, protocol, instance);
7c8ff89e
DS		 11336}
11337
d62a17ae 11338ALIAS_HIDDEN(bgp_redistribute_ipv4_ospf, bgp_redistribute_ipv4_ospf_hidden_cmd,
11339 "redistribute <ospf|table> (1-65535)",
11340 "Redistribute information from another routing protocol\n"
11341 "Open Shortest Path First (OSPFv2)\n"
11342 "Non-main Kernel Routing Table\n"
11343 "Instance ID/Table ID\n")
596c17ba 11344
7c8ff89e
DS		 11345DEFUN (bgp_redistribute_ipv4_ospf_rmap,
11346 bgp_redistribute_ipv4_ospf_rmap_cmd,
6147e2c6 11347 "redistribute <ospf|table> (1-65535) route-map WORD",
7c8ff89e
DS		 11348 "Redistribute information from another routing protocol\n"
11349 "Open Shortest Path First (OSPFv2)\n"
2d627ff5
DS		 11350 "Non-main Kernel Routing Table\n"
11351 "Instance ID/Table ID\n"
7c8ff89e
DS		 11352 "Route map reference\n"
11353 "Pointer to route-map entries\n")
11354{
d62a17ae 11355 VTY_DECLVAR_CONTEXT(bgp, bgp);
11356 int idx_ospf_table = 1;
11357 int idx_number = 2;
11358 int idx_word = 4;
11359 struct bgp_redist *red;
d7c0a89a 11360 unsigned short instance;
d62a17ae 11361 int protocol;
11362
11363 if (strncmp(argv[idx_ospf_table]->arg, "o", 1) == 0)
11364 protocol = ZEBRA_ROUTE_OSPF;
11365 else
11366 protocol = ZEBRA_ROUTE_TABLE;
11367
11368 instance = strtoul(argv[idx_number]->arg, NULL, 10);
11369 red = bgp_redist_add(bgp, AFI_IP, protocol, instance);
11370 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11371 return bgp_redistribute_set(bgp, AFI_IP, protocol, instance);
11372}
11373
11374ALIAS_HIDDEN(bgp_redistribute_ipv4_ospf_rmap,
11375 bgp_redistribute_ipv4_ospf_rmap_hidden_cmd,
11376 "redistribute <ospf|table> (1-65535) route-map WORD",
11377 "Redistribute information from another routing protocol\n"
11378 "Open Shortest Path First (OSPFv2)\n"
11379 "Non-main Kernel Routing Table\n"
11380 "Instance ID/Table ID\n"
11381 "Route map reference\n"
11382 "Pointer to route-map entries\n")
596c17ba 11383
7c8ff89e
DS		 11384DEFUN (bgp_redistribute_ipv4_ospf_metric,
11385 bgp_redistribute_ipv4_ospf_metric_cmd,
6147e2c6 11386 "redistribute <ospf|table> (1-65535) metric (0-4294967295)",
7c8ff89e
DS		 11387 "Redistribute information from another routing protocol\n"
11388 "Open Shortest Path First (OSPFv2)\n"
2d627ff5
DS		 11389 "Non-main Kernel Routing Table\n"
11390 "Instance ID/Table ID\n"
7c8ff89e
DS		 11391 "Metric for redistributed routes\n"
11392 "Default metric\n")
11393{
d62a17ae 11394 VTY_DECLVAR_CONTEXT(bgp, bgp);
11395 int idx_ospf_table = 1;
11396 int idx_number = 2;
11397 int idx_number_2 = 4;
d7c0a89a 11398 uint32_t metric;
d62a17ae 11399 struct bgp_redist *red;
d7c0a89a 11400 unsigned short instance;
d62a17ae 11401 int protocol;
11402
11403 if (strncmp(argv[idx_ospf_table]->arg, "o", 1) == 0)
11404 protocol = ZEBRA_ROUTE_OSPF;
11405 else
11406 protocol = ZEBRA_ROUTE_TABLE;
11407
11408 instance = strtoul(argv[idx_number]->arg, NULL, 10);
11409 metric = strtoul(argv[idx_number_2]->arg, NULL, 10);
11410
11411 red = bgp_redist_add(bgp, AFI_IP, protocol, instance);
11412 bgp_redistribute_metric_set(bgp, red, AFI_IP, protocol, metric);
11413 return bgp_redistribute_set(bgp, AFI_IP, protocol, instance);
11414}
11415
11416ALIAS_HIDDEN(bgp_redistribute_ipv4_ospf_metric,
11417 bgp_redistribute_ipv4_ospf_metric_hidden_cmd,
11418 "redistribute <ospf|table> (1-65535) metric (0-4294967295)",
11419 "Redistribute information from another routing protocol\n"
11420 "Open Shortest Path First (OSPFv2)\n"
11421 "Non-main Kernel Routing Table\n"
11422 "Instance ID/Table ID\n"
11423 "Metric for redistributed routes\n"
11424 "Default metric\n")
596c17ba 11425
7c8ff89e
DS		 11426DEFUN (bgp_redistribute_ipv4_ospf_rmap_metric,
11427 bgp_redistribute_ipv4_ospf_rmap_metric_cmd,
6147e2c6 11428 "redistribute <ospf|table> (1-65535) route-map WORD metric (0-4294967295)",
7c8ff89e
DS		 11429 "Redistribute information from another routing protocol\n"
11430 "Open Shortest Path First (OSPFv2)\n"
2d627ff5
DS		 11431 "Non-main Kernel Routing Table\n"
11432 "Instance ID/Table ID\n"
7c8ff89e
DS		 11433 "Route map reference\n"
11434 "Pointer to route-map entries\n"
11435 "Metric for redistributed routes\n"
11436 "Default metric\n")
11437{
d62a17ae 11438 VTY_DECLVAR_CONTEXT(bgp, bgp);
11439 int idx_ospf_table = 1;
11440 int idx_number = 2;
11441 int idx_word = 4;
11442 int idx_number_2 = 6;
d7c0a89a 11443 uint32_t metric;
d62a17ae 11444 struct bgp_redist *red;
d7c0a89a 11445 unsigned short instance;
d62a17ae 11446 int protocol;
11447
11448 if (strncmp(argv[idx_ospf_table]->arg, "o", 1) == 0)
11449 protocol = ZEBRA_ROUTE_OSPF;
11450 else
11451 protocol = ZEBRA_ROUTE_TABLE;
11452
11453 instance = strtoul(argv[idx_number]->arg, NULL, 10);
11454 metric = strtoul(argv[idx_number_2]->arg, NULL, 10);
11455
11456 red = bgp_redist_add(bgp, AFI_IP, protocol, instance);
11457 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11458 bgp_redistribute_metric_set(bgp, red, AFI_IP, protocol, metric);
11459 return bgp_redistribute_set(bgp, AFI_IP, protocol, instance);
11460}
11461
11462ALIAS_HIDDEN(
11463 bgp_redistribute_ipv4_ospf_rmap_metric,
11464 bgp_redistribute_ipv4_ospf_rmap_metric_hidden_cmd,
11465 "redistribute <ospf|table> (1-65535) route-map WORD metric (0-4294967295)",
11466 "Redistribute information from another routing protocol\n"
11467 "Open Shortest Path First (OSPFv2)\n"
11468 "Non-main Kernel Routing Table\n"
11469 "Instance ID/Table ID\n"
11470 "Route map reference\n"
11471 "Pointer to route-map entries\n"
11472 "Metric for redistributed routes\n"
11473 "Default metric\n")
596c17ba 11474
7c8ff89e
DS		 11475DEFUN (bgp_redistribute_ipv4_ospf_metric_rmap,
11476 bgp_redistribute_ipv4_ospf_metric_rmap_cmd,
6147e2c6 11477 "redistribute <ospf|table> (1-65535) metric (0-4294967295) route-map WORD",
7c8ff89e
DS		 11478 "Redistribute information from another routing protocol\n"
11479 "Open Shortest Path First (OSPFv2)\n"
2d627ff5
DS		 11480 "Non-main Kernel Routing Table\n"
11481 "Instance ID/Table ID\n"
7c8ff89e
DS		 11482 "Metric for redistributed routes\n"
11483 "Default metric\n"
11484 "Route map reference\n"
11485 "Pointer to route-map entries\n")
11486{
d62a17ae 11487 VTY_DECLVAR_CONTEXT(bgp, bgp);
11488 int idx_ospf_table = 1;
11489 int idx_number = 2;
11490 int idx_number_2 = 4;
11491 int idx_word = 6;
d7c0a89a 11492 uint32_t metric;
d62a17ae 11493 struct bgp_redist *red;
d7c0a89a 11494 unsigned short instance;
d62a17ae 11495 int protocol;
11496
11497 if (strncmp(argv[idx_ospf_table]->arg, "o", 1) == 0)
11498 protocol = ZEBRA_ROUTE_OSPF;
11499 else
11500 protocol = ZEBRA_ROUTE_TABLE;
11501
11502 instance = strtoul(argv[idx_number]->arg, NULL, 10);
11503 metric = strtoul(argv[idx_number_2]->arg, NULL, 10);
11504
11505 red = bgp_redist_add(bgp, AFI_IP, protocol, instance);
11506 bgp_redistribute_metric_set(bgp, red, AFI_IP, protocol, metric);
11507 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11508 return bgp_redistribute_set(bgp, AFI_IP, protocol, instance);
11509}
11510
11511ALIAS_HIDDEN(
11512 bgp_redistribute_ipv4_ospf_metric_rmap,
11513 bgp_redistribute_ipv4_ospf_metric_rmap_hidden_cmd,
11514 "redistribute <ospf|table> (1-65535) metric (0-4294967295) route-map WORD",
11515 "Redistribute information from another routing protocol\n"
11516 "Open Shortest Path First (OSPFv2)\n"
11517 "Non-main Kernel Routing Table\n"
11518 "Instance ID/Table ID\n"
11519 "Metric for redistributed routes\n"
11520 "Default metric\n"
11521 "Route map reference\n"
11522 "Pointer to route-map entries\n")
596c17ba 11523
7c8ff89e
DS		 11524DEFUN (no_bgp_redistribute_ipv4_ospf,
11525 no_bgp_redistribute_ipv4_ospf_cmd,
d04c479d 11526 "no redistribute <ospf|table> (1-65535) [metric (0-4294967295)] [route-map WORD]",
7c8ff89e
DS		 11527 NO_STR
11528 "Redistribute information from another routing protocol\n"
11529 "Open Shortest Path First (OSPFv2)\n"
2d627ff5 11530 "Non-main Kernel Routing Table\n"
31500417
DW		 11531 "Instance ID/Table ID\n"
11532 "Metric for redistributed routes\n"
11533 "Default metric\n"
11534 "Route map reference\n"
11535 "Pointer to route-map entries\n")
7c8ff89e 11536{
d62a17ae 11537 VTY_DECLVAR_CONTEXT(bgp, bgp);
11538 int idx_ospf_table = 2;
11539 int idx_number = 3;
d7c0a89a 11540 unsigned short instance;
d62a17ae 11541 int protocol;
11542
11543 if (strncmp(argv[idx_ospf_table]->arg, "o", 1) == 0)
11544 protocol = ZEBRA_ROUTE_OSPF;
11545 else
11546 protocol = ZEBRA_ROUTE_TABLE;
11547
11548 instance = strtoul(argv[idx_number]->arg, NULL, 10);
11549 return bgp_redistribute_unset(bgp, AFI_IP, protocol, instance);
11550}
11551
11552ALIAS_HIDDEN(
11553 no_bgp_redistribute_ipv4_ospf, no_bgp_redistribute_ipv4_ospf_hidden_cmd,
11554 "no redistribute <ospf|table> (1-65535) [metric (0-4294967295)] [route-map WORD]",
11555 NO_STR
11556 "Redistribute information from another routing protocol\n"
11557 "Open Shortest Path First (OSPFv2)\n"
11558 "Non-main Kernel Routing Table\n"
11559 "Instance ID/Table ID\n"
11560 "Metric for redistributed routes\n"
11561 "Default metric\n"
11562 "Route map reference\n"
11563 "Pointer to route-map entries\n")
596c17ba 11564
718e3744 11565DEFUN (no_bgp_redistribute_ipv4,
11566 no_bgp_redistribute_ipv4_cmd,
40d1cbfb 11567 "no redistribute " FRR_IP_REDIST_STR_BGPD " [metric (0-4294967295)] [route-map WORD]",
718e3744 11568 NO_STR
11569 "Redistribute information from another routing protocol\n"
3b14d86e 11570 FRR_IP_REDIST_HELP_STR_BGPD
31500417
DW		 11571 "Metric for redistributed routes\n"
11572 "Default metric\n"
11573 "Route map reference\n"
11574 "Pointer to route-map entries\n")
718e3744 11575{
d62a17ae 11576 VTY_DECLVAR_CONTEXT(bgp, bgp);
11577 int idx_protocol = 2;
11578 int type;
11579
11580 type = proto_redistnum(AFI_IP, argv[idx_protocol]->text);
11581 if (type < 0) {
11582 vty_out(vty, "%% Invalid route type\n");
11583 return CMD_WARNING_CONFIG_FAILED;
11584 }
11585 return bgp_redistribute_unset(bgp, AFI_IP, type, 0);
11586}
11587
11588ALIAS_HIDDEN(
11589 no_bgp_redistribute_ipv4, no_bgp_redistribute_ipv4_hidden_cmd,
11590 "no redistribute " FRR_IP_REDIST_STR_BGPD
11591 " [metric (0-4294967295)] [route-map WORD]",
11592 NO_STR
11593 "Redistribute information from another routing protocol\n" FRR_IP_REDIST_HELP_STR_BGPD
11594 "Metric for redistributed routes\n"
11595 "Default metric\n"
11596 "Route map reference\n"
11597 "Pointer to route-map entries\n")
596c17ba 11598
718e3744 11599DEFUN (bgp_redistribute_ipv6,
11600 bgp_redistribute_ipv6_cmd,
40d1cbfb 11601 "redistribute " FRR_IP6_REDIST_STR_BGPD,
718e3744 11602 "Redistribute information from another routing protocol\n"
ab0181ee 11603 FRR_IP6_REDIST_HELP_STR_BGPD)
718e3744 11604{
d62a17ae 11605 VTY_DECLVAR_CONTEXT(bgp, bgp);
11606 int idx_protocol = 1;
11607 int type;
718e3744 11608
d62a17ae 11609 type = proto_redistnum(AFI_IP6, argv[idx_protocol]->text);
11610 if (type < 0) {
11611 vty_out(vty, "%% Invalid route type\n");
11612 return CMD_WARNING_CONFIG_FAILED;
11613 }
718e3744 11614
d62a17ae 11615 bgp_redist_add(bgp, AFI_IP6, type, 0);
11616 return bgp_redistribute_set(bgp, AFI_IP6, type, 0);
718e3744 11617}
11618
11619DEFUN (bgp_redistribute_ipv6_rmap,
11620 bgp_redistribute_ipv6_rmap_cmd,
40d1cbfb 11621 "redistribute " FRR_IP6_REDIST_STR_BGPD " route-map WORD",
718e3744 11622 "Redistribute information from another routing protocol\n"
ab0181ee 11623 FRR_IP6_REDIST_HELP_STR_BGPD
718e3744 11624 "Route map reference\n"
11625 "Pointer to route-map entries\n")
11626{
d62a17ae 11627 VTY_DECLVAR_CONTEXT(bgp, bgp);
11628 int idx_protocol = 1;
11629 int idx_word = 3;
11630 int type;
11631 struct bgp_redist *red;
718e3744 11632
d62a17ae 11633 type = proto_redistnum(AFI_IP6, argv[idx_protocol]->text);
11634 if (type < 0) {
11635 vty_out(vty, "%% Invalid route type\n");
11636 return CMD_WARNING_CONFIG_FAILED;
11637 }
718e3744 11638
d62a17ae 11639 red = bgp_redist_add(bgp, AFI_IP6, type, 0);
11640 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11641 return bgp_redistribute_set(bgp, AFI_IP6, type, 0);
718e3744 11642}
11643
11644DEFUN (bgp_redistribute_ipv6_metric,
11645 bgp_redistribute_ipv6_metric_cmd,
40d1cbfb 11646 "redistribute " FRR_IP6_REDIST_STR_BGPD " metric (0-4294967295)",
718e3744 11647 "Redistribute information from another routing protocol\n"
ab0181ee 11648 FRR_IP6_REDIST_HELP_STR_BGPD
718e3744 11649 "Metric for redistributed routes\n"
11650 "Default metric\n")
11651{
d62a17ae 11652 VTY_DECLVAR_CONTEXT(bgp, bgp);
11653 int idx_protocol = 1;
11654 int idx_number = 3;
11655 int type;
d7c0a89a 11656 uint32_t metric;
d62a17ae 11657 struct bgp_redist *red;
11658
11659 type = proto_redistnum(AFI_IP6, argv[idx_protocol]->text);
11660 if (type < 0) {
11661 vty_out(vty, "%% Invalid route type\n");
11662 return CMD_WARNING_CONFIG_FAILED;
11663 }
11664 metric = strtoul(argv[idx_number]->arg, NULL, 10);
718e3744 11665
d62a17ae 11666 red = bgp_redist_add(bgp, AFI_IP6, type, 0);
11667 bgp_redistribute_metric_set(bgp, red, AFI_IP6, type, metric);
11668 return bgp_redistribute_set(bgp, AFI_IP6, type, 0);
718e3744 11669}
11670
11671DEFUN (bgp_redistribute_ipv6_rmap_metric,
11672 bgp_redistribute_ipv6_rmap_metric_cmd,
40d1cbfb 11673 "redistribute " FRR_IP6_REDIST_STR_BGPD " route-map WORD metric (0-4294967295)",
718e3744 11674 "Redistribute information from another routing protocol\n"
ab0181ee 11675 FRR_IP6_REDIST_HELP_STR_BGPD
718e3744 11676 "Route map reference\n"
11677 "Pointer to route-map entries\n"
11678 "Metric for redistributed routes\n"
11679 "Default metric\n")
11680{
d62a17ae 11681 VTY_DECLVAR_CONTEXT(bgp, bgp);
11682 int idx_protocol = 1;
11683 int idx_word = 3;
11684 int idx_number = 5;
11685 int type;
d7c0a89a 11686 uint32_t metric;
d62a17ae 11687 struct bgp_redist *red;
11688
11689 type = proto_redistnum(AFI_IP6, argv[idx_protocol]->text);
11690 if (type < 0) {
11691 vty_out(vty, "%% Invalid route type\n");
11692 return CMD_WARNING_CONFIG_FAILED;
11693 }
11694 metric = strtoul(argv[idx_number]->arg, NULL, 10);
718e3744 11695
d62a17ae 11696 red = bgp_redist_add(bgp, AFI_IP6, type, 0);
11697 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11698 bgp_redistribute_metric_set(bgp, red, AFI_IP6, type, metric);
11699 return bgp_redistribute_set(bgp, AFI_IP6, type, 0);
718e3744 11700}
11701
11702DEFUN (bgp_redistribute_ipv6_metric_rmap,
11703 bgp_redistribute_ipv6_metric_rmap_cmd,
40d1cbfb 11704 "redistribute " FRR_IP6_REDIST_STR_BGPD " metric (0-4294967295) route-map WORD",
718e3744 11705 "Redistribute information from another routing protocol\n"
ab0181ee 11706 FRR_IP6_REDIST_HELP_STR_BGPD
718e3744 11707 "Metric for redistributed routes\n"
11708 "Default metric\n"
11709 "Route map reference\n"
11710 "Pointer to route-map entries\n")
11711{
d62a17ae 11712 VTY_DECLVAR_CONTEXT(bgp, bgp);
11713 int idx_protocol = 1;
11714 int idx_number = 3;
11715 int idx_word = 5;
11716 int type;
d7c0a89a 11717 uint32_t metric;
d62a17ae 11718 struct bgp_redist *red;
11719
11720 type = proto_redistnum(AFI_IP6, argv[idx_protocol]->text);
11721 if (type < 0) {
11722 vty_out(vty, "%% Invalid route type\n");
11723 return CMD_WARNING_CONFIG_FAILED;
11724 }
11725 metric = strtoul(argv[idx_number]->arg, NULL, 10);
718e3744 11726
d62a17ae 11727 red = bgp_redist_add(bgp, AFI_IP6, type, 0);
11728 bgp_redistribute_metric_set(bgp, red, AFI_IP6, SAFI_UNICAST, metric);
11729 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11730 return bgp_redistribute_set(bgp, AFI_IP6, type, 0);
718e3744 11731}
11732
11733DEFUN (no_bgp_redistribute_ipv6,
11734 no_bgp_redistribute_ipv6_cmd,
40d1cbfb 11735 "no redistribute " FRR_IP6_REDIST_STR_BGPD " [metric (0-4294967295)] [route-map WORD]",
718e3744 11736 NO_STR
11737 "Redistribute information from another routing protocol\n"
3b14d86e 11738 FRR_IP6_REDIST_HELP_STR_BGPD
31500417
DW		 11739 "Metric for redistributed routes\n"
11740 "Default metric\n"
11741 "Route map reference\n"
11742 "Pointer to route-map entries\n")
718e3744 11743{
d62a17ae 11744 VTY_DECLVAR_CONTEXT(bgp, bgp);
11745 int idx_protocol = 2;
11746 int type;
718e3744 11747
d62a17ae 11748 type = proto_redistnum(AFI_IP6, argv[idx_protocol]->text);
11749 if (type < 0) {
11750 vty_out(vty, "%% Invalid route type\n");
11751 return CMD_WARNING_CONFIG_FAILED;
11752 }
718e3744 11753
d62a17ae 11754 return bgp_redistribute_unset(bgp, AFI_IP6, type, 0);
11755}
11756
2b791107 11757void bgp_config_write_redistribute(struct vty *vty, struct bgp *bgp, afi_t afi,
60466a63 11758 safi_t safi)
d62a17ae 11759{
11760 int i;
11761
11762 /* Unicast redistribution only. */
11763 if (safi != SAFI_UNICAST)
2b791107 11764 return;
d62a17ae 11765
11766 for (i = 0; i < ZEBRA_ROUTE_MAX; i++) {
11767 /* Redistribute BGP does not make sense. */
11768 if (i != ZEBRA_ROUTE_BGP) {
11769 struct list *red_list;
11770 struct listnode *node;
11771 struct bgp_redist *red;
11772
11773 red_list = bgp->redist[afi][i];
11774 if (!red_list)
11775 continue;
11776
11777 for (ALL_LIST_ELEMENTS_RO(red_list, node, red)) {
d62a17ae 11778 /* "redistribute" configuration. */
11779 vty_out(vty, " redistribute %s",
11780 zebra_route_string(i));
11781 if (red->instance)
11782 vty_out(vty, " %d", red->instance);
11783 if (red->redist_metric_flag)
11784 vty_out(vty, " metric %u",
11785 red->redist_metric);
11786 if (red->rmap.name)
11787 vty_out(vty, " route-map %s",
11788 red->rmap.name);
11789 vty_out(vty, "\n");
11790 }
11791 }
11792 }
718e3744 11793}
6b0655a2 11794
b9c7bc5a
PZ		 11795/* This is part of the address-family block (unicast only) */
11796void bgp_vpn_policy_config_write_afi(struct vty *vty, struct bgp *bgp,
ddb5b488
PZ		 11797 afi_t afi)
11798{
b9c7bc5a 11799 int indent = 2;
ddb5b488 11800
12a844a5
DS		 11801 if (CHECK_FLAG(bgp->af_flags[afi][SAFI_UNICAST],
11802 BGP_CONFIG_VRF_TO_VRF_IMPORT)
11803 || CHECK_FLAG(bgp->af_flags[afi][SAFI_UNICAST],
11804 BGP_CONFIG_VRF_TO_VRF_EXPORT))
11805 return;
11806
e70e9f8e
PZ		 11807 if (CHECK_FLAG(bgp->vpn_policy[afi].flags,
11808 BGP_VPN_POLICY_TOVPN_LABEL_AUTO)) {
11809
11810 vty_out(vty, "%*slabel vpn export %s\n", indent, "", "auto");
11811
11812 } else {
11813 if (bgp->vpn_policy[afi].tovpn_label != MPLS_LABEL_NONE) {
11814 vty_out(vty, "%*slabel vpn export %u\n", indent, "",
11815 bgp->vpn_policy[afi].tovpn_label);
11816 }
ddb5b488
PZ		 11817 }
11818 if (CHECK_FLAG(bgp->vpn_policy[afi].flags,
11819 BGP_VPN_POLICY_TOVPN_RD_SET)) {
11820 char buf[RD_ADDRSTRLEN];
b9c7bc5a 11821 vty_out(vty, "%*srd vpn export %s\n", indent, "",
ddb5b488
PZ		 11822 prefix_rd2str(&bgp->vpn_policy[afi].tovpn_rd, buf,
11823 sizeof(buf)));
11824 }
11825 if (CHECK_FLAG(bgp->vpn_policy[afi].flags,
11826 BGP_VPN_POLICY_TOVPN_NEXTHOP_SET)) {
11827
11828 char buf[PREFIX_STRLEN];
11829 if (inet_ntop(bgp->vpn_policy[afi].tovpn_nexthop.family,
11830 &bgp->vpn_policy[afi].tovpn_nexthop.u.prefix, buf,
11831 sizeof(buf))) {
11832
b9c7bc5a
PZ		 11833 vty_out(vty, "%*snexthop vpn export %s\n",
11834 indent, "", buf);
ddb5b488
PZ		 11835 }
11836 }
11837 if (bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_FROMVPN]
11838 && bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_TOVPN]
11839 && ecommunity_cmp(
11840 bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_FROMVPN],
11841 bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_TOVPN])) {
11842
11843 char *b = ecommunity_ecom2str(
11844 bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_TOVPN],
11845 ECOMMUNITY_FORMAT_ROUTE_MAP, ECOMMUNITY_ROUTE_TARGET);
b9c7bc5a 11846 vty_out(vty, "%*srt vpn both %s\n", indent, "", b);
ddb5b488
PZ		 11847 XFREE(MTYPE_ECOMMUNITY_STR, b);
11848 } else {
11849 if (bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_FROMVPN]) {
11850 char *b = ecommunity_ecom2str(
11851 bgp->vpn_policy[afi]
11852 .rtlist[BGP_VPN_POLICY_DIR_FROMVPN],
11853 ECOMMUNITY_FORMAT_ROUTE_MAP,
11854 ECOMMUNITY_ROUTE_TARGET);
b9c7bc5a 11855 vty_out(vty, "%*srt vpn import %s\n", indent, "", b);
ddb5b488
PZ		 11856 XFREE(MTYPE_ECOMMUNITY_STR, b);
11857 }
11858 if (bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_TOVPN]) {
11859 char *b = ecommunity_ecom2str(
11860 bgp->vpn_policy[afi]
11861 .rtlist[BGP_VPN_POLICY_DIR_TOVPN],
11862 ECOMMUNITY_FORMAT_ROUTE_MAP,
11863 ECOMMUNITY_ROUTE_TARGET);
b9c7bc5a 11864 vty_out(vty, "%*srt vpn export %s\n", indent, "", b);
ddb5b488
PZ		 11865 XFREE(MTYPE_ECOMMUNITY_STR, b);
11866 }
11867 }
11868 if (bgp->vpn_policy[afi].rmap_name[BGP_VPN_POLICY_DIR_FROMVPN]) {
b9c7bc5a 11869 vty_out(vty, "%*sroute-map vpn import %s\n", indent, "",
ddb5b488
PZ		 11870 bgp->vpn_policy[afi]
11871 .rmap_name[BGP_VPN_POLICY_DIR_FROMVPN]);
11872 }
11873 if (bgp->vpn_policy[afi].rmap_name[BGP_VPN_POLICY_DIR_TOVPN]) {
b9c7bc5a 11874 vty_out(vty, "%*sroute-map vpn export %s\n", indent, "",
ddb5b488
PZ		 11875 bgp->vpn_policy[afi]
11876 .rmap_name[BGP_VPN_POLICY_DIR_TOVPN]);
11877 }
301ad80a
PG		 11878 if (bgp->vpn_policy[afi].import_redirect_rtlist) {
11879 char *b = ecommunity_ecom2str(
11880 bgp->vpn_policy[afi]
11881 .import_redirect_rtlist,
11882 ECOMMUNITY_FORMAT_ROUTE_MAP,
11883 ECOMMUNITY_ROUTE_TARGET);
ddb5b488 11884
301ad80a
PG		 11885 vty_out(vty, "%*srt redirect import %s\n", indent, "", b);
11886 XFREE(MTYPE_ECOMMUNITY_STR, b);
11887 }
ddb5b488
PZ		 11888}
11889
11890
718e3744 11891/* BGP node structure. */
d62a17ae 11892static struct cmd_node bgp_node = {
9d303b37 11893 BGP_NODE, "%s(config-router)# ", 1,
718e3744 11894};
11895
d62a17ae 11896static struct cmd_node bgp_ipv4_unicast_node = {
9d303b37 11897 BGP_IPV4_NODE, "%s(config-router-af)# ", 1,
718e3744 11898};
11899
d62a17ae 11900static struct cmd_node bgp_ipv4_multicast_node = {
9d303b37 11901 BGP_IPV4M_NODE, "%s(config-router-af)# ", 1,
718e3744 11902};
11903
d62a17ae 11904static struct cmd_node bgp_ipv4_labeled_unicast_node = {
9d303b37 11905 BGP_IPV4L_NODE, "%s(config-router-af)# ", 1,
f51bae9c
DS		 11906};
11907
d62a17ae 11908static struct cmd_node bgp_ipv6_unicast_node = {
9d303b37 11909 BGP_IPV6_NODE, "%s(config-router-af)# ", 1,
718e3744 11910};
11911
d62a17ae 11912static struct cmd_node bgp_ipv6_multicast_node = {
9d303b37 11913 BGP_IPV6M_NODE, "%s(config-router-af)# ", 1,
25ffbdc1 11914};
11915
d62a17ae 11916static struct cmd_node bgp_ipv6_labeled_unicast_node = {
9d303b37 11917 BGP_IPV6L_NODE, "%s(config-router-af)# ", 1,
f51bae9c
DS		 11918};
11919
d62a17ae 11920static struct cmd_node bgp_vpnv4_node = {BGP_VPNV4_NODE,
11921 "%s(config-router-af)# ", 1};
6b0655a2 11922
d62a17ae 11923static struct cmd_node bgp_vpnv6_node = {BGP_VPNV6_NODE,
11924 "%s(config-router-af-vpnv6)# ", 1};
8ecd3266 11925
d62a17ae 11926static struct cmd_node bgp_evpn_node = {BGP_EVPN_NODE,
11927 "%s(config-router-evpn)# ", 1};
4e0b7b6d 11928
d62a17ae 11929static struct cmd_node bgp_evpn_vni_node = {BGP_EVPN_VNI_NODE,
11930 "%s(config-router-af-vni)# ", 1};
90e60aa7 11931
7c40bf39 11932static struct cmd_node bgp_flowspecv4_node = {BGP_FLOWSPECV4_NODE,
11933 "%s(config-router-af)# ", 1};
11934
11935static struct cmd_node bgp_flowspecv6_node = {BGP_FLOWSPECV6_NODE,
11936 "%s(config-router-af-vpnv6)# ", 1};
11937
d62a17ae 11938static void community_list_vty(void);
1f8ae70b 11939
d62a17ae 11940static void bgp_ac_neighbor(vector comps, struct cmd_token *token)
b8a815e5 11941{
d62a17ae 11942 struct bgp *bgp;
11943 struct peer *peer;
11944 struct peer_group *group;
11945 struct listnode *lnbgp, *lnpeer;
b8a815e5 11946
d62a17ae 11947 for (ALL_LIST_ELEMENTS_RO(bm->bgp, lnbgp, bgp)) {
11948 for (ALL_LIST_ELEMENTS_RO(bgp->peer, lnpeer, peer)) {
11949 /* only provide suggestions on the appropriate input
11950 * token type,
11951 * they'll otherwise show up multiple times */
11952 enum cmd_token_type match_type;
11953 char *name = peer->host;
d48ed3e0 11954
d62a17ae 11955 if (peer->conf_if) {
11956 match_type = VARIABLE_TKN;
11957 name = peer->conf_if;
11958 } else if (strchr(peer->host, ':'))
11959 match_type = IPV6_TKN;
11960 else
11961 match_type = IPV4_TKN;
d48ed3e0 11962
d62a17ae 11963 if (token->type != match_type)
11964 continue;
d48ed3e0 11965
d62a17ae 11966 vector_set(comps, XSTRDUP(MTYPE_COMPLETION, name));
11967 }
d48ed3e0 11968
d62a17ae 11969 if (token->type == VARIABLE_TKN)
11970 for (ALL_LIST_ELEMENTS_RO(bgp->group, lnpeer, group))
11971 vector_set(comps, XSTRDUP(MTYPE_COMPLETION,
11972 group->name));
11973 }
b8a815e5
DL		 11974}
11975
11976static const struct cmd_variable_handler bgp_var_neighbor[] = {
d62a17ae 11977 {.varname = "neighbor", .completions = bgp_ac_neighbor},
11978 {.varname = "neighbors", .completions = bgp_ac_neighbor},
7d4aea30 11979 {.varname = "peer", .completions = bgp_ac_neighbor},
d62a17ae 11980 {.completions = NULL}};
11981
11982void bgp_vty_init(void)
11983{
11984 cmd_variable_handler_register(bgp_var_neighbor);
11985
11986 /* Install bgp top node. */
11987 install_node(&bgp_node, bgp_config_write);
11988 install_node(&bgp_ipv4_unicast_node, NULL);
11989 install_node(&bgp_ipv4_multicast_node, NULL);
11990 install_node(&bgp_ipv4_labeled_unicast_node, NULL);
11991 install_node(&bgp_ipv6_unicast_node, NULL);
11992 install_node(&bgp_ipv6_multicast_node, NULL);
11993 install_node(&bgp_ipv6_labeled_unicast_node, NULL);
11994 install_node(&bgp_vpnv4_node, NULL);
11995 install_node(&bgp_vpnv6_node, NULL);
11996 install_node(&bgp_evpn_node, NULL);
11997 install_node(&bgp_evpn_vni_node, NULL);
7c40bf39 11998 install_node(&bgp_flowspecv4_node, NULL);
11999 install_node(&bgp_flowspecv6_node, NULL);
d62a17ae 12000
12001 /* Install default VTY commands to new nodes. */
12002 install_default(BGP_NODE);
12003 install_default(BGP_IPV4_NODE);
12004 install_default(BGP_IPV4M_NODE);
12005 install_default(BGP_IPV4L_NODE);
12006 install_default(BGP_IPV6_NODE);
12007 install_default(BGP_IPV6M_NODE);
12008 install_default(BGP_IPV6L_NODE);
12009 install_default(BGP_VPNV4_NODE);
12010 install_default(BGP_VPNV6_NODE);
7c40bf39 12011 install_default(BGP_FLOWSPECV4_NODE);
12012 install_default(BGP_FLOWSPECV6_NODE);
d62a17ae 12013 install_default(BGP_EVPN_NODE);
12014 install_default(BGP_EVPN_VNI_NODE);
12015
12016 /* "bgp multiple-instance" commands. */
12017 install_element(CONFIG_NODE, &bgp_multiple_instance_cmd);
12018 install_element(CONFIG_NODE, &no_bgp_multiple_instance_cmd);
12019
12020 /* "bgp config-type" commands. */
12021 install_element(CONFIG_NODE, &bgp_config_type_cmd);
12022 install_element(CONFIG_NODE, &no_bgp_config_type_cmd);
12023
12024 /* bgp route-map delay-timer commands. */
12025 install_element(CONFIG_NODE, &bgp_set_route_map_delay_timer_cmd);
12026 install_element(CONFIG_NODE, &no_bgp_set_route_map_delay_timer_cmd);
12027
12028 /* Dummy commands (Currently not supported) */
12029 install_element(BGP_NODE, &no_synchronization_cmd);
12030 install_element(BGP_NODE, &no_auto_summary_cmd);
12031
12032 /* "router bgp" commands. */
12033 install_element(CONFIG_NODE, &router_bgp_cmd);
12034
12035 /* "no router bgp" commands. */
12036 install_element(CONFIG_NODE, &no_router_bgp_cmd);
12037
12038 /* "bgp router-id" commands. */
12039 install_element(BGP_NODE, &bgp_router_id_cmd);
12040 install_element(BGP_NODE, &no_bgp_router_id_cmd);
12041
12042 /* "bgp cluster-id" commands. */
12043 install_element(BGP_NODE, &bgp_cluster_id_cmd);
12044 install_element(BGP_NODE, &no_bgp_cluster_id_cmd);
12045
12046 /* "bgp confederation" commands. */
12047 install_element(BGP_NODE, &bgp_confederation_identifier_cmd);
12048 install_element(BGP_NODE, &no_bgp_confederation_identifier_cmd);
12049
12050 /* "bgp confederation peers" commands. */
12051 install_element(BGP_NODE, &bgp_confederation_peers_cmd);
12052 install_element(BGP_NODE, &no_bgp_confederation_peers_cmd);
12053
12054 /* bgp max-med command */
12055 install_element(BGP_NODE, &bgp_maxmed_admin_cmd);
12056 install_element(BGP_NODE, &no_bgp_maxmed_admin_cmd);
12057 install_element(BGP_NODE, &bgp_maxmed_admin_medv_cmd);
12058 install_element(BGP_NODE, &bgp_maxmed_onstartup_cmd);
12059 install_element(BGP_NODE, &no_bgp_maxmed_onstartup_cmd);
12060
12061 /* bgp disable-ebgp-connected-nh-check */
12062 install_element(BGP_NODE, &bgp_disable_connected_route_check_cmd);
12063 install_element(BGP_NODE, &no_bgp_disable_connected_route_check_cmd);
12064
12065 /* bgp update-delay command */
12066 install_element(BGP_NODE, &bgp_update_delay_cmd);
12067 install_element(BGP_NODE, &no_bgp_update_delay_cmd);
12068 install_element(BGP_NODE, &bgp_update_delay_establish_wait_cmd);
12069
12070 install_element(BGP_NODE, &bgp_wpkt_quanta_cmd);
12071 install_element(BGP_NODE, &no_bgp_wpkt_quanta_cmd);
555e09d4
QY		 12072 install_element(BGP_NODE, &bgp_rpkt_quanta_cmd);
12073 install_element(BGP_NODE, &no_bgp_rpkt_quanta_cmd);
d62a17ae 12074
12075 install_element(BGP_NODE, &bgp_coalesce_time_cmd);
12076 install_element(BGP_NODE, &no_bgp_coalesce_time_cmd);
12077
12078 /* "maximum-paths" commands. */
12079 install_element(BGP_NODE, &bgp_maxpaths_hidden_cmd);
12080 install_element(BGP_NODE, &no_bgp_maxpaths_hidden_cmd);
12081 install_element(BGP_IPV4_NODE, &bgp_maxpaths_cmd);
12082 install_element(BGP_IPV4_NODE, &no_bgp_maxpaths_cmd);
12083 install_element(BGP_IPV6_NODE, &bgp_maxpaths_cmd);
12084 install_element(BGP_IPV6_NODE, &no_bgp_maxpaths_cmd);
12085 install_element(BGP_NODE, &bgp_maxpaths_ibgp_hidden_cmd);
12086 install_element(BGP_NODE, &bgp_maxpaths_ibgp_cluster_hidden_cmd);
12087 install_element(BGP_NODE, &no_bgp_maxpaths_ibgp_hidden_cmd);
12088 install_element(BGP_IPV4_NODE, &bgp_maxpaths_ibgp_cmd);
12089 install_element(BGP_IPV4_NODE, &bgp_maxpaths_ibgp_cluster_cmd);
12090 install_element(BGP_IPV4_NODE, &no_bgp_maxpaths_ibgp_cmd);
12091 install_element(BGP_IPV6_NODE, &bgp_maxpaths_ibgp_cmd);
12092 install_element(BGP_IPV6_NODE, &bgp_maxpaths_ibgp_cluster_cmd);
12093 install_element(BGP_IPV6_NODE, &no_bgp_maxpaths_ibgp_cmd);
12094
12095 install_element(BGP_IPV6L_NODE, &bgp_maxpaths_cmd);
12096 install_element(BGP_IPV6L_NODE, &no_bgp_maxpaths_cmd);
12097 install_element(BGP_IPV6L_NODE, &bgp_maxpaths_ibgp_cmd);
12098 install_element(BGP_IPV6L_NODE, &bgp_maxpaths_ibgp_cluster_cmd);
12099 install_element(BGP_IPV6L_NODE, &no_bgp_maxpaths_ibgp_cmd);
12100
12101 /* "timers bgp" commands. */
12102 install_element(BGP_NODE, &bgp_timers_cmd);
12103 install_element(BGP_NODE, &no_bgp_timers_cmd);
12104
12105 /* route-map delay-timer commands - per instance for backwards compat.
12106 */
12107 install_element(BGP_NODE, &bgp_set_route_map_delay_timer_cmd);
12108 install_element(BGP_NODE, &no_bgp_set_route_map_delay_timer_cmd);
12109
12110 /* "bgp client-to-client reflection" commands */
12111 install_element(BGP_NODE, &no_bgp_client_to_client_reflection_cmd);
12112 install_element(BGP_NODE, &bgp_client_to_client_reflection_cmd);
12113
12114 /* "bgp always-compare-med" commands */
12115 install_element(BGP_NODE, &bgp_always_compare_med_cmd);
12116 install_element(BGP_NODE, &no_bgp_always_compare_med_cmd);
12117
12118 /* "bgp deterministic-med" commands */
12119 install_element(BGP_NODE, &bgp_deterministic_med_cmd);
12120 install_element(BGP_NODE, &no_bgp_deterministic_med_cmd);
12121
12122 /* "bgp graceful-restart" commands */
12123 install_element(BGP_NODE, &bgp_graceful_restart_cmd);
12124 install_element(BGP_NODE, &no_bgp_graceful_restart_cmd);
12125 install_element(BGP_NODE, &bgp_graceful_restart_stalepath_time_cmd);
12126 install_element(BGP_NODE, &no_bgp_graceful_restart_stalepath_time_cmd);
12127 install_element(BGP_NODE, &bgp_graceful_restart_restart_time_cmd);
12128 install_element(BGP_NODE, &no_bgp_graceful_restart_restart_time_cmd);
12129
12130 install_element(BGP_NODE, &bgp_graceful_restart_preserve_fw_cmd);
12131 install_element(BGP_NODE, &no_bgp_graceful_restart_preserve_fw_cmd);
12132
7f323236
DW		 12133 /* "bgp graceful-shutdown" commands */
12134 install_element(BGP_NODE, &bgp_graceful_shutdown_cmd);
12135 install_element(BGP_NODE, &no_bgp_graceful_shutdown_cmd);
12136
d62a17ae 12137 /* "bgp fast-external-failover" commands */
12138 install_element(BGP_NODE, &bgp_fast_external_failover_cmd);
12139 install_element(BGP_NODE, &no_bgp_fast_external_failover_cmd);
12140
12141 /* "bgp enforce-first-as" commands */
12142 install_element(BGP_NODE, &bgp_enforce_first_as_cmd);
12143 install_element(BGP_NODE, &no_bgp_enforce_first_as_cmd);
12144
12145 /* "bgp bestpath compare-routerid" commands */
12146 install_element(BGP_NODE, &bgp_bestpath_compare_router_id_cmd);
12147 install_element(BGP_NODE, &no_bgp_bestpath_compare_router_id_cmd);
12148
12149 /* "bgp bestpath as-path ignore" commands */
12150 install_element(BGP_NODE, &bgp_bestpath_aspath_ignore_cmd);
12151 install_element(BGP_NODE, &no_bgp_bestpath_aspath_ignore_cmd);
12152
12153 /* "bgp bestpath as-path confed" commands */
12154 install_element(BGP_NODE, &bgp_bestpath_aspath_confed_cmd);
12155 install_element(BGP_NODE, &no_bgp_bestpath_aspath_confed_cmd);
12156
12157 /* "bgp bestpath as-path multipath-relax" commands */
12158 install_element(BGP_NODE, &bgp_bestpath_aspath_multipath_relax_cmd);
12159 install_element(BGP_NODE, &no_bgp_bestpath_aspath_multipath_relax_cmd);
12160
12161 /* "bgp log-neighbor-changes" commands */
12162 install_element(BGP_NODE, &bgp_log_neighbor_changes_cmd);
12163 install_element(BGP_NODE, &no_bgp_log_neighbor_changes_cmd);
12164
12165 /* "bgp bestpath med" commands */
12166 install_element(BGP_NODE, &bgp_bestpath_med_cmd);
12167 install_element(BGP_NODE, &no_bgp_bestpath_med_cmd);
12168
12169 /* "no bgp default ipv4-unicast" commands. */
12170 install_element(BGP_NODE, &no_bgp_default_ipv4_unicast_cmd);
12171 install_element(BGP_NODE, &bgp_default_ipv4_unicast_cmd);
12172
12173 /* "bgp network import-check" commands. */
12174 install_element(BGP_NODE, &bgp_network_import_check_cmd);
12175 install_element(BGP_NODE, &bgp_network_import_check_exact_cmd);
12176 install_element(BGP_NODE, &no_bgp_network_import_check_cmd);
12177
12178 /* "bgp default local-preference" commands. */
12179 install_element(BGP_NODE, &bgp_default_local_preference_cmd);
12180 install_element(BGP_NODE, &no_bgp_default_local_preference_cmd);
12181
12182 /* bgp default show-hostname */
12183 install_element(BGP_NODE, &bgp_default_show_hostname_cmd);
12184 install_element(BGP_NODE, &no_bgp_default_show_hostname_cmd);
12185
12186 /* "bgp default subgroup-pkt-queue-max" commands. */
12187 install_element(BGP_NODE, &bgp_default_subgroup_pkt_queue_max_cmd);
12188 install_element(BGP_NODE, &no_bgp_default_subgroup_pkt_queue_max_cmd);
12189
12190 /* bgp ibgp-allow-policy-mods command */
12191 install_element(BGP_NODE, &bgp_rr_allow_outbound_policy_cmd);
12192 install_element(BGP_NODE, &no_bgp_rr_allow_outbound_policy_cmd);
12193
12194 /* "bgp listen limit" commands. */
12195 install_element(BGP_NODE, &bgp_listen_limit_cmd);
12196 install_element(BGP_NODE, &no_bgp_listen_limit_cmd);
12197
12198 /* "bgp listen range" commands. */
12199 install_element(BGP_NODE, &bgp_listen_range_cmd);
12200 install_element(BGP_NODE, &no_bgp_listen_range_cmd);
12201
8175f54a 12202 /* "bgp default shutdown" command */
f26845f9
QY		 12203 install_element(BGP_NODE, &bgp_default_shutdown_cmd);
12204
d62a17ae 12205 /* "neighbor remote-as" commands. */
12206 install_element(BGP_NODE, &neighbor_remote_as_cmd);
12207 install_element(BGP_NODE, &neighbor_interface_config_cmd);
12208 install_element(BGP_NODE, &neighbor_interface_config_v6only_cmd);
12209 install_element(BGP_NODE, &neighbor_interface_config_remote_as_cmd);
12210 install_element(BGP_NODE,
12211 &neighbor_interface_v6only_config_remote_as_cmd);
12212 install_element(BGP_NODE, &no_neighbor_cmd);
12213 install_element(BGP_NODE, &no_neighbor_interface_config_cmd);
12214
12215 /* "neighbor peer-group" commands. */
12216 install_element(BGP_NODE, &neighbor_peer_group_cmd);
12217 install_element(BGP_NODE, &no_neighbor_peer_group_cmd);
12218 install_element(BGP_NODE,
12219 &no_neighbor_interface_peer_group_remote_as_cmd);
12220
12221 /* "neighbor local-as" commands. */
12222 install_element(BGP_NODE, &neighbor_local_as_cmd);
12223 install_element(BGP_NODE, &neighbor_local_as_no_prepend_cmd);
12224 install_element(BGP_NODE, &neighbor_local_as_no_prepend_replace_as_cmd);
12225 install_element(BGP_NODE, &no_neighbor_local_as_cmd);
12226
12227 /* "neighbor solo" commands. */
12228 install_element(BGP_NODE, &neighbor_solo_cmd);
12229 install_element(BGP_NODE, &no_neighbor_solo_cmd);
12230
12231 /* "neighbor password" commands. */
12232 install_element(BGP_NODE, &neighbor_password_cmd);
12233 install_element(BGP_NODE, &no_neighbor_password_cmd);
12234
12235 /* "neighbor activate" commands. */
12236 install_element(BGP_NODE, &neighbor_activate_hidden_cmd);
12237 install_element(BGP_IPV4_NODE, &neighbor_activate_cmd);
12238 install_element(BGP_IPV4M_NODE, &neighbor_activate_cmd);
12239 install_element(BGP_IPV4L_NODE, &neighbor_activate_cmd);
12240 install_element(BGP_IPV6_NODE, &neighbor_activate_cmd);
12241 install_element(BGP_IPV6M_NODE, &neighbor_activate_cmd);
12242 install_element(BGP_IPV6L_NODE, &neighbor_activate_cmd);
12243 install_element(BGP_VPNV4_NODE, &neighbor_activate_cmd);
12244 install_element(BGP_VPNV6_NODE, &neighbor_activate_cmd);
7c40bf39 12245 install_element(BGP_FLOWSPECV4_NODE, &neighbor_activate_cmd);
12246 install_element(BGP_FLOWSPECV6_NODE, &neighbor_activate_cmd);
d62a17ae 12247 install_element(BGP_EVPN_NODE, &neighbor_activate_cmd);
12248
12249 /* "no neighbor activate" commands. */
12250 install_element(BGP_NODE, &no_neighbor_activate_hidden_cmd);
12251 install_element(BGP_IPV4_NODE, &no_neighbor_activate_cmd);
12252 install_element(BGP_IPV4M_NODE, &no_neighbor_activate_cmd);
12253 install_element(BGP_IPV4L_NODE, &no_neighbor_activate_cmd);
12254 install_element(BGP_IPV6_NODE, &no_neighbor_activate_cmd);
12255 install_element(BGP_IPV6M_NODE, &no_neighbor_activate_cmd);
12256 install_element(BGP_IPV6L_NODE, &no_neighbor_activate_cmd);
12257 install_element(BGP_VPNV4_NODE, &no_neighbor_activate_cmd);
12258 install_element(BGP_VPNV6_NODE, &no_neighbor_activate_cmd);
7c40bf39 12259 install_element(BGP_FLOWSPECV4_NODE, &no_neighbor_activate_cmd);
12260 install_element(BGP_FLOWSPECV6_NODE, &no_neighbor_activate_cmd);
d62a17ae 12261 install_element(BGP_EVPN_NODE, &no_neighbor_activate_cmd);
12262
12263 /* "neighbor peer-group" set commands. */
12264 install_element(BGP_NODE, &neighbor_set_peer_group_cmd);
12265 install_element(BGP_IPV4_NODE, &neighbor_set_peer_group_hidden_cmd);
12266 install_element(BGP_IPV4M_NODE, &neighbor_set_peer_group_hidden_cmd);
12267 install_element(BGP_IPV6_NODE, &neighbor_set_peer_group_hidden_cmd);
12268 install_element(BGP_IPV6M_NODE, &neighbor_set_peer_group_hidden_cmd);
12269 install_element(BGP_IPV6L_NODE, &neighbor_set_peer_group_hidden_cmd);
12270 install_element(BGP_VPNV4_NODE, &neighbor_set_peer_group_hidden_cmd);
12271 install_element(BGP_VPNV6_NODE, &neighbor_set_peer_group_hidden_cmd);
7c40bf39 12272 install_element(BGP_FLOWSPECV4_NODE,
12273 &neighbor_set_peer_group_hidden_cmd);
12274 install_element(BGP_FLOWSPECV6_NODE,
12275 &neighbor_set_peer_group_hidden_cmd);
d62a17ae 12276
12277 /* "no neighbor peer-group unset" commands. */
12278 install_element(BGP_NODE, &no_neighbor_set_peer_group_cmd);
12279 install_element(BGP_IPV4_NODE, &no_neighbor_set_peer_group_hidden_cmd);
12280 install_element(BGP_IPV4M_NODE, &no_neighbor_set_peer_group_hidden_cmd);
12281 install_element(BGP_IPV6_NODE, &no_neighbor_set_peer_group_hidden_cmd);
12282 install_element(BGP_IPV6M_NODE, &no_neighbor_set_peer_group_hidden_cmd);
12283 install_element(BGP_IPV6L_NODE, &no_neighbor_set_peer_group_hidden_cmd);
12284 install_element(BGP_VPNV4_NODE, &no_neighbor_set_peer_group_hidden_cmd);
12285 install_element(BGP_VPNV6_NODE, &no_neighbor_set_peer_group_hidden_cmd);
7c40bf39 12286 install_element(BGP_FLOWSPECV4_NODE,
12287 &no_neighbor_set_peer_group_hidden_cmd);
12288 install_element(BGP_FLOWSPECV6_NODE,
12289 &no_neighbor_set_peer_group_hidden_cmd);
d62a17ae 12290
12291 /* "neighbor softreconfiguration inbound" commands.*/
12292 install_element(BGP_NODE, &neighbor_soft_reconfiguration_hidden_cmd);
12293 install_element(BGP_NODE, &no_neighbor_soft_reconfiguration_hidden_cmd);
12294 install_element(BGP_IPV4_NODE, &neighbor_soft_reconfiguration_cmd);
12295 install_element(BGP_IPV4_NODE, &no_neighbor_soft_reconfiguration_cmd);
12296 install_element(BGP_IPV4L_NODE, &neighbor_soft_reconfiguration_cmd);
12297 install_element(BGP_IPV4L_NODE, &no_neighbor_soft_reconfiguration_cmd);
12298 install_element(BGP_IPV4M_NODE, &neighbor_soft_reconfiguration_cmd);
12299 install_element(BGP_IPV4M_NODE, &no_neighbor_soft_reconfiguration_cmd);
12300 install_element(BGP_IPV6_NODE, &neighbor_soft_reconfiguration_cmd);
12301 install_element(BGP_IPV6_NODE, &no_neighbor_soft_reconfiguration_cmd);
12302 install_element(BGP_IPV6M_NODE, &neighbor_soft_reconfiguration_cmd);
12303 install_element(BGP_IPV6M_NODE, &no_neighbor_soft_reconfiguration_cmd);
12304 install_element(BGP_IPV6L_NODE, &neighbor_soft_reconfiguration_cmd);
12305 install_element(BGP_IPV6L_NODE, &no_neighbor_soft_reconfiguration_cmd);
12306 install_element(BGP_VPNV4_NODE, &neighbor_soft_reconfiguration_cmd);
12307 install_element(BGP_VPNV4_NODE, &no_neighbor_soft_reconfiguration_cmd);
12308 install_element(BGP_VPNV6_NODE, &neighbor_soft_reconfiguration_cmd);
12309 install_element(BGP_VPNV6_NODE, &no_neighbor_soft_reconfiguration_cmd);
7c40bf39 12310 install_element(BGP_FLOWSPECV4_NODE,
12311 &neighbor_soft_reconfiguration_cmd);
12312 install_element(BGP_FLOWSPECV4_NODE,
12313 &no_neighbor_soft_reconfiguration_cmd);
12314 install_element(BGP_FLOWSPECV6_NODE,
12315 &neighbor_soft_reconfiguration_cmd);
12316 install_element(BGP_FLOWSPECV6_NODE,
12317 &no_neighbor_soft_reconfiguration_cmd);
d62a17ae 12318
12319 /* "neighbor attribute-unchanged" commands. */
12320 install_element(BGP_NODE, &neighbor_attr_unchanged_hidden_cmd);
12321 install_element(BGP_NODE, &no_neighbor_attr_unchanged_hidden_cmd);
12322 install_element(BGP_IPV4_NODE, &neighbor_attr_unchanged_cmd);
12323 install_element(BGP_IPV4_NODE, &no_neighbor_attr_unchanged_cmd);
12324 install_element(BGP_IPV4M_NODE, &neighbor_attr_unchanged_cmd);
12325 install_element(BGP_IPV4M_NODE, &no_neighbor_attr_unchanged_cmd);
12326 install_element(BGP_IPV4L_NODE, &neighbor_attr_unchanged_cmd);
12327 install_element(BGP_IPV4L_NODE, &no_neighbor_attr_unchanged_cmd);
12328 install_element(BGP_IPV6_NODE, &neighbor_attr_unchanged_cmd);
12329 install_element(BGP_IPV6_NODE, &no_neighbor_attr_unchanged_cmd);
12330 install_element(BGP_IPV6M_NODE, &neighbor_attr_unchanged_cmd);
12331 install_element(BGP_IPV6M_NODE, &no_neighbor_attr_unchanged_cmd);
12332 install_element(BGP_IPV6L_NODE, &neighbor_attr_unchanged_cmd);
12333 install_element(BGP_IPV6L_NODE, &no_neighbor_attr_unchanged_cmd);
12334 install_element(BGP_VPNV4_NODE, &neighbor_attr_unchanged_cmd);
12335 install_element(BGP_VPNV4_NODE, &no_neighbor_attr_unchanged_cmd);
12336 install_element(BGP_VPNV6_NODE, &neighbor_attr_unchanged_cmd);
12337 install_element(BGP_VPNV6_NODE, &no_neighbor_attr_unchanged_cmd);
12338
12339 install_element(BGP_EVPN_NODE, &neighbor_attr_unchanged_cmd);
12340 install_element(BGP_EVPN_NODE, &no_neighbor_attr_unchanged_cmd);
12341
12342 /* "nexthop-local unchanged" commands */
12343 install_element(BGP_IPV6_NODE, &neighbor_nexthop_local_unchanged_cmd);
12344 install_element(BGP_IPV6_NODE,
12345 &no_neighbor_nexthop_local_unchanged_cmd);
12346
12347 /* "neighbor next-hop-self" commands. */
12348 install_element(BGP_NODE, &neighbor_nexthop_self_hidden_cmd);
12349 install_element(BGP_NODE, &no_neighbor_nexthop_self_hidden_cmd);
12350 install_element(BGP_IPV4_NODE, &neighbor_nexthop_self_cmd);
12351 install_element(BGP_IPV4_NODE, &no_neighbor_nexthop_self_cmd);
12352 install_element(BGP_IPV4M_NODE, &neighbor_nexthop_self_cmd);
12353 install_element(BGP_IPV4M_NODE, &no_neighbor_nexthop_self_cmd);
12354 install_element(BGP_IPV4L_NODE, &neighbor_nexthop_self_cmd);
12355 install_element(BGP_IPV4L_NODE, &no_neighbor_nexthop_self_cmd);
12356 install_element(BGP_IPV6_NODE, &neighbor_nexthop_self_cmd);
12357 install_element(BGP_IPV6_NODE, &no_neighbor_nexthop_self_cmd);
12358 install_element(BGP_IPV6M_NODE, &neighbor_nexthop_self_cmd);
12359 install_element(BGP_IPV6M_NODE, &no_neighbor_nexthop_self_cmd);
12360 install_element(BGP_IPV6L_NODE, &neighbor_nexthop_self_cmd);
12361 install_element(BGP_IPV6L_NODE, &no_neighbor_nexthop_self_cmd);
12362 install_element(BGP_VPNV4_NODE, &neighbor_nexthop_self_cmd);
12363 install_element(BGP_VPNV4_NODE, &no_neighbor_nexthop_self_cmd);
12364 install_element(BGP_VPNV6_NODE, &neighbor_nexthop_self_cmd);
12365 install_element(BGP_VPNV6_NODE, &no_neighbor_nexthop_self_cmd);
12366
12367 /* "neighbor next-hop-self force" commands. */
12368 install_element(BGP_NODE, &neighbor_nexthop_self_force_hidden_cmd);
12369 install_element(BGP_NODE, &no_neighbor_nexthop_self_force_hidden_cmd);
12370 install_element(BGP_IPV4_NODE, &neighbor_nexthop_self_force_cmd);
12371 install_element(BGP_IPV4_NODE, &no_neighbor_nexthop_self_force_cmd);
12372 install_element(BGP_IPV4M_NODE, &neighbor_nexthop_self_force_cmd);
12373 install_element(BGP_IPV4M_NODE, &no_neighbor_nexthop_self_force_cmd);
12374 install_element(BGP_IPV4L_NODE, &neighbor_nexthop_self_force_cmd);
12375 install_element(BGP_IPV4L_NODE, &no_neighbor_nexthop_self_force_cmd);
12376 install_element(BGP_IPV6_NODE, &neighbor_nexthop_self_force_cmd);
12377 install_element(BGP_IPV6_NODE, &no_neighbor_nexthop_self_force_cmd);
12378 install_element(BGP_IPV6M_NODE, &neighbor_nexthop_self_force_cmd);
12379 install_element(BGP_IPV6M_NODE, &no_neighbor_nexthop_self_force_cmd);
12380 install_element(BGP_IPV6L_NODE, &neighbor_nexthop_self_force_cmd);
12381 install_element(BGP_IPV6L_NODE, &no_neighbor_nexthop_self_force_cmd);
12382 install_element(BGP_VPNV4_NODE, &neighbor_nexthop_self_force_cmd);
12383 install_element(BGP_VPNV4_NODE, &no_neighbor_nexthop_self_force_cmd);
12384 install_element(BGP_VPNV6_NODE, &neighbor_nexthop_self_force_cmd);
12385 install_element(BGP_VPNV6_NODE, &no_neighbor_nexthop_self_force_cmd);
12386
12387 /* "neighbor as-override" commands. */
12388 install_element(BGP_NODE, &neighbor_as_override_hidden_cmd);
12389 install_element(BGP_NODE, &no_neighbor_as_override_hidden_cmd);
12390 install_element(BGP_IPV4_NODE, &neighbor_as_override_cmd);
12391 install_element(BGP_IPV4_NODE, &no_neighbor_as_override_cmd);
12392 install_element(BGP_IPV4M_NODE, &neighbor_as_override_cmd);
12393 install_element(BGP_IPV4M_NODE, &no_neighbor_as_override_cmd);
12394 install_element(BGP_IPV4L_NODE, &neighbor_as_override_cmd);
12395 install_element(BGP_IPV4L_NODE, &no_neighbor_as_override_cmd);
12396 install_element(BGP_IPV6_NODE, &neighbor_as_override_cmd);
12397 install_element(BGP_IPV6_NODE, &no_neighbor_as_override_cmd);
12398 install_element(BGP_IPV6M_NODE, &neighbor_as_override_cmd);
12399 install_element(BGP_IPV6M_NODE, &no_neighbor_as_override_cmd);
12400 install_element(BGP_IPV6L_NODE, &neighbor_as_override_cmd);
12401 install_element(BGP_IPV6L_NODE, &no_neighbor_as_override_cmd);
12402 install_element(BGP_VPNV4_NODE, &neighbor_as_override_cmd);
12403 install_element(BGP_VPNV4_NODE, &no_neighbor_as_override_cmd);
12404 install_element(BGP_VPNV6_NODE, &neighbor_as_override_cmd);
12405 install_element(BGP_VPNV6_NODE, &no_neighbor_as_override_cmd);
12406
12407 /* "neighbor remove-private-AS" commands. */
12408 install_element(BGP_NODE, &neighbor_remove_private_as_hidden_cmd);
12409 install_element(BGP_NODE, &no_neighbor_remove_private_as_hidden_cmd);
12410 install_element(BGP_NODE, &neighbor_remove_private_as_all_hidden_cmd);
12411 install_element(BGP_NODE,
12412 &no_neighbor_remove_private_as_all_hidden_cmd);
12413 install_element(BGP_NODE,
12414 &neighbor_remove_private_as_replace_as_hidden_cmd);
12415 install_element(BGP_NODE,
12416 &no_neighbor_remove_private_as_replace_as_hidden_cmd);
12417 install_element(BGP_NODE,
12418 &neighbor_remove_private_as_all_replace_as_hidden_cmd);
12419 install_element(
12420 BGP_NODE,
12421 &no_neighbor_remove_private_as_all_replace_as_hidden_cmd);
12422 install_element(BGP_IPV4_NODE, &neighbor_remove_private_as_cmd);
12423 install_element(BGP_IPV4_NODE, &no_neighbor_remove_private_as_cmd);
12424 install_element(BGP_IPV4_NODE, &neighbor_remove_private_as_all_cmd);
12425 install_element(BGP_IPV4_NODE, &no_neighbor_remove_private_as_all_cmd);
12426 install_element(BGP_IPV4_NODE,
12427 &neighbor_remove_private_as_replace_as_cmd);
12428 install_element(BGP_IPV4_NODE,
12429 &no_neighbor_remove_private_as_replace_as_cmd);
12430 install_element(BGP_IPV4_NODE,
12431 &neighbor_remove_private_as_all_replace_as_cmd);
12432 install_element(BGP_IPV4_NODE,
12433 &no_neighbor_remove_private_as_all_replace_as_cmd);
12434 install_element(BGP_IPV4M_NODE, &neighbor_remove_private_as_cmd);
12435 install_element(BGP_IPV4M_NODE, &no_neighbor_remove_private_as_cmd);
12436 install_element(BGP_IPV4M_NODE, &neighbor_remove_private_as_all_cmd);
12437 install_element(BGP_IPV4M_NODE, &no_neighbor_remove_private_as_all_cmd);
12438 install_element(BGP_IPV4M_NODE,
12439 &neighbor_remove_private_as_replace_as_cmd);
12440 install_element(BGP_IPV4M_NODE,
12441 &no_neighbor_remove_private_as_replace_as_cmd);
12442 install_element(BGP_IPV4M_NODE,
12443 &neighbor_remove_private_as_all_replace_as_cmd);
12444 install_element(BGP_IPV4M_NODE,
12445 &no_neighbor_remove_private_as_all_replace_as_cmd);
12446 install_element(BGP_IPV4L_NODE, &neighbor_remove_private_as_cmd);
12447 install_element(BGP_IPV4L_NODE, &no_neighbor_remove_private_as_cmd);
12448 install_element(BGP_IPV4L_NODE, &neighbor_remove_private_as_all_cmd);
12449 install_element(BGP_IPV4L_NODE, &no_neighbor_remove_private_as_all_cmd);
12450 install_element(BGP_IPV4L_NODE,
12451 &neighbor_remove_private_as_replace_as_cmd);
12452 install_element(BGP_IPV4L_NODE,
12453 &no_neighbor_remove_private_as_replace_as_cmd);
12454 install_element(BGP_IPV4L_NODE,
12455 &neighbor_remove_private_as_all_replace_as_cmd);
12456 install_element(BGP_IPV4L_NODE,
12457 &no_neighbor_remove_private_as_all_replace_as_cmd);
12458 install_element(BGP_IPV6_NODE, &neighbor_remove_private_as_cmd);
12459 install_element(BGP_IPV6_NODE, &no_neighbor_remove_private_as_cmd);
12460 install_element(BGP_IPV6_NODE, &neighbor_remove_private_as_all_cmd);
12461 install_element(BGP_IPV6_NODE, &no_neighbor_remove_private_as_all_cmd);
12462 install_element(BGP_IPV6_NODE,
12463 &neighbor_remove_private_as_replace_as_cmd);
12464 install_element(BGP_IPV6_NODE,
12465 &no_neighbor_remove_private_as_replace_as_cmd);
12466 install_element(BGP_IPV6_NODE,
12467 &neighbor_remove_private_as_all_replace_as_cmd);
12468 install_element(BGP_IPV6_NODE,
12469 &no_neighbor_remove_private_as_all_replace_as_cmd);
12470 install_element(BGP_IPV6M_NODE, &neighbor_remove_private_as_cmd);
12471 install_element(BGP_IPV6M_NODE, &no_neighbor_remove_private_as_cmd);
12472 install_element(BGP_IPV6M_NODE, &neighbor_remove_private_as_all_cmd);
12473 install_element(BGP_IPV6M_NODE, &no_neighbor_remove_private_as_all_cmd);
12474 install_element(BGP_IPV6M_NODE,
12475 &neighbor_remove_private_as_replace_as_cmd);
12476 install_element(BGP_IPV6M_NODE,
12477 &no_neighbor_remove_private_as_replace_as_cmd);
12478 install_element(BGP_IPV6M_NODE,
12479 &neighbor_remove_private_as_all_replace_as_cmd);
12480 install_element(BGP_IPV6M_NODE,
12481 &no_neighbor_remove_private_as_all_replace_as_cmd);
12482 install_element(BGP_IPV6L_NODE, &neighbor_remove_private_as_cmd);
12483 install_element(BGP_IPV6L_NODE, &no_neighbor_remove_private_as_cmd);
12484 install_element(BGP_IPV6L_NODE, &neighbor_remove_private_as_all_cmd);
12485 install_element(BGP_IPV6L_NODE, &no_neighbor_remove_private_as_all_cmd);
12486 install_element(BGP_IPV6L_NODE,
12487 &neighbor_remove_private_as_replace_as_cmd);
12488 install_element(BGP_IPV6L_NODE,
12489 &no_neighbor_remove_private_as_replace_as_cmd);
12490 install_element(BGP_IPV6L_NODE,
12491 &neighbor_remove_private_as_all_replace_as_cmd);
12492 install_element(BGP_IPV6L_NODE,
12493 &no_neighbor_remove_private_as_all_replace_as_cmd);
12494 install_element(BGP_VPNV4_NODE, &neighbor_remove_private_as_cmd);
12495 install_element(BGP_VPNV4_NODE, &no_neighbor_remove_private_as_cmd);
12496 install_element(BGP_VPNV4_NODE, &neighbor_remove_private_as_all_cmd);
12497 install_element(BGP_VPNV4_NODE, &no_neighbor_remove_private_as_all_cmd);
12498 install_element(BGP_VPNV4_NODE,
12499 &neighbor_remove_private_as_replace_as_cmd);
12500 install_element(BGP_VPNV4_NODE,
12501 &no_neighbor_remove_private_as_replace_as_cmd);
12502 install_element(BGP_VPNV4_NODE,
12503 &neighbor_remove_private_as_all_replace_as_cmd);
12504 install_element(BGP_VPNV4_NODE,
12505 &no_neighbor_remove_private_as_all_replace_as_cmd);
12506 install_element(BGP_VPNV6_NODE, &neighbor_remove_private_as_cmd);
12507 install_element(BGP_VPNV6_NODE, &no_neighbor_remove_private_as_cmd);
12508 install_element(BGP_VPNV6_NODE, &neighbor_remove_private_as_all_cmd);
12509 install_element(BGP_VPNV6_NODE, &no_neighbor_remove_private_as_all_cmd);
12510 install_element(BGP_VPNV6_NODE,
12511 &neighbor_remove_private_as_replace_as_cmd);
12512 install_element(BGP_VPNV6_NODE,
12513 &no_neighbor_remove_private_as_replace_as_cmd);
12514 install_element(BGP_VPNV6_NODE,
12515 &neighbor_remove_private_as_all_replace_as_cmd);
12516 install_element(BGP_VPNV6_NODE,
12517 &no_neighbor_remove_private_as_all_replace_as_cmd);
12518
12519 /* "neighbor send-community" commands.*/
12520 install_element(BGP_NODE, &neighbor_send_community_hidden_cmd);
12521 install_element(BGP_NODE, &neighbor_send_community_type_hidden_cmd);
12522 install_element(BGP_NODE, &no_neighbor_send_community_hidden_cmd);
12523 install_element(BGP_NODE, &no_neighbor_send_community_type_hidden_cmd);
12524 install_element(BGP_IPV4_NODE, &neighbor_send_community_cmd);
12525 install_element(BGP_IPV4_NODE, &neighbor_send_community_type_cmd);
12526 install_element(BGP_IPV4_NODE, &no_neighbor_send_community_cmd);
12527 install_element(BGP_IPV4_NODE, &no_neighbor_send_community_type_cmd);
12528 install_element(BGP_IPV4M_NODE, &neighbor_send_community_cmd);
12529 install_element(BGP_IPV4M_NODE, &neighbor_send_community_type_cmd);
12530 install_element(BGP_IPV4M_NODE, &no_neighbor_send_community_cmd);
12531 install_element(BGP_IPV4M_NODE, &no_neighbor_send_community_type_cmd);
12532 install_element(BGP_IPV4L_NODE, &neighbor_send_community_cmd);
12533 install_element(BGP_IPV4L_NODE, &neighbor_send_community_type_cmd);
12534 install_element(BGP_IPV4L_NODE, &no_neighbor_send_community_cmd);
12535 install_element(BGP_IPV4L_NODE, &no_neighbor_send_community_type_cmd);
12536 install_element(BGP_IPV6_NODE, &neighbor_send_community_cmd);
12537 install_element(BGP_IPV6_NODE, &neighbor_send_community_type_cmd);
12538 install_element(BGP_IPV6_NODE, &no_neighbor_send_community_cmd);
12539 install_element(BGP_IPV6_NODE, &no_neighbor_send_community_type_cmd);
12540 install_element(BGP_IPV6M_NODE, &neighbor_send_community_cmd);
12541 install_element(BGP_IPV6M_NODE, &neighbor_send_community_type_cmd);
12542 install_element(BGP_IPV6M_NODE, &no_neighbor_send_community_cmd);
12543 install_element(BGP_IPV6M_NODE, &no_neighbor_send_community_type_cmd);
12544 install_element(BGP_IPV6L_NODE, &neighbor_send_community_cmd);
12545 install_element(BGP_IPV6L_NODE, &neighbor_send_community_type_cmd);
12546 install_element(BGP_IPV6L_NODE, &no_neighbor_send_community_cmd);
12547 install_element(BGP_IPV6L_NODE, &no_neighbor_send_community_type_cmd);
12548 install_element(BGP_VPNV4_NODE, &neighbor_send_community_cmd);
12549 install_element(BGP_VPNV4_NODE, &neighbor_send_community_type_cmd);
12550 install_element(BGP_VPNV4_NODE, &no_neighbor_send_community_cmd);
12551 install_element(BGP_VPNV4_NODE, &no_neighbor_send_community_type_cmd);
12552 install_element(BGP_VPNV6_NODE, &neighbor_send_community_cmd);
12553 install_element(BGP_VPNV6_NODE, &neighbor_send_community_type_cmd);
12554 install_element(BGP_VPNV6_NODE, &no_neighbor_send_community_cmd);
12555 install_element(BGP_VPNV6_NODE, &no_neighbor_send_community_type_cmd);
12556
12557 /* "neighbor route-reflector" commands.*/
12558 install_element(BGP_NODE, &neighbor_route_reflector_client_hidden_cmd);
12559 install_element(BGP_NODE,
12560 &no_neighbor_route_reflector_client_hidden_cmd);
12561 install_element(BGP_IPV4_NODE, &neighbor_route_reflector_client_cmd);
12562 install_element(BGP_IPV4_NODE, &no_neighbor_route_reflector_client_cmd);
12563 install_element(BGP_IPV4M_NODE, &neighbor_route_reflector_client_cmd);
12564 install_element(BGP_IPV4M_NODE,
12565 &no_neighbor_route_reflector_client_cmd);
12566 install_element(BGP_IPV4L_NODE, &neighbor_route_reflector_client_cmd);
12567 install_element(BGP_IPV4L_NODE,
12568 &no_neighbor_route_reflector_client_cmd);
12569 install_element(BGP_IPV6_NODE, &neighbor_route_reflector_client_cmd);
12570 install_element(BGP_IPV6_NODE, &no_neighbor_route_reflector_client_cmd);
12571 install_element(BGP_IPV6M_NODE, &neighbor_route_reflector_client_cmd);
12572 install_element(BGP_IPV6M_NODE,
12573 &no_neighbor_route_reflector_client_cmd);
12574 install_element(BGP_IPV6L_NODE, &neighbor_route_reflector_client_cmd);
12575 install_element(BGP_IPV6L_NODE,
12576 &no_neighbor_route_reflector_client_cmd);
12577 install_element(BGP_VPNV4_NODE, &neighbor_route_reflector_client_cmd);
12578 install_element(BGP_VPNV4_NODE,
12579 &no_neighbor_route_reflector_client_cmd);
12580 install_element(BGP_VPNV6_NODE, &neighbor_route_reflector_client_cmd);
12581 install_element(BGP_VPNV6_NODE,
12582 &no_neighbor_route_reflector_client_cmd);
7c40bf39 12583 install_element(BGP_FLOWSPECV4_NODE,
12584 &neighbor_route_reflector_client_cmd);
12585 install_element(BGP_FLOWSPECV4_NODE,
12586 &no_neighbor_route_reflector_client_cmd);
12587 install_element(BGP_FLOWSPECV6_NODE,
12588 &neighbor_route_reflector_client_cmd);
12589 install_element(BGP_FLOWSPECV6_NODE,
12590 &no_neighbor_route_reflector_client_cmd);
d62a17ae 12591 install_element(BGP_EVPN_NODE, &neighbor_route_reflector_client_cmd);
12592 install_element(BGP_EVPN_NODE, &no_neighbor_route_reflector_client_cmd);
12593
12594 /* "neighbor route-server" commands.*/
12595 install_element(BGP_NODE, &neighbor_route_server_client_hidden_cmd);
12596 install_element(BGP_NODE, &no_neighbor_route_server_client_hidden_cmd);
12597 install_element(BGP_IPV4_NODE, &neighbor_route_server_client_cmd);
12598 install_element(BGP_IPV4_NODE, &no_neighbor_route_server_client_cmd);
12599 install_element(BGP_IPV4M_NODE, &neighbor_route_server_client_cmd);
12600 install_element(BGP_IPV4M_NODE, &no_neighbor_route_server_client_cmd);
12601 install_element(BGP_IPV4L_NODE, &neighbor_route_server_client_cmd);
12602 install_element(BGP_IPV4L_NODE, &no_neighbor_route_server_client_cmd);
12603 install_element(BGP_IPV6_NODE, &neighbor_route_server_client_cmd);
12604 install_element(BGP_IPV6_NODE, &no_neighbor_route_server_client_cmd);
12605 install_element(BGP_IPV6M_NODE, &neighbor_route_server_client_cmd);
12606 install_element(BGP_IPV6M_NODE, &no_neighbor_route_server_client_cmd);
12607 install_element(BGP_IPV6L_NODE, &neighbor_route_server_client_cmd);
12608 install_element(BGP_IPV6L_NODE, &no_neighbor_route_server_client_cmd);
12609 install_element(BGP_VPNV4_NODE, &neighbor_route_server_client_cmd);
12610 install_element(BGP_VPNV4_NODE, &no_neighbor_route_server_client_cmd);
12611 install_element(BGP_VPNV6_NODE, &neighbor_route_server_client_cmd);
12612 install_element(BGP_VPNV6_NODE, &no_neighbor_route_server_client_cmd);
7c40bf39 12613 install_element(BGP_FLOWSPECV4_NODE, &neighbor_route_server_client_cmd);
12614 install_element(BGP_FLOWSPECV4_NODE,
12615 &no_neighbor_route_server_client_cmd);
12616 install_element(BGP_FLOWSPECV6_NODE, &neighbor_route_server_client_cmd);
12617 install_element(BGP_FLOWSPECV6_NODE,
12618 &no_neighbor_route_server_client_cmd);
d62a17ae 12619
12620 /* "neighbor addpath-tx-all-paths" commands.*/
12621 install_element(BGP_NODE, &neighbor_addpath_tx_all_paths_hidden_cmd);
12622 install_element(BGP_NODE, &no_neighbor_addpath_tx_all_paths_hidden_cmd);
12623 install_element(BGP_IPV4_NODE, &neighbor_addpath_tx_all_paths_cmd);
12624 install_element(BGP_IPV4_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12625 install_element(BGP_IPV4M_NODE, &neighbor_addpath_tx_all_paths_cmd);
12626 install_element(BGP_IPV4M_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12627 install_element(BGP_IPV4L_NODE, &neighbor_addpath_tx_all_paths_cmd);
12628 install_element(BGP_IPV4L_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12629 install_element(BGP_IPV6_NODE, &neighbor_addpath_tx_all_paths_cmd);
12630 install_element(BGP_IPV6_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12631 install_element(BGP_IPV6M_NODE, &neighbor_addpath_tx_all_paths_cmd);
12632 install_element(BGP_IPV6M_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12633 install_element(BGP_IPV6L_NODE, &neighbor_addpath_tx_all_paths_cmd);
12634 install_element(BGP_IPV6L_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12635 install_element(BGP_VPNV4_NODE, &neighbor_addpath_tx_all_paths_cmd);
12636 install_element(BGP_VPNV4_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12637 install_element(BGP_VPNV6_NODE, &neighbor_addpath_tx_all_paths_cmd);
12638 install_element(BGP_VPNV6_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12639
12640 /* "neighbor addpath-tx-bestpath-per-AS" commands.*/
12641 install_element(BGP_NODE,
12642 &neighbor_addpath_tx_bestpath_per_as_hidden_cmd);
12643 install_element(BGP_NODE,
12644 &no_neighbor_addpath_tx_bestpath_per_as_hidden_cmd);
12645 install_element(BGP_IPV4_NODE,
12646 &neighbor_addpath_tx_bestpath_per_as_cmd);
12647 install_element(BGP_IPV4_NODE,
12648 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12649 install_element(BGP_IPV4M_NODE,
12650 &neighbor_addpath_tx_bestpath_per_as_cmd);
12651 install_element(BGP_IPV4M_NODE,
12652 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12653 install_element(BGP_IPV4L_NODE,
12654 &neighbor_addpath_tx_bestpath_per_as_cmd);
12655 install_element(BGP_IPV4L_NODE,
12656 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12657 install_element(BGP_IPV6_NODE,
12658 &neighbor_addpath_tx_bestpath_per_as_cmd);
12659 install_element(BGP_IPV6_NODE,
12660 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12661 install_element(BGP_IPV6M_NODE,
12662 &neighbor_addpath_tx_bestpath_per_as_cmd);
12663 install_element(BGP_IPV6M_NODE,
12664 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12665 install_element(BGP_IPV6L_NODE,
12666 &neighbor_addpath_tx_bestpath_per_as_cmd);
12667 install_element(BGP_IPV6L_NODE,
12668 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12669 install_element(BGP_VPNV4_NODE,
12670 &neighbor_addpath_tx_bestpath_per_as_cmd);
12671 install_element(BGP_VPNV4_NODE,
12672 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12673 install_element(BGP_VPNV6_NODE,
12674 &neighbor_addpath_tx_bestpath_per_as_cmd);
12675 install_element(BGP_VPNV6_NODE,
12676 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12677
12678 /* "neighbor passive" commands. */
12679 install_element(BGP_NODE, &neighbor_passive_cmd);
12680 install_element(BGP_NODE, &no_neighbor_passive_cmd);
12681
12682
12683 /* "neighbor shutdown" commands. */
12684 install_element(BGP_NODE, &neighbor_shutdown_cmd);
12685 install_element(BGP_NODE, &no_neighbor_shutdown_cmd);
12686 install_element(BGP_NODE, &neighbor_shutdown_msg_cmd);
12687 install_element(BGP_NODE, &no_neighbor_shutdown_msg_cmd);
12688
12689 /* "neighbor capability extended-nexthop" commands.*/
12690 install_element(BGP_NODE, &neighbor_capability_enhe_cmd);
12691 install_element(BGP_NODE, &no_neighbor_capability_enhe_cmd);
12692
12693 /* "neighbor capability orf prefix-list" commands.*/
12694 install_element(BGP_NODE, &neighbor_capability_orf_prefix_hidden_cmd);
12695 install_element(BGP_NODE,
12696 &no_neighbor_capability_orf_prefix_hidden_cmd);
12697 install_element(BGP_IPV4_NODE, &neighbor_capability_orf_prefix_cmd);
12698 install_element(BGP_IPV4_NODE, &no_neighbor_capability_orf_prefix_cmd);
12699 install_element(BGP_IPV4M_NODE, &neighbor_capability_orf_prefix_cmd);
12700 install_element(BGP_IPV4M_NODE, &no_neighbor_capability_orf_prefix_cmd);
12701 install_element(BGP_IPV4L_NODE, &neighbor_capability_orf_prefix_cmd);
12702 install_element(BGP_IPV4L_NODE, &no_neighbor_capability_orf_prefix_cmd);
12703 install_element(BGP_IPV6_NODE, &neighbor_capability_orf_prefix_cmd);
12704 install_element(BGP_IPV6_NODE, &no_neighbor_capability_orf_prefix_cmd);
12705 install_element(BGP_IPV6M_NODE, &neighbor_capability_orf_prefix_cmd);
12706 install_element(BGP_IPV6M_NODE, &no_neighbor_capability_orf_prefix_cmd);
12707 install_element(BGP_IPV6L_NODE, &neighbor_capability_orf_prefix_cmd);
12708 install_element(BGP_IPV6L_NODE, &no_neighbor_capability_orf_prefix_cmd);
12709
12710 /* "neighbor capability dynamic" commands.*/
12711 install_element(BGP_NODE, &neighbor_capability_dynamic_cmd);
12712 install_element(BGP_NODE, &no_neighbor_capability_dynamic_cmd);
12713
12714 /* "neighbor dont-capability-negotiate" commands. */
12715 install_element(BGP_NODE, &neighbor_dont_capability_negotiate_cmd);
12716 install_element(BGP_NODE, &no_neighbor_dont_capability_negotiate_cmd);
12717
12718 /* "neighbor ebgp-multihop" commands. */
12719 install_element(BGP_NODE, &neighbor_ebgp_multihop_cmd);
12720 install_element(BGP_NODE, &neighbor_ebgp_multihop_ttl_cmd);
12721 install_element(BGP_NODE, &no_neighbor_ebgp_multihop_cmd);
12722
12723 /* "neighbor disable-connected-check" commands. */
12724 install_element(BGP_NODE, &neighbor_disable_connected_check_cmd);
12725 install_element(BGP_NODE, &no_neighbor_disable_connected_check_cmd);
12726
12727 /* "neighbor description" commands. */
12728 install_element(BGP_NODE, &neighbor_description_cmd);
12729 install_element(BGP_NODE, &no_neighbor_description_cmd);
12730
12731 /* "neighbor update-source" commands. "*/
12732 install_element(BGP_NODE, &neighbor_update_source_cmd);
12733 install_element(BGP_NODE, &no_neighbor_update_source_cmd);
12734
12735 /* "neighbor default-originate" commands. */
12736 install_element(BGP_NODE, &neighbor_default_originate_hidden_cmd);
12737 install_element(BGP_NODE, &neighbor_default_originate_rmap_hidden_cmd);
12738 install_element(BGP_NODE, &no_neighbor_default_originate_hidden_cmd);
12739 install_element(BGP_IPV4_NODE, &neighbor_default_originate_cmd);
12740 install_element(BGP_IPV4_NODE, &neighbor_default_originate_rmap_cmd);
12741 install_element(BGP_IPV4_NODE, &no_neighbor_default_originate_cmd);
12742 install_element(BGP_IPV4M_NODE, &neighbor_default_originate_cmd);
12743 install_element(BGP_IPV4M_NODE, &neighbor_default_originate_rmap_cmd);
12744 install_element(BGP_IPV4M_NODE, &no_neighbor_default_originate_cmd);
12745 install_element(BGP_IPV4L_NODE, &neighbor_default_originate_cmd);
12746 install_element(BGP_IPV4L_NODE, &neighbor_default_originate_rmap_cmd);
12747 install_element(BGP_IPV4L_NODE, &no_neighbor_default_originate_cmd);
12748 install_element(BGP_IPV6_NODE, &neighbor_default_originate_cmd);
12749 install_element(BGP_IPV6_NODE, &neighbor_default_originate_rmap_cmd);
12750 install_element(BGP_IPV6_NODE, &no_neighbor_default_originate_cmd);
12751 install_element(BGP_IPV6M_NODE, &neighbor_default_originate_cmd);
12752 install_element(BGP_IPV6M_NODE, &neighbor_default_originate_rmap_cmd);
12753 install_element(BGP_IPV6M_NODE, &no_neighbor_default_originate_cmd);
12754 install_element(BGP_IPV6L_NODE, &neighbor_default_originate_cmd);
12755 install_element(BGP_IPV6L_NODE, &neighbor_default_originate_rmap_cmd);
12756 install_element(BGP_IPV6L_NODE, &no_neighbor_default_originate_cmd);
12757
12758 /* "neighbor port" commands. */
12759 install_element(BGP_NODE, &neighbor_port_cmd);
12760 install_element(BGP_NODE, &no_neighbor_port_cmd);
12761
12762 /* "neighbor weight" commands. */
12763 install_element(BGP_NODE, &neighbor_weight_hidden_cmd);
12764 install_element(BGP_NODE, &no_neighbor_weight_hidden_cmd);
12765
12766 install_element(BGP_IPV4_NODE, &neighbor_weight_cmd);
12767 install_element(BGP_IPV4_NODE, &no_neighbor_weight_cmd);
12768 install_element(BGP_IPV4M_NODE, &neighbor_weight_cmd);
12769 install_element(BGP_IPV4M_NODE, &no_neighbor_weight_cmd);
12770 install_element(BGP_IPV4L_NODE, &neighbor_weight_cmd);
12771 install_element(BGP_IPV4L_NODE, &no_neighbor_weight_cmd);
12772 install_element(BGP_IPV6_NODE, &neighbor_weight_cmd);
12773 install_element(BGP_IPV6_NODE, &no_neighbor_weight_cmd);
12774 install_element(BGP_IPV6M_NODE, &neighbor_weight_cmd);
12775 install_element(BGP_IPV6M_NODE, &no_neighbor_weight_cmd);
12776 install_element(BGP_IPV6L_NODE, &neighbor_weight_cmd);
12777 install_element(BGP_IPV6L_NODE, &no_neighbor_weight_cmd);
12778 install_element(BGP_VPNV4_NODE, &neighbor_weight_cmd);
12779 install_element(BGP_VPNV4_NODE, &no_neighbor_weight_cmd);
12780 install_element(BGP_VPNV6_NODE, &neighbor_weight_cmd);
12781 install_element(BGP_VPNV6_NODE, &no_neighbor_weight_cmd);
12782
12783 /* "neighbor override-capability" commands. */
12784 install_element(BGP_NODE, &neighbor_override_capability_cmd);
12785 install_element(BGP_NODE, &no_neighbor_override_capability_cmd);
12786
12787 /* "neighbor strict-capability-match" commands. */
12788 install_element(BGP_NODE, &neighbor_strict_capability_cmd);
12789 install_element(BGP_NODE, &no_neighbor_strict_capability_cmd);
12790
12791 /* "neighbor timers" commands. */
12792 install_element(BGP_NODE, &neighbor_timers_cmd);
12793 install_element(BGP_NODE, &no_neighbor_timers_cmd);
12794
12795 /* "neighbor timers connect" commands. */
12796 install_element(BGP_NODE, &neighbor_timers_connect_cmd);
12797 install_element(BGP_NODE, &no_neighbor_timers_connect_cmd);
12798
12799 /* "neighbor advertisement-interval" commands. */
12800 install_element(BGP_NODE, &neighbor_advertise_interval_cmd);
12801 install_element(BGP_NODE, &no_neighbor_advertise_interval_cmd);
12802
12803 /* "neighbor interface" commands. */
12804 install_element(BGP_NODE, &neighbor_interface_cmd);
12805 install_element(BGP_NODE, &no_neighbor_interface_cmd);
12806
12807 /* "neighbor distribute" commands. */
12808 install_element(BGP_NODE, &neighbor_distribute_list_hidden_cmd);
12809 install_element(BGP_NODE, &no_neighbor_distribute_list_hidden_cmd);
12810 install_element(BGP_IPV4_NODE, &neighbor_distribute_list_cmd);
12811 install_element(BGP_IPV4_NODE, &no_neighbor_distribute_list_cmd);
12812 install_element(BGP_IPV4M_NODE, &neighbor_distribute_list_cmd);
12813 install_element(BGP_IPV4M_NODE, &no_neighbor_distribute_list_cmd);
12814 install_element(BGP_IPV4L_NODE, &neighbor_distribute_list_cmd);
12815 install_element(BGP_IPV4L_NODE, &no_neighbor_distribute_list_cmd);
12816 install_element(BGP_IPV6_NODE, &neighbor_distribute_list_cmd);
12817 install_element(BGP_IPV6_NODE, &no_neighbor_distribute_list_cmd);
12818 install_element(BGP_IPV6M_NODE, &neighbor_distribute_list_cmd);
12819 install_element(BGP_IPV6M_NODE, &no_neighbor_distribute_list_cmd);
12820 install_element(BGP_IPV6L_NODE, &neighbor_distribute_list_cmd);
12821 install_element(BGP_IPV6L_NODE, &no_neighbor_distribute_list_cmd);
12822 install_element(BGP_VPNV4_NODE, &neighbor_distribute_list_cmd);
12823 install_element(BGP_VPNV4_NODE, &no_neighbor_distribute_list_cmd);
12824 install_element(BGP_VPNV6_NODE, &neighbor_distribute_list_cmd);
12825 install_element(BGP_VPNV6_NODE, &no_neighbor_distribute_list_cmd);
12826
12827 /* "neighbor prefix-list" commands. */
12828 install_element(BGP_NODE, &neighbor_prefix_list_hidden_cmd);
12829 install_element(BGP_NODE, &no_neighbor_prefix_list_hidden_cmd);
12830 install_element(BGP_IPV4_NODE, &neighbor_prefix_list_cmd);
12831 install_element(BGP_IPV4_NODE, &no_neighbor_prefix_list_cmd);
12832 install_element(BGP_IPV4M_NODE, &neighbor_prefix_list_cmd);
12833 install_element(BGP_IPV4M_NODE, &no_neighbor_prefix_list_cmd);
12834 install_element(BGP_IPV4L_NODE, &neighbor_prefix_list_cmd);
12835 install_element(BGP_IPV4L_NODE, &no_neighbor_prefix_list_cmd);
12836 install_element(BGP_IPV6_NODE, &neighbor_prefix_list_cmd);
12837 install_element(BGP_IPV6_NODE, &no_neighbor_prefix_list_cmd);
12838 install_element(BGP_IPV6M_NODE, &neighbor_prefix_list_cmd);
12839 install_element(BGP_IPV6M_NODE, &no_neighbor_prefix_list_cmd);
12840 install_element(BGP_IPV6L_NODE, &neighbor_prefix_list_cmd);
12841 install_element(BGP_IPV6L_NODE, &no_neighbor_prefix_list_cmd);
12842 install_element(BGP_VPNV4_NODE, &neighbor_prefix_list_cmd);
12843 install_element(BGP_VPNV4_NODE, &no_neighbor_prefix_list_cmd);
12844 install_element(BGP_VPNV6_NODE, &neighbor_prefix_list_cmd);
12845 install_element(BGP_VPNV6_NODE, &no_neighbor_prefix_list_cmd);
7c40bf39 12846 install_element(BGP_FLOWSPECV4_NODE, &neighbor_prefix_list_cmd);
12847 install_element(BGP_FLOWSPECV4_NODE, &no_neighbor_prefix_list_cmd);
12848 install_element(BGP_FLOWSPECV6_NODE, &neighbor_prefix_list_cmd);
12849 install_element(BGP_FLOWSPECV6_NODE, &no_neighbor_prefix_list_cmd);
d62a17ae 12850
12851 /* "neighbor filter-list" commands. */
12852 install_element(BGP_NODE, &neighbor_filter_list_hidden_cmd);
12853 install_element(BGP_NODE, &no_neighbor_filter_list_hidden_cmd);
12854 install_element(BGP_IPV4_NODE, &neighbor_filter_list_cmd);
12855 install_element(BGP_IPV4_NODE, &no_neighbor_filter_list_cmd);
12856 install_element(BGP_IPV4M_NODE, &neighbor_filter_list_cmd);
12857 install_element(BGP_IPV4M_NODE, &no_neighbor_filter_list_cmd);
12858 install_element(BGP_IPV4L_NODE, &neighbor_filter_list_cmd);
12859 install_element(BGP_IPV4L_NODE, &no_neighbor_filter_list_cmd);
12860 install_element(BGP_IPV6_NODE, &neighbor_filter_list_cmd);
12861 install_element(BGP_IPV6_NODE, &no_neighbor_filter_list_cmd);
12862 install_element(BGP_IPV6M_NODE, &neighbor_filter_list_cmd);
12863 install_element(BGP_IPV6M_NODE, &no_neighbor_filter_list_cmd);
12864 install_element(BGP_IPV6L_NODE, &neighbor_filter_list_cmd);
12865 install_element(BGP_IPV6L_NODE, &no_neighbor_filter_list_cmd);
12866 install_element(BGP_VPNV4_NODE, &neighbor_filter_list_cmd);
12867 install_element(BGP_VPNV4_NODE, &no_neighbor_filter_list_cmd);
12868 install_element(BGP_VPNV6_NODE, &neighbor_filter_list_cmd);
12869 install_element(BGP_VPNV6_NODE, &no_neighbor_filter_list_cmd);
7c40bf39 12870 install_element(BGP_FLOWSPECV4_NODE, &neighbor_filter_list_cmd);
12871 install_element(BGP_FLOWSPECV4_NODE, &no_neighbor_filter_list_cmd);
12872 install_element(BGP_FLOWSPECV6_NODE, &neighbor_filter_list_cmd);
12873 install_element(BGP_FLOWSPECV6_NODE, &no_neighbor_filter_list_cmd);
d62a17ae 12874
12875 /* "neighbor route-map" commands. */
12876 install_element(BGP_NODE, &neighbor_route_map_hidden_cmd);
12877 install_element(BGP_NODE, &no_neighbor_route_map_hidden_cmd);
12878 install_element(BGP_IPV4_NODE, &neighbor_route_map_cmd);
12879 install_element(BGP_IPV4_NODE, &no_neighbor_route_map_cmd);
12880 install_element(BGP_IPV4M_NODE, &neighbor_route_map_cmd);
12881 install_element(BGP_IPV4M_NODE, &no_neighbor_route_map_cmd);
12882 install_element(BGP_IPV4L_NODE, &neighbor_route_map_cmd);
12883 install_element(BGP_IPV4L_NODE, &no_neighbor_route_map_cmd);
12884 install_element(BGP_IPV6_NODE, &neighbor_route_map_cmd);
12885 install_element(BGP_IPV6_NODE, &no_neighbor_route_map_cmd);
12886 install_element(BGP_IPV6M_NODE, &neighbor_route_map_cmd);
12887 install_element(BGP_IPV6M_NODE, &no_neighbor_route_map_cmd);
12888 install_element(BGP_IPV6L_NODE, &neighbor_route_map_cmd);
12889 install_element(BGP_IPV6L_NODE, &no_neighbor_route_map_cmd);
12890 install_element(BGP_VPNV4_NODE, &neighbor_route_map_cmd);
12891 install_element(BGP_VPNV4_NODE, &no_neighbor_route_map_cmd);
12892 install_element(BGP_VPNV6_NODE, &neighbor_route_map_cmd);
12893 install_element(BGP_VPNV6_NODE, &no_neighbor_route_map_cmd);
7c40bf39 12894 install_element(BGP_FLOWSPECV4_NODE, &neighbor_route_map_cmd);
12895 install_element(BGP_FLOWSPECV4_NODE, &no_neighbor_route_map_cmd);
12896 install_element(BGP_FLOWSPECV6_NODE, &neighbor_route_map_cmd);
12897 install_element(BGP_FLOWSPECV6_NODE, &no_neighbor_route_map_cmd);
d37ba549
MK		 12898 install_element(BGP_EVPN_NODE, &neighbor_route_map_cmd);
12899 install_element(BGP_EVPN_NODE, &no_neighbor_route_map_cmd);
d62a17ae 12900
12901 /* "neighbor unsuppress-map" commands. */
12902 install_element(BGP_NODE, &neighbor_unsuppress_map_hidden_cmd);
12903 install_element(BGP_NODE, &no_neighbor_unsuppress_map_hidden_cmd);
12904 install_element(BGP_IPV4_NODE, &neighbor_unsuppress_map_cmd);
12905 install_element(BGP_IPV4_NODE, &no_neighbor_unsuppress_map_cmd);
12906 install_element(BGP_IPV4M_NODE, &neighbor_unsuppress_map_cmd);
12907 install_element(BGP_IPV4M_NODE, &no_neighbor_unsuppress_map_cmd);
12908 install_element(BGP_IPV4L_NODE, &neighbor_unsuppress_map_cmd);
12909 install_element(BGP_IPV4L_NODE, &no_neighbor_unsuppress_map_cmd);
12910 install_element(BGP_IPV6_NODE, &neighbor_unsuppress_map_cmd);
12911 install_element(BGP_IPV6_NODE, &no_neighbor_unsuppress_map_cmd);
12912 install_element(BGP_IPV6M_NODE, &neighbor_unsuppress_map_cmd);
12913 install_element(BGP_IPV6M_NODE, &no_neighbor_unsuppress_map_cmd);
12914 install_element(BGP_IPV6L_NODE, &neighbor_unsuppress_map_cmd);
12915 install_element(BGP_IPV6L_NODE, &no_neighbor_unsuppress_map_cmd);
12916 install_element(BGP_VPNV4_NODE, &neighbor_unsuppress_map_cmd);
12917 install_element(BGP_VPNV4_NODE, &no_neighbor_unsuppress_map_cmd);
12918 install_element(BGP_VPNV6_NODE, &neighbor_unsuppress_map_cmd);
12919 install_element(BGP_VPNV6_NODE, &no_neighbor_unsuppress_map_cmd);
12920
12921 /* "neighbor maximum-prefix" commands. */
12922 install_element(BGP_NODE, &neighbor_maximum_prefix_hidden_cmd);
12923 install_element(BGP_NODE,
12924 &neighbor_maximum_prefix_threshold_hidden_cmd);
12925 install_element(BGP_NODE, &neighbor_maximum_prefix_warning_hidden_cmd);
12926 install_element(BGP_NODE,
12927 &neighbor_maximum_prefix_threshold_warning_hidden_cmd);
12928 install_element(BGP_NODE, &neighbor_maximum_prefix_restart_hidden_cmd);
12929 install_element(BGP_NODE,
12930 &neighbor_maximum_prefix_threshold_restart_hidden_cmd);
12931 install_element(BGP_NODE, &no_neighbor_maximum_prefix_hidden_cmd);
12932 install_element(BGP_IPV4_NODE, &neighbor_maximum_prefix_cmd);
12933 install_element(BGP_IPV4_NODE, &neighbor_maximum_prefix_threshold_cmd);
12934 install_element(BGP_IPV4_NODE, &neighbor_maximum_prefix_warning_cmd);
12935 install_element(BGP_IPV4_NODE,
12936 &neighbor_maximum_prefix_threshold_warning_cmd);
12937 install_element(BGP_IPV4_NODE, &neighbor_maximum_prefix_restart_cmd);
12938 install_element(BGP_IPV4_NODE,
12939 &neighbor_maximum_prefix_threshold_restart_cmd);
12940 install_element(BGP_IPV4_NODE, &no_neighbor_maximum_prefix_cmd);
12941 install_element(BGP_IPV4M_NODE, &neighbor_maximum_prefix_cmd);
12942 install_element(BGP_IPV4M_NODE, &neighbor_maximum_prefix_threshold_cmd);
12943 install_element(BGP_IPV4M_NODE, &neighbor_maximum_prefix_warning_cmd);
12944 install_element(BGP_IPV4M_NODE,
12945 &neighbor_maximum_prefix_threshold_warning_cmd);
12946 install_element(BGP_IPV4M_NODE, &neighbor_maximum_prefix_restart_cmd);
12947 install_element(BGP_IPV4M_NODE,
12948 &neighbor_maximum_prefix_threshold_restart_cmd);
12949 install_element(BGP_IPV4M_NODE, &no_neighbor_maximum_prefix_cmd);
12950 install_element(BGP_IPV4L_NODE, &neighbor_maximum_prefix_cmd);
12951 install_element(BGP_IPV4L_NODE, &neighbor_maximum_prefix_threshold_cmd);
12952 install_element(BGP_IPV4L_NODE, &neighbor_maximum_prefix_warning_cmd);
12953 install_element(BGP_IPV4L_NODE,
12954 &neighbor_maximum_prefix_threshold_warning_cmd);
12955 install_element(BGP_IPV4L_NODE, &neighbor_maximum_prefix_restart_cmd);
12956 install_element(BGP_IPV4L_NODE,
12957 &neighbor_maximum_prefix_threshold_restart_cmd);
12958 install_element(BGP_IPV4L_NODE, &no_neighbor_maximum_prefix_cmd);
12959 install_element(BGP_IPV6_NODE, &neighbor_maximum_prefix_cmd);
12960 install_element(BGP_IPV6_NODE, &neighbor_maximum_prefix_threshold_cmd);
12961 install_element(BGP_IPV6_NODE, &neighbor_maximum_prefix_warning_cmd);
12962 install_element(BGP_IPV6_NODE,
12963 &neighbor_maximum_prefix_threshold_warning_cmd);
12964 install_element(BGP_IPV6_NODE, &neighbor_maximum_prefix_restart_cmd);
12965 install_element(BGP_IPV6_NODE,
12966 &neighbor_maximum_prefix_threshold_restart_cmd);
12967 install_element(BGP_IPV6_NODE, &no_neighbor_maximum_prefix_cmd);
12968 install_element(BGP_IPV6M_NODE, &neighbor_maximum_prefix_cmd);
12969 install_element(BGP_IPV6M_NODE, &neighbor_maximum_prefix_threshold_cmd);
12970 install_element(BGP_IPV6M_NODE, &neighbor_maximum_prefix_warning_cmd);
12971 install_element(BGP_IPV6M_NODE,
12972 &neighbor_maximum_prefix_threshold_warning_cmd);
12973 install_element(BGP_IPV6M_NODE, &neighbor_maximum_prefix_restart_cmd);
12974 install_element(BGP_IPV6M_NODE,
12975 &neighbor_maximum_prefix_threshold_restart_cmd);
12976 install_element(BGP_IPV6M_NODE, &no_neighbor_maximum_prefix_cmd);
12977 install_element(BGP_IPV6L_NODE, &neighbor_maximum_prefix_cmd);
12978 install_element(BGP_IPV6L_NODE, &neighbor_maximum_prefix_threshold_cmd);
12979 install_element(BGP_IPV6L_NODE, &neighbor_maximum_prefix_warning_cmd);
12980 install_element(BGP_IPV6L_NODE,
12981 &neighbor_maximum_prefix_threshold_warning_cmd);
12982 install_element(BGP_IPV6L_NODE, &neighbor_maximum_prefix_restart_cmd);
12983 install_element(BGP_IPV6L_NODE,
12984 &neighbor_maximum_prefix_threshold_restart_cmd);
12985 install_element(BGP_IPV6L_NODE, &no_neighbor_maximum_prefix_cmd);
12986 install_element(BGP_VPNV4_NODE, &neighbor_maximum_prefix_cmd);
12987 install_element(BGP_VPNV4_NODE, &neighbor_maximum_prefix_threshold_cmd);
12988 install_element(BGP_VPNV4_NODE, &neighbor_maximum_prefix_warning_cmd);
12989 install_element(BGP_VPNV4_NODE,
12990 &neighbor_maximum_prefix_threshold_warning_cmd);
12991 install_element(BGP_VPNV4_NODE, &neighbor_maximum_prefix_restart_cmd);
12992 install_element(BGP_VPNV4_NODE,
12993 &neighbor_maximum_prefix_threshold_restart_cmd);
12994 install_element(BGP_VPNV4_NODE, &no_neighbor_maximum_prefix_cmd);
12995 install_element(BGP_VPNV6_NODE, &neighbor_maximum_prefix_cmd);
12996 install_element(BGP_VPNV6_NODE, &neighbor_maximum_prefix_threshold_cmd);
12997 install_element(BGP_VPNV6_NODE, &neighbor_maximum_prefix_warning_cmd);
12998 install_element(BGP_VPNV6_NODE,
12999 &neighbor_maximum_prefix_threshold_warning_cmd);
13000 install_element(BGP_VPNV6_NODE, &neighbor_maximum_prefix_restart_cmd);
13001 install_element(BGP_VPNV6_NODE,
13002 &neighbor_maximum_prefix_threshold_restart_cmd);
13003 install_element(BGP_VPNV6_NODE, &no_neighbor_maximum_prefix_cmd);
13004
13005 /* "neighbor allowas-in" */
13006 install_element(BGP_NODE, &neighbor_allowas_in_hidden_cmd);
13007 install_element(BGP_NODE, &no_neighbor_allowas_in_hidden_cmd);
13008 install_element(BGP_IPV4_NODE, &neighbor_allowas_in_cmd);
13009 install_element(BGP_IPV4_NODE, &no_neighbor_allowas_in_cmd);
13010 install_element(BGP_IPV4M_NODE, &neighbor_allowas_in_cmd);
13011 install_element(BGP_IPV4M_NODE, &no_neighbor_allowas_in_cmd);
13012 install_element(BGP_IPV4L_NODE, &neighbor_allowas_in_cmd);
13013 install_element(BGP_IPV4L_NODE, &no_neighbor_allowas_in_cmd);
13014 install_element(BGP_IPV6_NODE, &neighbor_allowas_in_cmd);
13015 install_element(BGP_IPV6_NODE, &no_neighbor_allowas_in_cmd);
13016 install_element(BGP_IPV6M_NODE, &neighbor_allowas_in_cmd);
13017 install_element(BGP_IPV6M_NODE, &no_neighbor_allowas_in_cmd);
13018 install_element(BGP_IPV6L_NODE, &neighbor_allowas_in_cmd);
13019 install_element(BGP_IPV6L_NODE, &no_neighbor_allowas_in_cmd);
13020 install_element(BGP_VPNV4_NODE, &neighbor_allowas_in_cmd);
13021 install_element(BGP_VPNV4_NODE, &no_neighbor_allowas_in_cmd);
13022 install_element(BGP_VPNV6_NODE, &neighbor_allowas_in_cmd);
13023 install_element(BGP_VPNV6_NODE, &no_neighbor_allowas_in_cmd);
13024 install_element(BGP_EVPN_NODE, &neighbor_allowas_in_cmd);
13025 install_element(BGP_EVPN_NODE, &no_neighbor_allowas_in_cmd);
13026
13027 /* address-family commands. */
13028 install_element(BGP_NODE, &address_family_ipv4_safi_cmd);
13029 install_element(BGP_NODE, &address_family_ipv6_safi_cmd);
d6902373 13030#ifdef KEEP_OLD_VPN_COMMANDS
d62a17ae 13031 install_element(BGP_NODE, &address_family_vpnv4_cmd);
13032 install_element(BGP_NODE, &address_family_vpnv6_cmd);
d6902373 13033#endif /* KEEP_OLD_VPN_COMMANDS */
8b1fb8be 13034
d62a17ae 13035 install_element(BGP_NODE, &address_family_evpn_cmd);
13036
13037 /* "exit-address-family" command. */
13038 install_element(BGP_IPV4_NODE, &exit_address_family_cmd);
13039 install_element(BGP_IPV4M_NODE, &exit_address_family_cmd);
13040 install_element(BGP_IPV4L_NODE, &exit_address_family_cmd);
13041 install_element(BGP_IPV6_NODE, &exit_address_family_cmd);
13042 install_element(BGP_IPV6M_NODE, &exit_address_family_cmd);
13043 install_element(BGP_IPV6L_NODE, &exit_address_family_cmd);
13044 install_element(BGP_VPNV4_NODE, &exit_address_family_cmd);
13045 install_element(BGP_VPNV6_NODE, &exit_address_family_cmd);
7c40bf39 13046 install_element(BGP_FLOWSPECV4_NODE, &exit_address_family_cmd);
13047 install_element(BGP_FLOWSPECV6_NODE, &exit_address_family_cmd);
d62a17ae 13048 install_element(BGP_EVPN_NODE, &exit_address_family_cmd);
13049
13050 /* "clear ip bgp commands" */
13051 install_element(ENABLE_NODE, &clear_ip_bgp_all_cmd);
13052
13053 /* clear ip bgp prefix */
13054 install_element(ENABLE_NODE, &clear_ip_bgp_prefix_cmd);
13055 install_element(ENABLE_NODE, &clear_bgp_ipv6_safi_prefix_cmd);
13056 install_element(ENABLE_NODE, &clear_bgp_instance_ipv6_safi_prefix_cmd);
13057
13058 /* "show [ip] bgp summary" commands. */
13059 install_element(VIEW_NODE, &show_bgp_instance_all_ipv6_updgrps_cmd);
d62a17ae 13060 install_element(VIEW_NODE, &show_bgp_instance_updgrps_stats_cmd);
d62a17ae 13061 install_element(VIEW_NODE, &show_bgp_updgrps_stats_cmd);
d62a17ae 13062 install_element(VIEW_NODE, &show_ip_bgp_instance_updgrps_adj_s_cmd);
13063 install_element(VIEW_NODE, &show_ip_bgp_summary_cmd);
d62a17ae 13064 install_element(VIEW_NODE, &show_ip_bgp_updgrps_cmd);
13065
13066 /* "show [ip] bgp neighbors" commands. */
13067 install_element(VIEW_NODE, &show_ip_bgp_neighbors_cmd);
13068
13069 /* "show [ip] bgp peer-group" commands. */
13070 install_element(VIEW_NODE, &show_ip_bgp_peer_groups_cmd);
13071
13072 /* "show [ip] bgp paths" commands. */
13073 install_element(VIEW_NODE, &show_ip_bgp_paths_cmd);
13074
13075 /* "show [ip] bgp community" commands. */
13076 install_element(VIEW_NODE, &show_ip_bgp_community_info_cmd);
13077
13078 /* "show ip bgp large-community" commands. */
13079 install_element(VIEW_NODE, &show_ip_bgp_lcommunity_info_cmd);
13080 /* "show [ip] bgp attribute-info" commands. */
13081 install_element(VIEW_NODE, &show_ip_bgp_attr_info_cmd);
13082
13083 /* "redistribute" commands. */
13084 install_element(BGP_NODE, &bgp_redistribute_ipv4_hidden_cmd);
13085 install_element(BGP_NODE, &no_bgp_redistribute_ipv4_hidden_cmd);
13086 install_element(BGP_NODE, &bgp_redistribute_ipv4_rmap_hidden_cmd);
13087 install_element(BGP_NODE, &bgp_redistribute_ipv4_metric_hidden_cmd);
13088 install_element(BGP_NODE,
13089 &bgp_redistribute_ipv4_rmap_metric_hidden_cmd);
13090 install_element(BGP_NODE,
13091 &bgp_redistribute_ipv4_metric_rmap_hidden_cmd);
13092 install_element(BGP_NODE, &bgp_redistribute_ipv4_ospf_hidden_cmd);
13093 install_element(BGP_NODE, &no_bgp_redistribute_ipv4_ospf_hidden_cmd);
13094 install_element(BGP_NODE, &bgp_redistribute_ipv4_ospf_rmap_hidden_cmd);
13095 install_element(BGP_NODE,
13096 &bgp_redistribute_ipv4_ospf_metric_hidden_cmd);
13097 install_element(BGP_NODE,
13098 &bgp_redistribute_ipv4_ospf_rmap_metric_hidden_cmd);
13099 install_element(BGP_NODE,
13100 &bgp_redistribute_ipv4_ospf_metric_rmap_hidden_cmd);
13101 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_cmd);
13102 install_element(BGP_IPV4_NODE, &no_bgp_redistribute_ipv4_cmd);
13103 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_rmap_cmd);
13104 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_metric_cmd);
13105 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_rmap_metric_cmd);
13106 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_metric_rmap_cmd);
13107 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_ospf_cmd);
13108 install_element(BGP_IPV4_NODE, &no_bgp_redistribute_ipv4_ospf_cmd);
13109 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_ospf_rmap_cmd);
13110 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_ospf_metric_cmd);
13111 install_element(BGP_IPV4_NODE,
13112 &bgp_redistribute_ipv4_ospf_rmap_metric_cmd);
13113 install_element(BGP_IPV4_NODE,
13114 &bgp_redistribute_ipv4_ospf_metric_rmap_cmd);
13115 install_element(BGP_IPV6_NODE, &bgp_redistribute_ipv6_cmd);
13116 install_element(BGP_IPV6_NODE, &no_bgp_redistribute_ipv6_cmd);
13117 install_element(BGP_IPV6_NODE, &bgp_redistribute_ipv6_rmap_cmd);
13118 install_element(BGP_IPV6_NODE, &bgp_redistribute_ipv6_metric_cmd);
13119 install_element(BGP_IPV6_NODE, &bgp_redistribute_ipv6_rmap_metric_cmd);
13120 install_element(BGP_IPV6_NODE, &bgp_redistribute_ipv6_metric_rmap_cmd);
13121
b9c7bc5a
PZ		 13122 /* import|export vpn [route-map WORD] */
13123 install_element(BGP_IPV4_NODE, &bgp_imexport_vpn_cmd);
13124 install_element(BGP_IPV6_NODE, &bgp_imexport_vpn_cmd);
ddb5b488 13125
12a844a5
DS		 13126 install_element(BGP_IPV4_NODE, &bgp_imexport_vrf_cmd);
13127 install_element(BGP_IPV6_NODE, &bgp_imexport_vrf_cmd);
13128
d62a17ae 13129 /* ttl_security commands */
13130 install_element(BGP_NODE, &neighbor_ttl_security_cmd);
13131 install_element(BGP_NODE, &no_neighbor_ttl_security_cmd);
13132
13133 /* "show [ip] bgp memory" commands. */
13134 install_element(VIEW_NODE, &show_bgp_memory_cmd);
13135
acf71666
MK		 13136 /* "show bgp martian next-hop" */
13137 install_element(VIEW_NODE, &show_bgp_martian_nexthop_db_cmd);
13138
d62a17ae 13139 /* "show [ip] bgp views" commands. */
13140 install_element(VIEW_NODE, &show_bgp_views_cmd);
13141
13142 /* "show [ip] bgp vrfs" commands. */
13143 install_element(VIEW_NODE, &show_bgp_vrfs_cmd);
13144
13145 /* Community-list. */
13146 community_list_vty();
ddb5b488
PZ		 13147
13148 /* vpn-policy commands */
b9c7bc5a
PZ		 13149 install_element(BGP_IPV4_NODE, &af_rd_vpn_export_cmd);
13150 install_element(BGP_IPV6_NODE, &af_rd_vpn_export_cmd);
13151 install_element(BGP_IPV4_NODE, &af_label_vpn_export_cmd);
13152 install_element(BGP_IPV6_NODE, &af_label_vpn_export_cmd);
13153 install_element(BGP_IPV4_NODE, &af_nexthop_vpn_export_cmd);
13154 install_element(BGP_IPV6_NODE, &af_nexthop_vpn_export_cmd);
13155 install_element(BGP_IPV4_NODE, &af_rt_vpn_imexport_cmd);
13156 install_element(BGP_IPV6_NODE, &af_rt_vpn_imexport_cmd);
13157 install_element(BGP_IPV4_NODE, &af_route_map_vpn_imexport_cmd);
13158 install_element(BGP_IPV6_NODE, &af_route_map_vpn_imexport_cmd);
13159
301ad80a
PG		 13160 install_element(BGP_IPV4_NODE, &af_routetarget_import_cmd);
13161 install_element(BGP_IPV6_NODE, &af_routetarget_import_cmd);
13162
b9c7bc5a
PZ		 13163 install_element(BGP_IPV4_NODE, &af_no_rd_vpn_export_cmd);
13164 install_element(BGP_IPV6_NODE, &af_no_rd_vpn_export_cmd);
13165 install_element(BGP_IPV4_NODE, &af_no_label_vpn_export_cmd);
13166 install_element(BGP_IPV6_NODE, &af_no_label_vpn_export_cmd);
13167 install_element(BGP_IPV4_NODE, &af_no_nexthop_vpn_export_cmd);
13168 install_element(BGP_IPV6_NODE, &af_no_nexthop_vpn_export_cmd);
13169 install_element(BGP_IPV4_NODE, &af_no_rt_vpn_imexport_cmd);
13170 install_element(BGP_IPV6_NODE, &af_no_rt_vpn_imexport_cmd);
13171 install_element(BGP_IPV4_NODE, &af_no_route_map_vpn_imexport_cmd);
13172 install_element(BGP_IPV6_NODE, &af_no_route_map_vpn_imexport_cmd);
718e3744 13173}
6b0655a2 13174
718e3744 13175#include "memory.h"
13176#include "bgp_regex.h"
13177#include "bgp_clist.h"
13178#include "bgp_ecommunity.h"
13179
13180/* VTY functions. */
13181
13182/* Direction value to string conversion. */
d62a17ae 13183static const char *community_direct_str(int direct)
13184{
13185 switch (direct) {
13186 case COMMUNITY_DENY:
13187 return "deny";
13188 case COMMUNITY_PERMIT:
13189 return "permit";
13190 default:
13191 return "unknown";
13192 }
718e3744 13193}
13194
13195/* Display error string. */
d62a17ae 13196static void community_list_perror(struct vty *vty, int ret)
13197{
13198 switch (ret) {
13199 case COMMUNITY_LIST_ERR_CANT_FIND_LIST:
13200 vty_out(vty, "%% Can't find community-list\n");
13201 break;
13202 case COMMUNITY_LIST_ERR_MALFORMED_VAL:
13203 vty_out(vty, "%% Malformed community-list value\n");
13204 break;
13205 case COMMUNITY_LIST_ERR_STANDARD_CONFLICT:
13206 vty_out(vty,
13207 "%% Community name conflict, previously defined as standard community\n");
13208 break;
13209 case COMMUNITY_LIST_ERR_EXPANDED_CONFLICT:
13210 vty_out(vty,
13211 "%% Community name conflict, previously defined as expanded community\n");
13212 break;
13213 }
718e3744 13214}
13215
5bf15956
DW		 13216/* "community-list" keyword help string. */
13217#define COMMUNITY_LIST_STR "Add a community list entry\n"
13218
5bf15956 13219/* ip community-list standard */
718e3744 13220DEFUN (ip_community_list_standard,
13221 ip_community_list_standard_cmd,
e961923c 13222 "ip community-list <(1-99)|standard WORD> <deny|permit> AA:NN...",
718e3744 13223 IP_STR
13224 COMMUNITY_LIST_STR
13225 "Community list number (standard)\n"
5bf15956 13226 "Add an standard community-list entry\n"
718e3744 13227 "Community list name\n"
13228 "Specify community to reject\n"
13229 "Specify community to accept\n"
13230 COMMUNITY_VAL_STR)
13231{
d62a17ae 13232 char *cl_name_or_number = NULL;
13233 int direct = 0;
13234 int style = COMMUNITY_LIST_STANDARD;
42f914d4 13235
d62a17ae 13236 int idx = 0;
13237 argv_find(argv, argc, "(1-99)", &idx);
13238 argv_find(argv, argc, "WORD", &idx);
13239 cl_name_or_number = argv[idx]->arg;
13240 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13241 : COMMUNITY_DENY;
13242 argv_find(argv, argc, "AA:NN", &idx);
13243 char *str = argv_concat(argv, argc, idx);
42f914d4 13244
d62a17ae 13245 int ret = community_list_set(bgp_clist, cl_name_or_number, str, direct,
13246 style);
42f914d4 13247
d62a17ae 13248 XFREE(MTYPE_TMP, str);
42f914d4 13249
d62a17ae 13250 if (ret < 0) {
13251 /* Display error string. */
13252 community_list_perror(vty, ret);
13253 return CMD_WARNING_CONFIG_FAILED;
13254 }
42f914d4 13255
d62a17ae 13256 return CMD_SUCCESS;
718e3744 13257}
13258
fee6e4e4 13259DEFUN (no_ip_community_list_standard_all,
13260 no_ip_community_list_standard_all_cmd,
e961923c 13261 "no ip community-list <(1-99)|standard WORD> <deny|permit> AA:NN...",
718e3744 13262 NO_STR
13263 IP_STR
13264 COMMUNITY_LIST_STR
13265 "Community list number (standard)\n"
5bf15956
DW		 13266 "Add an standard community-list entry\n"
13267 "Community list name\n"
718e3744 13268 "Specify community to reject\n"
13269 "Specify community to accept\n"
13270 COMMUNITY_VAL_STR)
13271{
d62a17ae 13272 char *cl_name_or_number = NULL;
13273 int direct = 0;
13274 int style = COMMUNITY_LIST_STANDARD;
42f914d4 13275
d62a17ae 13276 int idx = 0;
13277 argv_find(argv, argc, "(1-99)", &idx);
13278 argv_find(argv, argc, "WORD", &idx);
13279 cl_name_or_number = argv[idx]->arg;
13280 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13281 : COMMUNITY_DENY;
13282 argv_find(argv, argc, "AA:NN", &idx);
13283 char *str = argv_concat(argv, argc, idx);
42f914d4 13284
d62a17ae 13285 int ret = community_list_unset(bgp_clist, cl_name_or_number, str,
7298a8e1 13286 direct, style);
42f914d4 13287
d62a17ae 13288 XFREE(MTYPE_TMP, str);
daf9ddbb 13289
d62a17ae 13290 if (ret < 0) {
13291 community_list_perror(vty, ret);
13292 return CMD_WARNING_CONFIG_FAILED;
13293 }
42f914d4 13294
d62a17ae 13295 return CMD_SUCCESS;
718e3744 13296}
13297
5bf15956
DW		 13298/* ip community-list expanded */
13299DEFUN (ip_community_list_expanded_all,
13300 ip_community_list_expanded_all_cmd,
42f914d4 13301 "ip community-list <(100-500)|expanded WORD> <deny|permit> AA:NN...",
718e3744 13302 IP_STR
13303 COMMUNITY_LIST_STR
13304 "Community list number (expanded)\n"
5bf15956 13305 "Add an expanded community-list entry\n"
718e3744 13306 "Community list name\n"
13307 "Specify community to reject\n"
13308 "Specify community to accept\n"
13309 COMMUNITY_VAL_STR)
13310{
d62a17ae 13311 char *cl_name_or_number = NULL;
13312 int direct = 0;
13313 int style = COMMUNITY_LIST_EXPANDED;
42f914d4 13314
d62a17ae 13315 int idx = 0;
13316 argv_find(argv, argc, "(100-500)", &idx);
13317 argv_find(argv, argc, "WORD", &idx);
13318 cl_name_or_number = argv[idx]->arg;
13319 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13320 : COMMUNITY_DENY;
13321 argv_find(argv, argc, "AA:NN", &idx);
13322 char *str = argv_concat(argv, argc, idx);
42f914d4 13323
d62a17ae 13324 int ret = community_list_set(bgp_clist, cl_name_or_number, str, direct,
13325 style);
42f914d4 13326
d62a17ae 13327 XFREE(MTYPE_TMP, str);
42f914d4 13328
d62a17ae 13329 if (ret < 0) {
13330 /* Display error string. */
13331 community_list_perror(vty, ret);
13332 return CMD_WARNING_CONFIG_FAILED;
13333 }
42f914d4 13334
d62a17ae 13335 return CMD_SUCCESS;
718e3744 13336}
13337
5bf15956
DW		 13338DEFUN (no_ip_community_list_expanded_all,
13339 no_ip_community_list_expanded_all_cmd,
42f914d4 13340 "no ip community-list <(100-500)|expanded WORD> <deny|permit> AA:NN...",
718e3744 13341 NO_STR
13342 IP_STR
13343 COMMUNITY_LIST_STR
5bf15956
DW		 13344 "Community list number (expanded)\n"
13345 "Add an expanded community-list entry\n"
718e3744 13346 "Community list name\n"
13347 "Specify community to reject\n"
13348 "Specify community to accept\n"
5bf15956 13349 COMMUNITY_VAL_STR)
718e3744 13350{
d62a17ae 13351 char *cl_name_or_number = NULL;
13352 int direct = 0;
13353 int style = COMMUNITY_LIST_EXPANDED;
42f914d4 13354
d62a17ae 13355 int idx = 0;
13356 argv_find(argv, argc, "(100-500)", &idx);
13357 argv_find(argv, argc, "WORD", &idx);
13358 cl_name_or_number = argv[idx]->arg;
13359 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13360 : COMMUNITY_DENY;
13361 argv_find(argv, argc, "AA:NN", &idx);
13362 char *str = argv_concat(argv, argc, idx);
42f914d4 13363
d62a17ae 13364 int ret = community_list_unset(bgp_clist, cl_name_or_number, str,
7298a8e1 13365 direct, style);
42f914d4 13366
d62a17ae 13367 XFREE(MTYPE_TMP, str);
daf9ddbb 13368
d62a17ae 13369 if (ret < 0) {
13370 community_list_perror(vty, ret);
13371 return CMD_WARNING_CONFIG_FAILED;
13372 }
42f914d4 13373
d62a17ae 13374 return CMD_SUCCESS;
718e3744 13375}
13376
d62a17ae 13377static void community_list_show(struct vty *vty, struct community_list *list)
718e3744 13378{
d62a17ae 13379 struct community_entry *entry;
718e3744 13380
d62a17ae 13381 for (entry = list->head; entry; entry = entry->next) {
13382 if (entry == list->head) {
13383 if (all_digit(list->name))
13384 vty_out(vty, "Community %s list %s\n",
13385 entry->style == COMMUNITY_LIST_STANDARD
13386 ? "standard"
13387 : "(expanded) access",
13388 list->name);
13389 else
13390 vty_out(vty, "Named Community %s list %s\n",
13391 entry->style == COMMUNITY_LIST_STANDARD
13392 ? "standard"
13393 : "expanded",
13394 list->name);
13395 }
13396 if (entry->any)
13397 vty_out(vty, " %s\n",
13398 community_direct_str(entry->direct));
13399 else
13400 vty_out(vty, " %s %s\n",
13401 community_direct_str(entry->direct),
13402 entry->style == COMMUNITY_LIST_STANDARD
a69ea8ae 13403 ? community_str(entry->u.com, false)
d62a17ae 13404 : entry->config);
13405 }
718e3744 13406}
13407
13408DEFUN (show_ip_community_list,
13409 show_ip_community_list_cmd,
13410 "show ip community-list",
13411 SHOW_STR
13412 IP_STR
13413 "List community-list\n")
13414{
d62a17ae 13415 struct community_list *list;
13416 struct community_list_master *cm;
718e3744 13417
d62a17ae 13418 cm = community_list_master_lookup(bgp_clist, COMMUNITY_LIST_MASTER);
13419 if (!cm)
13420 return CMD_SUCCESS;
718e3744 13421
d62a17ae 13422 for (list = cm->num.head; list; list = list->next)
13423 community_list_show(vty, list);
718e3744 13424
d62a17ae 13425 for (list = cm->str.head; list; list = list->next)
13426 community_list_show(vty, list);
718e3744 13427
d62a17ae 13428 return CMD_SUCCESS;
718e3744 13429}
13430
13431DEFUN (show_ip_community_list_arg,
13432 show_ip_community_list_arg_cmd,
6147e2c6 13433 "show ip community-list <(1-500)|WORD>",
718e3744 13434 SHOW_STR
13435 IP_STR
13436 "List community-list\n"
13437 "Community-list number\n"
13438 "Community-list name\n")
13439{
d62a17ae 13440 int idx_comm_list = 3;
13441 struct community_list *list;
718e3744 13442
d62a17ae 13443 list = community_list_lookup(bgp_clist, argv[idx_comm_list]->arg,
13444 COMMUNITY_LIST_MASTER);
13445 if (!list) {
13446 vty_out(vty, "%% Can't find community-list\n");
13447 return CMD_WARNING;
13448 }
718e3744 13449
d62a17ae 13450 community_list_show(vty, list);
718e3744 13451
d62a17ae 13452 return CMD_SUCCESS;
718e3744 13453}
6b0655a2 13454
57d187bc
JS		 13455/*
13456 * Large Community code.
13457 */
d62a17ae 13458static int lcommunity_list_set_vty(struct vty *vty, int argc,
13459 struct cmd_token **argv, int style,
13460 int reject_all_digit_name)
13461{
13462 int ret;
13463 int direct;
13464 char *str;
13465 int idx = 0;
13466 char *cl_name;
13467
13468 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13469 : COMMUNITY_DENY;
13470
13471 /* All digit name check. */
13472 idx = 0;
13473 argv_find(argv, argc, "WORD", &idx);
13474 argv_find(argv, argc, "(1-99)", &idx);
13475 argv_find(argv, argc, "(100-500)", &idx);
13476 cl_name = argv[idx]->arg;
13477 if (reject_all_digit_name && all_digit(cl_name)) {
13478 vty_out(vty, "%% Community name cannot have all digits\n");
13479 return CMD_WARNING_CONFIG_FAILED;
13480 }
13481
13482 idx = 0;
13483 argv_find(argv, argc, "AA:BB:CC", &idx);
13484 argv_find(argv, argc, "LINE", &idx);
13485 /* Concat community string argument. */
13486 if (idx)
13487 str = argv_concat(argv, argc, idx);
13488 else
13489 str = NULL;
13490
13491 ret = lcommunity_list_set(bgp_clist, cl_name, str, direct, style);
13492
13493 /* Free temporary community list string allocated by
13494 argv_concat(). */
13495 if (str)
13496 XFREE(MTYPE_TMP, str);
13497
13498 if (ret < 0) {
13499 community_list_perror(vty, ret);
13500 return CMD_WARNING_CONFIG_FAILED;
13501 }
13502 return CMD_SUCCESS;
13503}
13504
13505static int lcommunity_list_unset_vty(struct vty *vty, int argc,
13506 struct cmd_token **argv, int style)
13507{
13508 int ret;
13509 int direct = 0;
13510 char *str = NULL;
13511 int idx = 0;
13512
13513 argv_find(argv, argc, "permit", &idx);
13514 argv_find(argv, argc, "deny", &idx);
13515
13516 if (idx) {
13517 /* Check the list direct. */
13518 if (strncmp(argv[idx]->arg, "p", 1) == 0)
13519 direct = COMMUNITY_PERMIT;
13520 else
13521 direct = COMMUNITY_DENY;
13522
13523 idx = 0;
13524 argv_find(argv, argc, "LINE", &idx);
13525 argv_find(argv, argc, "AA:AA:NN", &idx);
13526 /* Concat community string argument. */
13527 str = argv_concat(argv, argc, idx);
13528 }
13529
13530 idx = 0;
13531 argv_find(argv, argc, "(1-99)", &idx);
13532 argv_find(argv, argc, "(100-500)", &idx);
13533 argv_find(argv, argc, "WORD", &idx);
13534
13535 /* Unset community list. */
13536 ret = lcommunity_list_unset(bgp_clist, argv[idx]->arg, str, direct,
13537 style);
13538
13539 /* Free temporary community list string allocated by
13540 argv_concat(). */
13541 if (str)
13542 XFREE(MTYPE_TMP, str);
13543
13544 if (ret < 0) {
13545 community_list_perror(vty, ret);
13546 return CMD_WARNING_CONFIG_FAILED;
13547 }
13548
13549 return CMD_SUCCESS;
57d187bc
JS		 13550}
13551
13552/* "large-community-list" keyword help string. */
13553#define LCOMMUNITY_LIST_STR "Add a large community list entry\n"
13554#define LCOMMUNITY_VAL_STR "large community in 'aa:bb:cc' format\n"
13555
13556DEFUN (ip_lcommunity_list_standard,
13557 ip_lcommunity_list_standard_cmd,
52951b63
DS		 13558 "ip large-community-list (1-99) <deny|permit>",
13559 IP_STR
13560 LCOMMUNITY_LIST_STR
13561 "Large Community list number (standard)\n"
13562 "Specify large community to reject\n"
7111c1a0 13563 "Specify large community to accept\n")
52951b63 13564{
d62a17ae 13565 return lcommunity_list_set_vty(vty, argc, argv,
13566 LARGE_COMMUNITY_LIST_STANDARD, 0);
52951b63
DS		 13567}
13568
13569DEFUN (ip_lcommunity_list_standard1,
13570 ip_lcommunity_list_standard1_cmd,
13571 "ip large-community-list (1-99) <deny|permit> AA:BB:CC...",
57d187bc
JS		 13572 IP_STR
13573 LCOMMUNITY_LIST_STR
13574 "Large Community list number (standard)\n"
13575 "Specify large community to reject\n"
13576 "Specify large community to accept\n"
13577 LCOMMUNITY_VAL_STR)
13578{
d62a17ae 13579 return lcommunity_list_set_vty(vty, argc, argv,
13580 LARGE_COMMUNITY_LIST_STANDARD, 0);
57d187bc
JS		 13581}
13582
13583DEFUN (ip_lcommunity_list_expanded,
13584 ip_lcommunity_list_expanded_cmd,
13585 "ip large-community-list (100-500) <deny|permit> LINE...",
13586 IP_STR
13587 LCOMMUNITY_LIST_STR
13588 "Large Community list number (expanded)\n"
13589 "Specify large community to reject\n"
13590 "Specify large community to accept\n"
13591 "An ordered list as a regular-expression\n")
13592{
d62a17ae 13593 return lcommunity_list_set_vty(vty, argc, argv,
13594 LARGE_COMMUNITY_LIST_EXPANDED, 0);
57d187bc
JS		 13595}
13596
13597DEFUN (ip_lcommunity_list_name_standard,
13598 ip_lcommunity_list_name_standard_cmd,
52951b63
DS		 13599 "ip large-community-list standard WORD <deny|permit>",
13600 IP_STR
13601 LCOMMUNITY_LIST_STR
13602 "Specify standard large-community-list\n"
13603 "Large Community list name\n"
13604 "Specify large community to reject\n"
13605 "Specify large community to accept\n")
13606{
d62a17ae 13607 return lcommunity_list_set_vty(vty, argc, argv,
13608 LARGE_COMMUNITY_LIST_STANDARD, 1);
52951b63
DS		 13609}
13610
13611DEFUN (ip_lcommunity_list_name_standard1,
13612 ip_lcommunity_list_name_standard1_cmd,
13613 "ip large-community-list standard WORD <deny|permit> AA:BB:CC...",
57d187bc
JS		 13614 IP_STR
13615 LCOMMUNITY_LIST_STR
13616 "Specify standard large-community-list\n"
13617 "Large Community list name\n"
13618 "Specify large community to reject\n"
13619 "Specify large community to accept\n"
13620 LCOMMUNITY_VAL_STR)
13621{
d62a17ae 13622 return lcommunity_list_set_vty(vty, argc, argv,
13623 LARGE_COMMUNITY_LIST_STANDARD, 1);
57d187bc
JS		 13624}
13625
13626DEFUN (ip_lcommunity_list_name_expanded,
13627 ip_lcommunity_list_name_expanded_cmd,
13628 "ip large-community-list expanded WORD <deny|permit> LINE...",
13629 IP_STR
13630 LCOMMUNITY_LIST_STR
13631 "Specify expanded large-community-list\n"
13632 "Large Community list name\n"
13633 "Specify large community to reject\n"
13634 "Specify large community to accept\n"
13635 "An ordered list as a regular-expression\n")
13636{
d62a17ae 13637 return lcommunity_list_set_vty(vty, argc, argv,
13638 LARGE_COMMUNITY_LIST_EXPANDED, 1);
57d187bc
JS		 13639}
13640
13641DEFUN (no_ip_lcommunity_list_standard_all,
13642 no_ip_lcommunity_list_standard_all_cmd,
13643 "no ip large-community-list <(1-99)|(100-500)|WORD>",
13644 NO_STR
13645 IP_STR
13646 LCOMMUNITY_LIST_STR
13647 "Large Community list number (standard)\n"
13648 "Large Community list number (expanded)\n"
13649 "Large Community list name\n")
13650{
d62a17ae 13651 return lcommunity_list_unset_vty(vty, argc, argv,
13652 LARGE_COMMUNITY_LIST_STANDARD);
57d187bc
JS		 13653}
13654
13655DEFUN (no_ip_lcommunity_list_name_expanded_all,
13656 no_ip_lcommunity_list_name_expanded_all_cmd,
13657 "no ip large-community-list expanded WORD",
13658 NO_STR
13659 IP_STR
13660 LCOMMUNITY_LIST_STR
13661 "Specify expanded large-community-list\n"
13662 "Large Community list name\n")
13663{
d62a17ae 13664 return lcommunity_list_unset_vty(vty, argc, argv,
13665 LARGE_COMMUNITY_LIST_EXPANDED);
57d187bc
JS		 13666}
13667
13668DEFUN (no_ip_lcommunity_list_standard,
13669 no_ip_lcommunity_list_standard_cmd,
13670 "no ip large-community-list (1-99) <deny|permit> AA:AA:NN...",
13671 NO_STR
13672 IP_STR
13673 LCOMMUNITY_LIST_STR
13674 "Large Community list number (standard)\n"
13675 "Specify large community to reject\n"
13676 "Specify large community to accept\n"
13677 LCOMMUNITY_VAL_STR)
13678{
d62a17ae 13679 return lcommunity_list_unset_vty(vty, argc, argv,
13680 LARGE_COMMUNITY_LIST_STANDARD);
57d187bc
JS		 13681}
13682
13683DEFUN (no_ip_lcommunity_list_expanded,
13684 no_ip_lcommunity_list_expanded_cmd,
13685 "no ip large-community-list (100-500) <deny|permit> LINE...",
13686 NO_STR
13687 IP_STR
13688 LCOMMUNITY_LIST_STR
13689 "Large Community list number (expanded)\n"
13690 "Specify large community to reject\n"
13691 "Specify large community to accept\n"
13692 "An ordered list as a regular-expression\n")
13693{
d62a17ae 13694 return lcommunity_list_unset_vty(vty, argc, argv,
13695 LARGE_COMMUNITY_LIST_EXPANDED);
57d187bc
JS		 13696}
13697
13698DEFUN (no_ip_lcommunity_list_name_standard,
13699 no_ip_lcommunity_list_name_standard_cmd,
13700 "no ip large-community-list standard WORD <deny|permit> AA:AA:NN...",
13701 NO_STR
13702 IP_STR
13703 LCOMMUNITY_LIST_STR
13704 "Specify standard large-community-list\n"
13705 "Large Community list name\n"
13706 "Specify large community to reject\n"
13707 "Specify large community to accept\n"
13708 LCOMMUNITY_VAL_STR)
13709{
d62a17ae 13710 return lcommunity_list_unset_vty(vty, argc, argv,
13711 LARGE_COMMUNITY_LIST_STANDARD);
57d187bc
JS		 13712}
13713
13714DEFUN (no_ip_lcommunity_list_name_expanded,
13715 no_ip_lcommunity_list_name_expanded_cmd,
13716 "no ip large-community-list expanded WORD <deny|permit> LINE...",
13717 NO_STR
13718 IP_STR
13719 LCOMMUNITY_LIST_STR
13720 "Specify expanded large-community-list\n"
13721 "Large community list name\n"
13722 "Specify large community to reject\n"
13723 "Specify large community to accept\n"
13724 "An ordered list as a regular-expression\n")
13725{
d62a17ae 13726 return lcommunity_list_unset_vty(vty, argc, argv,
13727 LARGE_COMMUNITY_LIST_EXPANDED);
13728}
13729
13730static void lcommunity_list_show(struct vty *vty, struct community_list *list)
13731{
13732 struct community_entry *entry;
13733
13734 for (entry = list->head; entry; entry = entry->next) {
13735 if (entry == list->head) {
13736 if (all_digit(list->name))
13737 vty_out(vty, "Large community %s list %s\n",
13738 entry->style == EXTCOMMUNITY_LIST_STANDARD
13739 ? "standard"
13740 : "(expanded) access",
13741 list->name);
13742 else
13743 vty_out(vty,
13744 "Named large community %s list %s\n",
13745 entry->style == EXTCOMMUNITY_LIST_STANDARD
13746 ? "standard"
13747 : "expanded",
13748 list->name);
13749 }
13750 if (entry->any)
13751 vty_out(vty, " %s\n",
13752 community_direct_str(entry->direct));
13753 else
13754 vty_out(vty, " %s %s\n",
13755 community_direct_str(entry->direct),
13756 entry->style == EXTCOMMUNITY_LIST_STANDARD
13757 ? entry->u.ecom->str
13758 : entry->config);
13759 }
57d187bc
JS		 13760}
13761
13762DEFUN (show_ip_lcommunity_list,
13763 show_ip_lcommunity_list_cmd,
13764 "show ip large-community-list",
13765 SHOW_STR
13766 IP_STR
13767 "List large-community list\n")
13768{
d62a17ae 13769 struct community_list *list;
13770 struct community_list_master *cm;
57d187bc 13771
d62a17ae 13772 cm = community_list_master_lookup(bgp_clist,
13773 LARGE_COMMUNITY_LIST_MASTER);
13774 if (!cm)
13775 return CMD_SUCCESS;
57d187bc 13776
d62a17ae 13777 for (list = cm->num.head; list; list = list->next)
13778 lcommunity_list_show(vty, list);
57d187bc 13779
d62a17ae 13780 for (list = cm->str.head; list; list = list->next)
13781 lcommunity_list_show(vty, list);
57d187bc 13782
d62a17ae 13783 return CMD_SUCCESS;
57d187bc
JS		 13784}
13785
13786DEFUN (show_ip_lcommunity_list_arg,
13787 show_ip_lcommunity_list_arg_cmd,
13788 "show ip large-community-list <(1-500)|WORD>",
13789 SHOW_STR
13790 IP_STR
13791 "List large-community list\n"
13792 "large-community-list number\n"
13793 "large-community-list name\n")
13794{
d62a17ae 13795 struct community_list *list;
57d187bc 13796
d62a17ae 13797 list = community_list_lookup(bgp_clist, argv[3]->arg,
13798 LARGE_COMMUNITY_LIST_MASTER);
13799 if (!list) {
13800 vty_out(vty, "%% Can't find extcommunity-list\n");
13801 return CMD_WARNING;
13802 }
57d187bc 13803
d62a17ae 13804 lcommunity_list_show(vty, list);
57d187bc 13805
d62a17ae 13806 return CMD_SUCCESS;
57d187bc
JS		 13807}
13808
718e3744 13809/* "extcommunity-list" keyword help string. */
13810#define EXTCOMMUNITY_LIST_STR "Add a extended community list entry\n"
13811#define EXTCOMMUNITY_VAL_STR "Extended community attribute in 'rt aa:nn_or_IPaddr:nn' OR 'soo aa:nn_or_IPaddr:nn' format\n"
13812
13813DEFUN (ip_extcommunity_list_standard,
13814 ip_extcommunity_list_standard_cmd,
e961923c 13815 "ip extcommunity-list <(1-99)|standard WORD> <deny|permit> AA:NN...",
718e3744 13816 IP_STR
13817 EXTCOMMUNITY_LIST_STR
13818 "Extended Community list number (standard)\n"
718e3744 13819 "Specify standard extcommunity-list\n"
5bf15956 13820 "Community list name\n"
718e3744 13821 "Specify community to reject\n"
13822 "Specify community to accept\n"
13823 EXTCOMMUNITY_VAL_STR)
13824{
d62a17ae 13825 int style = EXTCOMMUNITY_LIST_STANDARD;
13826 int direct = 0;
13827 char *cl_number_or_name = NULL;
42f914d4 13828
d62a17ae 13829 int idx = 0;
13830 argv_find(argv, argc, "(1-99)", &idx);
13831 argv_find(argv, argc, "WORD", &idx);
13832 cl_number_or_name = argv[idx]->arg;
13833 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13834 : COMMUNITY_DENY;
13835 argv_find(argv, argc, "AA:NN", &idx);
13836 char *str = argv_concat(argv, argc, idx);
42f914d4 13837
d62a17ae 13838 int ret = extcommunity_list_set(bgp_clist, cl_number_or_name, str,
13839 direct, style);
42f914d4 13840
d62a17ae 13841 XFREE(MTYPE_TMP, str);
42f914d4 13842
d62a17ae 13843 if (ret < 0) {
13844 community_list_perror(vty, ret);
13845 return CMD_WARNING_CONFIG_FAILED;
13846 }
42f914d4 13847
d62a17ae 13848 return CMD_SUCCESS;
718e3744 13849}
13850
718e3744 13851DEFUN (ip_extcommunity_list_name_expanded,
13852 ip_extcommunity_list_name_expanded_cmd,
e961923c 13853 "ip extcommunity-list <(100-500)|expanded WORD> <deny|permit> LINE...",
718e3744 13854 IP_STR
13855 EXTCOMMUNITY_LIST_STR
5bf15956 13856 "Extended Community list number (expanded)\n"
718e3744 13857 "Specify expanded extcommunity-list\n"
13858 "Extended Community list name\n"
13859 "Specify community to reject\n"
13860 "Specify community to accept\n"
13861 "An ordered list as a regular-expression\n")
13862{
d62a17ae 13863 int style = EXTCOMMUNITY_LIST_EXPANDED;
13864 int direct = 0;
13865 char *cl_number_or_name = NULL;
42f914d4 13866
d62a17ae 13867 int idx = 0;
13868 argv_find(argv, argc, "(100-500)", &idx);
13869 argv_find(argv, argc, "WORD", &idx);
13870 cl_number_or_name = argv[idx]->arg;
13871 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13872 : COMMUNITY_DENY;
13873 argv_find(argv, argc, "LINE", &idx);
13874 char *str = argv_concat(argv, argc, idx);
42f914d4 13875
d62a17ae 13876 int ret = extcommunity_list_set(bgp_clist, cl_number_or_name, str,
13877 direct, style);
42f914d4 13878
d62a17ae 13879 XFREE(MTYPE_TMP, str);
42f914d4 13880
d62a17ae 13881 if (ret < 0) {
13882 community_list_perror(vty, ret);
13883 return CMD_WARNING_CONFIG_FAILED;
13884 }
42f914d4 13885
d62a17ae 13886 return CMD_SUCCESS;
718e3744 13887}
13888
fee6e4e4 13889DEFUN (no_ip_extcommunity_list_standard_all,
13890 no_ip_extcommunity_list_standard_all_cmd,
e961923c 13891 "no ip extcommunity-list <(1-99)|standard WORD> <deny|permit> AA:NN...",
813d4307
DW		 13892 NO_STR
13893 IP_STR
13894 EXTCOMMUNITY_LIST_STR
13895 "Extended Community list number (standard)\n"
718e3744 13896 "Specify standard extcommunity-list\n"
5bf15956 13897 "Community list name\n"
718e3744 13898 "Specify community to reject\n"
13899 "Specify community to accept\n"
13900 EXTCOMMUNITY_VAL_STR)
13901{
d62a17ae 13902 int style = EXTCOMMUNITY_LIST_STANDARD;
13903 int direct = 0;
13904 char *cl_number_or_name = NULL;
42f914d4 13905
d62a17ae 13906 int idx = 0;
13907 argv_find(argv, argc, "(1-99)", &idx);
13908 argv_find(argv, argc, "WORD", &idx);
13909 cl_number_or_name = argv[idx]->arg;
13910 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13911 : COMMUNITY_DENY;
13912 argv_find(argv, argc, "AA:NN", &idx);
13913 char *str = argv_concat(argv, argc, idx);
42f914d4 13914
d62a17ae 13915 int ret = extcommunity_list_unset(bgp_clist, cl_number_or_name, str,
7298a8e1 13916 direct, style);
42f914d4 13917
d62a17ae 13918 XFREE(MTYPE_TMP, str);
42f914d4 13919
d62a17ae 13920 if (ret < 0) {
13921 community_list_perror(vty, ret);
13922 return CMD_WARNING_CONFIG_FAILED;
13923 }
42f914d4 13924
d62a17ae 13925 return CMD_SUCCESS;
718e3744 13926}
13927
5bf15956
DW		 13928DEFUN (no_ip_extcommunity_list_expanded_all,
13929 no_ip_extcommunity_list_expanded_all_cmd,
e961923c 13930 "no ip extcommunity-list <(100-500)|expanded WORD> <deny|permit> LINE...",
718e3744 13931 NO_STR
13932 IP_STR
13933 EXTCOMMUNITY_LIST_STR
13934 "Extended Community list number (expanded)\n"
718e3744 13935 "Specify expanded extcommunity-list\n"
5bf15956 13936 "Extended Community list name\n"
718e3744 13937 "Specify community to reject\n"
13938 "Specify community to accept\n"
13939 "An ordered list as a regular-expression\n")
13940{
d62a17ae 13941 int style = EXTCOMMUNITY_LIST_EXPANDED;
13942 int direct = 0;
13943 char *cl_number_or_name = NULL;
42f914d4 13944
d62a17ae 13945 int idx = 0;
13946 argv_find(argv, argc, "(100-500)", &idx);
13947 argv_find(argv, argc, "WORD", &idx);
13948 cl_number_or_name = argv[idx]->arg;
13949 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13950 : COMMUNITY_DENY;
13951 argv_find(argv, argc, "LINE", &idx);
13952 char *str = argv_concat(argv, argc, idx);
42f914d4 13953
d62a17ae 13954 int ret = extcommunity_list_unset(bgp_clist, cl_number_or_name, str,
7298a8e1 13955 direct, style);
42f914d4 13956
d62a17ae 13957 XFREE(MTYPE_TMP, str);
42f914d4 13958
d62a17ae 13959 if (ret < 0) {
13960 community_list_perror(vty, ret);
13961 return CMD_WARNING_CONFIG_FAILED;
13962 }
42f914d4 13963
d62a17ae 13964 return CMD_SUCCESS;
718e3744 13965}
13966
d62a17ae 13967static void extcommunity_list_show(struct vty *vty, struct community_list *list)
718e3744 13968{
d62a17ae 13969 struct community_entry *entry;
718e3744 13970
d62a17ae 13971 for (entry = list->head; entry; entry = entry->next) {
13972 if (entry == list->head) {
13973 if (all_digit(list->name))
13974 vty_out(vty, "Extended community %s list %s\n",
13975 entry->style == EXTCOMMUNITY_LIST_STANDARD
13976 ? "standard"
13977 : "(expanded) access",
13978 list->name);
13979 else
13980 vty_out(vty,
13981 "Named extended community %s list %s\n",
13982 entry->style == EXTCOMMUNITY_LIST_STANDARD
13983 ? "standard"
13984 : "expanded",
13985 list->name);
13986 }
13987 if (entry->any)
13988 vty_out(vty, " %s\n",
13989 community_direct_str(entry->direct));
13990 else
13991 vty_out(vty, " %s %s\n",
13992 community_direct_str(entry->direct),
13993 entry->style == EXTCOMMUNITY_LIST_STANDARD
13994 ? entry->u.ecom->str
13995 : entry->config);
13996 }
718e3744 13997}
13998
13999DEFUN (show_ip_extcommunity_list,
14000 show_ip_extcommunity_list_cmd,
14001 "show ip extcommunity-list",
14002 SHOW_STR
14003 IP_STR
14004 "List extended-community list\n")
14005{
d62a17ae 14006 struct community_list *list;
14007 struct community_list_master *cm;
718e3744 14008
d62a17ae 14009 cm = community_list_master_lookup(bgp_clist, EXTCOMMUNITY_LIST_MASTER);
14010 if (!cm)
14011 return CMD_SUCCESS;
718e3744 14012
d62a17ae 14013 for (list = cm->num.head; list; list = list->next)
14014 extcommunity_list_show(vty, list);
718e3744 14015
d62a17ae 14016 for (list = cm->str.head; list; list = list->next)
14017 extcommunity_list_show(vty, list);
718e3744 14018
d62a17ae 14019 return CMD_SUCCESS;
718e3744 14020}
14021
14022DEFUN (show_ip_extcommunity_list_arg,
14023 show_ip_extcommunity_list_arg_cmd,
6147e2c6 14024 "show ip extcommunity-list <(1-500)|WORD>",
718e3744 14025 SHOW_STR
14026 IP_STR
14027 "List extended-community list\n"
14028 "Extcommunity-list number\n"
14029 "Extcommunity-list name\n")
14030{
d62a17ae 14031 int idx_comm_list = 3;
14032 struct community_list *list;
718e3744 14033
d62a17ae 14034 list = community_list_lookup(bgp_clist, argv[idx_comm_list]->arg,
14035 EXTCOMMUNITY_LIST_MASTER);
14036 if (!list) {
14037 vty_out(vty, "%% Can't find extcommunity-list\n");
14038 return CMD_WARNING;
14039 }
718e3744 14040
d62a17ae 14041 extcommunity_list_show(vty, list);
718e3744 14042
d62a17ae 14043 return CMD_SUCCESS;
718e3744 14044}
6b0655a2 14045
718e3744 14046/* Return configuration string of community-list entry. */
d62a17ae 14047static const char *community_list_config_str(struct community_entry *entry)
718e3744 14048{
d62a17ae 14049 const char *str;
718e3744 14050
d62a17ae 14051 if (entry->any)
14052 str = "";
14053 else {
14054 if (entry->style == COMMUNITY_LIST_STANDARD)
a69ea8ae 14055 str = community_str(entry->u.com, false);
d62a17ae 14056 else
14057 str = entry->config;
14058 }
14059 return str;
718e3744 14060}
14061
14062/* Display community-list and extcommunity-list configuration. */
d62a17ae 14063static int community_list_config_write(struct vty *vty)
14064{
14065 struct community_list *list;
14066 struct community_entry *entry;
14067 struct community_list_master *cm;
14068 int write = 0;
14069
14070 /* Community-list. */
14071 cm = community_list_master_lookup(bgp_clist, COMMUNITY_LIST_MASTER);
14072
14073 for (list = cm->num.head; list; list = list->next)
14074 for (entry = list->head; entry; entry = entry->next) {
14075 vty_out(vty, "ip community-list %s %s %s\n", list->name,
14076 community_direct_str(entry->direct),
14077 community_list_config_str(entry));
14078 write++;
14079 }
14080 for (list = cm->str.head; list; list = list->next)
14081 for (entry = list->head; entry; entry = entry->next) {
14082 vty_out(vty, "ip community-list %s %s %s %s\n",
14083 entry->style == COMMUNITY_LIST_STANDARD
14084 ? "standard"
14085 : "expanded",
14086 list->name, community_direct_str(entry->direct),
14087 community_list_config_str(entry));
14088 write++;
14089 }
14090
14091 /* Extcommunity-list. */
14092 cm = community_list_master_lookup(bgp_clist, EXTCOMMUNITY_LIST_MASTER);
14093
14094 for (list = cm->num.head; list; list = list->next)
14095 for (entry = list->head; entry; entry = entry->next) {
14096 vty_out(vty, "ip extcommunity-list %s %s %s\n",
14097 list->name, community_direct_str(entry->direct),
14098 community_list_config_str(entry));
14099 write++;
14100 }
14101 for (list = cm->str.head; list; list = list->next)
14102 for (entry = list->head; entry; entry = entry->next) {
14103 vty_out(vty, "ip extcommunity-list %s %s %s %s\n",
14104 entry->style == EXTCOMMUNITY_LIST_STANDARD
14105 ? "standard"
14106 : "expanded",
14107 list->name, community_direct_str(entry->direct),
14108 community_list_config_str(entry));
14109 write++;
14110 }
14111
14112
14113 /* lcommunity-list. */
14114 cm = community_list_master_lookup(bgp_clist,
14115 LARGE_COMMUNITY_LIST_MASTER);
14116
14117 for (list = cm->num.head; list; list = list->next)
14118 for (entry = list->head; entry; entry = entry->next) {
14119 vty_out(vty, "ip large-community-list %s %s %s\n",
14120 list->name, community_direct_str(entry->direct),
14121 community_list_config_str(entry));
14122 write++;
14123 }
14124 for (list = cm->str.head; list; list = list->next)
14125 for (entry = list->head; entry; entry = entry->next) {
14126 vty_out(vty, "ip large-community-list %s %s %s %s\n",
14127 entry->style == LARGE_COMMUNITY_LIST_STANDARD
14128 ? "standard"
14129 : "expanded",
14130 list->name, community_direct_str(entry->direct),
14131 community_list_config_str(entry));
14132 write++;
14133 }
14134
14135 return write;
14136}
14137
14138static struct cmd_node community_list_node = {
14139 COMMUNITY_LIST_NODE, "", 1 /* Export to vtysh. */
718e3744 14140};
14141
d62a17ae 14142static void community_list_vty(void)
14143{
14144 install_node(&community_list_node, community_list_config_write);
14145
14146 /* Community-list. */
14147 install_element(CONFIG_NODE, &ip_community_list_standard_cmd);
14148 install_element(CONFIG_NODE, &ip_community_list_expanded_all_cmd);
14149 install_element(CONFIG_NODE, &no_ip_community_list_standard_all_cmd);
14150 install_element(CONFIG_NODE, &no_ip_community_list_expanded_all_cmd);
14151 install_element(VIEW_NODE, &show_ip_community_list_cmd);
14152 install_element(VIEW_NODE, &show_ip_community_list_arg_cmd);
14153
14154 /* Extcommunity-list. */
14155 install_element(CONFIG_NODE, &ip_extcommunity_list_standard_cmd);
14156 install_element(CONFIG_NODE, &ip_extcommunity_list_name_expanded_cmd);
14157 install_element(CONFIG_NODE, &no_ip_extcommunity_list_standard_all_cmd);
14158 install_element(CONFIG_NODE, &no_ip_extcommunity_list_expanded_all_cmd);
14159 install_element(VIEW_NODE, &show_ip_extcommunity_list_cmd);
14160 install_element(VIEW_NODE, &show_ip_extcommunity_list_arg_cmd);
14161
14162 /* Large Community List */
14163 install_element(CONFIG_NODE, &ip_lcommunity_list_standard_cmd);
14164 install_element(CONFIG_NODE, &ip_lcommunity_list_standard1_cmd);
14165 install_element(CONFIG_NODE, &ip_lcommunity_list_expanded_cmd);
14166 install_element(CONFIG_NODE, &ip_lcommunity_list_name_standard_cmd);
14167 install_element(CONFIG_NODE, &ip_lcommunity_list_name_standard1_cmd);
14168 install_element(CONFIG_NODE, &ip_lcommunity_list_name_expanded_cmd);
14169 install_element(CONFIG_NODE, &no_ip_lcommunity_list_standard_all_cmd);
14170 install_element(CONFIG_NODE,
14171 &no_ip_lcommunity_list_name_expanded_all_cmd);
14172 install_element(CONFIG_NODE, &no_ip_lcommunity_list_standard_cmd);
14173 install_element(CONFIG_NODE, &no_ip_lcommunity_list_expanded_cmd);
14174 install_element(CONFIG_NODE, &no_ip_lcommunity_list_name_standard_cmd);
14175 install_element(CONFIG_NODE, &no_ip_lcommunity_list_name_expanded_cmd);
14176 install_element(VIEW_NODE, &show_ip_lcommunity_list_cmd);
14177 install_element(VIEW_NODE, &show_ip_lcommunity_list_arg_cmd);
5bf15956 14178}
FRRouting mirror