]> 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
Merge pull request #2110 from msablic/pim_mtrace_group
[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
6578/* This command is valid only in a bgp vrf instance or the default instance */
6579DEFPY (bgp_imexport_vpn,
6580 bgp_imexport_vpn_cmd,
6581 "[no] <import|export>$direction_str vpn",
c7109e09
PZ		 6582 NO_STR
6583 "Import routes to this address-family\n"
6584 "Export routes from this address-family\n"
6585 "to/from default instance VPN RIB\n")
ddb5b488
PZ		 6586{
6587 VTY_DECLVAR_CONTEXT(bgp, bgp);
b9c7bc5a 6588 int previous_state;
ddb5b488 6589 afi_t afi;
b9c7bc5a 6590 safi_t safi;
ddb5b488 6591 int idx = 0;
b9c7bc5a
PZ		 6592 int yes = 1;
6593 int flag;
6594 vpn_policy_direction_t dir;
ddb5b488 6595
b9c7bc5a 6596 if (argv_find(argv, argc, "no", &idx))
d555f3e9 6597 yes = 0;
ddb5b488 6598
b9c7bc5a
PZ		 6599 if (BGP_INSTANCE_TYPE_VRF != bgp->inst_type &&
6600 BGP_INSTANCE_TYPE_DEFAULT != bgp->inst_type) {
ddb5b488 6601
b9c7bc5a
PZ		 6602 vty_out(vty, "%% import|export vpn valid only for bgp vrf or default instance\n");
6603 return CMD_WARNING_CONFIG_FAILED;
6604 }
ddb5b488 6605
b9c7bc5a
PZ		 6606 afi = bgp_node_afi(vty);
6607 safi = bgp_node_safi(vty);
6608 if ((SAFI_UNICAST != safi) || ((AFI_IP != afi) && (AFI_IP6 != afi))) {
6609 vty_out(vty, "%% import|export vpn valid only for unicast ipv4|ipv6\n");
6610 return CMD_WARNING_CONFIG_FAILED;
6611 }
ddb5b488 6612
b9c7bc5a
PZ		 6613 if (!strcmp(direction_str, "import")) {
6614 flag = BGP_CONFIG_MPLSVPN_TO_VRF_IMPORT;
6615 dir = BGP_VPN_POLICY_DIR_FROMVPN;
6616 } else if (!strcmp(direction_str, "export")) {
6617 flag = BGP_CONFIG_VRF_TO_MPLSVPN_EXPORT;
6618 dir = BGP_VPN_POLICY_DIR_TOVPN;
6619 } else {
6620 vty_out(vty, "%% unknown direction %s\n", direction_str);
6621 return CMD_WARNING_CONFIG_FAILED;
6622 }
6623
6624 previous_state = CHECK_FLAG(bgp->af_flags[afi][safi], flag);
ddb5b488 6625
b9c7bc5a
PZ		 6626 if (yes) {
6627 SET_FLAG(bgp->af_flags[afi][safi], flag);
6628 if (!previous_state) {
6629 /* trigger export current vrf */
ddb5b488
PZ		 6630 vpn_leak_postchange(dir, afi, bgp_get_default(), bgp);
6631 }
b9c7bc5a
PZ		 6632 } else {
6633 if (previous_state) {
6634 /* trigger un-export current vrf */
6635 vpn_leak_prechange(dir, afi, bgp_get_default(), bgp);
6636 }
6637 UNSET_FLAG(bgp->af_flags[afi][safi], flag);
ddb5b488
PZ		 6638 }
6639
6640 return CMD_SUCCESS;
6641}
6642
301ad80a
PG		 6643DEFPY (af_routetarget_import,
6644 af_routetarget_import_cmd,
6645 "[no] <rt|route-target> redirect import RTLIST...",
6646 NO_STR
6647 "Specify route target list\n"
6648 "Specify route target list\n"
6649 "Flow-spec redirect type route target\n"
6650 "Import routes to this address-family\n"
6651 "Space separated route target list (A.B.C.D:MN|EF:OPQR|GHJK:MN)\n")
6652{
6653 VTY_DECLVAR_CONTEXT(bgp, bgp);
6654 int ret;
6655 struct ecommunity *ecom = NULL;
6656 int doafi[AFI_MAX] = {0};
6657 afi_t afi;
6658 int idx = 0;
6659 int yes = 1;
6660
6661 if (argv_find(argv, argc, "no", &idx))
6662 yes = 0;
6663
6664 ret = vpn_policy_getafi(vty, doafi);
6665 if (ret != CMD_SUCCESS)
6666 return ret;
6667 if (yes) {
6668 if (!argv_find(argv, argc, "RTLIST", &idx)) {
6669 vty_out(vty, "%% Missing RTLIST\n");
6670 return CMD_WARNING_CONFIG_FAILED;
6671 }
6672 ret = set_ecom_list(vty, argc - idx, argv + idx, &ecom);
6673 if (ret != CMD_SUCCESS)
6674 return ret;
6675 }
6676 for (afi = 0; afi < AFI_MAX; ++afi) {
6677 if (!doafi[afi])
6678 continue;
6679 if (yes) {
6680 if (bgp->vpn_policy[afi].import_redirect_rtlist)
6681 ecommunity_free(
6682 &bgp->vpn_policy[afi]
6683 .import_redirect_rtlist);
6684 bgp->vpn_policy[afi].import_redirect_rtlist =
6685 ecommunity_dup(ecom);
6686 } else {
6687 if (bgp->vpn_policy[afi].import_redirect_rtlist)
6688 ecommunity_free(
6689 &bgp->vpn_policy[afi]
6690 .import_redirect_rtlist);
6691 bgp->vpn_policy[afi].import_redirect_rtlist = NULL;
6692 }
6693 }
6694 if (ecom)
6695 ecommunity_free(&ecom);
6696
6697 return CMD_SUCCESS;
6698}
6699
505e5056 6700DEFUN_NOSH (address_family_ipv4_safi,
7c40bf39 6701 address_family_ipv4_safi_cmd,
6702 "address-family ipv4 [<unicast|multicast|vpn|labeled-unicast|flowspec>]",
6703 "Enter Address Family command mode\n"
6704 "Address Family\n"
6705 BGP_SAFI_WITH_LABEL_HELP_STR)
718e3744 6706{
f51bae9c 6707
d62a17ae 6708 if (argc == 3) {
2131d5cf 6709 VTY_DECLVAR_CONTEXT(bgp, bgp);
d62a17ae 6710 safi_t safi = bgp_vty_safi_from_str(argv[2]->text);
a4d82a8a
PZ		 6711 if (bgp->inst_type != BGP_INSTANCE_TYPE_DEFAULT
6712 && safi != SAFI_UNICAST && safi != SAFI_MULTICAST
9d00a487 6713 && safi != SAFI_EVPN) {
31947174
MK		 6714 vty_out(vty,
6715 "Only Unicast/Multicast/EVPN SAFIs supported in non-core instances.\n");
2131d5cf
LB		 6716 return CMD_WARNING_CONFIG_FAILED;
6717 }
d62a17ae 6718 vty->node = bgp_node_type(AFI_IP, safi);
6719 } else
6720 vty->node = BGP_IPV4_NODE;
718e3744 6721
d62a17ae 6722 return CMD_SUCCESS;
718e3744 6723}
6724
505e5056 6725DEFUN_NOSH (address_family_ipv6_safi,
7c40bf39 6726 address_family_ipv6_safi_cmd,
6727 "address-family ipv6 [<unicast|multicast|vpn|labeled-unicast|flowspec>]",
6728 "Enter Address Family command mode\n"
6729 "Address Family\n"
6730 BGP_SAFI_WITH_LABEL_HELP_STR)
25ffbdc1 6731{
d62a17ae 6732 if (argc == 3) {
2131d5cf 6733 VTY_DECLVAR_CONTEXT(bgp, bgp);
d62a17ae 6734 safi_t safi = bgp_vty_safi_from_str(argv[2]->text);
a4d82a8a
PZ		 6735 if (bgp->inst_type != BGP_INSTANCE_TYPE_DEFAULT
6736 && safi != SAFI_UNICAST && safi != SAFI_MULTICAST
9d00a487 6737 && safi != SAFI_EVPN) {
31947174
MK		 6738 vty_out(vty,
6739 "Only Unicast/Multicast/EVPN SAFIs supported in non-core instances.\n");
2131d5cf
LB		 6740 return CMD_WARNING_CONFIG_FAILED;
6741 }
d62a17ae 6742 vty->node = bgp_node_type(AFI_IP6, safi);
6743 } else
6744 vty->node = BGP_IPV6_NODE;
25ffbdc1 6745
d62a17ae 6746 return CMD_SUCCESS;
25ffbdc1 6747}
718e3744 6748
d6902373 6749#ifdef KEEP_OLD_VPN_COMMANDS
505e5056 6750DEFUN_NOSH (address_family_vpnv4,
718e3744 6751 address_family_vpnv4_cmd,
8334fd5a 6752 "address-family vpnv4 [unicast]",
718e3744 6753 "Enter Address Family command mode\n"
8c3deaae 6754 "Address Family\n"
3a2d747c 6755 "Address Family modifier\n")
718e3744 6756{
d62a17ae 6757 vty->node = BGP_VPNV4_NODE;
6758 return CMD_SUCCESS;
718e3744 6759}
6760
505e5056 6761DEFUN_NOSH (address_family_vpnv6,
8ecd3266 6762 address_family_vpnv6_cmd,
8334fd5a 6763 "address-family vpnv6 [unicast]",
8ecd3266 6764 "Enter Address Family command mode\n"
8c3deaae 6765 "Address Family\n"
3a2d747c 6766 "Address Family modifier\n")
8ecd3266 6767{
d62a17ae 6768 vty->node = BGP_VPNV6_NODE;
6769 return CMD_SUCCESS;
8ecd3266 6770}
c016b6c7 6771#endif
d6902373 6772
505e5056 6773DEFUN_NOSH (address_family_evpn,
4e0b7b6d 6774 address_family_evpn_cmd,
7111c1a0 6775 "address-family l2vpn evpn",
4e0b7b6d 6776 "Enter Address Family command mode\n"
7111c1a0
QY		 6777 "Address Family\n"
6778 "Address Family modifier\n")
4e0b7b6d 6779{
2131d5cf 6780 VTY_DECLVAR_CONTEXT(bgp, bgp);
d62a17ae 6781 vty->node = BGP_EVPN_NODE;
6782 return CMD_SUCCESS;
4e0b7b6d
PG		 6783}
6784
505e5056 6785DEFUN_NOSH (exit_address_family,
718e3744 6786 exit_address_family_cmd,
6787 "exit-address-family",
6788 "Exit from Address Family configuration mode\n")
6789{
d62a17ae 6790 if (vty->node == BGP_IPV4_NODE || vty->node == BGP_IPV4M_NODE
6791 || vty->node == BGP_IPV4L_NODE || vty->node == BGP_VPNV4_NODE
6792 || vty->node == BGP_IPV6_NODE || vty->node == BGP_IPV6M_NODE
6793 || vty->node == BGP_IPV6L_NODE || vty->node == BGP_VPNV6_NODE
925bf671
PG		 6794 || vty->node == BGP_EVPN_NODE
6795 || vty->node == BGP_FLOWSPECV4_NODE
6796 || vty->node == BGP_FLOWSPECV6_NODE)
d62a17ae 6797 vty->node = BGP_NODE;
6798 return CMD_SUCCESS;
718e3744 6799}
6b0655a2 6800
8ad7271d 6801/* Recalculate bestpath and re-advertise a prefix */
d62a17ae 6802static int bgp_clear_prefix(struct vty *vty, const char *view_name,
6803 const char *ip_str, afi_t afi, safi_t safi,
6804 struct prefix_rd *prd)
6805{
6806 int ret;
6807 struct prefix match;
6808 struct bgp_node *rn;
6809 struct bgp_node *rm;
6810 struct bgp *bgp;
6811 struct bgp_table *table;
6812 struct bgp_table *rib;
6813
6814 /* BGP structure lookup. */
6815 if (view_name) {
6816 bgp = bgp_lookup_by_name(view_name);
6817 if (bgp == NULL) {
6818 vty_out(vty, "%% Can't find BGP instance %s\n",
6819 view_name);
6820 return CMD_WARNING;
6821 }
6822 } else {
6823 bgp = bgp_get_default();
6824 if (bgp == NULL) {
6825 vty_out(vty, "%% No BGP process is configured\n");
6826 return CMD_WARNING;
6827 }
6828 }
6829
6830 /* Check IP address argument. */
6831 ret = str2prefix(ip_str, &match);
6832 if (!ret) {
6833 vty_out(vty, "%% address is malformed\n");
6834 return CMD_WARNING;
6835 }
6836
6837 match.family = afi2family(afi);
6838 rib = bgp->rib[afi][safi];
6839
6840 if (safi == SAFI_MPLS_VPN) {
6841 for (rn = bgp_table_top(rib); rn; rn = bgp_route_next(rn)) {
6842 if (prd && memcmp(rn->p.u.val, prd->val, 8) != 0)
6843 continue;
6844
6845 if ((table = rn->info) != NULL) {
6846 if ((rm = bgp_node_match(table, &match))
6847 != NULL) {
6848 if (rm->p.prefixlen
6849 == match.prefixlen) {
6850 SET_FLAG(rn->flags,
6851 BGP_NODE_USER_CLEAR);
6852 bgp_process(bgp, rm, afi, safi);
6853 }
6854 bgp_unlock_node(rm);
6855 }
6856 }
6857 }
6858 } else {
6859 if ((rn = bgp_node_match(rib, &match)) != NULL) {
6860 if (rn->p.prefixlen == match.prefixlen) {
6861 SET_FLAG(rn->flags, BGP_NODE_USER_CLEAR);
6862 bgp_process(bgp, rn, afi, safi);
6863 }
6864 bgp_unlock_node(rn);
6865 }
6866 }
6867
6868 return CMD_SUCCESS;
8ad7271d
DS		 6869}
6870
b09b5ae0 6871/* one clear bgp command to rule them all */
718e3744 6872DEFUN (clear_ip_bgp_all,
6873 clear_ip_bgp_all_cmd,
c1a44e43 6874 "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 6875 CLEAR_STR
6876 IP_STR
6877 BGP_STR
838758ac 6878 BGP_INSTANCE_HELP_STR
510afcd6
DS		 6879 BGP_AFI_HELP_STR
6880 BGP_SAFI_WITH_LABEL_HELP_STR
b09b5ae0
DW		 6881 "Clear all peers\n"
6882 "BGP neighbor address to clear\n"
a80beece 6883 "BGP IPv6 neighbor to clear\n"
838758ac 6884 "BGP neighbor on interface to clear\n"
b09b5ae0
DW		 6885 "Clear peers with the AS number\n"
6886 "Clear all external peers\n"
718e3744 6887 "Clear all members of peer-group\n"
b09b5ae0 6888 "BGP peer-group name\n"
b09b5ae0
DW		 6889 BGP_SOFT_STR
6890 BGP_SOFT_IN_STR
b09b5ae0
DW		 6891 BGP_SOFT_OUT_STR
6892 BGP_SOFT_IN_STR
6893 "Push out prefix-list ORF and do inbound soft reconfig\n"
b09b5ae0 6894 BGP_SOFT_OUT_STR)
718e3744 6895{
d62a17ae 6896 char *vrf = NULL;
6897
6898 afi_t afi = AFI_IP6;
6899 safi_t safi = SAFI_UNICAST;
6900 enum clear_sort clr_sort = clear_peer;
6901 enum bgp_clear_type clr_type;
6902 char *clr_arg = NULL;
6903
6904 int idx = 0;
6905
6906 /* clear [ip] bgp */
6907 if (argv_find(argv, argc, "ip", &idx))
6908 afi = AFI_IP;
6909
6910 /* [<view|vrf> VIEWVRFNAME] */
6911 if (argv_find(argv, argc, "view", &idx)
6912 || argv_find(argv, argc, "vrf", &idx)) {
6913 vrf = argv[idx + 1]->arg;
6914 idx += 2;
6915 }
6916
6917 /* ["BGP_AFI_CMD_STR" ["BGP_SAFI_CMD_STR"]] */
6918 if (argv_find_and_parse_afi(argv, argc, &idx, &afi))
6919 argv_find_and_parse_safi(argv, argc, &idx, &safi);
6920
6921 /* <*|A.B.C.D|X:X::X:X|WORD|(1-4294967295)|external|peer-group WORD> */
6922 if (argv_find(argv, argc, "*", &idx)) {
6923 clr_sort = clear_all;
6924 } else if (argv_find(argv, argc, "A.B.C.D", &idx)) {
6925 clr_sort = clear_peer;
6926 clr_arg = argv[idx]->arg;
6927 } else if (argv_find(argv, argc, "X:X::X:X", &idx)) {
6928 clr_sort = clear_peer;
6929 clr_arg = argv[idx]->arg;
6930 } else if (argv_find(argv, argc, "peer-group", &idx)) {
6931 clr_sort = clear_group;
6932 idx++;
6933 clr_arg = argv[idx]->arg;
6934 } else if (argv_find(argv, argc, "WORD", &idx)) {
6935 clr_sort = clear_peer;
6936 clr_arg = argv[idx]->arg;
6937 } else if (argv_find(argv, argc, "(1-4294967295)", &idx)) {
6938 clr_sort = clear_as;
6939 clr_arg = argv[idx]->arg;
6940 } else if (argv_find(argv, argc, "external", &idx)) {
6941 clr_sort = clear_external;
6942 }
6943
6944 /* [<soft [<in|out>]|in [prefix-filter]|out>] */
6945 if (argv_find(argv, argc, "soft", &idx)) {
6946 if (argv_find(argv, argc, "in", &idx)
6947 || argv_find(argv, argc, "out", &idx))
6948 clr_type = strmatch(argv[idx]->text, "in")
6949 ? BGP_CLEAR_SOFT_IN
6950 : BGP_CLEAR_SOFT_OUT;
6951 else
6952 clr_type = BGP_CLEAR_SOFT_BOTH;
6953 } else if (argv_find(argv, argc, "in", &idx)) {
6954 clr_type = argv_find(argv, argc, "prefix-filter", &idx)
6955 ? BGP_CLEAR_SOFT_IN_ORF_PREFIX
6956 : BGP_CLEAR_SOFT_IN;
6957 } else if (argv_find(argv, argc, "out", &idx)) {
6958 clr_type = BGP_CLEAR_SOFT_OUT;
6959 } else
6960 clr_type = BGP_CLEAR_SOFT_NONE;
6961
6962 return bgp_clear_vty(vty, vrf, afi, safi, clr_sort, clr_type, clr_arg);
838758ac 6963}
01080f7c 6964
8ad7271d
DS		 6965DEFUN (clear_ip_bgp_prefix,
6966 clear_ip_bgp_prefix_cmd,
18c57037 6967 "clear [ip] bgp [<view|vrf> VIEWVRFNAME] prefix A.B.C.D/M",
8ad7271d
DS		 6968 CLEAR_STR
6969 IP_STR
6970 BGP_STR
838758ac 6971 BGP_INSTANCE_HELP_STR
8ad7271d 6972 "Clear bestpath and re-advertise\n"
0c7b1b01 6973 "IPv4 prefix\n")
8ad7271d 6974{
d62a17ae 6975 char *vrf = NULL;
6976 char *prefix = NULL;
8ad7271d 6977
d62a17ae 6978 int idx = 0;
01080f7c 6979
d62a17ae 6980 /* [<view|vrf> VIEWVRFNAME] */
1d35f218 6981 if (argv_find(argv, argc, "VIEWVRFNAME", &idx))
d62a17ae 6982 vrf = argv[idx]->arg;
0c7b1b01 6983
d62a17ae 6984 prefix = argv[argc - 1]->arg;
8ad7271d 6985
d62a17ae 6986 return bgp_clear_prefix(vty, vrf, prefix, AFI_IP, SAFI_UNICAST, NULL);
838758ac 6987}
8ad7271d 6988
b09b5ae0
DW		 6989DEFUN (clear_bgp_ipv6_safi_prefix,
6990 clear_bgp_ipv6_safi_prefix_cmd,
46f296b4 6991 "clear [ip] bgp ipv6 "BGP_SAFI_CMD_STR" prefix X:X::X:X/M",
718e3744 6992 CLEAR_STR
3a2d747c 6993 IP_STR
718e3744 6994 BGP_STR
8c3deaae 6995 "Address Family\n"
46f296b4 6996 BGP_SAFI_HELP_STR
b09b5ae0 6997 "Clear bestpath and re-advertise\n"
0c7b1b01 6998 "IPv6 prefix\n")
718e3744 6999{
9b475e76
PG		 7000 int idx_safi = 0;
7001 int idx_ipv6_prefix = 0;
7002 safi_t safi = SAFI_UNICAST;
7003 char *prefix = argv_find(argv, argc, "X:X::X:X/M", &idx_ipv6_prefix) ?
7004 argv[idx_ipv6_prefix]->arg : NULL;
7005
7006 argv_find_and_parse_safi(argv, argc, &idx_safi, &safi);
d62a17ae 7007 return bgp_clear_prefix(
9b475e76
PG		 7008 vty, NULL, prefix, AFI_IP6,
7009 safi, NULL);
838758ac 7010}
01080f7c 7011
b09b5ae0
DW		 7012DEFUN (clear_bgp_instance_ipv6_safi_prefix,
7013 clear_bgp_instance_ipv6_safi_prefix_cmd,
18c57037 7014 "clear [ip] bgp <view|vrf> VIEWVRFNAME ipv6 "BGP_SAFI_CMD_STR" prefix X:X::X:X/M",
718e3744 7015 CLEAR_STR
3a2d747c 7016 IP_STR
718e3744 7017 BGP_STR
838758ac 7018 BGP_INSTANCE_HELP_STR
8c3deaae 7019 "Address Family\n"
46f296b4 7020 BGP_SAFI_HELP_STR
b09b5ae0 7021 "Clear bestpath and re-advertise\n"
0c7b1b01 7022 "IPv6 prefix\n")
718e3744 7023{
d62a17ae 7024 int idx_word = 3;
9b475e76
PG		 7025 int idx_safi = 0;
7026 int idx_ipv6_prefix = 0;
7027 safi_t safi = SAFI_UNICAST;
7028 char *prefix = argv_find(argv, argc, "X:X::X:X/M", &idx_ipv6_prefix) ?
7029 argv[idx_ipv6_prefix]->arg : NULL;
7030 /* [<view|vrf> VIEWVRFNAME] */
7031 char *vrfview = argv_find(argv, argc, "VIEWVRFNAME", &idx_word) ?
7032 argv[idx_word]->arg : NULL;
7033
7034 argv_find_and_parse_safi(argv, argc, &idx_safi, &safi);
7035
d62a17ae 7036 return bgp_clear_prefix(
9b475e76
PG		 7037 vty, vrfview, prefix,
7038 AFI_IP6, safi, NULL);
718e3744 7039}
7040
b09b5ae0
DW		 7041DEFUN (show_bgp_views,
7042 show_bgp_views_cmd,
d6e3c605 7043 "show [ip] bgp views",
b09b5ae0 7044 SHOW_STR
d6e3c605 7045 IP_STR
01080f7c 7046 BGP_STR
b09b5ae0 7047 "Show the defined BGP views\n")
01080f7c 7048{
d62a17ae 7049 struct list *inst = bm->bgp;
7050 struct listnode *node;
7051 struct bgp *bgp;
01080f7c 7052
d62a17ae 7053 if (!bgp_option_check(BGP_OPT_MULTIPLE_INSTANCE)) {
7054 vty_out(vty, "BGP Multiple Instance is not enabled\n");
7055 return CMD_WARNING;
7056 }
e52702f2 7057
d62a17ae 7058 vty_out(vty, "Defined BGP views:\n");
7059 for (ALL_LIST_ELEMENTS_RO(inst, node, bgp)) {
7060 /* Skip VRFs. */
7061 if (bgp->inst_type == BGP_INSTANCE_TYPE_VRF)
7062 continue;
7063 vty_out(vty, "\t%s (AS%u)\n", bgp->name ? bgp->name : "(null)",
7064 bgp->as);
7065 }
e52702f2 7066
d62a17ae 7067 return CMD_SUCCESS;
e0081f70
ML		 7068}
7069
8386ac43 7070DEFUN (show_bgp_vrfs,
7071 show_bgp_vrfs_cmd,
d6e3c605 7072 "show [ip] bgp vrfs [json]",
8386ac43 7073 SHOW_STR
d6e3c605 7074 IP_STR
8386ac43 7075 BGP_STR
7076 "Show BGP VRFs\n"
9973d184 7077 JSON_STR)
8386ac43 7078{
fe1dc5a3 7079 char buf[ETHER_ADDR_STRLEN];
d62a17ae 7080 struct list *inst = bm->bgp;
7081 struct listnode *node;
7082 struct bgp *bgp;
d7c0a89a 7083 uint8_t uj = use_json(argc, argv);
d62a17ae 7084 json_object *json = NULL;
7085 json_object *json_vrfs = NULL;
7086 int count = 0;
d62a17ae 7087
7088 if (!bgp_option_check(BGP_OPT_MULTIPLE_INSTANCE)) {
7089 vty_out(vty, "BGP Multiple Instance is not enabled\n");
7090 return CMD_WARNING;
7091 }
7092
7093 if (uj) {
7094 json = json_object_new_object();
7095 json_vrfs = json_object_new_object();
7096 }
7097
7098 for (ALL_LIST_ELEMENTS_RO(inst, node, bgp)) {
7099 const char *name, *type;
7100 struct peer *peer;
7101 struct listnode *node, *nnode;
7102 int peers_cfg, peers_estb;
7103 json_object *json_vrf = NULL;
d62a17ae 7104
7105 /* Skip Views. */
7106 if (bgp->inst_type == BGP_INSTANCE_TYPE_VIEW)
7107 continue;
7108
7109 count++;
7110 if (!uj && count == 1)
fe1dc5a3
MK		 7111 vty_out(vty,
7112 "%4s %-5s %-16s %9s %10s %-37s %-10s %-15s\n",
a4d82a8a
PZ		 7113 "Type", "Id", "routerId", "#PeersVfg",
7114 "#PeersEstb", "Name", "L3-VNI", "Rmac");
d62a17ae 7115
7116 peers_cfg = peers_estb = 0;
7117 if (uj)
7118 json_vrf = json_object_new_object();
7119
7120
7121 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
7122 if (!CHECK_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE))
7123 continue;
7124 peers_cfg++;
7125 if (peer->status == Established)
7126 peers_estb++;
7127 }
7128
7129 if (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT) {
7130 name = "Default";
7131 type = "DFLT";
7132 } else {
7133 name = bgp->name;
7134 type = "VRF";
7135 }
7136
a8bf7d9c 7137
d62a17ae 7138 if (uj) {
a4d82a8a
PZ		 7139 int64_t vrf_id_ui = (bgp->vrf_id == VRF_UNKNOWN)
7140 ? -1
7141 : (int64_t)bgp->vrf_id;
d62a17ae 7142 json_object_string_add(json_vrf, "type", type);
7143 json_object_int_add(json_vrf, "vrfId", vrf_id_ui);
7144 json_object_string_add(json_vrf, "routerId",
7145 inet_ntoa(bgp->router_id));
7146 json_object_int_add(json_vrf, "numConfiguredPeers",
7147 peers_cfg);
7148 json_object_int_add(json_vrf, "numEstablishedPeers",
7149 peers_estb);
7150
fe1dc5a3 7151 json_object_int_add(json_vrf, "l3vni", bgp->l3vni);
a4d82a8a
PZ		 7152 json_object_string_add(
7153 json_vrf, "rmac",
7154 prefix_mac2str(&bgp->rmac, buf, sizeof(buf)));
d62a17ae 7155 json_object_object_add(json_vrfs, name, json_vrf);
7156 } else
fe1dc5a3
MK		 7157 vty_out(vty,
7158 "%4s %-5d %-16s %9u %10u %-37s %-10u %-15s\n",
a4d82a8a
PZ		 7159 type,
7160 bgp->vrf_id == VRF_UNKNOWN ? -1
7161 : (int)bgp->vrf_id,
7162 inet_ntoa(bgp->router_id), peers_cfg,
7163 peers_estb, name, bgp->l3vni,
fe1dc5a3 7164 prefix_mac2str(&bgp->rmac, buf, sizeof(buf)));
d62a17ae 7165 }
7166
7167 if (uj) {
7168 json_object_object_add(json, "vrfs", json_vrfs);
7169
7170 json_object_int_add(json, "totalVrfs", count);
7171
996c9314
LB		 7172 vty_out(vty, "%s\n", json_object_to_json_string_ext(
7173 json, JSON_C_TO_STRING_PRETTY));
d62a17ae 7174 json_object_free(json);
7175 } else {
7176 if (count)
7177 vty_out(vty,
7178 "\nTotal number of VRFs (including default): %d\n",
7179 count);
7180 }
7181
7182 return CMD_SUCCESS;
8386ac43 7183}
7184
acf71666
MK		 7185static void show_address_entry(struct hash_backet *backet, void *args)
7186{
60466a63
QY		 7187 struct vty *vty = (struct vty *)args;
7188 struct bgp_addr *addr = (struct bgp_addr *)backet->data;
acf71666 7189
60466a63 7190 vty_out(vty, "addr: %s, count: %d\n", inet_ntoa(addr->addr),
acf71666
MK		 7191 addr->refcnt);
7192}
7193
7194static void show_tip_entry(struct hash_backet *backet, void *args)
7195{
0291c246 7196 struct vty *vty = (struct vty *)args;
60466a63 7197 struct tip_addr *tip = (struct tip_addr *)backet->data;
acf71666 7198
60466a63 7199 vty_out(vty, "addr: %s, count: %d\n", inet_ntoa(tip->addr),
acf71666
MK		 7200 tip->refcnt);
7201}
7202
7203static void bgp_show_martian_nexthops(struct vty *vty, struct bgp *bgp)
7204{
7205 vty_out(vty, "self nexthop database:\n");
7206 hash_iterate(bgp->address_hash,
7207 (void (*)(struct hash_backet *, void *))show_address_entry,
7208 vty);
7209
7210 vty_out(vty, "Tunnel-ip database:\n");
7211 hash_iterate(bgp->tip_hash,
7212 (void (*)(struct hash_backet *, void *))show_tip_entry,
7213 vty);
7214}
7215
15c81ca4
DS		 7216DEFUN(show_bgp_martian_nexthop_db, show_bgp_martian_nexthop_db_cmd,
7217 "show bgp [<view|vrf> VIEWVRFNAME] martian next-hop",
7218 SHOW_STR BGP_STR BGP_INSTANCE_HELP_STR
60466a63
QY		 7219 "martian next-hops\n"
7220 "martian next-hop database\n")
acf71666 7221{
0291c246 7222 struct bgp *bgp = NULL;
15c81ca4
DS		 7223 int idx = 0;
7224
7225 if (argv_find(argv, argc, "view", &idx)
7226 || argv_find(argv, argc, "vrf", &idx))
7227 bgp = bgp_lookup_by_name(argv[idx + 1]->arg);
7228 else
7229 bgp = bgp_get_default();
acf71666 7230
acf71666
MK		 7231 if (!bgp) {
7232 vty_out(vty, "%% No BGP process is configured\n");
7233 return CMD_WARNING;
7234 }
7235 bgp_show_martian_nexthops(vty, bgp);
7236
7237 return CMD_SUCCESS;
7238}
7239
f412b39a 7240DEFUN (show_bgp_memory,
4bf6a362 7241 show_bgp_memory_cmd,
7fa12b13 7242 "show [ip] bgp memory",
4bf6a362 7243 SHOW_STR
3a2d747c 7244 IP_STR
4bf6a362
PJ		 7245 BGP_STR
7246 "Global BGP memory statistics\n")
7247{
d62a17ae 7248 char memstrbuf[MTYPE_MEMSTR_LEN];
7249 unsigned long count;
7250
7251 /* RIB related usage stats */
7252 count = mtype_stats_alloc(MTYPE_BGP_NODE);
7253 vty_out(vty, "%ld RIB nodes, using %s of memory\n", count,
7254 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7255 count * sizeof(struct bgp_node)));
7256
7257 count = mtype_stats_alloc(MTYPE_BGP_ROUTE);
7258 vty_out(vty, "%ld BGP routes, using %s of memory\n", count,
7259 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7260 count * sizeof(struct bgp_info)));
7261 if ((count = mtype_stats_alloc(MTYPE_BGP_ROUTE_EXTRA)))
7262 vty_out(vty, "%ld BGP route ancillaries, using %s of memory\n",
7263 count,
7264 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7265 count * sizeof(struct bgp_info_extra)));
7266
7267 if ((count = mtype_stats_alloc(MTYPE_BGP_STATIC)))
7268 vty_out(vty, "%ld Static routes, using %s of memory\n", count,
7269 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7270 count * sizeof(struct bgp_static)));
7271
7272 if ((count = mtype_stats_alloc(MTYPE_BGP_PACKET)))
7273 vty_out(vty, "%ld Packets, using %s of memory\n", count,
7274 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7275 count * sizeof(struct bpacket)));
7276
7277 /* Adj-In/Out */
7278 if ((count = mtype_stats_alloc(MTYPE_BGP_ADJ_IN)))
7279 vty_out(vty, "%ld Adj-In entries, using %s of memory\n", count,
7280 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7281 count * sizeof(struct bgp_adj_in)));
7282 if ((count = mtype_stats_alloc(MTYPE_BGP_ADJ_OUT)))
7283 vty_out(vty, "%ld Adj-Out entries, using %s of memory\n", count,
7284 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7285 count * sizeof(struct bgp_adj_out)));
7286
7287 if ((count = mtype_stats_alloc(MTYPE_BGP_NEXTHOP_CACHE)))
7288 vty_out(vty, "%ld Nexthop cache entries, using %s of memory\n",
7289 count,
7290 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7291 count * sizeof(struct bgp_nexthop_cache)));
7292
7293 if ((count = mtype_stats_alloc(MTYPE_BGP_DAMP_INFO)))
7294 vty_out(vty, "%ld Dampening entries, using %s of memory\n",
7295 count,
7296 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7297 count * sizeof(struct bgp_damp_info)));
7298
7299 /* Attributes */
7300 count = attr_count();
7301 vty_out(vty, "%ld BGP attributes, using %s of memory\n", count,
7302 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7303 count * sizeof(struct attr)));
7304
7305 if ((count = attr_unknown_count()))
7306 vty_out(vty, "%ld unknown attributes\n", count);
7307
7308 /* AS_PATH attributes */
7309 count = aspath_count();
7310 vty_out(vty, "%ld BGP AS-PATH entries, using %s of memory\n", count,
7311 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7312 count * sizeof(struct aspath)));
7313
7314 count = mtype_stats_alloc(MTYPE_AS_SEG);
7315 vty_out(vty, "%ld BGP AS-PATH segments, using %s of memory\n", count,
7316 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7317 count * sizeof(struct assegment)));
7318
7319 /* Other attributes */
7320 if ((count = community_count()))
7321 vty_out(vty, "%ld BGP community entries, using %s of memory\n",
996c9314
LB		 7322 count, mtype_memstr(memstrbuf, sizeof(memstrbuf),
7323 count * sizeof(struct community)));
d62a17ae 7324 if ((count = mtype_stats_alloc(MTYPE_ECOMMUNITY)))
7325 vty_out(vty, "%ld BGP community entries, using %s of memory\n",
996c9314
LB		 7326 count, mtype_memstr(memstrbuf, sizeof(memstrbuf),
7327 count * sizeof(struct ecommunity)));
d62a17ae 7328 if ((count = mtype_stats_alloc(MTYPE_LCOMMUNITY)))
7329 vty_out(vty,
7330 "%ld BGP large-community entries, using %s of memory\n",
996c9314
LB		 7331 count, mtype_memstr(memstrbuf, sizeof(memstrbuf),
7332 count * sizeof(struct lcommunity)));
d62a17ae 7333
7334 if ((count = mtype_stats_alloc(MTYPE_CLUSTER)))
7335 vty_out(vty, "%ld Cluster lists, using %s of memory\n", count,
7336 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7337 count * sizeof(struct cluster_list)));
7338
7339 /* Peer related usage */
7340 count = mtype_stats_alloc(MTYPE_BGP_PEER);
7341 vty_out(vty, "%ld peers, using %s of memory\n", count,
7342 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7343 count * sizeof(struct peer)));
7344
7345 if ((count = mtype_stats_alloc(MTYPE_PEER_GROUP)))
7346 vty_out(vty, "%ld peer groups, using %s of memory\n", count,
7347 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7348 count * sizeof(struct peer_group)));
7349
7350 /* Other */
7351 if ((count = mtype_stats_alloc(MTYPE_HASH)))
7352 vty_out(vty, "%ld hash tables, using %s of memory\n", count,
7353 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7354 count * sizeof(struct hash)));
7355 if ((count = mtype_stats_alloc(MTYPE_HASH_BACKET)))
7356 vty_out(vty, "%ld hash buckets, using %s of memory\n", count,
7357 mtype_memstr(memstrbuf, sizeof(memstrbuf),
7358 count * sizeof(struct hash_backet)));
7359 if ((count = mtype_stats_alloc(MTYPE_BGP_REGEXP)))
7360 vty_out(vty, "%ld compiled regexes, using %s of memory\n",
996c9314
LB		 7361 count, mtype_memstr(memstrbuf, sizeof(memstrbuf),
7362 count * sizeof(regex_t)));
d62a17ae 7363 return CMD_SUCCESS;
4bf6a362 7364}
fee0f4c6 7365
57a9c8a8
DS		 7366static void bgp_show_bestpath_json(struct bgp *bgp, json_object *json)
7367{
7368 json_object *bestpath = json_object_new_object();
7369
7370 if (bgp_flag_check(bgp, BGP_FLAG_ASPATH_IGNORE))
7371 json_object_string_add(bestpath, "asPath", "ignore");
7372
7373 if (bgp_flag_check(bgp, BGP_FLAG_ASPATH_CONFED))
7374 json_object_string_add(bestpath, "asPath", "confed");
7375
7376 if (bgp_flag_check(bgp, BGP_FLAG_ASPATH_MULTIPATH_RELAX)) {
a4d82a8a
PZ		 7377 if (bgp_flag_check(bgp, BGP_FLAG_MULTIPATH_RELAX_AS_SET))
7378 json_object_string_add(bestpath, "multiPathRelax",
57a9c8a8
DS		 7379 "as-set");
7380 else
a4d82a8a 7381 json_object_string_add(bestpath, "multiPathRelax",
57a9c8a8
DS		 7382 "true");
7383 } else
a4d82a8a 7384 json_object_string_add(bestpath, "multiPathRelax", "false");
57a9c8a8
DS		 7385
7386 if (bgp_flag_check(bgp, BGP_FLAG_COMPARE_ROUTER_ID))
7387 json_object_string_add(bestpath, "compareRouterId", "true");
7388 if (bgp_flag_check(bgp, BGP_FLAG_MED_CONFED)
7389 || bgp_flag_check(bgp, BGP_FLAG_MED_MISSING_AS_WORST)) {
7390 if (bgp_flag_check(bgp, BGP_FLAG_MED_CONFED))
a4d82a8a 7391 json_object_string_add(bestpath, "med", "confed");
57a9c8a8
DS		 7392 if (bgp_flag_check(bgp, BGP_FLAG_MED_MISSING_AS_WORST))
7393 json_object_string_add(bestpath, "med",
7394 "missing-as-worst");
7395 else
7396 json_object_string_add(bestpath, "med", "true");
7397 }
7398
7399 json_object_object_add(json, "bestPath", bestpath);
7400}
7401
718e3744 7402/* Show BGP peer's summary information. */
d62a17ae 7403static int bgp_show_summary(struct vty *vty, struct bgp *bgp, int afi, int safi,
d7c0a89a 7404 uint8_t use_json, json_object *json)
d62a17ae 7405{
7406 struct peer *peer;
7407 struct listnode *node, *nnode;
7408 unsigned int count = 0, dn_count = 0;
7409 char timebuf[BGP_UPTIME_LEN], dn_flag[2];
7410 char neighbor_buf[VTY_BUFSIZ];
7411 int neighbor_col_default_width = 16;
7412 int len;
7413 int max_neighbor_width = 0;
7414 int pfx_rcd_safi;
7415 json_object *json_peer = NULL;
7416 json_object *json_peers = NULL;
7417
7418 /* labeled-unicast routes are installed in the unicast table so in order
7419 * to
7420 * display the correct PfxRcd value we must look at SAFI_UNICAST
7421 */
7422 if (safi == SAFI_LABELED_UNICAST)
7423 pfx_rcd_safi = SAFI_UNICAST;
7424 else
7425 pfx_rcd_safi = safi;
7426
7427 if (use_json) {
7428 if (json == NULL)
7429 json = json_object_new_object();
7430
7431 json_peers = json_object_new_object();
7432 } else {
7433 /* Loop over all neighbors that will be displayed to determine
7434 * how many
7435 * characters are needed for the Neighbor column
7436 */
7437 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
7438 if (!CHECK_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE))
7439 continue;
7440
7441 if (peer->afc[afi][safi]) {
7442 memset(dn_flag, '\0', sizeof(dn_flag));
7443 if (peer_dynamic_neighbor(peer))
7444 dn_flag[0] = '*';
7445
7446 if (peer->hostname
7447 && bgp_flag_check(bgp,
7448 BGP_FLAG_SHOW_HOSTNAME))
7449 sprintf(neighbor_buf, "%s%s(%s) ",
7450 dn_flag, peer->hostname,
7451 peer->host);
7452 else
7453 sprintf(neighbor_buf, "%s%s ", dn_flag,
7454 peer->host);
7455
7456 len = strlen(neighbor_buf);
7457
7458 if (len > max_neighbor_width)
7459 max_neighbor_width = len;
7460 }
7461 }
f933309e 7462
d62a17ae 7463 /* Originally we displayed the Neighbor column as 16
7464 * characters wide so make that the default
7465 */
7466 if (max_neighbor_width < neighbor_col_default_width)
7467 max_neighbor_width = neighbor_col_default_width;
7468 }
f933309e 7469
d62a17ae 7470 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
7471 if (!CHECK_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE))
7472 continue;
7473
ea47320b
DL		 7474 if (!peer->afc[afi][safi])
7475 continue;
d62a17ae 7476
ea47320b
DL		 7477 if (!count) {
7478 unsigned long ents;
7479 char memstrbuf[MTYPE_MEMSTR_LEN];
a8bf7d9c 7480 int64_t vrf_id_ui;
d62a17ae 7481
a4d82a8a
PZ		 7482 vrf_id_ui = (bgp->vrf_id == VRF_UNKNOWN)
7483 ? -1
7484 : (int64_t)bgp->vrf_id;
ea47320b
DL		 7485
7486 /* Usage summary and header */
7487 if (use_json) {
7488 json_object_string_add(
7489 json, "routerId",
7490 inet_ntoa(bgp->router_id));
60466a63
QY		 7491 json_object_int_add(json, "as", bgp->as);
7492 json_object_int_add(json, "vrfId", vrf_id_ui);
ea47320b
DL		 7493 json_object_string_add(
7494 json, "vrfName",
7495 (bgp->inst_type
7496 == BGP_INSTANCE_TYPE_DEFAULT)
7497 ? "Default"
7498 : bgp->name);
7499 } else {
7500 vty_out(vty,
7501 "BGP router identifier %s, local AS number %u vrf-id %d",
60466a63 7502 inet_ntoa(bgp->router_id), bgp->as,
a4d82a8a
PZ		 7503 bgp->vrf_id == VRF_UNKNOWN
7504 ? -1
7505 : (int)bgp->vrf_id);
ea47320b
DL		 7506 vty_out(vty, "\n");
7507 }
d62a17ae 7508
ea47320b 7509 if (bgp_update_delay_configured(bgp)) {
d62a17ae 7510 if (use_json) {
ea47320b 7511 json_object_int_add(
60466a63 7512 json, "updateDelayLimit",
ea47320b 7513 bgp->v_update_delay);
d62a17ae 7514
ea47320b
DL		 7515 if (bgp->v_update_delay
7516 != bgp->v_establish_wait)
d62a17ae 7517 json_object_int_add(
7518 json,
ea47320b
DL		 7519 "updateDelayEstablishWait",
7520 bgp->v_establish_wait);
d62a17ae 7521
60466a63 7522 if (bgp_update_delay_active(bgp)) {
ea47320b
DL		 7523 json_object_string_add(
7524 json,
7525 "updateDelayFirstNeighbor",
7526 bgp->update_delay_begin_time);
7527 json_object_boolean_true_add(
7528 json,
7529 "updateDelayInProgress");
7530 } else {
7531 if (bgp->update_delay_over) {
d62a17ae 7532 json_object_string_add(
7533 json,
7534 "updateDelayFirstNeighbor",
7535 bgp->update_delay_begin_time);
ea47320b 7536 json_object_string_add(
d62a17ae 7537 json,
ea47320b
DL		 7538 "updateDelayBestpathResumed",
7539 bgp->update_delay_end_time);
7540 json_object_string_add(
d62a17ae 7541 json,
ea47320b
DL		 7542 "updateDelayZebraUpdateResume",
7543 bgp->update_delay_zebra_resume_time);
7544 json_object_string_add(
7545 json,
7546 "updateDelayPeerUpdateResume",
7547 bgp->update_delay_peers_resume_time);
d62a17ae 7548 }
ea47320b
DL		 7549 }
7550 } else {
7551 vty_out(vty,
7552 "Read-only mode update-delay limit: %d seconds\n",
7553 bgp->v_update_delay);
7554 if (bgp->v_update_delay
7555 != bgp->v_establish_wait)
d62a17ae 7556 vty_out(vty,
ea47320b
DL		 7557 " Establish wait: %d seconds\n",
7558 bgp->v_establish_wait);
d62a17ae 7559
60466a63 7560 if (bgp_update_delay_active(bgp)) {
ea47320b
DL		 7561 vty_out(vty,
7562 " First neighbor established: %s\n",
7563 bgp->update_delay_begin_time);
7564 vty_out(vty,
7565 " Delay in progress\n");
7566 } else {
7567 if (bgp->update_delay_over) {
d62a17ae 7568 vty_out(vty,
7569 " First neighbor established: %s\n",
7570 bgp->update_delay_begin_time);
7571 vty_out(vty,
ea47320b
DL		 7572 " Best-paths resumed: %s\n",
7573 bgp->update_delay_end_time);
7574 vty_out(vty,
7575 " zebra update resumed: %s\n",
7576 bgp->update_delay_zebra_resume_time);
7577 vty_out(vty,
7578 " peers update resumed: %s\n",
7579 bgp->update_delay_peers_resume_time);
d62a17ae 7580 }
7581 }
7582 }
ea47320b 7583 }
d62a17ae 7584
ea47320b
DL		 7585 if (use_json) {
7586 if (bgp_maxmed_onstartup_configured(bgp)
7587 && bgp->maxmed_active)
7588 json_object_boolean_true_add(
60466a63 7589 json, "maxMedOnStartup");
ea47320b
DL		 7590 if (bgp->v_maxmed_admin)
7591 json_object_boolean_true_add(
60466a63 7592 json, "maxMedAdministrative");
d62a17ae 7593
ea47320b
DL		 7594 json_object_int_add(
7595 json, "tableVersion",
60466a63 7596 bgp_table_version(bgp->rib[afi][safi]));
ea47320b 7597
60466a63
QY		 7598 ents = bgp_table_count(bgp->rib[afi][safi]);
7599 json_object_int_add(json, "ribCount", ents);
ea47320b
DL		 7600 json_object_int_add(
7601 json, "ribMemory",
7602 ents * sizeof(struct bgp_node));
d62a17ae 7603
ea47320b 7604 ents = listcount(bgp->peer);
60466a63
QY		 7605 json_object_int_add(json, "peerCount", ents);
7606 json_object_int_add(json, "peerMemory",
7607 ents * sizeof(struct peer));
d62a17ae 7608
ea47320b
DL		 7609 if ((ents = listcount(bgp->group))) {
7610 json_object_int_add(
60466a63 7611 json, "peerGroupCount", ents);
ea47320b
DL		 7612 json_object_int_add(
7613 json, "peerGroupMemory",
996c9314
LB		 7614 ents * sizeof(struct
7615 peer_group));
ea47320b 7616 }
d62a17ae 7617
ea47320b
DL		 7618 if (CHECK_FLAG(bgp->af_flags[afi][safi],
7619 BGP_CONFIG_DAMPENING))
7620 json_object_boolean_true_add(
60466a63 7621 json, "dampeningEnabled");
ea47320b
DL		 7622 } else {
7623 if (bgp_maxmed_onstartup_configured(bgp)
7624 && bgp->maxmed_active)
d62a17ae 7625 vty_out(vty,
ea47320b
DL		 7626 "Max-med on-startup active\n");
7627 if (bgp->v_maxmed_admin)
d62a17ae 7628 vty_out(vty,
ea47320b 7629 "Max-med administrative active\n");
d62a17ae 7630
60466a63
QY		 7631 vty_out(vty, "BGP table version %" PRIu64 "\n",
7632 bgp_table_version(bgp->rib[afi][safi]));
d62a17ae 7633
60466a63 7634 ents = bgp_table_count(bgp->rib[afi][safi]);
ea47320b
DL		 7635 vty_out(vty,
7636 "RIB entries %ld, using %s of memory\n",
7637 ents,
996c9314
LB		 7638 mtype_memstr(memstrbuf,
7639 sizeof(memstrbuf),
7640 ents * sizeof(struct
7641 bgp_node)));
ea47320b
DL		 7642
7643 /* Peer related usage */
7644 ents = listcount(bgp->peer);
60466a63 7645 vty_out(vty, "Peers %ld, using %s of memory\n",
ea47320b
DL		 7646 ents,
7647 mtype_memstr(
60466a63
QY		 7648 memstrbuf, sizeof(memstrbuf),
7649 ents * sizeof(struct peer)));
ea47320b
DL		 7650
7651 if ((ents = listcount(bgp->group)))
d62a17ae 7652 vty_out(vty,
ea47320b 7653 "Peer groups %ld, using %s of memory\n",
d62a17ae 7654 ents,
7655 mtype_memstr(
7656 memstrbuf,
7657 sizeof(memstrbuf),
996c9314
LB		 7658 ents * sizeof(struct
7659 peer_group)));
d62a17ae 7660
ea47320b
DL		 7661 if (CHECK_FLAG(bgp->af_flags[afi][safi],
7662 BGP_CONFIG_DAMPENING))
60466a63 7663 vty_out(vty, "Dampening enabled.\n");
ea47320b 7664 vty_out(vty, "\n");
d62a17ae 7665
ea47320b
DL		 7666 /* Subtract 8 here because 'Neighbor' is
7667 * 8 characters */
7668 vty_out(vty, "Neighbor");
60466a63
QY		 7669 vty_out(vty, "%*s", max_neighbor_width - 8,
7670 " ");
ea47320b
DL		 7671 vty_out(vty,
7672 "V AS MsgRcvd MsgSent TblVer InQ OutQ Up/Down State/PfxRcd\n");
d62a17ae 7673 }
ea47320b 7674 }
d62a17ae 7675
ea47320b 7676 count++;
d62a17ae 7677
ea47320b
DL		 7678 if (use_json) {
7679 json_peer = json_object_new_object();
d62a17ae 7680
ea47320b 7681 if (peer_dynamic_neighbor(peer))
60466a63
QY		 7682 json_object_boolean_true_add(json_peer,
7683 "dynamicPeer");
d62a17ae 7684
ea47320b 7685 if (peer->hostname)
60466a63 7686 json_object_string_add(json_peer, "hostname",
ea47320b 7687 peer->hostname);
d62a17ae 7688
ea47320b 7689 if (peer->domainname)
60466a63
QY		 7690 json_object_string_add(json_peer, "domainname",
7691 peer->domainname);
d62a17ae 7692
60466a63 7693 json_object_int_add(json_peer, "remoteAs", peer->as);
ea47320b 7694 json_object_int_add(json_peer, "version", 4);
60466a63 7695 json_object_int_add(json_peer, "msgRcvd",
0112e9e0 7696 PEER_TOTAL_RX(peer));
60466a63 7697 json_object_int_add(json_peer, "msgSent",
0112e9e0 7698 PEER_TOTAL_TX(peer));
ea47320b
DL		 7699
7700 json_object_int_add(json_peer, "tableVersion",
7701 peer->version[afi][safi]);
7702 json_object_int_add(json_peer, "outq",
7703 peer->obuf->count);
7704 json_object_int_add(json_peer, "inq", 0);
60466a63
QY		 7705 peer_uptime(peer->uptime, timebuf, BGP_UPTIME_LEN,
7706 use_json, json_peer);
7707 json_object_int_add(json_peer, "prefixReceivedCount",
7708 peer->pcount[afi][pfx_rcd_safi]);
d62a17ae 7709
ea47320b 7710 if (CHECK_FLAG(peer->flags, PEER_FLAG_SHUTDOWN))
60466a63 7711 json_object_string_add(json_peer, "state",
ea47320b 7712 "Idle (Admin)");
60466a63
QY		 7713 else if (CHECK_FLAG(peer->sflags,
7714 PEER_STATUS_PREFIX_OVERFLOW))
7715 json_object_string_add(json_peer, "state",
ea47320b
DL		 7716 "Idle (PfxCt)");
7717 else
7718 json_object_string_add(
7719 json_peer, "state",
60466a63
QY		 7720 lookup_msg(bgp_status_msg, peer->status,
7721 NULL));
ea47320b
DL		 7722
7723 if (peer->conf_if)
60466a63 7724 json_object_string_add(json_peer, "idType",
ea47320b
DL		 7725 "interface");
7726 else if (peer->su.sa.sa_family == AF_INET)
60466a63
QY		 7727 json_object_string_add(json_peer, "idType",
7728 "ipv4");
ea47320b 7729 else if (peer->su.sa.sa_family == AF_INET6)
60466a63
QY		 7730 json_object_string_add(json_peer, "idType",
7731 "ipv6");
d62a17ae 7732
ea47320b
DL		 7733 json_object_object_add(json_peers, peer->host,
7734 json_peer);
7735 } else {
7736 memset(dn_flag, '\0', sizeof(dn_flag));
7737 if (peer_dynamic_neighbor(peer)) {
7738 dn_count++;
7739 dn_flag[0] = '*';
7740 }
d62a17ae 7741
ea47320b 7742 if (peer->hostname
60466a63 7743 && bgp_flag_check(bgp, BGP_FLAG_SHOW_HOSTNAME))
ea47320b 7744 len = vty_out(vty, "%s%s(%s)", dn_flag,
60466a63 7745 peer->hostname, peer->host);
ea47320b 7746 else
60466a63 7747 len = vty_out(vty, "%s%s", dn_flag, peer->host);
ea47320b
DL		 7748
7749 /* pad the neighbor column with spaces */
7750 if (len < max_neighbor_width)
60466a63
QY		 7751 vty_out(vty, "%*s", max_neighbor_width - len,
7752 " ");
ea47320b 7753
86a55b99 7754 vty_out(vty, "4 %10u %7u %7u %8" PRIu64 " %4d %4zd %8s",
0112e9e0
QY		 7755 peer->as, PEER_TOTAL_RX(peer),
7756 PEER_TOTAL_TX(peer), peer->version[afi][safi],
7757 0, peer->obuf->count,
d62a17ae 7758 peer_uptime(peer->uptime, timebuf,
ea47320b 7759 BGP_UPTIME_LEN, 0, NULL));
d62a17ae 7760
ea47320b 7761 if (peer->status == Established)
95077abf
DW		 7762 if (peer->afc_recv[afi][pfx_rcd_safi])
7763 vty_out(vty, " %12ld",
a4d82a8a
PZ		 7764 peer->pcount[afi]
7765 [pfx_rcd_safi]);
95077abf
DW		 7766 else
7767 vty_out(vty, " NoNeg");
ea47320b 7768 else {
60466a63 7769 if (CHECK_FLAG(peer->flags, PEER_FLAG_SHUTDOWN))
ea47320b 7770 vty_out(vty, " Idle (Admin)");
60466a63
QY		 7771 else if (CHECK_FLAG(
7772 peer->sflags,
7773 PEER_STATUS_PREFIX_OVERFLOW))
ea47320b 7774 vty_out(vty, " Idle (PfxCt)");
d62a17ae 7775 else
ea47320b 7776 vty_out(vty, " %12s",
60466a63
QY		 7777 lookup_msg(bgp_status_msg,
7778 peer->status, NULL));
d62a17ae 7779 }
ea47320b 7780 vty_out(vty, "\n");
d62a17ae 7781 }
7782 }
f933309e 7783
d62a17ae 7784 if (use_json) {
7785 json_object_object_add(json, "peers", json_peers);
7786
7787 json_object_int_add(json, "totalPeers", count);
7788 json_object_int_add(json, "dynamicPeers", dn_count);
7789
57a9c8a8
DS		 7790 bgp_show_bestpath_json(bgp, json);
7791
996c9314
LB		 7792 vty_out(vty, "%s\n", json_object_to_json_string_ext(
7793 json, JSON_C_TO_STRING_PRETTY));
d62a17ae 7794 json_object_free(json);
7795 } else {
7796 if (count)
7797 vty_out(vty, "\nTotal number of neighbors %d\n", count);
7798 else {
7799 if (use_json)
7800 vty_out(vty,
7801 "{\"error\": {\"message\": \"No %s neighbor configured\"}}\n",
7802 afi_safi_print(afi, safi));
7803 else
7804 vty_out(vty, "No %s neighbor is configured\n",
7805 afi_safi_print(afi, safi));
7806 }
b05a1c8b 7807
d62a17ae 7808 if (dn_count && !use_json) {
7809 vty_out(vty, "* - dynamic neighbor\n");
7810 vty_out(vty, "%d dynamic neighbor(s), limit %d\n",
7811 dn_count, bgp->dynamic_neighbors_limit);
7812 }
7813 }
1ff9a340 7814
d62a17ae 7815 return CMD_SUCCESS;
718e3744 7816}
7817
d62a17ae 7818static void bgp_show_summary_afi_safi(struct vty *vty, struct bgp *bgp, int afi,
d7c0a89a 7819 int safi, uint8_t use_json,
d62a17ae 7820 json_object *json)
7821{
7822 int is_first = 1;
7823 int afi_wildcard = (afi == AFI_MAX);
7824 int safi_wildcard = (safi == SAFI_MAX);
7825 int is_wildcard = (afi_wildcard || safi_wildcard);
7826 bool json_output = false;
7827
7828 if (use_json && is_wildcard)
7829 vty_out(vty, "{\n");
7830 if (afi_wildcard)
7831 afi = 1; /* AFI_IP */
7832 while (afi < AFI_MAX) {
7833 if (safi_wildcard)
7834 safi = 1; /* SAFI_UNICAST */
7835 while (safi < SAFI_MAX) {
318cac96 7836 if (bgp_afi_safi_peer_exists(bgp, afi, safi)) {
d62a17ae 7837 json_output = true;
7838 if (is_wildcard) {
7839 /*
7840 * So limit output to those afi/safi
7841 * pairs that
7842 * actualy have something interesting in
7843 * them
7844 */
7845 if (use_json) {
7846 json = json_object_new_object();
7847
7848 if (!is_first)
7849 vty_out(vty, ",\n");
7850 else
7851 is_first = 0;
7852
7853 vty_out(vty, "\"%s\":",
7854 afi_safi_json(afi,
7855 safi));
7856 } else {
7857 vty_out(vty, "\n%s Summary:\n",
7858 afi_safi_print(afi,
7859 safi));
7860 }
7861 }
7862 bgp_show_summary(vty, bgp, afi, safi, use_json,
7863 json);
7864 }
7865 safi++;
d62a17ae 7866 if (!safi_wildcard)
7867 safi = SAFI_MAX;
7868 }
7869 afi++;
ee851c8c 7870 if (!afi_wildcard)
d62a17ae 7871 afi = AFI_MAX;
7872 }
7873
7874 if (use_json && is_wildcard)
7875 vty_out(vty, "}\n");
7876 else if (use_json && !json_output)
7877 vty_out(vty, "{}\n");
7878}
7879
7880static void bgp_show_all_instances_summary_vty(struct vty *vty, afi_t afi,
d7c0a89a 7881 safi_t safi, uint8_t use_json)
d62a17ae 7882{
7883 struct listnode *node, *nnode;
7884 struct bgp *bgp;
7885 json_object *json = NULL;
7886 int is_first = 1;
7887
7888 if (use_json)
7889 vty_out(vty, "{\n");
7890
7891 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp)) {
7892 if (use_json) {
7893 json = json_object_new_object();
7894
7895 if (!is_first)
7896 vty_out(vty, ",\n");
7897 else
7898 is_first = 0;
7899
7900 vty_out(vty, "\"%s\":",
7901 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
7902 ? "Default"
7903 : bgp->name);
7904 } else {
7905 vty_out(vty, "\nInstance %s:\n",
7906 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
7907 ? "Default"
7908 : bgp->name);
7909 }
7910 bgp_show_summary_afi_safi(vty, bgp, afi, safi, use_json, json);
7911 }
7912
7913 if (use_json)
7914 vty_out(vty, "}\n");
7915}
7916
7917int bgp_show_summary_vty(struct vty *vty, const char *name, afi_t afi,
d7c0a89a 7918 safi_t safi, uint8_t use_json)
d62a17ae 7919{
7920 struct bgp *bgp;
7921
7922 if (name) {
7923 if (strmatch(name, "all")) {
7924 bgp_show_all_instances_summary_vty(vty, afi, safi,
7925 use_json);
7926 return CMD_SUCCESS;
7927 } else {
7928 bgp = bgp_lookup_by_name(name);
7929
7930 if (!bgp) {
7931 if (use_json)
7932 vty_out(vty, "{}\n");
7933 else
7934 vty_out(vty,
7935 "%% No such BGP instance exist\n");
7936 return CMD_WARNING;
7937 }
7938
7939 bgp_show_summary_afi_safi(vty, bgp, afi, safi, use_json,
7940 NULL);
7941 return CMD_SUCCESS;
7942 }
7943 }
7944
7945 bgp = bgp_get_default();
7946
7947 if (bgp)
7948 bgp_show_summary_afi_safi(vty, bgp, afi, safi, use_json, NULL);
7949
7950 return CMD_SUCCESS;
4fb25c53
DW		 7951}
7952
716b2d8a 7953/* `show [ip] bgp summary' commands. */
47fc97cc 7954DEFUN (show_ip_bgp_summary,
718e3744 7955 show_ip_bgp_summary_cmd,
dd6bd0f1 7956 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] summary [json]",
718e3744 7957 SHOW_STR
7958 IP_STR
7959 BGP_STR
8386ac43 7960 BGP_INSTANCE_HELP_STR
46f296b4 7961 BGP_AFI_HELP_STR
dd6bd0f1 7962 BGP_SAFI_WITH_LABEL_HELP_STR
b05a1c8b 7963 "Summary of BGP neighbor status\n"
9973d184 7964 JSON_STR)
718e3744 7965{
d62a17ae 7966 char *vrf = NULL;
7967 afi_t afi = AFI_MAX;
7968 safi_t safi = SAFI_MAX;
7969
7970 int idx = 0;
7971
7972 /* show [ip] bgp */
7973 if (argv_find(argv, argc, "ip", &idx))
7974 afi = AFI_IP;
7975 /* [<view|vrf> VIEWVRFNAME] */
7976 if (argv_find(argv, argc, "view", &idx)
7977 || argv_find(argv, argc, "vrf", &idx))
7978 vrf = argv[++idx]->arg;
7979 /* ["BGP_AFI_CMD_STR" ["BGP_SAFI_CMD_STR"]] */
7980 if (argv_find_and_parse_afi(argv, argc, &idx, &afi)) {
7981 argv_find_and_parse_safi(argv, argc, &idx, &safi);
7982 }
7983
7984 int uj = use_json(argc, argv);
7985
7986 return bgp_show_summary_vty(vty, vrf, afi, safi, uj);
7987}
7988
7989const char *afi_safi_print(afi_t afi, safi_t safi)
7990{
7991 if (afi == AFI_IP && safi == SAFI_UNICAST)
7992 return "IPv4 Unicast";
7993 else if (afi == AFI_IP && safi == SAFI_MULTICAST)
7994 return "IPv4 Multicast";
7995 else if (afi == AFI_IP && safi == SAFI_LABELED_UNICAST)
7996 return "IPv4 Labeled Unicast";
7997 else if (afi == AFI_IP && safi == SAFI_MPLS_VPN)
7998 return "IPv4 VPN";
7999 else if (afi == AFI_IP && safi == SAFI_ENCAP)
8000 return "IPv4 Encap";
7c40bf39 8001 else if (afi == AFI_IP && safi == SAFI_FLOWSPEC)
8002 return "IPv4 Flowspec";
d62a17ae 8003 else if (afi == AFI_IP6 && safi == SAFI_UNICAST)
8004 return "IPv6 Unicast";
8005 else if (afi == AFI_IP6 && safi == SAFI_MULTICAST)
8006 return "IPv6 Multicast";
8007 else if (afi == AFI_IP6 && safi == SAFI_LABELED_UNICAST)
8008 return "IPv6 Labeled Unicast";
8009 else if (afi == AFI_IP6 && safi == SAFI_MPLS_VPN)
8010 return "IPv6 VPN";
8011 else if (afi == AFI_IP6 && safi == SAFI_ENCAP)
8012 return "IPv6 Encap";
7c40bf39 8013 else if (afi == AFI_IP6 && safi == SAFI_FLOWSPEC)
8014 return "IPv6 Flowspec";
d62a17ae 8015 else if (afi == AFI_L2VPN && safi == SAFI_EVPN)
8016 return "L2VPN EVPN";
8017 else
8018 return "Unknown";
538621f2 8019}
8020
b9f77ec8
DS		 8021/*
8022 * Please note that we have intentionally camelCased
8023 * the return strings here. So if you want
8024 * to use this function, please ensure you
8025 * are doing this within json output
8026 */
d62a17ae 8027const char *afi_safi_json(afi_t afi, safi_t safi)
8028{
8029 if (afi == AFI_IP && safi == SAFI_UNICAST)
8030 return "ipv4Unicast";
8031 else if (afi == AFI_IP && safi == SAFI_MULTICAST)
8032 return "ipv4Multicast";
8033 else if (afi == AFI_IP && safi == SAFI_LABELED_UNICAST)
8034 return "ipv4LabeledUnicast";
8035 else if (afi == AFI_IP && safi == SAFI_MPLS_VPN)
8036 return "ipv4Vpn";
8037 else if (afi == AFI_IP && safi == SAFI_ENCAP)
8038 return "ipv4Encap";
7c40bf39 8039 else if (afi == AFI_IP && safi == SAFI_FLOWSPEC)
8040 return "ipv4Flowspec";
d62a17ae 8041 else if (afi == AFI_IP6 && safi == SAFI_UNICAST)
8042 return "ipv6Unicast";
8043 else if (afi == AFI_IP6 && safi == SAFI_MULTICAST)
8044 return "ipv6Multicast";
8045 else if (afi == AFI_IP6 && safi == SAFI_LABELED_UNICAST)
8046 return "ipv6LabeledUnicast";
8047 else if (afi == AFI_IP6 && safi == SAFI_MPLS_VPN)
8048 return "ipv6Vpn";
8049 else if (afi == AFI_IP6 && safi == SAFI_ENCAP)
8050 return "ipv6Encap";
7c40bf39 8051 else if (afi == AFI_IP6 && safi == SAFI_FLOWSPEC)
8052 return "ipv6Flowspec";
d62a17ae 8053 else if (afi == AFI_L2VPN && safi == SAFI_EVPN)
8054 return "l2VpnEvpn";
8055 else
8056 return "Unknown";
27162734
LB		 8057}
8058
718e3744 8059/* Show BGP peer's information. */
d62a17ae 8060enum show_type { show_all, show_peer };
8061
8062static void bgp_show_peer_afi_orf_cap(struct vty *vty, struct peer *p,
8063 afi_t afi, safi_t safi,
d7c0a89a
QY		 8064 uint16_t adv_smcap, uint16_t adv_rmcap,
8065 uint16_t rcv_smcap, uint16_t rcv_rmcap,
8066 uint8_t use_json, json_object *json_pref)
d62a17ae 8067{
8068 /* Send-Mode */
8069 if (CHECK_FLAG(p->af_cap[afi][safi], adv_smcap)
8070 || CHECK_FLAG(p->af_cap[afi][safi], rcv_smcap)) {
8071 if (use_json) {
8072 if (CHECK_FLAG(p->af_cap[afi][safi], adv_smcap)
8073 && CHECK_FLAG(p->af_cap[afi][safi], rcv_smcap))
8074 json_object_string_add(json_pref, "sendMode",
8075 "advertisedAndReceived");
8076 else if (CHECK_FLAG(p->af_cap[afi][safi], adv_smcap))
8077 json_object_string_add(json_pref, "sendMode",
8078 "advertised");
8079 else if (CHECK_FLAG(p->af_cap[afi][safi], rcv_smcap))
8080 json_object_string_add(json_pref, "sendMode",
8081 "received");
8082 } else {
8083 vty_out(vty, " Send-mode: ");
8084 if (CHECK_FLAG(p->af_cap[afi][safi], adv_smcap))
8085 vty_out(vty, "advertised");
8086 if (CHECK_FLAG(p->af_cap[afi][safi], rcv_smcap))
8087 vty_out(vty, "%sreceived",
8088 CHECK_FLAG(p->af_cap[afi][safi],
8089 adv_smcap)
8090 ? ", "
8091 : "");
8092 vty_out(vty, "\n");
8093 }
8094 }
8095
8096 /* Receive-Mode */
8097 if (CHECK_FLAG(p->af_cap[afi][safi], adv_rmcap)
8098 || CHECK_FLAG(p->af_cap[afi][safi], rcv_rmcap)) {
8099 if (use_json) {
8100 if (CHECK_FLAG(p->af_cap[afi][safi], adv_rmcap)
8101 && CHECK_FLAG(p->af_cap[afi][safi], rcv_rmcap))
8102 json_object_string_add(json_pref, "recvMode",
8103 "advertisedAndReceived");
8104 else if (CHECK_FLAG(p->af_cap[afi][safi], adv_rmcap))
8105 json_object_string_add(json_pref, "recvMode",
8106 "advertised");
8107 else if (CHECK_FLAG(p->af_cap[afi][safi], rcv_rmcap))
8108 json_object_string_add(json_pref, "recvMode",
8109 "received");
8110 } else {
8111 vty_out(vty, " Receive-mode: ");
8112 if (CHECK_FLAG(p->af_cap[afi][safi], adv_rmcap))
8113 vty_out(vty, "advertised");
8114 if (CHECK_FLAG(p->af_cap[afi][safi], rcv_rmcap))
8115 vty_out(vty, "%sreceived",
8116 CHECK_FLAG(p->af_cap[afi][safi],
8117 adv_rmcap)
8118 ? ", "
8119 : "");
8120 vty_out(vty, "\n");
8121 }
8122 }
8123}
8124
8125static void bgp_show_peer_afi(struct vty *vty, struct peer *p, afi_t afi,
d7c0a89a 8126 safi_t safi, uint8_t use_json,
d62a17ae 8127 json_object *json_neigh)
8128{
0291c246
MK		 8129 struct bgp_filter *filter;
8130 struct peer_af *paf;
8131 char orf_pfx_name[BUFSIZ];
8132 int orf_pfx_count;
8133 json_object *json_af = NULL;
8134 json_object *json_prefA = NULL;
8135 json_object *json_prefB = NULL;
8136 json_object *json_addr = NULL;
d62a17ae 8137
8138 if (use_json) {
8139 json_addr = json_object_new_object();
8140 json_af = json_object_new_object();
8141 filter = &p->filter[afi][safi];
8142
8143 if (peer_group_active(p))
8144 json_object_string_add(json_addr, "peerGroupMember",
8145 p->group->name);
8146
8147 paf = peer_af_find(p, afi, safi);
8148 if (paf && PAF_SUBGRP(paf)) {
8149 json_object_int_add(json_addr, "updateGroupId",
8150 PAF_UPDGRP(paf)->id);
8151 json_object_int_add(json_addr, "subGroupId",
8152 PAF_SUBGRP(paf)->id);
8153 json_object_int_add(json_addr, "packetQueueLength",
8154 bpacket_queue_virtual_length(paf));
8155 }
8156
8157 if (CHECK_FLAG(p->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_SM_ADV)
8158 || CHECK_FLAG(p->af_cap[afi][safi],
8159 PEER_CAP_ORF_PREFIX_SM_RCV)
8160 || CHECK_FLAG(p->af_cap[afi][safi],
8161 PEER_CAP_ORF_PREFIX_RM_ADV)
8162 || CHECK_FLAG(p->af_cap[afi][safi],
8163 PEER_CAP_ORF_PREFIX_RM_RCV)) {
8164 json_object_int_add(json_af, "orfType",
8165 ORF_TYPE_PREFIX);
8166 json_prefA = json_object_new_object();
8167 bgp_show_peer_afi_orf_cap(vty, p, afi, safi,
8168 PEER_CAP_ORF_PREFIX_SM_ADV,
8169 PEER_CAP_ORF_PREFIX_RM_ADV,
8170 PEER_CAP_ORF_PREFIX_SM_RCV,
8171 PEER_CAP_ORF_PREFIX_RM_RCV,
8172 use_json, json_prefA);
8173 json_object_object_add(json_af, "orfPrefixList",
8174 json_prefA);
8175 }
8176
8177 if (CHECK_FLAG(p->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_SM_ADV)
8178 || CHECK_FLAG(p->af_cap[afi][safi],
8179 PEER_CAP_ORF_PREFIX_SM_OLD_RCV)
8180 || CHECK_FLAG(p->af_cap[afi][safi],
8181 PEER_CAP_ORF_PREFIX_RM_ADV)
8182 || CHECK_FLAG(p->af_cap[afi][safi],
8183 PEER_CAP_ORF_PREFIX_RM_OLD_RCV)) {
8184 json_object_int_add(json_af, "orfOldType",
8185 ORF_TYPE_PREFIX_OLD);
8186 json_prefB = json_object_new_object();
8187 bgp_show_peer_afi_orf_cap(
8188 vty, p, afi, safi, PEER_CAP_ORF_PREFIX_SM_ADV,
8189 PEER_CAP_ORF_PREFIX_RM_ADV,
8190 PEER_CAP_ORF_PREFIX_SM_OLD_RCV,
8191 PEER_CAP_ORF_PREFIX_RM_OLD_RCV, use_json,
8192 json_prefB);
8193 json_object_object_add(json_af, "orfOldPrefixList",
8194 json_prefB);
8195 }
8196
8197 if (CHECK_FLAG(p->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_SM_ADV)
8198 || CHECK_FLAG(p->af_cap[afi][safi],
8199 PEER_CAP_ORF_PREFIX_SM_RCV)
8200 || CHECK_FLAG(p->af_cap[afi][safi],
8201 PEER_CAP_ORF_PREFIX_SM_OLD_RCV)
8202 || CHECK_FLAG(p->af_cap[afi][safi],
8203 PEER_CAP_ORF_PREFIX_RM_ADV)
8204 || CHECK_FLAG(p->af_cap[afi][safi],
8205 PEER_CAP_ORF_PREFIX_RM_RCV)
8206 || CHECK_FLAG(p->af_cap[afi][safi],
8207 PEER_CAP_ORF_PREFIX_RM_OLD_RCV))
8208 json_object_object_add(json_addr, "afDependentCap",
8209 json_af);
8210 else
8211 json_object_free(json_af);
8212
8213 sprintf(orf_pfx_name, "%s.%d.%d", p->host, afi, safi);
8214 orf_pfx_count = prefix_bgp_show_prefix_list(
8215 NULL, afi, orf_pfx_name, use_json);
8216
8217 if (CHECK_FLAG(p->af_sflags[afi][safi],
8218 PEER_STATUS_ORF_PREFIX_SEND)
8219 || orf_pfx_count) {
8220 if (CHECK_FLAG(p->af_sflags[afi][safi],
8221 PEER_STATUS_ORF_PREFIX_SEND))
8222 json_object_boolean_true_add(json_neigh,
8223 "orfSent");
8224 if (orf_pfx_count)
8225 json_object_int_add(json_addr, "orfRecvCounter",
8226 orf_pfx_count);
8227 }
8228 if (CHECK_FLAG(p->af_sflags[afi][safi],
8229 PEER_STATUS_ORF_WAIT_REFRESH))
8230 json_object_string_add(
8231 json_addr, "orfFirstUpdate",
8232 "deferredUntilORFOrRouteRefreshRecvd");
8233
8234 if (CHECK_FLAG(p->af_flags[afi][safi],
8235 PEER_FLAG_REFLECTOR_CLIENT))
8236 json_object_boolean_true_add(json_addr,
8237 "routeReflectorClient");
8238 if (CHECK_FLAG(p->af_flags[afi][safi],
8239 PEER_FLAG_RSERVER_CLIENT))
8240 json_object_boolean_true_add(json_addr,
8241 "routeServerClient");
8242 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_SOFT_RECONFIG))
8243 json_object_boolean_true_add(json_addr,
8244 "inboundSoftConfigPermit");
8245
8246 if (CHECK_FLAG(p->af_flags[afi][safi],
8247 PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE))
8248 json_object_boolean_true_add(
8249 json_addr,
8250 "privateAsNumsAllReplacedInUpdatesToNbr");
8251 else if (CHECK_FLAG(p->af_flags[afi][safi],
8252 PEER_FLAG_REMOVE_PRIVATE_AS_REPLACE))
8253 json_object_boolean_true_add(
8254 json_addr,
8255 "privateAsNumsReplacedInUpdatesToNbr");
8256 else if (CHECK_FLAG(p->af_flags[afi][safi],
8257 PEER_FLAG_REMOVE_PRIVATE_AS_ALL))
8258 json_object_boolean_true_add(
8259 json_addr,
8260 "privateAsNumsAllRemovedInUpdatesToNbr");
8261 else if (CHECK_FLAG(p->af_flags[afi][safi],
8262 PEER_FLAG_REMOVE_PRIVATE_AS))
8263 json_object_boolean_true_add(
8264 json_addr,
8265 "privateAsNumsRemovedInUpdatesToNbr");
8266
8267 if (CHECK_FLAG(p->af_flags[afi][safi],
8268 PEER_FLAG_ADDPATH_TX_ALL_PATHS))
8269 json_object_boolean_true_add(json_addr,
8270 "addpathTxAllPaths");
8271
8272 if (CHECK_FLAG(p->af_flags[afi][safi],
8273 PEER_FLAG_ADDPATH_TX_BESTPATH_PER_AS))
8274 json_object_boolean_true_add(json_addr,
8275 "addpathTxBestpathPerAS");
8276
8277 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_AS_OVERRIDE))
8278 json_object_string_add(json_addr,
8279 "overrideASNsInOutboundUpdates",
8280 "ifAspathEqualRemoteAs");
8281
8282 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_NEXTHOP_SELF)
8283 || CHECK_FLAG(p->af_flags[afi][safi],
8284 PEER_FLAG_FORCE_NEXTHOP_SELF))
8285 json_object_boolean_true_add(json_addr,
8286 "routerAlwaysNextHop");
8287 if (CHECK_FLAG(p->af_flags[afi][safi],
8288 PEER_FLAG_AS_PATH_UNCHANGED))
8289 json_object_boolean_true_add(
8290 json_addr, "unchangedAsPathPropogatedToNbr");
8291 if (CHECK_FLAG(p->af_flags[afi][safi],
8292 PEER_FLAG_NEXTHOP_UNCHANGED))
8293 json_object_boolean_true_add(
8294 json_addr, "unchangedNextHopPropogatedToNbr");
8295 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_MED_UNCHANGED))
8296 json_object_boolean_true_add(
8297 json_addr, "unchangedMedPropogatedToNbr");
8298 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_SEND_COMMUNITY)
8299 || CHECK_FLAG(p->af_flags[afi][safi],
8300 PEER_FLAG_SEND_EXT_COMMUNITY)) {
8301 if (CHECK_FLAG(p->af_flags[afi][safi],
8302 PEER_FLAG_SEND_COMMUNITY)
8303 && CHECK_FLAG(p->af_flags[afi][safi],
8304 PEER_FLAG_SEND_EXT_COMMUNITY))
8305 json_object_string_add(json_addr,
8306 "commAttriSentToNbr",
8307 "extendedAndStandard");
8308 else if (CHECK_FLAG(p->af_flags[afi][safi],
8309 PEER_FLAG_SEND_EXT_COMMUNITY))
8310 json_object_string_add(json_addr,
8311 "commAttriSentToNbr",
8312 "extended");
8313 else
8314 json_object_string_add(json_addr,
8315 "commAttriSentToNbr",
8316 "standard");
8317 }
8318 if (CHECK_FLAG(p->af_flags[afi][safi],
8319 PEER_FLAG_DEFAULT_ORIGINATE)) {
8320 if (p->default_rmap[afi][safi].name)
8321 json_object_string_add(
8322 json_addr, "defaultRouteMap",
8323 p->default_rmap[afi][safi].name);
8324
8325 if (paf && PAF_SUBGRP(paf)
8326 && CHECK_FLAG(PAF_SUBGRP(paf)->sflags,
8327 SUBGRP_STATUS_DEFAULT_ORIGINATE))
8328 json_object_boolean_true_add(json_addr,
8329 "defaultSent");
8330 else
8331 json_object_boolean_true_add(json_addr,
8332 "defaultNotSent");
8333 }
8334
dff8f48d 8335 if (afi == AFI_L2VPN && safi == SAFI_EVPN) {
94c2f693 8336 if (is_evpn_enabled())
60466a63
QY		 8337 json_object_boolean_true_add(
8338 json_addr, "advertiseAllVnis");
dff8f48d
MK		 8339 }
8340
d62a17ae 8341 if (filter->plist[FILTER_IN].name
8342 || filter->dlist[FILTER_IN].name
8343 || filter->aslist[FILTER_IN].name
8344 || filter->map[RMAP_IN].name)
8345 json_object_boolean_true_add(json_addr,
8346 "inboundPathPolicyConfig");
8347 if (filter->plist[FILTER_OUT].name
8348 || filter->dlist[FILTER_OUT].name
8349 || filter->aslist[FILTER_OUT].name
8350 || filter->map[RMAP_OUT].name || filter->usmap.name)
8351 json_object_boolean_true_add(
8352 json_addr, "outboundPathPolicyConfig");
8353
8354 /* prefix-list */
8355 if (filter->plist[FILTER_IN].name)
8356 json_object_string_add(json_addr,
8357 "incomingUpdatePrefixFilterList",
8358 filter->plist[FILTER_IN].name);
8359 if (filter->plist[FILTER_OUT].name)
8360 json_object_string_add(json_addr,
8361 "outgoingUpdatePrefixFilterList",
8362 filter->plist[FILTER_OUT].name);
8363
8364 /* distribute-list */
8365 if (filter->dlist[FILTER_IN].name)
8366 json_object_string_add(
8367 json_addr, "incomingUpdateNetworkFilterList",
8368 filter->dlist[FILTER_IN].name);
8369 if (filter->dlist[FILTER_OUT].name)
8370 json_object_string_add(
8371 json_addr, "outgoingUpdateNetworkFilterList",
8372 filter->dlist[FILTER_OUT].name);
8373
8374 /* filter-list. */
8375 if (filter->aslist[FILTER_IN].name)
8376 json_object_string_add(json_addr,
8377 "incomingUpdateAsPathFilterList",
8378 filter->aslist[FILTER_IN].name);
8379 if (filter->aslist[FILTER_OUT].name)
8380 json_object_string_add(json_addr,
8381 "outgoingUpdateAsPathFilterList",
8382 filter->aslist[FILTER_OUT].name);
8383
8384 /* route-map. */
8385 if (filter->map[RMAP_IN].name)
8386 json_object_string_add(
8387 json_addr, "routeMapForIncomingAdvertisements",
8388 filter->map[RMAP_IN].name);
8389 if (filter->map[RMAP_OUT].name)
8390 json_object_string_add(
8391 json_addr, "routeMapForOutgoingAdvertisements",
8392 filter->map[RMAP_OUT].name);
8393
8394 /* unsuppress-map */
8395 if (filter->usmap.name)
8396 json_object_string_add(json_addr,
8397 "selectiveUnsuppressRouteMap",
8398 filter->usmap.name);
8399
8400 /* Receive prefix count */
8401 json_object_int_add(json_addr, "acceptedPrefixCounter",
8402 p->pcount[afi][safi]);
8403
8404 /* Maximum prefix */
8405 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_MAX_PREFIX)) {
8406 json_object_int_add(json_addr, "prefixAllowedMax",
8407 p->pmax[afi][safi]);
8408 if (CHECK_FLAG(p->af_flags[afi][safi],
8409 PEER_FLAG_MAX_PREFIX_WARNING))
8410 json_object_boolean_true_add(
8411 json_addr, "prefixAllowedMaxWarning");
8412 json_object_int_add(json_addr,
8413 "prefixAllowedWarningThresh",
8414 p->pmax_threshold[afi][safi]);
8415 if (p->pmax_restart[afi][safi])
8416 json_object_int_add(
8417 json_addr,
8418 "prefixAllowedRestartIntervalMsecs",
8419 p->pmax_restart[afi][safi] * 60000);
8420 }
8421 json_object_object_add(json_neigh, afi_safi_print(afi, safi),
8422 json_addr);
8423
8424 } else {
8425 filter = &p->filter[afi][safi];
8426
8427 vty_out(vty, " For address family: %s\n",
8428 afi_safi_print(afi, safi));
8429
8430 if (peer_group_active(p))
8431 vty_out(vty, " %s peer-group member\n",
8432 p->group->name);
8433
8434 paf = peer_af_find(p, afi, safi);
8435 if (paf && PAF_SUBGRP(paf)) {
996c9314
LB		 8436 vty_out(vty, " Update group %" PRIu64
8437 ", subgroup %" PRIu64 "\n",
d62a17ae 8438 PAF_UPDGRP(paf)->id, PAF_SUBGRP(paf)->id);
8439 vty_out(vty, " Packet Queue length %d\n",
8440 bpacket_queue_virtual_length(paf));
8441 } else {
8442 vty_out(vty, " Not part of any update group\n");
8443 }
8444 if (CHECK_FLAG(p->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_SM_ADV)
8445 || CHECK_FLAG(p->af_cap[afi][safi],
8446 PEER_CAP_ORF_PREFIX_SM_RCV)
8447 || CHECK_FLAG(p->af_cap[afi][safi],
8448 PEER_CAP_ORF_PREFIX_SM_OLD_RCV)
8449 || CHECK_FLAG(p->af_cap[afi][safi],
8450 PEER_CAP_ORF_PREFIX_RM_ADV)
8451 || CHECK_FLAG(p->af_cap[afi][safi],
8452 PEER_CAP_ORF_PREFIX_RM_RCV)
8453 || CHECK_FLAG(p->af_cap[afi][safi],
8454 PEER_CAP_ORF_PREFIX_RM_OLD_RCV))
8455 vty_out(vty, " AF-dependant capabilities:\n");
8456
8457 if (CHECK_FLAG(p->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_SM_ADV)
8458 || CHECK_FLAG(p->af_cap[afi][safi],
8459 PEER_CAP_ORF_PREFIX_SM_RCV)
8460 || CHECK_FLAG(p->af_cap[afi][safi],
8461 PEER_CAP_ORF_PREFIX_RM_ADV)
8462 || CHECK_FLAG(p->af_cap[afi][safi],
8463 PEER_CAP_ORF_PREFIX_RM_RCV)) {
8464 vty_out(vty,
8465 " Outbound Route Filter (ORF) type (%d) Prefix-list:\n",
8466 ORF_TYPE_PREFIX);
8467 bgp_show_peer_afi_orf_cap(
8468 vty, p, afi, safi, PEER_CAP_ORF_PREFIX_SM_ADV,
8469 PEER_CAP_ORF_PREFIX_RM_ADV,
8470 PEER_CAP_ORF_PREFIX_SM_RCV,
8471 PEER_CAP_ORF_PREFIX_RM_RCV, use_json, NULL);
8472 }
8473 if (CHECK_FLAG(p->af_cap[afi][safi], PEER_CAP_ORF_PREFIX_SM_ADV)
8474 || CHECK_FLAG(p->af_cap[afi][safi],
8475 PEER_CAP_ORF_PREFIX_SM_OLD_RCV)
8476 || CHECK_FLAG(p->af_cap[afi][safi],
8477 PEER_CAP_ORF_PREFIX_RM_ADV)
8478 || CHECK_FLAG(p->af_cap[afi][safi],
8479 PEER_CAP_ORF_PREFIX_RM_OLD_RCV)) {
8480 vty_out(vty,
8481 " Outbound Route Filter (ORF) type (%d) Prefix-list:\n",
8482 ORF_TYPE_PREFIX_OLD);
8483 bgp_show_peer_afi_orf_cap(
8484 vty, p, afi, safi, PEER_CAP_ORF_PREFIX_SM_ADV,
8485 PEER_CAP_ORF_PREFIX_RM_ADV,
8486 PEER_CAP_ORF_PREFIX_SM_OLD_RCV,
8487 PEER_CAP_ORF_PREFIX_RM_OLD_RCV, use_json, NULL);
8488 }
8489
8490 sprintf(orf_pfx_name, "%s.%d.%d", p->host, afi, safi);
8491 orf_pfx_count = prefix_bgp_show_prefix_list(
8492 NULL, afi, orf_pfx_name, use_json);
8493
8494 if (CHECK_FLAG(p->af_sflags[afi][safi],
8495 PEER_STATUS_ORF_PREFIX_SEND)
8496 || orf_pfx_count) {
8497 vty_out(vty, " Outbound Route Filter (ORF):");
8498 if (CHECK_FLAG(p->af_sflags[afi][safi],
8499 PEER_STATUS_ORF_PREFIX_SEND))
8500 vty_out(vty, " sent;");
8501 if (orf_pfx_count)
8502 vty_out(vty, " received (%d entries)",
8503 orf_pfx_count);
8504 vty_out(vty, "\n");
8505 }
8506 if (CHECK_FLAG(p->af_sflags[afi][safi],
8507 PEER_STATUS_ORF_WAIT_REFRESH))
8508 vty_out(vty,
8509 " First update is deferred until ORF or ROUTE-REFRESH is received\n");
8510
8511 if (CHECK_FLAG(p->af_flags[afi][safi],
8512 PEER_FLAG_REFLECTOR_CLIENT))
8513 vty_out(vty, " Route-Reflector Client\n");
8514 if (CHECK_FLAG(p->af_flags[afi][safi],
8515 PEER_FLAG_RSERVER_CLIENT))
8516 vty_out(vty, " Route-Server Client\n");
8517 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_SOFT_RECONFIG))
8518 vty_out(vty,
8519 " Inbound soft reconfiguration allowed\n");
8520
8521 if (CHECK_FLAG(p->af_flags[afi][safi],
8522 PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE))
8523 vty_out(vty,
8524 " Private AS numbers (all) replaced in updates to this neighbor\n");
8525 else if (CHECK_FLAG(p->af_flags[afi][safi],
8526 PEER_FLAG_REMOVE_PRIVATE_AS_REPLACE))
8527 vty_out(vty,
8528 " Private AS numbers replaced in updates to this neighbor\n");
8529 else if (CHECK_FLAG(p->af_flags[afi][safi],
8530 PEER_FLAG_REMOVE_PRIVATE_AS_ALL))
8531 vty_out(vty,
8532 " Private AS numbers (all) removed in updates to this neighbor\n");
8533 else if (CHECK_FLAG(p->af_flags[afi][safi],
8534 PEER_FLAG_REMOVE_PRIVATE_AS))
8535 vty_out(vty,
8536 " Private AS numbers removed in updates to this neighbor\n");
8537
8538 if (CHECK_FLAG(p->af_flags[afi][safi],
8539 PEER_FLAG_ADDPATH_TX_ALL_PATHS))
8540 vty_out(vty, " Advertise all paths via addpath\n");
8541
8542 if (CHECK_FLAG(p->af_flags[afi][safi],
8543 PEER_FLAG_ADDPATH_TX_BESTPATH_PER_AS))
8544 vty_out(vty,
8545 " Advertise bestpath per AS via addpath\n");
8546
8547 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_AS_OVERRIDE))
8548 vty_out(vty,
8549 " Override ASNs in outbound updates if aspath equals remote-as\n");
8550
8551 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_NEXTHOP_SELF)
8552 || CHECK_FLAG(p->af_flags[afi][safi],
8553 PEER_FLAG_FORCE_NEXTHOP_SELF))
8554 vty_out(vty, " NEXT_HOP is always this router\n");
8555 if (CHECK_FLAG(p->af_flags[afi][safi],
8556 PEER_FLAG_AS_PATH_UNCHANGED))
8557 vty_out(vty,
8558 " AS_PATH is propagated unchanged to this neighbor\n");
8559 if (CHECK_FLAG(p->af_flags[afi][safi],
8560 PEER_FLAG_NEXTHOP_UNCHANGED))
8561 vty_out(vty,
8562 " NEXT_HOP is propagated unchanged to this neighbor\n");
8563 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_MED_UNCHANGED))
8564 vty_out(vty,
8565 " MED is propagated unchanged to this neighbor\n");
8566 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_SEND_COMMUNITY)
8567 || CHECK_FLAG(p->af_flags[afi][safi],
8568 PEER_FLAG_SEND_EXT_COMMUNITY)
8569 || CHECK_FLAG(p->af_flags[afi][safi],
8570 PEER_FLAG_SEND_LARGE_COMMUNITY)) {
8571 vty_out(vty,
8572 " Community attribute sent to this neighbor");
8573 if (CHECK_FLAG(p->af_flags[afi][safi],
8574 PEER_FLAG_SEND_COMMUNITY)
8575 && CHECK_FLAG(p->af_flags[afi][safi],
8576 PEER_FLAG_SEND_EXT_COMMUNITY)
8577 && CHECK_FLAG(p->af_flags[afi][safi],
8578 PEER_FLAG_SEND_LARGE_COMMUNITY))
8579 vty_out(vty, "(all)\n");
8580 else if (CHECK_FLAG(p->af_flags[afi][safi],
8581 PEER_FLAG_SEND_LARGE_COMMUNITY))
8582 vty_out(vty, "(large)\n");
8583 else if (CHECK_FLAG(p->af_flags[afi][safi],
8584 PEER_FLAG_SEND_EXT_COMMUNITY))
8585 vty_out(vty, "(extended)\n");
8586 else
8587 vty_out(vty, "(standard)\n");
8588 }
8589 if (CHECK_FLAG(p->af_flags[afi][safi],
8590 PEER_FLAG_DEFAULT_ORIGINATE)) {
8591 vty_out(vty, " Default information originate,");
8592
8593 if (p->default_rmap[afi][safi].name)
8594 vty_out(vty, " default route-map %s%s,",
8595 p->default_rmap[afi][safi].map ? "*"
8596 : "",
8597 p->default_rmap[afi][safi].name);
8598 if (paf && PAF_SUBGRP(paf)
8599 && CHECK_FLAG(PAF_SUBGRP(paf)->sflags,
8600 SUBGRP_STATUS_DEFAULT_ORIGINATE))
8601 vty_out(vty, " default sent\n");
8602 else
8603 vty_out(vty, " default not sent\n");
8604 }
8605
dff8f48d
MK		 8606 /* advertise-vni-all */
8607 if (afi == AFI_L2VPN && safi == SAFI_EVPN) {
94c2f693 8608 if (is_evpn_enabled())
dff8f48d
MK		 8609 vty_out(vty, " advertise-all-vni\n");
8610 }
8611
d62a17ae 8612 if (filter->plist[FILTER_IN].name
8613 || filter->dlist[FILTER_IN].name
8614 || filter->aslist[FILTER_IN].name
8615 || filter->map[RMAP_IN].name)
8616 vty_out(vty, " Inbound path policy configured\n");
8617 if (filter->plist[FILTER_OUT].name
8618 || filter->dlist[FILTER_OUT].name
8619 || filter->aslist[FILTER_OUT].name
8620 || filter->map[RMAP_OUT].name || filter->usmap.name)
8621 vty_out(vty, " Outbound path policy configured\n");
8622
8623 /* prefix-list */
8624 if (filter->plist[FILTER_IN].name)
8625 vty_out(vty,
8626 " Incoming update prefix filter list is %s%s\n",
8627 filter->plist[FILTER_IN].plist ? "*" : "",
8628 filter->plist[FILTER_IN].name);
8629 if (filter->plist[FILTER_OUT].name)
8630 vty_out(vty,
8631 " Outgoing update prefix filter list is %s%s\n",
8632 filter->plist[FILTER_OUT].plist ? "*" : "",
8633 filter->plist[FILTER_OUT].name);
8634
8635 /* distribute-list */
8636 if (filter->dlist[FILTER_IN].name)
8637 vty_out(vty,
8638 " Incoming update network filter list is %s%s\n",
8639 filter->dlist[FILTER_IN].alist ? "*" : "",
8640 filter->dlist[FILTER_IN].name);
8641 if (filter->dlist[FILTER_OUT].name)
8642 vty_out(vty,
8643 " Outgoing update network filter list is %s%s\n",
8644 filter->dlist[FILTER_OUT].alist ? "*" : "",
8645 filter->dlist[FILTER_OUT].name);
8646
8647 /* filter-list. */
8648 if (filter->aslist[FILTER_IN].name)
8649 vty_out(vty,
8650 " Incoming update AS path filter list is %s%s\n",
8651 filter->aslist[FILTER_IN].aslist ? "*" : "",
8652 filter->aslist[FILTER_IN].name);
8653 if (filter->aslist[FILTER_OUT].name)
8654 vty_out(vty,
8655 " Outgoing update AS path filter list is %s%s\n",
8656 filter->aslist[FILTER_OUT].aslist ? "*" : "",
8657 filter->aslist[FILTER_OUT].name);
8658
8659 /* route-map. */
8660 if (filter->map[RMAP_IN].name)
8661 vty_out(vty,
8662 " Route map for incoming advertisements is %s%s\n",
8663 filter->map[RMAP_IN].map ? "*" : "",
8664 filter->map[RMAP_IN].name);
8665 if (filter->map[RMAP_OUT].name)
8666 vty_out(vty,
8667 " Route map for outgoing advertisements is %s%s\n",
8668 filter->map[RMAP_OUT].map ? "*" : "",
8669 filter->map[RMAP_OUT].name);
8670
8671 /* unsuppress-map */
8672 if (filter->usmap.name)
8673 vty_out(vty,
8674 " Route map for selective unsuppress is %s%s\n",
8675 filter->usmap.map ? "*" : "",
8676 filter->usmap.name);
8677
8678 /* Receive prefix count */
8679 vty_out(vty, " %ld accepted prefixes\n", p->pcount[afi][safi]);
8680
8681 /* Maximum prefix */
8682 if (CHECK_FLAG(p->af_flags[afi][safi], PEER_FLAG_MAX_PREFIX)) {
8683 vty_out(vty, " Maximum prefixes allowed %ld%s\n",
8684 p->pmax[afi][safi],
8685 CHECK_FLAG(p->af_flags[afi][safi],
8686 PEER_FLAG_MAX_PREFIX_WARNING)
8687 ? " (warning-only)"
8688 : "");
8689 vty_out(vty, " Threshold for warning message %d%%",
8690 p->pmax_threshold[afi][safi]);
8691 if (p->pmax_restart[afi][safi])
8692 vty_out(vty, ", restart interval %d min",
8693 p->pmax_restart[afi][safi]);
8694 vty_out(vty, "\n");
8695 }
8696
8697 vty_out(vty, "\n");
8698 }
8699}
8700
d7c0a89a 8701static void bgp_show_peer(struct vty *vty, struct peer *p, uint8_t use_json,
d62a17ae 8702 json_object *json)
718e3744 8703{
d62a17ae 8704 struct bgp *bgp;
8705 char buf1[PREFIX2STR_BUFFER], buf[SU_ADDRSTRLEN];
8706 char timebuf[BGP_UPTIME_LEN];
8707 char dn_flag[2];
8708 const char *subcode_str;
8709 const char *code_str;
8710 afi_t afi;
8711 safi_t safi;
d7c0a89a
QY		 8712 uint16_t i;
8713 uint8_t *msg;
d62a17ae 8714 json_object *json_neigh = NULL;
8715 time_t epoch_tbuf;
718e3744 8716
d62a17ae 8717 bgp = p->bgp;
8718
8719 if (use_json)
8720 json_neigh = json_object_new_object();
8721
8722 memset(dn_flag, '\0', sizeof(dn_flag));
8723 if (!p->conf_if && peer_dynamic_neighbor(p))
8724 dn_flag[0] = '*';
8725
8726 if (!use_json) {
8727 if (p->conf_if) /* Configured interface name. */
8728 vty_out(vty, "BGP neighbor on %s: %s, ", p->conf_if,
8729 BGP_PEER_SU_UNSPEC(p)
8730 ? "None"
8731 : sockunion2str(&p->su, buf,
8732 SU_ADDRSTRLEN));
8733 else /* Configured IP address. */
8734 vty_out(vty, "BGP neighbor is %s%s, ", dn_flag,
8735 p->host);
8736 }
8737
8738 if (use_json) {
8739 if (p->conf_if && BGP_PEER_SU_UNSPEC(p))
8740 json_object_string_add(json_neigh, "bgpNeighborAddr",
8741 "none");
8742 else if (p->conf_if && !BGP_PEER_SU_UNSPEC(p))
8743 json_object_string_add(
8744 json_neigh, "bgpNeighborAddr",
8745 sockunion2str(&p->su, buf, SU_ADDRSTRLEN));
8746
8747 json_object_int_add(json_neigh, "remoteAs", p->as);
8748
8749 if (p->change_local_as)
8750 json_object_int_add(json_neigh, "localAs",
8751 p->change_local_as);
8752 else
8753 json_object_int_add(json_neigh, "localAs", p->local_as);
8754
8755 if (CHECK_FLAG(p->flags, PEER_FLAG_LOCAL_AS_NO_PREPEND))
8756 json_object_boolean_true_add(json_neigh,
8757 "localAsNoPrepend");
8758
8759 if (CHECK_FLAG(p->flags, PEER_FLAG_LOCAL_AS_REPLACE_AS))
8760 json_object_boolean_true_add(json_neigh,
8761 "localAsReplaceAs");
8762 } else {
8763 if ((p->as_type == AS_SPECIFIED) || (p->as_type == AS_EXTERNAL)
8764 || (p->as_type == AS_INTERNAL))
8765 vty_out(vty, "remote AS %u, ", p->as);
8766 else
8767 vty_out(vty, "remote AS Unspecified, ");
8768 vty_out(vty, "local AS %u%s%s, ",
8769 p->change_local_as ? p->change_local_as : p->local_as,
8770 CHECK_FLAG(p->flags, PEER_FLAG_LOCAL_AS_NO_PREPEND)
8771 ? " no-prepend"
8772 : "",
8773 CHECK_FLAG(p->flags, PEER_FLAG_LOCAL_AS_REPLACE_AS)
8774 ? " replace-as"
8775 : "");
8776 }
8777 /* peer type internal, external, confed-internal or confed-external */
8778 if (p->as == p->local_as) {
8779 if (use_json) {
8780 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION))
8781 json_object_boolean_true_add(
8782 json_neigh, "nbrConfedInternalLink");
8783 else
8784 json_object_boolean_true_add(json_neigh,
8785 "nbrInternalLink");
8786 } else {
8787 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION))
8788 vty_out(vty, "confed-internal link\n");
8789 else
8790 vty_out(vty, "internal link\n");
8791 }
8792 } else {
8793 if (use_json) {
8794 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION))
8795 json_object_boolean_true_add(
8796 json_neigh, "nbrConfedExternalLink");
8797 else
8798 json_object_boolean_true_add(json_neigh,
8799 "nbrExternalLink");
8800 } else {
8801 if (bgp_confederation_peers_check(bgp, p->as))
8802 vty_out(vty, "confed-external link\n");
8803 else
8804 vty_out(vty, "external link\n");
8805 }
8806 }
8807
8808 /* Description. */
8809 if (p->desc) {
8810 if (use_json)
8811 json_object_string_add(json_neigh, "nbrDesc", p->desc);
8812 else
8813 vty_out(vty, " Description: %s\n", p->desc);
8814 }
8815
8816 if (p->hostname) {
8817 if (use_json) {
8818 if (p->hostname)
8819 json_object_string_add(json_neigh, "hostname",
8820 p->hostname);
8821
8822 if (p->domainname)
8823 json_object_string_add(json_neigh, "domainname",
8824 p->domainname);
8825 } else {
8826 if (p->domainname && (p->domainname[0] != '\0'))
8827 vty_out(vty, "Hostname: %s.%s\n", p->hostname,
8828 p->domainname);
8829 else
8830 vty_out(vty, "Hostname: %s\n", p->hostname);
8831 }
8832 }
8833
8834 /* Peer-group */
8835 if (p->group) {
8836 if (use_json) {
8837 json_object_string_add(json_neigh, "peerGroup",
8838 p->group->name);
8839
8840 if (dn_flag[0]) {
8841 struct prefix prefix, *range = NULL;
8842
8843 sockunion2hostprefix(&(p->su), &prefix);
8844 range = peer_group_lookup_dynamic_neighbor_range(
8845 p->group, &prefix);
8846
8847 if (range) {
8848 prefix2str(range, buf1, sizeof(buf1));
8849 json_object_string_add(
8850 json_neigh,
8851 "peerSubnetRangeGroup", buf1);
8852 }
8853 }
8854 } else {
8855 vty_out(vty,
8856 " Member of peer-group %s for session parameters\n",
8857 p->group->name);
8858
8859 if (dn_flag[0]) {
8860 struct prefix prefix, *range = NULL;
8861
8862 sockunion2hostprefix(&(p->su), &prefix);
8863 range = peer_group_lookup_dynamic_neighbor_range(
8864 p->group, &prefix);
8865
8866 if (range) {
8867 prefix2str(range, buf1, sizeof(buf1));
8868 vty_out(vty,
8869 " Belongs to the subnet range group: %s\n",
8870 buf1);
8871 }
8872 }
8873 }
8874 }
8875
8876 if (use_json) {
8877 /* Administrative shutdown. */
8878 if (CHECK_FLAG(p->flags, PEER_FLAG_SHUTDOWN))
8879 json_object_boolean_true_add(json_neigh,
8880 "adminShutDown");
8881
8882 /* BGP Version. */
8883 json_object_int_add(json_neigh, "bgpVersion", 4);
8884 json_object_string_add(
8885 json_neigh, "remoteRouterId",
8886 inet_ntop(AF_INET, &p->remote_id, buf1, sizeof(buf1)));
8887
8888 /* Confederation */
8889 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION)
8890 && bgp_confederation_peers_check(bgp, p->as))
8891 json_object_boolean_true_add(json_neigh,
8892 "nbrCommonAdmin");
8893
8894 /* Status. */
8895 json_object_string_add(
8896 json_neigh, "bgpState",
8897 lookup_msg(bgp_status_msg, p->status, NULL));
8898
8899 if (p->status == Established) {
8900 time_t uptime;
d62a17ae 8901
8902 uptime = bgp_clock();
8903 uptime -= p->uptime;
d62a17ae 8904 epoch_tbuf = time(NULL) - uptime;
8905
e24be241 8906#if defined(VERSION_TYPE_DEV) && CONFDATE > 20200101
a4d82a8a
PZ		 8907 CPP_NOTICE(
8908 "bgpTimerUp should be deprecated and can be removed now");
d3c7efed
DS		 8909#endif
8910 /*
8911 * bgpTimerUp was miliseconds that was accurate
8912 * up to 1 day, then the value returned
8913 * became garbage. So in order to provide
8914 * some level of backwards compatability,
8915 * we still provde the data, but now
8916 * we are returning the correct value
8917 * and also adding a new bgpTimerUpMsec
8918 * which will allow us to deprecate
8919 * this eventually
8920 */
d62a17ae 8921 json_object_int_add(json_neigh, "bgpTimerUp",
e0330274 8922 uptime * 1000);
d3c7efed
DS		 8923 json_object_int_add(json_neigh, "bgpTimerUpMsec",
8924 uptime * 1000);
d62a17ae 8925 json_object_string_add(json_neigh, "bgpTimerUpString",
8926 peer_uptime(p->uptime, timebuf,
8927 BGP_UPTIME_LEN, 0,
8928 NULL));
8929 json_object_int_add(json_neigh,
8930 "bgpTimerUpEstablishedEpoch",
8931 epoch_tbuf);
8932 }
8933
8934 else if (p->status == Active) {
8935 if (CHECK_FLAG(p->flags, PEER_FLAG_PASSIVE))
8936 json_object_string_add(json_neigh, "bgpStateIs",
8937 "passive");
8938 else if (CHECK_FLAG(p->sflags, PEER_STATUS_NSF_WAIT))
8939 json_object_string_add(json_neigh, "bgpStateIs",
8940 "passiveNSF");
8941 }
8942
8943 /* read timer */
8944 time_t uptime;
8945 struct tm *tm;
8946
8947 uptime = bgp_clock();
8948 uptime -= p->readtime;
8949 tm = gmtime(&uptime);
8950 json_object_int_add(json_neigh, "bgpTimerLastRead",
8951 (tm->tm_sec * 1000) + (tm->tm_min * 60000)
8952 + (tm->tm_hour * 3600000));
8953
8954 uptime = bgp_clock();
8955 uptime -= p->last_write;
8956 tm = gmtime(&uptime);
8957 json_object_int_add(json_neigh, "bgpTimerLastWrite",
8958 (tm->tm_sec * 1000) + (tm->tm_min * 60000)
8959 + (tm->tm_hour * 3600000));
8960
8961 uptime = bgp_clock();
8962 uptime -= p->update_time;
8963 tm = gmtime(&uptime);
8964 json_object_int_add(json_neigh, "bgpInUpdateElapsedTimeMsecs",
8965 (tm->tm_sec * 1000) + (tm->tm_min * 60000)
8966 + (tm->tm_hour * 3600000));
8967
8968 /* Configured timer values. */
8969 json_object_int_add(json_neigh, "bgpTimerHoldTimeMsecs",
8970 p->v_holdtime * 1000);
8971 json_object_int_add(json_neigh,
8972 "bgpTimerKeepAliveIntervalMsecs",
8973 p->v_keepalive * 1000);
8974
d25e4efc 8975 if (PEER_OR_GROUP_TIMER_SET(p)) {
d62a17ae 8976 json_object_int_add(json_neigh,
8977 "bgpTimerConfiguredHoldTimeMsecs",
8978 p->holdtime * 1000);
8979 json_object_int_add(
8980 json_neigh,
8981 "bgpTimerConfiguredKeepAliveIntervalMsecs",
8982 p->keepalive * 1000);
d25e4efc 8983 } else if ((bgp->default_holdtime != BGP_DEFAULT_HOLDTIME)
a4d82a8a
PZ		 8984 || (bgp->default_keepalive
8985 != BGP_DEFAULT_KEEPALIVE)) {
d25e4efc
DS		 8986 json_object_int_add(json_neigh,
8987 "bgpTimerConfiguredHoldTimeMsecs",
8988 bgp->default_holdtime);
8989 json_object_int_add(
8990 json_neigh,
8991 "bgpTimerConfiguredKeepAliveIntervalMsecs",
8992 bgp->default_keepalive);
d62a17ae 8993 }
8994 } else {
8995 /* Administrative shutdown. */
8996 if (CHECK_FLAG(p->flags, PEER_FLAG_SHUTDOWN))
8997 vty_out(vty, " Administratively shut down\n");
8998
8999 /* BGP Version. */
9000 vty_out(vty, " BGP version 4");
9001 vty_out(vty, ", remote router ID %s\n",
9002 inet_ntop(AF_INET, &p->remote_id, buf1, sizeof(buf1)));
9003
9004 /* Confederation */
9005 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION)
9006 && bgp_confederation_peers_check(bgp, p->as))
9007 vty_out(vty,
9008 " Neighbor under common administration\n");
9009
9010 /* Status. */
9011 vty_out(vty, " BGP state = %s",
9012 lookup_msg(bgp_status_msg, p->status, NULL));
9013
9014 if (p->status == Established)
9015 vty_out(vty, ", up for %8s",
9016 peer_uptime(p->uptime, timebuf, BGP_UPTIME_LEN,
9017 0, NULL));
9018
9019 else if (p->status == Active) {
9020 if (CHECK_FLAG(p->flags, PEER_FLAG_PASSIVE))
9021 vty_out(vty, " (passive)");
9022 else if (CHECK_FLAG(p->sflags, PEER_STATUS_NSF_WAIT))
9023 vty_out(vty, " (NSF passive)");
9024 }
9025 vty_out(vty, "\n");
9026
9027 /* read timer */
9028 vty_out(vty, " Last read %s",
9029 peer_uptime(p->readtime, timebuf, BGP_UPTIME_LEN, 0,
9030 NULL));
9031 vty_out(vty, ", Last write %s\n",
9032 peer_uptime(p->last_write, timebuf, BGP_UPTIME_LEN, 0,
9033 NULL));
9034
9035 /* Configured timer values. */
9036 vty_out(vty,
9037 " Hold time is %d, keepalive interval is %d seconds\n",
9038 p->v_holdtime, p->v_keepalive);
d25e4efc 9039 if (PEER_OR_GROUP_TIMER_SET(p)) {
d62a17ae 9040 vty_out(vty, " Configured hold time is %d",
9041 p->holdtime);
9042 vty_out(vty, ", keepalive interval is %d seconds\n",
9043 p->keepalive);
d25e4efc 9044 } else if ((bgp->default_holdtime != BGP_DEFAULT_HOLDTIME)
a4d82a8a
PZ		 9045 || (bgp->default_keepalive
9046 != BGP_DEFAULT_KEEPALIVE)) {
d25e4efc
DS		 9047 vty_out(vty, " Configured hold time is %d",
9048 bgp->default_holdtime);
9049 vty_out(vty, ", keepalive interval is %d seconds\n",
9050 bgp->default_keepalive);
d62a17ae 9051 }
9052 }
9053 /* Capability. */
9054 if (p->status == Established) {
9055 if (p->cap || p->afc_adv[AFI_IP][SAFI_UNICAST]
9056 || p->afc_recv[AFI_IP][SAFI_UNICAST]
9057 || p->afc_adv[AFI_IP][SAFI_MULTICAST]
9058 || p->afc_recv[AFI_IP][SAFI_MULTICAST]
9059 || p->afc_adv[AFI_IP6][SAFI_UNICAST]
9060 || p->afc_recv[AFI_IP6][SAFI_UNICAST]
9061 || p->afc_adv[AFI_IP6][SAFI_MULTICAST]
9062 || p->afc_recv[AFI_IP6][SAFI_MULTICAST]
9063 || p->afc_adv[AFI_IP6][SAFI_MPLS_VPN]
9064 || p->afc_recv[AFI_IP6][SAFI_MPLS_VPN]
9065 || p->afc_adv[AFI_IP6][SAFI_ENCAP]
9066 || p->afc_recv[AFI_IP6][SAFI_ENCAP]
7c40bf39 9067 || p->afc_adv[AFI_IP6][SAFI_FLOWSPEC]
9068 || p->afc_recv[AFI_IP6][SAFI_FLOWSPEC]
d62a17ae 9069 || p->afc_adv[AFI_IP][SAFI_ENCAP]
9070 || p->afc_recv[AFI_IP][SAFI_ENCAP]
7c40bf39 9071 || p->afc_adv[AFI_IP][SAFI_FLOWSPEC]
9072 || p->afc_recv[AFI_IP][SAFI_FLOWSPEC]
d62a17ae 9073 || p->afc_adv[AFI_IP][SAFI_MPLS_VPN]
9074 || p->afc_recv[AFI_IP][SAFI_MPLS_VPN]) {
9075 if (use_json) {
9076 json_object *json_cap = NULL;
9077
9078 json_cap = json_object_new_object();
9079
9080 /* AS4 */
9081 if (CHECK_FLAG(p->cap, PEER_CAP_AS4_RCV)
9082 || CHECK_FLAG(p->cap, PEER_CAP_AS4_ADV)) {
9083 if (CHECK_FLAG(p->cap, PEER_CAP_AS4_ADV)
9084 && CHECK_FLAG(p->cap,
9085 PEER_CAP_AS4_RCV))
9086 json_object_string_add(
9087 json_cap, "4byteAs",
9088 "advertisedAndReceived");
9089 else if (CHECK_FLAG(p->cap,
9090 PEER_CAP_AS4_ADV))
9091 json_object_string_add(
9092 json_cap, "4byteAs",
9093 "advertised");
9094 else if (CHECK_FLAG(p->cap,
9095 PEER_CAP_AS4_RCV))
9096 json_object_string_add(
9097 json_cap, "4byteAs",
9098 "received");
9099 }
9100
9101 /* AddPath */
9102 if (CHECK_FLAG(p->cap, PEER_CAP_ADDPATH_RCV)
9103 || CHECK_FLAG(p->cap,
9104 PEER_CAP_ADDPATH_ADV)) {
9105 json_object *json_add = NULL;
9106 const char *print_store;
9107
9108 json_add = json_object_new_object();
9109
05c7a1cc
QY		 9110 FOREACH_AFI_SAFI (afi, safi) {
9111 json_object *json_sub = NULL;
9112 json_sub =
9113 json_object_new_object();
9114 print_store = afi_safi_print(
9115 afi, safi);
d62a17ae 9116
05c7a1cc
QY		 9117 if (CHECK_FLAG(
9118 p->af_cap[afi]
9119 [safi],
9120 PEER_CAP_ADDPATH_AF_TX_ADV)
9121 || CHECK_FLAG(
9122 p->af_cap[afi]
9123 [safi],
9124 PEER_CAP_ADDPATH_AF_TX_RCV)) {
d62a17ae 9125 if (CHECK_FLAG(
9126 p->af_cap
9127 [afi]
9128 [safi],
9129 PEER_CAP_ADDPATH_AF_TX_ADV)
05c7a1cc 9130 && CHECK_FLAG(
d62a17ae 9131 p->af_cap
9132 [afi]
9133 [safi],
05c7a1cc
QY		 9134 PEER_CAP_ADDPATH_AF_TX_RCV))
9135 json_object_boolean_true_add(
9136 json_sub,
9137 "txAdvertisedAndReceived");
9138 else if (
9139 CHECK_FLAG(
9140 p->af_cap
9141 [afi]
9142 [safi],
9143 PEER_CAP_ADDPATH_AF_TX_ADV))
9144 json_object_boolean_true_add(
9145 json_sub,
9146 "txAdvertised");
9147 else if (
9148 CHECK_FLAG(
9149 p->af_cap
9150 [afi]
9151 [safi],
9152 PEER_CAP_ADDPATH_AF_TX_RCV))
9153 json_object_boolean_true_add(
9154 json_sub,
9155 "txReceived");
9156 }
d62a17ae 9157
05c7a1cc
QY		 9158 if (CHECK_FLAG(
9159 p->af_cap[afi]
9160 [safi],
9161 PEER_CAP_ADDPATH_AF_RX_ADV)
9162 || CHECK_FLAG(
9163 p->af_cap[afi]
9164 [safi],
9165 PEER_CAP_ADDPATH_AF_RX_RCV)) {
d62a17ae 9166 if (CHECK_FLAG(
9167 p->af_cap
9168 [afi]
9169 [safi],
9170 PEER_CAP_ADDPATH_AF_RX_ADV)
05c7a1cc 9171 && CHECK_FLAG(
d62a17ae 9172 p->af_cap
9173 [afi]
9174 [safi],
9175 PEER_CAP_ADDPATH_AF_RX_RCV))
05c7a1cc
QY		 9176 json_object_boolean_true_add(
9177 json_sub,
9178 "rxAdvertisedAndReceived");
9179 else if (
9180 CHECK_FLAG(
9181 p->af_cap
9182 [afi]
9183 [safi],
9184 PEER_CAP_ADDPATH_AF_RX_ADV))
9185 json_object_boolean_true_add(
9186 json_sub,
9187 "rxAdvertised");
9188 else if (
9189 CHECK_FLAG(
9190 p->af_cap
9191 [afi]
9192 [safi],
9193 PEER_CAP_ADDPATH_AF_RX_RCV))
9194 json_object_boolean_true_add(
9195 json_sub,
9196 "rxReceived");
d62a17ae 9197 }
9198
05c7a1cc
QY		 9199 if (CHECK_FLAG(
9200 p->af_cap[afi]
9201 [safi],
9202 PEER_CAP_ADDPATH_AF_TX_ADV)
9203 || CHECK_FLAG(
9204 p->af_cap[afi]
9205 [safi],
9206 PEER_CAP_ADDPATH_AF_TX_RCV)
9207 || CHECK_FLAG(
9208 p->af_cap[afi]
9209 [safi],
9210 PEER_CAP_ADDPATH_AF_RX_ADV)
9211 || CHECK_FLAG(
9212 p->af_cap[afi]
9213 [safi],
9214 PEER_CAP_ADDPATH_AF_RX_RCV))
9215 json_object_object_add(
9216 json_add,
9217 print_store,
9218 json_sub);
9219 else
9220 json_object_free(
9221 json_sub);
9222 }
9223
d62a17ae 9224 json_object_object_add(
9225 json_cap, "addPath", json_add);
9226 }
9227
9228 /* Dynamic */
9229 if (CHECK_FLAG(p->cap, PEER_CAP_DYNAMIC_RCV)
9230 || CHECK_FLAG(p->cap,
9231 PEER_CAP_DYNAMIC_ADV)) {
9232 if (CHECK_FLAG(p->cap,
9233 PEER_CAP_DYNAMIC_ADV)
9234 && CHECK_FLAG(p->cap,
9235 PEER_CAP_DYNAMIC_RCV))
9236 json_object_string_add(
9237 json_cap, "dynamic",
9238 "advertisedAndReceived");
9239 else if (CHECK_FLAG(
9240 p->cap,
9241 PEER_CAP_DYNAMIC_ADV))
9242 json_object_string_add(
9243 json_cap, "dynamic",
9244 "advertised");
9245 else if (CHECK_FLAG(
9246 p->cap,
9247 PEER_CAP_DYNAMIC_RCV))
9248 json_object_string_add(
9249 json_cap, "dynamic",
9250 "received");
9251 }
9252
9253 /* Extended nexthop */
9254 if (CHECK_FLAG(p->cap, PEER_CAP_ENHE_RCV)
9255 || CHECK_FLAG(p->cap, PEER_CAP_ENHE_ADV)) {
9256 json_object *json_nxt = NULL;
9257 const char *print_store;
9258
9259
9260 if (CHECK_FLAG(p->cap,
9261 PEER_CAP_ENHE_ADV)
9262 && CHECK_FLAG(p->cap,
9263 PEER_CAP_ENHE_RCV))
9264 json_object_string_add(
9265 json_cap,
9266 "extendedNexthop",
9267 "advertisedAndReceived");
9268 else if (CHECK_FLAG(p->cap,
9269 PEER_CAP_ENHE_ADV))
9270 json_object_string_add(
9271 json_cap,
9272 "extendedNexthop",
9273 "advertised");
9274 else if (CHECK_FLAG(p->cap,
9275 PEER_CAP_ENHE_RCV))
9276 json_object_string_add(
9277 json_cap,
9278 "extendedNexthop",
9279 "received");
9280
9281 if (CHECK_FLAG(p->cap,
9282 PEER_CAP_ENHE_RCV)) {
9283 json_nxt =
9284 json_object_new_object();
9285
9286 for (safi = SAFI_UNICAST;
9287 safi < SAFI_MAX; safi++) {
9288 if (CHECK_FLAG(
9289 p->af_cap
9290 [AFI_IP]
9291 [safi],
9292 PEER_CAP_ENHE_AF_RCV)) {
9293 print_store = afi_safi_print(
9294 AFI_IP,
9295 safi);
9296 json_object_string_add(
9297 json_nxt,
9298 print_store,
9299 "recieved");
9300 }
9301 }
9302 json_object_object_add(
9303 json_cap,
9304 "extendedNexthopFamililesByPeer",
9305 json_nxt);
9306 }
9307 }
9308
9309 /* Route Refresh */
9310 if (CHECK_FLAG(p->cap, PEER_CAP_REFRESH_ADV)
9311 || CHECK_FLAG(p->cap,
9312 PEER_CAP_REFRESH_NEW_RCV)
9313 || CHECK_FLAG(p->cap,
9314 PEER_CAP_REFRESH_OLD_RCV)) {
9315 if (CHECK_FLAG(p->cap,
9316 PEER_CAP_REFRESH_ADV)
9317 && (CHECK_FLAG(
9318 p->cap,
9319 PEER_CAP_REFRESH_NEW_RCV)
9320 || CHECK_FLAG(
9321 p->cap,
9322 PEER_CAP_REFRESH_OLD_RCV))) {
9323 if (CHECK_FLAG(
9324 p->cap,
9325 PEER_CAP_REFRESH_OLD_RCV)
9326 && CHECK_FLAG(
9327 p->cap,
9328 PEER_CAP_REFRESH_NEW_RCV))
9329 json_object_string_add(
9330 json_cap,
9331 "routeRefresh",
9332 "advertisedAndReceivedOldNew");
9333 else {
9334 if (CHECK_FLAG(
9335 p->cap,
9336 PEER_CAP_REFRESH_OLD_RCV))
9337 json_object_string_add(
9338 json_cap,
9339 "routeRefresh",
9340 "advertisedAndReceivedOld");
9341 else
9342 json_object_string_add(
9343 json_cap,
9344 "routeRefresh",
9345 "advertisedAndReceivedNew");
9346 }
9347 } else if (
9348 CHECK_FLAG(
9349 p->cap,
9350 PEER_CAP_REFRESH_ADV))
9351 json_object_string_add(
9352 json_cap,
9353 "routeRefresh",
9354 "advertised");
9355 else if (
9356 CHECK_FLAG(
9357 p->cap,
9358 PEER_CAP_REFRESH_NEW_RCV)
9359 || CHECK_FLAG(
9360 p->cap,
9361 PEER_CAP_REFRESH_OLD_RCV))
9362 json_object_string_add(
9363 json_cap,
9364 "routeRefresh",
9365 "received");
9366 }
9367
9368 /* Multiprotocol Extensions */
9369 json_object *json_multi = NULL;
9370 json_multi = json_object_new_object();
9371
05c7a1cc
QY		 9372 FOREACH_AFI_SAFI (afi, safi) {
9373 if (p->afc_adv[afi][safi]
9374 || p->afc_recv[afi][safi]) {
9375 json_object *json_exten = NULL;
9376 json_exten =
9377 json_object_new_object();
9378
d62a17ae 9379 if (p->afc_adv[afi][safi]
05c7a1cc
QY		 9380 && p->afc_recv[afi][safi])
9381 json_object_boolean_true_add(
9382 json_exten,
9383 "advertisedAndReceived");
9384 else if (p->afc_adv[afi][safi])
9385 json_object_boolean_true_add(
9386 json_exten,
9387 "advertised");
9388 else if (p->afc_recv[afi][safi])
9389 json_object_boolean_true_add(
9390 json_exten,
9391 "received");
d62a17ae 9392
05c7a1cc
QY		 9393 json_object_object_add(
9394 json_multi,
9395 afi_safi_print(afi,
9396 safi),
9397 json_exten);
d62a17ae 9398 }
9399 }
9400 json_object_object_add(
9401 json_cap, "multiprotocolExtensions",
9402 json_multi);
9403
d77114b7 9404 /* Hostname capabilities */
60466a63 9405 json_object *json_hname = NULL;
d77114b7
MK		 9406
9407 json_hname = json_object_new_object();
9408
9409 if (CHECK_FLAG(p->cap, PEER_CAP_HOSTNAME_ADV)) {
9410 json_object_string_add(
60466a63
QY		 9411 json_hname, "advHostName",
9412 bgp->peer_self->hostname
9413 ? bgp->peer_self
9414 ->hostname
d77114b7
MK		 9415 : "n/a");
9416 json_object_string_add(
60466a63
QY		 9417 json_hname, "advDomainName",
9418 bgp->peer_self->domainname
9419 ? bgp->peer_self
9420 ->domainname
d77114b7
MK		 9421 : "n/a");
9422 }
9423
9424
9425 if (CHECK_FLAG(p->cap, PEER_CAP_HOSTNAME_RCV)) {
9426 json_object_string_add(
60466a63
QY		 9427 json_hname, "rcvHostName",
9428 p->hostname ? p->hostname
9429 : "n/a");
d77114b7 9430 json_object_string_add(
60466a63
QY		 9431 json_hname, "rcvDomainName",
9432 p->domainname ? p->domainname
9433 : "n/a");
d77114b7
MK		 9434 }
9435
60466a63 9436 json_object_object_add(json_cap, "hostName",
d77114b7
MK		 9437 json_hname);
9438
d62a17ae 9439 /* Gracefull Restart */
9440 if (CHECK_FLAG(p->cap, PEER_CAP_RESTART_RCV)
9441 || CHECK_FLAG(p->cap,
9442 PEER_CAP_RESTART_ADV)) {
9443 if (CHECK_FLAG(p->cap,
9444 PEER_CAP_RESTART_ADV)
9445 && CHECK_FLAG(p->cap,
9446 PEER_CAP_RESTART_RCV))
9447 json_object_string_add(
9448 json_cap,
9449 "gracefulRestart",
9450 "advertisedAndReceived");
9451 else if (CHECK_FLAG(
9452 p->cap,
9453 PEER_CAP_RESTART_ADV))
9454 json_object_string_add(
9455 json_cap,
9456 "gracefulRestartCapability",
9457 "advertised");
9458 else if (CHECK_FLAG(
9459 p->cap,
9460 PEER_CAP_RESTART_RCV))
9461 json_object_string_add(
9462 json_cap,
9463 "gracefulRestartCapability",
9464 "received");
9465
9466 if (CHECK_FLAG(p->cap,
9467 PEER_CAP_RESTART_RCV)) {
9468 int restart_af_count = 0;
9469 json_object *json_restart =
9470 NULL;
9471 json_restart =
9472 json_object_new_object();
9473
9474 json_object_int_add(
9475 json_cap,
9476 "gracefulRestartRemoteTimerMsecs",
9477 p->v_gr_restart * 1000);
9478
05c7a1cc
QY		 9479 FOREACH_AFI_SAFI (afi, safi) {
9480 if (CHECK_FLAG(
9481 p->af_cap
9482 [afi]
9483 [safi],
9484 PEER_CAP_RESTART_AF_RCV)) {
9485 json_object *
9486 json_sub =
9487 NULL;
9488 json_sub =
9489 json_object_new_object();
9490
d62a17ae 9491 if (CHECK_FLAG(
9492 p->af_cap
9493 [afi]
9494 [safi],
05c7a1cc
QY		 9495 PEER_CAP_RESTART_AF_PRESERVE_RCV))
9496 json_object_boolean_true_add(
9497 json_sub,
9498 "preserved");
9499 restart_af_count++;
9500 json_object_object_add(
9501 json_restart,
9502 afi_safi_print(
9503 afi,
9504 safi),
9505 json_sub);
d62a17ae 9506 }
9507 }
9508 if (!restart_af_count) {
9509 json_object_string_add(
9510 json_cap,
9511 "addressFamiliesByPeer",
9512 "none");
9513 json_object_free(
9514 json_restart);
9515 } else
9516 json_object_object_add(
9517 json_cap,
9518 "addressFamiliesByPeer",
9519 json_restart);
9520 }
9521 }
9522 json_object_object_add(json_neigh,
9523 "neighborCapabilities",
9524 json_cap);
9525 } else {
9526 vty_out(vty, " Neighbor capabilities:\n");
9527
9528 /* AS4 */
9529 if (CHECK_FLAG(p->cap, PEER_CAP_AS4_RCV)
9530 || CHECK_FLAG(p->cap, PEER_CAP_AS4_ADV)) {
9531 vty_out(vty, " 4 Byte AS:");
9532 if (CHECK_FLAG(p->cap,
9533 PEER_CAP_AS4_ADV))
9534 vty_out(vty, " advertised");
9535 if (CHECK_FLAG(p->cap,
9536 PEER_CAP_AS4_RCV))
9537 vty_out(vty, " %sreceived",
9538 CHECK_FLAG(
9539 p->cap,
9540 PEER_CAP_AS4_ADV)
9541 ? "and "
9542 : "");
9543 vty_out(vty, "\n");
9544 }
9545
9546 /* AddPath */
9547 if (CHECK_FLAG(p->cap, PEER_CAP_ADDPATH_RCV)
9548 || CHECK_FLAG(p->cap,
9549 PEER_CAP_ADDPATH_ADV)) {
9550 vty_out(vty, " AddPath:\n");
9551
05c7a1cc
QY		 9552 FOREACH_AFI_SAFI (afi, safi) {
9553 if (CHECK_FLAG(
9554 p->af_cap[afi]
9555 [safi],
9556 PEER_CAP_ADDPATH_AF_TX_ADV)
9557 || CHECK_FLAG(
9558 p->af_cap[afi]
9559 [safi],
9560 PEER_CAP_ADDPATH_AF_TX_RCV)) {
9561 vty_out(vty,
9562 " %s: TX ",
9563 afi_safi_print(
9564 afi,
9565 safi));
9566
d62a17ae 9567 if (CHECK_FLAG(
9568 p->af_cap
9569 [afi]
9570 [safi],
05c7a1cc 9571 PEER_CAP_ADDPATH_AF_TX_ADV))
d62a17ae 9572 vty_out(vty,
05c7a1cc 9573 "advertised %s",
d62a17ae 9574 afi_safi_print(
9575 afi,
9576 safi));
9577
05c7a1cc
QY		 9578 if (CHECK_FLAG(
9579 p->af_cap
9580 [afi]
9581 [safi],
9582 PEER_CAP_ADDPATH_AF_TX_RCV))
9583 vty_out(vty,
9584 "%sreceived",
9585 CHECK_FLAG(
9586 p->af_cap
9587 [afi]
9588 [safi],
9589 PEER_CAP_ADDPATH_AF_TX_ADV)
9590 ? " and "
9591 : "");
d62a17ae 9592
05c7a1cc
QY		 9593 vty_out(vty, "\n");
9594 }
d62a17ae 9595
05c7a1cc
QY		 9596 if (CHECK_FLAG(
9597 p->af_cap[afi]
9598 [safi],
9599 PEER_CAP_ADDPATH_AF_RX_ADV)
9600 || CHECK_FLAG(
9601 p->af_cap[afi]
9602 [safi],
9603 PEER_CAP_ADDPATH_AF_RX_RCV)) {
9604 vty_out(vty,
9605 " %s: RX ",
9606 afi_safi_print(
9607 afi,
9608 safi));
d62a17ae 9609
9610 if (CHECK_FLAG(
9611 p->af_cap
9612 [afi]
9613 [safi],
05c7a1cc 9614 PEER_CAP_ADDPATH_AF_RX_ADV))
d62a17ae 9615 vty_out(vty,
05c7a1cc 9616 "advertised %s",
d62a17ae 9617 afi_safi_print(
9618 afi,
9619 safi));
9620
05c7a1cc
QY		 9621 if (CHECK_FLAG(
9622 p->af_cap
9623 [afi]
9624 [safi],
9625 PEER_CAP_ADDPATH_AF_RX_RCV))
d62a17ae 9626 vty_out(vty,
05c7a1cc
QY		 9627 "%sreceived",
9628 CHECK_FLAG(
9629 p->af_cap
9630 [afi]
9631 [safi],
9632 PEER_CAP_ADDPATH_AF_RX_ADV)
9633 ? " and "
9634 : "");
9635
9636 vty_out(vty, "\n");
d62a17ae 9637 }
05c7a1cc 9638 }
d62a17ae 9639 }
9640
9641 /* Dynamic */
9642 if (CHECK_FLAG(p->cap, PEER_CAP_DYNAMIC_RCV)
9643 || CHECK_FLAG(p->cap,
9644 PEER_CAP_DYNAMIC_ADV)) {
9645 vty_out(vty, " Dynamic:");
9646 if (CHECK_FLAG(p->cap,
9647 PEER_CAP_DYNAMIC_ADV))
9648 vty_out(vty, " advertised");
9649 if (CHECK_FLAG(p->cap,
9650 PEER_CAP_DYNAMIC_RCV))
9651 vty_out(vty, " %sreceived",
9652 CHECK_FLAG(
9653 p->cap,
9654 PEER_CAP_DYNAMIC_ADV)
9655 ? "and "
9656 : "");
9657 vty_out(vty, "\n");
9658 }
9659
9660 /* Extended nexthop */
9661 if (CHECK_FLAG(p->cap, PEER_CAP_ENHE_RCV)
9662 || CHECK_FLAG(p->cap, PEER_CAP_ENHE_ADV)) {
9663 vty_out(vty, " Extended nexthop:");
9664 if (CHECK_FLAG(p->cap,
9665 PEER_CAP_ENHE_ADV))
9666 vty_out(vty, " advertised");
9667 if (CHECK_FLAG(p->cap,
9668 PEER_CAP_ENHE_RCV))
9669 vty_out(vty, " %sreceived",
9670 CHECK_FLAG(
9671 p->cap,
9672 PEER_CAP_ENHE_ADV)
9673 ? "and "
9674 : "");
9675 vty_out(vty, "\n");
9676
9677 if (CHECK_FLAG(p->cap,
9678 PEER_CAP_ENHE_RCV)) {
9679 vty_out(vty,
9680 " Address families by peer:\n ");
9681 for (safi = SAFI_UNICAST;
9682 safi < SAFI_MAX; safi++)
9683 if (CHECK_FLAG(
9684 p->af_cap
9685 [AFI_IP]
9686 [safi],
9687 PEER_CAP_ENHE_AF_RCV))
9688 vty_out(vty,
9689 " %s\n",
9690 afi_safi_print(
9691 AFI_IP,
9692 safi));
9693 }
9694 }
9695
9696 /* Route Refresh */
9697 if (CHECK_FLAG(p->cap, PEER_CAP_REFRESH_ADV)
9698 || CHECK_FLAG(p->cap,
9699 PEER_CAP_REFRESH_NEW_RCV)
9700 || CHECK_FLAG(p->cap,
9701 PEER_CAP_REFRESH_OLD_RCV)) {
9702 vty_out(vty, " Route refresh:");
9703 if (CHECK_FLAG(p->cap,
9704 PEER_CAP_REFRESH_ADV))
9705 vty_out(vty, " advertised");
9706 if (CHECK_FLAG(p->cap,
9707 PEER_CAP_REFRESH_NEW_RCV)
9708 || CHECK_FLAG(
9709 p->cap,
9710 PEER_CAP_REFRESH_OLD_RCV))
9711 vty_out(vty, " %sreceived(%s)",
9712 CHECK_FLAG(
9713 p->cap,
9714 PEER_CAP_REFRESH_ADV)
9715 ? "and "
9716 : "",
9717 (CHECK_FLAG(
9718 p->cap,
9719 PEER_CAP_REFRESH_OLD_RCV)
9720 && CHECK_FLAG(
9721 p->cap,
9722 PEER_CAP_REFRESH_NEW_RCV))
9723 ? "old & new"
9724 : CHECK_FLAG(
9725 p->cap,
9726 PEER_CAP_REFRESH_OLD_RCV)
9727 ? "old"
9728 : "new");
9729
9730 vty_out(vty, "\n");
9731 }
9732
9733 /* Multiprotocol Extensions */
05c7a1cc
QY		 9734 FOREACH_AFI_SAFI (afi, safi)
9735 if (p->afc_adv[afi][safi]
9736 || p->afc_recv[afi][safi]) {
9737 vty_out(vty,
9738 " Address Family %s:",
9739 afi_safi_print(afi,
9740 safi));
9741 if (p->afc_adv[afi][safi])
d62a17ae 9742 vty_out(vty,
05c7a1cc
QY		 9743 " advertised");
9744 if (p->afc_recv[afi][safi])
9745 vty_out(vty,
9746 " %sreceived",
9747 p->afc_adv[afi]
9748 [safi]
9749 ? "and "
9750 : "");
9751 vty_out(vty, "\n");
9752 }
d62a17ae 9753
9754 /* Hostname capability */
60466a63 9755 vty_out(vty, " Hostname Capability:");
d77114b7
MK		 9756
9757 if (CHECK_FLAG(p->cap, PEER_CAP_HOSTNAME_ADV)) {
57f7feb6
MK		 9758 vty_out(vty,
9759 " advertised (name: %s,domain name: %s)",
60466a63
QY		 9760 bgp->peer_self->hostname
9761 ? bgp->peer_self
9762 ->hostname
d77114b7 9763 : "n/a",
60466a63
QY		 9764 bgp->peer_self->domainname
9765 ? bgp->peer_self
9766 ->domainname
d77114b7
MK		 9767 : "n/a");
9768 } else {
9769 vty_out(vty, " not advertised");
d62a17ae 9770 }
9771
d77114b7 9772 if (CHECK_FLAG(p->cap, PEER_CAP_HOSTNAME_RCV)) {
57f7feb6
MK		 9773 vty_out(vty,
9774 " received (name: %s,domain name: %s)",
60466a63
QY		 9775 p->hostname ? p->hostname
9776 : "n/a",
9777 p->domainname ? p->domainname
9778 : "n/a");
d77114b7
MK		 9779 } else {
9780 vty_out(vty, " not received");
9781 }
9782
9783 vty_out(vty, "\n");
9784
d62a17ae 9785 /* Gracefull Restart */
9786 if (CHECK_FLAG(p->cap, PEER_CAP_RESTART_RCV)
9787 || CHECK_FLAG(p->cap,
9788 PEER_CAP_RESTART_ADV)) {
9789 vty_out(vty,
9790 " Graceful Restart Capabilty:");
9791 if (CHECK_FLAG(p->cap,
9792 PEER_CAP_RESTART_ADV))
9793 vty_out(vty, " advertised");
9794 if (CHECK_FLAG(p->cap,
9795 PEER_CAP_RESTART_RCV))
9796 vty_out(vty, " %sreceived",
9797 CHECK_FLAG(
9798 p->cap,
9799 PEER_CAP_RESTART_ADV)
9800 ? "and "
9801 : "");
9802 vty_out(vty, "\n");
9803
9804 if (CHECK_FLAG(p->cap,
9805 PEER_CAP_RESTART_RCV)) {
9806 int restart_af_count = 0;
9807
9808 vty_out(vty,
9809 " Remote Restart timer is %d seconds\n",
9810 p->v_gr_restart);
9811 vty_out(vty,
9812 " Address families by peer:\n ");
9813
05c7a1cc
QY		 9814 FOREACH_AFI_SAFI (afi, safi)
9815 if (CHECK_FLAG(
9816 p->af_cap
9817 [afi]
9818 [safi],
9819 PEER_CAP_RESTART_AF_RCV)) {
9820 vty_out(vty,
9821 "%s%s(%s)",
9822 restart_af_count
9823 ? ", "
9824 : "",
9825 afi_safi_print(
9826 afi,
9827 safi),
9828 CHECK_FLAG(
9829 p->af_cap
9830 [afi]
9831 [safi],
9832 PEER_CAP_RESTART_AF_PRESERVE_RCV)
9833 ? "preserved"
9834 : "not preserved");
9835 restart_af_count++;
9836 }
d62a17ae 9837 if (!restart_af_count)
9838 vty_out(vty, "none");
9839 vty_out(vty, "\n");
9840 }
9841 }
9842 }
9843 }
9844 }
9845
9846 /* graceful restart information */
9847 if (CHECK_FLAG(p->cap, PEER_CAP_RESTART_RCV) || p->t_gr_restart
9848 || p->t_gr_stale) {
9849 json_object *json_grace = NULL;
9850 json_object *json_grace_send = NULL;
9851 json_object *json_grace_recv = NULL;
9852 int eor_send_af_count = 0;
9853 int eor_receive_af_count = 0;
9854
9855 if (use_json) {
9856 json_grace = json_object_new_object();
9857 json_grace_send = json_object_new_object();
9858 json_grace_recv = json_object_new_object();
9859
9860 if (p->status == Established) {
05c7a1cc
QY		 9861 FOREACH_AFI_SAFI (afi, safi) {
9862 if (CHECK_FLAG(p->af_sflags[afi][safi],
9863 PEER_STATUS_EOR_SEND)) {
9864 json_object_boolean_true_add(
9865 json_grace_send,
9866 afi_safi_print(afi,
9867 safi));
9868 eor_send_af_count++;
d62a17ae 9869 }
9870 }
05c7a1cc
QY		 9871 FOREACH_AFI_SAFI (afi, safi) {
9872 if (CHECK_FLAG(
9873 p->af_sflags[afi][safi],
9874 PEER_STATUS_EOR_RECEIVED)) {
9875 json_object_boolean_true_add(
9876 json_grace_recv,
9877 afi_safi_print(afi,
9878 safi));
9879 eor_receive_af_count++;
d62a17ae 9880 }
9881 }
9882 }
9883
9884 json_object_object_add(json_grace, "endOfRibSend",
9885 json_grace_send);
9886 json_object_object_add(json_grace, "endOfRibRecv",
9887 json_grace_recv);
9888
9889 if (p->t_gr_restart)
9890 json_object_int_add(json_grace,
9891 "gracefulRestartTimerMsecs",
9892 thread_timer_remain_second(
9893 p->t_gr_restart)
9894 * 1000);
9895
9896 if (p->t_gr_stale)
9897 json_object_int_add(
9898 json_grace,
9899 "gracefulStalepathTimerMsecs",
9900 thread_timer_remain_second(
9901 p->t_gr_stale)
9902 * 1000);
9903
9904 json_object_object_add(
9905 json_neigh, "gracefulRestartInfo", json_grace);
9906 } else {
9907 vty_out(vty, " Graceful restart informations:\n");
9908 if (p->status == Established) {
9909 vty_out(vty, " End-of-RIB send: ");
05c7a1cc
QY		 9910 FOREACH_AFI_SAFI (afi, safi) {
9911 if (CHECK_FLAG(p->af_sflags[afi][safi],
9912 PEER_STATUS_EOR_SEND)) {
9913 vty_out(vty, "%s%s",
9914 eor_send_af_count ? ", "
9915 : "",
9916 afi_safi_print(afi,
9917 safi));
9918 eor_send_af_count++;
d62a17ae 9919 }
9920 }
9921 vty_out(vty, "\n");
9922 vty_out(vty, " End-of-RIB received: ");
05c7a1cc
QY		 9923 FOREACH_AFI_SAFI (afi, safi) {
9924 if (CHECK_FLAG(
9925 p->af_sflags[afi][safi],
9926 PEER_STATUS_EOR_RECEIVED)) {
9927 vty_out(vty, "%s%s",
9928 eor_receive_af_count
9929 ? ", "
9930 : "",
9931 afi_safi_print(afi,
9932 safi));
9933 eor_receive_af_count++;
d62a17ae 9934 }
9935 }
9936 vty_out(vty, "\n");
9937 }
9938
9939 if (p->t_gr_restart)
9940 vty_out(vty,
9941 " The remaining time of restart timer is %ld\n",
9942 thread_timer_remain_second(
9943 p->t_gr_restart));
9944
9945 if (p->t_gr_stale)
9946 vty_out(vty,
9947 " The remaining time of stalepath timer is %ld\n",
9948 thread_timer_remain_second(
9949 p->t_gr_stale));
9950 }
9951 }
9952 if (use_json) {
9953 json_object *json_stat = NULL;
9954 json_stat = json_object_new_object();
9955 /* Packet counts. */
9956 json_object_int_add(json_stat, "depthInq", 0);
9957 json_object_int_add(json_stat, "depthOutq",
9958 (unsigned long)p->obuf->count);
0112e9e0
QY		 9959 json_object_int_add(json_stat, "opensSent",
9960 atomic_load_explicit(&p->open_out,
9961 memory_order_relaxed));
9962 json_object_int_add(json_stat, "opensRecv",
9963 atomic_load_explicit(&p->open_in,
9964 memory_order_relaxed));
d62a17ae 9965 json_object_int_add(json_stat, "notificationsSent",
0112e9e0
QY		 9966 atomic_load_explicit(&p->notify_out,
9967 memory_order_relaxed));
d62a17ae 9968 json_object_int_add(json_stat, "notificationsRecv",
0112e9e0
QY		 9969 atomic_load_explicit(&p->notify_in,
9970 memory_order_relaxed));
9971 json_object_int_add(json_stat, "updatesSent",
9972 atomic_load_explicit(&p->update_out,
9973 memory_order_relaxed));
9974 json_object_int_add(json_stat, "updatesRecv",
9975 atomic_load_explicit(&p->update_in,
9976 memory_order_relaxed));
d62a17ae 9977 json_object_int_add(json_stat, "keepalivesSent",
0112e9e0
QY		 9978 atomic_load_explicit(&p->keepalive_out,
9979 memory_order_relaxed));
d62a17ae 9980 json_object_int_add(json_stat, "keepalivesRecv",
0112e9e0
QY		 9981 atomic_load_explicit(&p->keepalive_in,
9982 memory_order_relaxed));
d62a17ae 9983 json_object_int_add(json_stat, "routeRefreshSent",
0112e9e0
QY		 9984 atomic_load_explicit(&p->refresh_out,
9985 memory_order_relaxed));
d62a17ae 9986 json_object_int_add(json_stat, "routeRefreshRecv",
0112e9e0
QY		 9987 atomic_load_explicit(&p->refresh_in,
9988 memory_order_relaxed));
d62a17ae 9989 json_object_int_add(json_stat, "capabilitySent",
0112e9e0
QY		 9990 atomic_load_explicit(&p->dynamic_cap_out,
9991 memory_order_relaxed));
d62a17ae 9992 json_object_int_add(json_stat, "capabilityRecv",
0112e9e0
QY		 9993 atomic_load_explicit(&p->dynamic_cap_in,
9994 memory_order_relaxed));
9995 json_object_int_add(json_stat, "totalSent", PEER_TOTAL_TX(p));
9996 json_object_int_add(json_stat, "totalRecv", PEER_TOTAL_RX(p));
d62a17ae 9997 json_object_object_add(json_neigh, "messageStats", json_stat);
9998 } else {
9999 /* Packet counts. */
10000 vty_out(vty, " Message statistics:\n");
10001 vty_out(vty, " Inq depth is 0\n");
10002 vty_out(vty, " Outq depth is %lu\n",
10003 (unsigned long)p->obuf->count);
10004 vty_out(vty, " Sent Rcvd\n");
0112e9e0
QY		 10005 vty_out(vty, " Opens: %10d %10d\n",
10006 atomic_load_explicit(&p->open_out,
10007 memory_order_relaxed),
10008 atomic_load_explicit(&p->open_in,
10009 memory_order_relaxed));
10010 vty_out(vty, " Notifications: %10d %10d\n",
10011 atomic_load_explicit(&p->notify_out,
10012 memory_order_relaxed),
10013 atomic_load_explicit(&p->notify_in,
10014 memory_order_relaxed));
10015 vty_out(vty, " Updates: %10d %10d\n",
10016 atomic_load_explicit(&p->update_out,
10017 memory_order_relaxed),
10018 atomic_load_explicit(&p->update_in,
10019 memory_order_relaxed));
10020 vty_out(vty, " Keepalives: %10d %10d\n",
10021 atomic_load_explicit(&p->keepalive_out,
10022 memory_order_relaxed),
10023 atomic_load_explicit(&p->keepalive_in,
10024 memory_order_relaxed));
10025 vty_out(vty, " Route Refresh: %10d %10d\n",
10026 atomic_load_explicit(&p->refresh_out,
10027 memory_order_relaxed),
10028 atomic_load_explicit(&p->refresh_in,
10029 memory_order_relaxed));
d62a17ae 10030 vty_out(vty, " Capability: %10d %10d\n",
0112e9e0
QY		 10031 atomic_load_explicit(&p->dynamic_cap_out,
10032 memory_order_relaxed),
10033 atomic_load_explicit(&p->dynamic_cap_in,
10034 memory_order_relaxed));
10035 vty_out(vty, " Total: %10d %10d\n", PEER_TOTAL_TX(p),
10036 PEER_TOTAL_RX(p));
d62a17ae 10037 }
10038
10039 if (use_json) {
10040 /* advertisement-interval */
10041 json_object_int_add(json_neigh,
10042 "minBtwnAdvertisementRunsTimerMsecs",
10043 p->v_routeadv * 1000);
10044
10045 /* Update-source. */
10046 if (p->update_if || p->update_source) {
10047 if (p->update_if)
10048 json_object_string_add(json_neigh,
10049 "updateSource",
10050 p->update_if);
10051 else if (p->update_source)
10052 json_object_string_add(
10053 json_neigh, "updateSource",
10054 sockunion2str(p->update_source, buf1,
10055 SU_ADDRSTRLEN));
10056 }
10057 } else {
10058 /* advertisement-interval */
10059 vty_out(vty,
10060 " Minimum time between advertisement runs is %d seconds\n",
10061 p->v_routeadv);
10062
10063 /* Update-source. */
10064 if (p->update_if || p->update_source) {
10065 vty_out(vty, " Update source is ");
10066 if (p->update_if)
10067 vty_out(vty, "%s", p->update_if);
10068 else if (p->update_source)
10069 vty_out(vty, "%s",
10070 sockunion2str(p->update_source, buf1,
10071 SU_ADDRSTRLEN));
10072 vty_out(vty, "\n");
10073 }
10074
10075 vty_out(vty, "\n");
10076 }
10077
10078 /* Address Family Information */
10079 json_object *json_hold = NULL;
10080
10081 if (use_json)
10082 json_hold = json_object_new_object();
10083
05c7a1cc
QY		 10084 FOREACH_AFI_SAFI (afi, safi)
10085 if (p->afc[afi][safi])
10086 bgp_show_peer_afi(vty, p, afi, safi, use_json,
10087 json_hold);
d62a17ae 10088
10089 if (use_json) {
10090 json_object_object_add(json_neigh, "addressFamilyInfo",
10091 json_hold);
10092 json_object_int_add(json_neigh, "connectionsEstablished",
10093 p->established);
10094 json_object_int_add(json_neigh, "connectionsDropped",
10095 p->dropped);
10096 } else
10097 vty_out(vty, " Connections established %d; dropped %d\n",
10098 p->established, p->dropped);
10099
10100 if (!p->last_reset) {
10101 if (use_json)
10102 json_object_string_add(json_neigh, "lastReset",
10103 "never");
10104 else
10105 vty_out(vty, " Last reset never\n");
10106 } else {
10107 if (use_json) {
10108 time_t uptime;
10109 struct tm *tm;
10110
10111 uptime = bgp_clock();
10112 uptime -= p->resettime;
10113 tm = gmtime(&uptime);
10114 json_object_int_add(json_neigh, "lastResetTimerMsecs",
10115 (tm->tm_sec * 1000)
10116 + (tm->tm_min * 60000)
10117 + (tm->tm_hour * 3600000));
10118 json_object_string_add(
10119 json_neigh, "lastResetDueTo",
10120 peer_down_str[(int)p->last_reset]);
10121 if (p->last_reset == PEER_DOWN_NOTIFY_SEND
10122 || p->last_reset == PEER_DOWN_NOTIFY_RECEIVED) {
10123 char errorcodesubcode_hexstr[5];
10124 char errorcodesubcode_str[256];
10125
10126 code_str = bgp_notify_code_str(p->notify.code);
10127 subcode_str = bgp_notify_subcode_str(
10128 p->notify.code, p->notify.subcode);
10129
10130 sprintf(errorcodesubcode_hexstr, "%02X%02X",
10131 p->notify.code, p->notify.subcode);
10132 json_object_string_add(json_neigh,
10133 "lastErrorCodeSubcode",
10134 errorcodesubcode_hexstr);
10135 snprintf(errorcodesubcode_str, 255, "%s%s",
10136 code_str, subcode_str);
10137 json_object_string_add(json_neigh,
10138 "lastNotificationReason",
10139 errorcodesubcode_str);
10140 if (p->last_reset == PEER_DOWN_NOTIFY_RECEIVED
10141 && p->notify.code == BGP_NOTIFY_CEASE
10142 && (p->notify.subcode
10143 == BGP_NOTIFY_CEASE_ADMIN_SHUTDOWN
10144 || p->notify.subcode
10145 == BGP_NOTIFY_CEASE_ADMIN_RESET)
10146 && p->notify.length) {
10147 char msgbuf[1024];
10148 const char *msg_str;
10149
10150 msg_str = bgp_notify_admin_message(
10151 msgbuf, sizeof(msgbuf),
d7c0a89a 10152 (uint8_t *)p->notify.data,
d62a17ae 10153 p->notify.length);
10154 if (msg_str)
10155 json_object_string_add(
10156 json_neigh,
10157 "lastShutdownDescription",
10158 msg_str);
10159 }
10160 }
10161 } else {
10162 vty_out(vty, " Last reset %s, ",
10163 peer_uptime(p->resettime, timebuf,
10164 BGP_UPTIME_LEN, 0, NULL));
10165
10166 if (p->last_reset == PEER_DOWN_NOTIFY_SEND
10167 || p->last_reset == PEER_DOWN_NOTIFY_RECEIVED) {
10168 code_str = bgp_notify_code_str(p->notify.code);
10169 subcode_str = bgp_notify_subcode_str(
10170 p->notify.code, p->notify.subcode);
10171 vty_out(vty, "due to NOTIFICATION %s (%s%s)\n",
10172 p->last_reset == PEER_DOWN_NOTIFY_SEND
10173 ? "sent"
10174 : "received",
10175 code_str, subcode_str);
10176 if (p->last_reset == PEER_DOWN_NOTIFY_RECEIVED
10177 && p->notify.code == BGP_NOTIFY_CEASE
10178 && (p->notify.subcode
10179 == BGP_NOTIFY_CEASE_ADMIN_SHUTDOWN
10180 || p->notify.subcode
10181 == BGP_NOTIFY_CEASE_ADMIN_RESET)
10182 && p->notify.length) {
10183 char msgbuf[1024];
10184 const char *msg_str;
10185
10186 msg_str = bgp_notify_admin_message(
10187 msgbuf, sizeof(msgbuf),
d7c0a89a 10188 (uint8_t *)p->notify.data,
d62a17ae 10189 p->notify.length);
10190 if (msg_str)
10191 vty_out(vty,
10192 " Message: \"%s\"\n",
10193 msg_str);
10194 }
10195 } else {
10196 vty_out(vty, "due to %s\n",
10197 peer_down_str[(int)p->last_reset]);
10198 }
10199
10200 if (p->last_reset_cause_size) {
10201 msg = p->last_reset_cause;
10202 vty_out(vty,
10203 " Message received that caused BGP to send a NOTIFICATION:\n ");
10204 for (i = 1; i <= p->last_reset_cause_size;
10205 i++) {
10206 vty_out(vty, "%02X", *msg++);
10207
10208 if (i != p->last_reset_cause_size) {
10209 if (i % 16 == 0) {
10210 vty_out(vty, "\n ");
10211 } else if (i % 4 == 0) {
10212 vty_out(vty, " ");
10213 }
10214 }
10215 }
10216 vty_out(vty, "\n");
10217 }
10218 }
10219 }
10220
10221 if (CHECK_FLAG(p->sflags, PEER_STATUS_PREFIX_OVERFLOW)) {
10222 if (use_json)
10223 json_object_boolean_true_add(json_neigh,
10224 "prefixesConfigExceedMax");
10225 else
10226 vty_out(vty,
10227 " Peer had exceeded the max. no. of prefixes configured.\n");
10228
10229 if (p->t_pmax_restart) {
10230 if (use_json) {
10231 json_object_boolean_true_add(
10232 json_neigh, "reducePrefixNumFrom");
10233 json_object_int_add(json_neigh,
10234 "restartInTimerMsec",
10235 thread_timer_remain_second(
10236 p->t_pmax_restart)
10237 * 1000);
10238 } else
10239 vty_out(vty,
10240 " Reduce the no. of prefix from %s, will restart in %ld seconds\n",
996c9314
LB		 10241 p->host, thread_timer_remain_second(
10242 p->t_pmax_restart));
d62a17ae 10243 } else {
10244 if (use_json)
10245 json_object_boolean_true_add(
10246 json_neigh,
10247 "reducePrefixNumAndClearIpBgp");
10248 else
10249 vty_out(vty,
10250 " Reduce the no. of prefix and clear ip bgp %s to restore peering\n",
10251 p->host);
10252 }
10253 }
10254
10255 /* EBGP Multihop and GTSM */
10256 if (p->sort != BGP_PEER_IBGP) {
10257 if (use_json) {
10258 if (p->gtsm_hops > 0)
10259 json_object_int_add(json_neigh,
10260 "externalBgpNbrMaxHopsAway",
10261 p->gtsm_hops);
10262 else if (p->ttl > 1)
10263 json_object_int_add(json_neigh,
10264 "externalBgpNbrMaxHopsAway",
10265 p->ttl);
10266 } else {
10267 if (p->gtsm_hops > 0)
10268 vty_out(vty,
10269 " External BGP neighbor may be up to %d hops away.\n",
10270 p->gtsm_hops);
10271 else if (p->ttl > 1)
10272 vty_out(vty,
10273 " External BGP neighbor may be up to %d hops away.\n",
10274 p->ttl);
10275 }
10276 } else {
10277 if (p->gtsm_hops > 0) {
10278 if (use_json)
10279 json_object_int_add(json_neigh,
10280 "internalBgpNbrMaxHopsAway",
10281 p->gtsm_hops);
10282 else
10283 vty_out(vty,
10284 " Internal BGP neighbor may be up to %d hops away.\n",
10285 p->gtsm_hops);
10286 }
10287 }
10288
10289 /* Local address. */
10290 if (p->su_local) {
10291 if (use_json) {
10292 json_object_string_add(json_neigh, "hostLocal",
10293 sockunion2str(p->su_local, buf1,
10294 SU_ADDRSTRLEN));
10295 json_object_int_add(json_neigh, "portLocal",
10296 ntohs(p->su_local->sin.sin_port));
10297 } else
10298 vty_out(vty, "Local host: %s, Local port: %d\n",
10299 sockunion2str(p->su_local, buf1, SU_ADDRSTRLEN),
10300 ntohs(p->su_local->sin.sin_port));
10301 }
10302
10303 /* Remote address. */
10304 if (p->su_remote) {
10305 if (use_json) {
10306 json_object_string_add(json_neigh, "hostForeign",
10307 sockunion2str(p->su_remote, buf1,
10308 SU_ADDRSTRLEN));
10309 json_object_int_add(json_neigh, "portForeign",
10310 ntohs(p->su_remote->sin.sin_port));
10311 } else
10312 vty_out(vty, "Foreign host: %s, Foreign port: %d\n",
10313 sockunion2str(p->su_remote, buf1,
10314 SU_ADDRSTRLEN),
10315 ntohs(p->su_remote->sin.sin_port));
10316 }
10317
10318 /* Nexthop display. */
10319 if (p->su_local) {
10320 if (use_json) {
10321 json_object_string_add(json_neigh, "nexthop",
10322 inet_ntop(AF_INET,
10323 &p->nexthop.v4, buf1,
10324 sizeof(buf1)));
10325 json_object_string_add(json_neigh, "nexthopGlobal",
10326 inet_ntop(AF_INET6,
10327 &p->nexthop.v6_global,
10328 buf1, sizeof(buf1)));
10329 json_object_string_add(json_neigh, "nexthopLocal",
10330 inet_ntop(AF_INET6,
10331 &p->nexthop.v6_local,
10332 buf1, sizeof(buf1)));
10333 if (p->shared_network)
10334 json_object_string_add(json_neigh,
10335 "bgpConnection",
10336 "sharedNetwork");
10337 else
10338 json_object_string_add(json_neigh,
10339 "bgpConnection",
10340 "nonSharedNetwork");
10341 } else {
10342 vty_out(vty, "Nexthop: %s\n",
10343 inet_ntop(AF_INET, &p->nexthop.v4, buf1,
10344 sizeof(buf1)));
10345 vty_out(vty, "Nexthop global: %s\n",
10346 inet_ntop(AF_INET6, &p->nexthop.v6_global, buf1,
10347 sizeof(buf1)));
10348 vty_out(vty, "Nexthop local: %s\n",
10349 inet_ntop(AF_INET6, &p->nexthop.v6_local, buf1,
10350 sizeof(buf1)));
10351 vty_out(vty, "BGP connection: %s\n",
10352 p->shared_network ? "shared network"
10353 : "non shared network");
10354 }
10355 }
10356
10357 /* Timer information. */
10358 if (use_json) {
10359 json_object_int_add(json_neigh, "connectRetryTimer",
10360 p->v_connect);
10361 if (p->status == Established && p->rtt)
10362 json_object_int_add(json_neigh, "estimatedRttInMsecs",
10363 p->rtt);
10364 if (p->t_start)
10365 json_object_int_add(
10366 json_neigh, "nextStartTimerDueInMsecs",
10367 thread_timer_remain_second(p->t_start) * 1000);
10368 if (p->t_connect)
10369 json_object_int_add(
10370 json_neigh, "nextConnectTimerDueInMsecs",
10371 thread_timer_remain_second(p->t_connect)
10372 * 1000);
10373 if (p->t_routeadv) {
10374 json_object_int_add(json_neigh, "mraiInterval",
10375 p->v_routeadv);
10376 json_object_int_add(
10377 json_neigh, "mraiTimerExpireInMsecs",
10378 thread_timer_remain_second(p->t_routeadv)
10379 * 1000);
10380 }
10381 if (p->password)
10382 json_object_int_add(json_neigh, "authenticationEnabled",
10383 1);
10384
10385 if (p->t_read)
10386 json_object_string_add(json_neigh, "readThread", "on");
10387 else
10388 json_object_string_add(json_neigh, "readThread", "off");
49507a6f
QY		 10389
10390 if (CHECK_FLAG(p->thread_flags, PEER_THREAD_WRITES_ON))
d62a17ae 10391 json_object_string_add(json_neigh, "writeThread", "on");
10392 else
10393 json_object_string_add(json_neigh, "writeThread",
10394 "off");
10395 } else {
10396 vty_out(vty, "BGP Connect Retry Timer in Seconds: %d\n",
10397 p->v_connect);
10398 if (p->status == Established && p->rtt)
10399 vty_out(vty, "Estimated round trip time: %d ms\n",
10400 p->rtt);
10401 if (p->t_start)
10402 vty_out(vty, "Next start timer due in %ld seconds\n",
10403 thread_timer_remain_second(p->t_start));
10404 if (p->t_connect)
10405 vty_out(vty, "Next connect timer due in %ld seconds\n",
10406 thread_timer_remain_second(p->t_connect));
10407 if (p->t_routeadv)
10408 vty_out(vty,
10409 "MRAI (interval %u) timer expires in %ld seconds\n",
10410 p->v_routeadv,
10411 thread_timer_remain_second(p->t_routeadv));
10412 if (p->password)
10413 vty_out(vty, "Peer Authentication Enabled\n");
10414
10415 vty_out(vty, "Read thread: %s Write thread: %s\n",
49507a6f
QY		 10416 p->t_read ? "on" : "off",
10417 CHECK_FLAG(p->thread_flags, PEER_THREAD_WRITES_ON)
10418 ? "on"
10419 : "off");
d62a17ae 10420 }
10421
10422 if (p->notify.code == BGP_NOTIFY_OPEN_ERR
10423 && p->notify.subcode == BGP_NOTIFY_OPEN_UNSUP_CAPBL)
10424 bgp_capability_vty_out(vty, p, use_json, json_neigh);
10425
10426 if (!use_json)
10427 vty_out(vty, "\n");
10428
10429 /* BFD information. */
10430 bgp_bfd_show_info(vty, p, use_json, json_neigh);
10431
10432 if (use_json) {
10433 if (p->conf_if) /* Configured interface name. */
10434 json_object_object_add(json, p->conf_if, json_neigh);
10435 else /* Configured IP address. */
10436 json_object_object_add(json, p->host, json_neigh);
10437 }
10438}
10439
10440static int bgp_show_neighbor(struct vty *vty, struct bgp *bgp,
10441 enum show_type type, union sockunion *su,
d7c0a89a 10442 const char *conf_if, uint8_t use_json,
d62a17ae 10443 json_object *json)
10444{
10445 struct listnode *node, *nnode;
10446 struct peer *peer;
10447 int find = 0;
10448
10449 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
10450 if (!CHECK_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE))
10451 continue;
10452
10453 switch (type) {
10454 case show_all:
10455 bgp_show_peer(vty, peer, use_json, json);
10456 break;
10457 case show_peer:
10458 if (conf_if) {
10459 if ((peer->conf_if
10460 && !strcmp(peer->conf_if, conf_if))
10461 || (peer->hostname
10462 && !strcmp(peer->hostname, conf_if))) {
10463 find = 1;
10464 bgp_show_peer(vty, peer, use_json,
10465 json);
10466 }
10467 } else {
10468 if (sockunion_same(&peer->su, su)) {
10469 find = 1;
10470 bgp_show_peer(vty, peer, use_json,
10471 json);
10472 }
10473 }
10474 break;
10475 }
10476 }
10477
10478 if (type == show_peer && !find) {
10479 if (use_json)
10480 json_object_boolean_true_add(json, "bgpNoSuchNeighbor");
10481 else
10482 vty_out(vty, "%% No such neighbor\n");
10483 }
10484
10485 if (use_json) {
996c9314
LB		 10486 vty_out(vty, "%s\n", json_object_to_json_string_ext(
10487 json, JSON_C_TO_STRING_PRETTY));
d62a17ae 10488 json_object_free(json);
10489 } else {
10490 vty_out(vty, "\n");
10491 }
10492
10493 return CMD_SUCCESS;
10494}
10495
10496static void bgp_show_all_instances_neighbors_vty(struct vty *vty,
71aedaa3
DS		 10497 enum show_type type,
10498 const char *ip_str,
d7c0a89a 10499 uint8_t use_json)
d62a17ae 10500{
0291c246
MK		 10501 struct listnode *node, *nnode;
10502 struct bgp *bgp;
71aedaa3 10503 union sockunion su;
0291c246 10504 json_object *json = NULL;
71aedaa3 10505 int ret, is_first = 1;
d62a17ae 10506
10507 if (use_json)
10508 vty_out(vty, "{\n");
10509
10510 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp)) {
10511 if (use_json) {
10512 if (!(json = json_object_new_object())) {
10513 zlog_err(
10514 "Unable to allocate memory for JSON object");
10515 vty_out(vty,
10516 "{\"error\": {\"message:\": \"Unable to allocate memory for JSON object\"}}}\n");
10517 return;
10518 }
10519
10520 json_object_int_add(json, "vrfId",
10521 (bgp->vrf_id == VRF_UNKNOWN)
a4d82a8a
PZ		 10522 ? -1
10523 : (int64_t)bgp->vrf_id);
d62a17ae 10524 json_object_string_add(
10525 json, "vrfName",
10526 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
10527 ? "Default"
10528 : bgp->name);
10529
10530 if (!is_first)
10531 vty_out(vty, ",\n");
10532 else
10533 is_first = 0;
10534
10535 vty_out(vty, "\"%s\":",
10536 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
10537 ? "Default"
10538 : bgp->name);
10539 } else {
10540 vty_out(vty, "\nInstance %s:\n",
10541 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
10542 ? "Default"
10543 : bgp->name);
10544 }
71aedaa3
DS		 10545
10546 if (type == show_peer) {
10547 ret = str2sockunion(ip_str, &su);
10548 if (ret < 0)
10549 bgp_show_neighbor(vty, bgp, type, NULL, ip_str,
10550 use_json, json);
10551 else
10552 bgp_show_neighbor(vty, bgp, type, &su, NULL,
10553 use_json, json);
10554 } else {
10555 bgp_show_neighbor(vty, bgp, show_all, NULL, NULL,
10556 use_json, json);
10557 }
d62a17ae 10558 }
10559
10560 if (use_json)
10561 vty_out(vty, "}\n");
10562}
10563
10564static int bgp_show_neighbor_vty(struct vty *vty, const char *name,
10565 enum show_type type, const char *ip_str,
d7c0a89a 10566 uint8_t use_json)
d62a17ae 10567{
10568 int ret;
10569 struct bgp *bgp;
10570 union sockunion su;
10571 json_object *json = NULL;
10572
10573 if (name) {
10574 if (strmatch(name, "all")) {
71aedaa3
DS		 10575 bgp_show_all_instances_neighbors_vty(vty, type, ip_str,
10576 use_json);
d62a17ae 10577 return CMD_SUCCESS;
10578 } else {
10579 bgp = bgp_lookup_by_name(name);
10580 if (!bgp) {
10581 if (use_json) {
10582 json = json_object_new_object();
10583 json_object_boolean_true_add(
10584 json, "bgpNoSuchInstance");
10585 vty_out(vty, "%s\n",
10586 json_object_to_json_string_ext(
10587 json,
10588 JSON_C_TO_STRING_PRETTY));
10589 json_object_free(json);
10590 } else
10591 vty_out(vty,
10592 "%% No such BGP instance exist\n");
10593
10594 return CMD_WARNING;
10595 }
10596 }
10597 } else {
10598 bgp = bgp_get_default();
10599 }
10600
10601 if (bgp) {
10602 json = json_object_new_object();
10603 if (ip_str) {
10604 ret = str2sockunion(ip_str, &su);
10605 if (ret < 0)
10606 bgp_show_neighbor(vty, bgp, type, NULL, ip_str,
10607 use_json, json);
10608 else
10609 bgp_show_neighbor(vty, bgp, type, &su, NULL,
10610 use_json, json);
10611 } else {
10612 bgp_show_neighbor(vty, bgp, type, NULL, NULL, use_json,
10613 json);
10614 }
10615 json_object_free(json);
10616 }
10617
10618 return CMD_SUCCESS;
4fb25c53
DW		 10619}
10620
716b2d8a 10621/* "show [ip] bgp neighbors" commands. */
718e3744 10622DEFUN (show_ip_bgp_neighbors,
10623 show_ip_bgp_neighbors_cmd,
24345e82 10624 "show [ip] bgp [<view|vrf> VIEWVRFNAME] [<ipv4|ipv6>] neighbors [<A.B.C.D|X:X::X:X|WORD>] [json]",
718e3744 10625 SHOW_STR
10626 IP_STR
10627 BGP_STR
f2a8972b 10628 BGP_INSTANCE_HELP_STR
8c3deaae
QY		 10629 "Address Family\n"
10630 "Address Family\n"
718e3744 10631 "Detailed information on TCP and BGP neighbor connections\n"
10632 "Neighbor to display information about\n"
a80beece 10633 "Neighbor to display information about\n"
91d37724 10634 "Neighbor on BGP configured interface\n"
9973d184 10635 JSON_STR)
718e3744 10636{
d62a17ae 10637 char *vrf = NULL;
10638 char *sh_arg = NULL;
10639 enum show_type sh_type;
718e3744 10640
d7c0a89a 10641 uint8_t uj = use_json(argc, argv);
718e3744 10642
d62a17ae 10643 int idx = 0;
718e3744 10644
d62a17ae 10645 if (argv_find(argv, argc, "view", &idx)
10646 || argv_find(argv, argc, "vrf", &idx))
10647 vrf = argv[idx + 1]->arg;
718e3744 10648
d62a17ae 10649 idx++;
10650 if (argv_find(argv, argc, "A.B.C.D", &idx)
10651 || argv_find(argv, argc, "X:X::X:X", &idx)
10652 || argv_find(argv, argc, "WORD", &idx)) {
10653 sh_type = show_peer;
10654 sh_arg = argv[idx]->arg;
10655 } else
10656 sh_type = show_all;
856ca177 10657
d62a17ae 10658 return bgp_show_neighbor_vty(vty, vrf, sh_type, sh_arg, uj);
718e3744 10659}
10660
716b2d8a 10661/* Show BGP's AS paths internal data. There are both `show [ip] bgp
718e3744 10662 paths' and `show ip mbgp paths'. Those functions results are the
10663 same.*/
f412b39a 10664DEFUN (show_ip_bgp_paths,
718e3744 10665 show_ip_bgp_paths_cmd,
46f296b4 10666 "show [ip] bgp ["BGP_SAFI_CMD_STR"] paths",
718e3744 10667 SHOW_STR
10668 IP_STR
10669 BGP_STR
46f296b4 10670 BGP_SAFI_HELP_STR
718e3744 10671 "Path information\n")
10672{
d62a17ae 10673 vty_out(vty, "Address Refcnt Path\n");
10674 aspath_print_all_vty(vty);
10675 return CMD_SUCCESS;
718e3744 10676}
10677
718e3744 10678#include "hash.h"
10679
d62a17ae 10680static void community_show_all_iterator(struct hash_backet *backet,
10681 struct vty *vty)
718e3744 10682{
d62a17ae 10683 struct community *com;
718e3744 10684
d62a17ae 10685 com = (struct community *)backet->data;
3f65c5b1 10686 vty_out(vty, "[%p] (%ld) %s\n", (void *)com, com->refcnt,
a69ea8ae 10687 community_str(com, false));
718e3744 10688}
10689
10690/* Show BGP's community internal data. */
f412b39a 10691DEFUN (show_ip_bgp_community_info,
718e3744 10692 show_ip_bgp_community_info_cmd,
bec37ba5 10693 "show [ip] bgp community-info",
718e3744 10694 SHOW_STR
10695 IP_STR
10696 BGP_STR
10697 "List all bgp community information\n")
10698{
d62a17ae 10699 vty_out(vty, "Address Refcnt Community\n");
718e3744 10700
d62a17ae 10701 hash_iterate(community_hash(),
10702 (void (*)(struct hash_backet *,
10703 void *))community_show_all_iterator,
10704 vty);
718e3744 10705
d62a17ae 10706 return CMD_SUCCESS;
718e3744 10707}
10708
d62a17ae 10709static void lcommunity_show_all_iterator(struct hash_backet *backet,
10710 struct vty *vty)
57d187bc 10711{
d62a17ae 10712 struct lcommunity *lcom;
57d187bc 10713
d62a17ae 10714 lcom = (struct lcommunity *)backet->data;
3f65c5b1 10715 vty_out(vty, "[%p] (%ld) %s\n", (void *)lcom, lcom->refcnt,
d62a17ae 10716 lcommunity_str(lcom));
57d187bc
JS		 10717}
10718
10719/* Show BGP's community internal data. */
10720DEFUN (show_ip_bgp_lcommunity_info,
10721 show_ip_bgp_lcommunity_info_cmd,
10722 "show ip bgp large-community-info",
10723 SHOW_STR
10724 IP_STR
10725 BGP_STR
10726 "List all bgp large-community information\n")
10727{
d62a17ae 10728 vty_out(vty, "Address Refcnt Large-community\n");
57d187bc 10729
d62a17ae 10730 hash_iterate(lcommunity_hash(),
10731 (void (*)(struct hash_backet *,
10732 void *))lcommunity_show_all_iterator,
10733 vty);
57d187bc 10734
d62a17ae 10735 return CMD_SUCCESS;
57d187bc
JS		 10736}
10737
10738
f412b39a 10739DEFUN (show_ip_bgp_attr_info,
718e3744 10740 show_ip_bgp_attr_info_cmd,
bec37ba5 10741 "show [ip] bgp attribute-info",
718e3744 10742 SHOW_STR
10743 IP_STR
10744 BGP_STR
10745 "List all bgp attribute information\n")
10746{
d62a17ae 10747 attr_show_all(vty);
10748 return CMD_SUCCESS;
718e3744 10749}
6b0655a2 10750
d62a17ae 10751static void bgp_show_all_instances_updgrps_vty(struct vty *vty, afi_t afi,
10752 safi_t safi)
f186de26 10753{
d62a17ae 10754 struct listnode *node, *nnode;
10755 struct bgp *bgp;
f186de26 10756
d62a17ae 10757 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp)) {
10758 vty_out(vty, "\nInstance %s:\n",
10759 (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
10760 ? "Default"
10761 : bgp->name);
10762 update_group_show(bgp, afi, safi, vty, 0);
10763 }
f186de26 10764}
10765
d62a17ae 10766static int bgp_show_update_groups(struct vty *vty, const char *name, int afi,
10767 int safi, uint64_t subgrp_id)
4fb25c53 10768{
d62a17ae 10769 struct bgp *bgp;
4fb25c53 10770
d62a17ae 10771 if (name) {
10772 if (strmatch(name, "all")) {
10773 bgp_show_all_instances_updgrps_vty(vty, afi, safi);
10774 return CMD_SUCCESS;
10775 } else {
10776 bgp = bgp_lookup_by_name(name);
10777 }
10778 } else {
10779 bgp = bgp_get_default();
10780 }
4fb25c53 10781
d62a17ae 10782 if (bgp)
10783 update_group_show(bgp, afi, safi, vty, subgrp_id);
10784 return CMD_SUCCESS;
4fb25c53
DW		 10785}
10786
8fe8a7f6
DS		 10787DEFUN (show_ip_bgp_updgrps,
10788 show_ip_bgp_updgrps_cmd,
c1a44e43 10789 "show [ip] bgp [<view|vrf> VIEWVRFNAME] ["BGP_AFI_CMD_STR" ["BGP_SAFI_WITH_LABEL_CMD_STR"]] update-groups [SUBGROUP-ID]",
8386ac43 10790 SHOW_STR
10791 IP_STR
10792 BGP_STR
10793 BGP_INSTANCE_HELP_STR
c9e571b4 10794 BGP_AFI_HELP_STR
9bedbb1e 10795 BGP_SAFI_WITH_LABEL_HELP_STR
5bf15956
DW		 10796 "Detailed info about dynamic update groups\n"
10797 "Specific subgroup to display detailed info for\n")
8386ac43 10798{
d62a17ae 10799 char *vrf = NULL;
10800 afi_t afi = AFI_IP6;
10801 safi_t safi = SAFI_UNICAST;
10802 uint64_t subgrp_id = 0;
10803
10804 int idx = 0;
10805
10806 /* show [ip] bgp */
10807 if (argv_find(argv, argc, "ip", &idx))
10808 afi = AFI_IP;
10809 /* [<view|vrf> VIEWVRFNAME] */
10810 if (argv_find(argv, argc, "view", &idx)
10811 || argv_find(argv, argc, "vrf", &idx))
10812 vrf = argv[++idx]->arg;
10813 /* ["BGP_AFI_CMD_STR" ["BGP_SAFI_CMD_STR"]] */
10814 if (argv_find_and_parse_afi(argv, argc, &idx, &afi)) {
10815 argv_find_and_parse_safi(argv, argc, &idx, &safi);
10816 }
5bf15956 10817
d62a17ae 10818 /* get subgroup id, if provided */
10819 idx = argc - 1;
10820 if (argv[idx]->type == VARIABLE_TKN)
10821 subgrp_id = strtoull(argv[idx]->arg, NULL, 10);
5bf15956 10822
d62a17ae 10823 return (bgp_show_update_groups(vty, vrf, afi, safi, subgrp_id));
8fe8a7f6
DS		 10824}
10825
f186de26 10826DEFUN (show_bgp_instance_all_ipv6_updgrps,
10827 show_bgp_instance_all_ipv6_updgrps_cmd,
716b2d8a 10828 "show [ip] bgp <view|vrf> all update-groups",
f186de26 10829 SHOW_STR
716b2d8a 10830 IP_STR
f186de26 10831 BGP_STR
10832 BGP_INSTANCE_ALL_HELP_STR
0c7b1b01 10833 "Detailed info about dynamic update groups\n")
f186de26 10834{
d62a17ae 10835 bgp_show_all_instances_updgrps_vty(vty, AFI_IP6, SAFI_UNICAST);
10836 return CMD_SUCCESS;
f186de26 10837}
10838
5bf15956
DW		 10839DEFUN (show_bgp_updgrps_stats,
10840 show_bgp_updgrps_stats_cmd,
716b2d8a 10841 "show [ip] bgp update-groups statistics",
3f9c7369 10842 SHOW_STR
716b2d8a 10843 IP_STR
3f9c7369 10844 BGP_STR
0c7b1b01 10845 "Detailed info about dynamic update groups\n"
3f9c7369
DS		 10846 "Statistics\n")
10847{
d62a17ae 10848 struct bgp *bgp;
3f9c7369 10849
d62a17ae 10850 bgp = bgp_get_default();
10851 if (bgp)
10852 update_group_show_stats(bgp, vty);
3f9c7369 10853
d62a17ae 10854 return CMD_SUCCESS;
3f9c7369
DS		 10855}
10856
8386ac43 10857DEFUN (show_bgp_instance_updgrps_stats,
10858 show_bgp_instance_updgrps_stats_cmd,
18c57037 10859 "show [ip] bgp <view|vrf> VIEWVRFNAME update-groups statistics",
8386ac43 10860 SHOW_STR
716b2d8a 10861 IP_STR
8386ac43 10862 BGP_STR
10863 BGP_INSTANCE_HELP_STR
0c7b1b01 10864 "Detailed info about dynamic update groups\n"
8386ac43 10865 "Statistics\n")
10866{
d62a17ae 10867 int idx_word = 3;
10868 struct bgp *bgp;
8386ac43 10869
d62a17ae 10870 bgp = bgp_lookup_by_name(argv[idx_word]->arg);
10871 if (bgp)
10872 update_group_show_stats(bgp, vty);
8386ac43 10873
d62a17ae 10874 return CMD_SUCCESS;
8386ac43 10875}
10876
d62a17ae 10877static void show_bgp_updgrps_adj_info_aux(struct vty *vty, const char *name,
10878 afi_t afi, safi_t safi,
10879 const char *what, uint64_t subgrp_id)
3f9c7369 10880{
d62a17ae 10881 struct bgp *bgp;
8386ac43 10882
d62a17ae 10883 if (name)
10884 bgp = bgp_lookup_by_name(name);
10885 else
10886 bgp = bgp_get_default();
8386ac43 10887
d62a17ae 10888 if (bgp) {
10889 if (!strcmp(what, "advertise-queue"))
10890 update_group_show_adj_queue(bgp, afi, safi, vty,
10891 subgrp_id);
10892 else if (!strcmp(what, "advertised-routes"))
10893 update_group_show_advertised(bgp, afi, safi, vty,
10894 subgrp_id);
10895 else if (!strcmp(what, "packet-queue"))
10896 update_group_show_packet_queue(bgp, afi, safi, vty,
10897 subgrp_id);
10898 }
3f9c7369
DS		 10899}
10900
dc64bdec
QY		 10901DEFPY(show_ip_bgp_instance_updgrps_adj_s,
10902 show_ip_bgp_instance_updgrps_adj_s_cmd,
10903 "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",
10904 SHOW_STR IP_STR BGP_STR BGP_INSTANCE_HELP_STR BGP_AFI_HELP_STR
10905 BGP_SAFI_HELP_STR
10906 "Detailed info about dynamic update groups\n"
10907 "Specific subgroup to display info for\n"
10908 "Advertisement queue\n"
10909 "Announced routes\n"
10910 "Packet queue\n")
3f9c7369 10911{
dc64bdec
QY		 10912 uint64_t subgrp_id = 0;
10913 afi_t afiz;
10914 safi_t safiz;
10915 if (sgid)
10916 subgrp_id = strtoull(sgid, NULL, 10);
10917
10918 if (!ip && !afi)
10919 afiz = AFI_IP6;
10920 if (!ip && afi)
10921 afiz = bgp_vty_afi_from_str(afi);
10922 if (ip && !afi)
10923 afiz = AFI_IP;
10924 if (ip && afi) {
10925 afiz = bgp_vty_afi_from_str(afi);
10926 if (afiz != AFI_IP)
10927 vty_out(vty,
10928 "%% Cannot specify both 'ip' and 'ipv6'\n");
10929 return CMD_WARNING;
10930 }
d62a17ae 10931
dc64bdec 10932 safiz = safi ? bgp_vty_safi_from_str(safi) : SAFI_UNICAST;
d62a17ae 10933
dc64bdec 10934 show_bgp_updgrps_adj_info_aux(vty, vrf, afiz, safiz, rtq, subgrp_id);
d62a17ae 10935 return CMD_SUCCESS;
10936}
10937
d62a17ae 10938static int bgp_show_one_peer_group(struct vty *vty, struct peer_group *group)
10939{
10940 struct listnode *node, *nnode;
10941 struct prefix *range;
10942 struct peer *conf;
10943 struct peer *peer;
10944 char buf[PREFIX2STR_BUFFER];
10945 afi_t afi;
10946 safi_t safi;
10947 const char *peer_status;
10948 const char *af_str;
10949 int lr_count;
10950 int dynamic;
10951 int af_cfgd;
10952
10953 conf = group->conf;
10954
10955 if (conf->as_type == AS_SPECIFIED || conf->as_type == AS_EXTERNAL) {
10956 vty_out(vty, "\nBGP peer-group %s, remote AS %d\n", group->name,
10957 conf->as);
10958 } else if (conf->as_type == AS_INTERNAL) {
10959 vty_out(vty, "\nBGP peer-group %s, remote AS %d\n", group->name,
10960 group->bgp->as);
10961 } else {
10962 vty_out(vty, "\nBGP peer-group %s\n", group->name);
10963 }
f14e6fdb 10964
d62a17ae 10965 if ((group->bgp->as == conf->as) || (conf->as_type == AS_INTERNAL))
10966 vty_out(vty, " Peer-group type is internal\n");
10967 else
10968 vty_out(vty, " Peer-group type is external\n");
10969
10970 /* Display AFs configured. */
10971 vty_out(vty, " Configured address-families:");
05c7a1cc
QY		 10972 FOREACH_AFI_SAFI (afi, safi) {
10973 if (conf->afc[afi][safi]) {
10974 af_cfgd = 1;
10975 vty_out(vty, " %s;", afi_safi_print(afi, safi));
d62a17ae 10976 }
05c7a1cc 10977 }
d62a17ae 10978 if (!af_cfgd)
10979 vty_out(vty, " none\n");
10980 else
10981 vty_out(vty, "\n");
10982
10983 /* Display listen ranges (for dynamic neighbors), if any */
10984 for (afi = AFI_IP; afi < AFI_MAX; afi++) {
10985 if (afi == AFI_IP)
10986 af_str = "IPv4";
10987 else if (afi == AFI_IP6)
10988 af_str = "IPv6";
10989 else
10990 af_str = "???";
10991 lr_count = listcount(group->listen_range[afi]);
10992 if (lr_count) {
10993 vty_out(vty, " %d %s listen range(s)\n", lr_count,
10994 af_str);
10995
10996
10997 for (ALL_LIST_ELEMENTS(group->listen_range[afi], node,
10998 nnode, range)) {
10999 prefix2str(range, buf, sizeof(buf));
11000 vty_out(vty, " %s\n", buf);
11001 }
11002 }
11003 }
f14e6fdb 11004
d62a17ae 11005 /* Display group members and their status */
11006 if (listcount(group->peer)) {
11007 vty_out(vty, " Peer-group members:\n");
11008 for (ALL_LIST_ELEMENTS(group->peer, node, nnode, peer)) {
11009 if (CHECK_FLAG(peer->flags, PEER_FLAG_SHUTDOWN))
11010 peer_status = "Idle (Admin)";
11011 else if (CHECK_FLAG(peer->sflags,
11012 PEER_STATUS_PREFIX_OVERFLOW))
11013 peer_status = "Idle (PfxCt)";
11014 else
11015 peer_status = lookup_msg(bgp_status_msg,
11016 peer->status, NULL);
11017
11018 dynamic = peer_dynamic_neighbor(peer);
11019 vty_out(vty, " %s %s %s \n", peer->host,
11020 dynamic ? "(dynamic)" : "", peer_status);
11021 }
11022 }
f14e6fdb 11023
d62a17ae 11024 return CMD_SUCCESS;
11025}
11026
ff9959b0
QY		 11027static int bgp_show_peer_group_vty(struct vty *vty, const char *name,
11028 const char *group_name)
d62a17ae 11029{
ff9959b0 11030 struct bgp *bgp;
d62a17ae 11031 struct listnode *node, *nnode;
11032 struct peer_group *group;
ff9959b0
QY		 11033 bool found = false;
11034
11035 bgp = name ? bgp_lookup_by_name(name) : bgp_get_default();
11036
11037 if (!bgp) {
11038 vty_out(vty, "%% No such BGP instance exists\n");
11039 return CMD_WARNING;
11040 }
d62a17ae 11041
11042 for (ALL_LIST_ELEMENTS(bgp->group, node, nnode, group)) {
ff9959b0
QY		 11043 if (group_name) {
11044 if (strmatch(group->name, group_name)) {
d62a17ae 11045 bgp_show_one_peer_group(vty, group);
ff9959b0
QY		 11046 found = true;
11047 break;
d62a17ae 11048 }
ff9959b0
QY		 11049 } else {
11050 bgp_show_one_peer_group(vty, group);
d62a17ae 11051 }
f14e6fdb 11052 }
f14e6fdb 11053
ff9959b0 11054 if (group_name && !found)
d62a17ae 11055 vty_out(vty, "%% No such peer-group\n");
f14e6fdb 11056
d62a17ae 11057 return CMD_SUCCESS;
f14e6fdb
DS		 11058}
11059
f14e6fdb
DS		 11060DEFUN (show_ip_bgp_peer_groups,
11061 show_ip_bgp_peer_groups_cmd,
18c57037 11062 "show [ip] bgp [<view|vrf> VIEWVRFNAME] peer-group [PGNAME]",
f14e6fdb
DS		 11063 SHOW_STR
11064 IP_STR
11065 BGP_STR
8386ac43 11066 BGP_INSTANCE_HELP_STR
d6e3c605
QY		 11067 "Detailed information on BGP peer groups\n"
11068 "Peer group name\n")
f14e6fdb 11069{
d62a17ae 11070 char *vrf, *pg;
11071 vrf = pg = NULL;
11072 int idx = 0;
f14e6fdb 11073
a4d82a8a
PZ		 11074 vrf = argv_find(argv, argc, "VIEWVRFNAME", &idx) ? argv[idx]->arg
11075 : NULL;
d62a17ae 11076 pg = argv_find(argv, argc, "PGNAME", &idx) ? argv[idx]->arg : NULL;
f14e6fdb 11077
ff9959b0 11078 return bgp_show_peer_group_vty(vty, vrf, pg);
f14e6fdb 11079}
3f9c7369 11080
d6e3c605 11081
718e3744 11082/* Redistribute VTY commands. */
11083
718e3744 11084DEFUN (bgp_redistribute_ipv4,
11085 bgp_redistribute_ipv4_cmd,
40d1cbfb 11086 "redistribute " FRR_IP_REDIST_STR_BGPD,
718e3744 11087 "Redistribute information from another routing protocol\n"
ab0181ee 11088 FRR_IP_REDIST_HELP_STR_BGPD)
718e3744 11089{
d62a17ae 11090 VTY_DECLVAR_CONTEXT(bgp, bgp);
11091 int idx_protocol = 1;
11092 int type;
718e3744 11093
d62a17ae 11094 type = proto_redistnum(AFI_IP, argv[idx_protocol]->text);
11095 if (type < 0) {
11096 vty_out(vty, "%% Invalid route type\n");
11097 return CMD_WARNING_CONFIG_FAILED;
11098 }
7f323236 11099
d62a17ae 11100 bgp_redist_add(bgp, AFI_IP, type, 0);
11101 return bgp_redistribute_set(bgp, AFI_IP, type, 0);
718e3744 11102}
11103
d62a17ae 11104ALIAS_HIDDEN(
11105 bgp_redistribute_ipv4, bgp_redistribute_ipv4_hidden_cmd,
11106 "redistribute " FRR_IP_REDIST_STR_BGPD,
11107 "Redistribute information from another routing protocol\n" FRR_IP_REDIST_HELP_STR_BGPD)
596c17ba 11108
718e3744 11109DEFUN (bgp_redistribute_ipv4_rmap,
11110 bgp_redistribute_ipv4_rmap_cmd,
40d1cbfb 11111 "redistribute " FRR_IP_REDIST_STR_BGPD " route-map WORD",
718e3744 11112 "Redistribute information from another routing protocol\n"
ab0181ee 11113 FRR_IP_REDIST_HELP_STR_BGPD
718e3744 11114 "Route map reference\n"
11115 "Pointer to route-map entries\n")
11116{
d62a17ae 11117 VTY_DECLVAR_CONTEXT(bgp, bgp);
11118 int idx_protocol = 1;
11119 int idx_word = 3;
11120 int type;
11121 struct bgp_redist *red;
718e3744 11122
d62a17ae 11123 type = proto_redistnum(AFI_IP, argv[idx_protocol]->text);
11124 if (type < 0) {
11125 vty_out(vty, "%% Invalid route type\n");
11126 return CMD_WARNING_CONFIG_FAILED;
11127 }
718e3744 11128
d62a17ae 11129 red = bgp_redist_add(bgp, AFI_IP, type, 0);
11130 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11131 return bgp_redistribute_set(bgp, AFI_IP, type, 0);
718e3744 11132}
11133
d62a17ae 11134ALIAS_HIDDEN(
11135 bgp_redistribute_ipv4_rmap, bgp_redistribute_ipv4_rmap_hidden_cmd,
11136 "redistribute " FRR_IP_REDIST_STR_BGPD " route-map WORD",
11137 "Redistribute information from another routing protocol\n" FRR_IP_REDIST_HELP_STR_BGPD
11138 "Route map reference\n"
11139 "Pointer to route-map entries\n")
596c17ba 11140
718e3744 11141DEFUN (bgp_redistribute_ipv4_metric,
11142 bgp_redistribute_ipv4_metric_cmd,
40d1cbfb 11143 "redistribute " FRR_IP_REDIST_STR_BGPD " metric (0-4294967295)",
718e3744 11144 "Redistribute information from another routing protocol\n"
ab0181ee 11145 FRR_IP_REDIST_HELP_STR_BGPD
718e3744 11146 "Metric for redistributed routes\n"
11147 "Default metric\n")
11148{
d62a17ae 11149 VTY_DECLVAR_CONTEXT(bgp, bgp);
11150 int idx_protocol = 1;
11151 int idx_number = 3;
11152 int type;
d7c0a89a 11153 uint32_t metric;
d62a17ae 11154 struct bgp_redist *red;
11155
11156 type = proto_redistnum(AFI_IP, argv[idx_protocol]->text);
11157 if (type < 0) {
11158 vty_out(vty, "%% Invalid route type\n");
11159 return CMD_WARNING_CONFIG_FAILED;
11160 }
11161 metric = strtoul(argv[idx_number]->arg, NULL, 10);
11162
11163 red = bgp_redist_add(bgp, AFI_IP, type, 0);
11164 bgp_redistribute_metric_set(bgp, red, AFI_IP, type, metric);
11165 return bgp_redistribute_set(bgp, AFI_IP, type, 0);
11166}
11167
11168ALIAS_HIDDEN(
11169 bgp_redistribute_ipv4_metric, bgp_redistribute_ipv4_metric_hidden_cmd,
11170 "redistribute " FRR_IP_REDIST_STR_BGPD " metric (0-4294967295)",
11171 "Redistribute information from another routing protocol\n" FRR_IP_REDIST_HELP_STR_BGPD
11172 "Metric for redistributed routes\n"
11173 "Default metric\n")
596c17ba 11174
718e3744 11175DEFUN (bgp_redistribute_ipv4_rmap_metric,
11176 bgp_redistribute_ipv4_rmap_metric_cmd,
40d1cbfb 11177 "redistribute " FRR_IP_REDIST_STR_BGPD " route-map WORD metric (0-4294967295)",
718e3744 11178 "Redistribute information from another routing protocol\n"
ab0181ee 11179 FRR_IP_REDIST_HELP_STR_BGPD
718e3744 11180 "Route map reference\n"
11181 "Pointer to route-map entries\n"
11182 "Metric for redistributed routes\n"
11183 "Default metric\n")
11184{
d62a17ae 11185 VTY_DECLVAR_CONTEXT(bgp, bgp);
11186 int idx_protocol = 1;
11187 int idx_word = 3;
11188 int idx_number = 5;
11189 int type;
d7c0a89a 11190 uint32_t metric;
d62a17ae 11191 struct bgp_redist *red;
11192
11193 type = proto_redistnum(AFI_IP, argv[idx_protocol]->text);
11194 if (type < 0) {
11195 vty_out(vty, "%% Invalid route type\n");
11196 return CMD_WARNING_CONFIG_FAILED;
11197 }
11198 metric = strtoul(argv[idx_number]->arg, NULL, 10);
11199
11200 red = bgp_redist_add(bgp, AFI_IP, type, 0);
11201 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11202 bgp_redistribute_metric_set(bgp, red, AFI_IP, type, metric);
11203 return bgp_redistribute_set(bgp, AFI_IP, type, 0);
11204}
11205
11206ALIAS_HIDDEN(
11207 bgp_redistribute_ipv4_rmap_metric,
11208 bgp_redistribute_ipv4_rmap_metric_hidden_cmd,
11209 "redistribute " FRR_IP_REDIST_STR_BGPD
11210 " route-map WORD metric (0-4294967295)",
11211 "Redistribute information from another routing protocol\n" FRR_IP_REDIST_HELP_STR_BGPD
11212 "Route map reference\n"
11213 "Pointer to route-map entries\n"
11214 "Metric for redistributed routes\n"
11215 "Default metric\n")
596c17ba 11216
718e3744 11217DEFUN (bgp_redistribute_ipv4_metric_rmap,
11218 bgp_redistribute_ipv4_metric_rmap_cmd,
40d1cbfb 11219 "redistribute " FRR_IP_REDIST_STR_BGPD " metric (0-4294967295) route-map WORD",
718e3744 11220 "Redistribute information from another routing protocol\n"
ab0181ee 11221 FRR_IP_REDIST_HELP_STR_BGPD
718e3744 11222 "Metric for redistributed routes\n"
11223 "Default metric\n"
11224 "Route map reference\n"
11225 "Pointer to route-map entries\n")
11226{
d62a17ae 11227 VTY_DECLVAR_CONTEXT(bgp, bgp);
11228 int idx_protocol = 1;
11229 int idx_number = 3;
11230 int idx_word = 5;
11231 int type;
d7c0a89a 11232 uint32_t metric;
d62a17ae 11233 struct bgp_redist *red;
11234
11235 type = proto_redistnum(AFI_IP, argv[idx_protocol]->text);
11236 if (type < 0) {
11237 vty_out(vty, "%% Invalid route type\n");
11238 return CMD_WARNING_CONFIG_FAILED;
11239 }
11240 metric = strtoul(argv[idx_number]->arg, NULL, 10);
11241
11242 red = bgp_redist_add(bgp, AFI_IP, type, 0);
11243 bgp_redistribute_metric_set(bgp, red, AFI_IP, type, metric);
11244 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11245 return bgp_redistribute_set(bgp, AFI_IP, type, 0);
11246}
11247
11248ALIAS_HIDDEN(
11249 bgp_redistribute_ipv4_metric_rmap,
11250 bgp_redistribute_ipv4_metric_rmap_hidden_cmd,
11251 "redistribute " FRR_IP_REDIST_STR_BGPD
11252 " metric (0-4294967295) route-map WORD",
11253 "Redistribute information from another routing protocol\n" FRR_IP_REDIST_HELP_STR_BGPD
11254 "Metric for redistributed routes\n"
11255 "Default metric\n"
11256 "Route map reference\n"
11257 "Pointer to route-map entries\n")
596c17ba 11258
7c8ff89e
DS		 11259DEFUN (bgp_redistribute_ipv4_ospf,
11260 bgp_redistribute_ipv4_ospf_cmd,
6147e2c6 11261 "redistribute <ospf|table> (1-65535)",
7c8ff89e
DS		 11262 "Redistribute information from another routing protocol\n"
11263 "Open Shortest Path First (OSPFv2)\n"
2d627ff5
DS		 11264 "Non-main Kernel Routing Table\n"
11265 "Instance ID/Table ID\n")
7c8ff89e 11266{
d62a17ae 11267 VTY_DECLVAR_CONTEXT(bgp, bgp);
11268 int idx_ospf_table = 1;
11269 int idx_number = 2;
d7c0a89a
QY		 11270 unsigned short instance;
11271 unsigned short protocol;
7c8ff89e 11272
d62a17ae 11273 instance = strtoul(argv[idx_number]->arg, NULL, 10);
7a4bb9c5 11274
d62a17ae 11275 if (strncmp(argv[idx_ospf_table]->arg, "o", 1) == 0)
11276 protocol = ZEBRA_ROUTE_OSPF;
11277 else
11278 protocol = ZEBRA_ROUTE_TABLE;
7a4bb9c5 11279
d62a17ae 11280 bgp_redist_add(bgp, AFI_IP, protocol, instance);
11281 return bgp_redistribute_set(bgp, AFI_IP, protocol, instance);
7c8ff89e
DS		 11282}
11283
d62a17ae 11284ALIAS_HIDDEN(bgp_redistribute_ipv4_ospf, bgp_redistribute_ipv4_ospf_hidden_cmd,
11285 "redistribute <ospf|table> (1-65535)",
11286 "Redistribute information from another routing protocol\n"
11287 "Open Shortest Path First (OSPFv2)\n"
11288 "Non-main Kernel Routing Table\n"
11289 "Instance ID/Table ID\n")
596c17ba 11290
7c8ff89e
DS		 11291DEFUN (bgp_redistribute_ipv4_ospf_rmap,
11292 bgp_redistribute_ipv4_ospf_rmap_cmd,
6147e2c6 11293 "redistribute <ospf|table> (1-65535) route-map WORD",
7c8ff89e
DS		 11294 "Redistribute information from another routing protocol\n"
11295 "Open Shortest Path First (OSPFv2)\n"
2d627ff5
DS		 11296 "Non-main Kernel Routing Table\n"
11297 "Instance ID/Table ID\n"
7c8ff89e
DS		 11298 "Route map reference\n"
11299 "Pointer to route-map entries\n")
11300{
d62a17ae 11301 VTY_DECLVAR_CONTEXT(bgp, bgp);
11302 int idx_ospf_table = 1;
11303 int idx_number = 2;
11304 int idx_word = 4;
11305 struct bgp_redist *red;
d7c0a89a 11306 unsigned short instance;
d62a17ae 11307 int protocol;
11308
11309 if (strncmp(argv[idx_ospf_table]->arg, "o", 1) == 0)
11310 protocol = ZEBRA_ROUTE_OSPF;
11311 else
11312 protocol = ZEBRA_ROUTE_TABLE;
11313
11314 instance = strtoul(argv[idx_number]->arg, NULL, 10);
11315 red = bgp_redist_add(bgp, AFI_IP, protocol, instance);
11316 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11317 return bgp_redistribute_set(bgp, AFI_IP, protocol, instance);
11318}
11319
11320ALIAS_HIDDEN(bgp_redistribute_ipv4_ospf_rmap,
11321 bgp_redistribute_ipv4_ospf_rmap_hidden_cmd,
11322 "redistribute <ospf|table> (1-65535) route-map WORD",
11323 "Redistribute information from another routing protocol\n"
11324 "Open Shortest Path First (OSPFv2)\n"
11325 "Non-main Kernel Routing Table\n"
11326 "Instance ID/Table ID\n"
11327 "Route map reference\n"
11328 "Pointer to route-map entries\n")
596c17ba 11329
7c8ff89e
DS		 11330DEFUN (bgp_redistribute_ipv4_ospf_metric,
11331 bgp_redistribute_ipv4_ospf_metric_cmd,
6147e2c6 11332 "redistribute <ospf|table> (1-65535) metric (0-4294967295)",
7c8ff89e
DS		 11333 "Redistribute information from another routing protocol\n"
11334 "Open Shortest Path First (OSPFv2)\n"
2d627ff5
DS		 11335 "Non-main Kernel Routing Table\n"
11336 "Instance ID/Table ID\n"
7c8ff89e
DS		 11337 "Metric for redistributed routes\n"
11338 "Default metric\n")
11339{
d62a17ae 11340 VTY_DECLVAR_CONTEXT(bgp, bgp);
11341 int idx_ospf_table = 1;
11342 int idx_number = 2;
11343 int idx_number_2 = 4;
d7c0a89a 11344 uint32_t metric;
d62a17ae 11345 struct bgp_redist *red;
d7c0a89a 11346 unsigned short instance;
d62a17ae 11347 int protocol;
11348
11349 if (strncmp(argv[idx_ospf_table]->arg, "o", 1) == 0)
11350 protocol = ZEBRA_ROUTE_OSPF;
11351 else
11352 protocol = ZEBRA_ROUTE_TABLE;
11353
11354 instance = strtoul(argv[idx_number]->arg, NULL, 10);
11355 metric = strtoul(argv[idx_number_2]->arg, NULL, 10);
11356
11357 red = bgp_redist_add(bgp, AFI_IP, protocol, instance);
11358 bgp_redistribute_metric_set(bgp, red, AFI_IP, protocol, metric);
11359 return bgp_redistribute_set(bgp, AFI_IP, protocol, instance);
11360}
11361
11362ALIAS_HIDDEN(bgp_redistribute_ipv4_ospf_metric,
11363 bgp_redistribute_ipv4_ospf_metric_hidden_cmd,
11364 "redistribute <ospf|table> (1-65535) metric (0-4294967295)",
11365 "Redistribute information from another routing protocol\n"
11366 "Open Shortest Path First (OSPFv2)\n"
11367 "Non-main Kernel Routing Table\n"
11368 "Instance ID/Table ID\n"
11369 "Metric for redistributed routes\n"
11370 "Default metric\n")
596c17ba 11371
7c8ff89e
DS		 11372DEFUN (bgp_redistribute_ipv4_ospf_rmap_metric,
11373 bgp_redistribute_ipv4_ospf_rmap_metric_cmd,
6147e2c6 11374 "redistribute <ospf|table> (1-65535) route-map WORD metric (0-4294967295)",
7c8ff89e
DS		 11375 "Redistribute information from another routing protocol\n"
11376 "Open Shortest Path First (OSPFv2)\n"
2d627ff5
DS		 11377 "Non-main Kernel Routing Table\n"
11378 "Instance ID/Table ID\n"
7c8ff89e
DS		 11379 "Route map reference\n"
11380 "Pointer to route-map entries\n"
11381 "Metric for redistributed routes\n"
11382 "Default metric\n")
11383{
d62a17ae 11384 VTY_DECLVAR_CONTEXT(bgp, bgp);
11385 int idx_ospf_table = 1;
11386 int idx_number = 2;
11387 int idx_word = 4;
11388 int idx_number_2 = 6;
d7c0a89a 11389 uint32_t metric;
d62a17ae 11390 struct bgp_redist *red;
d7c0a89a 11391 unsigned short instance;
d62a17ae 11392 int protocol;
11393
11394 if (strncmp(argv[idx_ospf_table]->arg, "o", 1) == 0)
11395 protocol = ZEBRA_ROUTE_OSPF;
11396 else
11397 protocol = ZEBRA_ROUTE_TABLE;
11398
11399 instance = strtoul(argv[idx_number]->arg, NULL, 10);
11400 metric = strtoul(argv[idx_number_2]->arg, NULL, 10);
11401
11402 red = bgp_redist_add(bgp, AFI_IP, protocol, instance);
11403 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11404 bgp_redistribute_metric_set(bgp, red, AFI_IP, protocol, metric);
11405 return bgp_redistribute_set(bgp, AFI_IP, protocol, instance);
11406}
11407
11408ALIAS_HIDDEN(
11409 bgp_redistribute_ipv4_ospf_rmap_metric,
11410 bgp_redistribute_ipv4_ospf_rmap_metric_hidden_cmd,
11411 "redistribute <ospf|table> (1-65535) route-map WORD metric (0-4294967295)",
11412 "Redistribute information from another routing protocol\n"
11413 "Open Shortest Path First (OSPFv2)\n"
11414 "Non-main Kernel Routing Table\n"
11415 "Instance ID/Table ID\n"
11416 "Route map reference\n"
11417 "Pointer to route-map entries\n"
11418 "Metric for redistributed routes\n"
11419 "Default metric\n")
596c17ba 11420
7c8ff89e
DS		 11421DEFUN (bgp_redistribute_ipv4_ospf_metric_rmap,
11422 bgp_redistribute_ipv4_ospf_metric_rmap_cmd,
6147e2c6 11423 "redistribute <ospf|table> (1-65535) metric (0-4294967295) route-map WORD",
7c8ff89e
DS		 11424 "Redistribute information from another routing protocol\n"
11425 "Open Shortest Path First (OSPFv2)\n"
2d627ff5
DS		 11426 "Non-main Kernel Routing Table\n"
11427 "Instance ID/Table ID\n"
7c8ff89e
DS		 11428 "Metric for redistributed routes\n"
11429 "Default metric\n"
11430 "Route map reference\n"
11431 "Pointer to route-map entries\n")
11432{
d62a17ae 11433 VTY_DECLVAR_CONTEXT(bgp, bgp);
11434 int idx_ospf_table = 1;
11435 int idx_number = 2;
11436 int idx_number_2 = 4;
11437 int idx_word = 6;
d7c0a89a 11438 uint32_t metric;
d62a17ae 11439 struct bgp_redist *red;
d7c0a89a 11440 unsigned short instance;
d62a17ae 11441 int protocol;
11442
11443 if (strncmp(argv[idx_ospf_table]->arg, "o", 1) == 0)
11444 protocol = ZEBRA_ROUTE_OSPF;
11445 else
11446 protocol = ZEBRA_ROUTE_TABLE;
11447
11448 instance = strtoul(argv[idx_number]->arg, NULL, 10);
11449 metric = strtoul(argv[idx_number_2]->arg, NULL, 10);
11450
11451 red = bgp_redist_add(bgp, AFI_IP, protocol, instance);
11452 bgp_redistribute_metric_set(bgp, red, AFI_IP, protocol, metric);
11453 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11454 return bgp_redistribute_set(bgp, AFI_IP, protocol, instance);
11455}
11456
11457ALIAS_HIDDEN(
11458 bgp_redistribute_ipv4_ospf_metric_rmap,
11459 bgp_redistribute_ipv4_ospf_metric_rmap_hidden_cmd,
11460 "redistribute <ospf|table> (1-65535) metric (0-4294967295) route-map WORD",
11461 "Redistribute information from another routing protocol\n"
11462 "Open Shortest Path First (OSPFv2)\n"
11463 "Non-main Kernel Routing Table\n"
11464 "Instance ID/Table ID\n"
11465 "Metric for redistributed routes\n"
11466 "Default metric\n"
11467 "Route map reference\n"
11468 "Pointer to route-map entries\n")
596c17ba 11469
7c8ff89e
DS		 11470DEFUN (no_bgp_redistribute_ipv4_ospf,
11471 no_bgp_redistribute_ipv4_ospf_cmd,
d04c479d 11472 "no redistribute <ospf|table> (1-65535) [metric (0-4294967295)] [route-map WORD]",
7c8ff89e
DS		 11473 NO_STR
11474 "Redistribute information from another routing protocol\n"
11475 "Open Shortest Path First (OSPFv2)\n"
2d627ff5 11476 "Non-main Kernel Routing Table\n"
31500417
DW		 11477 "Instance ID/Table ID\n"
11478 "Metric for redistributed routes\n"
11479 "Default metric\n"
11480 "Route map reference\n"
11481 "Pointer to route-map entries\n")
7c8ff89e 11482{
d62a17ae 11483 VTY_DECLVAR_CONTEXT(bgp, bgp);
11484 int idx_ospf_table = 2;
11485 int idx_number = 3;
d7c0a89a 11486 unsigned short instance;
d62a17ae 11487 int protocol;
11488
11489 if (strncmp(argv[idx_ospf_table]->arg, "o", 1) == 0)
11490 protocol = ZEBRA_ROUTE_OSPF;
11491 else
11492 protocol = ZEBRA_ROUTE_TABLE;
11493
11494 instance = strtoul(argv[idx_number]->arg, NULL, 10);
11495 return bgp_redistribute_unset(bgp, AFI_IP, protocol, instance);
11496}
11497
11498ALIAS_HIDDEN(
11499 no_bgp_redistribute_ipv4_ospf, no_bgp_redistribute_ipv4_ospf_hidden_cmd,
11500 "no redistribute <ospf|table> (1-65535) [metric (0-4294967295)] [route-map WORD]",
11501 NO_STR
11502 "Redistribute information from another routing protocol\n"
11503 "Open Shortest Path First (OSPFv2)\n"
11504 "Non-main Kernel Routing Table\n"
11505 "Instance ID/Table ID\n"
11506 "Metric for redistributed routes\n"
11507 "Default metric\n"
11508 "Route map reference\n"
11509 "Pointer to route-map entries\n")
596c17ba 11510
718e3744 11511DEFUN (no_bgp_redistribute_ipv4,
11512 no_bgp_redistribute_ipv4_cmd,
40d1cbfb 11513 "no redistribute " FRR_IP_REDIST_STR_BGPD " [metric (0-4294967295)] [route-map WORD]",
718e3744 11514 NO_STR
11515 "Redistribute information from another routing protocol\n"
3b14d86e 11516 FRR_IP_REDIST_HELP_STR_BGPD
31500417
DW		 11517 "Metric for redistributed routes\n"
11518 "Default metric\n"
11519 "Route map reference\n"
11520 "Pointer to route-map entries\n")
718e3744 11521{
d62a17ae 11522 VTY_DECLVAR_CONTEXT(bgp, bgp);
11523 int idx_protocol = 2;
11524 int type;
11525
11526 type = proto_redistnum(AFI_IP, argv[idx_protocol]->text);
11527 if (type < 0) {
11528 vty_out(vty, "%% Invalid route type\n");
11529 return CMD_WARNING_CONFIG_FAILED;
11530 }
11531 return bgp_redistribute_unset(bgp, AFI_IP, type, 0);
11532}
11533
11534ALIAS_HIDDEN(
11535 no_bgp_redistribute_ipv4, no_bgp_redistribute_ipv4_hidden_cmd,
11536 "no redistribute " FRR_IP_REDIST_STR_BGPD
11537 " [metric (0-4294967295)] [route-map WORD]",
11538 NO_STR
11539 "Redistribute information from another routing protocol\n" FRR_IP_REDIST_HELP_STR_BGPD
11540 "Metric for redistributed routes\n"
11541 "Default metric\n"
11542 "Route map reference\n"
11543 "Pointer to route-map entries\n")
596c17ba 11544
718e3744 11545DEFUN (bgp_redistribute_ipv6,
11546 bgp_redistribute_ipv6_cmd,
40d1cbfb 11547 "redistribute " FRR_IP6_REDIST_STR_BGPD,
718e3744 11548 "Redistribute information from another routing protocol\n"
ab0181ee 11549 FRR_IP6_REDIST_HELP_STR_BGPD)
718e3744 11550{
d62a17ae 11551 VTY_DECLVAR_CONTEXT(bgp, bgp);
11552 int idx_protocol = 1;
11553 int type;
718e3744 11554
d62a17ae 11555 type = proto_redistnum(AFI_IP6, argv[idx_protocol]->text);
11556 if (type < 0) {
11557 vty_out(vty, "%% Invalid route type\n");
11558 return CMD_WARNING_CONFIG_FAILED;
11559 }
718e3744 11560
d62a17ae 11561 bgp_redist_add(bgp, AFI_IP6, type, 0);
11562 return bgp_redistribute_set(bgp, AFI_IP6, type, 0);
718e3744 11563}
11564
11565DEFUN (bgp_redistribute_ipv6_rmap,
11566 bgp_redistribute_ipv6_rmap_cmd,
40d1cbfb 11567 "redistribute " FRR_IP6_REDIST_STR_BGPD " route-map WORD",
718e3744 11568 "Redistribute information from another routing protocol\n"
ab0181ee 11569 FRR_IP6_REDIST_HELP_STR_BGPD
718e3744 11570 "Route map reference\n"
11571 "Pointer to route-map entries\n")
11572{
d62a17ae 11573 VTY_DECLVAR_CONTEXT(bgp, bgp);
11574 int idx_protocol = 1;
11575 int idx_word = 3;
11576 int type;
11577 struct bgp_redist *red;
718e3744 11578
d62a17ae 11579 type = proto_redistnum(AFI_IP6, argv[idx_protocol]->text);
11580 if (type < 0) {
11581 vty_out(vty, "%% Invalid route type\n");
11582 return CMD_WARNING_CONFIG_FAILED;
11583 }
718e3744 11584
d62a17ae 11585 red = bgp_redist_add(bgp, AFI_IP6, type, 0);
11586 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11587 return bgp_redistribute_set(bgp, AFI_IP6, type, 0);
718e3744 11588}
11589
11590DEFUN (bgp_redistribute_ipv6_metric,
11591 bgp_redistribute_ipv6_metric_cmd,
40d1cbfb 11592 "redistribute " FRR_IP6_REDIST_STR_BGPD " metric (0-4294967295)",
718e3744 11593 "Redistribute information from another routing protocol\n"
ab0181ee 11594 FRR_IP6_REDIST_HELP_STR_BGPD
718e3744 11595 "Metric for redistributed routes\n"
11596 "Default metric\n")
11597{
d62a17ae 11598 VTY_DECLVAR_CONTEXT(bgp, bgp);
11599 int idx_protocol = 1;
11600 int idx_number = 3;
11601 int type;
d7c0a89a 11602 uint32_t metric;
d62a17ae 11603 struct bgp_redist *red;
11604
11605 type = proto_redistnum(AFI_IP6, argv[idx_protocol]->text);
11606 if (type < 0) {
11607 vty_out(vty, "%% Invalid route type\n");
11608 return CMD_WARNING_CONFIG_FAILED;
11609 }
11610 metric = strtoul(argv[idx_number]->arg, NULL, 10);
718e3744 11611
d62a17ae 11612 red = bgp_redist_add(bgp, AFI_IP6, type, 0);
11613 bgp_redistribute_metric_set(bgp, red, AFI_IP6, type, metric);
11614 return bgp_redistribute_set(bgp, AFI_IP6, type, 0);
718e3744 11615}
11616
11617DEFUN (bgp_redistribute_ipv6_rmap_metric,
11618 bgp_redistribute_ipv6_rmap_metric_cmd,
40d1cbfb 11619 "redistribute " FRR_IP6_REDIST_STR_BGPD " route-map WORD metric (0-4294967295)",
718e3744 11620 "Redistribute information from another routing protocol\n"
ab0181ee 11621 FRR_IP6_REDIST_HELP_STR_BGPD
718e3744 11622 "Route map reference\n"
11623 "Pointer to route-map entries\n"
11624 "Metric for redistributed routes\n"
11625 "Default metric\n")
11626{
d62a17ae 11627 VTY_DECLVAR_CONTEXT(bgp, bgp);
11628 int idx_protocol = 1;
11629 int idx_word = 3;
11630 int idx_number = 5;
11631 int type;
d7c0a89a 11632 uint32_t metric;
d62a17ae 11633 struct bgp_redist *red;
11634
11635 type = proto_redistnum(AFI_IP6, argv[idx_protocol]->text);
11636 if (type < 0) {
11637 vty_out(vty, "%% Invalid route type\n");
11638 return CMD_WARNING_CONFIG_FAILED;
11639 }
11640 metric = strtoul(argv[idx_number]->arg, NULL, 10);
718e3744 11641
d62a17ae 11642 red = bgp_redist_add(bgp, AFI_IP6, type, 0);
11643 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11644 bgp_redistribute_metric_set(bgp, red, AFI_IP6, type, metric);
11645 return bgp_redistribute_set(bgp, AFI_IP6, type, 0);
718e3744 11646}
11647
11648DEFUN (bgp_redistribute_ipv6_metric_rmap,
11649 bgp_redistribute_ipv6_metric_rmap_cmd,
40d1cbfb 11650 "redistribute " FRR_IP6_REDIST_STR_BGPD " metric (0-4294967295) route-map WORD",
718e3744 11651 "Redistribute information from another routing protocol\n"
ab0181ee 11652 FRR_IP6_REDIST_HELP_STR_BGPD
718e3744 11653 "Metric for redistributed routes\n"
11654 "Default metric\n"
11655 "Route map reference\n"
11656 "Pointer to route-map entries\n")
11657{
d62a17ae 11658 VTY_DECLVAR_CONTEXT(bgp, bgp);
11659 int idx_protocol = 1;
11660 int idx_number = 3;
11661 int idx_word = 5;
11662 int type;
d7c0a89a 11663 uint32_t metric;
d62a17ae 11664 struct bgp_redist *red;
11665
11666 type = proto_redistnum(AFI_IP6, argv[idx_protocol]->text);
11667 if (type < 0) {
11668 vty_out(vty, "%% Invalid route type\n");
11669 return CMD_WARNING_CONFIG_FAILED;
11670 }
11671 metric = strtoul(argv[idx_number]->arg, NULL, 10);
718e3744 11672
d62a17ae 11673 red = bgp_redist_add(bgp, AFI_IP6, type, 0);
11674 bgp_redistribute_metric_set(bgp, red, AFI_IP6, SAFI_UNICAST, metric);
11675 bgp_redistribute_rmap_set(red, argv[idx_word]->arg);
11676 return bgp_redistribute_set(bgp, AFI_IP6, type, 0);
718e3744 11677}
11678
11679DEFUN (no_bgp_redistribute_ipv6,
11680 no_bgp_redistribute_ipv6_cmd,
40d1cbfb 11681 "no redistribute " FRR_IP6_REDIST_STR_BGPD " [metric (0-4294967295)] [route-map WORD]",
718e3744 11682 NO_STR
11683 "Redistribute information from another routing protocol\n"
3b14d86e 11684 FRR_IP6_REDIST_HELP_STR_BGPD
31500417
DW		 11685 "Metric for redistributed routes\n"
11686 "Default metric\n"
11687 "Route map reference\n"
11688 "Pointer to route-map entries\n")
718e3744 11689{
d62a17ae 11690 VTY_DECLVAR_CONTEXT(bgp, bgp);
11691 int idx_protocol = 2;
11692 int type;
718e3744 11693
d62a17ae 11694 type = proto_redistnum(AFI_IP6, argv[idx_protocol]->text);
11695 if (type < 0) {
11696 vty_out(vty, "%% Invalid route type\n");
11697 return CMD_WARNING_CONFIG_FAILED;
11698 }
718e3744 11699
d62a17ae 11700 return bgp_redistribute_unset(bgp, AFI_IP6, type, 0);
11701}
11702
2b791107 11703void bgp_config_write_redistribute(struct vty *vty, struct bgp *bgp, afi_t afi,
60466a63 11704 safi_t safi)
d62a17ae 11705{
11706 int i;
11707
11708 /* Unicast redistribution only. */
11709 if (safi != SAFI_UNICAST)
2b791107 11710 return;
d62a17ae 11711
11712 for (i = 0; i < ZEBRA_ROUTE_MAX; i++) {
11713 /* Redistribute BGP does not make sense. */
11714 if (i != ZEBRA_ROUTE_BGP) {
11715 struct list *red_list;
11716 struct listnode *node;
11717 struct bgp_redist *red;
11718
11719 red_list = bgp->redist[afi][i];
11720 if (!red_list)
11721 continue;
11722
11723 for (ALL_LIST_ELEMENTS_RO(red_list, node, red)) {
d62a17ae 11724 /* "redistribute" configuration. */
11725 vty_out(vty, " redistribute %s",
11726 zebra_route_string(i));
11727 if (red->instance)
11728 vty_out(vty, " %d", red->instance);
11729 if (red->redist_metric_flag)
11730 vty_out(vty, " metric %u",
11731 red->redist_metric);
11732 if (red->rmap.name)
11733 vty_out(vty, " route-map %s",
11734 red->rmap.name);
11735 vty_out(vty, "\n");
11736 }
11737 }
11738 }
718e3744 11739}
6b0655a2 11740
b9c7bc5a
PZ		 11741/* This is part of the address-family block (unicast only) */
11742void bgp_vpn_policy_config_write_afi(struct vty *vty, struct bgp *bgp,
ddb5b488
PZ		 11743 afi_t afi)
11744{
b9c7bc5a 11745 int indent = 2;
ddb5b488 11746
e70e9f8e
PZ		 11747 if (CHECK_FLAG(bgp->vpn_policy[afi].flags,
11748 BGP_VPN_POLICY_TOVPN_LABEL_AUTO)) {
11749
11750 vty_out(vty, "%*slabel vpn export %s\n", indent, "", "auto");
11751
11752 } else {
11753 if (bgp->vpn_policy[afi].tovpn_label != MPLS_LABEL_NONE) {
11754 vty_out(vty, "%*slabel vpn export %u\n", indent, "",
11755 bgp->vpn_policy[afi].tovpn_label);
11756 }
ddb5b488
PZ		 11757 }
11758 if (CHECK_FLAG(bgp->vpn_policy[afi].flags,
11759 BGP_VPN_POLICY_TOVPN_RD_SET)) {
11760 char buf[RD_ADDRSTRLEN];
b9c7bc5a 11761 vty_out(vty, "%*srd vpn export %s\n", indent, "",
ddb5b488
PZ		 11762 prefix_rd2str(&bgp->vpn_policy[afi].tovpn_rd, buf,
11763 sizeof(buf)));
11764 }
11765 if (CHECK_FLAG(bgp->vpn_policy[afi].flags,
11766 BGP_VPN_POLICY_TOVPN_NEXTHOP_SET)) {
11767
11768 char buf[PREFIX_STRLEN];
11769 if (inet_ntop(bgp->vpn_policy[afi].tovpn_nexthop.family,
11770 &bgp->vpn_policy[afi].tovpn_nexthop.u.prefix, buf,
11771 sizeof(buf))) {
11772
b9c7bc5a
PZ		 11773 vty_out(vty, "%*snexthop vpn export %s\n",
11774 indent, "", buf);
ddb5b488
PZ		 11775 }
11776 }
11777 if (bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_FROMVPN]
11778 && bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_TOVPN]
11779 && ecommunity_cmp(
11780 bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_FROMVPN],
11781 bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_TOVPN])) {
11782
11783 char *b = ecommunity_ecom2str(
11784 bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_TOVPN],
11785 ECOMMUNITY_FORMAT_ROUTE_MAP, ECOMMUNITY_ROUTE_TARGET);
b9c7bc5a 11786 vty_out(vty, "%*srt vpn both %s\n", indent, "", b);
ddb5b488
PZ		 11787 XFREE(MTYPE_ECOMMUNITY_STR, b);
11788 } else {
11789 if (bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_FROMVPN]) {
11790 char *b = ecommunity_ecom2str(
11791 bgp->vpn_policy[afi]
11792 .rtlist[BGP_VPN_POLICY_DIR_FROMVPN],
11793 ECOMMUNITY_FORMAT_ROUTE_MAP,
11794 ECOMMUNITY_ROUTE_TARGET);
b9c7bc5a 11795 vty_out(vty, "%*srt vpn import %s\n", indent, "", b);
ddb5b488
PZ		 11796 XFREE(MTYPE_ECOMMUNITY_STR, b);
11797 }
11798 if (bgp->vpn_policy[afi].rtlist[BGP_VPN_POLICY_DIR_TOVPN]) {
11799 char *b = ecommunity_ecom2str(
11800 bgp->vpn_policy[afi]
11801 .rtlist[BGP_VPN_POLICY_DIR_TOVPN],
11802 ECOMMUNITY_FORMAT_ROUTE_MAP,
11803 ECOMMUNITY_ROUTE_TARGET);
b9c7bc5a 11804 vty_out(vty, "%*srt vpn export %s\n", indent, "", b);
ddb5b488
PZ		 11805 XFREE(MTYPE_ECOMMUNITY_STR, b);
11806 }
11807 }
11808 if (bgp->vpn_policy[afi].rmap_name[BGP_VPN_POLICY_DIR_FROMVPN]) {
b9c7bc5a 11809 vty_out(vty, "%*sroute-map vpn import %s\n", indent, "",
ddb5b488
PZ		 11810 bgp->vpn_policy[afi]
11811 .rmap_name[BGP_VPN_POLICY_DIR_FROMVPN]);
11812 }
11813 if (bgp->vpn_policy[afi].rmap_name[BGP_VPN_POLICY_DIR_TOVPN]) {
b9c7bc5a 11814 vty_out(vty, "%*sroute-map vpn export %s\n", indent, "",
ddb5b488
PZ		 11815 bgp->vpn_policy[afi]
11816 .rmap_name[BGP_VPN_POLICY_DIR_TOVPN]);
11817 }
301ad80a
PG		 11818 if (bgp->vpn_policy[afi].import_redirect_rtlist) {
11819 char *b = ecommunity_ecom2str(
11820 bgp->vpn_policy[afi]
11821 .import_redirect_rtlist,
11822 ECOMMUNITY_FORMAT_ROUTE_MAP,
11823 ECOMMUNITY_ROUTE_TARGET);
ddb5b488 11824
301ad80a
PG		 11825 vty_out(vty, "%*srt redirect import %s\n", indent, "", b);
11826 XFREE(MTYPE_ECOMMUNITY_STR, b);
11827 }
ddb5b488
PZ		 11828}
11829
11830
718e3744 11831/* BGP node structure. */
d62a17ae 11832static struct cmd_node bgp_node = {
9d303b37 11833 BGP_NODE, "%s(config-router)# ", 1,
718e3744 11834};
11835
d62a17ae 11836static struct cmd_node bgp_ipv4_unicast_node = {
9d303b37 11837 BGP_IPV4_NODE, "%s(config-router-af)# ", 1,
718e3744 11838};
11839
d62a17ae 11840static struct cmd_node bgp_ipv4_multicast_node = {
9d303b37 11841 BGP_IPV4M_NODE, "%s(config-router-af)# ", 1,
718e3744 11842};
11843
d62a17ae 11844static struct cmd_node bgp_ipv4_labeled_unicast_node = {
9d303b37 11845 BGP_IPV4L_NODE, "%s(config-router-af)# ", 1,
f51bae9c
DS		 11846};
11847
d62a17ae 11848static struct cmd_node bgp_ipv6_unicast_node = {
9d303b37 11849 BGP_IPV6_NODE, "%s(config-router-af)# ", 1,
718e3744 11850};
11851
d62a17ae 11852static struct cmd_node bgp_ipv6_multicast_node = {
9d303b37 11853 BGP_IPV6M_NODE, "%s(config-router-af)# ", 1,
25ffbdc1 11854};
11855
d62a17ae 11856static struct cmd_node bgp_ipv6_labeled_unicast_node = {
9d303b37 11857 BGP_IPV6L_NODE, "%s(config-router-af)# ", 1,
f51bae9c
DS		 11858};
11859
d62a17ae 11860static struct cmd_node bgp_vpnv4_node = {BGP_VPNV4_NODE,
11861 "%s(config-router-af)# ", 1};
6b0655a2 11862
d62a17ae 11863static struct cmd_node bgp_vpnv6_node = {BGP_VPNV6_NODE,
11864 "%s(config-router-af-vpnv6)# ", 1};
8ecd3266 11865
d62a17ae 11866static struct cmd_node bgp_evpn_node = {BGP_EVPN_NODE,
11867 "%s(config-router-evpn)# ", 1};
4e0b7b6d 11868
d62a17ae 11869static struct cmd_node bgp_evpn_vni_node = {BGP_EVPN_VNI_NODE,
11870 "%s(config-router-af-vni)# ", 1};
90e60aa7 11871
7c40bf39 11872static struct cmd_node bgp_flowspecv4_node = {BGP_FLOWSPECV4_NODE,
11873 "%s(config-router-af)# ", 1};
11874
11875static struct cmd_node bgp_flowspecv6_node = {BGP_FLOWSPECV6_NODE,
11876 "%s(config-router-af-vpnv6)# ", 1};
11877
d62a17ae 11878static void community_list_vty(void);
1f8ae70b 11879
d62a17ae 11880static void bgp_ac_neighbor(vector comps, struct cmd_token *token)
b8a815e5 11881{
d62a17ae 11882 struct bgp *bgp;
11883 struct peer *peer;
11884 struct peer_group *group;
11885 struct listnode *lnbgp, *lnpeer;
b8a815e5 11886
d62a17ae 11887 for (ALL_LIST_ELEMENTS_RO(bm->bgp, lnbgp, bgp)) {
11888 for (ALL_LIST_ELEMENTS_RO(bgp->peer, lnpeer, peer)) {
11889 /* only provide suggestions on the appropriate input
11890 * token type,
11891 * they'll otherwise show up multiple times */
11892 enum cmd_token_type match_type;
11893 char *name = peer->host;
d48ed3e0 11894
d62a17ae 11895 if (peer->conf_if) {
11896 match_type = VARIABLE_TKN;
11897 name = peer->conf_if;
11898 } else if (strchr(peer->host, ':'))
11899 match_type = IPV6_TKN;
11900 else
11901 match_type = IPV4_TKN;
d48ed3e0 11902
d62a17ae 11903 if (token->type != match_type)
11904 continue;
d48ed3e0 11905
d62a17ae 11906 vector_set(comps, XSTRDUP(MTYPE_COMPLETION, name));
11907 }
d48ed3e0 11908
d62a17ae 11909 if (token->type == VARIABLE_TKN)
11910 for (ALL_LIST_ELEMENTS_RO(bgp->group, lnpeer, group))
11911 vector_set(comps, XSTRDUP(MTYPE_COMPLETION,
11912 group->name));
11913 }
b8a815e5
DL		 11914}
11915
11916static const struct cmd_variable_handler bgp_var_neighbor[] = {
d62a17ae 11917 {.varname = "neighbor", .completions = bgp_ac_neighbor},
11918 {.varname = "neighbors", .completions = bgp_ac_neighbor},
7d4aea30 11919 {.varname = "peer", .completions = bgp_ac_neighbor},
d62a17ae 11920 {.completions = NULL}};
11921
11922void bgp_vty_init(void)
11923{
11924 cmd_variable_handler_register(bgp_var_neighbor);
11925
11926 /* Install bgp top node. */
11927 install_node(&bgp_node, bgp_config_write);
11928 install_node(&bgp_ipv4_unicast_node, NULL);
11929 install_node(&bgp_ipv4_multicast_node, NULL);
11930 install_node(&bgp_ipv4_labeled_unicast_node, NULL);
11931 install_node(&bgp_ipv6_unicast_node, NULL);
11932 install_node(&bgp_ipv6_multicast_node, NULL);
11933 install_node(&bgp_ipv6_labeled_unicast_node, NULL);
11934 install_node(&bgp_vpnv4_node, NULL);
11935 install_node(&bgp_vpnv6_node, NULL);
11936 install_node(&bgp_evpn_node, NULL);
11937 install_node(&bgp_evpn_vni_node, NULL);
7c40bf39 11938 install_node(&bgp_flowspecv4_node, NULL);
11939 install_node(&bgp_flowspecv6_node, NULL);
d62a17ae 11940
11941 /* Install default VTY commands to new nodes. */
11942 install_default(BGP_NODE);
11943 install_default(BGP_IPV4_NODE);
11944 install_default(BGP_IPV4M_NODE);
11945 install_default(BGP_IPV4L_NODE);
11946 install_default(BGP_IPV6_NODE);
11947 install_default(BGP_IPV6M_NODE);
11948 install_default(BGP_IPV6L_NODE);
11949 install_default(BGP_VPNV4_NODE);
11950 install_default(BGP_VPNV6_NODE);
7c40bf39 11951 install_default(BGP_FLOWSPECV4_NODE);
11952 install_default(BGP_FLOWSPECV6_NODE);
d62a17ae 11953 install_default(BGP_EVPN_NODE);
11954 install_default(BGP_EVPN_VNI_NODE);
11955
11956 /* "bgp multiple-instance" commands. */
11957 install_element(CONFIG_NODE, &bgp_multiple_instance_cmd);
11958 install_element(CONFIG_NODE, &no_bgp_multiple_instance_cmd);
11959
11960 /* "bgp config-type" commands. */
11961 install_element(CONFIG_NODE, &bgp_config_type_cmd);
11962 install_element(CONFIG_NODE, &no_bgp_config_type_cmd);
11963
11964 /* bgp route-map delay-timer commands. */
11965 install_element(CONFIG_NODE, &bgp_set_route_map_delay_timer_cmd);
11966 install_element(CONFIG_NODE, &no_bgp_set_route_map_delay_timer_cmd);
11967
11968 /* Dummy commands (Currently not supported) */
11969 install_element(BGP_NODE, &no_synchronization_cmd);
11970 install_element(BGP_NODE, &no_auto_summary_cmd);
11971
11972 /* "router bgp" commands. */
11973 install_element(CONFIG_NODE, &router_bgp_cmd);
11974
11975 /* "no router bgp" commands. */
11976 install_element(CONFIG_NODE, &no_router_bgp_cmd);
11977
11978 /* "bgp router-id" commands. */
11979 install_element(BGP_NODE, &bgp_router_id_cmd);
11980 install_element(BGP_NODE, &no_bgp_router_id_cmd);
11981
11982 /* "bgp cluster-id" commands. */
11983 install_element(BGP_NODE, &bgp_cluster_id_cmd);
11984 install_element(BGP_NODE, &no_bgp_cluster_id_cmd);
11985
11986 /* "bgp confederation" commands. */
11987 install_element(BGP_NODE, &bgp_confederation_identifier_cmd);
11988 install_element(BGP_NODE, &no_bgp_confederation_identifier_cmd);
11989
11990 /* "bgp confederation peers" commands. */
11991 install_element(BGP_NODE, &bgp_confederation_peers_cmd);
11992 install_element(BGP_NODE, &no_bgp_confederation_peers_cmd);
11993
11994 /* bgp max-med command */
11995 install_element(BGP_NODE, &bgp_maxmed_admin_cmd);
11996 install_element(BGP_NODE, &no_bgp_maxmed_admin_cmd);
11997 install_element(BGP_NODE, &bgp_maxmed_admin_medv_cmd);
11998 install_element(BGP_NODE, &bgp_maxmed_onstartup_cmd);
11999 install_element(BGP_NODE, &no_bgp_maxmed_onstartup_cmd);
12000
12001 /* bgp disable-ebgp-connected-nh-check */
12002 install_element(BGP_NODE, &bgp_disable_connected_route_check_cmd);
12003 install_element(BGP_NODE, &no_bgp_disable_connected_route_check_cmd);
12004
12005 /* bgp update-delay command */
12006 install_element(BGP_NODE, &bgp_update_delay_cmd);
12007 install_element(BGP_NODE, &no_bgp_update_delay_cmd);
12008 install_element(BGP_NODE, &bgp_update_delay_establish_wait_cmd);
12009
12010 install_element(BGP_NODE, &bgp_wpkt_quanta_cmd);
12011 install_element(BGP_NODE, &no_bgp_wpkt_quanta_cmd);
555e09d4
QY		 12012 install_element(BGP_NODE, &bgp_rpkt_quanta_cmd);
12013 install_element(BGP_NODE, &no_bgp_rpkt_quanta_cmd);
d62a17ae 12014
12015 install_element(BGP_NODE, &bgp_coalesce_time_cmd);
12016 install_element(BGP_NODE, &no_bgp_coalesce_time_cmd);
12017
12018 /* "maximum-paths" commands. */
12019 install_element(BGP_NODE, &bgp_maxpaths_hidden_cmd);
12020 install_element(BGP_NODE, &no_bgp_maxpaths_hidden_cmd);
12021 install_element(BGP_IPV4_NODE, &bgp_maxpaths_cmd);
12022 install_element(BGP_IPV4_NODE, &no_bgp_maxpaths_cmd);
12023 install_element(BGP_IPV6_NODE, &bgp_maxpaths_cmd);
12024 install_element(BGP_IPV6_NODE, &no_bgp_maxpaths_cmd);
12025 install_element(BGP_NODE, &bgp_maxpaths_ibgp_hidden_cmd);
12026 install_element(BGP_NODE, &bgp_maxpaths_ibgp_cluster_hidden_cmd);
12027 install_element(BGP_NODE, &no_bgp_maxpaths_ibgp_hidden_cmd);
12028 install_element(BGP_IPV4_NODE, &bgp_maxpaths_ibgp_cmd);
12029 install_element(BGP_IPV4_NODE, &bgp_maxpaths_ibgp_cluster_cmd);
12030 install_element(BGP_IPV4_NODE, &no_bgp_maxpaths_ibgp_cmd);
12031 install_element(BGP_IPV6_NODE, &bgp_maxpaths_ibgp_cmd);
12032 install_element(BGP_IPV6_NODE, &bgp_maxpaths_ibgp_cluster_cmd);
12033 install_element(BGP_IPV6_NODE, &no_bgp_maxpaths_ibgp_cmd);
12034
12035 install_element(BGP_IPV6L_NODE, &bgp_maxpaths_cmd);
12036 install_element(BGP_IPV6L_NODE, &no_bgp_maxpaths_cmd);
12037 install_element(BGP_IPV6L_NODE, &bgp_maxpaths_ibgp_cmd);
12038 install_element(BGP_IPV6L_NODE, &bgp_maxpaths_ibgp_cluster_cmd);
12039 install_element(BGP_IPV6L_NODE, &no_bgp_maxpaths_ibgp_cmd);
12040
12041 /* "timers bgp" commands. */
12042 install_element(BGP_NODE, &bgp_timers_cmd);
12043 install_element(BGP_NODE, &no_bgp_timers_cmd);
12044
12045 /* route-map delay-timer commands - per instance for backwards compat.
12046 */
12047 install_element(BGP_NODE, &bgp_set_route_map_delay_timer_cmd);
12048 install_element(BGP_NODE, &no_bgp_set_route_map_delay_timer_cmd);
12049
12050 /* "bgp client-to-client reflection" commands */
12051 install_element(BGP_NODE, &no_bgp_client_to_client_reflection_cmd);
12052 install_element(BGP_NODE, &bgp_client_to_client_reflection_cmd);
12053
12054 /* "bgp always-compare-med" commands */
12055 install_element(BGP_NODE, &bgp_always_compare_med_cmd);
12056 install_element(BGP_NODE, &no_bgp_always_compare_med_cmd);
12057
12058 /* "bgp deterministic-med" commands */
12059 install_element(BGP_NODE, &bgp_deterministic_med_cmd);
12060 install_element(BGP_NODE, &no_bgp_deterministic_med_cmd);
12061
12062 /* "bgp graceful-restart" commands */
12063 install_element(BGP_NODE, &bgp_graceful_restart_cmd);
12064 install_element(BGP_NODE, &no_bgp_graceful_restart_cmd);
12065 install_element(BGP_NODE, &bgp_graceful_restart_stalepath_time_cmd);
12066 install_element(BGP_NODE, &no_bgp_graceful_restart_stalepath_time_cmd);
12067 install_element(BGP_NODE, &bgp_graceful_restart_restart_time_cmd);
12068 install_element(BGP_NODE, &no_bgp_graceful_restart_restart_time_cmd);
12069
12070 install_element(BGP_NODE, &bgp_graceful_restart_preserve_fw_cmd);
12071 install_element(BGP_NODE, &no_bgp_graceful_restart_preserve_fw_cmd);
12072
7f323236
DW		 12073 /* "bgp graceful-shutdown" commands */
12074 install_element(BGP_NODE, &bgp_graceful_shutdown_cmd);
12075 install_element(BGP_NODE, &no_bgp_graceful_shutdown_cmd);
12076
d62a17ae 12077 /* "bgp fast-external-failover" commands */
12078 install_element(BGP_NODE, &bgp_fast_external_failover_cmd);
12079 install_element(BGP_NODE, &no_bgp_fast_external_failover_cmd);
12080
12081 /* "bgp enforce-first-as" commands */
12082 install_element(BGP_NODE, &bgp_enforce_first_as_cmd);
12083 install_element(BGP_NODE, &no_bgp_enforce_first_as_cmd);
12084
12085 /* "bgp bestpath compare-routerid" commands */
12086 install_element(BGP_NODE, &bgp_bestpath_compare_router_id_cmd);
12087 install_element(BGP_NODE, &no_bgp_bestpath_compare_router_id_cmd);
12088
12089 /* "bgp bestpath as-path ignore" commands */
12090 install_element(BGP_NODE, &bgp_bestpath_aspath_ignore_cmd);
12091 install_element(BGP_NODE, &no_bgp_bestpath_aspath_ignore_cmd);
12092
12093 /* "bgp bestpath as-path confed" commands */
12094 install_element(BGP_NODE, &bgp_bestpath_aspath_confed_cmd);
12095 install_element(BGP_NODE, &no_bgp_bestpath_aspath_confed_cmd);
12096
12097 /* "bgp bestpath as-path multipath-relax" commands */
12098 install_element(BGP_NODE, &bgp_bestpath_aspath_multipath_relax_cmd);
12099 install_element(BGP_NODE, &no_bgp_bestpath_aspath_multipath_relax_cmd);
12100
12101 /* "bgp log-neighbor-changes" commands */
12102 install_element(BGP_NODE, &bgp_log_neighbor_changes_cmd);
12103 install_element(BGP_NODE, &no_bgp_log_neighbor_changes_cmd);
12104
12105 /* "bgp bestpath med" commands */
12106 install_element(BGP_NODE, &bgp_bestpath_med_cmd);
12107 install_element(BGP_NODE, &no_bgp_bestpath_med_cmd);
12108
12109 /* "no bgp default ipv4-unicast" commands. */
12110 install_element(BGP_NODE, &no_bgp_default_ipv4_unicast_cmd);
12111 install_element(BGP_NODE, &bgp_default_ipv4_unicast_cmd);
12112
12113 /* "bgp network import-check" commands. */
12114 install_element(BGP_NODE, &bgp_network_import_check_cmd);
12115 install_element(BGP_NODE, &bgp_network_import_check_exact_cmd);
12116 install_element(BGP_NODE, &no_bgp_network_import_check_cmd);
12117
12118 /* "bgp default local-preference" commands. */
12119 install_element(BGP_NODE, &bgp_default_local_preference_cmd);
12120 install_element(BGP_NODE, &no_bgp_default_local_preference_cmd);
12121
12122 /* bgp default show-hostname */
12123 install_element(BGP_NODE, &bgp_default_show_hostname_cmd);
12124 install_element(BGP_NODE, &no_bgp_default_show_hostname_cmd);
12125
12126 /* "bgp default subgroup-pkt-queue-max" commands. */
12127 install_element(BGP_NODE, &bgp_default_subgroup_pkt_queue_max_cmd);
12128 install_element(BGP_NODE, &no_bgp_default_subgroup_pkt_queue_max_cmd);
12129
12130 /* bgp ibgp-allow-policy-mods command */
12131 install_element(BGP_NODE, &bgp_rr_allow_outbound_policy_cmd);
12132 install_element(BGP_NODE, &no_bgp_rr_allow_outbound_policy_cmd);
12133
12134 /* "bgp listen limit" commands. */
12135 install_element(BGP_NODE, &bgp_listen_limit_cmd);
12136 install_element(BGP_NODE, &no_bgp_listen_limit_cmd);
12137
12138 /* "bgp listen range" commands. */
12139 install_element(BGP_NODE, &bgp_listen_range_cmd);
12140 install_element(BGP_NODE, &no_bgp_listen_range_cmd);
12141
8175f54a 12142 /* "bgp default shutdown" command */
f26845f9
QY		 12143 install_element(BGP_NODE, &bgp_default_shutdown_cmd);
12144
d62a17ae 12145 /* "neighbor remote-as" commands. */
12146 install_element(BGP_NODE, &neighbor_remote_as_cmd);
12147 install_element(BGP_NODE, &neighbor_interface_config_cmd);
12148 install_element(BGP_NODE, &neighbor_interface_config_v6only_cmd);
12149 install_element(BGP_NODE, &neighbor_interface_config_remote_as_cmd);
12150 install_element(BGP_NODE,
12151 &neighbor_interface_v6only_config_remote_as_cmd);
12152 install_element(BGP_NODE, &no_neighbor_cmd);
12153 install_element(BGP_NODE, &no_neighbor_interface_config_cmd);
12154
12155 /* "neighbor peer-group" commands. */
12156 install_element(BGP_NODE, &neighbor_peer_group_cmd);
12157 install_element(BGP_NODE, &no_neighbor_peer_group_cmd);
12158 install_element(BGP_NODE,
12159 &no_neighbor_interface_peer_group_remote_as_cmd);
12160
12161 /* "neighbor local-as" commands. */
12162 install_element(BGP_NODE, &neighbor_local_as_cmd);
12163 install_element(BGP_NODE, &neighbor_local_as_no_prepend_cmd);
12164 install_element(BGP_NODE, &neighbor_local_as_no_prepend_replace_as_cmd);
12165 install_element(BGP_NODE, &no_neighbor_local_as_cmd);
12166
12167 /* "neighbor solo" commands. */
12168 install_element(BGP_NODE, &neighbor_solo_cmd);
12169 install_element(BGP_NODE, &no_neighbor_solo_cmd);
12170
12171 /* "neighbor password" commands. */
12172 install_element(BGP_NODE, &neighbor_password_cmd);
12173 install_element(BGP_NODE, &no_neighbor_password_cmd);
12174
12175 /* "neighbor activate" commands. */
12176 install_element(BGP_NODE, &neighbor_activate_hidden_cmd);
12177 install_element(BGP_IPV4_NODE, &neighbor_activate_cmd);
12178 install_element(BGP_IPV4M_NODE, &neighbor_activate_cmd);
12179 install_element(BGP_IPV4L_NODE, &neighbor_activate_cmd);
12180 install_element(BGP_IPV6_NODE, &neighbor_activate_cmd);
12181 install_element(BGP_IPV6M_NODE, &neighbor_activate_cmd);
12182 install_element(BGP_IPV6L_NODE, &neighbor_activate_cmd);
12183 install_element(BGP_VPNV4_NODE, &neighbor_activate_cmd);
12184 install_element(BGP_VPNV6_NODE, &neighbor_activate_cmd);
7c40bf39 12185 install_element(BGP_FLOWSPECV4_NODE, &neighbor_activate_cmd);
12186 install_element(BGP_FLOWSPECV6_NODE, &neighbor_activate_cmd);
d62a17ae 12187 install_element(BGP_EVPN_NODE, &neighbor_activate_cmd);
12188
12189 /* "no neighbor activate" commands. */
12190 install_element(BGP_NODE, &no_neighbor_activate_hidden_cmd);
12191 install_element(BGP_IPV4_NODE, &no_neighbor_activate_cmd);
12192 install_element(BGP_IPV4M_NODE, &no_neighbor_activate_cmd);
12193 install_element(BGP_IPV4L_NODE, &no_neighbor_activate_cmd);
12194 install_element(BGP_IPV6_NODE, &no_neighbor_activate_cmd);
12195 install_element(BGP_IPV6M_NODE, &no_neighbor_activate_cmd);
12196 install_element(BGP_IPV6L_NODE, &no_neighbor_activate_cmd);
12197 install_element(BGP_VPNV4_NODE, &no_neighbor_activate_cmd);
12198 install_element(BGP_VPNV6_NODE, &no_neighbor_activate_cmd);
7c40bf39 12199 install_element(BGP_FLOWSPECV4_NODE, &no_neighbor_activate_cmd);
12200 install_element(BGP_FLOWSPECV6_NODE, &no_neighbor_activate_cmd);
d62a17ae 12201 install_element(BGP_EVPN_NODE, &no_neighbor_activate_cmd);
12202
12203 /* "neighbor peer-group" set commands. */
12204 install_element(BGP_NODE, &neighbor_set_peer_group_cmd);
12205 install_element(BGP_IPV4_NODE, &neighbor_set_peer_group_hidden_cmd);
12206 install_element(BGP_IPV4M_NODE, &neighbor_set_peer_group_hidden_cmd);
12207 install_element(BGP_IPV6_NODE, &neighbor_set_peer_group_hidden_cmd);
12208 install_element(BGP_IPV6M_NODE, &neighbor_set_peer_group_hidden_cmd);
12209 install_element(BGP_IPV6L_NODE, &neighbor_set_peer_group_hidden_cmd);
12210 install_element(BGP_VPNV4_NODE, &neighbor_set_peer_group_hidden_cmd);
12211 install_element(BGP_VPNV6_NODE, &neighbor_set_peer_group_hidden_cmd);
7c40bf39 12212 install_element(BGP_FLOWSPECV4_NODE,
12213 &neighbor_set_peer_group_hidden_cmd);
12214 install_element(BGP_FLOWSPECV6_NODE,
12215 &neighbor_set_peer_group_hidden_cmd);
d62a17ae 12216
12217 /* "no neighbor peer-group unset" commands. */
12218 install_element(BGP_NODE, &no_neighbor_set_peer_group_cmd);
12219 install_element(BGP_IPV4_NODE, &no_neighbor_set_peer_group_hidden_cmd);
12220 install_element(BGP_IPV4M_NODE, &no_neighbor_set_peer_group_hidden_cmd);
12221 install_element(BGP_IPV6_NODE, &no_neighbor_set_peer_group_hidden_cmd);
12222 install_element(BGP_IPV6M_NODE, &no_neighbor_set_peer_group_hidden_cmd);
12223 install_element(BGP_IPV6L_NODE, &no_neighbor_set_peer_group_hidden_cmd);
12224 install_element(BGP_VPNV4_NODE, &no_neighbor_set_peer_group_hidden_cmd);
12225 install_element(BGP_VPNV6_NODE, &no_neighbor_set_peer_group_hidden_cmd);
7c40bf39 12226 install_element(BGP_FLOWSPECV4_NODE,
12227 &no_neighbor_set_peer_group_hidden_cmd);
12228 install_element(BGP_FLOWSPECV6_NODE,
12229 &no_neighbor_set_peer_group_hidden_cmd);
d62a17ae 12230
12231 /* "neighbor softreconfiguration inbound" commands.*/
12232 install_element(BGP_NODE, &neighbor_soft_reconfiguration_hidden_cmd);
12233 install_element(BGP_NODE, &no_neighbor_soft_reconfiguration_hidden_cmd);
12234 install_element(BGP_IPV4_NODE, &neighbor_soft_reconfiguration_cmd);
12235 install_element(BGP_IPV4_NODE, &no_neighbor_soft_reconfiguration_cmd);
12236 install_element(BGP_IPV4L_NODE, &neighbor_soft_reconfiguration_cmd);
12237 install_element(BGP_IPV4L_NODE, &no_neighbor_soft_reconfiguration_cmd);
12238 install_element(BGP_IPV4M_NODE, &neighbor_soft_reconfiguration_cmd);
12239 install_element(BGP_IPV4M_NODE, &no_neighbor_soft_reconfiguration_cmd);
12240 install_element(BGP_IPV6_NODE, &neighbor_soft_reconfiguration_cmd);
12241 install_element(BGP_IPV6_NODE, &no_neighbor_soft_reconfiguration_cmd);
12242 install_element(BGP_IPV6M_NODE, &neighbor_soft_reconfiguration_cmd);
12243 install_element(BGP_IPV6M_NODE, &no_neighbor_soft_reconfiguration_cmd);
12244 install_element(BGP_IPV6L_NODE, &neighbor_soft_reconfiguration_cmd);
12245 install_element(BGP_IPV6L_NODE, &no_neighbor_soft_reconfiguration_cmd);
12246 install_element(BGP_VPNV4_NODE, &neighbor_soft_reconfiguration_cmd);
12247 install_element(BGP_VPNV4_NODE, &no_neighbor_soft_reconfiguration_cmd);
12248 install_element(BGP_VPNV6_NODE, &neighbor_soft_reconfiguration_cmd);
12249 install_element(BGP_VPNV6_NODE, &no_neighbor_soft_reconfiguration_cmd);
7c40bf39 12250 install_element(BGP_FLOWSPECV4_NODE,
12251 &neighbor_soft_reconfiguration_cmd);
12252 install_element(BGP_FLOWSPECV4_NODE,
12253 &no_neighbor_soft_reconfiguration_cmd);
12254 install_element(BGP_FLOWSPECV6_NODE,
12255 &neighbor_soft_reconfiguration_cmd);
12256 install_element(BGP_FLOWSPECV6_NODE,
12257 &no_neighbor_soft_reconfiguration_cmd);
d62a17ae 12258
12259 /* "neighbor attribute-unchanged" commands. */
12260 install_element(BGP_NODE, &neighbor_attr_unchanged_hidden_cmd);
12261 install_element(BGP_NODE, &no_neighbor_attr_unchanged_hidden_cmd);
12262 install_element(BGP_IPV4_NODE, &neighbor_attr_unchanged_cmd);
12263 install_element(BGP_IPV4_NODE, &no_neighbor_attr_unchanged_cmd);
12264 install_element(BGP_IPV4M_NODE, &neighbor_attr_unchanged_cmd);
12265 install_element(BGP_IPV4M_NODE, &no_neighbor_attr_unchanged_cmd);
12266 install_element(BGP_IPV4L_NODE, &neighbor_attr_unchanged_cmd);
12267 install_element(BGP_IPV4L_NODE, &no_neighbor_attr_unchanged_cmd);
12268 install_element(BGP_IPV6_NODE, &neighbor_attr_unchanged_cmd);
12269 install_element(BGP_IPV6_NODE, &no_neighbor_attr_unchanged_cmd);
12270 install_element(BGP_IPV6M_NODE, &neighbor_attr_unchanged_cmd);
12271 install_element(BGP_IPV6M_NODE, &no_neighbor_attr_unchanged_cmd);
12272 install_element(BGP_IPV6L_NODE, &neighbor_attr_unchanged_cmd);
12273 install_element(BGP_IPV6L_NODE, &no_neighbor_attr_unchanged_cmd);
12274 install_element(BGP_VPNV4_NODE, &neighbor_attr_unchanged_cmd);
12275 install_element(BGP_VPNV4_NODE, &no_neighbor_attr_unchanged_cmd);
12276 install_element(BGP_VPNV6_NODE, &neighbor_attr_unchanged_cmd);
12277 install_element(BGP_VPNV6_NODE, &no_neighbor_attr_unchanged_cmd);
12278
12279 install_element(BGP_EVPN_NODE, &neighbor_attr_unchanged_cmd);
12280 install_element(BGP_EVPN_NODE, &no_neighbor_attr_unchanged_cmd);
12281
12282 /* "nexthop-local unchanged" commands */
12283 install_element(BGP_IPV6_NODE, &neighbor_nexthop_local_unchanged_cmd);
12284 install_element(BGP_IPV6_NODE,
12285 &no_neighbor_nexthop_local_unchanged_cmd);
12286
12287 /* "neighbor next-hop-self" commands. */
12288 install_element(BGP_NODE, &neighbor_nexthop_self_hidden_cmd);
12289 install_element(BGP_NODE, &no_neighbor_nexthop_self_hidden_cmd);
12290 install_element(BGP_IPV4_NODE, &neighbor_nexthop_self_cmd);
12291 install_element(BGP_IPV4_NODE, &no_neighbor_nexthop_self_cmd);
12292 install_element(BGP_IPV4M_NODE, &neighbor_nexthop_self_cmd);
12293 install_element(BGP_IPV4M_NODE, &no_neighbor_nexthop_self_cmd);
12294 install_element(BGP_IPV4L_NODE, &neighbor_nexthop_self_cmd);
12295 install_element(BGP_IPV4L_NODE, &no_neighbor_nexthop_self_cmd);
12296 install_element(BGP_IPV6_NODE, &neighbor_nexthop_self_cmd);
12297 install_element(BGP_IPV6_NODE, &no_neighbor_nexthop_self_cmd);
12298 install_element(BGP_IPV6M_NODE, &neighbor_nexthop_self_cmd);
12299 install_element(BGP_IPV6M_NODE, &no_neighbor_nexthop_self_cmd);
12300 install_element(BGP_IPV6L_NODE, &neighbor_nexthop_self_cmd);
12301 install_element(BGP_IPV6L_NODE, &no_neighbor_nexthop_self_cmd);
12302 install_element(BGP_VPNV4_NODE, &neighbor_nexthop_self_cmd);
12303 install_element(BGP_VPNV4_NODE, &no_neighbor_nexthop_self_cmd);
12304 install_element(BGP_VPNV6_NODE, &neighbor_nexthop_self_cmd);
12305 install_element(BGP_VPNV6_NODE, &no_neighbor_nexthop_self_cmd);
12306
12307 /* "neighbor next-hop-self force" commands. */
12308 install_element(BGP_NODE, &neighbor_nexthop_self_force_hidden_cmd);
12309 install_element(BGP_NODE, &no_neighbor_nexthop_self_force_hidden_cmd);
12310 install_element(BGP_IPV4_NODE, &neighbor_nexthop_self_force_cmd);
12311 install_element(BGP_IPV4_NODE, &no_neighbor_nexthop_self_force_cmd);
12312 install_element(BGP_IPV4M_NODE, &neighbor_nexthop_self_force_cmd);
12313 install_element(BGP_IPV4M_NODE, &no_neighbor_nexthop_self_force_cmd);
12314 install_element(BGP_IPV4L_NODE, &neighbor_nexthop_self_force_cmd);
12315 install_element(BGP_IPV4L_NODE, &no_neighbor_nexthop_self_force_cmd);
12316 install_element(BGP_IPV6_NODE, &neighbor_nexthop_self_force_cmd);
12317 install_element(BGP_IPV6_NODE, &no_neighbor_nexthop_self_force_cmd);
12318 install_element(BGP_IPV6M_NODE, &neighbor_nexthop_self_force_cmd);
12319 install_element(BGP_IPV6M_NODE, &no_neighbor_nexthop_self_force_cmd);
12320 install_element(BGP_IPV6L_NODE, &neighbor_nexthop_self_force_cmd);
12321 install_element(BGP_IPV6L_NODE, &no_neighbor_nexthop_self_force_cmd);
12322 install_element(BGP_VPNV4_NODE, &neighbor_nexthop_self_force_cmd);
12323 install_element(BGP_VPNV4_NODE, &no_neighbor_nexthop_self_force_cmd);
12324 install_element(BGP_VPNV6_NODE, &neighbor_nexthop_self_force_cmd);
12325 install_element(BGP_VPNV6_NODE, &no_neighbor_nexthop_self_force_cmd);
12326
12327 /* "neighbor as-override" commands. */
12328 install_element(BGP_NODE, &neighbor_as_override_hidden_cmd);
12329 install_element(BGP_NODE, &no_neighbor_as_override_hidden_cmd);
12330 install_element(BGP_IPV4_NODE, &neighbor_as_override_cmd);
12331 install_element(BGP_IPV4_NODE, &no_neighbor_as_override_cmd);
12332 install_element(BGP_IPV4M_NODE, &neighbor_as_override_cmd);
12333 install_element(BGP_IPV4M_NODE, &no_neighbor_as_override_cmd);
12334 install_element(BGP_IPV4L_NODE, &neighbor_as_override_cmd);
12335 install_element(BGP_IPV4L_NODE, &no_neighbor_as_override_cmd);
12336 install_element(BGP_IPV6_NODE, &neighbor_as_override_cmd);
12337 install_element(BGP_IPV6_NODE, &no_neighbor_as_override_cmd);
12338 install_element(BGP_IPV6M_NODE, &neighbor_as_override_cmd);
12339 install_element(BGP_IPV6M_NODE, &no_neighbor_as_override_cmd);
12340 install_element(BGP_IPV6L_NODE, &neighbor_as_override_cmd);
12341 install_element(BGP_IPV6L_NODE, &no_neighbor_as_override_cmd);
12342 install_element(BGP_VPNV4_NODE, &neighbor_as_override_cmd);
12343 install_element(BGP_VPNV4_NODE, &no_neighbor_as_override_cmd);
12344 install_element(BGP_VPNV6_NODE, &neighbor_as_override_cmd);
12345 install_element(BGP_VPNV6_NODE, &no_neighbor_as_override_cmd);
12346
12347 /* "neighbor remove-private-AS" commands. */
12348 install_element(BGP_NODE, &neighbor_remove_private_as_hidden_cmd);
12349 install_element(BGP_NODE, &no_neighbor_remove_private_as_hidden_cmd);
12350 install_element(BGP_NODE, &neighbor_remove_private_as_all_hidden_cmd);
12351 install_element(BGP_NODE,
12352 &no_neighbor_remove_private_as_all_hidden_cmd);
12353 install_element(BGP_NODE,
12354 &neighbor_remove_private_as_replace_as_hidden_cmd);
12355 install_element(BGP_NODE,
12356 &no_neighbor_remove_private_as_replace_as_hidden_cmd);
12357 install_element(BGP_NODE,
12358 &neighbor_remove_private_as_all_replace_as_hidden_cmd);
12359 install_element(
12360 BGP_NODE,
12361 &no_neighbor_remove_private_as_all_replace_as_hidden_cmd);
12362 install_element(BGP_IPV4_NODE, &neighbor_remove_private_as_cmd);
12363 install_element(BGP_IPV4_NODE, &no_neighbor_remove_private_as_cmd);
12364 install_element(BGP_IPV4_NODE, &neighbor_remove_private_as_all_cmd);
12365 install_element(BGP_IPV4_NODE, &no_neighbor_remove_private_as_all_cmd);
12366 install_element(BGP_IPV4_NODE,
12367 &neighbor_remove_private_as_replace_as_cmd);
12368 install_element(BGP_IPV4_NODE,
12369 &no_neighbor_remove_private_as_replace_as_cmd);
12370 install_element(BGP_IPV4_NODE,
12371 &neighbor_remove_private_as_all_replace_as_cmd);
12372 install_element(BGP_IPV4_NODE,
12373 &no_neighbor_remove_private_as_all_replace_as_cmd);
12374 install_element(BGP_IPV4M_NODE, &neighbor_remove_private_as_cmd);
12375 install_element(BGP_IPV4M_NODE, &no_neighbor_remove_private_as_cmd);
12376 install_element(BGP_IPV4M_NODE, &neighbor_remove_private_as_all_cmd);
12377 install_element(BGP_IPV4M_NODE, &no_neighbor_remove_private_as_all_cmd);
12378 install_element(BGP_IPV4M_NODE,
12379 &neighbor_remove_private_as_replace_as_cmd);
12380 install_element(BGP_IPV4M_NODE,
12381 &no_neighbor_remove_private_as_replace_as_cmd);
12382 install_element(BGP_IPV4M_NODE,
12383 &neighbor_remove_private_as_all_replace_as_cmd);
12384 install_element(BGP_IPV4M_NODE,
12385 &no_neighbor_remove_private_as_all_replace_as_cmd);
12386 install_element(BGP_IPV4L_NODE, &neighbor_remove_private_as_cmd);
12387 install_element(BGP_IPV4L_NODE, &no_neighbor_remove_private_as_cmd);
12388 install_element(BGP_IPV4L_NODE, &neighbor_remove_private_as_all_cmd);
12389 install_element(BGP_IPV4L_NODE, &no_neighbor_remove_private_as_all_cmd);
12390 install_element(BGP_IPV4L_NODE,
12391 &neighbor_remove_private_as_replace_as_cmd);
12392 install_element(BGP_IPV4L_NODE,
12393 &no_neighbor_remove_private_as_replace_as_cmd);
12394 install_element(BGP_IPV4L_NODE,
12395 &neighbor_remove_private_as_all_replace_as_cmd);
12396 install_element(BGP_IPV4L_NODE,
12397 &no_neighbor_remove_private_as_all_replace_as_cmd);
12398 install_element(BGP_IPV6_NODE, &neighbor_remove_private_as_cmd);
12399 install_element(BGP_IPV6_NODE, &no_neighbor_remove_private_as_cmd);
12400 install_element(BGP_IPV6_NODE, &neighbor_remove_private_as_all_cmd);
12401 install_element(BGP_IPV6_NODE, &no_neighbor_remove_private_as_all_cmd);
12402 install_element(BGP_IPV6_NODE,
12403 &neighbor_remove_private_as_replace_as_cmd);
12404 install_element(BGP_IPV6_NODE,
12405 &no_neighbor_remove_private_as_replace_as_cmd);
12406 install_element(BGP_IPV6_NODE,
12407 &neighbor_remove_private_as_all_replace_as_cmd);
12408 install_element(BGP_IPV6_NODE,
12409 &no_neighbor_remove_private_as_all_replace_as_cmd);
12410 install_element(BGP_IPV6M_NODE, &neighbor_remove_private_as_cmd);
12411 install_element(BGP_IPV6M_NODE, &no_neighbor_remove_private_as_cmd);
12412 install_element(BGP_IPV6M_NODE, &neighbor_remove_private_as_all_cmd);
12413 install_element(BGP_IPV6M_NODE, &no_neighbor_remove_private_as_all_cmd);
12414 install_element(BGP_IPV6M_NODE,
12415 &neighbor_remove_private_as_replace_as_cmd);
12416 install_element(BGP_IPV6M_NODE,
12417 &no_neighbor_remove_private_as_replace_as_cmd);
12418 install_element(BGP_IPV6M_NODE,
12419 &neighbor_remove_private_as_all_replace_as_cmd);
12420 install_element(BGP_IPV6M_NODE,
12421 &no_neighbor_remove_private_as_all_replace_as_cmd);
12422 install_element(BGP_IPV6L_NODE, &neighbor_remove_private_as_cmd);
12423 install_element(BGP_IPV6L_NODE, &no_neighbor_remove_private_as_cmd);
12424 install_element(BGP_IPV6L_NODE, &neighbor_remove_private_as_all_cmd);
12425 install_element(BGP_IPV6L_NODE, &no_neighbor_remove_private_as_all_cmd);
12426 install_element(BGP_IPV6L_NODE,
12427 &neighbor_remove_private_as_replace_as_cmd);
12428 install_element(BGP_IPV6L_NODE,
12429 &no_neighbor_remove_private_as_replace_as_cmd);
12430 install_element(BGP_IPV6L_NODE,
12431 &neighbor_remove_private_as_all_replace_as_cmd);
12432 install_element(BGP_IPV6L_NODE,
12433 &no_neighbor_remove_private_as_all_replace_as_cmd);
12434 install_element(BGP_VPNV4_NODE, &neighbor_remove_private_as_cmd);
12435 install_element(BGP_VPNV4_NODE, &no_neighbor_remove_private_as_cmd);
12436 install_element(BGP_VPNV4_NODE, &neighbor_remove_private_as_all_cmd);
12437 install_element(BGP_VPNV4_NODE, &no_neighbor_remove_private_as_all_cmd);
12438 install_element(BGP_VPNV4_NODE,
12439 &neighbor_remove_private_as_replace_as_cmd);
12440 install_element(BGP_VPNV4_NODE,
12441 &no_neighbor_remove_private_as_replace_as_cmd);
12442 install_element(BGP_VPNV4_NODE,
12443 &neighbor_remove_private_as_all_replace_as_cmd);
12444 install_element(BGP_VPNV4_NODE,
12445 &no_neighbor_remove_private_as_all_replace_as_cmd);
12446 install_element(BGP_VPNV6_NODE, &neighbor_remove_private_as_cmd);
12447 install_element(BGP_VPNV6_NODE, &no_neighbor_remove_private_as_cmd);
12448 install_element(BGP_VPNV6_NODE, &neighbor_remove_private_as_all_cmd);
12449 install_element(BGP_VPNV6_NODE, &no_neighbor_remove_private_as_all_cmd);
12450 install_element(BGP_VPNV6_NODE,
12451 &neighbor_remove_private_as_replace_as_cmd);
12452 install_element(BGP_VPNV6_NODE,
12453 &no_neighbor_remove_private_as_replace_as_cmd);
12454 install_element(BGP_VPNV6_NODE,
12455 &neighbor_remove_private_as_all_replace_as_cmd);
12456 install_element(BGP_VPNV6_NODE,
12457 &no_neighbor_remove_private_as_all_replace_as_cmd);
12458
12459 /* "neighbor send-community" commands.*/
12460 install_element(BGP_NODE, &neighbor_send_community_hidden_cmd);
12461 install_element(BGP_NODE, &neighbor_send_community_type_hidden_cmd);
12462 install_element(BGP_NODE, &no_neighbor_send_community_hidden_cmd);
12463 install_element(BGP_NODE, &no_neighbor_send_community_type_hidden_cmd);
12464 install_element(BGP_IPV4_NODE, &neighbor_send_community_cmd);
12465 install_element(BGP_IPV4_NODE, &neighbor_send_community_type_cmd);
12466 install_element(BGP_IPV4_NODE, &no_neighbor_send_community_cmd);
12467 install_element(BGP_IPV4_NODE, &no_neighbor_send_community_type_cmd);
12468 install_element(BGP_IPV4M_NODE, &neighbor_send_community_cmd);
12469 install_element(BGP_IPV4M_NODE, &neighbor_send_community_type_cmd);
12470 install_element(BGP_IPV4M_NODE, &no_neighbor_send_community_cmd);
12471 install_element(BGP_IPV4M_NODE, &no_neighbor_send_community_type_cmd);
12472 install_element(BGP_IPV4L_NODE, &neighbor_send_community_cmd);
12473 install_element(BGP_IPV4L_NODE, &neighbor_send_community_type_cmd);
12474 install_element(BGP_IPV4L_NODE, &no_neighbor_send_community_cmd);
12475 install_element(BGP_IPV4L_NODE, &no_neighbor_send_community_type_cmd);
12476 install_element(BGP_IPV6_NODE, &neighbor_send_community_cmd);
12477 install_element(BGP_IPV6_NODE, &neighbor_send_community_type_cmd);
12478 install_element(BGP_IPV6_NODE, &no_neighbor_send_community_cmd);
12479 install_element(BGP_IPV6_NODE, &no_neighbor_send_community_type_cmd);
12480 install_element(BGP_IPV6M_NODE, &neighbor_send_community_cmd);
12481 install_element(BGP_IPV6M_NODE, &neighbor_send_community_type_cmd);
12482 install_element(BGP_IPV6M_NODE, &no_neighbor_send_community_cmd);
12483 install_element(BGP_IPV6M_NODE, &no_neighbor_send_community_type_cmd);
12484 install_element(BGP_IPV6L_NODE, &neighbor_send_community_cmd);
12485 install_element(BGP_IPV6L_NODE, &neighbor_send_community_type_cmd);
12486 install_element(BGP_IPV6L_NODE, &no_neighbor_send_community_cmd);
12487 install_element(BGP_IPV6L_NODE, &no_neighbor_send_community_type_cmd);
12488 install_element(BGP_VPNV4_NODE, &neighbor_send_community_cmd);
12489 install_element(BGP_VPNV4_NODE, &neighbor_send_community_type_cmd);
12490 install_element(BGP_VPNV4_NODE, &no_neighbor_send_community_cmd);
12491 install_element(BGP_VPNV4_NODE, &no_neighbor_send_community_type_cmd);
12492 install_element(BGP_VPNV6_NODE, &neighbor_send_community_cmd);
12493 install_element(BGP_VPNV6_NODE, &neighbor_send_community_type_cmd);
12494 install_element(BGP_VPNV6_NODE, &no_neighbor_send_community_cmd);
12495 install_element(BGP_VPNV6_NODE, &no_neighbor_send_community_type_cmd);
12496
12497 /* "neighbor route-reflector" commands.*/
12498 install_element(BGP_NODE, &neighbor_route_reflector_client_hidden_cmd);
12499 install_element(BGP_NODE,
12500 &no_neighbor_route_reflector_client_hidden_cmd);
12501 install_element(BGP_IPV4_NODE, &neighbor_route_reflector_client_cmd);
12502 install_element(BGP_IPV4_NODE, &no_neighbor_route_reflector_client_cmd);
12503 install_element(BGP_IPV4M_NODE, &neighbor_route_reflector_client_cmd);
12504 install_element(BGP_IPV4M_NODE,
12505 &no_neighbor_route_reflector_client_cmd);
12506 install_element(BGP_IPV4L_NODE, &neighbor_route_reflector_client_cmd);
12507 install_element(BGP_IPV4L_NODE,
12508 &no_neighbor_route_reflector_client_cmd);
12509 install_element(BGP_IPV6_NODE, &neighbor_route_reflector_client_cmd);
12510 install_element(BGP_IPV6_NODE, &no_neighbor_route_reflector_client_cmd);
12511 install_element(BGP_IPV6M_NODE, &neighbor_route_reflector_client_cmd);
12512 install_element(BGP_IPV6M_NODE,
12513 &no_neighbor_route_reflector_client_cmd);
12514 install_element(BGP_IPV6L_NODE, &neighbor_route_reflector_client_cmd);
12515 install_element(BGP_IPV6L_NODE,
12516 &no_neighbor_route_reflector_client_cmd);
12517 install_element(BGP_VPNV4_NODE, &neighbor_route_reflector_client_cmd);
12518 install_element(BGP_VPNV4_NODE,
12519 &no_neighbor_route_reflector_client_cmd);
12520 install_element(BGP_VPNV6_NODE, &neighbor_route_reflector_client_cmd);
12521 install_element(BGP_VPNV6_NODE,
12522 &no_neighbor_route_reflector_client_cmd);
7c40bf39 12523 install_element(BGP_FLOWSPECV4_NODE,
12524 &neighbor_route_reflector_client_cmd);
12525 install_element(BGP_FLOWSPECV4_NODE,
12526 &no_neighbor_route_reflector_client_cmd);
12527 install_element(BGP_FLOWSPECV6_NODE,
12528 &neighbor_route_reflector_client_cmd);
12529 install_element(BGP_FLOWSPECV6_NODE,
12530 &no_neighbor_route_reflector_client_cmd);
d62a17ae 12531 install_element(BGP_EVPN_NODE, &neighbor_route_reflector_client_cmd);
12532 install_element(BGP_EVPN_NODE, &no_neighbor_route_reflector_client_cmd);
12533
12534 /* "neighbor route-server" commands.*/
12535 install_element(BGP_NODE, &neighbor_route_server_client_hidden_cmd);
12536 install_element(BGP_NODE, &no_neighbor_route_server_client_hidden_cmd);
12537 install_element(BGP_IPV4_NODE, &neighbor_route_server_client_cmd);
12538 install_element(BGP_IPV4_NODE, &no_neighbor_route_server_client_cmd);
12539 install_element(BGP_IPV4M_NODE, &neighbor_route_server_client_cmd);
12540 install_element(BGP_IPV4M_NODE, &no_neighbor_route_server_client_cmd);
12541 install_element(BGP_IPV4L_NODE, &neighbor_route_server_client_cmd);
12542 install_element(BGP_IPV4L_NODE, &no_neighbor_route_server_client_cmd);
12543 install_element(BGP_IPV6_NODE, &neighbor_route_server_client_cmd);
12544 install_element(BGP_IPV6_NODE, &no_neighbor_route_server_client_cmd);
12545 install_element(BGP_IPV6M_NODE, &neighbor_route_server_client_cmd);
12546 install_element(BGP_IPV6M_NODE, &no_neighbor_route_server_client_cmd);
12547 install_element(BGP_IPV6L_NODE, &neighbor_route_server_client_cmd);
12548 install_element(BGP_IPV6L_NODE, &no_neighbor_route_server_client_cmd);
12549 install_element(BGP_VPNV4_NODE, &neighbor_route_server_client_cmd);
12550 install_element(BGP_VPNV4_NODE, &no_neighbor_route_server_client_cmd);
12551 install_element(BGP_VPNV6_NODE, &neighbor_route_server_client_cmd);
12552 install_element(BGP_VPNV6_NODE, &no_neighbor_route_server_client_cmd);
7c40bf39 12553 install_element(BGP_FLOWSPECV4_NODE, &neighbor_route_server_client_cmd);
12554 install_element(BGP_FLOWSPECV4_NODE,
12555 &no_neighbor_route_server_client_cmd);
12556 install_element(BGP_FLOWSPECV6_NODE, &neighbor_route_server_client_cmd);
12557 install_element(BGP_FLOWSPECV6_NODE,
12558 &no_neighbor_route_server_client_cmd);
d62a17ae 12559
12560 /* "neighbor addpath-tx-all-paths" commands.*/
12561 install_element(BGP_NODE, &neighbor_addpath_tx_all_paths_hidden_cmd);
12562 install_element(BGP_NODE, &no_neighbor_addpath_tx_all_paths_hidden_cmd);
12563 install_element(BGP_IPV4_NODE, &neighbor_addpath_tx_all_paths_cmd);
12564 install_element(BGP_IPV4_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12565 install_element(BGP_IPV4M_NODE, &neighbor_addpath_tx_all_paths_cmd);
12566 install_element(BGP_IPV4M_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12567 install_element(BGP_IPV4L_NODE, &neighbor_addpath_tx_all_paths_cmd);
12568 install_element(BGP_IPV4L_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12569 install_element(BGP_IPV6_NODE, &neighbor_addpath_tx_all_paths_cmd);
12570 install_element(BGP_IPV6_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12571 install_element(BGP_IPV6M_NODE, &neighbor_addpath_tx_all_paths_cmd);
12572 install_element(BGP_IPV6M_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12573 install_element(BGP_IPV6L_NODE, &neighbor_addpath_tx_all_paths_cmd);
12574 install_element(BGP_IPV6L_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12575 install_element(BGP_VPNV4_NODE, &neighbor_addpath_tx_all_paths_cmd);
12576 install_element(BGP_VPNV4_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12577 install_element(BGP_VPNV6_NODE, &neighbor_addpath_tx_all_paths_cmd);
12578 install_element(BGP_VPNV6_NODE, &no_neighbor_addpath_tx_all_paths_cmd);
12579
12580 /* "neighbor addpath-tx-bestpath-per-AS" commands.*/
12581 install_element(BGP_NODE,
12582 &neighbor_addpath_tx_bestpath_per_as_hidden_cmd);
12583 install_element(BGP_NODE,
12584 &no_neighbor_addpath_tx_bestpath_per_as_hidden_cmd);
12585 install_element(BGP_IPV4_NODE,
12586 &neighbor_addpath_tx_bestpath_per_as_cmd);
12587 install_element(BGP_IPV4_NODE,
12588 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12589 install_element(BGP_IPV4M_NODE,
12590 &neighbor_addpath_tx_bestpath_per_as_cmd);
12591 install_element(BGP_IPV4M_NODE,
12592 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12593 install_element(BGP_IPV4L_NODE,
12594 &neighbor_addpath_tx_bestpath_per_as_cmd);
12595 install_element(BGP_IPV4L_NODE,
12596 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12597 install_element(BGP_IPV6_NODE,
12598 &neighbor_addpath_tx_bestpath_per_as_cmd);
12599 install_element(BGP_IPV6_NODE,
12600 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12601 install_element(BGP_IPV6M_NODE,
12602 &neighbor_addpath_tx_bestpath_per_as_cmd);
12603 install_element(BGP_IPV6M_NODE,
12604 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12605 install_element(BGP_IPV6L_NODE,
12606 &neighbor_addpath_tx_bestpath_per_as_cmd);
12607 install_element(BGP_IPV6L_NODE,
12608 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12609 install_element(BGP_VPNV4_NODE,
12610 &neighbor_addpath_tx_bestpath_per_as_cmd);
12611 install_element(BGP_VPNV4_NODE,
12612 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12613 install_element(BGP_VPNV6_NODE,
12614 &neighbor_addpath_tx_bestpath_per_as_cmd);
12615 install_element(BGP_VPNV6_NODE,
12616 &no_neighbor_addpath_tx_bestpath_per_as_cmd);
12617
12618 /* "neighbor passive" commands. */
12619 install_element(BGP_NODE, &neighbor_passive_cmd);
12620 install_element(BGP_NODE, &no_neighbor_passive_cmd);
12621
12622
12623 /* "neighbor shutdown" commands. */
12624 install_element(BGP_NODE, &neighbor_shutdown_cmd);
12625 install_element(BGP_NODE, &no_neighbor_shutdown_cmd);
12626 install_element(BGP_NODE, &neighbor_shutdown_msg_cmd);
12627 install_element(BGP_NODE, &no_neighbor_shutdown_msg_cmd);
12628
12629 /* "neighbor capability extended-nexthop" commands.*/
12630 install_element(BGP_NODE, &neighbor_capability_enhe_cmd);
12631 install_element(BGP_NODE, &no_neighbor_capability_enhe_cmd);
12632
12633 /* "neighbor capability orf prefix-list" commands.*/
12634 install_element(BGP_NODE, &neighbor_capability_orf_prefix_hidden_cmd);
12635 install_element(BGP_NODE,
12636 &no_neighbor_capability_orf_prefix_hidden_cmd);
12637 install_element(BGP_IPV4_NODE, &neighbor_capability_orf_prefix_cmd);
12638 install_element(BGP_IPV4_NODE, &no_neighbor_capability_orf_prefix_cmd);
12639 install_element(BGP_IPV4M_NODE, &neighbor_capability_orf_prefix_cmd);
12640 install_element(BGP_IPV4M_NODE, &no_neighbor_capability_orf_prefix_cmd);
12641 install_element(BGP_IPV4L_NODE, &neighbor_capability_orf_prefix_cmd);
12642 install_element(BGP_IPV4L_NODE, &no_neighbor_capability_orf_prefix_cmd);
12643 install_element(BGP_IPV6_NODE, &neighbor_capability_orf_prefix_cmd);
12644 install_element(BGP_IPV6_NODE, &no_neighbor_capability_orf_prefix_cmd);
12645 install_element(BGP_IPV6M_NODE, &neighbor_capability_orf_prefix_cmd);
12646 install_element(BGP_IPV6M_NODE, &no_neighbor_capability_orf_prefix_cmd);
12647 install_element(BGP_IPV6L_NODE, &neighbor_capability_orf_prefix_cmd);
12648 install_element(BGP_IPV6L_NODE, &no_neighbor_capability_orf_prefix_cmd);
12649
12650 /* "neighbor capability dynamic" commands.*/
12651 install_element(BGP_NODE, &neighbor_capability_dynamic_cmd);
12652 install_element(BGP_NODE, &no_neighbor_capability_dynamic_cmd);
12653
12654 /* "neighbor dont-capability-negotiate" commands. */
12655 install_element(BGP_NODE, &neighbor_dont_capability_negotiate_cmd);
12656 install_element(BGP_NODE, &no_neighbor_dont_capability_negotiate_cmd);
12657
12658 /* "neighbor ebgp-multihop" commands. */
12659 install_element(BGP_NODE, &neighbor_ebgp_multihop_cmd);
12660 install_element(BGP_NODE, &neighbor_ebgp_multihop_ttl_cmd);
12661 install_element(BGP_NODE, &no_neighbor_ebgp_multihop_cmd);
12662
12663 /* "neighbor disable-connected-check" commands. */
12664 install_element(BGP_NODE, &neighbor_disable_connected_check_cmd);
12665 install_element(BGP_NODE, &no_neighbor_disable_connected_check_cmd);
12666
12667 /* "neighbor description" commands. */
12668 install_element(BGP_NODE, &neighbor_description_cmd);
12669 install_element(BGP_NODE, &no_neighbor_description_cmd);
12670
12671 /* "neighbor update-source" commands. "*/
12672 install_element(BGP_NODE, &neighbor_update_source_cmd);
12673 install_element(BGP_NODE, &no_neighbor_update_source_cmd);
12674
12675 /* "neighbor default-originate" commands. */
12676 install_element(BGP_NODE, &neighbor_default_originate_hidden_cmd);
12677 install_element(BGP_NODE, &neighbor_default_originate_rmap_hidden_cmd);
12678 install_element(BGP_NODE, &no_neighbor_default_originate_hidden_cmd);
12679 install_element(BGP_IPV4_NODE, &neighbor_default_originate_cmd);
12680 install_element(BGP_IPV4_NODE, &neighbor_default_originate_rmap_cmd);
12681 install_element(BGP_IPV4_NODE, &no_neighbor_default_originate_cmd);
12682 install_element(BGP_IPV4M_NODE, &neighbor_default_originate_cmd);
12683 install_element(BGP_IPV4M_NODE, &neighbor_default_originate_rmap_cmd);
12684 install_element(BGP_IPV4M_NODE, &no_neighbor_default_originate_cmd);
12685 install_element(BGP_IPV4L_NODE, &neighbor_default_originate_cmd);
12686 install_element(BGP_IPV4L_NODE, &neighbor_default_originate_rmap_cmd);
12687 install_element(BGP_IPV4L_NODE, &no_neighbor_default_originate_cmd);
12688 install_element(BGP_IPV6_NODE, &neighbor_default_originate_cmd);
12689 install_element(BGP_IPV6_NODE, &neighbor_default_originate_rmap_cmd);
12690 install_element(BGP_IPV6_NODE, &no_neighbor_default_originate_cmd);
12691 install_element(BGP_IPV6M_NODE, &neighbor_default_originate_cmd);
12692 install_element(BGP_IPV6M_NODE, &neighbor_default_originate_rmap_cmd);
12693 install_element(BGP_IPV6M_NODE, &no_neighbor_default_originate_cmd);
12694 install_element(BGP_IPV6L_NODE, &neighbor_default_originate_cmd);
12695 install_element(BGP_IPV6L_NODE, &neighbor_default_originate_rmap_cmd);
12696 install_element(BGP_IPV6L_NODE, &no_neighbor_default_originate_cmd);
12697
12698 /* "neighbor port" commands. */
12699 install_element(BGP_NODE, &neighbor_port_cmd);
12700 install_element(BGP_NODE, &no_neighbor_port_cmd);
12701
12702 /* "neighbor weight" commands. */
12703 install_element(BGP_NODE, &neighbor_weight_hidden_cmd);
12704 install_element(BGP_NODE, &no_neighbor_weight_hidden_cmd);
12705
12706 install_element(BGP_IPV4_NODE, &neighbor_weight_cmd);
12707 install_element(BGP_IPV4_NODE, &no_neighbor_weight_cmd);
12708 install_element(BGP_IPV4M_NODE, &neighbor_weight_cmd);
12709 install_element(BGP_IPV4M_NODE, &no_neighbor_weight_cmd);
12710 install_element(BGP_IPV4L_NODE, &neighbor_weight_cmd);
12711 install_element(BGP_IPV4L_NODE, &no_neighbor_weight_cmd);
12712 install_element(BGP_IPV6_NODE, &neighbor_weight_cmd);
12713 install_element(BGP_IPV6_NODE, &no_neighbor_weight_cmd);
12714 install_element(BGP_IPV6M_NODE, &neighbor_weight_cmd);
12715 install_element(BGP_IPV6M_NODE, &no_neighbor_weight_cmd);
12716 install_element(BGP_IPV6L_NODE, &neighbor_weight_cmd);
12717 install_element(BGP_IPV6L_NODE, &no_neighbor_weight_cmd);
12718 install_element(BGP_VPNV4_NODE, &neighbor_weight_cmd);
12719 install_element(BGP_VPNV4_NODE, &no_neighbor_weight_cmd);
12720 install_element(BGP_VPNV6_NODE, &neighbor_weight_cmd);
12721 install_element(BGP_VPNV6_NODE, &no_neighbor_weight_cmd);
12722
12723 /* "neighbor override-capability" commands. */
12724 install_element(BGP_NODE, &neighbor_override_capability_cmd);
12725 install_element(BGP_NODE, &no_neighbor_override_capability_cmd);
12726
12727 /* "neighbor strict-capability-match" commands. */
12728 install_element(BGP_NODE, &neighbor_strict_capability_cmd);
12729 install_element(BGP_NODE, &no_neighbor_strict_capability_cmd);
12730
12731 /* "neighbor timers" commands. */
12732 install_element(BGP_NODE, &neighbor_timers_cmd);
12733 install_element(BGP_NODE, &no_neighbor_timers_cmd);
12734
12735 /* "neighbor timers connect" commands. */
12736 install_element(BGP_NODE, &neighbor_timers_connect_cmd);
12737 install_element(BGP_NODE, &no_neighbor_timers_connect_cmd);
12738
12739 /* "neighbor advertisement-interval" commands. */
12740 install_element(BGP_NODE, &neighbor_advertise_interval_cmd);
12741 install_element(BGP_NODE, &no_neighbor_advertise_interval_cmd);
12742
12743 /* "neighbor interface" commands. */
12744 install_element(BGP_NODE, &neighbor_interface_cmd);
12745 install_element(BGP_NODE, &no_neighbor_interface_cmd);
12746
12747 /* "neighbor distribute" commands. */
12748 install_element(BGP_NODE, &neighbor_distribute_list_hidden_cmd);
12749 install_element(BGP_NODE, &no_neighbor_distribute_list_hidden_cmd);
12750 install_element(BGP_IPV4_NODE, &neighbor_distribute_list_cmd);
12751 install_element(BGP_IPV4_NODE, &no_neighbor_distribute_list_cmd);
12752 install_element(BGP_IPV4M_NODE, &neighbor_distribute_list_cmd);
12753 install_element(BGP_IPV4M_NODE, &no_neighbor_distribute_list_cmd);
12754 install_element(BGP_IPV4L_NODE, &neighbor_distribute_list_cmd);
12755 install_element(BGP_IPV4L_NODE, &no_neighbor_distribute_list_cmd);
12756 install_element(BGP_IPV6_NODE, &neighbor_distribute_list_cmd);
12757 install_element(BGP_IPV6_NODE, &no_neighbor_distribute_list_cmd);
12758 install_element(BGP_IPV6M_NODE, &neighbor_distribute_list_cmd);
12759 install_element(BGP_IPV6M_NODE, &no_neighbor_distribute_list_cmd);
12760 install_element(BGP_IPV6L_NODE, &neighbor_distribute_list_cmd);
12761 install_element(BGP_IPV6L_NODE, &no_neighbor_distribute_list_cmd);
12762 install_element(BGP_VPNV4_NODE, &neighbor_distribute_list_cmd);
12763 install_element(BGP_VPNV4_NODE, &no_neighbor_distribute_list_cmd);
12764 install_element(BGP_VPNV6_NODE, &neighbor_distribute_list_cmd);
12765 install_element(BGP_VPNV6_NODE, &no_neighbor_distribute_list_cmd);
12766
12767 /* "neighbor prefix-list" commands. */
12768 install_element(BGP_NODE, &neighbor_prefix_list_hidden_cmd);
12769 install_element(BGP_NODE, &no_neighbor_prefix_list_hidden_cmd);
12770 install_element(BGP_IPV4_NODE, &neighbor_prefix_list_cmd);
12771 install_element(BGP_IPV4_NODE, &no_neighbor_prefix_list_cmd);
12772 install_element(BGP_IPV4M_NODE, &neighbor_prefix_list_cmd);
12773 install_element(BGP_IPV4M_NODE, &no_neighbor_prefix_list_cmd);
12774 install_element(BGP_IPV4L_NODE, &neighbor_prefix_list_cmd);
12775 install_element(BGP_IPV4L_NODE, &no_neighbor_prefix_list_cmd);
12776 install_element(BGP_IPV6_NODE, &neighbor_prefix_list_cmd);
12777 install_element(BGP_IPV6_NODE, &no_neighbor_prefix_list_cmd);
12778 install_element(BGP_IPV6M_NODE, &neighbor_prefix_list_cmd);
12779 install_element(BGP_IPV6M_NODE, &no_neighbor_prefix_list_cmd);
12780 install_element(BGP_IPV6L_NODE, &neighbor_prefix_list_cmd);
12781 install_element(BGP_IPV6L_NODE, &no_neighbor_prefix_list_cmd);
12782 install_element(BGP_VPNV4_NODE, &neighbor_prefix_list_cmd);
12783 install_element(BGP_VPNV4_NODE, &no_neighbor_prefix_list_cmd);
12784 install_element(BGP_VPNV6_NODE, &neighbor_prefix_list_cmd);
12785 install_element(BGP_VPNV6_NODE, &no_neighbor_prefix_list_cmd);
7c40bf39 12786 install_element(BGP_FLOWSPECV4_NODE, &neighbor_prefix_list_cmd);
12787 install_element(BGP_FLOWSPECV4_NODE, &no_neighbor_prefix_list_cmd);
12788 install_element(BGP_FLOWSPECV6_NODE, &neighbor_prefix_list_cmd);
12789 install_element(BGP_FLOWSPECV6_NODE, &no_neighbor_prefix_list_cmd);
d62a17ae 12790
12791 /* "neighbor filter-list" commands. */
12792 install_element(BGP_NODE, &neighbor_filter_list_hidden_cmd);
12793 install_element(BGP_NODE, &no_neighbor_filter_list_hidden_cmd);
12794 install_element(BGP_IPV4_NODE, &neighbor_filter_list_cmd);
12795 install_element(BGP_IPV4_NODE, &no_neighbor_filter_list_cmd);
12796 install_element(BGP_IPV4M_NODE, &neighbor_filter_list_cmd);
12797 install_element(BGP_IPV4M_NODE, &no_neighbor_filter_list_cmd);
12798 install_element(BGP_IPV4L_NODE, &neighbor_filter_list_cmd);
12799 install_element(BGP_IPV4L_NODE, &no_neighbor_filter_list_cmd);
12800 install_element(BGP_IPV6_NODE, &neighbor_filter_list_cmd);
12801 install_element(BGP_IPV6_NODE, &no_neighbor_filter_list_cmd);
12802 install_element(BGP_IPV6M_NODE, &neighbor_filter_list_cmd);
12803 install_element(BGP_IPV6M_NODE, &no_neighbor_filter_list_cmd);
12804 install_element(BGP_IPV6L_NODE, &neighbor_filter_list_cmd);
12805 install_element(BGP_IPV6L_NODE, &no_neighbor_filter_list_cmd);
12806 install_element(BGP_VPNV4_NODE, &neighbor_filter_list_cmd);
12807 install_element(BGP_VPNV4_NODE, &no_neighbor_filter_list_cmd);
12808 install_element(BGP_VPNV6_NODE, &neighbor_filter_list_cmd);
12809 install_element(BGP_VPNV6_NODE, &no_neighbor_filter_list_cmd);
7c40bf39 12810 install_element(BGP_FLOWSPECV4_NODE, &neighbor_filter_list_cmd);
12811 install_element(BGP_FLOWSPECV4_NODE, &no_neighbor_filter_list_cmd);
12812 install_element(BGP_FLOWSPECV6_NODE, &neighbor_filter_list_cmd);
12813 install_element(BGP_FLOWSPECV6_NODE, &no_neighbor_filter_list_cmd);
d62a17ae 12814
12815 /* "neighbor route-map" commands. */
12816 install_element(BGP_NODE, &neighbor_route_map_hidden_cmd);
12817 install_element(BGP_NODE, &no_neighbor_route_map_hidden_cmd);
12818 install_element(BGP_IPV4_NODE, &neighbor_route_map_cmd);
12819 install_element(BGP_IPV4_NODE, &no_neighbor_route_map_cmd);
12820 install_element(BGP_IPV4M_NODE, &neighbor_route_map_cmd);
12821 install_element(BGP_IPV4M_NODE, &no_neighbor_route_map_cmd);
12822 install_element(BGP_IPV4L_NODE, &neighbor_route_map_cmd);
12823 install_element(BGP_IPV4L_NODE, &no_neighbor_route_map_cmd);
12824 install_element(BGP_IPV6_NODE, &neighbor_route_map_cmd);
12825 install_element(BGP_IPV6_NODE, &no_neighbor_route_map_cmd);
12826 install_element(BGP_IPV6M_NODE, &neighbor_route_map_cmd);
12827 install_element(BGP_IPV6M_NODE, &no_neighbor_route_map_cmd);
12828 install_element(BGP_IPV6L_NODE, &neighbor_route_map_cmd);
12829 install_element(BGP_IPV6L_NODE, &no_neighbor_route_map_cmd);
12830 install_element(BGP_VPNV4_NODE, &neighbor_route_map_cmd);
12831 install_element(BGP_VPNV4_NODE, &no_neighbor_route_map_cmd);
12832 install_element(BGP_VPNV6_NODE, &neighbor_route_map_cmd);
12833 install_element(BGP_VPNV6_NODE, &no_neighbor_route_map_cmd);
7c40bf39 12834 install_element(BGP_FLOWSPECV4_NODE, &neighbor_route_map_cmd);
12835 install_element(BGP_FLOWSPECV4_NODE, &no_neighbor_route_map_cmd);
12836 install_element(BGP_FLOWSPECV6_NODE, &neighbor_route_map_cmd);
12837 install_element(BGP_FLOWSPECV6_NODE, &no_neighbor_route_map_cmd);
d37ba549
MK		 12838 install_element(BGP_EVPN_NODE, &neighbor_route_map_cmd);
12839 install_element(BGP_EVPN_NODE, &no_neighbor_route_map_cmd);
d62a17ae 12840
12841 /* "neighbor unsuppress-map" commands. */
12842 install_element(BGP_NODE, &neighbor_unsuppress_map_hidden_cmd);
12843 install_element(BGP_NODE, &no_neighbor_unsuppress_map_hidden_cmd);
12844 install_element(BGP_IPV4_NODE, &neighbor_unsuppress_map_cmd);
12845 install_element(BGP_IPV4_NODE, &no_neighbor_unsuppress_map_cmd);
12846 install_element(BGP_IPV4M_NODE, &neighbor_unsuppress_map_cmd);
12847 install_element(BGP_IPV4M_NODE, &no_neighbor_unsuppress_map_cmd);
12848 install_element(BGP_IPV4L_NODE, &neighbor_unsuppress_map_cmd);
12849 install_element(BGP_IPV4L_NODE, &no_neighbor_unsuppress_map_cmd);
12850 install_element(BGP_IPV6_NODE, &neighbor_unsuppress_map_cmd);
12851 install_element(BGP_IPV6_NODE, &no_neighbor_unsuppress_map_cmd);
12852 install_element(BGP_IPV6M_NODE, &neighbor_unsuppress_map_cmd);
12853 install_element(BGP_IPV6M_NODE, &no_neighbor_unsuppress_map_cmd);
12854 install_element(BGP_IPV6L_NODE, &neighbor_unsuppress_map_cmd);
12855 install_element(BGP_IPV6L_NODE, &no_neighbor_unsuppress_map_cmd);
12856 install_element(BGP_VPNV4_NODE, &neighbor_unsuppress_map_cmd);
12857 install_element(BGP_VPNV4_NODE, &no_neighbor_unsuppress_map_cmd);
12858 install_element(BGP_VPNV6_NODE, &neighbor_unsuppress_map_cmd);
12859 install_element(BGP_VPNV6_NODE, &no_neighbor_unsuppress_map_cmd);
12860
12861 /* "neighbor maximum-prefix" commands. */
12862 install_element(BGP_NODE, &neighbor_maximum_prefix_hidden_cmd);
12863 install_element(BGP_NODE,
12864 &neighbor_maximum_prefix_threshold_hidden_cmd);
12865 install_element(BGP_NODE, &neighbor_maximum_prefix_warning_hidden_cmd);
12866 install_element(BGP_NODE,
12867 &neighbor_maximum_prefix_threshold_warning_hidden_cmd);
12868 install_element(BGP_NODE, &neighbor_maximum_prefix_restart_hidden_cmd);
12869 install_element(BGP_NODE,
12870 &neighbor_maximum_prefix_threshold_restart_hidden_cmd);
12871 install_element(BGP_NODE, &no_neighbor_maximum_prefix_hidden_cmd);
12872 install_element(BGP_IPV4_NODE, &neighbor_maximum_prefix_cmd);
12873 install_element(BGP_IPV4_NODE, &neighbor_maximum_prefix_threshold_cmd);
12874 install_element(BGP_IPV4_NODE, &neighbor_maximum_prefix_warning_cmd);
12875 install_element(BGP_IPV4_NODE,
12876 &neighbor_maximum_prefix_threshold_warning_cmd);
12877 install_element(BGP_IPV4_NODE, &neighbor_maximum_prefix_restart_cmd);
12878 install_element(BGP_IPV4_NODE,
12879 &neighbor_maximum_prefix_threshold_restart_cmd);
12880 install_element(BGP_IPV4_NODE, &no_neighbor_maximum_prefix_cmd);
12881 install_element(BGP_IPV4M_NODE, &neighbor_maximum_prefix_cmd);
12882 install_element(BGP_IPV4M_NODE, &neighbor_maximum_prefix_threshold_cmd);
12883 install_element(BGP_IPV4M_NODE, &neighbor_maximum_prefix_warning_cmd);
12884 install_element(BGP_IPV4M_NODE,
12885 &neighbor_maximum_prefix_threshold_warning_cmd);
12886 install_element(BGP_IPV4M_NODE, &neighbor_maximum_prefix_restart_cmd);
12887 install_element(BGP_IPV4M_NODE,
12888 &neighbor_maximum_prefix_threshold_restart_cmd);
12889 install_element(BGP_IPV4M_NODE, &no_neighbor_maximum_prefix_cmd);
12890 install_element(BGP_IPV4L_NODE, &neighbor_maximum_prefix_cmd);
12891 install_element(BGP_IPV4L_NODE, &neighbor_maximum_prefix_threshold_cmd);
12892 install_element(BGP_IPV4L_NODE, &neighbor_maximum_prefix_warning_cmd);
12893 install_element(BGP_IPV4L_NODE,
12894 &neighbor_maximum_prefix_threshold_warning_cmd);
12895 install_element(BGP_IPV4L_NODE, &neighbor_maximum_prefix_restart_cmd);
12896 install_element(BGP_IPV4L_NODE,
12897 &neighbor_maximum_prefix_threshold_restart_cmd);
12898 install_element(BGP_IPV4L_NODE, &no_neighbor_maximum_prefix_cmd);
12899 install_element(BGP_IPV6_NODE, &neighbor_maximum_prefix_cmd);
12900 install_element(BGP_IPV6_NODE, &neighbor_maximum_prefix_threshold_cmd);
12901 install_element(BGP_IPV6_NODE, &neighbor_maximum_prefix_warning_cmd);
12902 install_element(BGP_IPV6_NODE,
12903 &neighbor_maximum_prefix_threshold_warning_cmd);
12904 install_element(BGP_IPV6_NODE, &neighbor_maximum_prefix_restart_cmd);
12905 install_element(BGP_IPV6_NODE,
12906 &neighbor_maximum_prefix_threshold_restart_cmd);
12907 install_element(BGP_IPV6_NODE, &no_neighbor_maximum_prefix_cmd);
12908 install_element(BGP_IPV6M_NODE, &neighbor_maximum_prefix_cmd);
12909 install_element(BGP_IPV6M_NODE, &neighbor_maximum_prefix_threshold_cmd);
12910 install_element(BGP_IPV6M_NODE, &neighbor_maximum_prefix_warning_cmd);
12911 install_element(BGP_IPV6M_NODE,
12912 &neighbor_maximum_prefix_threshold_warning_cmd);
12913 install_element(BGP_IPV6M_NODE, &neighbor_maximum_prefix_restart_cmd);
12914 install_element(BGP_IPV6M_NODE,
12915 &neighbor_maximum_prefix_threshold_restart_cmd);
12916 install_element(BGP_IPV6M_NODE, &no_neighbor_maximum_prefix_cmd);
12917 install_element(BGP_IPV6L_NODE, &neighbor_maximum_prefix_cmd);
12918 install_element(BGP_IPV6L_NODE, &neighbor_maximum_prefix_threshold_cmd);
12919 install_element(BGP_IPV6L_NODE, &neighbor_maximum_prefix_warning_cmd);
12920 install_element(BGP_IPV6L_NODE,
12921 &neighbor_maximum_prefix_threshold_warning_cmd);
12922 install_element(BGP_IPV6L_NODE, &neighbor_maximum_prefix_restart_cmd);
12923 install_element(BGP_IPV6L_NODE,
12924 &neighbor_maximum_prefix_threshold_restart_cmd);
12925 install_element(BGP_IPV6L_NODE, &no_neighbor_maximum_prefix_cmd);
12926 install_element(BGP_VPNV4_NODE, &neighbor_maximum_prefix_cmd);
12927 install_element(BGP_VPNV4_NODE, &neighbor_maximum_prefix_threshold_cmd);
12928 install_element(BGP_VPNV4_NODE, &neighbor_maximum_prefix_warning_cmd);
12929 install_element(BGP_VPNV4_NODE,
12930 &neighbor_maximum_prefix_threshold_warning_cmd);
12931 install_element(BGP_VPNV4_NODE, &neighbor_maximum_prefix_restart_cmd);
12932 install_element(BGP_VPNV4_NODE,
12933 &neighbor_maximum_prefix_threshold_restart_cmd);
12934 install_element(BGP_VPNV4_NODE, &no_neighbor_maximum_prefix_cmd);
12935 install_element(BGP_VPNV6_NODE, &neighbor_maximum_prefix_cmd);
12936 install_element(BGP_VPNV6_NODE, &neighbor_maximum_prefix_threshold_cmd);
12937 install_element(BGP_VPNV6_NODE, &neighbor_maximum_prefix_warning_cmd);
12938 install_element(BGP_VPNV6_NODE,
12939 &neighbor_maximum_prefix_threshold_warning_cmd);
12940 install_element(BGP_VPNV6_NODE, &neighbor_maximum_prefix_restart_cmd);
12941 install_element(BGP_VPNV6_NODE,
12942 &neighbor_maximum_prefix_threshold_restart_cmd);
12943 install_element(BGP_VPNV6_NODE, &no_neighbor_maximum_prefix_cmd);
12944
12945 /* "neighbor allowas-in" */
12946 install_element(BGP_NODE, &neighbor_allowas_in_hidden_cmd);
12947 install_element(BGP_NODE, &no_neighbor_allowas_in_hidden_cmd);
12948 install_element(BGP_IPV4_NODE, &neighbor_allowas_in_cmd);
12949 install_element(BGP_IPV4_NODE, &no_neighbor_allowas_in_cmd);
12950 install_element(BGP_IPV4M_NODE, &neighbor_allowas_in_cmd);
12951 install_element(BGP_IPV4M_NODE, &no_neighbor_allowas_in_cmd);
12952 install_element(BGP_IPV4L_NODE, &neighbor_allowas_in_cmd);
12953 install_element(BGP_IPV4L_NODE, &no_neighbor_allowas_in_cmd);
12954 install_element(BGP_IPV6_NODE, &neighbor_allowas_in_cmd);
12955 install_element(BGP_IPV6_NODE, &no_neighbor_allowas_in_cmd);
12956 install_element(BGP_IPV6M_NODE, &neighbor_allowas_in_cmd);
12957 install_element(BGP_IPV6M_NODE, &no_neighbor_allowas_in_cmd);
12958 install_element(BGP_IPV6L_NODE, &neighbor_allowas_in_cmd);
12959 install_element(BGP_IPV6L_NODE, &no_neighbor_allowas_in_cmd);
12960 install_element(BGP_VPNV4_NODE, &neighbor_allowas_in_cmd);
12961 install_element(BGP_VPNV4_NODE, &no_neighbor_allowas_in_cmd);
12962 install_element(BGP_VPNV6_NODE, &neighbor_allowas_in_cmd);
12963 install_element(BGP_VPNV6_NODE, &no_neighbor_allowas_in_cmd);
12964 install_element(BGP_EVPN_NODE, &neighbor_allowas_in_cmd);
12965 install_element(BGP_EVPN_NODE, &no_neighbor_allowas_in_cmd);
12966
12967 /* address-family commands. */
12968 install_element(BGP_NODE, &address_family_ipv4_safi_cmd);
12969 install_element(BGP_NODE, &address_family_ipv6_safi_cmd);
d6902373 12970#ifdef KEEP_OLD_VPN_COMMANDS
d62a17ae 12971 install_element(BGP_NODE, &address_family_vpnv4_cmd);
12972 install_element(BGP_NODE, &address_family_vpnv6_cmd);
d6902373 12973#endif /* KEEP_OLD_VPN_COMMANDS */
8b1fb8be 12974
d62a17ae 12975 install_element(BGP_NODE, &address_family_evpn_cmd);
12976
12977 /* "exit-address-family" command. */
12978 install_element(BGP_IPV4_NODE, &exit_address_family_cmd);
12979 install_element(BGP_IPV4M_NODE, &exit_address_family_cmd);
12980 install_element(BGP_IPV4L_NODE, &exit_address_family_cmd);
12981 install_element(BGP_IPV6_NODE, &exit_address_family_cmd);
12982 install_element(BGP_IPV6M_NODE, &exit_address_family_cmd);
12983 install_element(BGP_IPV6L_NODE, &exit_address_family_cmd);
12984 install_element(BGP_VPNV4_NODE, &exit_address_family_cmd);
12985 install_element(BGP_VPNV6_NODE, &exit_address_family_cmd);
7c40bf39 12986 install_element(BGP_FLOWSPECV4_NODE, &exit_address_family_cmd);
12987 install_element(BGP_FLOWSPECV6_NODE, &exit_address_family_cmd);
d62a17ae 12988 install_element(BGP_EVPN_NODE, &exit_address_family_cmd);
12989
12990 /* "clear ip bgp commands" */
12991 install_element(ENABLE_NODE, &clear_ip_bgp_all_cmd);
12992
12993 /* clear ip bgp prefix */
12994 install_element(ENABLE_NODE, &clear_ip_bgp_prefix_cmd);
12995 install_element(ENABLE_NODE, &clear_bgp_ipv6_safi_prefix_cmd);
12996 install_element(ENABLE_NODE, &clear_bgp_instance_ipv6_safi_prefix_cmd);
12997
12998 /* "show [ip] bgp summary" commands. */
12999 install_element(VIEW_NODE, &show_bgp_instance_all_ipv6_updgrps_cmd);
d62a17ae 13000 install_element(VIEW_NODE, &show_bgp_instance_updgrps_stats_cmd);
d62a17ae 13001 install_element(VIEW_NODE, &show_bgp_updgrps_stats_cmd);
d62a17ae 13002 install_element(VIEW_NODE, &show_ip_bgp_instance_updgrps_adj_s_cmd);
13003 install_element(VIEW_NODE, &show_ip_bgp_summary_cmd);
d62a17ae 13004 install_element(VIEW_NODE, &show_ip_bgp_updgrps_cmd);
13005
13006 /* "show [ip] bgp neighbors" commands. */
13007 install_element(VIEW_NODE, &show_ip_bgp_neighbors_cmd);
13008
13009 /* "show [ip] bgp peer-group" commands. */
13010 install_element(VIEW_NODE, &show_ip_bgp_peer_groups_cmd);
13011
13012 /* "show [ip] bgp paths" commands. */
13013 install_element(VIEW_NODE, &show_ip_bgp_paths_cmd);
13014
13015 /* "show [ip] bgp community" commands. */
13016 install_element(VIEW_NODE, &show_ip_bgp_community_info_cmd);
13017
13018 /* "show ip bgp large-community" commands. */
13019 install_element(VIEW_NODE, &show_ip_bgp_lcommunity_info_cmd);
13020 /* "show [ip] bgp attribute-info" commands. */
13021 install_element(VIEW_NODE, &show_ip_bgp_attr_info_cmd);
13022
13023 /* "redistribute" commands. */
13024 install_element(BGP_NODE, &bgp_redistribute_ipv4_hidden_cmd);
13025 install_element(BGP_NODE, &no_bgp_redistribute_ipv4_hidden_cmd);
13026 install_element(BGP_NODE, &bgp_redistribute_ipv4_rmap_hidden_cmd);
13027 install_element(BGP_NODE, &bgp_redistribute_ipv4_metric_hidden_cmd);
13028 install_element(BGP_NODE,
13029 &bgp_redistribute_ipv4_rmap_metric_hidden_cmd);
13030 install_element(BGP_NODE,
13031 &bgp_redistribute_ipv4_metric_rmap_hidden_cmd);
13032 install_element(BGP_NODE, &bgp_redistribute_ipv4_ospf_hidden_cmd);
13033 install_element(BGP_NODE, &no_bgp_redistribute_ipv4_ospf_hidden_cmd);
13034 install_element(BGP_NODE, &bgp_redistribute_ipv4_ospf_rmap_hidden_cmd);
13035 install_element(BGP_NODE,
13036 &bgp_redistribute_ipv4_ospf_metric_hidden_cmd);
13037 install_element(BGP_NODE,
13038 &bgp_redistribute_ipv4_ospf_rmap_metric_hidden_cmd);
13039 install_element(BGP_NODE,
13040 &bgp_redistribute_ipv4_ospf_metric_rmap_hidden_cmd);
13041 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_cmd);
13042 install_element(BGP_IPV4_NODE, &no_bgp_redistribute_ipv4_cmd);
13043 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_rmap_cmd);
13044 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_metric_cmd);
13045 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_rmap_metric_cmd);
13046 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_metric_rmap_cmd);
13047 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_ospf_cmd);
13048 install_element(BGP_IPV4_NODE, &no_bgp_redistribute_ipv4_ospf_cmd);
13049 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_ospf_rmap_cmd);
13050 install_element(BGP_IPV4_NODE, &bgp_redistribute_ipv4_ospf_metric_cmd);
13051 install_element(BGP_IPV4_NODE,
13052 &bgp_redistribute_ipv4_ospf_rmap_metric_cmd);
13053 install_element(BGP_IPV4_NODE,
13054 &bgp_redistribute_ipv4_ospf_metric_rmap_cmd);
13055 install_element(BGP_IPV6_NODE, &bgp_redistribute_ipv6_cmd);
13056 install_element(BGP_IPV6_NODE, &no_bgp_redistribute_ipv6_cmd);
13057 install_element(BGP_IPV6_NODE, &bgp_redistribute_ipv6_rmap_cmd);
13058 install_element(BGP_IPV6_NODE, &bgp_redistribute_ipv6_metric_cmd);
13059 install_element(BGP_IPV6_NODE, &bgp_redistribute_ipv6_rmap_metric_cmd);
13060 install_element(BGP_IPV6_NODE, &bgp_redistribute_ipv6_metric_rmap_cmd);
13061
b9c7bc5a
PZ		 13062 /* import|export vpn [route-map WORD] */
13063 install_element(BGP_IPV4_NODE, &bgp_imexport_vpn_cmd);
13064 install_element(BGP_IPV6_NODE, &bgp_imexport_vpn_cmd);
ddb5b488 13065
d62a17ae 13066 /* ttl_security commands */
13067 install_element(BGP_NODE, &neighbor_ttl_security_cmd);
13068 install_element(BGP_NODE, &no_neighbor_ttl_security_cmd);
13069
13070 /* "show [ip] bgp memory" commands. */
13071 install_element(VIEW_NODE, &show_bgp_memory_cmd);
13072
acf71666
MK		 13073 /* "show bgp martian next-hop" */
13074 install_element(VIEW_NODE, &show_bgp_martian_nexthop_db_cmd);
13075
d62a17ae 13076 /* "show [ip] bgp views" commands. */
13077 install_element(VIEW_NODE, &show_bgp_views_cmd);
13078
13079 /* "show [ip] bgp vrfs" commands. */
13080 install_element(VIEW_NODE, &show_bgp_vrfs_cmd);
13081
13082 /* Community-list. */
13083 community_list_vty();
ddb5b488
PZ		 13084
13085 /* vpn-policy commands */
b9c7bc5a
PZ		 13086 install_element(BGP_IPV4_NODE, &af_rd_vpn_export_cmd);
13087 install_element(BGP_IPV6_NODE, &af_rd_vpn_export_cmd);
13088 install_element(BGP_IPV4_NODE, &af_label_vpn_export_cmd);
13089 install_element(BGP_IPV6_NODE, &af_label_vpn_export_cmd);
13090 install_element(BGP_IPV4_NODE, &af_nexthop_vpn_export_cmd);
13091 install_element(BGP_IPV6_NODE, &af_nexthop_vpn_export_cmd);
13092 install_element(BGP_IPV4_NODE, &af_rt_vpn_imexport_cmd);
13093 install_element(BGP_IPV6_NODE, &af_rt_vpn_imexport_cmd);
13094 install_element(BGP_IPV4_NODE, &af_route_map_vpn_imexport_cmd);
13095 install_element(BGP_IPV6_NODE, &af_route_map_vpn_imexport_cmd);
13096
301ad80a
PG		 13097 install_element(BGP_IPV4_NODE, &af_routetarget_import_cmd);
13098 install_element(BGP_IPV6_NODE, &af_routetarget_import_cmd);
13099
b9c7bc5a
PZ		 13100 install_element(BGP_IPV4_NODE, &af_no_rd_vpn_export_cmd);
13101 install_element(BGP_IPV6_NODE, &af_no_rd_vpn_export_cmd);
13102 install_element(BGP_IPV4_NODE, &af_no_label_vpn_export_cmd);
13103 install_element(BGP_IPV6_NODE, &af_no_label_vpn_export_cmd);
13104 install_element(BGP_IPV4_NODE, &af_no_nexthop_vpn_export_cmd);
13105 install_element(BGP_IPV6_NODE, &af_no_nexthop_vpn_export_cmd);
13106 install_element(BGP_IPV4_NODE, &af_no_rt_vpn_imexport_cmd);
13107 install_element(BGP_IPV6_NODE, &af_no_rt_vpn_imexport_cmd);
13108 install_element(BGP_IPV4_NODE, &af_no_route_map_vpn_imexport_cmd);
13109 install_element(BGP_IPV6_NODE, &af_no_route_map_vpn_imexport_cmd);
718e3744 13110}
6b0655a2 13111
718e3744 13112#include "memory.h"
13113#include "bgp_regex.h"
13114#include "bgp_clist.h"
13115#include "bgp_ecommunity.h"
13116
13117/* VTY functions. */
13118
13119/* Direction value to string conversion. */
d62a17ae 13120static const char *community_direct_str(int direct)
13121{
13122 switch (direct) {
13123 case COMMUNITY_DENY:
13124 return "deny";
13125 case COMMUNITY_PERMIT:
13126 return "permit";
13127 default:
13128 return "unknown";
13129 }
718e3744 13130}
13131
13132/* Display error string. */
d62a17ae 13133static void community_list_perror(struct vty *vty, int ret)
13134{
13135 switch (ret) {
13136 case COMMUNITY_LIST_ERR_CANT_FIND_LIST:
13137 vty_out(vty, "%% Can't find community-list\n");
13138 break;
13139 case COMMUNITY_LIST_ERR_MALFORMED_VAL:
13140 vty_out(vty, "%% Malformed community-list value\n");
13141 break;
13142 case COMMUNITY_LIST_ERR_STANDARD_CONFLICT:
13143 vty_out(vty,
13144 "%% Community name conflict, previously defined as standard community\n");
13145 break;
13146 case COMMUNITY_LIST_ERR_EXPANDED_CONFLICT:
13147 vty_out(vty,
13148 "%% Community name conflict, previously defined as expanded community\n");
13149 break;
13150 }
718e3744 13151}
13152
5bf15956
DW		 13153/* "community-list" keyword help string. */
13154#define COMMUNITY_LIST_STR "Add a community list entry\n"
13155
5bf15956 13156/* ip community-list standard */
718e3744 13157DEFUN (ip_community_list_standard,
13158 ip_community_list_standard_cmd,
e961923c 13159 "ip community-list <(1-99)|standard WORD> <deny|permit> AA:NN...",
718e3744 13160 IP_STR
13161 COMMUNITY_LIST_STR
13162 "Community list number (standard)\n"
5bf15956 13163 "Add an standard community-list entry\n"
718e3744 13164 "Community list name\n"
13165 "Specify community to reject\n"
13166 "Specify community to accept\n"
13167 COMMUNITY_VAL_STR)
13168{
d62a17ae 13169 char *cl_name_or_number = NULL;
13170 int direct = 0;
13171 int style = COMMUNITY_LIST_STANDARD;
42f914d4 13172
d62a17ae 13173 int idx = 0;
13174 argv_find(argv, argc, "(1-99)", &idx);
13175 argv_find(argv, argc, "WORD", &idx);
13176 cl_name_or_number = argv[idx]->arg;
13177 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13178 : COMMUNITY_DENY;
13179 argv_find(argv, argc, "AA:NN", &idx);
13180 char *str = argv_concat(argv, argc, idx);
42f914d4 13181
d62a17ae 13182 int ret = community_list_set(bgp_clist, cl_name_or_number, str, direct,
13183 style);
42f914d4 13184
d62a17ae 13185 XFREE(MTYPE_TMP, str);
42f914d4 13186
d62a17ae 13187 if (ret < 0) {
13188 /* Display error string. */
13189 community_list_perror(vty, ret);
13190 return CMD_WARNING_CONFIG_FAILED;
13191 }
42f914d4 13192
d62a17ae 13193 return CMD_SUCCESS;
718e3744 13194}
13195
fee6e4e4 13196DEFUN (no_ip_community_list_standard_all,
13197 no_ip_community_list_standard_all_cmd,
e961923c 13198 "no ip community-list <(1-99)|standard WORD> <deny|permit> AA:NN...",
718e3744 13199 NO_STR
13200 IP_STR
13201 COMMUNITY_LIST_STR
13202 "Community list number (standard)\n"
5bf15956
DW		 13203 "Add an standard community-list entry\n"
13204 "Community list name\n"
718e3744 13205 "Specify community to reject\n"
13206 "Specify community to accept\n"
13207 COMMUNITY_VAL_STR)
13208{
d62a17ae 13209 char *cl_name_or_number = NULL;
13210 int direct = 0;
13211 int style = COMMUNITY_LIST_STANDARD;
42f914d4 13212
d62a17ae 13213 int idx = 0;
13214 argv_find(argv, argc, "(1-99)", &idx);
13215 argv_find(argv, argc, "WORD", &idx);
13216 cl_name_or_number = argv[idx]->arg;
13217 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13218 : COMMUNITY_DENY;
13219 argv_find(argv, argc, "AA:NN", &idx);
13220 char *str = argv_concat(argv, argc, idx);
42f914d4 13221
d62a17ae 13222 int ret = community_list_unset(bgp_clist, cl_name_or_number, str,
7298a8e1 13223 direct, style);
42f914d4 13224
d62a17ae 13225 XFREE(MTYPE_TMP, str);
daf9ddbb 13226
d62a17ae 13227 if (ret < 0) {
13228 community_list_perror(vty, ret);
13229 return CMD_WARNING_CONFIG_FAILED;
13230 }
42f914d4 13231
d62a17ae 13232 return CMD_SUCCESS;
718e3744 13233}
13234
5bf15956
DW		 13235/* ip community-list expanded */
13236DEFUN (ip_community_list_expanded_all,
13237 ip_community_list_expanded_all_cmd,
42f914d4 13238 "ip community-list <(100-500)|expanded WORD> <deny|permit> AA:NN...",
718e3744 13239 IP_STR
13240 COMMUNITY_LIST_STR
13241 "Community list number (expanded)\n"
5bf15956 13242 "Add an expanded community-list entry\n"
718e3744 13243 "Community list name\n"
13244 "Specify community to reject\n"
13245 "Specify community to accept\n"
13246 COMMUNITY_VAL_STR)
13247{
d62a17ae 13248 char *cl_name_or_number = NULL;
13249 int direct = 0;
13250 int style = COMMUNITY_LIST_EXPANDED;
42f914d4 13251
d62a17ae 13252 int idx = 0;
13253 argv_find(argv, argc, "(100-500)", &idx);
13254 argv_find(argv, argc, "WORD", &idx);
13255 cl_name_or_number = argv[idx]->arg;
13256 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13257 : COMMUNITY_DENY;
13258 argv_find(argv, argc, "AA:NN", &idx);
13259 char *str = argv_concat(argv, argc, idx);
42f914d4 13260
d62a17ae 13261 int ret = community_list_set(bgp_clist, cl_name_or_number, str, direct,
13262 style);
42f914d4 13263
d62a17ae 13264 XFREE(MTYPE_TMP, str);
42f914d4 13265
d62a17ae 13266 if (ret < 0) {
13267 /* Display error string. */
13268 community_list_perror(vty, ret);
13269 return CMD_WARNING_CONFIG_FAILED;
13270 }
42f914d4 13271
d62a17ae 13272 return CMD_SUCCESS;
718e3744 13273}
13274
5bf15956
DW		 13275DEFUN (no_ip_community_list_expanded_all,
13276 no_ip_community_list_expanded_all_cmd,
42f914d4 13277 "no ip community-list <(100-500)|expanded WORD> <deny|permit> AA:NN...",
718e3744 13278 NO_STR
13279 IP_STR
13280 COMMUNITY_LIST_STR
5bf15956
DW		 13281 "Community list number (expanded)\n"
13282 "Add an expanded community-list entry\n"
718e3744 13283 "Community list name\n"
13284 "Specify community to reject\n"
13285 "Specify community to accept\n"
5bf15956 13286 COMMUNITY_VAL_STR)
718e3744 13287{
d62a17ae 13288 char *cl_name_or_number = NULL;
13289 int direct = 0;
13290 int style = COMMUNITY_LIST_EXPANDED;
42f914d4 13291
d62a17ae 13292 int idx = 0;
13293 argv_find(argv, argc, "(100-500)", &idx);
13294 argv_find(argv, argc, "WORD", &idx);
13295 cl_name_or_number = argv[idx]->arg;
13296 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13297 : COMMUNITY_DENY;
13298 argv_find(argv, argc, "AA:NN", &idx);
13299 char *str = argv_concat(argv, argc, idx);
42f914d4 13300
d62a17ae 13301 int ret = community_list_unset(bgp_clist, cl_name_or_number, str,
7298a8e1 13302 direct, style);
42f914d4 13303
d62a17ae 13304 XFREE(MTYPE_TMP, str);
daf9ddbb 13305
d62a17ae 13306 if (ret < 0) {
13307 community_list_perror(vty, ret);
13308 return CMD_WARNING_CONFIG_FAILED;
13309 }
42f914d4 13310
d62a17ae 13311 return CMD_SUCCESS;
718e3744 13312}
13313
d62a17ae 13314static void community_list_show(struct vty *vty, struct community_list *list)
718e3744 13315{
d62a17ae 13316 struct community_entry *entry;
718e3744 13317
d62a17ae 13318 for (entry = list->head; entry; entry = entry->next) {
13319 if (entry == list->head) {
13320 if (all_digit(list->name))
13321 vty_out(vty, "Community %s list %s\n",
13322 entry->style == COMMUNITY_LIST_STANDARD
13323 ? "standard"
13324 : "(expanded) access",
13325 list->name);
13326 else
13327 vty_out(vty, "Named Community %s list %s\n",
13328 entry->style == COMMUNITY_LIST_STANDARD
13329 ? "standard"
13330 : "expanded",
13331 list->name);
13332 }
13333 if (entry->any)
13334 vty_out(vty, " %s\n",
13335 community_direct_str(entry->direct));
13336 else
13337 vty_out(vty, " %s %s\n",
13338 community_direct_str(entry->direct),
13339 entry->style == COMMUNITY_LIST_STANDARD
a69ea8ae 13340 ? community_str(entry->u.com, false)
d62a17ae 13341 : entry->config);
13342 }
718e3744 13343}
13344
13345DEFUN (show_ip_community_list,
13346 show_ip_community_list_cmd,
13347 "show ip community-list",
13348 SHOW_STR
13349 IP_STR
13350 "List community-list\n")
13351{
d62a17ae 13352 struct community_list *list;
13353 struct community_list_master *cm;
718e3744 13354
d62a17ae 13355 cm = community_list_master_lookup(bgp_clist, COMMUNITY_LIST_MASTER);
13356 if (!cm)
13357 return CMD_SUCCESS;
718e3744 13358
d62a17ae 13359 for (list = cm->num.head; list; list = list->next)
13360 community_list_show(vty, list);
718e3744 13361
d62a17ae 13362 for (list = cm->str.head; list; list = list->next)
13363 community_list_show(vty, list);
718e3744 13364
d62a17ae 13365 return CMD_SUCCESS;
718e3744 13366}
13367
13368DEFUN (show_ip_community_list_arg,
13369 show_ip_community_list_arg_cmd,
6147e2c6 13370 "show ip community-list <(1-500)|WORD>",
718e3744 13371 SHOW_STR
13372 IP_STR
13373 "List community-list\n"
13374 "Community-list number\n"
13375 "Community-list name\n")
13376{
d62a17ae 13377 int idx_comm_list = 3;
13378 struct community_list *list;
718e3744 13379
d62a17ae 13380 list = community_list_lookup(bgp_clist, argv[idx_comm_list]->arg,
13381 COMMUNITY_LIST_MASTER);
13382 if (!list) {
13383 vty_out(vty, "%% Can't find community-list\n");
13384 return CMD_WARNING;
13385 }
718e3744 13386
d62a17ae 13387 community_list_show(vty, list);
718e3744 13388
d62a17ae 13389 return CMD_SUCCESS;
718e3744 13390}
6b0655a2 13391
57d187bc
JS		 13392/*
13393 * Large Community code.
13394 */
d62a17ae 13395static int lcommunity_list_set_vty(struct vty *vty, int argc,
13396 struct cmd_token **argv, int style,
13397 int reject_all_digit_name)
13398{
13399 int ret;
13400 int direct;
13401 char *str;
13402 int idx = 0;
13403 char *cl_name;
13404
13405 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13406 : COMMUNITY_DENY;
13407
13408 /* All digit name check. */
13409 idx = 0;
13410 argv_find(argv, argc, "WORD", &idx);
13411 argv_find(argv, argc, "(1-99)", &idx);
13412 argv_find(argv, argc, "(100-500)", &idx);
13413 cl_name = argv[idx]->arg;
13414 if (reject_all_digit_name && all_digit(cl_name)) {
13415 vty_out(vty, "%% Community name cannot have all digits\n");
13416 return CMD_WARNING_CONFIG_FAILED;
13417 }
13418
13419 idx = 0;
13420 argv_find(argv, argc, "AA:BB:CC", &idx);
13421 argv_find(argv, argc, "LINE", &idx);
13422 /* Concat community string argument. */
13423 if (idx)
13424 str = argv_concat(argv, argc, idx);
13425 else
13426 str = NULL;
13427
13428 ret = lcommunity_list_set(bgp_clist, cl_name, str, direct, style);
13429
13430 /* Free temporary community list string allocated by
13431 argv_concat(). */
13432 if (str)
13433 XFREE(MTYPE_TMP, str);
13434
13435 if (ret < 0) {
13436 community_list_perror(vty, ret);
13437 return CMD_WARNING_CONFIG_FAILED;
13438 }
13439 return CMD_SUCCESS;
13440}
13441
13442static int lcommunity_list_unset_vty(struct vty *vty, int argc,
13443 struct cmd_token **argv, int style)
13444{
13445 int ret;
13446 int direct = 0;
13447 char *str = NULL;
13448 int idx = 0;
13449
13450 argv_find(argv, argc, "permit", &idx);
13451 argv_find(argv, argc, "deny", &idx);
13452
13453 if (idx) {
13454 /* Check the list direct. */
13455 if (strncmp(argv[idx]->arg, "p", 1) == 0)
13456 direct = COMMUNITY_PERMIT;
13457 else
13458 direct = COMMUNITY_DENY;
13459
13460 idx = 0;
13461 argv_find(argv, argc, "LINE", &idx);
13462 argv_find(argv, argc, "AA:AA:NN", &idx);
13463 /* Concat community string argument. */
13464 str = argv_concat(argv, argc, idx);
13465 }
13466
13467 idx = 0;
13468 argv_find(argv, argc, "(1-99)", &idx);
13469 argv_find(argv, argc, "(100-500)", &idx);
13470 argv_find(argv, argc, "WORD", &idx);
13471
13472 /* Unset community list. */
13473 ret = lcommunity_list_unset(bgp_clist, argv[idx]->arg, str, direct,
13474 style);
13475
13476 /* Free temporary community list string allocated by
13477 argv_concat(). */
13478 if (str)
13479 XFREE(MTYPE_TMP, str);
13480
13481 if (ret < 0) {
13482 community_list_perror(vty, ret);
13483 return CMD_WARNING_CONFIG_FAILED;
13484 }
13485
13486 return CMD_SUCCESS;
57d187bc
JS		 13487}
13488
13489/* "large-community-list" keyword help string. */
13490#define LCOMMUNITY_LIST_STR "Add a large community list entry\n"
13491#define LCOMMUNITY_VAL_STR "large community in 'aa:bb:cc' format\n"
13492
13493DEFUN (ip_lcommunity_list_standard,
13494 ip_lcommunity_list_standard_cmd,
52951b63
DS		 13495 "ip large-community-list (1-99) <deny|permit>",
13496 IP_STR
13497 LCOMMUNITY_LIST_STR
13498 "Large Community list number (standard)\n"
13499 "Specify large community to reject\n"
7111c1a0 13500 "Specify large community to accept\n")
52951b63 13501{
d62a17ae 13502 return lcommunity_list_set_vty(vty, argc, argv,
13503 LARGE_COMMUNITY_LIST_STANDARD, 0);
52951b63
DS		 13504}
13505
13506DEFUN (ip_lcommunity_list_standard1,
13507 ip_lcommunity_list_standard1_cmd,
13508 "ip large-community-list (1-99) <deny|permit> AA:BB:CC...",
57d187bc
JS		 13509 IP_STR
13510 LCOMMUNITY_LIST_STR
13511 "Large Community list number (standard)\n"
13512 "Specify large community to reject\n"
13513 "Specify large community to accept\n"
13514 LCOMMUNITY_VAL_STR)
13515{
d62a17ae 13516 return lcommunity_list_set_vty(vty, argc, argv,
13517 LARGE_COMMUNITY_LIST_STANDARD, 0);
57d187bc
JS		 13518}
13519
13520DEFUN (ip_lcommunity_list_expanded,
13521 ip_lcommunity_list_expanded_cmd,
13522 "ip large-community-list (100-500) <deny|permit> LINE...",
13523 IP_STR
13524 LCOMMUNITY_LIST_STR
13525 "Large Community list number (expanded)\n"
13526 "Specify large community to reject\n"
13527 "Specify large community to accept\n"
13528 "An ordered list as a regular-expression\n")
13529{
d62a17ae 13530 return lcommunity_list_set_vty(vty, argc, argv,
13531 LARGE_COMMUNITY_LIST_EXPANDED, 0);
57d187bc
JS		 13532}
13533
13534DEFUN (ip_lcommunity_list_name_standard,
13535 ip_lcommunity_list_name_standard_cmd,
52951b63
DS		 13536 "ip large-community-list standard WORD <deny|permit>",
13537 IP_STR
13538 LCOMMUNITY_LIST_STR
13539 "Specify standard large-community-list\n"
13540 "Large Community list name\n"
13541 "Specify large community to reject\n"
13542 "Specify large community to accept\n")
13543{
d62a17ae 13544 return lcommunity_list_set_vty(vty, argc, argv,
13545 LARGE_COMMUNITY_LIST_STANDARD, 1);
52951b63
DS		 13546}
13547
13548DEFUN (ip_lcommunity_list_name_standard1,
13549 ip_lcommunity_list_name_standard1_cmd,
13550 "ip large-community-list standard WORD <deny|permit> AA:BB:CC...",
57d187bc
JS		 13551 IP_STR
13552 LCOMMUNITY_LIST_STR
13553 "Specify standard large-community-list\n"
13554 "Large Community list name\n"
13555 "Specify large community to reject\n"
13556 "Specify large community to accept\n"
13557 LCOMMUNITY_VAL_STR)
13558{
d62a17ae 13559 return lcommunity_list_set_vty(vty, argc, argv,
13560 LARGE_COMMUNITY_LIST_STANDARD, 1);
57d187bc
JS		 13561}
13562
13563DEFUN (ip_lcommunity_list_name_expanded,
13564 ip_lcommunity_list_name_expanded_cmd,
13565 "ip large-community-list expanded WORD <deny|permit> LINE...",
13566 IP_STR
13567 LCOMMUNITY_LIST_STR
13568 "Specify expanded large-community-list\n"
13569 "Large Community list name\n"
13570 "Specify large community to reject\n"
13571 "Specify large community to accept\n"
13572 "An ordered list as a regular-expression\n")
13573{
d62a17ae 13574 return lcommunity_list_set_vty(vty, argc, argv,
13575 LARGE_COMMUNITY_LIST_EXPANDED, 1);
57d187bc
JS		 13576}
13577
13578DEFUN (no_ip_lcommunity_list_standard_all,
13579 no_ip_lcommunity_list_standard_all_cmd,
13580 "no ip large-community-list <(1-99)|(100-500)|WORD>",
13581 NO_STR
13582 IP_STR
13583 LCOMMUNITY_LIST_STR
13584 "Large Community list number (standard)\n"
13585 "Large Community list number (expanded)\n"
13586 "Large Community list name\n")
13587{
d62a17ae 13588 return lcommunity_list_unset_vty(vty, argc, argv,
13589 LARGE_COMMUNITY_LIST_STANDARD);
57d187bc
JS		 13590}
13591
13592DEFUN (no_ip_lcommunity_list_name_expanded_all,
13593 no_ip_lcommunity_list_name_expanded_all_cmd,
13594 "no ip large-community-list expanded WORD",
13595 NO_STR
13596 IP_STR
13597 LCOMMUNITY_LIST_STR
13598 "Specify expanded large-community-list\n"
13599 "Large Community list name\n")
13600{
d62a17ae 13601 return lcommunity_list_unset_vty(vty, argc, argv,
13602 LARGE_COMMUNITY_LIST_EXPANDED);
57d187bc
JS		 13603}
13604
13605DEFUN (no_ip_lcommunity_list_standard,
13606 no_ip_lcommunity_list_standard_cmd,
13607 "no ip large-community-list (1-99) <deny|permit> AA:AA:NN...",
13608 NO_STR
13609 IP_STR
13610 LCOMMUNITY_LIST_STR
13611 "Large Community list number (standard)\n"
13612 "Specify large community to reject\n"
13613 "Specify large community to accept\n"
13614 LCOMMUNITY_VAL_STR)
13615{
d62a17ae 13616 return lcommunity_list_unset_vty(vty, argc, argv,
13617 LARGE_COMMUNITY_LIST_STANDARD);
57d187bc
JS		 13618}
13619
13620DEFUN (no_ip_lcommunity_list_expanded,
13621 no_ip_lcommunity_list_expanded_cmd,
13622 "no ip large-community-list (100-500) <deny|permit> LINE...",
13623 NO_STR
13624 IP_STR
13625 LCOMMUNITY_LIST_STR
13626 "Large Community list number (expanded)\n"
13627 "Specify large community to reject\n"
13628 "Specify large community to accept\n"
13629 "An ordered list as a regular-expression\n")
13630{
d62a17ae 13631 return lcommunity_list_unset_vty(vty, argc, argv,
13632 LARGE_COMMUNITY_LIST_EXPANDED);
57d187bc
JS		 13633}
13634
13635DEFUN (no_ip_lcommunity_list_name_standard,
13636 no_ip_lcommunity_list_name_standard_cmd,
13637 "no ip large-community-list standard WORD <deny|permit> AA:AA:NN...",
13638 NO_STR
13639 IP_STR
13640 LCOMMUNITY_LIST_STR
13641 "Specify standard large-community-list\n"
13642 "Large Community list name\n"
13643 "Specify large community to reject\n"
13644 "Specify large community to accept\n"
13645 LCOMMUNITY_VAL_STR)
13646{
d62a17ae 13647 return lcommunity_list_unset_vty(vty, argc, argv,
13648 LARGE_COMMUNITY_LIST_STANDARD);
57d187bc
JS		 13649}
13650
13651DEFUN (no_ip_lcommunity_list_name_expanded,
13652 no_ip_lcommunity_list_name_expanded_cmd,
13653 "no ip large-community-list expanded WORD <deny|permit> LINE...",
13654 NO_STR
13655 IP_STR
13656 LCOMMUNITY_LIST_STR
13657 "Specify expanded large-community-list\n"
13658 "Large community list name\n"
13659 "Specify large community to reject\n"
13660 "Specify large community to accept\n"
13661 "An ordered list as a regular-expression\n")
13662{
d62a17ae 13663 return lcommunity_list_unset_vty(vty, argc, argv,
13664 LARGE_COMMUNITY_LIST_EXPANDED);
13665}
13666
13667static void lcommunity_list_show(struct vty *vty, struct community_list *list)
13668{
13669 struct community_entry *entry;
13670
13671 for (entry = list->head; entry; entry = entry->next) {
13672 if (entry == list->head) {
13673 if (all_digit(list->name))
13674 vty_out(vty, "Large community %s list %s\n",
13675 entry->style == EXTCOMMUNITY_LIST_STANDARD
13676 ? "standard"
13677 : "(expanded) access",
13678 list->name);
13679 else
13680 vty_out(vty,
13681 "Named large community %s list %s\n",
13682 entry->style == EXTCOMMUNITY_LIST_STANDARD
13683 ? "standard"
13684 : "expanded",
13685 list->name);
13686 }
13687 if (entry->any)
13688 vty_out(vty, " %s\n",
13689 community_direct_str(entry->direct));
13690 else
13691 vty_out(vty, " %s %s\n",
13692 community_direct_str(entry->direct),
13693 entry->style == EXTCOMMUNITY_LIST_STANDARD
13694 ? entry->u.ecom->str
13695 : entry->config);
13696 }
57d187bc
JS		 13697}
13698
13699DEFUN (show_ip_lcommunity_list,
13700 show_ip_lcommunity_list_cmd,
13701 "show ip large-community-list",
13702 SHOW_STR
13703 IP_STR
13704 "List large-community list\n")
13705{
d62a17ae 13706 struct community_list *list;
13707 struct community_list_master *cm;
57d187bc 13708
d62a17ae 13709 cm = community_list_master_lookup(bgp_clist,
13710 LARGE_COMMUNITY_LIST_MASTER);
13711 if (!cm)
13712 return CMD_SUCCESS;
57d187bc 13713
d62a17ae 13714 for (list = cm->num.head; list; list = list->next)
13715 lcommunity_list_show(vty, list);
57d187bc 13716
d62a17ae 13717 for (list = cm->str.head; list; list = list->next)
13718 lcommunity_list_show(vty, list);
57d187bc 13719
d62a17ae 13720 return CMD_SUCCESS;
57d187bc
JS		 13721}
13722
13723DEFUN (show_ip_lcommunity_list_arg,
13724 show_ip_lcommunity_list_arg_cmd,
13725 "show ip large-community-list <(1-500)|WORD>",
13726 SHOW_STR
13727 IP_STR
13728 "List large-community list\n"
13729 "large-community-list number\n"
13730 "large-community-list name\n")
13731{
d62a17ae 13732 struct community_list *list;
57d187bc 13733
d62a17ae 13734 list = community_list_lookup(bgp_clist, argv[3]->arg,
13735 LARGE_COMMUNITY_LIST_MASTER);
13736 if (!list) {
13737 vty_out(vty, "%% Can't find extcommunity-list\n");
13738 return CMD_WARNING;
13739 }
57d187bc 13740
d62a17ae 13741 lcommunity_list_show(vty, list);
57d187bc 13742
d62a17ae 13743 return CMD_SUCCESS;
57d187bc
JS		 13744}
13745
718e3744 13746/* "extcommunity-list" keyword help string. */
13747#define EXTCOMMUNITY_LIST_STR "Add a extended community list entry\n"
13748#define EXTCOMMUNITY_VAL_STR "Extended community attribute in 'rt aa:nn_or_IPaddr:nn' OR 'soo aa:nn_or_IPaddr:nn' format\n"
13749
13750DEFUN (ip_extcommunity_list_standard,
13751 ip_extcommunity_list_standard_cmd,
e961923c 13752 "ip extcommunity-list <(1-99)|standard WORD> <deny|permit> AA:NN...",
718e3744 13753 IP_STR
13754 EXTCOMMUNITY_LIST_STR
13755 "Extended Community list number (standard)\n"
718e3744 13756 "Specify standard extcommunity-list\n"
5bf15956 13757 "Community list name\n"
718e3744 13758 "Specify community to reject\n"
13759 "Specify community to accept\n"
13760 EXTCOMMUNITY_VAL_STR)
13761{
d62a17ae 13762 int style = EXTCOMMUNITY_LIST_STANDARD;
13763 int direct = 0;
13764 char *cl_number_or_name = NULL;
42f914d4 13765
d62a17ae 13766 int idx = 0;
13767 argv_find(argv, argc, "(1-99)", &idx);
13768 argv_find(argv, argc, "WORD", &idx);
13769 cl_number_or_name = argv[idx]->arg;
13770 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13771 : COMMUNITY_DENY;
13772 argv_find(argv, argc, "AA:NN", &idx);
13773 char *str = argv_concat(argv, argc, idx);
42f914d4 13774
d62a17ae 13775 int ret = extcommunity_list_set(bgp_clist, cl_number_or_name, str,
13776 direct, style);
42f914d4 13777
d62a17ae 13778 XFREE(MTYPE_TMP, str);
42f914d4 13779
d62a17ae 13780 if (ret < 0) {
13781 community_list_perror(vty, ret);
13782 return CMD_WARNING_CONFIG_FAILED;
13783 }
42f914d4 13784
d62a17ae 13785 return CMD_SUCCESS;
718e3744 13786}
13787
718e3744 13788DEFUN (ip_extcommunity_list_name_expanded,
13789 ip_extcommunity_list_name_expanded_cmd,
e961923c 13790 "ip extcommunity-list <(100-500)|expanded WORD> <deny|permit> LINE...",
718e3744 13791 IP_STR
13792 EXTCOMMUNITY_LIST_STR
5bf15956 13793 "Extended Community list number (expanded)\n"
718e3744 13794 "Specify expanded extcommunity-list\n"
13795 "Extended Community list name\n"
13796 "Specify community to reject\n"
13797 "Specify community to accept\n"
13798 "An ordered list as a regular-expression\n")
13799{
d62a17ae 13800 int style = EXTCOMMUNITY_LIST_EXPANDED;
13801 int direct = 0;
13802 char *cl_number_or_name = NULL;
42f914d4 13803
d62a17ae 13804 int idx = 0;
13805 argv_find(argv, argc, "(100-500)", &idx);
13806 argv_find(argv, argc, "WORD", &idx);
13807 cl_number_or_name = argv[idx]->arg;
13808 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13809 : COMMUNITY_DENY;
13810 argv_find(argv, argc, "LINE", &idx);
13811 char *str = argv_concat(argv, argc, idx);
42f914d4 13812
d62a17ae 13813 int ret = extcommunity_list_set(bgp_clist, cl_number_or_name, str,
13814 direct, style);
42f914d4 13815
d62a17ae 13816 XFREE(MTYPE_TMP, str);
42f914d4 13817
d62a17ae 13818 if (ret < 0) {
13819 community_list_perror(vty, ret);
13820 return CMD_WARNING_CONFIG_FAILED;
13821 }
42f914d4 13822
d62a17ae 13823 return CMD_SUCCESS;
718e3744 13824}
13825
fee6e4e4 13826DEFUN (no_ip_extcommunity_list_standard_all,
13827 no_ip_extcommunity_list_standard_all_cmd,
e961923c 13828 "no ip extcommunity-list <(1-99)|standard WORD> <deny|permit> AA:NN...",
813d4307
DW		 13829 NO_STR
13830 IP_STR
13831 EXTCOMMUNITY_LIST_STR
13832 "Extended Community list number (standard)\n"
718e3744 13833 "Specify standard extcommunity-list\n"
5bf15956 13834 "Community list name\n"
718e3744 13835 "Specify community to reject\n"
13836 "Specify community to accept\n"
13837 EXTCOMMUNITY_VAL_STR)
13838{
d62a17ae 13839 int style = EXTCOMMUNITY_LIST_STANDARD;
13840 int direct = 0;
13841 char *cl_number_or_name = NULL;
42f914d4 13842
d62a17ae 13843 int idx = 0;
13844 argv_find(argv, argc, "(1-99)", &idx);
13845 argv_find(argv, argc, "WORD", &idx);
13846 cl_number_or_name = argv[idx]->arg;
13847 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13848 : COMMUNITY_DENY;
13849 argv_find(argv, argc, "AA:NN", &idx);
13850 char *str = argv_concat(argv, argc, idx);
42f914d4 13851
d62a17ae 13852 int ret = extcommunity_list_unset(bgp_clist, cl_number_or_name, str,
7298a8e1 13853 direct, style);
42f914d4 13854
d62a17ae 13855 XFREE(MTYPE_TMP, str);
42f914d4 13856
d62a17ae 13857 if (ret < 0) {
13858 community_list_perror(vty, ret);
13859 return CMD_WARNING_CONFIG_FAILED;
13860 }
42f914d4 13861
d62a17ae 13862 return CMD_SUCCESS;
718e3744 13863}
13864
5bf15956
DW		 13865DEFUN (no_ip_extcommunity_list_expanded_all,
13866 no_ip_extcommunity_list_expanded_all_cmd,
e961923c 13867 "no ip extcommunity-list <(100-500)|expanded WORD> <deny|permit> LINE...",
718e3744 13868 NO_STR
13869 IP_STR
13870 EXTCOMMUNITY_LIST_STR
13871 "Extended Community list number (expanded)\n"
718e3744 13872 "Specify expanded extcommunity-list\n"
5bf15956 13873 "Extended Community list name\n"
718e3744 13874 "Specify community to reject\n"
13875 "Specify community to accept\n"
13876 "An ordered list as a regular-expression\n")
13877{
d62a17ae 13878 int style = EXTCOMMUNITY_LIST_EXPANDED;
13879 int direct = 0;
13880 char *cl_number_or_name = NULL;
42f914d4 13881
d62a17ae 13882 int idx = 0;
13883 argv_find(argv, argc, "(100-500)", &idx);
13884 argv_find(argv, argc, "WORD", &idx);
13885 cl_number_or_name = argv[idx]->arg;
13886 direct = argv_find(argv, argc, "permit", &idx) ? COMMUNITY_PERMIT
13887 : COMMUNITY_DENY;
13888 argv_find(argv, argc, "LINE", &idx);
13889 char *str = argv_concat(argv, argc, idx);
42f914d4 13890
d62a17ae 13891 int ret = extcommunity_list_unset(bgp_clist, cl_number_or_name, str,
7298a8e1 13892 direct, style);
42f914d4 13893
d62a17ae 13894 XFREE(MTYPE_TMP, str);
42f914d4 13895
d62a17ae 13896 if (ret < 0) {
13897 community_list_perror(vty, ret);
13898 return CMD_WARNING_CONFIG_FAILED;
13899 }
42f914d4 13900
d62a17ae 13901 return CMD_SUCCESS;
718e3744 13902}
13903
d62a17ae 13904static void extcommunity_list_show(struct vty *vty, struct community_list *list)
718e3744 13905{
d62a17ae 13906 struct community_entry *entry;
718e3744 13907
d62a17ae 13908 for (entry = list->head; entry; entry = entry->next) {
13909 if (entry == list->head) {
13910 if (all_digit(list->name))
13911 vty_out(vty, "Extended community %s list %s\n",
13912 entry->style == EXTCOMMUNITY_LIST_STANDARD
13913 ? "standard"
13914 : "(expanded) access",
13915 list->name);
13916 else
13917 vty_out(vty,
13918 "Named extended community %s list %s\n",
13919 entry->style == EXTCOMMUNITY_LIST_STANDARD
13920 ? "standard"
13921 : "expanded",
13922 list->name);
13923 }
13924 if (entry->any)
13925 vty_out(vty, " %s\n",
13926 community_direct_str(entry->direct));
13927 else
13928 vty_out(vty, " %s %s\n",
13929 community_direct_str(entry->direct),
13930 entry->style == EXTCOMMUNITY_LIST_STANDARD
13931 ? entry->u.ecom->str
13932 : entry->config);
13933 }
718e3744 13934}
13935
13936DEFUN (show_ip_extcommunity_list,
13937 show_ip_extcommunity_list_cmd,
13938 "show ip extcommunity-list",
13939 SHOW_STR
13940 IP_STR
13941 "List extended-community list\n")
13942{
d62a17ae 13943 struct community_list *list;
13944 struct community_list_master *cm;
718e3744 13945
d62a17ae 13946 cm = community_list_master_lookup(bgp_clist, EXTCOMMUNITY_LIST_MASTER);
13947 if (!cm)
13948 return CMD_SUCCESS;
718e3744 13949
d62a17ae 13950 for (list = cm->num.head; list; list = list->next)
13951 extcommunity_list_show(vty, list);
718e3744 13952
d62a17ae 13953 for (list = cm->str.head; list; list = list->next)
13954 extcommunity_list_show(vty, list);
718e3744 13955
d62a17ae 13956 return CMD_SUCCESS;
718e3744 13957}
13958
13959DEFUN (show_ip_extcommunity_list_arg,
13960 show_ip_extcommunity_list_arg_cmd,
6147e2c6 13961 "show ip extcommunity-list <(1-500)|WORD>",
718e3744 13962 SHOW_STR
13963 IP_STR
13964 "List extended-community list\n"
13965 "Extcommunity-list number\n"
13966 "Extcommunity-list name\n")
13967{
d62a17ae 13968 int idx_comm_list = 3;
13969 struct community_list *list;
718e3744 13970
d62a17ae 13971 list = community_list_lookup(bgp_clist, argv[idx_comm_list]->arg,
13972 EXTCOMMUNITY_LIST_MASTER);
13973 if (!list) {
13974 vty_out(vty, "%% Can't find extcommunity-list\n");
13975 return CMD_WARNING;
13976 }
718e3744 13977
d62a17ae 13978 extcommunity_list_show(vty, list);
718e3744 13979
d62a17ae 13980 return CMD_SUCCESS;
718e3744 13981}
6b0655a2 13982
718e3744 13983/* Return configuration string of community-list entry. */
d62a17ae 13984static const char *community_list_config_str(struct community_entry *entry)
718e3744 13985{
d62a17ae 13986 const char *str;
718e3744 13987
d62a17ae 13988 if (entry->any)
13989 str = "";
13990 else {
13991 if (entry->style == COMMUNITY_LIST_STANDARD)
a69ea8ae 13992 str = community_str(entry->u.com, false);
d62a17ae 13993 else
13994 str = entry->config;
13995 }
13996 return str;
718e3744 13997}
13998
13999/* Display community-list and extcommunity-list configuration. */
d62a17ae 14000static int community_list_config_write(struct vty *vty)
14001{
14002 struct community_list *list;
14003 struct community_entry *entry;
14004 struct community_list_master *cm;
14005 int write = 0;
14006
14007 /* Community-list. */
14008 cm = community_list_master_lookup(bgp_clist, COMMUNITY_LIST_MASTER);
14009
14010 for (list = cm->num.head; list; list = list->next)
14011 for (entry = list->head; entry; entry = entry->next) {
14012 vty_out(vty, "ip community-list %s %s %s\n", list->name,
14013 community_direct_str(entry->direct),
14014 community_list_config_str(entry));
14015 write++;
14016 }
14017 for (list = cm->str.head; list; list = list->next)
14018 for (entry = list->head; entry; entry = entry->next) {
14019 vty_out(vty, "ip community-list %s %s %s %s\n",
14020 entry->style == COMMUNITY_LIST_STANDARD
14021 ? "standard"
14022 : "expanded",
14023 list->name, community_direct_str(entry->direct),
14024 community_list_config_str(entry));
14025 write++;
14026 }
14027
14028 /* Extcommunity-list. */
14029 cm = community_list_master_lookup(bgp_clist, EXTCOMMUNITY_LIST_MASTER);
14030
14031 for (list = cm->num.head; list; list = list->next)
14032 for (entry = list->head; entry; entry = entry->next) {
14033 vty_out(vty, "ip extcommunity-list %s %s %s\n",
14034 list->name, community_direct_str(entry->direct),
14035 community_list_config_str(entry));
14036 write++;
14037 }
14038 for (list = cm->str.head; list; list = list->next)
14039 for (entry = list->head; entry; entry = entry->next) {
14040 vty_out(vty, "ip extcommunity-list %s %s %s %s\n",
14041 entry->style == EXTCOMMUNITY_LIST_STANDARD
14042 ? "standard"
14043 : "expanded",
14044 list->name, community_direct_str(entry->direct),
14045 community_list_config_str(entry));
14046 write++;
14047 }
14048
14049
14050 /* lcommunity-list. */
14051 cm = community_list_master_lookup(bgp_clist,
14052 LARGE_COMMUNITY_LIST_MASTER);
14053
14054 for (list = cm->num.head; list; list = list->next)
14055 for (entry = list->head; entry; entry = entry->next) {
14056 vty_out(vty, "ip large-community-list %s %s %s\n",
14057 list->name, community_direct_str(entry->direct),
14058 community_list_config_str(entry));
14059 write++;
14060 }
14061 for (list = cm->str.head; list; list = list->next)
14062 for (entry = list->head; entry; entry = entry->next) {
14063 vty_out(vty, "ip large-community-list %s %s %s %s\n",
14064 entry->style == LARGE_COMMUNITY_LIST_STANDARD
14065 ? "standard"
14066 : "expanded",
14067 list->name, community_direct_str(entry->direct),
14068 community_list_config_str(entry));
14069 write++;
14070 }
14071
14072 return write;
14073}
14074
14075static struct cmd_node community_list_node = {
14076 COMMUNITY_LIST_NODE, "", 1 /* Export to vtysh. */
718e3744 14077};
14078
d62a17ae 14079static void community_list_vty(void)
14080{
14081 install_node(&community_list_node, community_list_config_write);
14082
14083 /* Community-list. */
14084 install_element(CONFIG_NODE, &ip_community_list_standard_cmd);
14085 install_element(CONFIG_NODE, &ip_community_list_expanded_all_cmd);
14086 install_element(CONFIG_NODE, &no_ip_community_list_standard_all_cmd);
14087 install_element(CONFIG_NODE, &no_ip_community_list_expanded_all_cmd);
14088 install_element(VIEW_NODE, &show_ip_community_list_cmd);
14089 install_element(VIEW_NODE, &show_ip_community_list_arg_cmd);
14090
14091 /* Extcommunity-list. */
14092 install_element(CONFIG_NODE, &ip_extcommunity_list_standard_cmd);
14093 install_element(CONFIG_NODE, &ip_extcommunity_list_name_expanded_cmd);
14094 install_element(CONFIG_NODE, &no_ip_extcommunity_list_standard_all_cmd);
14095 install_element(CONFIG_NODE, &no_ip_extcommunity_list_expanded_all_cmd);
14096 install_element(VIEW_NODE, &show_ip_extcommunity_list_cmd);
14097 install_element(VIEW_NODE, &show_ip_extcommunity_list_arg_cmd);
14098
14099 /* Large Community List */
14100 install_element(CONFIG_NODE, &ip_lcommunity_list_standard_cmd);
14101 install_element(CONFIG_NODE, &ip_lcommunity_list_standard1_cmd);
14102 install_element(CONFIG_NODE, &ip_lcommunity_list_expanded_cmd);
14103 install_element(CONFIG_NODE, &ip_lcommunity_list_name_standard_cmd);
14104 install_element(CONFIG_NODE, &ip_lcommunity_list_name_standard1_cmd);
14105 install_element(CONFIG_NODE, &ip_lcommunity_list_name_expanded_cmd);
14106 install_element(CONFIG_NODE, &no_ip_lcommunity_list_standard_all_cmd);
14107 install_element(CONFIG_NODE,
14108 &no_ip_lcommunity_list_name_expanded_all_cmd);
14109 install_element(CONFIG_NODE, &no_ip_lcommunity_list_standard_cmd);
14110 install_element(CONFIG_NODE, &no_ip_lcommunity_list_expanded_cmd);
14111 install_element(CONFIG_NODE, &no_ip_lcommunity_list_name_standard_cmd);
14112 install_element(CONFIG_NODE, &no_ip_lcommunity_list_name_expanded_cmd);
14113 install_element(VIEW_NODE, &show_ip_lcommunity_list_cmd);
14114 install_element(VIEW_NODE, &show_ip_lcommunity_list_arg_cmd);
5bf15956 14115}
FRRouting mirror