]> git.proxmox.com Git - mirror_frr.git/blob - bgpd/bgpd.c
projects / mirror_frr.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Merge pull request #3163 from donaldsharp/more_vty_errors
[mirror_frr.git] / bgpd / bgpd.c
1 /* BGP-4, BGP-4+ daemon program
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 */
20
21 #include <zebra.h>
22
23 #include "prefix.h"
24 #include "thread.h"
25 #include "buffer.h"
26 #include "stream.h"
27 #include "ringbuf.h"
28 #include "command.h"
29 #include "sockunion.h"
30 #include "sockopt.h"
31 #include "network.h"
32 #include "memory.h"
33 #include "filter.h"
34 #include "routemap.h"
35 #include "log.h"
36 #include "plist.h"
37 #include "linklist.h"
38 #include "workqueue.h"
39 #include "queue.h"
40 #include "zclient.h"
41 #include "bfd.h"
42 #include "hash.h"
43 #include "jhash.h"
44 #include "table.h"
45 #include "lib/json.h"
46 #include "frr_pthread.h"
47 #include "bitfield.h"
48
49 #include "bgpd/bgpd.h"
50 #include "bgpd/bgp_table.h"
51 #include "bgpd/bgp_aspath.h"
52 #include "bgpd/bgp_route.h"
53 #include "bgpd/bgp_dump.h"
54 #include "bgpd/bgp_debug.h"
55 #include "bgpd/bgp_errors.h"
56 #include "bgpd/bgp_community.h"
57 #include "bgpd/bgp_attr.h"
58 #include "bgpd/bgp_regex.h"
59 #include "bgpd/bgp_clist.h"
60 #include "bgpd/bgp_fsm.h"
61 #include "bgpd/bgp_packet.h"
62 #include "bgpd/bgp_zebra.h"
63 #include "bgpd/bgp_open.h"
64 #include "bgpd/bgp_filter.h"
65 #include "bgpd/bgp_nexthop.h"
66 #include "bgpd/bgp_damp.h"
67 #include "bgpd/bgp_mplsvpn.h"
68 #if ENABLE_BGP_VNC
69 #include "bgpd/rfapi/bgp_rfapi_cfg.h"
70 #include "bgpd/rfapi/rfapi_backend.h"
71 #endif
72 #include "bgpd/bgp_evpn.h"
73 #include "bgpd/bgp_advertise.h"
74 #include "bgpd/bgp_network.h"
75 #include "bgpd/bgp_vty.h"
76 #include "bgpd/bgp_mpath.h"
77 #include "bgpd/bgp_nht.h"
78 #include "bgpd/bgp_updgrp.h"
79 #include "bgpd/bgp_bfd.h"
80 #include "bgpd/bgp_memory.h"
81 #include "bgpd/bgp_evpn_vty.h"
82 #include "bgpd/bgp_keepalives.h"
83 #include "bgpd/bgp_io.h"
84 #include "bgpd/bgp_ecommunity.h"
85 #include "bgpd/bgp_flowspec.h"
86 #include "bgpd/bgp_labelpool.h"
87 #include "bgpd/bgp_pbr.h"
88
89 DEFINE_MTYPE_STATIC(BGPD, PEER_TX_SHUTDOWN_MSG, "Peer shutdown message (TX)");
90 DEFINE_QOBJ_TYPE(bgp_master)
91 DEFINE_QOBJ_TYPE(bgp)
92 DEFINE_QOBJ_TYPE(peer)
93
94 /* BGP process wide configuration. */
95 static struct bgp_master bgp_master;
96
97 /* BGP process wide configuration pointer to export. */
98 struct bgp_master *bm;
99
100 /* BGP community-list. */
101 struct community_list_handler *bgp_clist;
102
103 unsigned int multipath_num = MULTIPATH_NUM;
104
105 static void bgp_if_finish(struct bgp *bgp);
106 static void peer_drop_dynamic_neighbor(struct peer *peer);
107
108 extern struct zclient *zclient;
109
110 /* handle main socket creation or deletion */
111 static int bgp_check_main_socket(bool create, struct bgp *bgp)
112 {
113 static int bgp_server_main_created;
114
115 if (create == true) {
116 if (bgp_server_main_created)
117 return 0;
118 if (bgp_socket(bgp, bm->port, bm->address) < 0)
119 return BGP_ERR_INVALID_VALUE;
120 bgp_server_main_created = 1;
121 return 0;
122 }
123 if (!bgp_server_main_created)
124 return 0;
125 bgp_close();
126 bgp_server_main_created = 0;
127 return 0;
128 }
129
130 void bgp_session_reset(struct peer *peer)
131 {
132 if (peer->doppelganger && (peer->doppelganger->status != Deleted)
133 && !(CHECK_FLAG(peer->doppelganger->flags, PEER_FLAG_CONFIG_NODE)))
134 peer_delete(peer->doppelganger);
135
136 BGP_EVENT_ADD(peer, BGP_Stop);
137 }
138
139 /*
140 * During session reset, we may delete the doppelganger peer, which would
141 * be the next node to the current node. If the session reset was invoked
142 * during walk of peer list, we would end up accessing the freed next
143 * node. This function moves the next node along.
144 */
145 static void bgp_session_reset_safe(struct peer *peer, struct listnode **nnode)
146 {
147 struct listnode *n;
148 struct peer *npeer;
149
150 n = (nnode) ? *nnode : NULL;
151 npeer = (n) ? listgetdata(n) : NULL;
152
153 if (peer->doppelganger && (peer->doppelganger->status != Deleted)
154 && !(CHECK_FLAG(peer->doppelganger->flags,
155 PEER_FLAG_CONFIG_NODE))) {
156 if (peer->doppelganger == npeer)
157 /* nnode and *nnode are confirmed to be non-NULL here */
158 *nnode = (*nnode)->next;
159 peer_delete(peer->doppelganger);
160 }
161
162 BGP_EVENT_ADD(peer, BGP_Stop);
163 }
164
165 /* BGP global flag manipulation. */
166 int bgp_option_set(int flag)
167 {
168 switch (flag) {
169 case BGP_OPT_NO_FIB:
170 case BGP_OPT_MULTIPLE_INSTANCE:
171 case BGP_OPT_CONFIG_CISCO:
172 case BGP_OPT_NO_LISTEN:
173 SET_FLAG(bm->options, flag);
174 break;
175 default:
176 return BGP_ERR_INVALID_FLAG;
177 }
178 return 0;
179 }
180
181 int bgp_option_unset(int flag)
182 {
183 switch (flag) {
184 case BGP_OPT_MULTIPLE_INSTANCE:
185 if (listcount(bm->bgp) > 1)
186 return BGP_ERR_MULTIPLE_INSTANCE_USED;
187 /* Fall through. */
188 case BGP_OPT_NO_FIB:
189 case BGP_OPT_CONFIG_CISCO:
190 UNSET_FLAG(bm->options, flag);
191 break;
192 default:
193 return BGP_ERR_INVALID_FLAG;
194 }
195 return 0;
196 }
197
198 int bgp_option_check(int flag)
199 {
200 return CHECK_FLAG(bm->options, flag);
201 }
202
203 /* BGP flag manipulation. */
204 int bgp_flag_set(struct bgp *bgp, int flag)
205 {
206 SET_FLAG(bgp->flags, flag);
207 return 0;
208 }
209
210 int bgp_flag_unset(struct bgp *bgp, int flag)
211 {
212 UNSET_FLAG(bgp->flags, flag);
213 return 0;
214 }
215
216 int bgp_flag_check(struct bgp *bgp, int flag)
217 {
218 return CHECK_FLAG(bgp->flags, flag);
219 }
220
221 /* Internal function to set BGP structure configureation flag. */
222 static void bgp_config_set(struct bgp *bgp, int config)
223 {
224 SET_FLAG(bgp->config, config);
225 }
226
227 static void bgp_config_unset(struct bgp *bgp, int config)
228 {
229 UNSET_FLAG(bgp->config, config);
230 }
231
232 static int bgp_config_check(struct bgp *bgp, int config)
233 {
234 return CHECK_FLAG(bgp->config, config);
235 }
236
237 /* Set BGP router identifier. */
238 static int bgp_router_id_set(struct bgp *bgp, const struct in_addr *id)
239 {
240 struct peer *peer;
241 struct listnode *node, *nnode;
242
243 if (IPV4_ADDR_SAME(&bgp->router_id, id))
244 return 0;
245
246 /* EVPN uses router id in RD, withdraw them */
247 if (is_evpn_enabled())
248 bgp_evpn_handle_router_id_update(bgp, TRUE);
249
250 IPV4_ADDR_COPY(&bgp->router_id, id);
251
252 /* Set all peer's local identifier with this value. */
253 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
254 IPV4_ADDR_COPY(&peer->local_id, id);
255
256 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
257 peer->last_reset = PEER_DOWN_RID_CHANGE;
258 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
259 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
260 }
261 }
262
263 /* EVPN uses router id in RD, update them */
264 if (is_evpn_enabled())
265 bgp_evpn_handle_router_id_update(bgp, FALSE);
266
267 return 0;
268 }
269
270 void bgp_router_id_zebra_bump(vrf_id_t vrf_id, const struct prefix *router_id)
271 {
272 struct listnode *node, *nnode;
273 struct bgp *bgp;
274
275 if (vrf_id == VRF_DEFAULT) {
276 /* Router-id change for default VRF has to also update all
277 * views. */
278 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp)) {
279 if (bgp->inst_type == BGP_INSTANCE_TYPE_VRF)
280 continue;
281
282 bgp->router_id_zebra = router_id->u.prefix4;
283 if (!bgp->router_id_static.s_addr)
284 bgp_router_id_set(bgp, &router_id->u.prefix4);
285 }
286 } else {
287 bgp = bgp_lookup_by_vrf_id(vrf_id);
288 if (bgp) {
289 bgp->router_id_zebra = router_id->u.prefix4;
290
291 if (!bgp->router_id_static.s_addr)
292 bgp_router_id_set(bgp, &router_id->u.prefix4);
293 }
294 }
295 }
296
297 int bgp_router_id_static_set(struct bgp *bgp, struct in_addr id)
298 {
299 bgp->router_id_static = id;
300 bgp_router_id_set(bgp, id.s_addr ? &id : &bgp->router_id_zebra);
301 return 0;
302 }
303
304 /* BGP's cluster-id control. */
305 int bgp_cluster_id_set(struct bgp *bgp, struct in_addr *cluster_id)
306 {
307 struct peer *peer;
308 struct listnode *node, *nnode;
309
310 if (bgp_config_check(bgp, BGP_CONFIG_CLUSTER_ID)
311 && IPV4_ADDR_SAME(&bgp->cluster_id, cluster_id))
312 return 0;
313
314 IPV4_ADDR_COPY(&bgp->cluster_id, cluster_id);
315 bgp_config_set(bgp, BGP_CONFIG_CLUSTER_ID);
316
317 /* Clear all IBGP peer. */
318 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
319 if (peer->sort != BGP_PEER_IBGP)
320 continue;
321
322 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
323 peer->last_reset = PEER_DOWN_CLID_CHANGE;
324 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
325 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
326 }
327 }
328 return 0;
329 }
330
331 int bgp_cluster_id_unset(struct bgp *bgp)
332 {
333 struct peer *peer;
334 struct listnode *node, *nnode;
335
336 if (!bgp_config_check(bgp, BGP_CONFIG_CLUSTER_ID))
337 return 0;
338
339 bgp->cluster_id.s_addr = 0;
340 bgp_config_unset(bgp, BGP_CONFIG_CLUSTER_ID);
341
342 /* Clear all IBGP peer. */
343 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
344 if (peer->sort != BGP_PEER_IBGP)
345 continue;
346
347 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
348 peer->last_reset = PEER_DOWN_CLID_CHANGE;
349 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
350 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
351 }
352 }
353 return 0;
354 }
355
356 /* time_t value that is monotonicly increasing
357 * and uneffected by adjustments to system clock
358 */
359 time_t bgp_clock(void)
360 {
361 struct timeval tv;
362
363 monotime(&tv);
364 return tv.tv_sec;
365 }
366
367 /* BGP timer configuration. */
368 int bgp_timers_set(struct bgp *bgp, uint32_t keepalive, uint32_t holdtime)
369 {
370 bgp->default_keepalive =
371 (keepalive < holdtime / 3 ? keepalive : holdtime / 3);
372 bgp->default_holdtime = holdtime;
373
374 return 0;
375 }
376
377 int bgp_timers_unset(struct bgp *bgp)
378 {
379 bgp->default_keepalive = BGP_DEFAULT_KEEPALIVE;
380 bgp->default_holdtime = BGP_DEFAULT_HOLDTIME;
381
382 return 0;
383 }
384
385 /* BGP confederation configuration. */
386 int bgp_confederation_id_set(struct bgp *bgp, as_t as)
387 {
388 struct peer *peer;
389 struct listnode *node, *nnode;
390 int already_confed;
391
392 if (as == 0)
393 return BGP_ERR_INVALID_AS;
394
395 /* Remember - were we doing confederation before? */
396 already_confed = bgp_config_check(bgp, BGP_CONFIG_CONFEDERATION);
397 bgp->confed_id = as;
398 bgp_config_set(bgp, BGP_CONFIG_CONFEDERATION);
399
400 /* If we were doing confederation already, this is just an external
401 AS change. Just Reset EBGP sessions, not CONFED sessions. If we
402 were not doing confederation before, reset all EBGP sessions. */
403 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
404 /* We're looking for peers who's AS is not local or part of our
405 confederation. */
406 if (already_confed) {
407 if (peer_sort(peer) == BGP_PEER_EBGP) {
408 peer->local_as = as;
409 if (BGP_IS_VALID_STATE_FOR_NOTIF(
410 peer->status)) {
411 peer->last_reset =
412 PEER_DOWN_CONFED_ID_CHANGE;
413 bgp_notify_send(
414 peer, BGP_NOTIFY_CEASE,
415 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
416 } else
417 bgp_session_reset_safe(peer, &nnode);
418 }
419 } else {
420 /* Not doign confederation before, so reset every
421 non-local
422 session */
423 if (peer_sort(peer) != BGP_PEER_IBGP) {
424 /* Reset the local_as to be our EBGP one */
425 if (peer_sort(peer) == BGP_PEER_EBGP)
426 peer->local_as = as;
427 if (BGP_IS_VALID_STATE_FOR_NOTIF(
428 peer->status)) {
429 peer->last_reset =
430 PEER_DOWN_CONFED_ID_CHANGE;
431 bgp_notify_send(
432 peer, BGP_NOTIFY_CEASE,
433 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
434 } else
435 bgp_session_reset_safe(peer, &nnode);
436 }
437 }
438 }
439 return 0;
440 }
441
442 int bgp_confederation_id_unset(struct bgp *bgp)
443 {
444 struct peer *peer;
445 struct listnode *node, *nnode;
446
447 bgp->confed_id = 0;
448 bgp_config_unset(bgp, BGP_CONFIG_CONFEDERATION);
449
450 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
451 /* We're looking for peers who's AS is not local */
452 if (peer_sort(peer) != BGP_PEER_IBGP) {
453 peer->local_as = bgp->as;
454 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
455 peer->last_reset = PEER_DOWN_CONFED_ID_CHANGE;
456 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
457 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
458 }
459
460 else
461 bgp_session_reset_safe(peer, &nnode);
462 }
463 }
464 return 0;
465 }
466
467 /* Is an AS part of the confed or not? */
468 int bgp_confederation_peers_check(struct bgp *bgp, as_t as)
469 {
470 int i;
471
472 if (!bgp)
473 return 0;
474
475 for (i = 0; i < bgp->confed_peers_cnt; i++)
476 if (bgp->confed_peers[i] == as)
477 return 1;
478
479 return 0;
480 }
481
482 /* Add an AS to the confederation set. */
483 int bgp_confederation_peers_add(struct bgp *bgp, as_t as)
484 {
485 struct peer *peer;
486 struct listnode *node, *nnode;
487
488 if (!bgp)
489 return BGP_ERR_INVALID_BGP;
490
491 if (bgp->as == as)
492 return BGP_ERR_INVALID_AS;
493
494 if (bgp_confederation_peers_check(bgp, as))
495 return -1;
496
497 if (bgp->confed_peers)
498 bgp->confed_peers =
499 XREALLOC(MTYPE_BGP_CONFED_LIST, bgp->confed_peers,
500 (bgp->confed_peers_cnt + 1) * sizeof(as_t));
501 else
502 bgp->confed_peers =
503 XMALLOC(MTYPE_BGP_CONFED_LIST,
504 (bgp->confed_peers_cnt + 1) * sizeof(as_t));
505
506 bgp->confed_peers[bgp->confed_peers_cnt] = as;
507 bgp->confed_peers_cnt++;
508
509 if (bgp_config_check(bgp, BGP_CONFIG_CONFEDERATION)) {
510 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
511 if (peer->as == as) {
512 peer->local_as = bgp->as;
513 if (BGP_IS_VALID_STATE_FOR_NOTIF(
514 peer->status)) {
515 peer->last_reset =
516 PEER_DOWN_CONFED_PEER_CHANGE;
517 bgp_notify_send(
518 peer, BGP_NOTIFY_CEASE,
519 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
520 } else
521 bgp_session_reset_safe(peer, &nnode);
522 }
523 }
524 }
525 return 0;
526 }
527
528 /* Delete an AS from the confederation set. */
529 int bgp_confederation_peers_remove(struct bgp *bgp, as_t as)
530 {
531 int i;
532 int j;
533 struct peer *peer;
534 struct listnode *node, *nnode;
535
536 if (!bgp)
537 return -1;
538
539 if (!bgp_confederation_peers_check(bgp, as))
540 return -1;
541
542 for (i = 0; i < bgp->confed_peers_cnt; i++)
543 if (bgp->confed_peers[i] == as)
544 for (j = i + 1; j < bgp->confed_peers_cnt; j++)
545 bgp->confed_peers[j - 1] = bgp->confed_peers[j];
546
547 bgp->confed_peers_cnt--;
548
549 if (bgp->confed_peers_cnt == 0) {
550 if (bgp->confed_peers)
551 XFREE(MTYPE_BGP_CONFED_LIST, bgp->confed_peers);
552 bgp->confed_peers = NULL;
553 } else
554 bgp->confed_peers =
555 XREALLOC(MTYPE_BGP_CONFED_LIST, bgp->confed_peers,
556 bgp->confed_peers_cnt * sizeof(as_t));
557
558 /* Now reset any peer who's remote AS has just been removed from the
559 CONFED */
560 if (bgp_config_check(bgp, BGP_CONFIG_CONFEDERATION)) {
561 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
562 if (peer->as == as) {
563 peer->local_as = bgp->confed_id;
564 if (BGP_IS_VALID_STATE_FOR_NOTIF(
565 peer->status)) {
566 peer->last_reset =
567 PEER_DOWN_CONFED_PEER_CHANGE;
568 bgp_notify_send(
569 peer, BGP_NOTIFY_CEASE,
570 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
571 } else
572 bgp_session_reset_safe(peer, &nnode);
573 }
574 }
575 }
576
577 return 0;
578 }
579
580 /* Local preference configuration. */
581 int bgp_default_local_preference_set(struct bgp *bgp, uint32_t local_pref)
582 {
583 if (!bgp)
584 return -1;
585
586 bgp->default_local_pref = local_pref;
587
588 return 0;
589 }
590
591 int bgp_default_local_preference_unset(struct bgp *bgp)
592 {
593 if (!bgp)
594 return -1;
595
596 bgp->default_local_pref = BGP_DEFAULT_LOCAL_PREF;
597
598 return 0;
599 }
600
601 /* Local preference configuration. */
602 int bgp_default_subgroup_pkt_queue_max_set(struct bgp *bgp, uint32_t queue_size)
603 {
604 if (!bgp)
605 return -1;
606
607 bgp->default_subgroup_pkt_queue_max = queue_size;
608
609 return 0;
610 }
611
612 int bgp_default_subgroup_pkt_queue_max_unset(struct bgp *bgp)
613 {
614 if (!bgp)
615 return -1;
616 bgp->default_subgroup_pkt_queue_max =
617 BGP_DEFAULT_SUBGROUP_PKT_QUEUE_MAX;
618
619 return 0;
620 }
621
622 /* Listen limit configuration. */
623 int bgp_listen_limit_set(struct bgp *bgp, int listen_limit)
624 {
625 if (!bgp)
626 return -1;
627
628 bgp->dynamic_neighbors_limit = listen_limit;
629
630 return 0;
631 }
632
633 int bgp_listen_limit_unset(struct bgp *bgp)
634 {
635 if (!bgp)
636 return -1;
637
638 bgp->dynamic_neighbors_limit = BGP_DYNAMIC_NEIGHBORS_LIMIT_DEFAULT;
639
640 return 0;
641 }
642
643 int bgp_map_afi_safi_iana2int(iana_afi_t pkt_afi, iana_safi_t pkt_safi,
644 afi_t *afi, safi_t *safi)
645 {
646 /* Map from IANA values to internal values, return error if
647 * values are unrecognized.
648 */
649 *afi = afi_iana2int(pkt_afi);
650 *safi = safi_iana2int(pkt_safi);
651 if (*afi == AFI_MAX || *safi == SAFI_MAX)
652 return -1;
653
654 return 0;
655 }
656
657 int bgp_map_afi_safi_int2iana(afi_t afi, safi_t safi, iana_afi_t *pkt_afi,
658 iana_safi_t *pkt_safi)
659 {
660 /* Map from internal values to IANA values, return error if
661 * internal values are bad (unexpected).
662 */
663 if (afi == AFI_MAX || safi == SAFI_MAX)
664 return -1;
665 *pkt_afi = afi_int2iana(afi);
666 *pkt_safi = safi_int2iana(safi);
667 return 0;
668 }
669
670 struct peer_af *peer_af_create(struct peer *peer, afi_t afi, safi_t safi)
671 {
672 struct peer_af *af;
673 int afid;
674
675 if (!peer)
676 return NULL;
677
678 afid = afindex(afi, safi);
679 if (afid >= BGP_AF_MAX)
680 return NULL;
681
682 assert(peer->peer_af_array[afid] == NULL);
683
684 /* Allocate new peer af */
685 af = XCALLOC(MTYPE_BGP_PEER_AF, sizeof(struct peer_af));
686
687 peer->peer_af_array[afid] = af;
688 af->afi = afi;
689 af->safi = safi;
690 af->afid = afid;
691 af->peer = peer;
692
693 return af;
694 }
695
696 struct peer_af *peer_af_find(struct peer *peer, afi_t afi, safi_t safi)
697 {
698 int afid;
699
700 if (!peer)
701 return NULL;
702
703 afid = afindex(afi, safi);
704 if (afid >= BGP_AF_MAX)
705 return NULL;
706
707 return peer->peer_af_array[afid];
708 }
709
710 int peer_af_delete(struct peer *peer, afi_t afi, safi_t safi)
711 {
712 struct peer_af *af;
713 int afid;
714
715 if (!peer)
716 return -1;
717
718 afid = afindex(afi, safi);
719 if (afid >= BGP_AF_MAX)
720 return -1;
721
722 af = peer->peer_af_array[afid];
723 if (!af)
724 return -1;
725
726 bgp_stop_announce_route_timer(af);
727
728 if (PAF_SUBGRP(af)) {
729 if (BGP_DEBUG(update_groups, UPDATE_GROUPS))
730 zlog_debug("u%" PRIu64 ":s%" PRIu64 " remove peer %s",
731 af->subgroup->update_group->id,
732 af->subgroup->id, peer->host);
733 }
734
735 update_subgroup_remove_peer(af->subgroup, af);
736
737 peer->peer_af_array[afid] = NULL;
738 XFREE(MTYPE_BGP_PEER_AF, af);
739 return 0;
740 }
741
742 /* Peer comparison function for sorting. */
743 int peer_cmp(struct peer *p1, struct peer *p2)
744 {
745 if (p1->group && !p2->group)
746 return -1;
747
748 if (!p1->group && p2->group)
749 return 1;
750
751 if (p1->group == p2->group) {
752 if (p1->conf_if && !p2->conf_if)
753 return -1;
754
755 if (!p1->conf_if && p2->conf_if)
756 return 1;
757
758 if (p1->conf_if && p2->conf_if)
759 return if_cmp_name_func(p1->conf_if, p2->conf_if);
760 } else
761 return strcmp(p1->group->name, p2->group->name);
762
763 return sockunion_cmp(&p1->su, &p2->su);
764 }
765
766 static unsigned int peer_hash_key_make(void *p)
767 {
768 struct peer *peer = p;
769 return sockunion_hash(&peer->su);
770 }
771
772 static int peer_hash_same(const void *p1, const void *p2)
773 {
774 const struct peer *peer1 = p1;
775 const struct peer *peer2 = p2;
776 return (sockunion_same(&peer1->su, &peer2->su)
777 && CHECK_FLAG(peer1->flags, PEER_FLAG_CONFIG_NODE)
778 == CHECK_FLAG(peer2->flags, PEER_FLAG_CONFIG_NODE));
779 }
780
781 void peer_flag_inherit(struct peer *peer, uint32_t flag)
782 {
783 bool group_val;
784
785 /* Skip if peer is not a peer-group member. */
786 if (!peer_group_active(peer))
787 return;
788
789 /* Unset override flag to signal inheritance from peer-group. */
790 UNSET_FLAG(peer->flags_override, flag);
791
792 /*
793 * Inherit flag state from peer-group. If the flag of the peer-group is
794 * not being inverted, the peer must inherit the inverse of the current
795 * peer-group flag state.
796 */
797 group_val = CHECK_FLAG(peer->group->conf->flags, flag);
798 if (!CHECK_FLAG(peer->group->conf->flags_invert, flag)
799 && CHECK_FLAG(peer->flags_invert, flag))
800 COND_FLAG(peer->flags, flag, !group_val);
801 else
802 COND_FLAG(peer->flags, flag, group_val);
803 }
804
805 int peer_af_flag_check(struct peer *peer, afi_t afi, safi_t safi, uint32_t flag)
806 {
807 return CHECK_FLAG(peer->af_flags[afi][safi], flag);
808 }
809
810 void peer_af_flag_inherit(struct peer *peer, afi_t afi, safi_t safi,
811 uint32_t flag)
812 {
813 bool group_val;
814
815 /* Skip if peer is not a peer-group member. */
816 if (!peer_group_active(peer))
817 return;
818
819 /* Unset override flag to signal inheritance from peer-group. */
820 UNSET_FLAG(peer->af_flags_override[afi][safi], flag);
821
822 /*
823 * Inherit flag state from peer-group. If the flag of the peer-group is
824 * not being inverted, the peer must inherit the inverse of the current
825 * peer-group flag state.
826 */
827 group_val = CHECK_FLAG(peer->group->conf->af_flags[afi][safi], flag);
828 if (!CHECK_FLAG(peer->group->conf->af_flags_invert[afi][safi], flag)
829 && CHECK_FLAG(peer->af_flags_invert[afi][safi], flag))
830 COND_FLAG(peer->af_flags[afi][safi], flag, !group_val);
831 else
832 COND_FLAG(peer->af_flags[afi][safi], flag, group_val);
833 }
834
835 static bool peergroup_flag_check(struct peer *peer, uint32_t flag)
836 {
837 if (!peer_group_active(peer)) {
838 if (CHECK_FLAG(peer->flags_invert, flag))
839 return !CHECK_FLAG(peer->flags, flag);
840 else
841 return !!CHECK_FLAG(peer->flags, flag);
842 }
843
844 return !!CHECK_FLAG(peer->flags_override, flag);
845 }
846
847 static bool peergroup_af_flag_check(struct peer *peer, afi_t afi, safi_t safi,
848 uint32_t flag)
849 {
850 if (!peer_group_active(peer)) {
851 if (CHECK_FLAG(peer->af_flags_invert[afi][safi], flag))
852 return !peer_af_flag_check(peer, afi, safi, flag);
853 else
854 return !!peer_af_flag_check(peer, afi, safi, flag);
855 }
856
857 return !!CHECK_FLAG(peer->af_flags_override[afi][safi], flag);
858 }
859
860 static bool peergroup_filter_check(struct peer *peer, afi_t afi, safi_t safi,
861 uint8_t type, int direct)
862 {
863 struct bgp_filter *filter;
864
865 if (peer_group_active(peer))
866 return !!CHECK_FLAG(peer->filter_override[afi][safi][direct],
867 type);
868
869 filter = &peer->filter[afi][safi];
870 switch (type) {
871 case PEER_FT_DISTRIBUTE_LIST:
872 return !!(filter->dlist[direct].name);
873 case PEER_FT_FILTER_LIST:
874 return !!(filter->aslist[direct].name);
875 case PEER_FT_PREFIX_LIST:
876 return !!(filter->plist[direct].name);
877 case PEER_FT_ROUTE_MAP:
878 return !!(filter->map[direct].name);
879 case PEER_FT_UNSUPPRESS_MAP:
880 return !!(filter->usmap.name);
881 default:
882 return false;
883 }
884 }
885
886 /* Check peer's AS number and determines if this peer is IBGP or EBGP */
887 static inline bgp_peer_sort_t peer_calc_sort(struct peer *peer)
888 {
889 struct bgp *bgp;
890
891 bgp = peer->bgp;
892
893 /* Peer-group */
894 if (CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
895 if (peer->as_type == AS_INTERNAL)
896 return BGP_PEER_IBGP;
897
898 else if (peer->as_type == AS_EXTERNAL)
899 return BGP_PEER_EBGP;
900
901 else if (peer->as_type == AS_SPECIFIED && peer->as) {
902 assert(bgp);
903 return (bgp->as == peer->as ? BGP_PEER_IBGP
904 : BGP_PEER_EBGP);
905 }
906
907 else {
908 struct peer *peer1;
909
910 assert(peer->group);
911 peer1 = listnode_head(peer->group->peer);
912
913 if (peer1)
914 return peer1->sort;
915 }
916 return BGP_PEER_INTERNAL;
917 }
918
919 /* Normal peer */
920 if (bgp && CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION)) {
921 if (peer->local_as == 0)
922 return BGP_PEER_INTERNAL;
923
924 if (peer->local_as == peer->as) {
925 if (bgp->as == bgp->confed_id) {
926 if (peer->local_as == bgp->as)
927 return BGP_PEER_IBGP;
928 else
929 return BGP_PEER_EBGP;
930 } else {
931 if (peer->local_as == bgp->confed_id)
932 return BGP_PEER_EBGP;
933 else
934 return BGP_PEER_IBGP;
935 }
936 }
937
938 if (bgp_confederation_peers_check(bgp, peer->as))
939 return BGP_PEER_CONFED;
940
941 return BGP_PEER_EBGP;
942 } else {
943 if (peer->as_type != AS_SPECIFIED)
944 return (peer->as_type == AS_INTERNAL ? BGP_PEER_IBGP
945 : BGP_PEER_EBGP);
946
947 return (peer->local_as == 0
948 ? BGP_PEER_INTERNAL
949 : peer->local_as == peer->as ? BGP_PEER_IBGP
950 : BGP_PEER_EBGP);
951 }
952 }
953
954 /* Calculate and cache the peer "sort" */
955 bgp_peer_sort_t peer_sort(struct peer *peer)
956 {
957 peer->sort = peer_calc_sort(peer);
958 return peer->sort;
959 }
960
961 static void peer_free(struct peer *peer)
962 {
963 assert(peer->status == Deleted);
964
965 QOBJ_UNREG(peer);
966
967 /* this /ought/ to have been done already through bgp_stop earlier,
968 * but just to be sure..
969 */
970 bgp_timer_set(peer);
971 bgp_reads_off(peer);
972 bgp_writes_off(peer);
973 assert(!peer->t_write);
974 assert(!peer->t_read);
975 BGP_EVENT_FLUSH(peer);
976
977 pthread_mutex_destroy(&peer->io_mtx);
978
979 /* Free connected nexthop, if present */
980 if (CHECK_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE)
981 && !peer_dynamic_neighbor(peer))
982 bgp_delete_connected_nexthop(family2afi(peer->su.sa.sa_family),
983 peer);
984
985 XFREE(MTYPE_PEER_TX_SHUTDOWN_MSG, peer->tx_shutdown_message);
986
987 if (peer->desc) {
988 XFREE(MTYPE_PEER_DESC, peer->desc);
989 peer->desc = NULL;
990 }
991
992 /* Free allocated host character. */
993 if (peer->host) {
994 XFREE(MTYPE_BGP_PEER_HOST, peer->host);
995 peer->host = NULL;
996 }
997
998 if (peer->domainname) {
999 XFREE(MTYPE_BGP_PEER_HOST, peer->domainname);
1000 peer->domainname = NULL;
1001 }
1002
1003 if (peer->ifname) {
1004 XFREE(MTYPE_BGP_PEER_IFNAME, peer->ifname);
1005 peer->ifname = NULL;
1006 }
1007
1008 /* Update source configuration. */
1009 if (peer->update_source) {
1010 sockunion_free(peer->update_source);
1011 peer->update_source = NULL;
1012 }
1013
1014 if (peer->update_if) {
1015 XFREE(MTYPE_PEER_UPDATE_SOURCE, peer->update_if);
1016 peer->update_if = NULL;
1017 }
1018
1019 if (peer->notify.data)
1020 XFREE(MTYPE_TMP, peer->notify.data);
1021 memset(&peer->notify, 0, sizeof(struct bgp_notify));
1022
1023 if (peer->clear_node_queue)
1024 work_queue_free_and_null(&peer->clear_node_queue);
1025
1026 bgp_sync_delete(peer);
1027
1028 if (peer->conf_if) {
1029 XFREE(MTYPE_PEER_CONF_IF, peer->conf_if);
1030 peer->conf_if = NULL;
1031 }
1032
1033 bfd_info_free(&(peer->bfd_info));
1034
1035 bgp_unlock(peer->bgp);
1036
1037 memset(peer, 0, sizeof(struct peer));
1038
1039 XFREE(MTYPE_BGP_PEER, peer);
1040 }
1041
1042 /* increase reference count on a struct peer */
1043 struct peer *peer_lock_with_caller(const char *name, struct peer *peer)
1044 {
1045 assert(peer && (peer->lock >= 0));
1046
1047 #if 0
1048 zlog_debug("%s peer_lock %p %d", name, peer, peer->lock);
1049 #endif
1050
1051 peer->lock++;
1052
1053 return peer;
1054 }
1055
1056 /* decrease reference count on a struct peer
1057 * struct peer is freed and NULL returned if last reference
1058 */
1059 struct peer *peer_unlock_with_caller(const char *name, struct peer *peer)
1060 {
1061 assert(peer && (peer->lock > 0));
1062
1063 #if 0
1064 zlog_debug("%s peer_unlock %p %d", name, peer, peer->lock);
1065 #endif
1066
1067 peer->lock--;
1068
1069 if (peer->lock == 0) {
1070 peer_free(peer);
1071 return NULL;
1072 }
1073
1074 return peer;
1075 }
1076
1077 /* Allocate new peer object, implicitely locked. */
1078 struct peer *peer_new(struct bgp *bgp)
1079 {
1080 afi_t afi;
1081 safi_t safi;
1082 struct peer *peer;
1083 struct servent *sp;
1084
1085 /* bgp argument is absolutely required */
1086 assert(bgp);
1087 if (!bgp)
1088 return NULL;
1089
1090 /* Allocate new peer. */
1091 peer = XCALLOC(MTYPE_BGP_PEER, sizeof(struct peer));
1092
1093 /* Set default value. */
1094 peer->fd = -1;
1095 peer->v_start = BGP_INIT_START_TIMER;
1096 peer->v_connect = BGP_DEFAULT_CONNECT_RETRY;
1097 peer->status = Idle;
1098 peer->ostatus = Idle;
1099 peer->cur_event = peer->last_event = peer->last_major_event = 0;
1100 peer->bgp = bgp_lock(bgp);
1101 peer = peer_lock(peer); /* initial reference */
1102 peer->password = NULL;
1103
1104 /* Set default flags. */
1105 FOREACH_AFI_SAFI (afi, safi) {
1106 if (!bgp_option_check(BGP_OPT_CONFIG_CISCO)) {
1107 SET_FLAG(peer->af_flags[afi][safi],
1108 PEER_FLAG_SEND_COMMUNITY);
1109 SET_FLAG(peer->af_flags[afi][safi],
1110 PEER_FLAG_SEND_EXT_COMMUNITY);
1111 SET_FLAG(peer->af_flags[afi][safi],
1112 PEER_FLAG_SEND_LARGE_COMMUNITY);
1113
1114 SET_FLAG(peer->af_flags_invert[afi][safi],
1115 PEER_FLAG_SEND_COMMUNITY);
1116 SET_FLAG(peer->af_flags_invert[afi][safi],
1117 PEER_FLAG_SEND_EXT_COMMUNITY);
1118 SET_FLAG(peer->af_flags_invert[afi][safi],
1119 PEER_FLAG_SEND_LARGE_COMMUNITY);
1120 }
1121 }
1122
1123 /* set nexthop-unchanged for l2vpn evpn by default */
1124 SET_FLAG(peer->af_flags[AFI_L2VPN][SAFI_EVPN],
1125 PEER_FLAG_NEXTHOP_UNCHANGED);
1126
1127 SET_FLAG(peer->sflags, PEER_STATUS_CAPABILITY_OPEN);
1128
1129 /* Create buffers. */
1130 peer->ibuf = stream_fifo_new();
1131 peer->obuf = stream_fifo_new();
1132 pthread_mutex_init(&peer->io_mtx, NULL);
1133
1134 /* We use a larger buffer for peer->obuf_work in the event that:
1135 * - We RX a BGP_UPDATE where the attributes alone are just
1136 * under BGP_MAX_PACKET_SIZE
1137 * - The user configures an outbound route-map that does many as-path
1138 * prepends or adds many communities. At most they can have
1139 * CMD_ARGC_MAX args in a route-map so there is a finite limit on how
1140 * large they can make the attributes.
1141 *
1142 * Having a buffer with BGP_MAX_PACKET_SIZE_OVERFLOW allows us to avoid
1143 * bounds checking for every single attribute as we construct an
1144 * UPDATE.
1145 */
1146 peer->obuf_work =
1147 stream_new(BGP_MAX_PACKET_SIZE + BGP_MAX_PACKET_SIZE_OVERFLOW);
1148 peer->ibuf_work =
1149 ringbuf_new(BGP_MAX_PACKET_SIZE * BGP_READ_PACKET_MAX);
1150
1151 peer->scratch = stream_new(BGP_MAX_PACKET_SIZE);
1152
1153 bgp_sync_init(peer);
1154
1155 /* Get service port number. */
1156 sp = getservbyname("bgp", "tcp");
1157 peer->port = (sp == NULL) ? BGP_PORT_DEFAULT : ntohs(sp->s_port);
1158
1159 QOBJ_REG(peer, peer);
1160 return peer;
1161 }
1162
1163 /*
1164 * This function is invoked when a duplicate peer structure associated with
1165 * a neighbor is being deleted. If this about-to-be-deleted structure is
1166 * the one with all the config, then we have to copy over the info.
1167 */
1168 void peer_xfer_config(struct peer *peer_dst, struct peer *peer_src)
1169 {
1170 struct peer_af *paf;
1171 afi_t afi;
1172 safi_t safi;
1173 int afidx;
1174
1175 assert(peer_src);
1176 assert(peer_dst);
1177
1178 /* The following function is used by both peer group config copy to
1179 * individual peer and when we transfer config
1180 */
1181 if (peer_src->change_local_as)
1182 peer_dst->change_local_as = peer_src->change_local_as;
1183
1184 /* peer flags apply */
1185 peer_dst->flags = peer_src->flags;
1186 peer_dst->cap = peer_src->cap;
1187
1188 peer_dst->local_as = peer_src->local_as;
1189 peer_dst->port = peer_src->port;
1190 (void)peer_sort(peer_dst);
1191 peer_dst->rmap_type = peer_src->rmap_type;
1192
1193 /* Timers */
1194 peer_dst->holdtime = peer_src->holdtime;
1195 peer_dst->keepalive = peer_src->keepalive;
1196 peer_dst->connect = peer_src->connect;
1197 peer_dst->v_holdtime = peer_src->v_holdtime;
1198 peer_dst->v_keepalive = peer_src->v_keepalive;
1199 peer_dst->routeadv = peer_src->routeadv;
1200 peer_dst->v_routeadv = peer_src->v_routeadv;
1201
1202 /* password apply */
1203 if (peer_src->password && !peer_dst->password)
1204 peer_dst->password =
1205 XSTRDUP(MTYPE_PEER_PASSWORD, peer_src->password);
1206
1207 FOREACH_AFI_SAFI (afi, safi) {
1208 peer_dst->afc[afi][safi] = peer_src->afc[afi][safi];
1209 peer_dst->af_flags[afi][safi] = peer_src->af_flags[afi][safi];
1210 peer_dst->allowas_in[afi][safi] =
1211 peer_src->allowas_in[afi][safi];
1212 peer_dst->weight[afi][safi] = peer_src->weight[afi][safi];
1213 }
1214
1215 for (afidx = BGP_AF_START; afidx < BGP_AF_MAX; afidx++) {
1216 paf = peer_src->peer_af_array[afidx];
1217 if (paf != NULL)
1218 peer_af_create(peer_dst, paf->afi, paf->safi);
1219 }
1220
1221 /* update-source apply */
1222 if (peer_src->update_source) {
1223 if (peer_dst->update_source)
1224 sockunion_free(peer_dst->update_source);
1225 if (peer_dst->update_if) {
1226 XFREE(MTYPE_PEER_UPDATE_SOURCE, peer_dst->update_if);
1227 peer_dst->update_if = NULL;
1228 }
1229 peer_dst->update_source =
1230 sockunion_dup(peer_src->update_source);
1231 } else if (peer_src->update_if) {
1232 if (peer_dst->update_if)
1233 XFREE(MTYPE_PEER_UPDATE_SOURCE, peer_dst->update_if);
1234 if (peer_dst->update_source) {
1235 sockunion_free(peer_dst->update_source);
1236 peer_dst->update_source = NULL;
1237 }
1238 peer_dst->update_if =
1239 XSTRDUP(MTYPE_PEER_UPDATE_SOURCE, peer_src->update_if);
1240 }
1241
1242 if (peer_src->ifname) {
1243 if (peer_dst->ifname)
1244 XFREE(MTYPE_BGP_PEER_IFNAME, peer_dst->ifname);
1245
1246 peer_dst->ifname =
1247 XSTRDUP(MTYPE_BGP_PEER_IFNAME, peer_src->ifname);
1248 }
1249 }
1250
1251 static int bgp_peer_conf_if_to_su_update_v4(struct peer *peer,
1252 struct interface *ifp)
1253 {
1254 struct connected *ifc;
1255 struct prefix p;
1256 uint32_t addr;
1257 struct listnode *node;
1258
1259 /* If our IPv4 address on the interface is /30 or /31, we can derive the
1260 * IPv4 address of the other end.
1261 */
1262 for (ALL_LIST_ELEMENTS_RO(ifp->connected, node, ifc)) {
1263 if (ifc->address && (ifc->address->family == AF_INET)) {
1264 PREFIX_COPY_IPV4(&p, CONNECTED_PREFIX(ifc));
1265 if (p.prefixlen == 30) {
1266 peer->su.sa.sa_family = AF_INET;
1267 addr = ntohl(p.u.prefix4.s_addr);
1268 if (addr % 4 == 1)
1269 peer->su.sin.sin_addr.s_addr =
1270 htonl(addr + 1);
1271 else if (addr % 4 == 2)
1272 peer->su.sin.sin_addr.s_addr =
1273 htonl(addr - 1);
1274 #ifdef HAVE_STRUCT_SOCKADDR_IN_SIN_LEN
1275 peer->su.sin.sin_len =
1276 sizeof(struct sockaddr_in);
1277 #endif /* HAVE_STRUCT_SOCKADDR_IN_SIN_LEN */
1278 return 1;
1279 } else if (p.prefixlen == 31) {
1280 peer->su.sa.sa_family = AF_INET;
1281 addr = ntohl(p.u.prefix4.s_addr);
1282 if (addr % 2 == 0)
1283 peer->su.sin.sin_addr.s_addr =
1284 htonl(addr + 1);
1285 else
1286 peer->su.sin.sin_addr.s_addr =
1287 htonl(addr - 1);
1288 #ifdef HAVE_STRUCT_SOCKADDR_IN_SIN_LEN
1289 peer->su.sin.sin_len =
1290 sizeof(struct sockaddr_in);
1291 #endif /* HAVE_STRUCT_SOCKADDR_IN_SIN_LEN */
1292 return 1;
1293 } else if (bgp_debug_neighbor_events(peer))
1294 zlog_debug(
1295 "%s: IPv4 interface address is not /30 or /31, v4 session not started",
1296 peer->conf_if);
1297 }
1298 }
1299
1300 return 0;
1301 }
1302
1303 static int bgp_peer_conf_if_to_su_update_v6(struct peer *peer,
1304 struct interface *ifp)
1305 {
1306 struct nbr_connected *ifc_nbr;
1307
1308 /* Have we learnt the peer's IPv6 link-local address? */
1309 if (ifp->nbr_connected
1310 && (ifc_nbr = listnode_head(ifp->nbr_connected))) {
1311 peer->su.sa.sa_family = AF_INET6;
1312 memcpy(&peer->su.sin6.sin6_addr, &ifc_nbr->address->u.prefix,
1313 sizeof(struct in6_addr));
1314 #ifdef SIN6_LEN
1315 peer->su.sin6.sin6_len = sizeof(struct sockaddr_in6);
1316 #endif
1317 peer->su.sin6.sin6_scope_id = ifp->ifindex;
1318 return 1;
1319 }
1320
1321 return 0;
1322 }
1323
1324 /*
1325 * Set or reset the peer address socketunion structure based on the
1326 * learnt/derived peer address. If the address has changed, update the
1327 * password on the listen socket, if needed.
1328 */
1329 void bgp_peer_conf_if_to_su_update(struct peer *peer)
1330 {
1331 struct interface *ifp;
1332 int prev_family;
1333 int peer_addr_updated = 0;
1334
1335 if (!peer->conf_if)
1336 return;
1337
1338 /*
1339 * Our peer structure is stored in the bgp->peerhash
1340 * release it before we modify anything.
1341 */
1342 hash_release(peer->bgp->peerhash, peer);
1343
1344 prev_family = peer->su.sa.sa_family;
1345 if ((ifp = if_lookup_by_name(peer->conf_if, peer->bgp->vrf_id))) {
1346 peer->ifp = ifp;
1347 /* If BGP unnumbered is not "v6only", we first see if we can
1348 * derive the
1349 * peer's IPv4 address.
1350 */
1351 if (!CHECK_FLAG(peer->flags, PEER_FLAG_IFPEER_V6ONLY))
1352 peer_addr_updated =
1353 bgp_peer_conf_if_to_su_update_v4(peer, ifp);
1354
1355 /* If "v6only" or we can't derive peer's IPv4 address, see if
1356 * we've
1357 * learnt the peer's IPv6 link-local address. This is from the
1358 * source
1359 * IPv6 address in router advertisement.
1360 */
1361 if (!peer_addr_updated)
1362 peer_addr_updated =
1363 bgp_peer_conf_if_to_su_update_v6(peer, ifp);
1364 }
1365 /* If we could derive the peer address, we may need to install the
1366 * password
1367 * configured for the peer, if any, on the listen socket. Otherwise,
1368 * mark
1369 * that peer's address is not available and uninstall the password, if
1370 * needed.
1371 */
1372 if (peer_addr_updated) {
1373 if (CHECK_FLAG(peer->flags, PEER_FLAG_PASSWORD)
1374 && prev_family == AF_UNSPEC)
1375 bgp_md5_set(peer);
1376 } else {
1377 if (CHECK_FLAG(peer->flags, PEER_FLAG_PASSWORD)
1378 && prev_family != AF_UNSPEC)
1379 bgp_md5_unset(peer);
1380 peer->su.sa.sa_family = AF_UNSPEC;
1381 memset(&peer->su.sin6.sin6_addr, 0, sizeof(struct in6_addr));
1382 }
1383
1384 /*
1385 * Since our su changed we need to del/add peer to the peerhash
1386 */
1387 hash_get(peer->bgp->peerhash, peer, hash_alloc_intern);
1388 }
1389
1390 static void bgp_recalculate_afi_safi_bestpaths(struct bgp *bgp, afi_t afi,
1391 safi_t safi)
1392 {
1393 struct bgp_node *rn, *nrn;
1394
1395 for (rn = bgp_table_top(bgp->rib[afi][safi]); rn;
1396 rn = bgp_route_next(rn)) {
1397 if (rn->info != NULL) {
1398 /* Special handling for 2-level routing
1399 * tables. */
1400 if (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
1401 || safi == SAFI_EVPN) {
1402 for (nrn = bgp_table_top(
1403 (struct bgp_table *)(rn->info));
1404 nrn; nrn = bgp_route_next(nrn))
1405 bgp_process(bgp, nrn, afi, safi);
1406 } else
1407 bgp_process(bgp, rn, afi, safi);
1408 }
1409 }
1410 }
1411
1412 /* Force a bestpath recalculation for all prefixes. This is used
1413 * when 'bgp bestpath' commands are entered.
1414 */
1415 void bgp_recalculate_all_bestpaths(struct bgp *bgp)
1416 {
1417 afi_t afi;
1418 safi_t safi;
1419
1420 FOREACH_AFI_SAFI (afi, safi) {
1421 bgp_recalculate_afi_safi_bestpaths(bgp, afi, safi);
1422 }
1423 }
1424
1425 /*
1426 * Create new BGP peer.
1427 *
1428 * conf_if and su are mutually exclusive if configuring from the cli.
1429 * If we are handing a doppelganger, then we *must* pass in both
1430 * the original peer's su and conf_if, so that we can appropriately
1431 * track the bgp->peerhash( ie we don't want to remove the current
1432 * one from the config ).
1433 */
1434 struct peer *peer_create(union sockunion *su, const char *conf_if,
1435 struct bgp *bgp, as_t local_as, as_t remote_as,
1436 int as_type, afi_t afi, safi_t safi,
1437 struct peer_group *group)
1438 {
1439 int active;
1440 struct peer *peer;
1441 char buf[SU_ADDRSTRLEN];
1442
1443 peer = peer_new(bgp);
1444 if (conf_if) {
1445 peer->conf_if = XSTRDUP(MTYPE_PEER_CONF_IF, conf_if);
1446 if (su)
1447 peer->su = *su;
1448 else
1449 bgp_peer_conf_if_to_su_update(peer);
1450 if (peer->host)
1451 XFREE(MTYPE_BGP_PEER_HOST, peer->host);
1452 peer->host = XSTRDUP(MTYPE_BGP_PEER_HOST, conf_if);
1453 } else if (su) {
1454 peer->su = *su;
1455 sockunion2str(su, buf, SU_ADDRSTRLEN);
1456 if (peer->host)
1457 XFREE(MTYPE_BGP_PEER_HOST, peer->host);
1458 peer->host = XSTRDUP(MTYPE_BGP_PEER_HOST, buf);
1459 }
1460 peer->local_as = local_as;
1461 peer->as = remote_as;
1462 peer->as_type = as_type;
1463 peer->local_id = bgp->router_id;
1464 peer->v_holdtime = bgp->default_holdtime;
1465 peer->v_keepalive = bgp->default_keepalive;
1466 peer->v_routeadv = (peer_sort(peer) == BGP_PEER_IBGP)
1467 ? BGP_DEFAULT_IBGP_ROUTEADV
1468 : BGP_DEFAULT_EBGP_ROUTEADV;
1469
1470 peer = peer_lock(peer); /* bgp peer list reference */
1471 peer->group = group;
1472 listnode_add_sort(bgp->peer, peer);
1473 hash_get(bgp->peerhash, peer, hash_alloc_intern);
1474
1475 /* Adjust update-group coalesce timer heuristics for # peers. */
1476 if (bgp->heuristic_coalesce) {
1477 long ct = BGP_DEFAULT_SUBGROUP_COALESCE_TIME
1478 + (bgp->peer->count
1479 * BGP_PEER_ADJUST_SUBGROUP_COALESCE_TIME);
1480 bgp->coalesce_time = MIN(BGP_MAX_SUBGROUP_COALESCE_TIME, ct);
1481 }
1482
1483 active = peer_active(peer);
1484
1485 /* Last read and reset time set */
1486 peer->readtime = peer->resettime = bgp_clock();
1487
1488 /* Default TTL set. */
1489 peer->ttl = (peer->sort == BGP_PEER_IBGP) ? MAXTTL : 1;
1490
1491 SET_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE);
1492
1493 if (afi && safi) {
1494 peer->afc[afi][safi] = 1;
1495 peer_af_create(peer, afi, safi);
1496 }
1497
1498 /* auto shutdown if configured */
1499 if (bgp->autoshutdown)
1500 peer_flag_set(peer, PEER_FLAG_SHUTDOWN);
1501 /* Set up peer's events and timers. */
1502 else if (!active && peer_active(peer))
1503 bgp_timer_set(peer);
1504
1505 return peer;
1506 }
1507
1508 /* Make accept BGP peer. This function is only called from the test code */
1509 struct peer *peer_create_accept(struct bgp *bgp)
1510 {
1511 struct peer *peer;
1512
1513 peer = peer_new(bgp);
1514
1515 peer = peer_lock(peer); /* bgp peer list reference */
1516 listnode_add_sort(bgp->peer, peer);
1517
1518 return peer;
1519 }
1520
1521 /*
1522 * Return true if we have a peer configured to use this afi/safi
1523 */
1524 int bgp_afi_safi_peer_exists(struct bgp *bgp, afi_t afi, safi_t safi)
1525 {
1526 struct listnode *node;
1527 struct peer *peer;
1528
1529 for (ALL_LIST_ELEMENTS_RO(bgp->peer, node, peer)) {
1530 if (!CHECK_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE))
1531 continue;
1532
1533 if (peer->afc[afi][safi])
1534 return 1;
1535 }
1536
1537 return 0;
1538 }
1539
1540 /* Change peer's AS number. */
1541 void peer_as_change(struct peer *peer, as_t as, int as_specified)
1542 {
1543 bgp_peer_sort_t type;
1544
1545 /* Stop peer. */
1546 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
1547 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
1548 peer->last_reset = PEER_DOWN_REMOTE_AS_CHANGE;
1549 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
1550 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
1551 } else
1552 bgp_session_reset(peer);
1553 }
1554 type = peer_sort(peer);
1555 peer->as = as;
1556 peer->as_type = as_specified;
1557
1558 if (bgp_config_check(peer->bgp, BGP_CONFIG_CONFEDERATION)
1559 && !bgp_confederation_peers_check(peer->bgp, as)
1560 && peer->bgp->as != as)
1561 peer->local_as = peer->bgp->confed_id;
1562 else
1563 peer->local_as = peer->bgp->as;
1564
1565 /* Advertisement-interval reset */
1566 if (!CHECK_FLAG(peer->flags, PEER_FLAG_ROUTEADV)) {
1567 peer->v_routeadv = (peer_sort(peer) == BGP_PEER_IBGP)
1568 ? BGP_DEFAULT_IBGP_ROUTEADV
1569 : BGP_DEFAULT_EBGP_ROUTEADV;
1570 }
1571
1572 /* TTL reset */
1573 if (peer_sort(peer) == BGP_PEER_IBGP)
1574 peer->ttl = MAXTTL;
1575 else if (type == BGP_PEER_IBGP)
1576 peer->ttl = 1;
1577
1578 /* reflector-client reset */
1579 if (peer_sort(peer) != BGP_PEER_IBGP) {
1580 UNSET_FLAG(peer->af_flags[AFI_IP][SAFI_UNICAST],
1581 PEER_FLAG_REFLECTOR_CLIENT);
1582 UNSET_FLAG(peer->af_flags[AFI_IP][SAFI_MULTICAST],
1583 PEER_FLAG_REFLECTOR_CLIENT);
1584 UNSET_FLAG(peer->af_flags[AFI_IP][SAFI_LABELED_UNICAST],
1585 PEER_FLAG_REFLECTOR_CLIENT);
1586 UNSET_FLAG(peer->af_flags[AFI_IP][SAFI_MPLS_VPN],
1587 PEER_FLAG_REFLECTOR_CLIENT);
1588 UNSET_FLAG(peer->af_flags[AFI_IP][SAFI_ENCAP],
1589 PEER_FLAG_REFLECTOR_CLIENT);
1590 UNSET_FLAG(peer->af_flags[AFI_IP][SAFI_FLOWSPEC],
1591 PEER_FLAG_REFLECTOR_CLIENT);
1592 UNSET_FLAG(peer->af_flags[AFI_IP6][SAFI_UNICAST],
1593 PEER_FLAG_REFLECTOR_CLIENT);
1594 UNSET_FLAG(peer->af_flags[AFI_IP6][SAFI_MULTICAST],
1595 PEER_FLAG_REFLECTOR_CLIENT);
1596 UNSET_FLAG(peer->af_flags[AFI_IP6][SAFI_LABELED_UNICAST],
1597 PEER_FLAG_REFLECTOR_CLIENT);
1598 UNSET_FLAG(peer->af_flags[AFI_IP6][SAFI_MPLS_VPN],
1599 PEER_FLAG_REFLECTOR_CLIENT);
1600 UNSET_FLAG(peer->af_flags[AFI_IP6][SAFI_ENCAP],
1601 PEER_FLAG_REFLECTOR_CLIENT);
1602 UNSET_FLAG(peer->af_flags[AFI_IP6][SAFI_FLOWSPEC],
1603 PEER_FLAG_REFLECTOR_CLIENT);
1604 UNSET_FLAG(peer->af_flags[AFI_L2VPN][SAFI_EVPN],
1605 PEER_FLAG_REFLECTOR_CLIENT);
1606 }
1607
1608 /* local-as reset */
1609 if (peer_sort(peer) != BGP_PEER_EBGP) {
1610 peer->change_local_as = 0;
1611 peer_flag_unset(peer, PEER_FLAG_LOCAL_AS);
1612 peer_flag_unset(peer, PEER_FLAG_LOCAL_AS_NO_PREPEND);
1613 peer_flag_unset(peer, PEER_FLAG_LOCAL_AS_REPLACE_AS);
1614 }
1615 }
1616
1617 /* If peer does not exist, create new one. If peer already exists,
1618 set AS number to the peer. */
1619 int peer_remote_as(struct bgp *bgp, union sockunion *su, const char *conf_if,
1620 as_t *as, int as_type, afi_t afi, safi_t safi)
1621 {
1622 struct peer *peer;
1623 as_t local_as;
1624
1625 if (conf_if)
1626 peer = peer_lookup_by_conf_if(bgp, conf_if);
1627 else
1628 peer = peer_lookup(bgp, su);
1629
1630 if (peer) {
1631 /* Not allowed for a dynamic peer. */
1632 if (peer_dynamic_neighbor(peer)) {
1633 *as = peer->as;
1634 return BGP_ERR_INVALID_FOR_DYNAMIC_PEER;
1635 }
1636
1637 /* When this peer is a member of peer-group. */
1638 if (peer->group) {
1639 if (peer->group->conf->as) {
1640 /* Return peer group's AS number. */
1641 *as = peer->group->conf->as;
1642 return BGP_ERR_PEER_GROUP_MEMBER;
1643 }
1644 if (peer_sort(peer->group->conf) == BGP_PEER_IBGP) {
1645 if ((as_type != AS_INTERNAL)
1646 && (bgp->as != *as)) {
1647 *as = peer->as;
1648 return BGP_ERR_PEER_GROUP_PEER_TYPE_DIFFERENT;
1649 }
1650 } else {
1651 if ((as_type != AS_EXTERNAL)
1652 && (bgp->as == *as)) {
1653 *as = peer->as;
1654 return BGP_ERR_PEER_GROUP_PEER_TYPE_DIFFERENT;
1655 }
1656 }
1657 }
1658
1659 /* Existing peer's AS number change. */
1660 if (((peer->as_type == AS_SPECIFIED) && peer->as != *as)
1661 || (peer->as_type != as_type))
1662 peer_as_change(peer, *as, as_type);
1663 } else {
1664 if (conf_if)
1665 return BGP_ERR_NO_INTERFACE_CONFIG;
1666
1667 /* If the peer is not part of our confederation, and its not an
1668 iBGP peer then spoof the source AS */
1669 if (bgp_config_check(bgp, BGP_CONFIG_CONFEDERATION)
1670 && !bgp_confederation_peers_check(bgp, *as)
1671 && bgp->as != *as)
1672 local_as = bgp->confed_id;
1673 else
1674 local_as = bgp->as;
1675
1676 /* If this is IPv4 unicast configuration and "no bgp default
1677 ipv4-unicast" is specified. */
1678
1679 if (bgp_flag_check(bgp, BGP_FLAG_NO_DEFAULT_IPV4)
1680 && afi == AFI_IP && safi == SAFI_UNICAST)
1681 peer_create(su, conf_if, bgp, local_as, *as, as_type, 0,
1682 0, NULL);
1683 else
1684 peer_create(su, conf_if, bgp, local_as, *as, as_type,
1685 afi, safi, NULL);
1686 }
1687
1688 return 0;
1689 }
1690
1691 static void peer_group2peer_config_copy_af(struct peer_group *group,
1692 struct peer *peer, afi_t afi,
1693 safi_t safi)
1694 {
1695 int in = FILTER_IN;
1696 int out = FILTER_OUT;
1697 uint32_t flags_tmp;
1698 uint32_t pflags_ovrd;
1699 uint8_t *pfilter_ovrd;
1700 struct peer *conf;
1701
1702 conf = group->conf;
1703 pflags_ovrd = peer->af_flags_override[afi][safi];
1704 pfilter_ovrd = &peer->filter_override[afi][safi][in];
1705
1706 /* peer af_flags apply */
1707 flags_tmp = conf->af_flags[afi][safi] & ~pflags_ovrd;
1708 flags_tmp ^= conf->af_flags_invert[afi][safi]
1709 ^ peer->af_flags_invert[afi][safi];
1710 flags_tmp &= ~pflags_ovrd;
1711
1712 UNSET_FLAG(peer->af_flags[afi][safi], ~pflags_ovrd);
1713 SET_FLAG(peer->af_flags[afi][safi], flags_tmp);
1714 SET_FLAG(peer->af_flags_invert[afi][safi],
1715 conf->af_flags_invert[afi][safi]);
1716
1717 /* maximum-prefix */
1718 if (!CHECK_FLAG(pflags_ovrd, PEER_FLAG_MAX_PREFIX)) {
1719 PEER_ATTR_INHERIT(peer, group, pmax[afi][safi]);
1720 PEER_ATTR_INHERIT(peer, group, pmax_threshold[afi][safi]);
1721 PEER_ATTR_INHERIT(peer, group, pmax_restart[afi][safi]);
1722 }
1723
1724 /* allowas-in */
1725 if (!CHECK_FLAG(pflags_ovrd, PEER_FLAG_ALLOWAS_IN))
1726 PEER_ATTR_INHERIT(peer, group, allowas_in[afi][safi]);
1727
1728 /* weight */
1729 if (!CHECK_FLAG(pflags_ovrd, PEER_FLAG_WEIGHT))
1730 PEER_ATTR_INHERIT(peer, group, weight[afi][safi]);
1731
1732 /* default-originate route-map */
1733 if (!CHECK_FLAG(pflags_ovrd, PEER_FLAG_DEFAULT_ORIGINATE)) {
1734 PEER_STR_ATTR_INHERIT(peer, group, default_rmap[afi][safi].name,
1735 MTYPE_ROUTE_MAP_NAME);
1736 PEER_ATTR_INHERIT(peer, group, default_rmap[afi][safi].map);
1737 }
1738
1739 /* inbound filter apply */
1740 if (!CHECK_FLAG(pfilter_ovrd[in], PEER_FT_DISTRIBUTE_LIST)) {
1741 PEER_STR_ATTR_INHERIT(peer, group,
1742 filter[afi][safi].dlist[in].name,
1743 MTYPE_BGP_FILTER_NAME);
1744 PEER_ATTR_INHERIT(peer, group,
1745 filter[afi][safi].dlist[in].alist);
1746 }
1747
1748 if (!CHECK_FLAG(pfilter_ovrd[in], PEER_FT_PREFIX_LIST)) {
1749 PEER_STR_ATTR_INHERIT(peer, group,
1750 filter[afi][safi].plist[in].name,
1751 MTYPE_BGP_FILTER_NAME);
1752 PEER_ATTR_INHERIT(peer, group,
1753 filter[afi][safi].plist[in].plist);
1754 }
1755
1756 if (!CHECK_FLAG(pfilter_ovrd[in], PEER_FT_FILTER_LIST)) {
1757 PEER_STR_ATTR_INHERIT(peer, group,
1758 filter[afi][safi].aslist[in].name,
1759 MTYPE_BGP_FILTER_NAME);
1760 PEER_ATTR_INHERIT(peer, group,
1761 filter[afi][safi].aslist[in].aslist);
1762 }
1763
1764 if (!CHECK_FLAG(pfilter_ovrd[RMAP_IN], PEER_FT_ROUTE_MAP)) {
1765 PEER_STR_ATTR_INHERIT(peer, group,
1766 filter[afi][safi].map[in].name,
1767 MTYPE_BGP_FILTER_NAME);
1768 PEER_ATTR_INHERIT(peer, group,
1769 filter[afi][safi].map[RMAP_IN].map);
1770 }
1771
1772 /* outbound filter apply */
1773 if (!CHECK_FLAG(pfilter_ovrd[out], PEER_FT_DISTRIBUTE_LIST)) {
1774 PEER_STR_ATTR_INHERIT(peer, group,
1775 filter[afi][safi].dlist[out].name,
1776 MTYPE_BGP_FILTER_NAME);
1777 PEER_ATTR_INHERIT(peer, group,
1778 filter[afi][safi].dlist[out].alist);
1779 }
1780
1781 if (!CHECK_FLAG(pfilter_ovrd[out], PEER_FT_PREFIX_LIST)) {
1782 PEER_STR_ATTR_INHERIT(peer, group,
1783 filter[afi][safi].plist[out].name,
1784 MTYPE_BGP_FILTER_NAME);
1785 PEER_ATTR_INHERIT(peer, group,
1786 filter[afi][safi].plist[out].plist);
1787 }
1788
1789 if (!CHECK_FLAG(pfilter_ovrd[out], PEER_FT_FILTER_LIST)) {
1790 PEER_STR_ATTR_INHERIT(peer, group,
1791 filter[afi][safi].aslist[out].name,
1792 MTYPE_BGP_FILTER_NAME);
1793 PEER_ATTR_INHERIT(peer, group,
1794 filter[afi][safi].aslist[out].aslist);
1795 }
1796
1797 if (!CHECK_FLAG(pfilter_ovrd[RMAP_OUT], PEER_FT_ROUTE_MAP)) {
1798 PEER_STR_ATTR_INHERIT(peer, group,
1799 filter[afi][safi].map[RMAP_OUT].name,
1800 MTYPE_BGP_FILTER_NAME);
1801 PEER_ATTR_INHERIT(peer, group,
1802 filter[afi][safi].map[RMAP_OUT].map);
1803 }
1804
1805 /* nondirectional filter apply */
1806 if (!CHECK_FLAG(pfilter_ovrd[0], PEER_FT_UNSUPPRESS_MAP)) {
1807 PEER_STR_ATTR_INHERIT(peer, group, filter[afi][safi].usmap.name,
1808 MTYPE_BGP_FILTER_NAME);
1809 PEER_ATTR_INHERIT(peer, group, filter[afi][safi].usmap.map);
1810 }
1811 }
1812
1813 static int peer_activate_af(struct peer *peer, afi_t afi, safi_t safi)
1814 {
1815 int active;
1816 struct peer *other;
1817
1818 if (CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
1819 flog_err(EC_BGP_PEER_GROUP, "%s was called for peer-group %s",
1820 __func__, peer->host);
1821 return 1;
1822 }
1823
1824 /* Do not activate a peer for both SAFI_UNICAST and SAFI_LABELED_UNICAST
1825 */
1826 if ((safi == SAFI_UNICAST && peer->afc[afi][SAFI_LABELED_UNICAST])
1827 || (safi == SAFI_LABELED_UNICAST && peer->afc[afi][SAFI_UNICAST]))
1828 return BGP_ERR_PEER_SAFI_CONFLICT;
1829
1830 /* Nothing to do if we've already activated this peer */
1831 if (peer->afc[afi][safi])
1832 return 0;
1833
1834 if (peer_af_create(peer, afi, safi) == NULL)
1835 return 1;
1836
1837 active = peer_active(peer);
1838 peer->afc[afi][safi] = 1;
1839
1840 if (peer->group)
1841 peer_group2peer_config_copy_af(peer->group, peer, afi, safi);
1842
1843 if (!active && peer_active(peer)) {
1844 bgp_timer_set(peer);
1845 } else {
1846 if (peer->status == Established) {
1847 if (CHECK_FLAG(peer->cap, PEER_CAP_DYNAMIC_RCV)) {
1848 peer->afc_adv[afi][safi] = 1;
1849 bgp_capability_send(peer, afi, safi,
1850 CAPABILITY_CODE_MP,
1851 CAPABILITY_ACTION_SET);
1852 if (peer->afc_recv[afi][safi]) {
1853 peer->afc_nego[afi][safi] = 1;
1854 bgp_announce_route(peer, afi, safi);
1855 }
1856 } else {
1857 peer->last_reset = PEER_DOWN_AF_ACTIVATE;
1858 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
1859 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
1860 }
1861 }
1862 if (peer->status == OpenSent || peer->status == OpenConfirm) {
1863 peer->last_reset = PEER_DOWN_AF_ACTIVATE;
1864 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
1865 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
1866 }
1867 /*
1868 * If we are turning on a AFI/SAFI locally and we've
1869 * started bringing a peer up, we need to tell
1870 * the other peer to restart because we might loose
1871 * configuration here because when the doppelganger
1872 * gets to a established state due to how
1873 * we resolve we could just overwrite the afi/safi
1874 * activation.
1875 */
1876 other = peer->doppelganger;
1877 if (other
1878 && (other->status == OpenSent
1879 || other->status == OpenConfirm)) {
1880 other->last_reset = PEER_DOWN_AF_ACTIVATE;
1881 bgp_notify_send(other, BGP_NOTIFY_CEASE,
1882 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
1883 }
1884 }
1885
1886 return 0;
1887 }
1888
1889 /* Activate the peer or peer group for specified AFI and SAFI. */
1890 int peer_activate(struct peer *peer, afi_t afi, safi_t safi)
1891 {
1892 int ret = 0;
1893 struct peer_group *group;
1894 struct listnode *node, *nnode;
1895 struct peer *tmp_peer;
1896 struct bgp *bgp;
1897
1898 /* Nothing to do if we've already activated this peer */
1899 if (peer->afc[afi][safi])
1900 return ret;
1901
1902 bgp = peer->bgp;
1903
1904 /* This is a peer-group so activate all of the members of the
1905 * peer-group as well */
1906 if (CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
1907
1908 /* Do not activate a peer for both SAFI_UNICAST and
1909 * SAFI_LABELED_UNICAST */
1910 if ((safi == SAFI_UNICAST
1911 && peer->afc[afi][SAFI_LABELED_UNICAST])
1912 || (safi == SAFI_LABELED_UNICAST
1913 && peer->afc[afi][SAFI_UNICAST]))
1914 return BGP_ERR_PEER_SAFI_CONFLICT;
1915
1916 peer->afc[afi][safi] = 1;
1917 group = peer->group;
1918
1919 for (ALL_LIST_ELEMENTS(group->peer, node, nnode, tmp_peer)) {
1920 ret |= peer_activate_af(tmp_peer, afi, safi);
1921 }
1922 } else {
1923 ret |= peer_activate_af(peer, afi, safi);
1924 }
1925
1926 /* If this is the first peer to be activated for this
1927 * afi/labeled-unicast recalc bestpaths to trigger label allocation */
1928 if (safi == SAFI_LABELED_UNICAST
1929 && !bgp->allocate_mpls_labels[afi][SAFI_UNICAST]) {
1930
1931 if (BGP_DEBUG(zebra, ZEBRA))
1932 zlog_info(
1933 "peer(s) are now active for labeled-unicast, allocate MPLS labels");
1934
1935 bgp->allocate_mpls_labels[afi][SAFI_UNICAST] = 1;
1936 bgp_recalculate_afi_safi_bestpaths(bgp, afi, SAFI_UNICAST);
1937 }
1938
1939 if (safi == SAFI_FLOWSPEC) {
1940 /* connect to table manager */
1941 bgp_zebra_init_tm_connect(bgp);
1942 }
1943 return ret;
1944 }
1945
1946 static int non_peergroup_deactivate_af(struct peer *peer, afi_t afi,
1947 safi_t safi)
1948 {
1949 if (CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
1950 flog_err(EC_BGP_PEER_GROUP, "%s was called for peer-group %s",
1951 __func__, peer->host);
1952 return 1;
1953 }
1954
1955 /* Nothing to do if we've already deactivated this peer */
1956 if (!peer->afc[afi][safi])
1957 return 0;
1958
1959 /* De-activate the address family configuration. */
1960 peer->afc[afi][safi] = 0;
1961
1962 if (peer_af_delete(peer, afi, safi) != 0) {
1963 flog_err(EC_BGP_PEER_DELETE,
1964 "couldn't delete af structure for peer %s",
1965 peer->host);
1966 return 1;
1967 }
1968
1969 if (peer->status == Established) {
1970 if (CHECK_FLAG(peer->cap, PEER_CAP_DYNAMIC_RCV)) {
1971 peer->afc_adv[afi][safi] = 0;
1972 peer->afc_nego[afi][safi] = 0;
1973
1974 if (peer_active_nego(peer)) {
1975 bgp_capability_send(peer, afi, safi,
1976 CAPABILITY_CODE_MP,
1977 CAPABILITY_ACTION_UNSET);
1978 bgp_clear_route(peer, afi, safi);
1979 peer->pcount[afi][safi] = 0;
1980 } else {
1981 peer->last_reset = PEER_DOWN_NEIGHBOR_DELETE;
1982 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
1983 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
1984 }
1985 } else {
1986 peer->last_reset = PEER_DOWN_NEIGHBOR_DELETE;
1987 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
1988 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
1989 }
1990 }
1991
1992 return 0;
1993 }
1994
1995 int peer_deactivate(struct peer *peer, afi_t afi, safi_t safi)
1996 {
1997 int ret = 0;
1998 struct peer_group *group;
1999 struct peer *tmp_peer;
2000 struct listnode *node, *nnode;
2001 struct bgp *bgp;
2002
2003 /* Nothing to do if we've already de-activated this peer */
2004 if (!peer->afc[afi][safi])
2005 return ret;
2006
2007 /* This is a peer-group so de-activate all of the members of the
2008 * peer-group as well */
2009 if (CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
2010 peer->afc[afi][safi] = 0;
2011 group = peer->group;
2012
2013 if (peer_af_delete(peer, afi, safi) != 0) {
2014 flog_err(EC_BGP_PEER_DELETE,
2015 "couldn't delete af structure for peer %s",
2016 peer->host);
2017 }
2018
2019 for (ALL_LIST_ELEMENTS(group->peer, node, nnode, tmp_peer)) {
2020 ret |= non_peergroup_deactivate_af(tmp_peer, afi, safi);
2021 }
2022 } else {
2023 ret |= non_peergroup_deactivate_af(peer, afi, safi);
2024 }
2025
2026 bgp = peer->bgp;
2027
2028 /* If this is the last peer to be deactivated for this
2029 * afi/labeled-unicast recalc bestpaths to trigger label deallocation */
2030 if (safi == SAFI_LABELED_UNICAST
2031 && bgp->allocate_mpls_labels[afi][SAFI_UNICAST]
2032 && !bgp_afi_safi_peer_exists(bgp, afi, safi)) {
2033
2034 if (BGP_DEBUG(zebra, ZEBRA))
2035 zlog_info(
2036 "peer(s) are no longer active for labeled-unicast, deallocate MPLS labels");
2037
2038 bgp->allocate_mpls_labels[afi][SAFI_UNICAST] = 0;
2039 bgp_recalculate_afi_safi_bestpaths(bgp, afi, SAFI_UNICAST);
2040 }
2041 return ret;
2042 }
2043
2044 int peer_afc_set(struct peer *peer, afi_t afi, safi_t safi, int enable)
2045 {
2046 if (enable)
2047 return peer_activate(peer, afi, safi);
2048 else
2049 return peer_deactivate(peer, afi, safi);
2050 }
2051
2052 static void peer_nsf_stop(struct peer *peer)
2053 {
2054 afi_t afi;
2055 safi_t safi;
2056
2057 UNSET_FLAG(peer->sflags, PEER_STATUS_NSF_WAIT);
2058 UNSET_FLAG(peer->sflags, PEER_STATUS_NSF_MODE);
2059
2060 for (afi = AFI_IP; afi < AFI_MAX; afi++)
2061 for (safi = SAFI_UNICAST; safi <= SAFI_MPLS_VPN; safi++)
2062 peer->nsf[afi][safi] = 0;
2063
2064 if (peer->t_gr_restart) {
2065 BGP_TIMER_OFF(peer->t_gr_restart);
2066 if (bgp_debug_neighbor_events(peer))
2067 zlog_debug("%s graceful restart timer stopped",
2068 peer->host);
2069 }
2070 if (peer->t_gr_stale) {
2071 BGP_TIMER_OFF(peer->t_gr_stale);
2072 if (bgp_debug_neighbor_events(peer))
2073 zlog_debug(
2074 "%s graceful restart stalepath timer stopped",
2075 peer->host);
2076 }
2077 bgp_clear_route_all(peer);
2078 }
2079
2080 /* Delete peer from confguration.
2081 *
2082 * The peer is moved to a dead-end "Deleted" neighbour-state, to allow
2083 * it to "cool off" and refcounts to hit 0, at which state it is freed.
2084 *
2085 * This function /should/ take care to be idempotent, to guard against
2086 * it being called multiple times through stray events that come in
2087 * that happen to result in this function being called again. That
2088 * said, getting here for a "Deleted" peer is a bug in the neighbour
2089 * FSM.
2090 */
2091 int peer_delete(struct peer *peer)
2092 {
2093 int i;
2094 afi_t afi;
2095 safi_t safi;
2096 struct bgp *bgp;
2097 struct bgp_filter *filter;
2098 struct listnode *pn;
2099 int accept_peer;
2100
2101 assert(peer->status != Deleted);
2102
2103 bgp = peer->bgp;
2104 accept_peer = CHECK_FLAG(peer->sflags, PEER_STATUS_ACCEPT_PEER);
2105
2106 bgp_reads_off(peer);
2107 bgp_writes_off(peer);
2108 assert(!CHECK_FLAG(peer->thread_flags, PEER_THREAD_WRITES_ON));
2109 assert(!CHECK_FLAG(peer->thread_flags, PEER_THREAD_READS_ON));
2110
2111 if (CHECK_FLAG(peer->sflags, PEER_STATUS_NSF_WAIT))
2112 peer_nsf_stop(peer);
2113
2114 SET_FLAG(peer->flags, PEER_FLAG_DELETE);
2115
2116 /* If this peer belongs to peer group, clear up the
2117 relationship. */
2118 if (peer->group) {
2119 if (peer_dynamic_neighbor(peer))
2120 peer_drop_dynamic_neighbor(peer);
2121
2122 if ((pn = listnode_lookup(peer->group->peer, peer))) {
2123 peer = peer_unlock(
2124 peer); /* group->peer list reference */
2125 list_delete_node(peer->group->peer, pn);
2126 }
2127 peer->group = NULL;
2128 }
2129
2130 /* Withdraw all information from routing table. We can not use
2131 * BGP_EVENT_ADD (peer, BGP_Stop) at here. Because the event is
2132 * executed after peer structure is deleted.
2133 */
2134 peer->last_reset = PEER_DOWN_NEIGHBOR_DELETE;
2135 bgp_stop(peer);
2136 UNSET_FLAG(peer->flags, PEER_FLAG_DELETE);
2137
2138 if (peer->doppelganger) {
2139 peer->doppelganger->doppelganger = NULL;
2140 peer->doppelganger = NULL;
2141 }
2142
2143 UNSET_FLAG(peer->sflags, PEER_STATUS_ACCEPT_PEER);
2144 bgp_fsm_change_status(peer, Deleted);
2145
2146 /* Remove from NHT */
2147 if (CHECK_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE))
2148 bgp_unlink_nexthop_by_peer(peer);
2149
2150 /* Password configuration */
2151 if (CHECK_FLAG(peer->flags, PEER_FLAG_PASSWORD)) {
2152 XFREE(MTYPE_PEER_PASSWORD, peer->password);
2153
2154 if (!accept_peer && !BGP_PEER_SU_UNSPEC(peer)
2155 && !CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP))
2156 bgp_md5_unset(peer);
2157 }
2158
2159 bgp_timer_set(peer); /* stops all timers for Deleted */
2160
2161 /* Delete from all peer list. */
2162 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)
2163 && (pn = listnode_lookup(bgp->peer, peer))) {
2164 peer_unlock(peer); /* bgp peer list reference */
2165 list_delete_node(bgp->peer, pn);
2166 hash_release(bgp->peerhash, peer);
2167 }
2168
2169 /* Buffers. */
2170 if (peer->ibuf) {
2171 stream_fifo_free(peer->ibuf);
2172 peer->ibuf = NULL;
2173 }
2174
2175 if (peer->obuf) {
2176 stream_fifo_free(peer->obuf);
2177 peer->obuf = NULL;
2178 }
2179
2180 if (peer->ibuf_work) {
2181 ringbuf_del(peer->ibuf_work);
2182 peer->ibuf_work = NULL;
2183 }
2184
2185 if (peer->obuf_work) {
2186 stream_free(peer->obuf_work);
2187 peer->obuf_work = NULL;
2188 }
2189
2190 if (peer->scratch) {
2191 stream_free(peer->scratch);
2192 peer->scratch = NULL;
2193 }
2194
2195 /* Local and remote addresses. */
2196 if (peer->su_local) {
2197 sockunion_free(peer->su_local);
2198 peer->su_local = NULL;
2199 }
2200
2201 if (peer->su_remote) {
2202 sockunion_free(peer->su_remote);
2203 peer->su_remote = NULL;
2204 }
2205
2206 /* Free filter related memory. */
2207 FOREACH_AFI_SAFI (afi, safi) {
2208 filter = &peer->filter[afi][safi];
2209
2210 for (i = FILTER_IN; i < FILTER_MAX; i++) {
2211 if (filter->dlist[i].name) {
2212 XFREE(MTYPE_BGP_FILTER_NAME,
2213 filter->dlist[i].name);
2214 filter->dlist[i].name = NULL;
2215 }
2216
2217 if (filter->plist[i].name) {
2218 XFREE(MTYPE_BGP_FILTER_NAME,
2219 filter->plist[i].name);
2220 filter->plist[i].name = NULL;
2221 }
2222
2223 if (filter->aslist[i].name) {
2224 XFREE(MTYPE_BGP_FILTER_NAME,
2225 filter->aslist[i].name);
2226 filter->aslist[i].name = NULL;
2227 }
2228 }
2229
2230 for (i = RMAP_IN; i < RMAP_MAX; i++) {
2231 if (filter->map[i].name) {
2232 XFREE(MTYPE_BGP_FILTER_NAME,
2233 filter->map[i].name);
2234 filter->map[i].name = NULL;
2235 }
2236 }
2237
2238 if (filter->usmap.name) {
2239 XFREE(MTYPE_BGP_FILTER_NAME, filter->usmap.name);
2240 filter->usmap.name = NULL;
2241 }
2242
2243 if (peer->default_rmap[afi][safi].name) {
2244 XFREE(MTYPE_ROUTE_MAP_NAME,
2245 peer->default_rmap[afi][safi].name);
2246 peer->default_rmap[afi][safi].name = NULL;
2247 }
2248 }
2249
2250 FOREACH_AFI_SAFI (afi, safi)
2251 peer_af_delete(peer, afi, safi);
2252
2253 if (peer->hostname) {
2254 XFREE(MTYPE_BGP_PEER_HOST, peer->hostname);
2255 peer->hostname = NULL;
2256 }
2257
2258 if (peer->domainname) {
2259 XFREE(MTYPE_BGP_PEER_HOST, peer->domainname);
2260 peer->domainname = NULL;
2261 }
2262
2263 peer_unlock(peer); /* initial reference */
2264
2265 return 0;
2266 }
2267
2268 static int peer_group_cmp(struct peer_group *g1, struct peer_group *g2)
2269 {
2270 return strcmp(g1->name, g2->name);
2271 }
2272
2273 /* Peer group cofiguration. */
2274 static struct peer_group *peer_group_new(void)
2275 {
2276 return (struct peer_group *)XCALLOC(MTYPE_PEER_GROUP,
2277 sizeof(struct peer_group));
2278 }
2279
2280 static void peer_group_free(struct peer_group *group)
2281 {
2282 XFREE(MTYPE_PEER_GROUP, group);
2283 }
2284
2285 struct peer_group *peer_group_lookup(struct bgp *bgp, const char *name)
2286 {
2287 struct peer_group *group;
2288 struct listnode *node, *nnode;
2289
2290 for (ALL_LIST_ELEMENTS(bgp->group, node, nnode, group)) {
2291 if (strcmp(group->name, name) == 0)
2292 return group;
2293 }
2294 return NULL;
2295 }
2296
2297 struct peer_group *peer_group_get(struct bgp *bgp, const char *name)
2298 {
2299 struct peer_group *group;
2300 afi_t afi;
2301
2302 group = peer_group_lookup(bgp, name);
2303 if (group)
2304 return group;
2305
2306 group = peer_group_new();
2307 group->bgp = bgp;
2308 if (group->name)
2309 XFREE(MTYPE_PEER_GROUP_HOST, group->name);
2310 group->name = XSTRDUP(MTYPE_PEER_GROUP_HOST, name);
2311 group->peer = list_new();
2312 for (afi = AFI_IP; afi < AFI_MAX; afi++)
2313 group->listen_range[afi] = list_new();
2314 group->conf = peer_new(bgp);
2315 if (!bgp_flag_check(bgp, BGP_FLAG_NO_DEFAULT_IPV4))
2316 group->conf->afc[AFI_IP][SAFI_UNICAST] = 1;
2317 if (group->conf->host)
2318 XFREE(MTYPE_BGP_PEER_HOST, group->conf->host);
2319 group->conf->host = XSTRDUP(MTYPE_BGP_PEER_HOST, name);
2320 group->conf->group = group;
2321 group->conf->as = 0;
2322 group->conf->ttl = 1;
2323 group->conf->gtsm_hops = 0;
2324 group->conf->v_routeadv = BGP_DEFAULT_EBGP_ROUTEADV;
2325 SET_FLAG(group->conf->sflags, PEER_STATUS_GROUP);
2326 listnode_add_sort(bgp->group, group);
2327
2328 return group;
2329 }
2330
2331 static void peer_group2peer_config_copy(struct peer_group *group,
2332 struct peer *peer)
2333 {
2334 uint32_t flags_tmp;
2335 struct peer *conf;
2336
2337 conf = group->conf;
2338
2339 /* remote-as */
2340 if (conf->as)
2341 peer->as = conf->as;
2342
2343 /* local-as */
2344 if (!CHECK_FLAG(peer->flags_override, PEER_FLAG_LOCAL_AS))
2345 peer->change_local_as = conf->change_local_as;
2346
2347 /* TTL */
2348 peer->ttl = conf->ttl;
2349
2350 /* GTSM hops */
2351 peer->gtsm_hops = conf->gtsm_hops;
2352
2353 /* peer flags apply */
2354 flags_tmp = conf->flags & ~peer->flags_override;
2355 flags_tmp ^= conf->flags_invert ^ peer->flags_invert;
2356 flags_tmp &= ~peer->flags_override;
2357
2358 UNSET_FLAG(peer->flags, ~peer->flags_override);
2359 SET_FLAG(peer->flags, flags_tmp);
2360 SET_FLAG(peer->flags_invert, conf->flags_invert);
2361
2362 /* peer timers apply */
2363 if (!CHECK_FLAG(peer->flags_override, PEER_FLAG_TIMER)) {
2364 PEER_ATTR_INHERIT(peer, group, holdtime);
2365 PEER_ATTR_INHERIT(peer, group, keepalive);
2366 }
2367
2368 if (!CHECK_FLAG(peer->flags_override, PEER_FLAG_TIMER_CONNECT)) {
2369 PEER_ATTR_INHERIT(peer, group, connect);
2370 if (CHECK_FLAG(conf->flags, PEER_FLAG_TIMER_CONNECT))
2371 peer->v_connect = conf->connect;
2372 else
2373 peer->v_connect = BGP_DEFAULT_CONNECT_RETRY;
2374 }
2375
2376 /* advertisement-interval apply */
2377 if (!CHECK_FLAG(peer->flags_override, PEER_FLAG_ROUTEADV)) {
2378 PEER_ATTR_INHERIT(peer, group, routeadv);
2379 if (CHECK_FLAG(conf->flags, PEER_FLAG_ROUTEADV))
2380 peer->v_routeadv = conf->routeadv;
2381 else
2382 peer->v_routeadv = (peer_sort(peer) == BGP_PEER_IBGP)
2383 ? BGP_DEFAULT_IBGP_ROUTEADV
2384 : BGP_DEFAULT_EBGP_ROUTEADV;
2385 }
2386
2387 /* password apply */
2388 if (!CHECK_FLAG(peer->flags_override, PEER_FLAG_PASSWORD))
2389 PEER_STR_ATTR_INHERIT(peer, group, password,
2390 MTYPE_PEER_PASSWORD);
2391
2392 if (!BGP_PEER_SU_UNSPEC(peer))
2393 bgp_md5_set(peer);
2394
2395 /* update-source apply */
2396 if (!CHECK_FLAG(peer->flags_override, PEER_FLAG_UPDATE_SOURCE)) {
2397 if (conf->update_source) {
2398 XFREE(MTYPE_PEER_UPDATE_SOURCE, peer->update_if);
2399 PEER_SU_ATTR_INHERIT(peer, group, update_source);
2400 } else if (conf->update_if) {
2401 sockunion_free(peer->update_source);
2402 PEER_STR_ATTR_INHERIT(peer, group, update_if,
2403 MTYPE_PEER_UPDATE_SOURCE);
2404 }
2405 }
2406
2407 bgp_bfd_peer_group2peer_copy(conf, peer);
2408 }
2409
2410 /* Peer group's remote AS configuration. */
2411 int peer_group_remote_as(struct bgp *bgp, const char *group_name, as_t *as,
2412 int as_type)
2413 {
2414 struct peer_group *group;
2415 struct peer *peer;
2416 struct listnode *node, *nnode;
2417
2418 group = peer_group_lookup(bgp, group_name);
2419 if (!group)
2420 return -1;
2421
2422 if ((as_type == group->conf->as_type) && (group->conf->as == *as))
2423 return 0;
2424
2425
2426 /* When we setup peer-group AS number all peer group member's AS
2427 number must be updated to same number. */
2428 peer_as_change(group->conf, *as, as_type);
2429
2430 for (ALL_LIST_ELEMENTS(group->peer, node, nnode, peer)) {
2431 if (((peer->as_type == AS_SPECIFIED) && peer->as != *as)
2432 || (peer->as_type != as_type))
2433 peer_as_change(peer, *as, as_type);
2434 }
2435
2436 return 0;
2437 }
2438
2439 int peer_group_delete(struct peer_group *group)
2440 {
2441 struct bgp *bgp;
2442 struct peer *peer;
2443 struct prefix *prefix;
2444 struct peer *other;
2445 struct listnode *node, *nnode;
2446 afi_t afi;
2447
2448 bgp = group->bgp;
2449
2450 for (ALL_LIST_ELEMENTS(group->peer, node, nnode, peer)) {
2451 other = peer->doppelganger;
2452 peer_delete(peer);
2453 if (other && other->status != Deleted) {
2454 other->group = NULL;
2455 peer_delete(other);
2456 }
2457 }
2458 list_delete(&group->peer);
2459
2460 for (afi = AFI_IP; afi < AFI_MAX; afi++) {
2461 for (ALL_LIST_ELEMENTS(group->listen_range[afi], node, nnode,
2462 prefix)) {
2463 prefix_free(prefix);
2464 }
2465 list_delete(&group->listen_range[afi]);
2466 }
2467
2468 XFREE(MTYPE_PEER_GROUP_HOST, group->name);
2469 group->name = NULL;
2470
2471 bfd_info_free(&(group->conf->bfd_info));
2472
2473 group->conf->group = NULL;
2474 peer_delete(group->conf);
2475
2476 /* Delete from all peer_group list. */
2477 listnode_delete(bgp->group, group);
2478
2479 peer_group_free(group);
2480
2481 return 0;
2482 }
2483
2484 int peer_group_remote_as_delete(struct peer_group *group)
2485 {
2486 struct peer *peer, *other;
2487 struct listnode *node, *nnode;
2488
2489 if ((group->conf->as_type == AS_UNSPECIFIED)
2490 || ((!group->conf->as) && (group->conf->as_type == AS_SPECIFIED)))
2491 return 0;
2492
2493 for (ALL_LIST_ELEMENTS(group->peer, node, nnode, peer)) {
2494 other = peer->doppelganger;
2495
2496 peer_delete(peer);
2497
2498 if (other && other->status != Deleted) {
2499 other->group = NULL;
2500 peer_delete(other);
2501 }
2502 }
2503 list_delete_all_node(group->peer);
2504
2505 group->conf->as = 0;
2506 group->conf->as_type = AS_UNSPECIFIED;
2507
2508 return 0;
2509 }
2510
2511 int peer_group_listen_range_add(struct peer_group *group, struct prefix *range)
2512 {
2513 struct prefix *prefix;
2514 struct listnode *node, *nnode;
2515 afi_t afi;
2516
2517 afi = family2afi(range->family);
2518
2519 /* Group needs remote AS configured. */
2520 if (group->conf->as_type == AS_UNSPECIFIED)
2521 return BGP_ERR_PEER_GROUP_NO_REMOTE_AS;
2522
2523 /* Ensure no duplicates. Currently we don't care about overlaps. */
2524 for (ALL_LIST_ELEMENTS(group->listen_range[afi], node, nnode, prefix)) {
2525 if (prefix_same(range, prefix))
2526 return 0;
2527 }
2528
2529 prefix = prefix_new();
2530 prefix_copy(prefix, range);
2531 listnode_add(group->listen_range[afi], prefix);
2532 return 0;
2533 }
2534
2535 int peer_group_listen_range_del(struct peer_group *group, struct prefix *range)
2536 {
2537 struct prefix *prefix, prefix2;
2538 struct listnode *node, *nnode;
2539 struct peer *peer;
2540 afi_t afi;
2541 char buf[PREFIX2STR_BUFFER];
2542
2543 afi = family2afi(range->family);
2544
2545 /* Identify the listen range. */
2546 for (ALL_LIST_ELEMENTS(group->listen_range[afi], node, nnode, prefix)) {
2547 if (prefix_same(range, prefix))
2548 break;
2549 }
2550
2551 if (!prefix)
2552 return BGP_ERR_DYNAMIC_NEIGHBORS_RANGE_NOT_FOUND;
2553
2554 prefix2str(prefix, buf, sizeof(buf));
2555
2556 /* Dispose off any dynamic neighbors that exist due to this listen range
2557 */
2558 for (ALL_LIST_ELEMENTS(group->peer, node, nnode, peer)) {
2559 if (!peer_dynamic_neighbor(peer))
2560 continue;
2561
2562 sockunion2hostprefix(&peer->su, &prefix2);
2563 if (prefix_match(prefix, &prefix2)) {
2564 if (bgp_debug_neighbor_events(peer))
2565 zlog_debug(
2566 "Deleting dynamic neighbor %s group %s upon "
2567 "delete of listen range %s",
2568 peer->host, group->name, buf);
2569 peer_delete(peer);
2570 }
2571 }
2572
2573 /* Get rid of the listen range */
2574 listnode_delete(group->listen_range[afi], prefix);
2575
2576 return 0;
2577 }
2578
2579 /* Bind specified peer to peer group. */
2580 int peer_group_bind(struct bgp *bgp, union sockunion *su, struct peer *peer,
2581 struct peer_group *group, as_t *as)
2582 {
2583 int first_member = 0;
2584 afi_t afi;
2585 safi_t safi;
2586
2587 /* Lookup the peer. */
2588 if (!peer)
2589 peer = peer_lookup(bgp, su);
2590
2591 /* The peer exist, bind it to the peer-group */
2592 if (peer) {
2593 /* When the peer already belongs to a peer-group, check the
2594 * consistency. */
2595 if (peer_group_active(peer)) {
2596
2597 /* The peer is already bound to the peer-group,
2598 * nothing to do
2599 */
2600 if (strcmp(peer->group->name, group->name) == 0)
2601 return 0;
2602 else
2603 return BGP_ERR_PEER_GROUP_CANT_CHANGE;
2604 }
2605
2606 /* The peer has not specified a remote-as, inherit it from the
2607 * peer-group */
2608 if (peer->as_type == AS_UNSPECIFIED) {
2609 peer->as_type = group->conf->as_type;
2610 peer->as = group->conf->as;
2611 }
2612
2613 if (!group->conf->as) {
2614 if (peer_sort(group->conf) != BGP_PEER_INTERNAL
2615 && peer_sort(group->conf) != peer_sort(peer)) {
2616 if (as)
2617 *as = peer->as;
2618 return BGP_ERR_PEER_GROUP_PEER_TYPE_DIFFERENT;
2619 }
2620
2621 if (peer_sort(group->conf) == BGP_PEER_INTERNAL)
2622 first_member = 1;
2623 }
2624
2625 peer_group2peer_config_copy(group, peer);
2626
2627 FOREACH_AFI_SAFI (afi, safi) {
2628 if (group->conf->afc[afi][safi]) {
2629 peer->afc[afi][safi] = 1;
2630
2631 if (peer_af_find(peer, afi, safi)
2632 || peer_af_create(peer, afi, safi)) {
2633 peer_group2peer_config_copy_af(
2634 group, peer, afi, safi);
2635 }
2636 } else if (peer->afc[afi][safi])
2637 peer_deactivate(peer, afi, safi);
2638 }
2639
2640 if (peer->group) {
2641 assert(group && peer->group == group);
2642 } else {
2643 listnode_delete(bgp->peer, peer);
2644
2645 peer->group = group;
2646 listnode_add_sort(bgp->peer, peer);
2647
2648 peer = peer_lock(peer); /* group->peer list reference */
2649 listnode_add(group->peer, peer);
2650 }
2651
2652 if (first_member) {
2653 /* Advertisement-interval reset */
2654 if (!CHECK_FLAG(group->conf->flags,
2655 PEER_FLAG_ROUTEADV)) {
2656 group->conf->v_routeadv =
2657 (peer_sort(group->conf)
2658 == BGP_PEER_IBGP)
2659 ? BGP_DEFAULT_IBGP_ROUTEADV
2660 : BGP_DEFAULT_EBGP_ROUTEADV;
2661 }
2662
2663 /* ebgp-multihop reset */
2664 if (peer_sort(group->conf) == BGP_PEER_IBGP)
2665 group->conf->ttl = MAXTTL;
2666
2667 /* local-as reset */
2668 if (peer_sort(group->conf) != BGP_PEER_EBGP) {
2669 group->conf->change_local_as = 0;
2670 peer_flag_unset(group->conf,
2671 PEER_FLAG_LOCAL_AS);
2672 peer_flag_unset(group->conf,
2673 PEER_FLAG_LOCAL_AS_NO_PREPEND);
2674 peer_flag_unset(group->conf,
2675 PEER_FLAG_LOCAL_AS_REPLACE_AS);
2676 }
2677 }
2678
2679 SET_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE);
2680
2681 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
2682 peer->last_reset = PEER_DOWN_RMAP_BIND;
2683 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
2684 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
2685 } else {
2686 bgp_session_reset(peer);
2687 }
2688 }
2689
2690 /* Create a new peer. */
2691 else {
2692 if ((group->conf->as_type == AS_SPECIFIED)
2693 && (!group->conf->as)) {
2694 return BGP_ERR_PEER_GROUP_NO_REMOTE_AS;
2695 }
2696
2697 peer = peer_create(su, NULL, bgp, bgp->as, group->conf->as,
2698 group->conf->as_type, 0, 0, group);
2699
2700 peer = peer_lock(peer); /* group->peer list reference */
2701 listnode_add(group->peer, peer);
2702
2703 peer_group2peer_config_copy(group, peer);
2704
2705 /* If the peer-group is active for this afi/safi then activate
2706 * for this peer */
2707 FOREACH_AFI_SAFI (afi, safi) {
2708 if (group->conf->afc[afi][safi]) {
2709 peer->afc[afi][safi] = 1;
2710 peer_af_create(peer, afi, safi);
2711 peer_group2peer_config_copy_af(group, peer, afi,
2712 safi);
2713 } else if (peer->afc[afi][safi])
2714 peer_deactivate(peer, afi, safi);
2715 }
2716
2717 SET_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE);
2718
2719 /* Set up peer's events and timers. */
2720 if (peer_active(peer))
2721 bgp_timer_set(peer);
2722 }
2723
2724 return 0;
2725 }
2726
2727 static int bgp_startup_timer_expire(struct thread *thread)
2728 {
2729 struct bgp *bgp;
2730
2731 bgp = THREAD_ARG(thread);
2732 bgp->t_startup = NULL;
2733
2734 return 0;
2735 }
2736
2737 /*
2738 * On shutdown we call the cleanup function which
2739 * does a free of the link list nodes, free up
2740 * the data we are pointing at too.
2741 */
2742 static void bgp_vrf_string_name_delete(void *data)
2743 {
2744 char *vname = data;
2745
2746 XFREE(MTYPE_TMP, vname);
2747 }
2748
2749 /* BGP instance creation by `router bgp' commands. */
2750 static struct bgp *bgp_create(as_t *as, const char *name,
2751 enum bgp_instance_type inst_type)
2752 {
2753 struct bgp *bgp;
2754 afi_t afi;
2755 safi_t safi;
2756
2757 if ((bgp = XCALLOC(MTYPE_BGP, sizeof(struct bgp))) == NULL)
2758 return NULL;
2759
2760 if (BGP_DEBUG(zebra, ZEBRA)) {
2761 if (inst_type == BGP_INSTANCE_TYPE_DEFAULT)
2762 zlog_debug("Creating Default VRF, AS %u", *as);
2763 else
2764 zlog_debug("Creating %s %s, AS %u",
2765 (inst_type == BGP_INSTANCE_TYPE_VRF)
2766 ? "VRF"
2767 : "VIEW",
2768 name, *as);
2769 }
2770
2771 bgp_lock(bgp);
2772 bgp->heuristic_coalesce = true;
2773 bgp->inst_type = inst_type;
2774 bgp->vrf_id = (inst_type == BGP_INSTANCE_TYPE_DEFAULT) ? VRF_DEFAULT
2775 : VRF_UNKNOWN;
2776 bgp->peer_self = peer_new(bgp);
2777 if (bgp->peer_self->host)
2778 XFREE(MTYPE_BGP_PEER_HOST, bgp->peer_self->host);
2779 bgp->peer_self->host =
2780 XSTRDUP(MTYPE_BGP_PEER_HOST, "Static announcement");
2781 if (bgp->peer_self->hostname != NULL) {
2782 XFREE(MTYPE_BGP_PEER_HOST, bgp->peer_self->hostname);
2783 bgp->peer_self->hostname = NULL;
2784 }
2785 if (cmd_hostname_get())
2786 bgp->peer_self->hostname =
2787 XSTRDUP(MTYPE_BGP_PEER_HOST, cmd_hostname_get());
2788
2789 if (bgp->peer_self->domainname != NULL) {
2790 XFREE(MTYPE_BGP_PEER_HOST, bgp->peer_self->domainname);
2791 bgp->peer_self->domainname = NULL;
2792 }
2793 if (cmd_domainname_get())
2794 bgp->peer_self->domainname =
2795 XSTRDUP(MTYPE_BGP_PEER_HOST, cmd_domainname_get());
2796 bgp->peer = list_new();
2797 bgp->peer->cmp = (int (*)(void *, void *))peer_cmp;
2798 bgp->peerhash = hash_create(peer_hash_key_make, peer_hash_same,
2799 "BGP Peer Hash");
2800 bgp->peerhash->max_size = BGP_PEER_MAX_HASH_SIZE;
2801
2802 bgp->group = list_new();
2803 bgp->group->cmp = (int (*)(void *, void *))peer_group_cmp;
2804
2805 FOREACH_AFI_SAFI (afi, safi) {
2806 bgp->route[afi][safi] = bgp_table_init(bgp, afi, safi);
2807 bgp->aggregate[afi][safi] = bgp_table_init(bgp, afi, safi);
2808 bgp->rib[afi][safi] = bgp_table_init(bgp, afi, safi);
2809
2810 /* Enable maximum-paths */
2811 bgp_maximum_paths_set(bgp, afi, safi, BGP_PEER_EBGP,
2812 multipath_num, 0);
2813 bgp_maximum_paths_set(bgp, afi, safi, BGP_PEER_IBGP,
2814 multipath_num, 0);
2815 }
2816
2817 bgp->v_update_delay = BGP_UPDATE_DELAY_DEF;
2818 bgp->default_local_pref = BGP_DEFAULT_LOCAL_PREF;
2819 bgp->default_subgroup_pkt_queue_max =
2820 BGP_DEFAULT_SUBGROUP_PKT_QUEUE_MAX;
2821 bgp->default_holdtime = BGP_DEFAULT_HOLDTIME;
2822 bgp->default_keepalive = BGP_DEFAULT_KEEPALIVE;
2823 bgp->restart_time = BGP_DEFAULT_RESTART_TIME;
2824 bgp->stalepath_time = BGP_DEFAULT_STALEPATH_TIME;
2825 bgp->dynamic_neighbors_limit = BGP_DYNAMIC_NEIGHBORS_LIMIT_DEFAULT;
2826 bgp->dynamic_neighbors_count = 0;
2827 #if DFLT_BGP_IMPORT_CHECK
2828 bgp_flag_set(bgp, BGP_FLAG_IMPORT_CHECK);
2829 #endif
2830 #if DFLT_BGP_SHOW_HOSTNAME
2831 bgp_flag_set(bgp, BGP_FLAG_SHOW_HOSTNAME);
2832 #endif
2833 #if DFLT_BGP_LOG_NEIGHBOR_CHANGES
2834 bgp_flag_set(bgp, BGP_FLAG_LOG_NEIGHBOR_CHANGES);
2835 #endif
2836 #if DFLT_BGP_DETERMINISTIC_MED
2837 bgp_flag_set(bgp, BGP_FLAG_DETERMINISTIC_MED);
2838 #endif
2839 bgp->addpath_tx_id = BGP_ADDPATH_TX_ID_FOR_DEFAULT_ORIGINATE;
2840
2841 bgp->as = *as;
2842
2843 #if ENABLE_BGP_VNC
2844 if (inst_type != BGP_INSTANCE_TYPE_VRF) {
2845 bgp->rfapi = bgp_rfapi_new(bgp);
2846 assert(bgp->rfapi);
2847 assert(bgp->rfapi_cfg);
2848 }
2849 #endif /* ENABLE_BGP_VNC */
2850
2851 for (afi = AFI_IP; afi < AFI_MAX; afi++) {
2852 bgp->vpn_policy[afi].bgp = bgp;
2853 bgp->vpn_policy[afi].afi = afi;
2854 bgp->vpn_policy[afi].tovpn_label = MPLS_LABEL_NONE;
2855 bgp->vpn_policy[afi].tovpn_zebra_vrf_label_last_sent =
2856 MPLS_LABEL_NONE;
2857
2858 bgp->vpn_policy[afi].import_vrf = list_new();
2859 bgp->vpn_policy[afi].import_vrf->del =
2860 bgp_vrf_string_name_delete;
2861 bgp->vpn_policy[afi].export_vrf = list_new();
2862 bgp->vpn_policy[afi].export_vrf->del =
2863 bgp_vrf_string_name_delete;
2864 }
2865 if (name) {
2866 bgp->name = XSTRDUP(MTYPE_BGP, name);
2867 } else {
2868 /* TODO - The startup timer needs to be run for the whole of BGP
2869 */
2870 thread_add_timer(bm->master, bgp_startup_timer_expire, bgp,
2871 bgp->restart_time, &bgp->t_startup);
2872 }
2873
2874 /* printable name we can use in debug messages */
2875 if (inst_type == BGP_INSTANCE_TYPE_DEFAULT) {
2876 bgp->name_pretty = XSTRDUP(MTYPE_BGP, "VRF default");
2877 } else {
2878 const char *n;
2879 int len;
2880
2881 if (bgp->name)
2882 n = bgp->name;
2883 else
2884 n = "?";
2885
2886 len = 4 + 1 + strlen(n) + 1; /* "view foo\0" */
2887
2888 bgp->name_pretty = XCALLOC(MTYPE_BGP, len);
2889 snprintf(bgp->name_pretty, len, "%s %s",
2890 (bgp->inst_type == BGP_INSTANCE_TYPE_VRF)
2891 ? "VRF"
2892 : "VIEW",
2893 n);
2894 }
2895
2896 atomic_store_explicit(&bgp->wpkt_quanta, BGP_WRITE_PACKET_MAX,
2897 memory_order_relaxed);
2898 atomic_store_explicit(&bgp->rpkt_quanta, BGP_READ_PACKET_MAX,
2899 memory_order_relaxed);
2900 bgp->coalesce_time = BGP_DEFAULT_SUBGROUP_COALESCE_TIME;
2901
2902 QOBJ_REG(bgp, bgp);
2903
2904 update_bgp_group_init(bgp);
2905
2906 /* assign a unique rd id for auto derivation of vrf's RD */
2907 bf_assign_index(bm->rd_idspace, bgp->vrf_rd_id);
2908
2909 bgp_evpn_init(bgp);
2910 bgp_pbr_init(bgp);
2911 return bgp;
2912 }
2913
2914 /* Return the "default VRF" instance of BGP. */
2915 struct bgp *bgp_get_default(void)
2916 {
2917 struct bgp *bgp;
2918 struct listnode *node, *nnode;
2919
2920 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp))
2921 if (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
2922 return bgp;
2923 return NULL;
2924 }
2925
2926 /* Lookup BGP entry. */
2927 struct bgp *bgp_lookup(as_t as, const char *name)
2928 {
2929 struct bgp *bgp;
2930 struct listnode *node, *nnode;
2931
2932 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp))
2933 if (bgp->as == as
2934 && ((bgp->name == NULL && name == NULL)
2935 || (bgp->name && name && strcmp(bgp->name, name) == 0)))
2936 return bgp;
2937 return NULL;
2938 }
2939
2940 /* Lookup BGP structure by view name. */
2941 struct bgp *bgp_lookup_by_name(const char *name)
2942 {
2943 struct bgp *bgp;
2944 struct listnode *node, *nnode;
2945
2946 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp))
2947 if ((bgp->name == NULL && name == NULL)
2948 || (bgp->name && name && strcmp(bgp->name, name) == 0))
2949 return bgp;
2950 return NULL;
2951 }
2952
2953 /* Lookup BGP instance based on VRF id. */
2954 /* Note: Only to be used for incoming messages from Zebra. */
2955 struct bgp *bgp_lookup_by_vrf_id(vrf_id_t vrf_id)
2956 {
2957 struct vrf *vrf;
2958
2959 /* Lookup VRF (in tree) and follow link. */
2960 vrf = vrf_lookup_by_id(vrf_id);
2961 if (!vrf)
2962 return NULL;
2963 return (vrf->info) ? (struct bgp *)vrf->info : NULL;
2964 }
2965
2966 /* handle socket creation or deletion, if necessary
2967 * this is called for all new BGP instances
2968 */
2969 int bgp_handle_socket(struct bgp *bgp, struct vrf *vrf, vrf_id_t old_vrf_id,
2970 bool create)
2971 {
2972 int ret = 0;
2973
2974 /* Create BGP server socket, if listen mode not disabled */
2975 if (!bgp || bgp_option_check(BGP_OPT_NO_LISTEN))
2976 return 0;
2977 if (bgp->inst_type == BGP_INSTANCE_TYPE_VRF) {
2978 /*
2979 * suppress vrf socket
2980 */
2981 if (create == FALSE) {
2982 bgp_close_vrf_socket(bgp);
2983 return 0;
2984 }
2985 if (vrf == NULL)
2986 return BGP_ERR_INVALID_VALUE;
2987 /* do nothing
2988 * if vrf_id did not change
2989 */
2990 if (vrf->vrf_id == old_vrf_id)
2991 return 0;
2992 if (old_vrf_id != VRF_UNKNOWN) {
2993 /* look for old socket. close it. */
2994 bgp_close_vrf_socket(bgp);
2995 }
2996 /* if backend is not yet identified ( VRF_UNKNOWN) then
2997 * creation will be done later
2998 */
2999 if (vrf->vrf_id == VRF_UNKNOWN)
3000 return 0;
3001 ret = bgp_socket(bgp, bm->port, bm->address);
3002 if (ret < 0)
3003 return BGP_ERR_INVALID_VALUE;
3004 return 0;
3005 } else
3006 return bgp_check_main_socket(create, bgp);
3007 }
3008
3009 /* Called from VTY commands. */
3010 int bgp_get(struct bgp **bgp_val, as_t *as, const char *name,
3011 enum bgp_instance_type inst_type)
3012 {
3013 struct bgp *bgp;
3014 struct vrf *vrf = NULL;
3015
3016 /* Multiple instance check. */
3017 if (bgp_option_check(BGP_OPT_MULTIPLE_INSTANCE)) {
3018 if (name)
3019 bgp = bgp_lookup_by_name(name);
3020 else
3021 bgp = bgp_get_default();
3022
3023 /* Already exists. */
3024 if (bgp) {
3025 if (bgp->as != *as) {
3026 *as = bgp->as;
3027 return BGP_ERR_INSTANCE_MISMATCH;
3028 }
3029 if (bgp->inst_type != inst_type)
3030 return BGP_ERR_INSTANCE_MISMATCH;
3031 *bgp_val = bgp;
3032 return 0;
3033 }
3034 } else {
3035 /* BGP instance name can not be specified for single instance.
3036 */
3037 if (name)
3038 return BGP_ERR_MULTIPLE_INSTANCE_NOT_SET;
3039
3040 /* Get default BGP structure if exists. */
3041 bgp = bgp_get_default();
3042
3043 if (bgp) {
3044 if (bgp->as != *as) {
3045 *as = bgp->as;
3046 return BGP_ERR_AS_MISMATCH;
3047 }
3048 *bgp_val = bgp;
3049 return 0;
3050 }
3051 }
3052
3053 bgp = bgp_create(as, name, inst_type);
3054 bgp_router_id_set(bgp, &bgp->router_id_zebra);
3055 bgp_address_init(bgp);
3056 bgp_tip_hash_init(bgp);
3057 bgp_scan_init(bgp);
3058 *bgp_val = bgp;
3059
3060 bgp->t_rmap_def_originate_eval = NULL;
3061
3062 /* If Default instance or VRF, link to the VRF structure, if present. */
3063 if (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT
3064 || bgp->inst_type == BGP_INSTANCE_TYPE_VRF) {
3065 vrf = bgp_vrf_lookup_by_instance_type(bgp);
3066 if (vrf)
3067 bgp_vrf_link(bgp, vrf);
3068 }
3069 /* BGP server socket already processed if BGP instance
3070 * already part of the list
3071 */
3072 bgp_handle_socket(bgp, vrf, VRF_UNKNOWN, true);
3073 listnode_add(bm->bgp, bgp);
3074
3075 if (IS_BGP_INST_KNOWN_TO_ZEBRA(bgp))
3076 bgp_zebra_instance_register(bgp);
3077
3078
3079 return 0;
3080 }
3081
3082 /*
3083 * Make BGP instance "up". Applies only to VRFs (non-default) and
3084 * implies the VRF has been learnt from Zebra.
3085 */
3086 void bgp_instance_up(struct bgp *bgp)
3087 {
3088 struct peer *peer;
3089 struct listnode *node, *next;
3090
3091 /* Register with zebra. */
3092 bgp_zebra_instance_register(bgp);
3093
3094 /* Kick off any peers that may have been configured. */
3095 for (ALL_LIST_ELEMENTS(bgp->peer, node, next, peer)) {
3096 if (!BGP_PEER_START_SUPPRESSED(peer))
3097 BGP_EVENT_ADD(peer, BGP_Start);
3098 }
3099
3100 /* Process any networks that have been configured. */
3101 bgp_static_add(bgp);
3102 }
3103
3104 /*
3105 * Make BGP instance "down". Applies only to VRFs (non-default) and
3106 * implies the VRF has been deleted by Zebra.
3107 */
3108 void bgp_instance_down(struct bgp *bgp)
3109 {
3110 struct peer *peer;
3111 struct listnode *node;
3112 struct listnode *next;
3113
3114 /* Stop timers. */
3115 if (bgp->t_rmap_def_originate_eval) {
3116 BGP_TIMER_OFF(bgp->t_rmap_def_originate_eval);
3117 bgp_unlock(bgp); /* TODO - This timer is started with a lock -
3118 why? */
3119 }
3120
3121 /* Bring down peers, so corresponding routes are purged. */
3122 for (ALL_LIST_ELEMENTS(bgp->peer, node, next, peer)) {
3123 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status))
3124 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
3125 BGP_NOTIFY_CEASE_ADMIN_SHUTDOWN);
3126 else
3127 bgp_session_reset(peer);
3128 }
3129
3130 /* Purge network and redistributed routes. */
3131 bgp_purge_static_redist_routes(bgp);
3132
3133 /* Cleanup registered nexthops (flags) */
3134 bgp_cleanup_nexthops(bgp);
3135 }
3136
3137 /* Delete BGP instance. */
3138 int bgp_delete(struct bgp *bgp)
3139 {
3140 struct peer *peer;
3141 struct peer_group *group;
3142 struct listnode *node, *next;
3143 struct vrf *vrf;
3144 afi_t afi;
3145 int i;
3146
3147 assert(bgp);
3148 THREAD_OFF(bgp->t_startup);
3149 THREAD_OFF(bgp->t_maxmed_onstartup);
3150 THREAD_OFF(bgp->t_update_delay);
3151 THREAD_OFF(bgp->t_establish_wait);
3152
3153 if (BGP_DEBUG(zebra, ZEBRA)) {
3154 if (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT)
3155 zlog_debug("Deleting Default VRF");
3156 else
3157 zlog_debug("Deleting %s %s",
3158 (bgp->inst_type == BGP_INSTANCE_TYPE_VRF)
3159 ? "VRF"
3160 : "VIEW",
3161 bgp->name);
3162 }
3163
3164 /* unmap from RT list */
3165 bgp_evpn_vrf_delete(bgp);
3166
3167 /* Stop timers. */
3168 if (bgp->t_rmap_def_originate_eval) {
3169 BGP_TIMER_OFF(bgp->t_rmap_def_originate_eval);
3170 bgp_unlock(bgp); /* TODO - This timer is started with a lock -
3171 why? */
3172 }
3173
3174 /* Inform peers we're going down. */
3175 for (ALL_LIST_ELEMENTS(bgp->peer, node, next, peer)) {
3176 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status))
3177 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
3178 BGP_NOTIFY_CEASE_ADMIN_SHUTDOWN);
3179 }
3180
3181 /* Delete static routes (networks). */
3182 bgp_static_delete(bgp);
3183
3184 /* Unset redistribution. */
3185 for (afi = AFI_IP; afi < AFI_MAX; afi++)
3186 for (i = 0; i < ZEBRA_ROUTE_MAX; i++)
3187 if (i != ZEBRA_ROUTE_BGP)
3188 bgp_redistribute_unset(bgp, afi, i, 0);
3189
3190 /* Free peers and peer-groups. */
3191 for (ALL_LIST_ELEMENTS(bgp->group, node, next, group))
3192 peer_group_delete(group);
3193
3194 for (ALL_LIST_ELEMENTS(bgp->peer, node, next, peer))
3195 peer_delete(peer);
3196
3197 if (bgp->peer_self) {
3198 peer_delete(bgp->peer_self);
3199 bgp->peer_self = NULL;
3200 }
3201
3202 update_bgp_group_free(bgp);
3203
3204 /* TODO - Other memory may need to be freed - e.g., NHT */
3205
3206 #if ENABLE_BGP_VNC
3207 rfapi_delete(bgp);
3208 #endif
3209 bgp_cleanup_routes(bgp);
3210
3211 for (afi = 0; afi < AFI_MAX; ++afi) {
3212 if (!bgp->vpn_policy[afi].import_redirect_rtlist)
3213 continue;
3214 ecommunity_free(
3215 &bgp->vpn_policy[afi]
3216 .import_redirect_rtlist);
3217 bgp->vpn_policy[afi].import_redirect_rtlist = NULL;
3218 }
3219
3220 /* Deregister from Zebra, if needed */
3221 if (IS_BGP_INST_KNOWN_TO_ZEBRA(bgp))
3222 bgp_zebra_instance_deregister(bgp);
3223
3224 /* Remove visibility via the master list - there may however still be
3225 * routes to be processed still referencing the struct bgp.
3226 */
3227 listnode_delete(bm->bgp, bgp);
3228
3229 /* Free interfaces in this instance. */
3230 bgp_if_finish(bgp);
3231
3232 vrf = bgp_vrf_lookup_by_instance_type(bgp);
3233 bgp_handle_socket(bgp, vrf, VRF_UNKNOWN, false);
3234 if (vrf)
3235 bgp_vrf_unlink(bgp, vrf);
3236
3237 thread_master_free_unused(bm->master);
3238 bgp_unlock(bgp); /* initial reference */
3239
3240 return 0;
3241 }
3242
3243 void bgp_free(struct bgp *bgp)
3244 {
3245 afi_t afi;
3246 safi_t safi;
3247 struct bgp_table *table;
3248 struct bgp_node *rn;
3249 struct bgp_rmap *rmap;
3250
3251 QOBJ_UNREG(bgp);
3252
3253 list_delete(&bgp->group);
3254 list_delete(&bgp->peer);
3255
3256 if (bgp->peerhash) {
3257 hash_free(bgp->peerhash);
3258 bgp->peerhash = NULL;
3259 }
3260
3261 FOREACH_AFI_SAFI (afi, safi) {
3262 /* Special handling for 2-level routing tables. */
3263 if (safi == SAFI_MPLS_VPN || safi == SAFI_ENCAP
3264 || safi == SAFI_EVPN) {
3265 for (rn = bgp_table_top(bgp->rib[afi][safi]); rn;
3266 rn = bgp_route_next(rn)) {
3267 table = (struct bgp_table *)rn->info;
3268 bgp_table_finish(&table);
3269 }
3270 }
3271 if (bgp->route[afi][safi])
3272 bgp_table_finish(&bgp->route[afi][safi]);
3273 if (bgp->aggregate[afi][safi])
3274 bgp_table_finish(&bgp->aggregate[afi][safi]);
3275 if (bgp->rib[afi][safi])
3276 bgp_table_finish(&bgp->rib[afi][safi]);
3277 rmap = &bgp->table_map[afi][safi];
3278 if (rmap->name)
3279 XFREE(MTYPE_ROUTE_MAP_NAME, rmap->name);
3280 }
3281
3282 bgp_scan_finish(bgp);
3283 bgp_address_destroy(bgp);
3284 bgp_tip_hash_destroy(bgp);
3285
3286 /* release the auto RD id */
3287 bf_release_index(bm->rd_idspace, bgp->vrf_rd_id);
3288
3289 bgp_evpn_cleanup(bgp);
3290 bgp_pbr_cleanup(bgp);
3291
3292 for (afi = AFI_IP; afi < AFI_MAX; afi++) {
3293 vpn_policy_direction_t dir;
3294
3295 if (bgp->vpn_policy[afi].import_vrf)
3296 list_delete(&bgp->vpn_policy[afi].import_vrf);
3297 if (bgp->vpn_policy[afi].export_vrf)
3298 list_delete(&bgp->vpn_policy[afi].export_vrf);
3299
3300 dir = BGP_VPN_POLICY_DIR_FROMVPN;
3301 if (bgp->vpn_policy[afi].rtlist[dir])
3302 ecommunity_free(&bgp->vpn_policy[afi].rtlist[dir]);
3303 dir = BGP_VPN_POLICY_DIR_TOVPN;
3304 if (bgp->vpn_policy[afi].rtlist[dir])
3305 ecommunity_free(&bgp->vpn_policy[afi].rtlist[dir]);
3306 }
3307
3308 if (bgp->name)
3309 XFREE(MTYPE_BGP, bgp->name);
3310 if (bgp->name_pretty)
3311 XFREE(MTYPE_BGP, bgp->name_pretty);
3312
3313 XFREE(MTYPE_BGP, bgp);
3314 }
3315
3316 struct peer *peer_lookup_by_conf_if(struct bgp *bgp, const char *conf_if)
3317 {
3318 struct peer *peer;
3319 struct listnode *node, *nnode;
3320
3321 if (!conf_if)
3322 return NULL;
3323
3324 if (bgp != NULL) {
3325 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer))
3326 if (peer->conf_if && !strcmp(peer->conf_if, conf_if)
3327 && !CHECK_FLAG(peer->sflags,
3328 PEER_STATUS_ACCEPT_PEER))
3329 return peer;
3330 } else if (bm->bgp != NULL) {
3331 struct listnode *bgpnode, *nbgpnode;
3332
3333 for (ALL_LIST_ELEMENTS(bm->bgp, bgpnode, nbgpnode, bgp))
3334 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer))
3335 if (peer->conf_if
3336 && !strcmp(peer->conf_if, conf_if)
3337 && !CHECK_FLAG(peer->sflags,
3338 PEER_STATUS_ACCEPT_PEER))
3339 return peer;
3340 }
3341 return NULL;
3342 }
3343
3344 struct peer *peer_lookup_by_hostname(struct bgp *bgp, const char *hostname)
3345 {
3346 struct peer *peer;
3347 struct listnode *node, *nnode;
3348
3349 if (!hostname)
3350 return NULL;
3351
3352 if (bgp != NULL) {
3353 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer))
3354 if (peer->hostname && !strcmp(peer->hostname, hostname)
3355 && !CHECK_FLAG(peer->sflags,
3356 PEER_STATUS_ACCEPT_PEER))
3357 return peer;
3358 } else if (bm->bgp != NULL) {
3359 struct listnode *bgpnode, *nbgpnode;
3360
3361 for (ALL_LIST_ELEMENTS(bm->bgp, bgpnode, nbgpnode, bgp))
3362 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer))
3363 if (peer->hostname
3364 && !strcmp(peer->hostname, hostname)
3365 && !CHECK_FLAG(peer->sflags,
3366 PEER_STATUS_ACCEPT_PEER))
3367 return peer;
3368 }
3369 return NULL;
3370 }
3371
3372 struct peer *peer_lookup(struct bgp *bgp, union sockunion *su)
3373 {
3374 struct peer *peer = NULL;
3375 struct peer tmp_peer;
3376
3377 memset(&tmp_peer, 0, sizeof(struct peer));
3378
3379 /*
3380 * We do not want to find the doppelganger peer so search for the peer
3381 * in
3382 * the hash that has PEER_FLAG_CONFIG_NODE
3383 */
3384 SET_FLAG(tmp_peer.flags, PEER_FLAG_CONFIG_NODE);
3385
3386 tmp_peer.su = *su;
3387
3388 if (bgp != NULL) {
3389 peer = hash_lookup(bgp->peerhash, &tmp_peer);
3390 } else if (bm->bgp != NULL) {
3391 struct listnode *bgpnode, *nbgpnode;
3392
3393 for (ALL_LIST_ELEMENTS(bm->bgp, bgpnode, nbgpnode, bgp)) {
3394 peer = hash_lookup(bgp->peerhash, &tmp_peer);
3395 if (peer)
3396 break;
3397 }
3398 }
3399
3400 return peer;
3401 }
3402
3403 struct peer *peer_create_bind_dynamic_neighbor(struct bgp *bgp,
3404 union sockunion *su,
3405 struct peer_group *group)
3406 {
3407 struct peer *peer;
3408 afi_t afi;
3409 safi_t safi;
3410
3411 /* Create peer first; we've already checked group config is valid. */
3412 peer = peer_create(su, NULL, bgp, bgp->as, group->conf->as,
3413 group->conf->as_type, 0, 0, group);
3414 if (!peer)
3415 return NULL;
3416
3417 /* Link to group */
3418 peer = peer_lock(peer);
3419 listnode_add(group->peer, peer);
3420
3421 peer_group2peer_config_copy(group, peer);
3422
3423 /*
3424 * Bind peer for all AFs configured for the group. We don't call
3425 * peer_group_bind as that is sub-optimal and does some stuff we don't
3426 * want.
3427 */
3428 FOREACH_AFI_SAFI (afi, safi) {
3429 if (!group->conf->afc[afi][safi])
3430 continue;
3431 peer->afc[afi][safi] = 1;
3432
3433 if (!peer_af_find(peer, afi, safi))
3434 peer_af_create(peer, afi, safi);
3435
3436 peer_group2peer_config_copy_af(group, peer, afi, safi);
3437 }
3438
3439 /* Mark as dynamic, but also as a "config node" for other things to
3440 * work. */
3441 SET_FLAG(peer->flags, PEER_FLAG_DYNAMIC_NEIGHBOR);
3442 SET_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE);
3443
3444 return peer;
3445 }
3446
3447 struct prefix *
3448 peer_group_lookup_dynamic_neighbor_range(struct peer_group *group,
3449 struct prefix *prefix)
3450 {
3451 struct listnode *node, *nnode;
3452 struct prefix *range;
3453 afi_t afi;
3454
3455 afi = family2afi(prefix->family);
3456
3457 if (group->listen_range[afi])
3458 for (ALL_LIST_ELEMENTS(group->listen_range[afi], node, nnode,
3459 range))
3460 if (prefix_match(range, prefix))
3461 return range;
3462
3463 return NULL;
3464 }
3465
3466 struct peer_group *
3467 peer_group_lookup_dynamic_neighbor(struct bgp *bgp, struct prefix *prefix,
3468 struct prefix **listen_range)
3469 {
3470 struct prefix *range = NULL;
3471 struct peer_group *group = NULL;
3472 struct listnode *node, *nnode;
3473
3474 *listen_range = NULL;
3475 if (bgp != NULL) {
3476 for (ALL_LIST_ELEMENTS(bgp->group, node, nnode, group))
3477 if ((range = peer_group_lookup_dynamic_neighbor_range(
3478 group, prefix)))
3479 break;
3480 } else if (bm->bgp != NULL) {
3481 struct listnode *bgpnode, *nbgpnode;
3482
3483 for (ALL_LIST_ELEMENTS(bm->bgp, bgpnode, nbgpnode, bgp))
3484 for (ALL_LIST_ELEMENTS(bgp->group, node, nnode, group))
3485 if ((range = peer_group_lookup_dynamic_neighbor_range(
3486 group, prefix)))
3487 goto found_range;
3488 }
3489
3490 found_range:
3491 *listen_range = range;
3492 return (group && range) ? group : NULL;
3493 }
3494
3495 struct peer *peer_lookup_dynamic_neighbor(struct bgp *bgp, union sockunion *su)
3496 {
3497 struct peer_group *group;
3498 struct bgp *gbgp;
3499 struct peer *peer;
3500 struct prefix prefix;
3501 struct prefix *listen_range;
3502 int dncount;
3503 char buf[PREFIX2STR_BUFFER];
3504 char buf1[PREFIX2STR_BUFFER];
3505
3506 sockunion2hostprefix(su, &prefix);
3507
3508 /* See if incoming connection matches a configured listen range. */
3509 group = peer_group_lookup_dynamic_neighbor(bgp, &prefix, &listen_range);
3510
3511 if (!group)
3512 return NULL;
3513
3514
3515 gbgp = group->bgp;
3516
3517 if (!gbgp)
3518 return NULL;
3519
3520 prefix2str(&prefix, buf, sizeof(buf));
3521 prefix2str(listen_range, buf1, sizeof(buf1));
3522
3523 if (bgp_debug_neighbor_events(NULL))
3524 zlog_debug(
3525 "Dynamic Neighbor %s matches group %s listen range %s",
3526 buf, group->name, buf1);
3527
3528 /* Are we within the listen limit? */
3529 dncount = gbgp->dynamic_neighbors_count;
3530
3531 if (dncount >= gbgp->dynamic_neighbors_limit) {
3532 if (bgp_debug_neighbor_events(NULL))
3533 zlog_debug("Dynamic Neighbor %s rejected - at limit %d",
3534 inet_sutop(su, buf),
3535 gbgp->dynamic_neighbors_limit);
3536 return NULL;
3537 }
3538
3539 /* Ensure group is not disabled. */
3540 if (CHECK_FLAG(group->conf->flags, PEER_FLAG_SHUTDOWN)) {
3541 if (bgp_debug_neighbor_events(NULL))
3542 zlog_debug(
3543 "Dynamic Neighbor %s rejected - group %s disabled",
3544 buf, group->name);
3545 return NULL;
3546 }
3547
3548 /* Check that at least one AF is activated for the group. */
3549 if (!peer_group_af_configured(group)) {
3550 if (bgp_debug_neighbor_events(NULL))
3551 zlog_debug(
3552 "Dynamic Neighbor %s rejected - no AF activated for group %s",
3553 buf, group->name);
3554 return NULL;
3555 }
3556
3557 /* Create dynamic peer and bind to associated group. */
3558 peer = peer_create_bind_dynamic_neighbor(gbgp, su, group);
3559 assert(peer);
3560
3561 gbgp->dynamic_neighbors_count = ++dncount;
3562
3563 if (bgp_debug_neighbor_events(peer))
3564 zlog_debug("%s Dynamic Neighbor added, group %s count %d",
3565 peer->host, group->name, dncount);
3566
3567 return peer;
3568 }
3569
3570 static void peer_drop_dynamic_neighbor(struct peer *peer)
3571 {
3572 int dncount = -1;
3573 if (peer->group->bgp) {
3574 dncount = peer->group->bgp->dynamic_neighbors_count;
3575 if (dncount)
3576 peer->group->bgp->dynamic_neighbors_count = --dncount;
3577 }
3578 if (bgp_debug_neighbor_events(peer))
3579 zlog_debug("%s dropped from group %s, count %d", peer->host,
3580 peer->group->name, dncount);
3581 }
3582
3583 /* If peer is configured at least one address family return 1. */
3584 int peer_active(struct peer *peer)
3585 {
3586 if (BGP_PEER_SU_UNSPEC(peer))
3587 return 0;
3588 if (peer->afc[AFI_IP][SAFI_UNICAST] || peer->afc[AFI_IP][SAFI_MULTICAST]
3589 || peer->afc[AFI_IP][SAFI_LABELED_UNICAST]
3590 || peer->afc[AFI_IP][SAFI_MPLS_VPN] || peer->afc[AFI_IP][SAFI_ENCAP]
3591 || peer->afc[AFI_IP][SAFI_FLOWSPEC]
3592 || peer->afc[AFI_IP6][SAFI_UNICAST]
3593 || peer->afc[AFI_IP6][SAFI_MULTICAST]
3594 || peer->afc[AFI_IP6][SAFI_LABELED_UNICAST]
3595 || peer->afc[AFI_IP6][SAFI_MPLS_VPN]
3596 || peer->afc[AFI_IP6][SAFI_ENCAP]
3597 || peer->afc[AFI_IP6][SAFI_FLOWSPEC]
3598 || peer->afc[AFI_L2VPN][SAFI_EVPN])
3599 return 1;
3600 return 0;
3601 }
3602
3603 /* If peer is negotiated at least one address family return 1. */
3604 int peer_active_nego(struct peer *peer)
3605 {
3606 if (peer->afc_nego[AFI_IP][SAFI_UNICAST]
3607 || peer->afc_nego[AFI_IP][SAFI_MULTICAST]
3608 || peer->afc_nego[AFI_IP][SAFI_LABELED_UNICAST]
3609 || peer->afc_nego[AFI_IP][SAFI_MPLS_VPN]
3610 || peer->afc_nego[AFI_IP][SAFI_ENCAP]
3611 || peer->afc_nego[AFI_IP][SAFI_FLOWSPEC]
3612 || peer->afc_nego[AFI_IP6][SAFI_UNICAST]
3613 || peer->afc_nego[AFI_IP6][SAFI_MULTICAST]
3614 || peer->afc_nego[AFI_IP6][SAFI_LABELED_UNICAST]
3615 || peer->afc_nego[AFI_IP6][SAFI_MPLS_VPN]
3616 || peer->afc_nego[AFI_IP6][SAFI_ENCAP]
3617 || peer->afc_nego[AFI_IP6][SAFI_FLOWSPEC]
3618 || peer->afc_nego[AFI_L2VPN][SAFI_EVPN])
3619 return 1;
3620 return 0;
3621 }
3622
3623 /* peer_flag_change_type. */
3624 enum peer_change_type {
3625 peer_change_none,
3626 peer_change_reset,
3627 peer_change_reset_in,
3628 peer_change_reset_out,
3629 };
3630
3631 static void peer_change_action(struct peer *peer, afi_t afi, safi_t safi,
3632 enum peer_change_type type)
3633 {
3634 if (CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP))
3635 return;
3636
3637 if (peer->status != Established)
3638 return;
3639
3640 if (type == peer_change_reset) {
3641 /* If we're resetting session, we've to delete both peer struct
3642 */
3643 if ((peer->doppelganger)
3644 && (peer->doppelganger->status != Deleted)
3645 && (!CHECK_FLAG(peer->doppelganger->flags,
3646 PEER_FLAG_CONFIG_NODE)))
3647 peer_delete(peer->doppelganger);
3648
3649 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
3650 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
3651 } else if (type == peer_change_reset_in) {
3652 if (CHECK_FLAG(peer->cap, PEER_CAP_REFRESH_OLD_RCV)
3653 || CHECK_FLAG(peer->cap, PEER_CAP_REFRESH_NEW_RCV))
3654 bgp_route_refresh_send(peer, afi, safi, 0, 0, 0);
3655 else {
3656 if ((peer->doppelganger)
3657 && (peer->doppelganger->status != Deleted)
3658 && (!CHECK_FLAG(peer->doppelganger->flags,
3659 PEER_FLAG_CONFIG_NODE)))
3660 peer_delete(peer->doppelganger);
3661
3662 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
3663 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
3664 }
3665 } else if (type == peer_change_reset_out) {
3666 update_group_adjust_peer(peer_af_find(peer, afi, safi));
3667 bgp_announce_route(peer, afi, safi);
3668 }
3669 }
3670
3671 struct peer_flag_action {
3672 /* Peer's flag. */
3673 uint32_t flag;
3674
3675 /* This flag can be set for peer-group member. */
3676 uint8_t not_for_member;
3677
3678 /* Action when the flag is changed. */
3679 enum peer_change_type type;
3680 };
3681
3682 static const struct peer_flag_action peer_flag_action_list[] = {
3683 {PEER_FLAG_PASSIVE, 0, peer_change_reset},
3684 {PEER_FLAG_SHUTDOWN, 0, peer_change_reset},
3685 {PEER_FLAG_DONT_CAPABILITY, 0, peer_change_none},
3686 {PEER_FLAG_OVERRIDE_CAPABILITY, 0, peer_change_none},
3687 {PEER_FLAG_STRICT_CAP_MATCH, 0, peer_change_none},
3688 {PEER_FLAG_DYNAMIC_CAPABILITY, 0, peer_change_reset},
3689 {PEER_FLAG_DISABLE_CONNECTED_CHECK, 0, peer_change_reset},
3690 {PEER_FLAG_CAPABILITY_ENHE, 0, peer_change_reset},
3691 {PEER_FLAG_ENFORCE_FIRST_AS, 0, peer_change_reset_in},
3692 {PEER_FLAG_ROUTEADV, 0, peer_change_none},
3693 {PEER_FLAG_TIMER, 0, peer_change_none},
3694 {PEER_FLAG_TIMER_CONNECT, 0, peer_change_none},
3695 {PEER_FLAG_PASSWORD, 0, peer_change_none},
3696 {PEER_FLAG_LOCAL_AS, 0, peer_change_none},
3697 {PEER_FLAG_LOCAL_AS_NO_PREPEND, 0, peer_change_none},
3698 {PEER_FLAG_LOCAL_AS_REPLACE_AS, 0, peer_change_none},
3699 {PEER_FLAG_UPDATE_SOURCE, 0, peer_change_none},
3700 {0, 0, 0}};
3701
3702 static const struct peer_flag_action peer_af_flag_action_list[] = {
3703 {PEER_FLAG_SEND_COMMUNITY, 1, peer_change_reset_out},
3704 {PEER_FLAG_SEND_EXT_COMMUNITY, 1, peer_change_reset_out},
3705 {PEER_FLAG_SEND_LARGE_COMMUNITY, 1, peer_change_reset_out},
3706 {PEER_FLAG_NEXTHOP_SELF, 1, peer_change_reset_out},
3707 {PEER_FLAG_REFLECTOR_CLIENT, 1, peer_change_reset},
3708 {PEER_FLAG_RSERVER_CLIENT, 1, peer_change_reset},
3709 {PEER_FLAG_SOFT_RECONFIG, 0, peer_change_reset_in},
3710 {PEER_FLAG_AS_PATH_UNCHANGED, 1, peer_change_reset_out},
3711 {PEER_FLAG_NEXTHOP_UNCHANGED, 1, peer_change_reset_out},
3712 {PEER_FLAG_MED_UNCHANGED, 1, peer_change_reset_out},
3713 {PEER_FLAG_DEFAULT_ORIGINATE, 0, peer_change_none},
3714 {PEER_FLAG_REMOVE_PRIVATE_AS, 1, peer_change_reset_out},
3715 {PEER_FLAG_ALLOWAS_IN, 0, peer_change_reset_in},
3716 {PEER_FLAG_ALLOWAS_IN_ORIGIN, 0, peer_change_reset_in},
3717 {PEER_FLAG_ORF_PREFIX_SM, 1, peer_change_reset},
3718 {PEER_FLAG_ORF_PREFIX_RM, 1, peer_change_reset},
3719 {PEER_FLAG_MAX_PREFIX, 0, peer_change_none},
3720 {PEER_FLAG_MAX_PREFIX_WARNING, 0, peer_change_none},
3721 {PEER_FLAG_NEXTHOP_LOCAL_UNCHANGED, 0, peer_change_reset_out},
3722 {PEER_FLAG_FORCE_NEXTHOP_SELF, 1, peer_change_reset_out},
3723 {PEER_FLAG_REMOVE_PRIVATE_AS_ALL, 1, peer_change_reset_out},
3724 {PEER_FLAG_REMOVE_PRIVATE_AS_REPLACE, 1, peer_change_reset_out},
3725 {PEER_FLAG_AS_OVERRIDE, 1, peer_change_reset_out},
3726 {PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE, 1, peer_change_reset_out},
3727 {PEER_FLAG_ADDPATH_TX_ALL_PATHS, 1, peer_change_reset},
3728 {PEER_FLAG_ADDPATH_TX_BESTPATH_PER_AS, 1, peer_change_reset},
3729 {PEER_FLAG_WEIGHT, 0, peer_change_reset_in},
3730 {0, 0, 0}};
3731
3732 /* Proper action set. */
3733 static int peer_flag_action_set(const struct peer_flag_action *action_list,
3734 int size, struct peer_flag_action *action,
3735 uint32_t flag)
3736 {
3737 int i;
3738 int found = 0;
3739 int reset_in = 0;
3740 int reset_out = 0;
3741 const struct peer_flag_action *match = NULL;
3742
3743 /* Check peer's frag action. */
3744 for (i = 0; i < size; i++) {
3745 match = &action_list[i];
3746
3747 if (match->flag == 0)
3748 break;
3749
3750 if (match->flag & flag) {
3751 found = 1;
3752
3753 if (match->type == peer_change_reset_in)
3754 reset_in = 1;
3755 if (match->type == peer_change_reset_out)
3756 reset_out = 1;
3757 if (match->type == peer_change_reset) {
3758 reset_in = 1;
3759 reset_out = 1;
3760 }
3761 if (match->not_for_member)
3762 action->not_for_member = 1;
3763 }
3764 }
3765
3766 /* Set peer clear type. */
3767 if (reset_in && reset_out)
3768 action->type = peer_change_reset;
3769 else if (reset_in)
3770 action->type = peer_change_reset_in;
3771 else if (reset_out)
3772 action->type = peer_change_reset_out;
3773 else
3774 action->type = peer_change_none;
3775
3776 return found;
3777 }
3778
3779 static void peer_flag_modify_action(struct peer *peer, uint32_t flag)
3780 {
3781 if (flag == PEER_FLAG_SHUTDOWN) {
3782 if (CHECK_FLAG(peer->flags, flag)) {
3783 if (CHECK_FLAG(peer->sflags, PEER_STATUS_NSF_WAIT))
3784 peer_nsf_stop(peer);
3785
3786 UNSET_FLAG(peer->sflags, PEER_STATUS_PREFIX_OVERFLOW);
3787 if (peer->t_pmax_restart) {
3788 BGP_TIMER_OFF(peer->t_pmax_restart);
3789 if (bgp_debug_neighbor_events(peer))
3790 zlog_debug(
3791 "%s Maximum-prefix restart timer canceled",
3792 peer->host);
3793 }
3794
3795 if (CHECK_FLAG(peer->sflags, PEER_STATUS_NSF_WAIT))
3796 peer_nsf_stop(peer);
3797
3798 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
3799 char *msg = peer->tx_shutdown_message;
3800 size_t msglen;
3801
3802 if (!msg && peer_group_active(peer))
3803 msg = peer->group->conf
3804 ->tx_shutdown_message;
3805 msglen = msg ? strlen(msg) : 0;
3806 if (msglen > 128)
3807 msglen = 128;
3808
3809 if (msglen) {
3810 uint8_t msgbuf[129];
3811
3812 msgbuf[0] = msglen;
3813 memcpy(msgbuf + 1, msg, msglen);
3814
3815 bgp_notify_send_with_data(
3816 peer, BGP_NOTIFY_CEASE,
3817 BGP_NOTIFY_CEASE_ADMIN_SHUTDOWN,
3818 msgbuf, msglen + 1);
3819 } else
3820 bgp_notify_send(
3821 peer, BGP_NOTIFY_CEASE,
3822 BGP_NOTIFY_CEASE_ADMIN_SHUTDOWN);
3823 } else
3824 bgp_session_reset(peer);
3825 } else {
3826 peer->v_start = BGP_INIT_START_TIMER;
3827 BGP_EVENT_ADD(peer, BGP_Stop);
3828 }
3829 } else if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
3830 if (flag == PEER_FLAG_DYNAMIC_CAPABILITY)
3831 peer->last_reset = PEER_DOWN_CAPABILITY_CHANGE;
3832 else if (flag == PEER_FLAG_PASSIVE)
3833 peer->last_reset = PEER_DOWN_PASSIVE_CHANGE;
3834 else if (flag == PEER_FLAG_DISABLE_CONNECTED_CHECK)
3835 peer->last_reset = PEER_DOWN_MULTIHOP_CHANGE;
3836
3837 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
3838 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
3839 } else
3840 bgp_session_reset(peer);
3841 }
3842
3843 /* Change specified peer flag. */
3844 static int peer_flag_modify(struct peer *peer, uint32_t flag, int set)
3845 {
3846 int found;
3847 int size;
3848 bool invert, member_invert;
3849 struct peer *member;
3850 struct listnode *node, *nnode;
3851 struct peer_flag_action action;
3852
3853 memset(&action, 0, sizeof(struct peer_flag_action));
3854 size = sizeof peer_flag_action_list / sizeof(struct peer_flag_action);
3855
3856 invert = CHECK_FLAG(peer->flags_invert, flag);
3857 found = peer_flag_action_set(peer_flag_action_list, size, &action,
3858 flag);
3859
3860 /* Abort if no flag action exists. */
3861 if (!found)
3862 return BGP_ERR_INVALID_FLAG;
3863
3864 /* Check for flag conflict: STRICT_CAP_MATCH && OVERRIDE_CAPABILITY */
3865 if (set && CHECK_FLAG(peer->flags | flag, PEER_FLAG_STRICT_CAP_MATCH)
3866 && CHECK_FLAG(peer->flags | flag, PEER_FLAG_OVERRIDE_CAPABILITY))
3867 return BGP_ERR_PEER_FLAG_CONFLICT;
3868
3869 /* Handle flag updates where desired state matches current state. */
3870 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
3871 if (set && CHECK_FLAG(peer->flags, flag)) {
3872 COND_FLAG(peer->flags_override, flag, !invert);
3873 return 0;
3874 }
3875
3876 if (!set && !CHECK_FLAG(peer->flags, flag)) {
3877 COND_FLAG(peer->flags_override, flag, invert);
3878 return 0;
3879 }
3880 }
3881
3882 /* Inherit from peer-group or set/unset flags accordingly. */
3883 if (peer_group_active(peer) && set == invert)
3884 peer_flag_inherit(peer, flag);
3885 else
3886 COND_FLAG(peer->flags, flag, set);
3887
3888 /* Check if handling a regular peer. */
3889 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
3890 /* Update flag override state accordingly. */
3891 COND_FLAG(peer->flags_override, flag, set != invert);
3892
3893 /* Execute flag action on peer. */
3894 if (action.type == peer_change_reset)
3895 peer_flag_modify_action(peer, flag);
3896
3897 /* Skip peer-group mechanics for regular peers. */
3898 return 0;
3899 }
3900
3901 /*
3902 * Update peer-group members, unless they are explicitely overriding
3903 * peer-group configuration.
3904 */
3905 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
3906 /* Skip peers with overridden configuration. */
3907 if (CHECK_FLAG(member->flags_override, flag))
3908 continue;
3909
3910 /* Check if only member without group is inverted. */
3911 member_invert =
3912 CHECK_FLAG(member->flags_invert, flag) && !invert;
3913
3914 /* Skip peers with equivalent configuration. */
3915 if (set != member_invert && CHECK_FLAG(member->flags, flag))
3916 continue;
3917
3918 if (set == member_invert && !CHECK_FLAG(member->flags, flag))
3919 continue;
3920
3921 /* Update flag on peer-group member. */
3922 COND_FLAG(member->flags, flag, set != member_invert);
3923
3924 /* Execute flag action on peer-group member. */
3925 if (action.type == peer_change_reset)
3926 peer_flag_modify_action(member, flag);
3927 }
3928
3929 return 0;
3930 }
3931
3932 int peer_flag_set(struct peer *peer, uint32_t flag)
3933 {
3934 return peer_flag_modify(peer, flag, 1);
3935 }
3936
3937 int peer_flag_unset(struct peer *peer, uint32_t flag)
3938 {
3939 return peer_flag_modify(peer, flag, 0);
3940 }
3941
3942 static int peer_af_flag_modify(struct peer *peer, afi_t afi, safi_t safi,
3943 uint32_t flag, bool set)
3944 {
3945 int found;
3946 int size;
3947 int addpath_tx_used;
3948 bool invert, member_invert;
3949 struct bgp *bgp;
3950 struct peer *member;
3951 struct listnode *node, *nnode;
3952 struct peer_flag_action action;
3953
3954 memset(&action, 0, sizeof(struct peer_flag_action));
3955 size = sizeof peer_af_flag_action_list
3956 / sizeof(struct peer_flag_action);
3957
3958 invert = CHECK_FLAG(peer->af_flags_invert[afi][safi], flag);
3959 found = peer_flag_action_set(peer_af_flag_action_list, size, &action,
3960 flag);
3961
3962 /* Abort if flag action exists. */
3963 if (!found)
3964 return BGP_ERR_INVALID_FLAG;
3965
3966 /* Special check for reflector client. */
3967 if (flag & PEER_FLAG_REFLECTOR_CLIENT
3968 && peer_sort(peer) != BGP_PEER_IBGP)
3969 return BGP_ERR_NOT_INTERNAL_PEER;
3970
3971 /* Special check for remove-private-AS. */
3972 if (flag & PEER_FLAG_REMOVE_PRIVATE_AS
3973 && peer_sort(peer) == BGP_PEER_IBGP)
3974 return BGP_ERR_REMOVE_PRIVATE_AS;
3975
3976 /* as-override is not allowed for IBGP peers */
3977 if (flag & PEER_FLAG_AS_OVERRIDE && peer_sort(peer) == BGP_PEER_IBGP)
3978 return BGP_ERR_AS_OVERRIDE;
3979
3980 /* Handle flag updates where desired state matches current state. */
3981 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
3982 if (set && CHECK_FLAG(peer->af_flags[afi][safi], flag)) {
3983 COND_FLAG(peer->af_flags_override[afi][safi], flag,
3984 !invert);
3985 return 0;
3986 }
3987
3988 if (!set && !CHECK_FLAG(peer->af_flags[afi][safi], flag)) {
3989 COND_FLAG(peer->af_flags_override[afi][safi], flag,
3990 invert);
3991 return 0;
3992 }
3993 }
3994
3995 /*
3996 * For EVPN we implicitly set the NEXTHOP_UNCHANGED flag,
3997 * if we are setting/unsetting flags which conflict with this flag
3998 * handle accordingly
3999 */
4000 if (afi == AFI_L2VPN && safi == SAFI_EVPN) {
4001 if (set) {
4002
4003 /*
4004 * if we are setting NEXTHOP_SELF, we need to unset the
4005 * NEXTHOP_UNCHANGED flag
4006 */
4007 if (CHECK_FLAG(flag, PEER_FLAG_NEXTHOP_SELF) ||
4008 CHECK_FLAG(flag, PEER_FLAG_FORCE_NEXTHOP_SELF))
4009 UNSET_FLAG(peer->af_flags[afi][safi],
4010 PEER_FLAG_NEXTHOP_UNCHANGED);
4011 } else {
4012
4013 /*
4014 * if we are unsetting NEXTHOP_SELF, we need to set the
4015 * NEXTHOP_UNCHANGED flag to reset the defaults for EVPN
4016 */
4017 if (CHECK_FLAG(flag, PEER_FLAG_NEXTHOP_SELF) ||
4018 CHECK_FLAG(flag, PEER_FLAG_FORCE_NEXTHOP_SELF))
4019 SET_FLAG(peer->af_flags[afi][safi],
4020 PEER_FLAG_NEXTHOP_UNCHANGED);
4021 }
4022 }
4023
4024 /* Inherit from peer-group or set/unset flags accordingly. */
4025 if (peer_group_active(peer) && set == invert)
4026 peer_af_flag_inherit(peer, afi, safi, flag);
4027 else
4028 COND_FLAG(peer->af_flags[afi][safi], flag, set);
4029
4030 /* Execute action when peer is established. */
4031 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)
4032 && peer->status == Established) {
4033 if (!set && flag == PEER_FLAG_SOFT_RECONFIG)
4034 bgp_clear_adj_in(peer, afi, safi);
4035 else {
4036 if (flag == PEER_FLAG_REFLECTOR_CLIENT)
4037 peer->last_reset = PEER_DOWN_RR_CLIENT_CHANGE;
4038 else if (flag == PEER_FLAG_RSERVER_CLIENT)
4039 peer->last_reset = PEER_DOWN_RS_CLIENT_CHANGE;
4040 else if (flag == PEER_FLAG_ORF_PREFIX_SM)
4041 peer->last_reset = PEER_DOWN_CAPABILITY_CHANGE;
4042 else if (flag == PEER_FLAG_ORF_PREFIX_RM)
4043 peer->last_reset = PEER_DOWN_CAPABILITY_CHANGE;
4044
4045 peer_change_action(peer, afi, safi, action.type);
4046 }
4047 }
4048
4049 /* Check if handling a regular peer. */
4050 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
4051 COND_FLAG(peer->af_flags_override[afi][safi], flag,
4052 set != invert);
4053 } else {
4054 /*
4055 * Update peer-group members, unless they are explicitely
4056 * overriding peer-group configuration.
4057 */
4058 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode,
4059 member)) {
4060 /* Skip peers with overridden configuration. */
4061 if (CHECK_FLAG(member->af_flags_override[afi][safi],
4062 flag))
4063 continue;
4064
4065 /* Check if only member without group is inverted. */
4066 member_invert =
4067 CHECK_FLAG(member->af_flags_invert[afi][safi],
4068 flag)
4069 && !invert;
4070
4071 /* Skip peers with equivalent configuration. */
4072 if (set != member_invert
4073 && CHECK_FLAG(member->af_flags[afi][safi], flag))
4074 continue;
4075
4076 if (set == member_invert
4077 && !CHECK_FLAG(member->af_flags[afi][safi], flag))
4078 continue;
4079
4080 /* Update flag on peer-group member. */
4081 COND_FLAG(member->af_flags[afi][safi], flag,
4082 set != member_invert);
4083
4084 /* Execute flag action on peer-group member. */
4085 if (member->status == Established) {
4086 if (!set && flag == PEER_FLAG_SOFT_RECONFIG)
4087 bgp_clear_adj_in(member, afi, safi);
4088 else {
4089 if (flag == PEER_FLAG_REFLECTOR_CLIENT)
4090 member->last_reset =
4091 PEER_DOWN_RR_CLIENT_CHANGE;
4092 else if (flag
4093 == PEER_FLAG_RSERVER_CLIENT)
4094 member->last_reset =
4095 PEER_DOWN_RS_CLIENT_CHANGE;
4096 else if (flag
4097 == PEER_FLAG_ORF_PREFIX_SM)
4098 member->last_reset =
4099 PEER_DOWN_CAPABILITY_CHANGE;
4100 else if (flag
4101 == PEER_FLAG_ORF_PREFIX_RM)
4102 member->last_reset =
4103 PEER_DOWN_CAPABILITY_CHANGE;
4104
4105 peer_change_action(member, afi, safi,
4106 action.type);
4107 }
4108 }
4109 }
4110 }
4111
4112 /* Track if addpath TX is in use */
4113 if (flag & (PEER_FLAG_ADDPATH_TX_ALL_PATHS
4114 | PEER_FLAG_ADDPATH_TX_BESTPATH_PER_AS)) {
4115 bgp = peer->bgp;
4116 addpath_tx_used = 0;
4117
4118 if (set) {
4119 addpath_tx_used = 1;
4120
4121 if (flag & PEER_FLAG_ADDPATH_TX_BESTPATH_PER_AS) {
4122 if (!bgp_flag_check(
4123 bgp, BGP_FLAG_DETERMINISTIC_MED)) {
4124 zlog_info(
4125 "%s: enabling bgp deterministic-med, this is required"
4126 " for addpath-tx-bestpath-per-AS",
4127 peer->host);
4128 bgp_flag_set(
4129 bgp,
4130 BGP_FLAG_DETERMINISTIC_MED);
4131 bgp_recalculate_all_bestpaths(bgp);
4132 }
4133 }
4134 } else {
4135 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode,
4136 member)) {
4137 if (CHECK_FLAG(member->af_flags[afi][safi],
4138 PEER_FLAG_ADDPATH_TX_ALL_PATHS)
4139 || CHECK_FLAG(
4140 member->af_flags[afi][safi],
4141 PEER_FLAG_ADDPATH_TX_BESTPATH_PER_AS)) {
4142 addpath_tx_used = 1;
4143 break;
4144 }
4145 }
4146 }
4147
4148 bgp->addpath_tx_used[afi][safi] = addpath_tx_used;
4149 }
4150
4151 return 0;
4152 }
4153
4154 int peer_af_flag_set(struct peer *peer, afi_t afi, safi_t safi, uint32_t flag)
4155 {
4156 return peer_af_flag_modify(peer, afi, safi, flag, 1);
4157 }
4158
4159 int peer_af_flag_unset(struct peer *peer, afi_t afi, safi_t safi, uint32_t flag)
4160 {
4161 return peer_af_flag_modify(peer, afi, safi, flag, 0);
4162 }
4163
4164
4165 int peer_tx_shutdown_message_set(struct peer *peer, const char *msg)
4166 {
4167 XFREE(MTYPE_PEER_TX_SHUTDOWN_MSG, peer->tx_shutdown_message);
4168 peer->tx_shutdown_message =
4169 msg ? XSTRDUP(MTYPE_PEER_TX_SHUTDOWN_MSG, msg) : NULL;
4170 return 0;
4171 }
4172
4173 int peer_tx_shutdown_message_unset(struct peer *peer)
4174 {
4175 XFREE(MTYPE_PEER_TX_SHUTDOWN_MSG, peer->tx_shutdown_message);
4176 return 0;
4177 }
4178
4179
4180 /* EBGP multihop configuration. */
4181 int peer_ebgp_multihop_set(struct peer *peer, int ttl)
4182 {
4183 struct peer_group *group;
4184 struct listnode *node, *nnode;
4185 struct peer *peer1;
4186
4187 if (peer->sort == BGP_PEER_IBGP || peer->conf_if)
4188 return 0;
4189
4190 /* see comment in peer_ttl_security_hops_set() */
4191 if (ttl != MAXTTL) {
4192 if (CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
4193 group = peer->group;
4194 if (group->conf->gtsm_hops != 0)
4195 return BGP_ERR_NO_EBGP_MULTIHOP_WITH_TTLHACK;
4196
4197 for (ALL_LIST_ELEMENTS(group->peer, node, nnode,
4198 peer1)) {
4199 if (peer1->sort == BGP_PEER_IBGP)
4200 continue;
4201
4202 if (peer1->gtsm_hops != 0)
4203 return BGP_ERR_NO_EBGP_MULTIHOP_WITH_TTLHACK;
4204 }
4205 } else {
4206 if (peer->gtsm_hops != 0)
4207 return BGP_ERR_NO_EBGP_MULTIHOP_WITH_TTLHACK;
4208 }
4209 }
4210
4211 peer->ttl = ttl;
4212
4213 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
4214 if (peer->fd >= 0 && peer->sort != BGP_PEER_IBGP) {
4215 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status))
4216 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
4217 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
4218 else
4219 bgp_session_reset(peer);
4220 }
4221 } else {
4222 group = peer->group;
4223 for (ALL_LIST_ELEMENTS(group->peer, node, nnode, peer)) {
4224 if (peer->sort == BGP_PEER_IBGP)
4225 continue;
4226
4227 peer->ttl = group->conf->ttl;
4228
4229 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status))
4230 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
4231 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
4232 else
4233 bgp_session_reset(peer);
4234 }
4235 }
4236 return 0;
4237 }
4238
4239 int peer_ebgp_multihop_unset(struct peer *peer)
4240 {
4241 struct peer_group *group;
4242 struct listnode *node, *nnode;
4243
4244 if (peer->sort == BGP_PEER_IBGP)
4245 return 0;
4246
4247 if (peer->gtsm_hops != 0 && peer->ttl != MAXTTL)
4248 return BGP_ERR_NO_EBGP_MULTIHOP_WITH_TTLHACK;
4249
4250 if (peer_group_active(peer))
4251 peer->ttl = peer->group->conf->ttl;
4252 else
4253 peer->ttl = 1;
4254
4255 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
4256 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status))
4257 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
4258 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
4259 else
4260 bgp_session_reset(peer);
4261 } else {
4262 group = peer->group;
4263 for (ALL_LIST_ELEMENTS(group->peer, node, nnode, peer)) {
4264 if (peer->sort == BGP_PEER_IBGP)
4265 continue;
4266
4267 peer->ttl = 1;
4268
4269 if (peer->fd >= 0) {
4270 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status))
4271 bgp_notify_send(
4272 peer, BGP_NOTIFY_CEASE,
4273 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
4274 else
4275 bgp_session_reset(peer);
4276 }
4277 }
4278 }
4279 return 0;
4280 }
4281
4282 /* Neighbor description. */
4283 int peer_description_set(struct peer *peer, const char *desc)
4284 {
4285 if (peer->desc)
4286 XFREE(MTYPE_PEER_DESC, peer->desc);
4287
4288 peer->desc = XSTRDUP(MTYPE_PEER_DESC, desc);
4289
4290 return 0;
4291 }
4292
4293 int peer_description_unset(struct peer *peer)
4294 {
4295 if (peer->desc)
4296 XFREE(MTYPE_PEER_DESC, peer->desc);
4297
4298 peer->desc = NULL;
4299
4300 return 0;
4301 }
4302
4303 /* Neighbor update-source. */
4304 int peer_update_source_if_set(struct peer *peer, const char *ifname)
4305 {
4306 struct peer *member;
4307 struct listnode *node, *nnode;
4308
4309 /* Set flag and configuration on peer. */
4310 peer_flag_set(peer, PEER_FLAG_UPDATE_SOURCE);
4311 if (peer->update_if) {
4312 if (strcmp(peer->update_if, ifname) == 0)
4313 return 0;
4314 XFREE(MTYPE_PEER_UPDATE_SOURCE, peer->update_if);
4315 }
4316 peer->update_if = XSTRDUP(MTYPE_PEER_UPDATE_SOURCE, ifname);
4317 sockunion_free(peer->update_source);
4318 peer->update_source = NULL;
4319
4320 /* Check if handling a regular peer. */
4321 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
4322 /* Send notification or reset peer depending on state. */
4323 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
4324 peer->last_reset = PEER_DOWN_UPDATE_SOURCE_CHANGE;
4325 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
4326 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
4327 } else
4328 bgp_session_reset(peer);
4329
4330 /* Skip peer-group mechanics for regular peers. */
4331 return 0;
4332 }
4333
4334 /*
4335 * Set flag and configuration on all peer-group members, unless they are
4336 * explicitely overriding peer-group configuration.
4337 */
4338 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
4339 /* Skip peers with overridden configuration. */
4340 if (CHECK_FLAG(member->flags_override, PEER_FLAG_UPDATE_SOURCE))
4341 continue;
4342
4343 /* Skip peers with the same configuration. */
4344 if (member->update_if) {
4345 if (strcmp(member->update_if, ifname) == 0)
4346 continue;
4347 XFREE(MTYPE_PEER_UPDATE_SOURCE, member->update_if);
4348 }
4349
4350 /* Set flag and configuration on peer-group member. */
4351 SET_FLAG(member->flags, PEER_FLAG_UPDATE_SOURCE);
4352 member->update_if = XSTRDUP(MTYPE_PEER_UPDATE_SOURCE, ifname);
4353 sockunion_free(member->update_source);
4354 member->update_source = NULL;
4355
4356 /* Send notification or reset peer depending on state. */
4357 if (BGP_IS_VALID_STATE_FOR_NOTIF(member->status)) {
4358 member->last_reset = PEER_DOWN_UPDATE_SOURCE_CHANGE;
4359 bgp_notify_send(member, BGP_NOTIFY_CEASE,
4360 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
4361 } else
4362 bgp_session_reset(member);
4363 }
4364
4365 return 0;
4366 }
4367
4368 int peer_update_source_addr_set(struct peer *peer, const union sockunion *su)
4369 {
4370 struct peer *member;
4371 struct listnode *node, *nnode;
4372
4373 /* Set flag and configuration on peer. */
4374 peer_flag_set(peer, PEER_FLAG_UPDATE_SOURCE);
4375 if (peer->update_source) {
4376 if (sockunion_cmp(peer->update_source, su) == 0)
4377 return 0;
4378 sockunion_free(peer->update_source);
4379 }
4380 peer->update_source = sockunion_dup(su);
4381 XFREE(MTYPE_PEER_UPDATE_SOURCE, peer->update_if);
4382
4383 /* Check if handling a regular peer. */
4384 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
4385 /* Send notification or reset peer depending on state. */
4386 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
4387 peer->last_reset = PEER_DOWN_UPDATE_SOURCE_CHANGE;
4388 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
4389 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
4390 } else
4391 bgp_session_reset(peer);
4392
4393 /* Skip peer-group mechanics for regular peers. */
4394 return 0;
4395 }
4396
4397 /*
4398 * Set flag and configuration on all peer-group members, unless they are
4399 * explicitely overriding peer-group configuration.
4400 */
4401 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
4402 /* Skip peers with overridden configuration. */
4403 if (CHECK_FLAG(member->flags_override, PEER_FLAG_UPDATE_SOURCE))
4404 continue;
4405
4406 /* Skip peers with the same configuration. */
4407 if (member->update_source) {
4408 if (sockunion_cmp(member->update_source, su) == 0)
4409 continue;
4410 sockunion_free(member->update_source);
4411 }
4412
4413 /* Set flag and configuration on peer-group member. */
4414 SET_FLAG(member->flags, PEER_FLAG_UPDATE_SOURCE);
4415 member->update_source = sockunion_dup(su);
4416 XFREE(MTYPE_PEER_UPDATE_SOURCE, member->update_if);
4417
4418 /* Send notification or reset peer depending on state. */
4419 if (BGP_IS_VALID_STATE_FOR_NOTIF(member->status)) {
4420 member->last_reset = PEER_DOWN_UPDATE_SOURCE_CHANGE;
4421 bgp_notify_send(member, BGP_NOTIFY_CEASE,
4422 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
4423 } else
4424 bgp_session_reset(member);
4425 }
4426
4427 return 0;
4428 }
4429
4430 int peer_update_source_unset(struct peer *peer)
4431 {
4432 struct peer *member;
4433 struct listnode *node, *nnode;
4434
4435 if (!CHECK_FLAG(peer->flags, PEER_FLAG_UPDATE_SOURCE))
4436 return 0;
4437
4438 /* Inherit configuration from peer-group if peer is member. */
4439 if (peer_group_active(peer)) {
4440 peer_flag_inherit(peer, PEER_FLAG_UPDATE_SOURCE);
4441 PEER_SU_ATTR_INHERIT(peer, peer->group, update_source);
4442 PEER_STR_ATTR_INHERIT(peer, peer->group, update_if,
4443 MTYPE_PEER_UPDATE_SOURCE);
4444 } else {
4445 /* Otherwise remove flag and configuration from peer. */
4446 peer_flag_unset(peer, PEER_FLAG_UPDATE_SOURCE);
4447 sockunion_free(peer->update_source);
4448 peer->update_source = NULL;
4449 XFREE(MTYPE_PEER_UPDATE_SOURCE, peer->update_if);
4450 }
4451
4452 /* Check if handling a regular peer. */
4453 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
4454 /* Send notification or reset peer depending on state. */
4455 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
4456 peer->last_reset = PEER_DOWN_UPDATE_SOURCE_CHANGE;
4457 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
4458 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
4459 } else
4460 bgp_session_reset(peer);
4461
4462 /* Skip peer-group mechanics for regular peers. */
4463 return 0;
4464 }
4465
4466 /*
4467 * Set flag and configuration on all peer-group members, unless they are
4468 * explicitely overriding peer-group configuration.
4469 */
4470 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
4471 /* Skip peers with overridden configuration. */
4472 if (CHECK_FLAG(member->flags_override, PEER_FLAG_UPDATE_SOURCE))
4473 continue;
4474
4475 /* Skip peers with the same configuration. */
4476 if (!CHECK_FLAG(member->flags, PEER_FLAG_UPDATE_SOURCE)
4477 && !member->update_source && !member->update_if)
4478 continue;
4479
4480 /* Remove flag and configuration on peer-group member. */
4481 UNSET_FLAG(member->flags, PEER_FLAG_UPDATE_SOURCE);
4482 sockunion_free(member->update_source);
4483 member->update_source = NULL;
4484 XFREE(MTYPE_PEER_UPDATE_SOURCE, member->update_if);
4485
4486 /* Send notification or reset peer depending on state. */
4487 if (BGP_IS_VALID_STATE_FOR_NOTIF(member->status)) {
4488 member->last_reset = PEER_DOWN_UPDATE_SOURCE_CHANGE;
4489 bgp_notify_send(member, BGP_NOTIFY_CEASE,
4490 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
4491 } else
4492 bgp_session_reset(member);
4493 }
4494
4495 return 0;
4496 }
4497
4498 int peer_default_originate_set(struct peer *peer, afi_t afi, safi_t safi,
4499 const char *rmap, struct route_map *route_map)
4500 {
4501 struct peer *member;
4502 struct listnode *node, *nnode;
4503
4504 /* Set flag and configuration on peer. */
4505 peer_af_flag_set(peer, afi, safi, PEER_FLAG_DEFAULT_ORIGINATE);
4506 if (rmap) {
4507 if (!peer->default_rmap[afi][safi].name
4508 || strcmp(rmap, peer->default_rmap[afi][safi].name) != 0) {
4509 if (peer->default_rmap[afi][safi].name)
4510 XFREE(MTYPE_ROUTE_MAP_NAME,
4511 peer->default_rmap[afi][safi].name);
4512
4513 peer->default_rmap[afi][safi].name =
4514 XSTRDUP(MTYPE_ROUTE_MAP_NAME, rmap);
4515 peer->default_rmap[afi][safi].map = route_map;
4516 }
4517 } else if (!rmap) {
4518 if (peer->default_rmap[afi][safi].name)
4519 XFREE(MTYPE_ROUTE_MAP_NAME,
4520 peer->default_rmap[afi][safi].name);
4521
4522 peer->default_rmap[afi][safi].name = NULL;
4523 peer->default_rmap[afi][safi].map = NULL;
4524 }
4525
4526 /* Check if handling a regular peer. */
4527 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
4528 /* Update peer route announcements. */
4529 if (peer->status == Established && peer->afc_nego[afi][safi]) {
4530 update_group_adjust_peer(peer_af_find(peer, afi, safi));
4531 bgp_default_originate(peer, afi, safi, 0);
4532 bgp_announce_route(peer, afi, safi);
4533 }
4534
4535 /* Skip peer-group mechanics for regular peers. */
4536 return 0;
4537 }
4538
4539 /*
4540 * Set flag and configuration on all peer-group members, unless they are
4541 * explicitely overriding peer-group configuration.
4542 */
4543 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
4544 /* Skip peers with overridden configuration. */
4545 if (CHECK_FLAG(member->af_flags_override[afi][safi],
4546 PEER_FLAG_DEFAULT_ORIGINATE))
4547 continue;
4548
4549 /* Set flag and configuration on peer-group member. */
4550 SET_FLAG(member->af_flags[afi][safi],
4551 PEER_FLAG_DEFAULT_ORIGINATE);
4552 if (rmap) {
4553 if (member->default_rmap[afi][safi].name)
4554 XFREE(MTYPE_ROUTE_MAP_NAME,
4555 member->default_rmap[afi][safi].name);
4556
4557 member->default_rmap[afi][safi].name =
4558 XSTRDUP(MTYPE_ROUTE_MAP_NAME, rmap);
4559 member->default_rmap[afi][safi].map = route_map;
4560 }
4561
4562 /* Update peer route announcements. */
4563 if (member->status == Established
4564 && member->afc_nego[afi][safi]) {
4565 update_group_adjust_peer(
4566 peer_af_find(member, afi, safi));
4567 bgp_default_originate(member, afi, safi, 0);
4568 bgp_announce_route(member, afi, safi);
4569 }
4570 }
4571
4572 return 0;
4573 }
4574
4575 int peer_default_originate_unset(struct peer *peer, afi_t afi, safi_t safi)
4576 {
4577 struct peer *member;
4578 struct listnode *node, *nnode;
4579
4580 /* Inherit configuration from peer-group if peer is member. */
4581 if (peer_group_active(peer)) {
4582 peer_af_flag_inherit(peer, afi, safi,
4583 PEER_FLAG_DEFAULT_ORIGINATE);
4584 PEER_STR_ATTR_INHERIT(peer, peer->group,
4585 default_rmap[afi][safi].name,
4586 MTYPE_ROUTE_MAP_NAME);
4587 PEER_ATTR_INHERIT(peer, peer->group,
4588 default_rmap[afi][safi].map);
4589 } else {
4590 /* Otherwise remove flag and configuration from peer. */
4591 peer_af_flag_unset(peer, afi, safi,
4592 PEER_FLAG_DEFAULT_ORIGINATE);
4593 if (peer->default_rmap[afi][safi].name)
4594 XFREE(MTYPE_ROUTE_MAP_NAME,
4595 peer->default_rmap[afi][safi].name);
4596 peer->default_rmap[afi][safi].name = NULL;
4597 peer->default_rmap[afi][safi].map = NULL;
4598 }
4599
4600 /* Check if handling a regular peer. */
4601 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
4602 /* Update peer route announcements. */
4603 if (peer->status == Established && peer->afc_nego[afi][safi]) {
4604 update_group_adjust_peer(peer_af_find(peer, afi, safi));
4605 bgp_default_originate(peer, afi, safi, 1);
4606 bgp_announce_route(peer, afi, safi);
4607 }
4608
4609 /* Skip peer-group mechanics for regular peers. */
4610 return 0;
4611 }
4612
4613 /*
4614 * Remove flag and configuration from all peer-group members, unless
4615 * they are explicitely overriding peer-group configuration.
4616 */
4617 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
4618 /* Skip peers with overridden configuration. */
4619 if (CHECK_FLAG(member->af_flags_override[afi][safi],
4620 PEER_FLAG_DEFAULT_ORIGINATE))
4621 continue;
4622
4623 /* Remove flag and configuration on peer-group member. */
4624 UNSET_FLAG(peer->af_flags[afi][safi],
4625 PEER_FLAG_DEFAULT_ORIGINATE);
4626 if (peer->default_rmap[afi][safi].name)
4627 XFREE(MTYPE_ROUTE_MAP_NAME,
4628 peer->default_rmap[afi][safi].name);
4629 peer->default_rmap[afi][safi].name = NULL;
4630 peer->default_rmap[afi][safi].map = NULL;
4631
4632 /* Update peer route announcements. */
4633 if (peer->status == Established && peer->afc_nego[afi][safi]) {
4634 update_group_adjust_peer(peer_af_find(peer, afi, safi));
4635 bgp_default_originate(peer, afi, safi, 1);
4636 bgp_announce_route(peer, afi, safi);
4637 }
4638 }
4639
4640 return 0;
4641 }
4642
4643 int peer_port_set(struct peer *peer, uint16_t port)
4644 {
4645 peer->port = port;
4646 return 0;
4647 }
4648
4649 int peer_port_unset(struct peer *peer)
4650 {
4651 peer->port = BGP_PORT_DEFAULT;
4652 return 0;
4653 }
4654
4655 /*
4656 * Helper function that is called after the name of the policy
4657 * being used by a peer has changed (AF specific). Automatically
4658 * initiates inbound or outbound processing as needed.
4659 */
4660 static void peer_on_policy_change(struct peer *peer, afi_t afi, safi_t safi,
4661 int outbound)
4662 {
4663 if (outbound) {
4664 update_group_adjust_peer(peer_af_find(peer, afi, safi));
4665 if (peer->status == Established)
4666 bgp_announce_route(peer, afi, safi);
4667 } else {
4668 if (peer->status != Established)
4669 return;
4670
4671 if (CHECK_FLAG(peer->af_flags[afi][safi],
4672 PEER_FLAG_SOFT_RECONFIG))
4673 bgp_soft_reconfig_in(peer, afi, safi);
4674 else if (CHECK_FLAG(peer->cap, PEER_CAP_REFRESH_OLD_RCV)
4675 || CHECK_FLAG(peer->cap, PEER_CAP_REFRESH_NEW_RCV))
4676 bgp_route_refresh_send(peer, afi, safi, 0, 0, 0);
4677 }
4678 }
4679
4680
4681 /* neighbor weight. */
4682 int peer_weight_set(struct peer *peer, afi_t afi, safi_t safi, uint16_t weight)
4683 {
4684 struct peer *member;
4685 struct listnode *node, *nnode;
4686
4687 /* Set flag and configuration on peer. */
4688 peer_af_flag_set(peer, afi, safi, PEER_FLAG_WEIGHT);
4689 if (peer->weight[afi][safi] != weight) {
4690 peer->weight[afi][safi] = weight;
4691 peer_on_policy_change(peer, afi, safi, 0);
4692 }
4693
4694 /* Skip peer-group mechanics for regular peers. */
4695 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP))
4696 return 0;
4697
4698 /*
4699 * Set flag and configuration on all peer-group members, unless they are
4700 * explicitely overriding peer-group configuration.
4701 */
4702 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
4703 /* Skip peers with overridden configuration. */
4704 if (CHECK_FLAG(member->af_flags_override[afi][safi],
4705 PEER_FLAG_WEIGHT))
4706 continue;
4707
4708 /* Set flag and configuration on peer-group member. */
4709 SET_FLAG(member->af_flags[afi][safi], PEER_FLAG_WEIGHT);
4710 if (member->weight[afi][safi] != weight) {
4711 member->weight[afi][safi] = weight;
4712 peer_on_policy_change(member, afi, safi, 0);
4713 }
4714 }
4715
4716 return 0;
4717 }
4718
4719 int peer_weight_unset(struct peer *peer, afi_t afi, safi_t safi)
4720 {
4721 struct peer *member;
4722 struct listnode *node, *nnode;
4723
4724 if (!CHECK_FLAG(peer->af_flags[afi][safi], PEER_FLAG_WEIGHT))
4725 return 0;
4726
4727 /* Inherit configuration from peer-group if peer is member. */
4728 if (peer_group_active(peer)) {
4729 peer_af_flag_inherit(peer, afi, safi, PEER_FLAG_WEIGHT);
4730 PEER_ATTR_INHERIT(peer, peer->group, weight[afi][safi]);
4731
4732 peer_on_policy_change(peer, afi, safi, 0);
4733 return 0;
4734 }
4735
4736 /* Remove flag and configuration from peer. */
4737 peer_af_flag_unset(peer, afi, safi, PEER_FLAG_WEIGHT);
4738 peer->weight[afi][safi] = 0;
4739 peer_on_policy_change(peer, afi, safi, 0);
4740
4741 /* Skip peer-group mechanics for regular peers. */
4742 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP))
4743 return 0;
4744
4745 /*
4746 * Remove flag and configuration from all peer-group members, unless
4747 * they are explicitely overriding peer-group configuration.
4748 */
4749 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
4750 /* Skip peers with overridden configuration. */
4751 if (CHECK_FLAG(member->af_flags_override[afi][safi],
4752 PEER_FLAG_WEIGHT))
4753 continue;
4754
4755 /* Skip peers where flag is already disabled. */
4756 if (!CHECK_FLAG(member->af_flags[afi][safi], PEER_FLAG_WEIGHT))
4757 continue;
4758
4759 /* Remove flag and configuration on peer-group member. */
4760 UNSET_FLAG(member->af_flags[afi][safi], PEER_FLAG_WEIGHT);
4761 member->weight[afi][safi] = 0;
4762 peer_on_policy_change(member, afi, safi, 0);
4763 }
4764
4765 return 0;
4766 }
4767
4768 int peer_timers_set(struct peer *peer, uint32_t keepalive, uint32_t holdtime)
4769 {
4770 struct peer *member;
4771 struct listnode *node, *nnode;
4772
4773 if (keepalive > 65535)
4774 return BGP_ERR_INVALID_VALUE;
4775
4776 if (holdtime > 65535)
4777 return BGP_ERR_INVALID_VALUE;
4778
4779 if (holdtime < 3 && holdtime != 0)
4780 return BGP_ERR_INVALID_VALUE;
4781
4782 /* Set flag and configuration on peer. */
4783 peer_flag_set(peer, PEER_FLAG_TIMER);
4784 peer->holdtime = holdtime;
4785 peer->keepalive = (keepalive < holdtime / 3 ? keepalive : holdtime / 3);
4786
4787 /* Skip peer-group mechanics for regular peers. */
4788 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP))
4789 return 0;
4790
4791 /*
4792 * Set flag and configuration on all peer-group members, unless they are
4793 * explicitely overriding peer-group configuration.
4794 */
4795 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
4796 /* Skip peers with overridden configuration. */
4797 if (CHECK_FLAG(member->flags_override, PEER_FLAG_TIMER))
4798 continue;
4799
4800 /* Set flag and configuration on peer-group member. */
4801 SET_FLAG(member->flags, PEER_FLAG_TIMER);
4802 PEER_ATTR_INHERIT(peer, peer->group, holdtime);
4803 PEER_ATTR_INHERIT(peer, peer->group, keepalive);
4804 }
4805
4806 return 0;
4807 }
4808
4809 int peer_timers_unset(struct peer *peer)
4810 {
4811 struct peer *member;
4812 struct listnode *node, *nnode;
4813
4814 /* Inherit configuration from peer-group if peer is member. */
4815 if (peer_group_active(peer)) {
4816 peer_flag_inherit(peer, PEER_FLAG_TIMER);
4817 PEER_ATTR_INHERIT(peer, peer->group, holdtime);
4818 PEER_ATTR_INHERIT(peer, peer->group, keepalive);
4819 } else {
4820 /* Otherwise remove flag and configuration from peer. */
4821 peer_flag_unset(peer, PEER_FLAG_TIMER);
4822 peer->holdtime = 0;
4823 peer->keepalive = 0;
4824 }
4825
4826 /* Skip peer-group mechanics for regular peers. */
4827 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP))
4828 return 0;
4829
4830 /*
4831 * Remove flag and configuration from all peer-group members, unless
4832 * they are explicitely overriding peer-group configuration.
4833 */
4834 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
4835 /* Skip peers with overridden configuration. */
4836 if (CHECK_FLAG(member->flags_override, PEER_FLAG_TIMER))
4837 continue;
4838
4839 /* Remove flag and configuration on peer-group member. */
4840 UNSET_FLAG(member->flags, PEER_FLAG_TIMER);
4841 member->holdtime = 0;
4842 member->keepalive = 0;
4843 }
4844
4845 return 0;
4846 }
4847
4848 int peer_timers_connect_set(struct peer *peer, uint32_t connect)
4849 {
4850 struct peer *member;
4851 struct listnode *node, *nnode;
4852
4853 if (connect > 65535)
4854 return BGP_ERR_INVALID_VALUE;
4855
4856 /* Set flag and configuration on peer. */
4857 peer_flag_set(peer, PEER_FLAG_TIMER_CONNECT);
4858 peer->connect = connect;
4859 peer->v_connect = connect;
4860
4861 /* Skip peer-group mechanics for regular peers. */
4862 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP))
4863 return 0;
4864
4865 /*
4866 * Set flag and configuration on all peer-group members, unless they are
4867 * explicitely overriding peer-group configuration.
4868 */
4869 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
4870 /* Skip peers with overridden configuration. */
4871 if (CHECK_FLAG(member->flags_override, PEER_FLAG_TIMER_CONNECT))
4872 continue;
4873
4874 /* Set flag and configuration on peer-group member. */
4875 SET_FLAG(member->flags, PEER_FLAG_TIMER_CONNECT);
4876 member->connect = connect;
4877 member->v_connect = connect;
4878 }
4879
4880 return 0;
4881 }
4882
4883 int peer_timers_connect_unset(struct peer *peer)
4884 {
4885 struct peer *member;
4886 struct listnode *node, *nnode;
4887
4888 /* Inherit configuration from peer-group if peer is member. */
4889 if (peer_group_active(peer)) {
4890 peer_flag_inherit(peer, PEER_FLAG_TIMER_CONNECT);
4891 PEER_ATTR_INHERIT(peer, peer->group, connect);
4892 } else {
4893 /* Otherwise remove flag and configuration from peer. */
4894 peer_flag_unset(peer, PEER_FLAG_TIMER_CONNECT);
4895 peer->connect = 0;
4896 }
4897
4898 /* Set timer with fallback to default value. */
4899 if (peer->connect)
4900 peer->v_connect = peer->connect;
4901 else
4902 peer->v_connect = BGP_DEFAULT_CONNECT_RETRY;
4903
4904 /* Skip peer-group mechanics for regular peers. */
4905 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP))
4906 return 0;
4907
4908 /*
4909 * Remove flag and configuration from all peer-group members, unless
4910 * they are explicitely overriding peer-group configuration.
4911 */
4912 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
4913 /* Skip peers with overridden configuration. */
4914 if (CHECK_FLAG(member->flags_override, PEER_FLAG_TIMER_CONNECT))
4915 continue;
4916
4917 /* Remove flag and configuration on peer-group member. */
4918 UNSET_FLAG(member->flags, PEER_FLAG_TIMER_CONNECT);
4919 member->connect = 0;
4920 member->v_connect = BGP_DEFAULT_CONNECT_RETRY;
4921 }
4922
4923 return 0;
4924 }
4925
4926 int peer_advertise_interval_set(struct peer *peer, uint32_t routeadv)
4927 {
4928 struct peer *member;
4929 struct listnode *node, *nnode;
4930
4931 if (routeadv > 600)
4932 return BGP_ERR_INVALID_VALUE;
4933
4934 /* Set flag and configuration on peer. */
4935 peer_flag_set(peer, PEER_FLAG_ROUTEADV);
4936 peer->routeadv = routeadv;
4937 peer->v_routeadv = routeadv;
4938
4939 /* Check if handling a regular peer. */
4940 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
4941 /* Update peer route announcements. */
4942 update_group_adjust_peer_afs(peer);
4943 if (peer->status == Established)
4944 bgp_announce_route_all(peer);
4945
4946 /* Skip peer-group mechanics for regular peers. */
4947 return 0;
4948 }
4949
4950 /*
4951 * Set flag and configuration on all peer-group members, unless they are
4952 * explicitely overriding peer-group configuration.
4953 */
4954 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
4955 /* Skip peers with overridden configuration. */
4956 if (CHECK_FLAG(member->flags_override, PEER_FLAG_ROUTEADV))
4957 continue;
4958
4959 /* Set flag and configuration on peer-group member. */
4960 SET_FLAG(member->flags, PEER_FLAG_ROUTEADV);
4961 member->routeadv = routeadv;
4962 member->v_routeadv = routeadv;
4963
4964 /* Update peer route announcements. */
4965 update_group_adjust_peer_afs(member);
4966 if (member->status == Established)
4967 bgp_announce_route_all(member);
4968 }
4969
4970 return 0;
4971 }
4972
4973 int peer_advertise_interval_unset(struct peer *peer)
4974 {
4975 struct peer *member;
4976 struct listnode *node, *nnode;
4977
4978 /* Inherit configuration from peer-group if peer is member. */
4979 if (peer_group_active(peer)) {
4980 peer_flag_inherit(peer, PEER_FLAG_ROUTEADV);
4981 PEER_ATTR_INHERIT(peer, peer->group, routeadv);
4982 } else {
4983 /* Otherwise remove flag and configuration from peer. */
4984 peer_flag_unset(peer, PEER_FLAG_ROUTEADV);
4985 peer->routeadv = 0;
4986 }
4987
4988 /* Set timer with fallback to default value. */
4989 if (peer->routeadv)
4990 peer->v_routeadv = peer->routeadv;
4991 else
4992 peer->v_routeadv = (peer->sort == BGP_PEER_IBGP)
4993 ? BGP_DEFAULT_IBGP_ROUTEADV
4994 : BGP_DEFAULT_EBGP_ROUTEADV;
4995
4996 /* Check if handling a regular peer. */
4997 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
4998 /* Update peer route announcements. */
4999 update_group_adjust_peer_afs(peer);
5000 if (peer->status == Established)
5001 bgp_announce_route_all(peer);
5002
5003 /* Skip peer-group mechanics for regular peers. */
5004 return 0;
5005 }
5006
5007 /*
5008 * Remove flag and configuration from all peer-group members, unless
5009 * they are explicitely overriding peer-group configuration.
5010 */
5011 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
5012 /* Skip peers with overridden configuration. */
5013 if (CHECK_FLAG(member->flags_override, PEER_FLAG_ROUTEADV))
5014 continue;
5015
5016 /* Remove flag and configuration on peer-group member. */
5017 UNSET_FLAG(member->flags, PEER_FLAG_ROUTEADV);
5018 member->routeadv = 0;
5019 member->v_routeadv = (member->sort == BGP_PEER_IBGP)
5020 ? BGP_DEFAULT_IBGP_ROUTEADV
5021 : BGP_DEFAULT_EBGP_ROUTEADV;
5022
5023 /* Update peer route announcements. */
5024 update_group_adjust_peer_afs(member);
5025 if (member->status == Established)
5026 bgp_announce_route_all(member);
5027 }
5028
5029 return 0;
5030 }
5031
5032 /* neighbor interface */
5033 void peer_interface_set(struct peer *peer, const char *str)
5034 {
5035 if (peer->ifname)
5036 XFREE(MTYPE_BGP_PEER_IFNAME, peer->ifname);
5037 peer->ifname = XSTRDUP(MTYPE_BGP_PEER_IFNAME, str);
5038 }
5039
5040 void peer_interface_unset(struct peer *peer)
5041 {
5042 if (peer->ifname)
5043 XFREE(MTYPE_BGP_PEER_IFNAME, peer->ifname);
5044 peer->ifname = NULL;
5045 }
5046
5047 /* Allow-as in. */
5048 int peer_allowas_in_set(struct peer *peer, afi_t afi, safi_t safi,
5049 int allow_num, int origin)
5050 {
5051 struct peer *member;
5052 struct listnode *node, *nnode;
5053
5054 if (!origin && (allow_num < 1 || allow_num > 10))
5055 return BGP_ERR_INVALID_VALUE;
5056
5057 /* Set flag and configuration on peer. */
5058 peer_af_flag_set(peer, afi, safi, PEER_FLAG_ALLOWAS_IN);
5059 if (origin) {
5060 if (peer->allowas_in[afi][safi] != 0
5061 || !CHECK_FLAG(peer->af_flags[afi][safi],
5062 PEER_FLAG_ALLOWAS_IN_ORIGIN)) {
5063 peer_af_flag_set(peer, afi, safi,
5064 PEER_FLAG_ALLOWAS_IN_ORIGIN);
5065 peer->allowas_in[afi][safi] = 0;
5066 peer_on_policy_change(peer, afi, safi, 0);
5067 }
5068 } else {
5069 if (peer->allowas_in[afi][safi] != allow_num
5070 || CHECK_FLAG(peer->af_flags[afi][safi],
5071 PEER_FLAG_ALLOWAS_IN_ORIGIN)) {
5072
5073 peer_af_flag_unset(peer, afi, safi,
5074 PEER_FLAG_ALLOWAS_IN_ORIGIN);
5075 peer->allowas_in[afi][safi] = allow_num;
5076 peer_on_policy_change(peer, afi, safi, 0);
5077 }
5078 }
5079
5080 /* Skip peer-group mechanics for regular peers. */
5081 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP))
5082 return 0;
5083
5084 /*
5085 * Set flag and configuration on all peer-group members, unless
5086 * they are explicitely overriding peer-group configuration.
5087 */
5088 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
5089 /* Skip peers with overridden configuration. */
5090 if (CHECK_FLAG(member->af_flags_override[afi][safi],
5091 PEER_FLAG_ALLOWAS_IN))
5092 continue;
5093
5094 /* Set flag and configuration on peer-group member. */
5095 SET_FLAG(member->af_flags[afi][safi], PEER_FLAG_ALLOWAS_IN);
5096 if (origin) {
5097 if (member->allowas_in[afi][safi] != 0
5098 || !CHECK_FLAG(member->af_flags[afi][safi],
5099 PEER_FLAG_ALLOWAS_IN_ORIGIN)) {
5100 SET_FLAG(member->af_flags[afi][safi],
5101 PEER_FLAG_ALLOWAS_IN_ORIGIN);
5102 member->allowas_in[afi][safi] = 0;
5103 peer_on_policy_change(peer, afi, safi, 0);
5104 }
5105 } else {
5106 if (member->allowas_in[afi][safi] != allow_num
5107 || CHECK_FLAG(member->af_flags[afi][safi],
5108 PEER_FLAG_ALLOWAS_IN_ORIGIN)) {
5109 UNSET_FLAG(member->af_flags[afi][safi],
5110 PEER_FLAG_ALLOWAS_IN_ORIGIN);
5111 member->allowas_in[afi][safi] = allow_num;
5112 peer_on_policy_change(peer, afi, safi, 0);
5113 }
5114 }
5115 }
5116
5117 return 0;
5118 }
5119
5120 int peer_allowas_in_unset(struct peer *peer, afi_t afi, safi_t safi)
5121 {
5122 struct peer *member;
5123 struct listnode *node, *nnode;
5124
5125 /* Skip peer if flag is already disabled. */
5126 if (!CHECK_FLAG(peer->af_flags[afi][safi], PEER_FLAG_ALLOWAS_IN))
5127 return 0;
5128
5129 /* Inherit configuration from peer-group if peer is member. */
5130 if (peer_group_active(peer)) {
5131 peer_af_flag_inherit(peer, afi, safi, PEER_FLAG_ALLOWAS_IN);
5132 peer_af_flag_inherit(peer, afi, safi,
5133 PEER_FLAG_ALLOWAS_IN_ORIGIN);
5134 PEER_ATTR_INHERIT(peer, peer->group, allowas_in[afi][safi]);
5135 peer_on_policy_change(peer, afi, safi, 0);
5136
5137 return 0;
5138 }
5139
5140 /* Remove flag and configuration from peer. */
5141 peer_af_flag_unset(peer, afi, safi, PEER_FLAG_ALLOWAS_IN);
5142 peer_af_flag_unset(peer, afi, safi, PEER_FLAG_ALLOWAS_IN_ORIGIN);
5143 peer->allowas_in[afi][safi] = 0;
5144 peer_on_policy_change(peer, afi, safi, 0);
5145
5146 /* Skip peer-group mechanics if handling a regular peer. */
5147 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP))
5148 return 0;
5149
5150 /*
5151 * Remove flags and configuration from all peer-group members, unless
5152 * they are explicitely overriding peer-group configuration.
5153 */
5154 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
5155 /* Skip peers with overridden configuration. */
5156 if (CHECK_FLAG(member->af_flags_override[afi][safi],
5157 PEER_FLAG_ALLOWAS_IN))
5158 continue;
5159
5160 /* Skip peers where flag is already disabled. */
5161 if (!CHECK_FLAG(member->af_flags[afi][safi],
5162 PEER_FLAG_ALLOWAS_IN))
5163 continue;
5164
5165 /* Remove flags and configuration on peer-group member. */
5166 UNSET_FLAG(member->af_flags[afi][safi], PEER_FLAG_ALLOWAS_IN);
5167 UNSET_FLAG(member->af_flags[afi][safi],
5168 PEER_FLAG_ALLOWAS_IN_ORIGIN);
5169 member->allowas_in[afi][safi] = 0;
5170 peer_on_policy_change(member, afi, safi, 0);
5171 }
5172
5173 return 0;
5174 }
5175
5176 int peer_local_as_set(struct peer *peer, as_t as, int no_prepend,
5177 int replace_as)
5178 {
5179 bool old_no_prepend, old_replace_as;
5180 struct bgp *bgp = peer->bgp;
5181 struct peer *member;
5182 struct listnode *node, *nnode;
5183
5184 if (peer_sort(peer) != BGP_PEER_EBGP
5185 && peer_sort(peer) != BGP_PEER_INTERNAL)
5186 return BGP_ERR_LOCAL_AS_ALLOWED_ONLY_FOR_EBGP;
5187
5188 if (bgp->as == as)
5189 return BGP_ERR_CANNOT_HAVE_LOCAL_AS_SAME_AS;
5190
5191 if (peer->as == as)
5192 return BGP_ERR_CANNOT_HAVE_LOCAL_AS_SAME_AS_REMOTE_AS;
5193
5194 /* Save previous flag states. */
5195 old_no_prepend =
5196 !!CHECK_FLAG(peer->flags, PEER_FLAG_LOCAL_AS_NO_PREPEND);
5197 old_replace_as =
5198 !!CHECK_FLAG(peer->flags, PEER_FLAG_LOCAL_AS_REPLACE_AS);
5199
5200 /* Set flag and configuration on peer. */
5201 peer_flag_set(peer, PEER_FLAG_LOCAL_AS);
5202 peer_flag_modify(peer, PEER_FLAG_LOCAL_AS_NO_PREPEND, no_prepend);
5203 peer_flag_modify(peer, PEER_FLAG_LOCAL_AS_REPLACE_AS, replace_as);
5204
5205 if (peer->change_local_as == as && old_no_prepend == no_prepend
5206 && old_replace_as == replace_as)
5207 return 0;
5208 peer->change_local_as = as;
5209
5210 /* Check if handling a regular peer. */
5211 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
5212 /* Send notification or reset peer depending on state. */
5213 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
5214 peer->last_reset = PEER_DOWN_LOCAL_AS_CHANGE;
5215 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
5216 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
5217 } else
5218 bgp_session_reset(peer);
5219
5220 /* Skip peer-group mechanics for regular peers. */
5221 return 0;
5222 }
5223
5224 /*
5225 * Set flag and configuration on all peer-group members, unless they are
5226 * explicitely overriding peer-group configuration.
5227 */
5228 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
5229 /* Skip peers with overridden configuration. */
5230 if (CHECK_FLAG(member->flags_override, PEER_FLAG_LOCAL_AS))
5231 continue;
5232
5233 /* Skip peers with the same configuration. */
5234 old_no_prepend = CHECK_FLAG(member->flags,
5235 PEER_FLAG_LOCAL_AS_NO_PREPEND);
5236 old_replace_as = CHECK_FLAG(member->flags,
5237 PEER_FLAG_LOCAL_AS_REPLACE_AS);
5238 if (member->change_local_as == as
5239 && CHECK_FLAG(member->flags, PEER_FLAG_LOCAL_AS)
5240 && old_no_prepend == no_prepend
5241 && old_replace_as == replace_as)
5242 continue;
5243
5244 /* Set flag and configuration on peer-group member. */
5245 SET_FLAG(member->flags, PEER_FLAG_LOCAL_AS);
5246 COND_FLAG(member->flags, PEER_FLAG_LOCAL_AS_NO_PREPEND,
5247 no_prepend);
5248 COND_FLAG(member->flags, PEER_FLAG_LOCAL_AS_REPLACE_AS,
5249 replace_as);
5250 member->change_local_as = as;
5251
5252 /* Send notification or stop peer depending on state. */
5253 if (BGP_IS_VALID_STATE_FOR_NOTIF(member->status)) {
5254 member->last_reset = PEER_DOWN_LOCAL_AS_CHANGE;
5255 bgp_notify_send(member, BGP_NOTIFY_CEASE,
5256 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
5257 } else
5258 BGP_EVENT_ADD(member, BGP_Stop);
5259 }
5260
5261 return 0;
5262 }
5263
5264 int peer_local_as_unset(struct peer *peer)
5265 {
5266 struct peer *member;
5267 struct listnode *node, *nnode;
5268
5269 if (!CHECK_FLAG(peer->flags, PEER_FLAG_LOCAL_AS))
5270 return 0;
5271
5272 /* Inherit configuration from peer-group if peer is member. */
5273 if (peer_group_active(peer)) {
5274 peer_flag_inherit(peer, PEER_FLAG_LOCAL_AS);
5275 peer_flag_inherit(peer, PEER_FLAG_LOCAL_AS_NO_PREPEND);
5276 peer_flag_inherit(peer, PEER_FLAG_LOCAL_AS_REPLACE_AS);
5277 PEER_ATTR_INHERIT(peer, peer->group, change_local_as);
5278 } else {
5279 /* Otherwise remove flag and configuration from peer. */
5280 peer_flag_unset(peer, PEER_FLAG_LOCAL_AS);
5281 peer_flag_unset(peer, PEER_FLAG_LOCAL_AS_NO_PREPEND);
5282 peer_flag_unset(peer, PEER_FLAG_LOCAL_AS_REPLACE_AS);
5283 peer->change_local_as = 0;
5284 }
5285
5286 /* Check if handling a regular peer. */
5287 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
5288 /* Send notification or stop peer depending on state. */
5289 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status)) {
5290 peer->last_reset = PEER_DOWN_LOCAL_AS_CHANGE;
5291 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
5292 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
5293 } else
5294 BGP_EVENT_ADD(peer, BGP_Stop);
5295
5296 /* Skip peer-group mechanics for regular peers. */
5297 return 0;
5298 }
5299
5300 /*
5301 * Remove flag and configuration from all peer-group members, unless
5302 * they are explicitely overriding peer-group configuration.
5303 */
5304 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
5305 /* Skip peers with overridden configuration. */
5306 if (CHECK_FLAG(member->flags_override, PEER_FLAG_LOCAL_AS))
5307 continue;
5308
5309 /* Remove flag and configuration on peer-group member. */
5310 UNSET_FLAG(member->flags, PEER_FLAG_LOCAL_AS);
5311 UNSET_FLAG(member->flags, PEER_FLAG_LOCAL_AS_NO_PREPEND);
5312 UNSET_FLAG(member->flags, PEER_FLAG_LOCAL_AS_REPLACE_AS);
5313 member->change_local_as = 0;
5314
5315 /* Send notification or stop peer depending on state. */
5316 if (BGP_IS_VALID_STATE_FOR_NOTIF(member->status)) {
5317 member->last_reset = PEER_DOWN_LOCAL_AS_CHANGE;
5318 bgp_notify_send(member, BGP_NOTIFY_CEASE,
5319 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
5320 } else
5321 bgp_session_reset(member);
5322 }
5323
5324 return 0;
5325 }
5326
5327 /* Set password for authenticating with the peer. */
5328 int peer_password_set(struct peer *peer, const char *password)
5329 {
5330 struct peer *member;
5331 struct listnode *node, *nnode;
5332 int len = password ? strlen(password) : 0;
5333 int ret = BGP_SUCCESS;
5334
5335 if ((len < PEER_PASSWORD_MINLEN) || (len > PEER_PASSWORD_MAXLEN))
5336 return BGP_ERR_INVALID_VALUE;
5337
5338 /* Set flag and configuration on peer. */
5339 peer_flag_set(peer, PEER_FLAG_PASSWORD);
5340 if (peer->password && strcmp(peer->password, password) == 0)
5341 return 0;
5342 XFREE(MTYPE_PEER_PASSWORD, peer->password);
5343 peer->password = XSTRDUP(MTYPE_PEER_PASSWORD, password);
5344
5345 /* Check if handling a regular peer. */
5346 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
5347 /* Send notification or reset peer depending on state. */
5348 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status))
5349 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
5350 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
5351 else
5352 bgp_session_reset(peer);
5353
5354 /*
5355 * Attempt to install password on socket and skip peer-group
5356 * mechanics.
5357 */
5358 if (BGP_PEER_SU_UNSPEC(peer))
5359 return BGP_SUCCESS;
5360 return (bgp_md5_set(peer) >= 0) ? BGP_SUCCESS
5361 : BGP_ERR_TCPSIG_FAILED;
5362 }
5363
5364 /*
5365 * Set flag and configuration on all peer-group members, unless they are
5366 * explicitely overriding peer-group configuration.
5367 */
5368 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
5369 /* Skip peers with overridden configuration. */
5370 if (CHECK_FLAG(member->flags_override, PEER_FLAG_PASSWORD))
5371 continue;
5372
5373 /* Skip peers with the same password. */
5374 if (member->password && strcmp(member->password, password) == 0)
5375 continue;
5376
5377 /* Set flag and configuration on peer-group member. */
5378 SET_FLAG(member->flags, PEER_FLAG_PASSWORD);
5379 if (member->password)
5380 XFREE(MTYPE_PEER_PASSWORD, member->password);
5381 member->password = XSTRDUP(MTYPE_PEER_PASSWORD, password);
5382
5383 /* Send notification or reset peer depending on state. */
5384 if (BGP_IS_VALID_STATE_FOR_NOTIF(member->status))
5385 bgp_notify_send(member, BGP_NOTIFY_CEASE,
5386 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
5387 else
5388 bgp_session_reset(member);
5389
5390 /* Attempt to install password on socket. */
5391 if (!BGP_PEER_SU_UNSPEC(member) && bgp_md5_set(member) < 0)
5392 ret = BGP_ERR_TCPSIG_FAILED;
5393 }
5394
5395 return ret;
5396 }
5397
5398 int peer_password_unset(struct peer *peer)
5399 {
5400 struct peer *member;
5401 struct listnode *node, *nnode;
5402
5403 if (!CHECK_FLAG(peer->flags, PEER_FLAG_PASSWORD))
5404 return 0;
5405
5406 /* Inherit configuration from peer-group if peer is member. */
5407 if (peer_group_active(peer)) {
5408 peer_flag_inherit(peer, PEER_FLAG_PASSWORD);
5409 PEER_STR_ATTR_INHERIT(peer, peer->group, password,
5410 MTYPE_PEER_PASSWORD);
5411 } else {
5412 /* Otherwise remove flag and configuration from peer. */
5413 peer_flag_unset(peer, PEER_FLAG_PASSWORD);
5414 XFREE(MTYPE_PEER_PASSWORD, peer->password);
5415 }
5416
5417 /* Check if handling a regular peer. */
5418 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
5419 /* Send notification or reset peer depending on state. */
5420 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status))
5421 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
5422 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
5423 else
5424 bgp_session_reset(peer);
5425
5426 /* Attempt to uninstall password on socket. */
5427 if (!BGP_PEER_SU_UNSPEC(peer))
5428 bgp_md5_unset(peer);
5429
5430 /* Skip peer-group mechanics for regular peers. */
5431 return 0;
5432 }
5433
5434 /*
5435 * Remove flag and configuration from all peer-group members, unless
5436 * they are explicitely overriding peer-group configuration.
5437 */
5438 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
5439 /* Skip peers with overridden configuration. */
5440 if (CHECK_FLAG(member->flags_override, PEER_FLAG_PASSWORD))
5441 continue;
5442
5443 /* Remove flag and configuration on peer-group member. */
5444 UNSET_FLAG(member->flags, PEER_FLAG_PASSWORD);
5445 XFREE(MTYPE_PEER_PASSWORD, member->password);
5446
5447 /* Send notification or reset peer depending on state. */
5448 if (BGP_IS_VALID_STATE_FOR_NOTIF(member->status))
5449 bgp_notify_send(member, BGP_NOTIFY_CEASE,
5450 BGP_NOTIFY_CEASE_CONFIG_CHANGE);
5451 else
5452 bgp_session_reset(member);
5453
5454 /* Attempt to uninstall password on socket. */
5455 if (!BGP_PEER_SU_UNSPEC(member))
5456 bgp_md5_unset(member);
5457 }
5458
5459 return 0;
5460 }
5461
5462
5463 /* Set distribute list to the peer. */
5464 int peer_distribute_set(struct peer *peer, afi_t afi, safi_t safi, int direct,
5465 const char *name)
5466 {
5467 struct peer *member;
5468 struct bgp_filter *filter;
5469 struct listnode *node, *nnode;
5470
5471 if (direct != FILTER_IN && direct != FILTER_OUT)
5472 return BGP_ERR_INVALID_VALUE;
5473
5474 /* Set configuration on peer. */
5475 filter = &peer->filter[afi][safi];
5476 if (filter->plist[direct].name)
5477 return BGP_ERR_PEER_FILTER_CONFLICT;
5478 if (filter->dlist[direct].name)
5479 XFREE(MTYPE_BGP_FILTER_NAME, filter->dlist[direct].name);
5480 filter->dlist[direct].name = XSTRDUP(MTYPE_BGP_FILTER_NAME, name);
5481 filter->dlist[direct].alist = access_list_lookup(afi, name);
5482
5483 /* Check if handling a regular peer. */
5484 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
5485 /* Set override-flag and process peer route updates. */
5486 SET_FLAG(peer->filter_override[afi][safi][direct],
5487 PEER_FT_DISTRIBUTE_LIST);
5488 peer_on_policy_change(peer, afi, safi,
5489 (direct == FILTER_OUT) ? 1 : 0);
5490
5491 /* Skip peer-group mechanics for regular peers. */
5492 return 0;
5493 }
5494
5495 /*
5496 * Set configuration on all peer-group members, un less they are
5497 * explicitely overriding peer-group configuration.
5498 */
5499 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
5500 /* Skip peers with overridden configuration. */
5501 if (CHECK_FLAG(member->filter_override[afi][safi][direct],
5502 PEER_FT_DISTRIBUTE_LIST))
5503 continue;
5504
5505 /* Set configuration on peer-group member. */
5506 filter = &member->filter[afi][safi];
5507 if (filter->dlist[direct].name)
5508 XFREE(MTYPE_BGP_FILTER_NAME,
5509 filter->dlist[direct].name);
5510 filter->dlist[direct].name =
5511 XSTRDUP(MTYPE_BGP_FILTER_NAME, name);
5512 filter->dlist[direct].alist = access_list_lookup(afi, name);
5513
5514 /* Process peer route updates. */
5515 peer_on_policy_change(member, afi, safi,
5516 (direct == FILTER_OUT) ? 1 : 0);
5517 }
5518
5519 return 0;
5520 }
5521
5522 int peer_distribute_unset(struct peer *peer, afi_t afi, safi_t safi, int direct)
5523 {
5524 struct peer *member;
5525 struct bgp_filter *filter;
5526 struct listnode *node, *nnode;
5527
5528 if (direct != FILTER_IN && direct != FILTER_OUT)
5529 return BGP_ERR_INVALID_VALUE;
5530
5531 /* Unset override-flag unconditionally. */
5532 UNSET_FLAG(peer->filter_override[afi][safi][direct],
5533 PEER_FT_DISTRIBUTE_LIST);
5534
5535 /* Inherit configuration from peer-group if peer is member. */
5536 if (peer_group_active(peer)) {
5537 PEER_STR_ATTR_INHERIT(peer, peer->group,
5538 filter[afi][safi].dlist[direct].name,
5539 MTYPE_BGP_FILTER_NAME);
5540 PEER_ATTR_INHERIT(peer, peer->group,
5541 filter[afi][safi].dlist[direct].alist);
5542 } else {
5543 /* Otherwise remove configuration from peer. */
5544 filter = &peer->filter[afi][safi];
5545 if (filter->dlist[direct].name)
5546 XFREE(MTYPE_BGP_FILTER_NAME,
5547 filter->dlist[direct].name);
5548 filter->dlist[direct].name = NULL;
5549 filter->dlist[direct].alist = NULL;
5550 }
5551
5552 /* Check if handling a regular peer. */
5553 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
5554 /* Process peer route updates. */
5555 peer_on_policy_change(peer, afi, safi,
5556 (direct == FILTER_OUT) ? 1 : 0);
5557
5558 /* Skip peer-group mechanics for regular peers. */
5559 return 0;
5560 }
5561
5562 /*
5563 * Remove configuration on all peer-group members, unless they are
5564 * explicitely overriding peer-group configuration.
5565 */
5566 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
5567 /* Skip peers with overridden configuration. */
5568 if (CHECK_FLAG(member->filter_override[afi][safi][direct],
5569 PEER_FT_DISTRIBUTE_LIST))
5570 continue;
5571
5572 /* Remove configuration on peer-group member. */
5573 filter = &member->filter[afi][safi];
5574 if (filter->dlist[direct].name)
5575 XFREE(MTYPE_BGP_FILTER_NAME,
5576 filter->dlist[direct].name);
5577 filter->dlist[direct].name = NULL;
5578 filter->dlist[direct].alist = NULL;
5579
5580 /* Process peer route updates. */
5581 peer_on_policy_change(member, afi, safi,
5582 (direct == FILTER_OUT) ? 1 : 0);
5583 }
5584
5585 return 0;
5586 }
5587
5588 /* Update distribute list. */
5589 static void peer_distribute_update(struct access_list *access)
5590 {
5591 afi_t afi;
5592 safi_t safi;
5593 int direct;
5594 struct listnode *mnode, *mnnode;
5595 struct listnode *node, *nnode;
5596 struct bgp *bgp;
5597 struct peer *peer;
5598 struct peer_group *group;
5599 struct bgp_filter *filter;
5600
5601 for (ALL_LIST_ELEMENTS(bm->bgp, mnode, mnnode, bgp)) {
5602 if (access->name)
5603 update_group_policy_update(bgp, BGP_POLICY_FILTER_LIST,
5604 access->name, 0, 0);
5605 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
5606 FOREACH_AFI_SAFI (afi, safi) {
5607 filter = &peer->filter[afi][safi];
5608
5609 for (direct = FILTER_IN; direct < FILTER_MAX;
5610 direct++) {
5611 if (filter->dlist[direct].name)
5612 filter->dlist[direct]
5613 .alist = access_list_lookup(
5614 afi,
5615 filter->dlist[direct]
5616 .name);
5617 else
5618 filter->dlist[direct].alist =
5619 NULL;
5620 }
5621 }
5622 }
5623 for (ALL_LIST_ELEMENTS(bgp->group, node, nnode, group)) {
5624 FOREACH_AFI_SAFI (afi, safi) {
5625 filter = &group->conf->filter[afi][safi];
5626
5627 for (direct = FILTER_IN; direct < FILTER_MAX;
5628 direct++) {
5629 if (filter->dlist[direct].name)
5630 filter->dlist[direct]
5631 .alist = access_list_lookup(
5632 afi,
5633 filter->dlist[direct]
5634 .name);
5635 else
5636 filter->dlist[direct].alist =
5637 NULL;
5638 }
5639 }
5640 }
5641 #if ENABLE_BGP_VNC
5642 vnc_prefix_list_update(bgp);
5643 #endif
5644 }
5645 }
5646
5647 /* Set prefix list to the peer. */
5648 int peer_prefix_list_set(struct peer *peer, afi_t afi, safi_t safi, int direct,
5649 const char *name)
5650 {
5651 struct peer *member;
5652 struct bgp_filter *filter;
5653 struct listnode *node, *nnode;
5654
5655 if (direct != FILTER_IN && direct != FILTER_OUT)
5656 return BGP_ERR_INVALID_VALUE;
5657
5658 /* Set configuration on peer. */
5659 filter = &peer->filter[afi][safi];
5660 if (filter->dlist[direct].name)
5661 return BGP_ERR_PEER_FILTER_CONFLICT;
5662 if (filter->plist[direct].name)
5663 XFREE(MTYPE_BGP_FILTER_NAME, filter->plist[direct].name);
5664 filter->plist[direct].name = XSTRDUP(MTYPE_BGP_FILTER_NAME, name);
5665 filter->plist[direct].plist = prefix_list_lookup(afi, name);
5666
5667 /* Check if handling a regular peer. */
5668 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
5669 /* Set override-flag and process peer route updates. */
5670 SET_FLAG(peer->filter_override[afi][safi][direct],
5671 PEER_FT_PREFIX_LIST);
5672 peer_on_policy_change(peer, afi, safi,
5673 (direct == FILTER_OUT) ? 1 : 0);
5674
5675 /* Skip peer-group mechanics for regular peers. */
5676 return 0;
5677 }
5678
5679 /*
5680 * Set configuration on all peer-group members, unless they are
5681 * explicitely overriding peer-group configuration.
5682 */
5683 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
5684 /* Skip peers with overridden configuration. */
5685 if (CHECK_FLAG(member->filter_override[afi][safi][direct],
5686 PEER_FT_PREFIX_LIST))
5687 continue;
5688
5689 /* Set configuration on peer-group member. */
5690 filter = &member->filter[afi][safi];
5691 if (filter->plist[direct].name)
5692 XFREE(MTYPE_BGP_FILTER_NAME,
5693 filter->plist[direct].name);
5694 filter->plist[direct].name =
5695 XSTRDUP(MTYPE_BGP_FILTER_NAME, name);
5696 filter->plist[direct].plist = prefix_list_lookup(afi, name);
5697
5698 /* Process peer route updates. */
5699 peer_on_policy_change(member, afi, safi,
5700 (direct == FILTER_OUT) ? 1 : 0);
5701 }
5702
5703 return 0;
5704 }
5705
5706 int peer_prefix_list_unset(struct peer *peer, afi_t afi, safi_t safi,
5707 int direct)
5708 {
5709 struct peer *member;
5710 struct bgp_filter *filter;
5711 struct listnode *node, *nnode;
5712
5713 if (direct != FILTER_IN && direct != FILTER_OUT)
5714 return BGP_ERR_INVALID_VALUE;
5715
5716 /* Unset override-flag unconditionally. */
5717 UNSET_FLAG(peer->filter_override[afi][safi][direct],
5718 PEER_FT_PREFIX_LIST);
5719
5720 /* Inherit configuration from peer-group if peer is member. */
5721 if (peer_group_active(peer)) {
5722 PEER_STR_ATTR_INHERIT(peer, peer->group,
5723 filter[afi][safi].plist[direct].name,
5724 MTYPE_BGP_FILTER_NAME);
5725 PEER_ATTR_INHERIT(peer, peer->group,
5726 filter[afi][safi].plist[direct].plist);
5727 } else {
5728 /* Otherwise remove configuration from peer. */
5729 filter = &peer->filter[afi][safi];
5730 if (filter->plist[direct].name)
5731 XFREE(MTYPE_BGP_FILTER_NAME,
5732 filter->plist[direct].name);
5733 filter->plist[direct].name = NULL;
5734 filter->plist[direct].plist = NULL;
5735 }
5736
5737 /* Check if handling a regular peer. */
5738 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
5739 /* Process peer route updates. */
5740 peer_on_policy_change(peer, afi, safi,
5741 (direct == FILTER_OUT) ? 1 : 0);
5742
5743 /* Skip peer-group mechanics for regular peers. */
5744 return 0;
5745 }
5746
5747 /*
5748 * Remove configuration on all peer-group members, unless they are
5749 * explicitely overriding peer-group configuration.
5750 */
5751 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
5752 /* Skip peers with overridden configuration. */
5753 if (CHECK_FLAG(member->filter_override[afi][safi][direct],
5754 PEER_FT_PREFIX_LIST))
5755 continue;
5756
5757 /* Remove configuration on peer-group member. */
5758 filter = &member->filter[afi][safi];
5759 if (filter->plist[direct].name)
5760 XFREE(MTYPE_BGP_FILTER_NAME,
5761 filter->plist[direct].name);
5762 filter->plist[direct].name = NULL;
5763 filter->plist[direct].plist = NULL;
5764
5765 /* Process peer route updates. */
5766 peer_on_policy_change(member, afi, safi,
5767 (direct == FILTER_OUT) ? 1 : 0);
5768 }
5769
5770 return 0;
5771 }
5772
5773 /* Update prefix-list list. */
5774 static void peer_prefix_list_update(struct prefix_list *plist)
5775 {
5776 struct listnode *mnode, *mnnode;
5777 struct listnode *node, *nnode;
5778 struct bgp *bgp;
5779 struct peer *peer;
5780 struct peer_group *group;
5781 struct bgp_filter *filter;
5782 afi_t afi;
5783 safi_t safi;
5784 int direct;
5785
5786 for (ALL_LIST_ELEMENTS(bm->bgp, mnode, mnnode, bgp)) {
5787
5788 /*
5789 * Update the prefix-list on update groups.
5790 */
5791 update_group_policy_update(
5792 bgp, BGP_POLICY_PREFIX_LIST,
5793 plist ? prefix_list_name(plist) : NULL, 0, 0);
5794
5795 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
5796 FOREACH_AFI_SAFI (afi, safi) {
5797 filter = &peer->filter[afi][safi];
5798
5799 for (direct = FILTER_IN; direct < FILTER_MAX;
5800 direct++) {
5801 if (filter->plist[direct].name)
5802 filter->plist[direct]
5803 .plist = prefix_list_lookup(
5804 afi,
5805 filter->plist[direct]
5806 .name);
5807 else
5808 filter->plist[direct].plist =
5809 NULL;
5810 }
5811 }
5812 }
5813 for (ALL_LIST_ELEMENTS(bgp->group, node, nnode, group)) {
5814 FOREACH_AFI_SAFI (afi, safi) {
5815 filter = &group->conf->filter[afi][safi];
5816
5817 for (direct = FILTER_IN; direct < FILTER_MAX;
5818 direct++) {
5819 if (filter->plist[direct].name)
5820 filter->plist[direct]
5821 .plist = prefix_list_lookup(
5822 afi,
5823 filter->plist[direct]
5824 .name);
5825 else
5826 filter->plist[direct].plist =
5827 NULL;
5828 }
5829 }
5830 }
5831 }
5832 }
5833
5834 int peer_aslist_set(struct peer *peer, afi_t afi, safi_t safi, int direct,
5835 const char *name)
5836 {
5837 struct peer *member;
5838 struct bgp_filter *filter;
5839 struct listnode *node, *nnode;
5840
5841 if (direct != FILTER_IN && direct != FILTER_OUT)
5842 return BGP_ERR_INVALID_VALUE;
5843
5844 /* Set configuration on peer. */
5845 filter = &peer->filter[afi][safi];
5846 if (filter->aslist[direct].name)
5847 XFREE(MTYPE_BGP_FILTER_NAME, filter->aslist[direct].name);
5848 filter->aslist[direct].name = XSTRDUP(MTYPE_BGP_FILTER_NAME, name);
5849 filter->aslist[direct].aslist = as_list_lookup(name);
5850
5851 /* Check if handling a regular peer. */
5852 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
5853 /* Set override-flag and process peer route updates. */
5854 SET_FLAG(peer->filter_override[afi][safi][direct],
5855 PEER_FT_FILTER_LIST);
5856 peer_on_policy_change(peer, afi, safi,
5857 (direct == FILTER_OUT) ? 1 : 0);
5858
5859 /* Skip peer-group mechanics for regular peers. */
5860 return 0;
5861 }
5862
5863 /*
5864 * Set configuration on all peer-group members, unless they are
5865 * explicitely overriding peer-group configuration.
5866 */
5867 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
5868 /* Skip peers with overridden configuration. */
5869 if (CHECK_FLAG(member->filter_override[afi][safi][direct],
5870 PEER_FT_FILTER_LIST))
5871 continue;
5872
5873 /* Set configuration on peer-group member. */
5874 filter = &member->filter[afi][safi];
5875 if (filter->aslist[direct].name)
5876 XFREE(MTYPE_BGP_FILTER_NAME,
5877 filter->aslist[direct].name);
5878 filter->aslist[direct].name =
5879 XSTRDUP(MTYPE_BGP_FILTER_NAME, name);
5880 filter->aslist[direct].aslist = as_list_lookup(name);
5881
5882 /* Process peer route updates. */
5883 peer_on_policy_change(member, afi, safi,
5884 (direct == FILTER_OUT) ? 1 : 0);
5885 }
5886
5887 return 0;
5888 }
5889
5890 int peer_aslist_unset(struct peer *peer, afi_t afi, safi_t safi, int direct)
5891 {
5892 struct peer *member;
5893 struct bgp_filter *filter;
5894 struct listnode *node, *nnode;
5895
5896 if (direct != FILTER_IN && direct != FILTER_OUT)
5897 return BGP_ERR_INVALID_VALUE;
5898
5899 /* Unset override-flag unconditionally. */
5900 UNSET_FLAG(peer->filter_override[afi][safi][direct],
5901 PEER_FT_FILTER_LIST);
5902
5903 /* Inherit configuration from peer-group if peer is member. */
5904 if (peer_group_active(peer)) {
5905 PEER_STR_ATTR_INHERIT(peer, peer->group,
5906 filter[afi][safi].aslist[direct].name,
5907 MTYPE_BGP_FILTER_NAME);
5908 PEER_ATTR_INHERIT(peer, peer->group,
5909 filter[afi][safi].aslist[direct].aslist);
5910 } else {
5911 /* Otherwise remove configuration from peer. */
5912 filter = &peer->filter[afi][safi];
5913 if (filter->aslist[direct].name)
5914 XFREE(MTYPE_BGP_FILTER_NAME,
5915 filter->aslist[direct].name);
5916 filter->aslist[direct].name = NULL;
5917 filter->aslist[direct].aslist = NULL;
5918 }
5919
5920 /* Check if handling a regular peer. */
5921 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
5922 /* Process peer route updates. */
5923 peer_on_policy_change(peer, afi, safi,
5924 (direct == FILTER_OUT) ? 1 : 0);
5925
5926 /* Skip peer-group mechanics for regular peers. */
5927 return 0;
5928 }
5929
5930 /*
5931 * Remove configuration on all peer-group members, unless they are
5932 * explicitely overriding peer-group configuration.
5933 */
5934 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
5935 /* Skip peers with overridden configuration. */
5936 if (CHECK_FLAG(member->filter_override[afi][safi][direct],
5937 PEER_FT_FILTER_LIST))
5938 continue;
5939
5940 /* Remove configuration on peer-group member. */
5941 filter = &member->filter[afi][safi];
5942 if (filter->aslist[direct].name)
5943 XFREE(MTYPE_BGP_FILTER_NAME,
5944 filter->aslist[direct].name);
5945 filter->aslist[direct].name = NULL;
5946 filter->aslist[direct].aslist = NULL;
5947
5948 /* Process peer route updates. */
5949 peer_on_policy_change(member, afi, safi,
5950 (direct == FILTER_OUT) ? 1 : 0);
5951 }
5952
5953 return 0;
5954 }
5955
5956 static void peer_aslist_update(const char *aslist_name)
5957 {
5958 afi_t afi;
5959 safi_t safi;
5960 int direct;
5961 struct listnode *mnode, *mnnode;
5962 struct listnode *node, *nnode;
5963 struct bgp *bgp;
5964 struct peer *peer;
5965 struct peer_group *group;
5966 struct bgp_filter *filter;
5967
5968 for (ALL_LIST_ELEMENTS(bm->bgp, mnode, mnnode, bgp)) {
5969 update_group_policy_update(bgp, BGP_POLICY_FILTER_LIST,
5970 aslist_name, 0, 0);
5971
5972 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
5973 FOREACH_AFI_SAFI (afi, safi) {
5974 filter = &peer->filter[afi][safi];
5975
5976 for (direct = FILTER_IN; direct < FILTER_MAX;
5977 direct++) {
5978 if (filter->aslist[direct].name)
5979 filter->aslist[direct]
5980 .aslist = as_list_lookup(
5981 filter->aslist[direct]
5982 .name);
5983 else
5984 filter->aslist[direct].aslist =
5985 NULL;
5986 }
5987 }
5988 }
5989 for (ALL_LIST_ELEMENTS(bgp->group, node, nnode, group)) {
5990 FOREACH_AFI_SAFI (afi, safi) {
5991 filter = &group->conf->filter[afi][safi];
5992
5993 for (direct = FILTER_IN; direct < FILTER_MAX;
5994 direct++) {
5995 if (filter->aslist[direct].name)
5996 filter->aslist[direct]
5997 .aslist = as_list_lookup(
5998 filter->aslist[direct]
5999 .name);
6000 else
6001 filter->aslist[direct].aslist =
6002 NULL;
6003 }
6004 }
6005 }
6006 }
6007 }
6008
6009 static void peer_aslist_add(char *aslist_name)
6010 {
6011 peer_aslist_update(aslist_name);
6012 route_map_notify_dependencies((char *)aslist_name,
6013 RMAP_EVENT_ASLIST_ADDED);
6014 }
6015
6016 static void peer_aslist_del(const char *aslist_name)
6017 {
6018 peer_aslist_update(aslist_name);
6019 route_map_notify_dependencies(aslist_name, RMAP_EVENT_ASLIST_DELETED);
6020 }
6021
6022
6023 int peer_route_map_set(struct peer *peer, afi_t afi, safi_t safi, int direct,
6024 const char *name, struct route_map *route_map)
6025 {
6026 struct peer *member;
6027 struct bgp_filter *filter;
6028 struct listnode *node, *nnode;
6029
6030 if (direct != RMAP_IN && direct != RMAP_OUT)
6031 return BGP_ERR_INVALID_VALUE;
6032
6033 /* Set configuration on peer. */
6034 filter = &peer->filter[afi][safi];
6035 if (filter->map[direct].name)
6036 XFREE(MTYPE_BGP_FILTER_NAME, filter->map[direct].name);
6037 filter->map[direct].name = XSTRDUP(MTYPE_BGP_FILTER_NAME, name);
6038 filter->map[direct].map = route_map;
6039
6040 /* Check if handling a regular peer. */
6041 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
6042 /* Set override-flag and process peer route updates. */
6043 SET_FLAG(peer->filter_override[afi][safi][direct],
6044 PEER_FT_ROUTE_MAP);
6045 peer_on_policy_change(peer, afi, safi,
6046 (direct == RMAP_OUT) ? 1 : 0);
6047
6048 /* Skip peer-group mechanics for regular peers. */
6049 return 0;
6050 }
6051
6052 /*
6053 * Set configuration on all peer-group members, unless they are
6054 * explicitely overriding peer-group configuration.
6055 */
6056 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
6057 /* Skip peers with overridden configuration. */
6058 if (CHECK_FLAG(member->filter_override[afi][safi][direct],
6059 PEER_FT_ROUTE_MAP))
6060 continue;
6061
6062 /* Set configuration on peer-group member. */
6063 filter = &member->filter[afi][safi];
6064 if (filter->map[direct].name)
6065 XFREE(MTYPE_BGP_FILTER_NAME, filter->map[direct].name);
6066 filter->map[direct].name = XSTRDUP(MTYPE_BGP_FILTER_NAME, name);
6067 filter->map[direct].map = route_map;
6068
6069 /* Process peer route updates. */
6070 peer_on_policy_change(member, afi, safi,
6071 (direct == RMAP_OUT) ? 1 : 0);
6072 }
6073 return 0;
6074 }
6075
6076 /* Unset route-map from the peer. */
6077 int peer_route_map_unset(struct peer *peer, afi_t afi, safi_t safi, int direct)
6078 {
6079 struct peer *member;
6080 struct bgp_filter *filter;
6081 struct listnode *node, *nnode;
6082
6083 if (direct != RMAP_IN && direct != RMAP_OUT)
6084 return BGP_ERR_INVALID_VALUE;
6085
6086 /* Unset override-flag unconditionally. */
6087 UNSET_FLAG(peer->filter_override[afi][safi][direct], PEER_FT_ROUTE_MAP);
6088
6089 /* Inherit configuration from peer-group if peer is member. */
6090 if (peer_group_active(peer)) {
6091 PEER_STR_ATTR_INHERIT(peer, peer->group,
6092 filter[afi][safi].map[direct].name,
6093 MTYPE_BGP_FILTER_NAME);
6094 PEER_ATTR_INHERIT(peer, peer->group,
6095 filter[afi][safi].map[direct].map);
6096 } else {
6097 /* Otherwise remove configuration from peer. */
6098 filter = &peer->filter[afi][safi];
6099 if (filter->map[direct].name)
6100 XFREE(MTYPE_BGP_FILTER_NAME, filter->map[direct].name);
6101 filter->map[direct].name = NULL;
6102 filter->map[direct].map = NULL;
6103 }
6104
6105 /* Check if handling a regular peer. */
6106 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
6107 /* Process peer route updates. */
6108 peer_on_policy_change(peer, afi, safi,
6109 (direct == RMAP_OUT) ? 1 : 0);
6110
6111 /* Skip peer-group mechanics for regular peers. */
6112 return 0;
6113 }
6114
6115 /*
6116 * Remove configuration on all peer-group members, unless they are
6117 * explicitely overriding peer-group configuration.
6118 */
6119 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
6120 /* Skip peers with overridden configuration. */
6121 if (CHECK_FLAG(member->filter_override[afi][safi][direct],
6122 PEER_FT_ROUTE_MAP))
6123 continue;
6124
6125 /* Remove configuration on peer-group member. */
6126 filter = &member->filter[afi][safi];
6127 if (filter->map[direct].name)
6128 XFREE(MTYPE_BGP_FILTER_NAME, filter->map[direct].name);
6129 filter->map[direct].name = NULL;
6130 filter->map[direct].map = NULL;
6131
6132 /* Process peer route updates. */
6133 peer_on_policy_change(member, afi, safi,
6134 (direct == RMAP_OUT) ? 1 : 0);
6135 }
6136
6137 return 0;
6138 }
6139
6140 /* Set unsuppress-map to the peer. */
6141 int peer_unsuppress_map_set(struct peer *peer, afi_t afi, safi_t safi,
6142 const char *name, struct route_map *route_map)
6143 {
6144 struct peer *member;
6145 struct bgp_filter *filter;
6146 struct listnode *node, *nnode;
6147
6148 /* Set configuration on peer. */
6149 filter = &peer->filter[afi][safi];
6150 if (filter->usmap.name)
6151 XFREE(MTYPE_BGP_FILTER_NAME, filter->usmap.name);
6152 filter->usmap.name = XSTRDUP(MTYPE_BGP_FILTER_NAME, name);
6153 filter->usmap.map = route_map;
6154
6155 /* Check if handling a regular peer. */
6156 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
6157 /* Set override-flag and process peer route updates. */
6158 SET_FLAG(peer->filter_override[afi][safi][0],
6159 PEER_FT_UNSUPPRESS_MAP);
6160 peer_on_policy_change(peer, afi, safi, 1);
6161
6162 /* Skip peer-group mechanics for regular peers. */
6163 return 0;
6164 }
6165
6166 /*
6167 * Set configuration on all peer-group members, unless they are
6168 * explicitely overriding peer-group configuration.
6169 */
6170 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
6171 /* Skip peers with overridden configuration. */
6172 if (CHECK_FLAG(member->filter_override[afi][safi][0],
6173 PEER_FT_UNSUPPRESS_MAP))
6174 continue;
6175
6176 /* Set configuration on peer-group member. */
6177 filter = &member->filter[afi][safi];
6178 if (filter->usmap.name)
6179 XFREE(MTYPE_BGP_FILTER_NAME, filter->usmap.name);
6180 filter->usmap.name = XSTRDUP(MTYPE_BGP_FILTER_NAME, name);
6181 filter->usmap.map = route_map;
6182
6183 /* Process peer route updates. */
6184 peer_on_policy_change(member, afi, safi, 1);
6185 }
6186
6187 return 0;
6188 }
6189
6190 /* Unset route-map from the peer. */
6191 int peer_unsuppress_map_unset(struct peer *peer, afi_t afi, safi_t safi)
6192 {
6193 struct peer *member;
6194 struct bgp_filter *filter;
6195 struct listnode *node, *nnode;
6196
6197 /* Unset override-flag unconditionally. */
6198 UNSET_FLAG(peer->filter_override[afi][safi][0], PEER_FT_UNSUPPRESS_MAP);
6199
6200 /* Inherit configuration from peer-group if peer is member. */
6201 if (peer_group_active(peer)) {
6202 PEER_STR_ATTR_INHERIT(peer, peer->group,
6203 filter[afi][safi].usmap.name,
6204 MTYPE_BGP_FILTER_NAME);
6205 PEER_ATTR_INHERIT(peer, peer->group,
6206 filter[afi][safi].usmap.map);
6207 } else {
6208 /* Otherwise remove configuration from peer. */
6209 filter = &peer->filter[afi][safi];
6210 if (filter->usmap.name)
6211 XFREE(MTYPE_BGP_FILTER_NAME, filter->usmap.name);
6212 filter->usmap.name = NULL;
6213 filter->usmap.map = NULL;
6214 }
6215
6216 /* Check if handling a regular peer. */
6217 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
6218 /* Process peer route updates. */
6219 peer_on_policy_change(peer, afi, safi, 1);
6220
6221 /* Skip peer-group mechanics for regular peers. */
6222 return 0;
6223 }
6224
6225 /*
6226 * Remove configuration on all peer-group members, unless they are
6227 * explicitely overriding peer-group configuration.
6228 */
6229 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
6230 /* Skip peers with overridden configuration. */
6231 if (CHECK_FLAG(member->filter_override[afi][safi][0],
6232 PEER_FT_UNSUPPRESS_MAP))
6233 continue;
6234
6235 /* Remove configuration on peer-group member. */
6236 filter = &member->filter[afi][safi];
6237 if (filter->usmap.name)
6238 XFREE(MTYPE_BGP_FILTER_NAME, filter->usmap.name);
6239 filter->usmap.name = NULL;
6240 filter->usmap.map = NULL;
6241
6242 /* Process peer route updates. */
6243 peer_on_policy_change(member, afi, safi, 1);
6244 }
6245
6246 return 0;
6247 }
6248
6249 int peer_maximum_prefix_set(struct peer *peer, afi_t afi, safi_t safi,
6250 uint32_t max, uint8_t threshold, int warning,
6251 uint16_t restart)
6252 {
6253 struct peer *member;
6254 struct listnode *node, *nnode;
6255
6256 /* Set flags and configuration on peer. */
6257 peer_af_flag_set(peer, afi, safi, PEER_FLAG_MAX_PREFIX);
6258 if (warning)
6259 peer_af_flag_set(peer, afi, safi, PEER_FLAG_MAX_PREFIX_WARNING);
6260 else
6261 peer_af_flag_unset(peer, afi, safi,
6262 PEER_FLAG_MAX_PREFIX_WARNING);
6263
6264 peer->pmax[afi][safi] = max;
6265 peer->pmax_threshold[afi][safi] = threshold;
6266 peer->pmax_restart[afi][safi] = restart;
6267
6268 /* Check if handling a regular peer. */
6269 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
6270 /* Re-check if peer violates maximum-prefix. */
6271 if ((peer->status == Established) && (peer->afc[afi][safi]))
6272 bgp_maximum_prefix_overflow(peer, afi, safi, 1);
6273
6274 /* Skip peer-group mechanics for regular peers. */
6275 return 0;
6276 }
6277
6278 /*
6279 * Set flags and configuration on all peer-group members, unless they
6280 * are explicitely overriding peer-group configuration.
6281 */
6282 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
6283 /* Skip peers with overridden configuration. */
6284 if (CHECK_FLAG(member->af_flags_override[afi][safi],
6285 PEER_FLAG_MAX_PREFIX))
6286 continue;
6287
6288 /* Set flag and configuration on peer-group member. */
6289 member->pmax[afi][safi] = max;
6290 member->pmax_threshold[afi][safi] = threshold;
6291 member->pmax_restart[afi][safi] = restart;
6292 if (warning)
6293 SET_FLAG(member->af_flags[afi][safi],
6294 PEER_FLAG_MAX_PREFIX_WARNING);
6295 else
6296 UNSET_FLAG(member->af_flags[afi][safi],
6297 PEER_FLAG_MAX_PREFIX_WARNING);
6298
6299 /* Re-check if peer violates maximum-prefix. */
6300 if ((member->status == Established) && (member->afc[afi][safi]))
6301 bgp_maximum_prefix_overflow(member, afi, safi, 1);
6302 }
6303
6304 return 0;
6305 }
6306
6307 int peer_maximum_prefix_unset(struct peer *peer, afi_t afi, safi_t safi)
6308 {
6309 struct peer *member;
6310 struct listnode *node, *nnode;
6311
6312 /* Inherit configuration from peer-group if peer is member. */
6313 if (peer_group_active(peer)) {
6314 peer_af_flag_inherit(peer, afi, safi, PEER_FLAG_MAX_PREFIX);
6315 peer_af_flag_inherit(peer, afi, safi,
6316 PEER_FLAG_MAX_PREFIX_WARNING);
6317 PEER_ATTR_INHERIT(peer, peer->group, pmax[afi][safi]);
6318 PEER_ATTR_INHERIT(peer, peer->group, pmax_threshold[afi][safi]);
6319 PEER_ATTR_INHERIT(peer, peer->group, pmax_restart[afi][safi]);
6320
6321 return 0;
6322 }
6323
6324 /* Remove flags and configuration from peer. */
6325 peer_af_flag_unset(peer, afi, safi, PEER_FLAG_MAX_PREFIX);
6326 peer_af_flag_unset(peer, afi, safi, PEER_FLAG_MAX_PREFIX_WARNING);
6327 peer->pmax[afi][safi] = 0;
6328 peer->pmax_threshold[afi][safi] = 0;
6329 peer->pmax_restart[afi][safi] = 0;
6330
6331 /*
6332 * Remove flags and configuration from all peer-group members, unless
6333 * they are explicitely overriding peer-group configuration.
6334 */
6335 for (ALL_LIST_ELEMENTS(peer->group->peer, node, nnode, member)) {
6336 /* Skip peers with overridden configuration. */
6337 if (CHECK_FLAG(member->af_flags_override[afi][safi],
6338 PEER_FLAG_MAX_PREFIX))
6339 continue;
6340
6341 /* Remove flag and configuration on peer-group member. */
6342 UNSET_FLAG(member->af_flags[afi][safi], PEER_FLAG_MAX_PREFIX);
6343 UNSET_FLAG(member->af_flags[afi][safi],
6344 PEER_FLAG_MAX_PREFIX_WARNING);
6345 member->pmax[afi][safi] = 0;
6346 member->pmax_threshold[afi][safi] = 0;
6347 member->pmax_restart[afi][safi] = 0;
6348 }
6349
6350 return 0;
6351 }
6352
6353 int is_ebgp_multihop_configured(struct peer *peer)
6354 {
6355 struct peer_group *group;
6356 struct listnode *node, *nnode;
6357 struct peer *peer1;
6358
6359 if (CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
6360 group = peer->group;
6361 if ((peer_sort(peer) != BGP_PEER_IBGP)
6362 && (group->conf->ttl != 1))
6363 return 1;
6364
6365 for (ALL_LIST_ELEMENTS(group->peer, node, nnode, peer1)) {
6366 if ((peer_sort(peer1) != BGP_PEER_IBGP)
6367 && (peer1->ttl != 1))
6368 return 1;
6369 }
6370 } else {
6371 if ((peer_sort(peer) != BGP_PEER_IBGP) && (peer->ttl != 1))
6372 return 1;
6373 }
6374 return 0;
6375 }
6376
6377 /* Set # of hops between us and BGP peer. */
6378 int peer_ttl_security_hops_set(struct peer *peer, int gtsm_hops)
6379 {
6380 struct peer_group *group;
6381 struct listnode *node, *nnode;
6382 int ret;
6383
6384 zlog_debug("peer_ttl_security_hops_set: set gtsm_hops to %d for %s",
6385 gtsm_hops, peer->host);
6386
6387 /* We cannot configure ttl-security hops when ebgp-multihop is already
6388 set. For non peer-groups, the check is simple. For peer-groups,
6389 it's
6390 slightly messy, because we need to check both the peer-group
6391 structure
6392 and all peer-group members for any trace of ebgp-multihop
6393 configuration
6394 before actually applying the ttl-security rules. Cisco really made a
6395 mess of this configuration parameter, and OpenBGPD got it right.
6396 */
6397
6398 if ((peer->gtsm_hops == 0) && (peer->sort != BGP_PEER_IBGP)) {
6399 if (is_ebgp_multihop_configured(peer))
6400 return BGP_ERR_NO_EBGP_MULTIHOP_WITH_TTLHACK;
6401
6402 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
6403 peer->gtsm_hops = gtsm_hops;
6404
6405 /* Calling ebgp multihop also resets the session.
6406 * On restart, NHT will get setup correctly as will the
6407 * min & max ttls on the socket. The return value is
6408 * irrelevant.
6409 */
6410 ret = peer_ebgp_multihop_set(peer, MAXTTL);
6411
6412 if (ret != 0)
6413 return ret;
6414 } else {
6415 group = peer->group;
6416 for (ALL_LIST_ELEMENTS(group->peer, node, nnode,
6417 peer)) {
6418 peer->gtsm_hops = group->conf->gtsm_hops;
6419
6420 /* Calling ebgp multihop also resets the
6421 * session.
6422 * On restart, NHT will get setup correctly as
6423 * will the
6424 * min & max ttls on the socket. The return
6425 * value is
6426 * irrelevant.
6427 */
6428 peer_ebgp_multihop_set(peer, MAXTTL);
6429 }
6430 }
6431 } else {
6432 /* Post the first gtsm setup or if its ibgp, maxttl setting
6433 * isn't
6434 * necessary, just set the minttl.
6435 */
6436 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
6437 peer->gtsm_hops = gtsm_hops;
6438
6439 if (peer->fd >= 0)
6440 sockopt_minttl(peer->su.sa.sa_family, peer->fd,
6441 MAXTTL + 1 - gtsm_hops);
6442 if ((peer->status < Established) && peer->doppelganger
6443 && (peer->doppelganger->fd >= 0))
6444 sockopt_minttl(peer->su.sa.sa_family,
6445 peer->doppelganger->fd,
6446 MAXTTL + 1 - gtsm_hops);
6447 } else {
6448 group = peer->group;
6449 for (ALL_LIST_ELEMENTS(group->peer, node, nnode,
6450 peer)) {
6451 peer->gtsm_hops = group->conf->gtsm_hops;
6452
6453 /* Change setting of existing peer
6454 * established then change value (may break
6455 * connectivity)
6456 * not established yet (teardown session and
6457 * restart)
6458 * no session then do nothing (will get
6459 * handled by next connection)
6460 */
6461 if (peer->fd >= 0 && peer->gtsm_hops != 0)
6462 sockopt_minttl(
6463 peer->su.sa.sa_family, peer->fd,
6464 MAXTTL + 1 - peer->gtsm_hops);
6465 if ((peer->status < Established)
6466 && peer->doppelganger
6467 && (peer->doppelganger->fd >= 0))
6468 sockopt_minttl(peer->su.sa.sa_family,
6469 peer->doppelganger->fd,
6470 MAXTTL + 1 - gtsm_hops);
6471 }
6472 }
6473 }
6474
6475 return 0;
6476 }
6477
6478 int peer_ttl_security_hops_unset(struct peer *peer)
6479 {
6480 struct peer_group *group;
6481 struct listnode *node, *nnode;
6482 int ret = 0;
6483
6484 zlog_debug("peer_ttl_security_hops_unset: set gtsm_hops to zero for %s",
6485 peer->host);
6486
6487 /* if a peer-group member, then reset to peer-group default rather than
6488 * 0 */
6489 if (peer_group_active(peer))
6490 peer->gtsm_hops = peer->group->conf->gtsm_hops;
6491 else
6492 peer->gtsm_hops = 0;
6493
6494 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
6495 /* Invoking ebgp_multihop_set will set the TTL back to the
6496 * original
6497 * value as well as restting the NHT and such. The session is
6498 * reset.
6499 */
6500 if (peer->sort == BGP_PEER_EBGP)
6501 ret = peer_ebgp_multihop_unset(peer);
6502 else {
6503 if (peer->fd >= 0)
6504 sockopt_minttl(peer->su.sa.sa_family, peer->fd,
6505 0);
6506
6507 if ((peer->status < Established) && peer->doppelganger
6508 && (peer->doppelganger->fd >= 0))
6509 sockopt_minttl(peer->su.sa.sa_family,
6510 peer->doppelganger->fd, 0);
6511 }
6512 } else {
6513 group = peer->group;
6514 for (ALL_LIST_ELEMENTS(group->peer, node, nnode, peer)) {
6515 peer->gtsm_hops = 0;
6516 if (peer->sort == BGP_PEER_EBGP)
6517 ret = peer_ebgp_multihop_unset(peer);
6518 else {
6519 if (peer->fd >= 0)
6520 sockopt_minttl(peer->su.sa.sa_family,
6521 peer->fd, 0);
6522
6523 if ((peer->status < Established)
6524 && peer->doppelganger
6525 && (peer->doppelganger->fd >= 0))
6526 sockopt_minttl(peer->su.sa.sa_family,
6527 peer->doppelganger->fd,
6528 0);
6529 }
6530 }
6531 }
6532
6533 return ret;
6534 }
6535
6536 /*
6537 * If peer clear is invoked in a loop for all peers on the BGP instance,
6538 * it may end up freeing the doppelganger, and if this was the next node
6539 * to the current node, we would end up accessing the freed next node.
6540 * Pass along additional parameter which can be updated if next node
6541 * is freed; only required when walking the peer list on BGP instance.
6542 */
6543 int peer_clear(struct peer *peer, struct listnode **nnode)
6544 {
6545 if (!CHECK_FLAG(peer->flags, PEER_FLAG_SHUTDOWN)) {
6546 if (CHECK_FLAG(peer->sflags, PEER_STATUS_PREFIX_OVERFLOW)) {
6547 UNSET_FLAG(peer->sflags, PEER_STATUS_PREFIX_OVERFLOW);
6548 if (peer->t_pmax_restart) {
6549 BGP_TIMER_OFF(peer->t_pmax_restart);
6550 if (bgp_debug_neighbor_events(peer))
6551 zlog_debug(
6552 "%s Maximum-prefix restart timer canceled",
6553 peer->host);
6554 }
6555 BGP_EVENT_ADD(peer, BGP_Start);
6556 return 0;
6557 }
6558
6559 peer->v_start = BGP_INIT_START_TIMER;
6560 if (BGP_IS_VALID_STATE_FOR_NOTIF(peer->status))
6561 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
6562 BGP_NOTIFY_CEASE_ADMIN_RESET);
6563 else
6564 bgp_session_reset_safe(peer, nnode);
6565 }
6566 return 0;
6567 }
6568
6569 int peer_clear_soft(struct peer *peer, afi_t afi, safi_t safi,
6570 enum bgp_clear_type stype)
6571 {
6572 struct peer_af *paf;
6573
6574 if (peer->status != Established)
6575 return 0;
6576
6577 if (!peer->afc[afi][safi])
6578 return BGP_ERR_AF_UNCONFIGURED;
6579
6580 peer->rtt = sockopt_tcp_rtt(peer->fd);
6581
6582 if (stype == BGP_CLEAR_SOFT_OUT || stype == BGP_CLEAR_SOFT_BOTH) {
6583 /* Clear the "neighbor x.x.x.x default-originate" flag */
6584 paf = peer_af_find(peer, afi, safi);
6585 if (paf && paf->subgroup
6586 && CHECK_FLAG(paf->subgroup->sflags,
6587 SUBGRP_STATUS_DEFAULT_ORIGINATE))
6588 UNSET_FLAG(paf->subgroup->sflags,
6589 SUBGRP_STATUS_DEFAULT_ORIGINATE);
6590
6591 bgp_announce_route(peer, afi, safi);
6592 }
6593
6594 if (stype == BGP_CLEAR_SOFT_IN_ORF_PREFIX) {
6595 if (CHECK_FLAG(peer->af_cap[afi][safi],
6596 PEER_CAP_ORF_PREFIX_SM_ADV)
6597 && (CHECK_FLAG(peer->af_cap[afi][safi],
6598 PEER_CAP_ORF_PREFIX_RM_RCV)
6599 || CHECK_FLAG(peer->af_cap[afi][safi],
6600 PEER_CAP_ORF_PREFIX_RM_OLD_RCV))) {
6601 struct bgp_filter *filter = &peer->filter[afi][safi];
6602 uint8_t prefix_type;
6603
6604 if (CHECK_FLAG(peer->af_cap[afi][safi],
6605 PEER_CAP_ORF_PREFIX_RM_RCV))
6606 prefix_type = ORF_TYPE_PREFIX;
6607 else
6608 prefix_type = ORF_TYPE_PREFIX_OLD;
6609
6610 if (filter->plist[FILTER_IN].plist) {
6611 if (CHECK_FLAG(peer->af_sflags[afi][safi],
6612 PEER_STATUS_ORF_PREFIX_SEND))
6613 bgp_route_refresh_send(
6614 peer, afi, safi, prefix_type,
6615 REFRESH_DEFER, 1);
6616 bgp_route_refresh_send(peer, afi, safi,
6617 prefix_type,
6618 REFRESH_IMMEDIATE, 0);
6619 } else {
6620 if (CHECK_FLAG(peer->af_sflags[afi][safi],
6621 PEER_STATUS_ORF_PREFIX_SEND))
6622 bgp_route_refresh_send(
6623 peer, afi, safi, prefix_type,
6624 REFRESH_IMMEDIATE, 1);
6625 else
6626 bgp_route_refresh_send(peer, afi, safi,
6627 0, 0, 0);
6628 }
6629 return 0;
6630 }
6631 }
6632
6633 if (stype == BGP_CLEAR_SOFT_IN || stype == BGP_CLEAR_SOFT_BOTH
6634 || stype == BGP_CLEAR_SOFT_IN_ORF_PREFIX) {
6635 /* If neighbor has soft reconfiguration inbound flag.
6636 Use Adj-RIB-In database. */
6637 if (CHECK_FLAG(peer->af_flags[afi][safi],
6638 PEER_FLAG_SOFT_RECONFIG))
6639 bgp_soft_reconfig_in(peer, afi, safi);
6640 else {
6641 /* If neighbor has route refresh capability, send route
6642 refresh
6643 message to the peer. */
6644 if (CHECK_FLAG(peer->cap, PEER_CAP_REFRESH_OLD_RCV)
6645 || CHECK_FLAG(peer->cap, PEER_CAP_REFRESH_NEW_RCV))
6646 bgp_route_refresh_send(peer, afi, safi, 0, 0,
6647 0);
6648 else
6649 return BGP_ERR_SOFT_RECONFIG_UNCONFIGURED;
6650 }
6651 }
6652 return 0;
6653 }
6654
6655 /* Display peer uptime.*/
6656 char *peer_uptime(time_t uptime2, char *buf, size_t len, bool use_json,
6657 json_object *json)
6658 {
6659 time_t uptime1, epoch_tbuf;
6660 struct tm *tm;
6661
6662 /* If there is no connection has been done before print `never'. */
6663 if (uptime2 == 0) {
6664 if (use_json) {
6665 json_object_string_add(json, "peerUptime", "never");
6666 json_object_int_add(json, "peerUptimeMsec", 0);
6667 } else
6668 snprintf(buf, len, "never");
6669 return buf;
6670 }
6671
6672 /* Get current time. */
6673 uptime1 = bgp_clock();
6674 uptime1 -= uptime2;
6675 tm = gmtime(&uptime1);
6676
6677 if (uptime1 < ONE_DAY_SECOND)
6678 snprintf(buf, len, "%02d:%02d:%02d", tm->tm_hour, tm->tm_min,
6679 tm->tm_sec);
6680 else if (uptime1 < ONE_WEEK_SECOND)
6681 snprintf(buf, len, "%dd%02dh%02dm", tm->tm_yday, tm->tm_hour,
6682 tm->tm_min);
6683 else if (uptime1 < ONE_YEAR_SECOND)
6684 snprintf(buf, len, "%02dw%dd%02dh", tm->tm_yday / 7,
6685 tm->tm_yday - ((tm->tm_yday / 7) * 7), tm->tm_hour);
6686 else
6687 snprintf(buf, len, "%02dy%02dw%dd", tm->tm_year - 70,
6688 tm->tm_yday / 7,
6689 tm->tm_yday - ((tm->tm_yday / 7) * 7));
6690
6691 if (use_json) {
6692 epoch_tbuf = time(NULL) - uptime1;
6693 json_object_string_add(json, "peerUptime", buf);
6694 json_object_int_add(json, "peerUptimeMsec", uptime1 * 1000);
6695 json_object_int_add(json, "peerUptimeEstablishedEpoch",
6696 epoch_tbuf);
6697 }
6698
6699 return buf;
6700 }
6701
6702 static void bgp_config_write_filter(struct vty *vty, struct peer *peer,
6703 afi_t afi, safi_t safi)
6704 {
6705 struct bgp_filter *filter;
6706 char *addr;
6707
6708 addr = peer->host;
6709 filter = &peer->filter[afi][safi];
6710
6711 /* distribute-list. */
6712 if (peergroup_filter_check(peer, afi, safi, PEER_FT_DISTRIBUTE_LIST,
6713 FILTER_IN))
6714 vty_out(vty, " neighbor %s distribute-list %s in\n", addr,
6715 filter->dlist[FILTER_IN].name);
6716
6717 if (peergroup_filter_check(peer, afi, safi, PEER_FT_DISTRIBUTE_LIST,
6718 FILTER_OUT))
6719 vty_out(vty, " neighbor %s distribute-list %s out\n", addr,
6720 filter->dlist[FILTER_OUT].name);
6721
6722 /* prefix-list. */
6723 if (peergroup_filter_check(peer, afi, safi, PEER_FT_PREFIX_LIST,
6724 FILTER_IN))
6725 vty_out(vty, " neighbor %s prefix-list %s in\n", addr,
6726 filter->plist[FILTER_IN].name);
6727
6728 if (peergroup_filter_check(peer, afi, safi, PEER_FT_PREFIX_LIST,
6729 FILTER_OUT))
6730 vty_out(vty, " neighbor %s prefix-list %s out\n", addr,
6731 filter->plist[FILTER_OUT].name);
6732
6733 /* route-map. */
6734 if (peergroup_filter_check(peer, afi, safi, PEER_FT_ROUTE_MAP, RMAP_IN))
6735 vty_out(vty, " neighbor %s route-map %s in\n", addr,
6736 filter->map[RMAP_IN].name);
6737
6738 if (peergroup_filter_check(peer, afi, safi, PEER_FT_ROUTE_MAP,
6739 RMAP_OUT))
6740 vty_out(vty, " neighbor %s route-map %s out\n", addr,
6741 filter->map[RMAP_OUT].name);
6742
6743 /* unsuppress-map */
6744 if (peergroup_filter_check(peer, afi, safi, PEER_FT_UNSUPPRESS_MAP, 0))
6745 vty_out(vty, " neighbor %s unsuppress-map %s\n", addr,
6746 filter->usmap.name);
6747
6748 /* filter-list. */
6749 if (peergroup_filter_check(peer, afi, safi, PEER_FT_FILTER_LIST,
6750 FILTER_IN))
6751 vty_out(vty, " neighbor %s filter-list %s in\n", addr,
6752 filter->aslist[FILTER_IN].name);
6753
6754 if (peergroup_filter_check(peer, afi, safi, PEER_FT_FILTER_LIST,
6755 FILTER_OUT))
6756 vty_out(vty, " neighbor %s filter-list %s out\n", addr,
6757 filter->aslist[FILTER_OUT].name);
6758 }
6759
6760 /* BGP peer configuration display function. */
6761 static void bgp_config_write_peer_global(struct vty *vty, struct bgp *bgp,
6762 struct peer *peer)
6763 {
6764 struct peer *g_peer = NULL;
6765 char buf[SU_ADDRSTRLEN];
6766 char *addr;
6767 int if_pg_printed = FALSE;
6768 int if_ras_printed = FALSE;
6769
6770 /* Skip dynamic neighbors. */
6771 if (peer_dynamic_neighbor(peer))
6772 return;
6773
6774 if (peer->conf_if)
6775 addr = peer->conf_if;
6776 else
6777 addr = peer->host;
6778
6779 /************************************
6780 ****** Global to the neighbor ******
6781 ************************************/
6782 if (peer->conf_if) {
6783 if (CHECK_FLAG(peer->flags, PEER_FLAG_IFPEER_V6ONLY))
6784 vty_out(vty, " neighbor %s interface v6only", addr);
6785 else
6786 vty_out(vty, " neighbor %s interface", addr);
6787
6788 if (peer_group_active(peer)) {
6789 vty_out(vty, " peer-group %s", peer->group->name);
6790 if_pg_printed = TRUE;
6791 } else if (peer->as_type == AS_SPECIFIED) {
6792 vty_out(vty, " remote-as %u", peer->as);
6793 if_ras_printed = TRUE;
6794 } else if (peer->as_type == AS_INTERNAL) {
6795 vty_out(vty, " remote-as internal");
6796 if_ras_printed = TRUE;
6797 } else if (peer->as_type == AS_EXTERNAL) {
6798 vty_out(vty, " remote-as external");
6799 if_ras_printed = TRUE;
6800 }
6801
6802 vty_out(vty, "\n");
6803 }
6804
6805 /* remote-as and peer-group */
6806 /* peer is a member of a peer-group */
6807 if (peer_group_active(peer)) {
6808 g_peer = peer->group->conf;
6809
6810 if (g_peer->as_type == AS_UNSPECIFIED && !if_ras_printed) {
6811 if (peer->as_type == AS_SPECIFIED) {
6812 vty_out(vty, " neighbor %s remote-as %u\n",
6813 addr, peer->as);
6814 } else if (peer->as_type == AS_INTERNAL) {
6815 vty_out(vty,
6816 " neighbor %s remote-as internal\n",
6817 addr);
6818 } else if (peer->as_type == AS_EXTERNAL) {
6819 vty_out(vty,
6820 " neighbor %s remote-as external\n",
6821 addr);
6822 }
6823 }
6824
6825 /* For swpX peers we displayed the peer-group
6826 * via 'neighbor swpX interface peer-group WORD' */
6827 if (!if_pg_printed)
6828 vty_out(vty, " neighbor %s peer-group %s\n", addr,
6829 peer->group->name);
6830 }
6831
6832 /* peer is NOT a member of a peer-group */
6833 else {
6834 /* peer is a peer-group, declare the peer-group */
6835 if (CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
6836 vty_out(vty, " neighbor %s peer-group\n", addr);
6837 }
6838
6839 if (!if_ras_printed) {
6840 if (peer->as_type == AS_SPECIFIED) {
6841 vty_out(vty, " neighbor %s remote-as %u\n",
6842 addr, peer->as);
6843 } else if (peer->as_type == AS_INTERNAL) {
6844 vty_out(vty,
6845 " neighbor %s remote-as internal\n",
6846 addr);
6847 } else if (peer->as_type == AS_EXTERNAL) {
6848 vty_out(vty,
6849 " neighbor %s remote-as external\n",
6850 addr);
6851 }
6852 }
6853 }
6854
6855 /* local-as */
6856 if (peergroup_flag_check(peer, PEER_FLAG_LOCAL_AS)) {
6857 vty_out(vty, " neighbor %s local-as %u", addr,
6858 peer->change_local_as);
6859 if (peergroup_flag_check(peer, PEER_FLAG_LOCAL_AS_NO_PREPEND))
6860 vty_out(vty, " no-prepend");
6861 if (peergroup_flag_check(peer, PEER_FLAG_LOCAL_AS_REPLACE_AS))
6862 vty_out(vty, " replace-as");
6863 vty_out(vty, "\n");
6864 }
6865
6866 /* description */
6867 if (peer->desc) {
6868 vty_out(vty, " neighbor %s description %s\n", addr, peer->desc);
6869 }
6870
6871 /* shutdown */
6872 if (peergroup_flag_check(peer, PEER_FLAG_SHUTDOWN)) {
6873 if (peer->tx_shutdown_message)
6874 vty_out(vty, " neighbor %s shutdown message %s\n", addr,
6875 peer->tx_shutdown_message);
6876 else
6877 vty_out(vty, " neighbor %s shutdown\n", addr);
6878 }
6879
6880 /* bfd */
6881 if (peer->bfd_info) {
6882 if (!peer_group_active(peer) || !g_peer->bfd_info) {
6883 bgp_bfd_peer_config_write(vty, peer, addr);
6884 }
6885 }
6886
6887 /* password */
6888 if (peergroup_flag_check(peer, PEER_FLAG_PASSWORD))
6889 vty_out(vty, " neighbor %s password %s\n", addr,
6890 peer->password);
6891
6892 /* neighbor solo */
6893 if (CHECK_FLAG(peer->flags, PEER_FLAG_LONESOUL)) {
6894 if (!peer_group_active(peer)) {
6895 vty_out(vty, " neighbor %s solo\n", addr);
6896 }
6897 }
6898
6899 /* BGP port */
6900 if (peer->port != BGP_PORT_DEFAULT) {
6901 vty_out(vty, " neighbor %s port %d\n", addr, peer->port);
6902 }
6903
6904 /* Local interface name */
6905 if (peer->ifname) {
6906 vty_out(vty, " neighbor %s interface %s\n", addr, peer->ifname);
6907 }
6908
6909 /* passive */
6910 if (peergroup_flag_check(peer, PEER_FLAG_PASSIVE))
6911 vty_out(vty, " neighbor %s passive\n", addr);
6912
6913 /* ebgp-multihop */
6914 if (peer->sort != BGP_PEER_IBGP && peer->ttl != 1
6915 && !(peer->gtsm_hops != 0 && peer->ttl == MAXTTL)) {
6916 if (!peer_group_active(peer) || g_peer->ttl != peer->ttl) {
6917 vty_out(vty, " neighbor %s ebgp-multihop %d\n", addr,
6918 peer->ttl);
6919 }
6920 }
6921
6922 /* ttl-security hops */
6923 if (peer->gtsm_hops != 0) {
6924 if (!peer_group_active(peer)
6925 || g_peer->gtsm_hops != peer->gtsm_hops) {
6926 vty_out(vty, " neighbor %s ttl-security hops %d\n",
6927 addr, peer->gtsm_hops);
6928 }
6929 }
6930
6931 /* disable-connected-check */
6932 if (peergroup_flag_check(peer, PEER_FLAG_DISABLE_CONNECTED_CHECK))
6933 vty_out(vty, " neighbor %s disable-connected-check\n", addr);
6934
6935 /* enforce-first-as */
6936 if (peergroup_flag_check(peer, PEER_FLAG_ENFORCE_FIRST_AS))
6937 vty_out(vty, " neighbor %s enforce-first-as\n", addr);
6938
6939 /* update-source */
6940 if (peergroup_flag_check(peer, PEER_FLAG_UPDATE_SOURCE)) {
6941 if (peer->update_source)
6942 vty_out(vty, " neighbor %s update-source %s\n", addr,
6943 sockunion2str(peer->update_source, buf,
6944 SU_ADDRSTRLEN));
6945 else if (peer->update_if)
6946 vty_out(vty, " neighbor %s update-source %s\n", addr,
6947 peer->update_if);
6948 }
6949
6950 /* advertisement-interval */
6951 if (peergroup_flag_check(peer, PEER_FLAG_ROUTEADV))
6952 vty_out(vty, " neighbor %s advertisement-interval %u\n", addr,
6953 peer->routeadv);
6954
6955 /* timers */
6956 if (peergroup_flag_check(peer, PEER_FLAG_TIMER))
6957 vty_out(vty, " neighbor %s timers %u %u\n", addr,
6958 peer->keepalive, peer->holdtime);
6959
6960 /* timers connect */
6961 if (peergroup_flag_check(peer, PEER_FLAG_TIMER_CONNECT))
6962 vty_out(vty, " neighbor %s timers connect %u\n", addr,
6963 peer->connect);
6964
6965 /* capability dynamic */
6966 if (peergroup_flag_check(peer, PEER_FLAG_DYNAMIC_CAPABILITY))
6967 vty_out(vty, " neighbor %s capability dynamic\n", addr);
6968
6969 /* capability extended-nexthop */
6970 if (peergroup_flag_check(peer, PEER_FLAG_CAPABILITY_ENHE)) {
6971 if (CHECK_FLAG(peer->flags_invert, PEER_FLAG_CAPABILITY_ENHE))
6972 vty_out(vty,
6973 " no neighbor %s capability extended-nexthop\n",
6974 addr);
6975 else
6976 vty_out(vty,
6977 " neighbor %s capability extended-nexthop\n",
6978 addr);
6979 }
6980
6981 /* dont-capability-negotiation */
6982 if (peergroup_flag_check(peer, PEER_FLAG_DONT_CAPABILITY))
6983 vty_out(vty, " neighbor %s dont-capability-negotiate\n", addr);
6984
6985 /* override-capability */
6986 if (peergroup_flag_check(peer, PEER_FLAG_OVERRIDE_CAPABILITY))
6987 vty_out(vty, " neighbor %s override-capability\n", addr);
6988
6989 /* strict-capability-match */
6990 if (peergroup_flag_check(peer, PEER_FLAG_STRICT_CAP_MATCH))
6991 vty_out(vty, " neighbor %s strict-capability-match\n", addr);
6992 }
6993
6994 /* BGP peer configuration display function. */
6995 static void bgp_config_write_peer_af(struct vty *vty, struct bgp *bgp,
6996 struct peer *peer, afi_t afi, safi_t safi)
6997 {
6998 struct peer *g_peer = NULL;
6999 char *addr;
7000 bool flag_scomm, flag_secomm, flag_slcomm;
7001
7002 /* Skip dynamic neighbors. */
7003 if (peer_dynamic_neighbor(peer))
7004 return;
7005
7006 if (peer->conf_if)
7007 addr = peer->conf_if;
7008 else
7009 addr = peer->host;
7010
7011 /************************************
7012 ****** Per AF to the neighbor ******
7013 ************************************/
7014 if (peer_group_active(peer)) {
7015 g_peer = peer->group->conf;
7016
7017 /* If the peer-group is active but peer is not, print a 'no
7018 * activate' */
7019 if (g_peer->afc[afi][safi] && !peer->afc[afi][safi]) {
7020 vty_out(vty, " no neighbor %s activate\n", addr);
7021 }
7022
7023 /* If the peer-group is not active but peer is, print an
7024 'activate' */
7025 else if (!g_peer->afc[afi][safi] && peer->afc[afi][safi]) {
7026 vty_out(vty, " neighbor %s activate\n", addr);
7027 }
7028 } else {
7029 if (peer->afc[afi][safi]) {
7030 if ((afi == AFI_IP) && (safi == SAFI_UNICAST)) {
7031 if (bgp_flag_check(bgp,
7032 BGP_FLAG_NO_DEFAULT_IPV4)) {
7033 vty_out(vty, " neighbor %s activate\n",
7034 addr);
7035 }
7036 } else
7037 vty_out(vty, " neighbor %s activate\n", addr);
7038 } else {
7039 if ((afi == AFI_IP) && (safi == SAFI_UNICAST)) {
7040 if (!bgp_flag_check(bgp,
7041 BGP_FLAG_NO_DEFAULT_IPV4)) {
7042 vty_out(vty,
7043 " no neighbor %s activate\n",
7044 addr);
7045 }
7046 }
7047 }
7048 }
7049
7050 /* addpath TX knobs */
7051 if (peergroup_af_flag_check(peer, afi, safi,
7052 PEER_FLAG_ADDPATH_TX_ALL_PATHS)) {
7053 vty_out(vty, " neighbor %s addpath-tx-all-paths\n", addr);
7054 }
7055
7056 if (peergroup_af_flag_check(peer, afi, safi,
7057 PEER_FLAG_ADDPATH_TX_BESTPATH_PER_AS)) {
7058 vty_out(vty, " neighbor %s addpath-tx-bestpath-per-AS\n",
7059 addr);
7060 }
7061
7062 /* ORF capability. */
7063 if (peergroup_af_flag_check(peer, afi, safi, PEER_FLAG_ORF_PREFIX_SM)
7064 || peergroup_af_flag_check(peer, afi, safi,
7065 PEER_FLAG_ORF_PREFIX_RM)) {
7066 vty_out(vty, " neighbor %s capability orf prefix-list", addr);
7067
7068 if (peergroup_af_flag_check(peer, afi, safi,
7069 PEER_FLAG_ORF_PREFIX_SM)
7070 && peergroup_af_flag_check(peer, afi, safi,
7071 PEER_FLAG_ORF_PREFIX_RM))
7072 vty_out(vty, " both");
7073 else if (peergroup_af_flag_check(peer, afi, safi,
7074 PEER_FLAG_ORF_PREFIX_SM))
7075 vty_out(vty, " send");
7076 else
7077 vty_out(vty, " receive");
7078 vty_out(vty, "\n");
7079 }
7080
7081 /* Route reflector client. */
7082 if (peergroup_af_flag_check(peer, afi, safi,
7083 PEER_FLAG_REFLECTOR_CLIENT)) {
7084 vty_out(vty, " neighbor %s route-reflector-client\n", addr);
7085 }
7086
7087 /* next-hop-self force */
7088 if (peergroup_af_flag_check(peer, afi, safi,
7089 PEER_FLAG_FORCE_NEXTHOP_SELF)) {
7090 vty_out(vty, " neighbor %s next-hop-self force\n", addr);
7091 }
7092
7093 /* next-hop-self */
7094 if (peergroup_af_flag_check(peer, afi, safi, PEER_FLAG_NEXTHOP_SELF)) {
7095 vty_out(vty, " neighbor %s next-hop-self\n", addr);
7096 }
7097
7098 /* remove-private-AS */
7099 if (peergroup_af_flag_check(peer, afi, safi,
7100 PEER_FLAG_REMOVE_PRIVATE_AS_ALL_REPLACE)) {
7101 vty_out(vty, " neighbor %s remove-private-AS all replace-AS\n",
7102 addr);
7103 }
7104
7105 else if (peergroup_af_flag_check(peer, afi, safi,
7106 PEER_FLAG_REMOVE_PRIVATE_AS_REPLACE)) {
7107 vty_out(vty, " neighbor %s remove-private-AS replace-AS\n",
7108 addr);
7109 }
7110
7111 else if (peergroup_af_flag_check(peer, afi, safi,
7112 PEER_FLAG_REMOVE_PRIVATE_AS_ALL)) {
7113 vty_out(vty, " neighbor %s remove-private-AS all\n", addr);
7114 }
7115
7116 else if (peergroup_af_flag_check(peer, afi, safi,
7117 PEER_FLAG_REMOVE_PRIVATE_AS)) {
7118 vty_out(vty, " neighbor %s remove-private-AS\n", addr);
7119 }
7120
7121 /* as-override */
7122 if (peergroup_af_flag_check(peer, afi, safi, PEER_FLAG_AS_OVERRIDE)) {
7123 vty_out(vty, " neighbor %s as-override\n", addr);
7124 }
7125
7126 /* send-community print. */
7127 flag_scomm = peergroup_af_flag_check(peer, afi, safi,
7128 PEER_FLAG_SEND_COMMUNITY);
7129 flag_secomm = peergroup_af_flag_check(peer, afi, safi,
7130 PEER_FLAG_SEND_EXT_COMMUNITY);
7131 flag_slcomm = peergroup_af_flag_check(peer, afi, safi,
7132 PEER_FLAG_SEND_LARGE_COMMUNITY);
7133
7134 if (!bgp_option_check(BGP_OPT_CONFIG_CISCO)) {
7135 if (flag_scomm && flag_secomm && flag_slcomm) {
7136 vty_out(vty, " no neighbor %s send-community all\n",
7137 addr);
7138 } else {
7139 if (flag_scomm)
7140 vty_out(vty,
7141 " no neighbor %s send-community\n",
7142 addr);
7143 if (flag_secomm)
7144 vty_out(vty,
7145 " no neighbor %s send-community extended\n",
7146 addr);
7147
7148 if (flag_slcomm)
7149 vty_out(vty,
7150 " no neighbor %s send-community large\n",
7151 addr);
7152 }
7153 } else {
7154 if (flag_scomm && flag_secomm && flag_slcomm) {
7155 vty_out(vty, " neighbor %s send-community all\n",
7156 addr);
7157 } else if (flag_scomm && flag_secomm) {
7158 vty_out(vty, " neighbor %s send-community both\n",
7159 addr);
7160 } else {
7161 if (flag_scomm)
7162 vty_out(vty, " neighbor %s send-community\n",
7163 addr);
7164 if (flag_secomm)
7165 vty_out(vty,
7166 " neighbor %s send-community extended\n",
7167 addr);
7168 if (flag_slcomm)
7169 vty_out(vty,
7170 " neighbor %s send-community large\n",
7171 addr);
7172 }
7173 }
7174
7175 /* Default information */
7176 if (peergroup_af_flag_check(peer, afi, safi,
7177 PEER_FLAG_DEFAULT_ORIGINATE)) {
7178 vty_out(vty, " neighbor %s default-originate", addr);
7179
7180 if (peer->default_rmap[afi][safi].name)
7181 vty_out(vty, " route-map %s",
7182 peer->default_rmap[afi][safi].name);
7183
7184 vty_out(vty, "\n");
7185 }
7186
7187 /* Soft reconfiguration inbound. */
7188 if (peergroup_af_flag_check(peer, afi, safi, PEER_FLAG_SOFT_RECONFIG)) {
7189 vty_out(vty, " neighbor %s soft-reconfiguration inbound\n",
7190 addr);
7191 }
7192
7193 /* maximum-prefix. */
7194 if (peergroup_af_flag_check(peer, afi, safi, PEER_FLAG_MAX_PREFIX)) {
7195 vty_out(vty, " neighbor %s maximum-prefix %lu", addr,
7196 peer->pmax[afi][safi]);
7197
7198 if (peer->pmax_threshold[afi][safi]
7199 != MAXIMUM_PREFIX_THRESHOLD_DEFAULT)
7200 vty_out(vty, " %u", peer->pmax_threshold[afi][safi]);
7201 if (peer_af_flag_check(peer, afi, safi,
7202 PEER_FLAG_MAX_PREFIX_WARNING))
7203 vty_out(vty, " warning-only");
7204 if (peer->pmax_restart[afi][safi])
7205 vty_out(vty, " restart %u",
7206 peer->pmax_restart[afi][safi]);
7207
7208 vty_out(vty, "\n");
7209 }
7210
7211 /* Route server client. */
7212 if (peergroup_af_flag_check(peer, afi, safi,
7213 PEER_FLAG_RSERVER_CLIENT)) {
7214 vty_out(vty, " neighbor %s route-server-client\n", addr);
7215 }
7216
7217 /* Nexthop-local unchanged. */
7218 if (peergroup_af_flag_check(peer, afi, safi,
7219 PEER_FLAG_NEXTHOP_LOCAL_UNCHANGED)) {
7220 vty_out(vty, " neighbor %s nexthop-local unchanged\n", addr);
7221 }
7222
7223 /* allowas-in <1-10> */
7224 if (peergroup_af_flag_check(peer, afi, safi, PEER_FLAG_ALLOWAS_IN)) {
7225 if (peer_af_flag_check(peer, afi, safi,
7226 PEER_FLAG_ALLOWAS_IN_ORIGIN)) {
7227 vty_out(vty, " neighbor %s allowas-in origin\n", addr);
7228 } else if (peer->allowas_in[afi][safi] == 3) {
7229 vty_out(vty, " neighbor %s allowas-in\n", addr);
7230 } else {
7231 vty_out(vty, " neighbor %s allowas-in %d\n", addr,
7232 peer->allowas_in[afi][safi]);
7233 }
7234 }
7235
7236 /* weight */
7237 if (peergroup_af_flag_check(peer, afi, safi, PEER_FLAG_WEIGHT))
7238 vty_out(vty, " neighbor %s weight %lu\n", addr,
7239 peer->weight[afi][safi]);
7240
7241 /* Filter. */
7242 bgp_config_write_filter(vty, peer, afi, safi);
7243
7244 /* atribute-unchanged. */
7245 if (peer_af_flag_check(peer, afi, safi, PEER_FLAG_AS_PATH_UNCHANGED)
7246 || (safi != SAFI_EVPN
7247 && peer_af_flag_check(peer, afi, safi,
7248 PEER_FLAG_NEXTHOP_UNCHANGED))
7249 || peer_af_flag_check(peer, afi, safi, PEER_FLAG_MED_UNCHANGED)) {
7250
7251 if (!peer_group_active(peer)
7252 || peergroup_af_flag_check(peer, afi, safi,
7253 PEER_FLAG_AS_PATH_UNCHANGED)
7254 || peergroup_af_flag_check(peer, afi, safi,
7255 PEER_FLAG_NEXTHOP_UNCHANGED)
7256 || peergroup_af_flag_check(peer, afi, safi,
7257 PEER_FLAG_MED_UNCHANGED)) {
7258
7259 vty_out(vty,
7260 " neighbor %s attribute-unchanged%s%s%s\n",
7261 addr,
7262 peer_af_flag_check(peer, afi, safi,
7263 PEER_FLAG_AS_PATH_UNCHANGED)
7264 ? " as-path"
7265 : "",
7266 peer_af_flag_check(peer, afi, safi,
7267 PEER_FLAG_NEXTHOP_UNCHANGED)
7268 ? " next-hop"
7269 : "",
7270 peer_af_flag_check(peer, afi, safi,
7271 PEER_FLAG_MED_UNCHANGED)
7272 ? " med"
7273 : "");
7274 }
7275 }
7276 }
7277
7278 /* Address family based peer configuration display. */
7279 static void bgp_config_write_family(struct vty *vty, struct bgp *bgp, afi_t afi,
7280 safi_t safi)
7281 {
7282 struct peer *peer;
7283 struct peer_group *group;
7284 struct listnode *node, *nnode;
7285
7286
7287 vty_frame(vty, " !\n address-family ");
7288 if (afi == AFI_IP) {
7289 if (safi == SAFI_UNICAST)
7290 vty_frame(vty, "ipv4 unicast");
7291 else if (safi == SAFI_LABELED_UNICAST)
7292 vty_frame(vty, "ipv4 labeled-unicast");
7293 else if (safi == SAFI_MULTICAST)
7294 vty_frame(vty, "ipv4 multicast");
7295 else if (safi == SAFI_MPLS_VPN)
7296 vty_frame(vty, "ipv4 vpn");
7297 else if (safi == SAFI_ENCAP)
7298 vty_frame(vty, "ipv4 encap");
7299 else if (safi == SAFI_FLOWSPEC)
7300 vty_frame(vty, "ipv4 flowspec");
7301 } else if (afi == AFI_IP6) {
7302 if (safi == SAFI_UNICAST)
7303 vty_frame(vty, "ipv6 unicast");
7304 else if (safi == SAFI_LABELED_UNICAST)
7305 vty_frame(vty, "ipv6 labeled-unicast");
7306 else if (safi == SAFI_MULTICAST)
7307 vty_frame(vty, "ipv6 multicast");
7308 else if (safi == SAFI_MPLS_VPN)
7309 vty_frame(vty, "ipv6 vpn");
7310 else if (safi == SAFI_ENCAP)
7311 vty_frame(vty, "ipv6 encap");
7312 else if (safi == SAFI_FLOWSPEC)
7313 vty_frame(vty, "ipv6 flowspec");
7314 } else if (afi == AFI_L2VPN) {
7315 if (safi == SAFI_EVPN)
7316 vty_frame(vty, "l2vpn evpn");
7317 }
7318 vty_frame(vty, "\n");
7319
7320 bgp_config_write_distance(vty, bgp, afi, safi);
7321
7322 bgp_config_write_network(vty, bgp, afi, safi);
7323
7324 bgp_config_write_redistribute(vty, bgp, afi, safi);
7325
7326 for (ALL_LIST_ELEMENTS(bgp->group, node, nnode, group))
7327 bgp_config_write_peer_af(vty, bgp, group->conf, afi, safi);
7328
7329 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
7330 /* Skip dynamic neighbors. */
7331 if (peer_dynamic_neighbor(peer))
7332 continue;
7333
7334 /* Do not display doppelganger peers */
7335 if (CHECK_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE))
7336 bgp_config_write_peer_af(vty, bgp, peer, afi, safi);
7337 }
7338
7339 bgp_config_write_maxpaths(vty, bgp, afi, safi);
7340 bgp_config_write_table_map(vty, bgp, afi, safi);
7341
7342 if (safi == SAFI_EVPN)
7343 bgp_config_write_evpn_info(vty, bgp, afi, safi);
7344
7345 if (safi == SAFI_FLOWSPEC)
7346 bgp_fs_config_write_pbr(vty, bgp, afi, safi);
7347
7348 if (safi == SAFI_UNICAST) {
7349 bgp_vpn_policy_config_write_afi(vty, bgp, afi);
7350 if (CHECK_FLAG(bgp->af_flags[afi][safi],
7351 BGP_CONFIG_VRF_TO_MPLSVPN_EXPORT)) {
7352
7353 vty_out(vty, " export vpn\n");
7354 }
7355 if (CHECK_FLAG(bgp->af_flags[afi][safi],
7356 BGP_CONFIG_MPLSVPN_TO_VRF_IMPORT)) {
7357
7358 vty_out(vty, " import vpn\n");
7359 }
7360 if (CHECK_FLAG(bgp->af_flags[afi][safi],
7361 BGP_CONFIG_VRF_TO_VRF_IMPORT)) {
7362 char *name;
7363
7364 for (ALL_LIST_ELEMENTS_RO(
7365 bgp->vpn_policy[afi].import_vrf, node,
7366 name))
7367 vty_out(vty, " import vrf %s\n", name);
7368 }
7369 }
7370
7371 vty_endframe(vty, " exit-address-family\n");
7372 }
7373
7374 /* clang-format off */
7375 #if CONFDATE > 20190517
7376 CPP_NOTICE("bgpd: remove 'bgp enforce-first-as' config migration from bgp_config_write")
7377 #endif
7378 /* clang-format on */
7379
7380 int bgp_config_write(struct vty *vty)
7381 {
7382 int write = 0;
7383 struct bgp *bgp;
7384 struct peer_group *group;
7385 struct peer *peer;
7386 struct listnode *node, *nnode;
7387 struct listnode *mnode, *mnnode;
7388
7389 /* BGP Multiple instance. */
7390 if (!bgp_option_check(BGP_OPT_MULTIPLE_INSTANCE)) {
7391 vty_out(vty, "no bgp multiple-instance\n");
7392 write++;
7393 }
7394
7395 /* BGP Config type. */
7396 if (bgp_option_check(BGP_OPT_CONFIG_CISCO)) {
7397 vty_out(vty, "bgp config-type cisco\n");
7398 write++;
7399 }
7400
7401 if (bm->rmap_update_timer != RMAP_DEFAULT_UPDATE_TIMER)
7402 vty_out(vty, "bgp route-map delay-timer %u\n",
7403 bm->rmap_update_timer);
7404
7405 if (write)
7406 vty_out(vty, "!\n");
7407
7408 /* BGP configuration. */
7409 for (ALL_LIST_ELEMENTS(bm->bgp, mnode, mnnode, bgp)) {
7410
7411 /* skip all auto created vrf as they dont have user config */
7412 if (CHECK_FLAG(bgp->vrf_flags, BGP_VRF_AUTO))
7413 continue;
7414
7415 /* Migrate deprecated 'bgp enforce-first-as'
7416 * config to 'neighbor * enforce-first-as' configs
7417 */
7418 if (bgp_flag_check(bgp, BGP_FLAG_ENFORCE_FIRST_AS)) {
7419 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer))
7420 peer_flag_set(peer, PEER_FLAG_ENFORCE_FIRST_AS);
7421 bgp_flag_unset(bgp, BGP_FLAG_ENFORCE_FIRST_AS);
7422 }
7423
7424 /* Router bgp ASN */
7425 vty_out(vty, "router bgp %u", bgp->as);
7426
7427 if (bgp_option_check(BGP_OPT_MULTIPLE_INSTANCE)) {
7428 if (bgp->name)
7429 vty_out(vty, " %s %s",
7430 (bgp->inst_type
7431 == BGP_INSTANCE_TYPE_VIEW)
7432 ? "view"
7433 : "vrf",
7434 bgp->name);
7435 }
7436 vty_out(vty, "\n");
7437
7438 /* No Synchronization */
7439 if (bgp_option_check(BGP_OPT_CONFIG_CISCO))
7440 vty_out(vty, " no synchronization\n");
7441
7442 /* BGP fast-external-failover. */
7443 if (CHECK_FLAG(bgp->flags, BGP_FLAG_NO_FAST_EXT_FAILOVER))
7444 vty_out(vty, " no bgp fast-external-failover\n");
7445
7446 /* BGP router ID. */
7447 if (bgp->router_id_static.s_addr != 0)
7448 vty_out(vty, " bgp router-id %s\n",
7449 inet_ntoa(bgp->router_id_static));
7450
7451 /* BGP log-neighbor-changes. */
7452 if (!!bgp_flag_check(bgp, BGP_FLAG_LOG_NEIGHBOR_CHANGES)
7453 != DFLT_BGP_LOG_NEIGHBOR_CHANGES)
7454 vty_out(vty, " %sbgp log-neighbor-changes\n",
7455 bgp_flag_check(bgp,
7456 BGP_FLAG_LOG_NEIGHBOR_CHANGES)
7457 ? ""
7458 : "no ");
7459
7460 /* BGP configuration. */
7461 if (bgp_flag_check(bgp, BGP_FLAG_ALWAYS_COMPARE_MED))
7462 vty_out(vty, " bgp always-compare-med\n");
7463
7464 /* BGP default ipv4-unicast. */
7465 if (bgp_flag_check(bgp, BGP_FLAG_NO_DEFAULT_IPV4))
7466 vty_out(vty, " no bgp default ipv4-unicast\n");
7467
7468 /* BGP default local-preference. */
7469 if (bgp->default_local_pref != BGP_DEFAULT_LOCAL_PREF)
7470 vty_out(vty, " bgp default local-preference %u\n",
7471 bgp->default_local_pref);
7472
7473 /* BGP default show-hostname */
7474 if (!!bgp_flag_check(bgp, BGP_FLAG_SHOW_HOSTNAME)
7475 != DFLT_BGP_SHOW_HOSTNAME)
7476 vty_out(vty, " %sbgp default show-hostname\n",
7477 bgp_flag_check(bgp, BGP_FLAG_SHOW_HOSTNAME)
7478 ? ""
7479 : "no ");
7480
7481 /* BGP default subgroup-pkt-queue-max. */
7482 if (bgp->default_subgroup_pkt_queue_max
7483 != BGP_DEFAULT_SUBGROUP_PKT_QUEUE_MAX)
7484 vty_out(vty, " bgp default subgroup-pkt-queue-max %u\n",
7485 bgp->default_subgroup_pkt_queue_max);
7486
7487 /* BGP client-to-client reflection. */
7488 if (bgp_flag_check(bgp, BGP_FLAG_NO_CLIENT_TO_CLIENT))
7489 vty_out(vty, " no bgp client-to-client reflection\n");
7490
7491 /* BGP cluster ID. */
7492 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CLUSTER_ID))
7493 vty_out(vty, " bgp cluster-id %s\n",
7494 inet_ntoa(bgp->cluster_id));
7495
7496 /* Disable ebgp connected nexthop check */
7497 if (bgp_flag_check(bgp, BGP_FLAG_DISABLE_NH_CONNECTED_CHK))
7498 vty_out(vty,
7499 " bgp disable-ebgp-connected-route-check\n");
7500
7501 /* Confederation identifier*/
7502 if (CHECK_FLAG(bgp->config, BGP_CONFIG_CONFEDERATION))
7503 vty_out(vty, " bgp confederation identifier %i\n",
7504 bgp->confed_id);
7505
7506 /* Confederation peer */
7507 if (bgp->confed_peers_cnt > 0) {
7508 int i;
7509
7510 vty_out(vty, " bgp confederation peers");
7511
7512 for (i = 0; i < bgp->confed_peers_cnt; i++)
7513 vty_out(vty, " %u", bgp->confed_peers[i]);
7514
7515 vty_out(vty, "\n");
7516 }
7517
7518 /* BGP deterministic-med. */
7519 if (!!bgp_flag_check(bgp, BGP_FLAG_DETERMINISTIC_MED)
7520 != DFLT_BGP_DETERMINISTIC_MED)
7521 vty_out(vty, " %sbgp deterministic-med\n",
7522 bgp_flag_check(bgp, BGP_FLAG_DETERMINISTIC_MED)
7523 ? ""
7524 : "no ");
7525
7526 /* BGP update-delay. */
7527 bgp_config_write_update_delay(vty, bgp);
7528
7529 if (bgp->v_maxmed_onstartup
7530 != BGP_MAXMED_ONSTARTUP_UNCONFIGURED) {
7531 vty_out(vty, " bgp max-med on-startup %u",
7532 bgp->v_maxmed_onstartup);
7533 if (bgp->maxmed_onstartup_value
7534 != BGP_MAXMED_VALUE_DEFAULT)
7535 vty_out(vty, " %u",
7536 bgp->maxmed_onstartup_value);
7537 vty_out(vty, "\n");
7538 }
7539 if (bgp->v_maxmed_admin != BGP_MAXMED_ADMIN_UNCONFIGURED) {
7540 vty_out(vty, " bgp max-med administrative");
7541 if (bgp->maxmed_admin_value != BGP_MAXMED_VALUE_DEFAULT)
7542 vty_out(vty, " %u", bgp->maxmed_admin_value);
7543 vty_out(vty, "\n");
7544 }
7545
7546 /* write quanta */
7547 bgp_config_write_wpkt_quanta(vty, bgp);
7548 /* read quanta */
7549 bgp_config_write_rpkt_quanta(vty, bgp);
7550
7551 /* coalesce time */
7552 bgp_config_write_coalesce_time(vty, bgp);
7553
7554 /* BGP graceful-restart. */
7555 if (bgp->stalepath_time != BGP_DEFAULT_STALEPATH_TIME)
7556 vty_out(vty,
7557 " bgp graceful-restart stalepath-time %u\n",
7558 bgp->stalepath_time);
7559 if (bgp->restart_time != BGP_DEFAULT_RESTART_TIME)
7560 vty_out(vty, " bgp graceful-restart restart-time %u\n",
7561 bgp->restart_time);
7562 if (bgp_flag_check(bgp, BGP_FLAG_GRACEFUL_RESTART))
7563 vty_out(vty, " bgp graceful-restart\n");
7564
7565 /* BGP graceful-shutdown */
7566 if (bgp_flag_check(bgp, BGP_FLAG_GRACEFUL_SHUTDOWN))
7567 vty_out(vty, " bgp graceful-shutdown\n");
7568
7569 /* BGP graceful-restart Preserve State F bit. */
7570 if (bgp_flag_check(bgp, BGP_FLAG_GR_PRESERVE_FWD))
7571 vty_out(vty,
7572 " bgp graceful-restart preserve-fw-state\n");
7573
7574 /* BGP bestpath method. */
7575 if (bgp_flag_check(bgp, BGP_FLAG_ASPATH_IGNORE))
7576 vty_out(vty, " bgp bestpath as-path ignore\n");
7577 if (bgp_flag_check(bgp, BGP_FLAG_ASPATH_CONFED))
7578 vty_out(vty, " bgp bestpath as-path confed\n");
7579
7580 if (bgp_flag_check(bgp, BGP_FLAG_ASPATH_MULTIPATH_RELAX)) {
7581 if (bgp_flag_check(bgp,
7582 BGP_FLAG_MULTIPATH_RELAX_AS_SET)) {
7583 vty_out(vty,
7584 " bgp bestpath as-path multipath-relax as-set\n");
7585 } else {
7586 vty_out(vty,
7587 " bgp bestpath as-path multipath-relax\n");
7588 }
7589 }
7590
7591 if (bgp_flag_check(bgp, BGP_FLAG_RR_ALLOW_OUTBOUND_POLICY)) {
7592 vty_out(vty,
7593 " bgp route-reflector allow-outbound-policy\n");
7594 }
7595 if (bgp_flag_check(bgp, BGP_FLAG_COMPARE_ROUTER_ID))
7596 vty_out(vty, " bgp bestpath compare-routerid\n");
7597 if (bgp_flag_check(bgp, BGP_FLAG_MED_CONFED)
7598 || bgp_flag_check(bgp, BGP_FLAG_MED_MISSING_AS_WORST)) {
7599 vty_out(vty, " bgp bestpath med");
7600 if (bgp_flag_check(bgp, BGP_FLAG_MED_CONFED))
7601 vty_out(vty, " confed");
7602 if (bgp_flag_check(bgp, BGP_FLAG_MED_MISSING_AS_WORST))
7603 vty_out(vty, " missing-as-worst");
7604 vty_out(vty, "\n");
7605 }
7606
7607 /* BGP network import check. */
7608 if (!!bgp_flag_check(bgp, BGP_FLAG_IMPORT_CHECK)
7609 != DFLT_BGP_IMPORT_CHECK)
7610 vty_out(vty, " %sbgp network import-check\n",
7611 bgp_flag_check(bgp, BGP_FLAG_IMPORT_CHECK)
7612 ? ""
7613 : "no ");
7614
7615 /* BGP flag dampening. */
7616 if (CHECK_FLAG(bgp->af_flags[AFI_IP][SAFI_UNICAST],
7617 BGP_CONFIG_DAMPENING))
7618 bgp_config_write_damp(vty);
7619
7620 /* BGP timers configuration. */
7621 if (bgp->default_keepalive != BGP_DEFAULT_KEEPALIVE
7622 && bgp->default_holdtime != BGP_DEFAULT_HOLDTIME)
7623 vty_out(vty, " timers bgp %u %u\n",
7624 bgp->default_keepalive, bgp->default_holdtime);
7625
7626 /* peer-group */
7627 for (ALL_LIST_ELEMENTS(bgp->group, node, nnode, group)) {
7628 bgp_config_write_peer_global(vty, bgp, group->conf);
7629 }
7630
7631 /* Normal neighbor configuration. */
7632 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
7633 if (CHECK_FLAG(peer->flags, PEER_FLAG_CONFIG_NODE))
7634 bgp_config_write_peer_global(vty, bgp, peer);
7635 }
7636
7637 /* listen range and limit for dynamic BGP neighbors */
7638 bgp_config_write_listen(vty, bgp);
7639
7640 /*
7641 * BGP default autoshutdown neighbors
7642 *
7643 * This must be placed after any peer and peer-group
7644 * configuration, to avoid setting all peers to shutdown after
7645 * a daemon restart, which is undesired behavior. (see #2286)
7646 */
7647 if (bgp->autoshutdown)
7648 vty_out(vty, " bgp default shutdown\n");
7649
7650 /* No auto-summary */
7651 if (bgp_option_check(BGP_OPT_CONFIG_CISCO))
7652 vty_out(vty, " no auto-summary\n");
7653
7654 /* IPv4 unicast configuration. */
7655 bgp_config_write_family(vty, bgp, AFI_IP, SAFI_UNICAST);
7656
7657 /* IPv4 multicast configuration. */
7658 bgp_config_write_family(vty, bgp, AFI_IP, SAFI_MULTICAST);
7659
7660 /* IPv4 labeled-unicast configuration. */
7661 bgp_config_write_family(vty, bgp, AFI_IP, SAFI_LABELED_UNICAST);
7662
7663 /* IPv4 VPN configuration. */
7664 bgp_config_write_family(vty, bgp, AFI_IP, SAFI_MPLS_VPN);
7665
7666 /* ENCAPv4 configuration. */
7667 bgp_config_write_family(vty, bgp, AFI_IP, SAFI_ENCAP);
7668
7669 /* FLOWSPEC v4 configuration. */
7670 bgp_config_write_family(vty, bgp, AFI_IP, SAFI_FLOWSPEC);
7671
7672 /* IPv6 unicast configuration. */
7673 bgp_config_write_family(vty, bgp, AFI_IP6, SAFI_UNICAST);
7674
7675 /* IPv6 multicast configuration. */
7676 bgp_config_write_family(vty, bgp, AFI_IP6, SAFI_MULTICAST);
7677
7678 /* IPv6 labeled-unicast configuration. */
7679 bgp_config_write_family(vty, bgp, AFI_IP6,
7680 SAFI_LABELED_UNICAST);
7681
7682 /* IPv6 VPN configuration. */
7683 bgp_config_write_family(vty, bgp, AFI_IP6, SAFI_MPLS_VPN);
7684
7685 /* ENCAPv6 configuration. */
7686 bgp_config_write_family(vty, bgp, AFI_IP6, SAFI_ENCAP);
7687
7688 /* FLOWSPEC v6 configuration. */
7689 bgp_config_write_family(vty, bgp, AFI_IP6, SAFI_FLOWSPEC);
7690
7691 /* EVPN configuration. */
7692 bgp_config_write_family(vty, bgp, AFI_L2VPN, SAFI_EVPN);
7693
7694 #if ENABLE_BGP_VNC
7695 bgp_rfapi_cfg_write(vty, bgp);
7696 #endif
7697
7698 vty_out(vty, "!\n");
7699 }
7700 return 0;
7701 }
7702
7703 void bgp_master_init(struct thread_master *master)
7704 {
7705 qobj_init();
7706
7707 memset(&bgp_master, 0, sizeof(struct bgp_master));
7708
7709 bm = &bgp_master;
7710 bm->bgp = list_new();
7711 bm->listen_sockets = list_new();
7712 bm->port = BGP_PORT_DEFAULT;
7713 bm->master = master;
7714 bm->start_time = bgp_clock();
7715 bm->t_rmap_update = NULL;
7716 bm->rmap_update_timer = RMAP_DEFAULT_UPDATE_TIMER;
7717 bm->terminating = false;
7718
7719 bgp_process_queue_init();
7720
7721 /* init the rd id space.
7722 assign 0th index in the bitfield,
7723 so that we start with id 1
7724 */
7725 bf_init(bm->rd_idspace, UINT16_MAX);
7726 bf_assign_zero_index(bm->rd_idspace);
7727
7728 /* Enable multiple instances by default. */
7729 bgp_option_set(BGP_OPT_MULTIPLE_INSTANCE);
7730
7731 /* mpls label dynamic allocation pool */
7732 bgp_lp_init(bm->master, &bm->labelpool);
7733
7734 QOBJ_REG(bm, bgp_master);
7735 }
7736
7737 /*
7738 * Free up connected routes and interfaces for a BGP instance. Invoked upon
7739 * instance delete (non-default only) or BGP exit.
7740 */
7741 static void bgp_if_finish(struct bgp *bgp)
7742 {
7743 struct vrf *vrf = vrf_lookup_by_id(bgp->vrf_id);
7744 struct interface *ifp;
7745
7746 if (bgp->inst_type == BGP_INSTANCE_TYPE_VIEW || !vrf)
7747 return;
7748
7749 FOR_ALL_INTERFACES (vrf, ifp) {
7750 struct listnode *c_node, *c_nnode;
7751 struct connected *c;
7752
7753 for (ALL_LIST_ELEMENTS(ifp->connected, c_node, c_nnode, c))
7754 bgp_connected_delete(bgp, c);
7755 }
7756 }
7757
7758 static void bgp_viewvrf_autocomplete(vector comps, struct cmd_token *token)
7759 {
7760 struct vrf *vrf = NULL;
7761 struct listnode *next;
7762 struct bgp *bgp;
7763
7764 RB_FOREACH (vrf, vrf_name_head, &vrfs_by_name)
7765 vector_set(comps, XSTRDUP(MTYPE_COMPLETION, vrf->name));
7766
7767 for (ALL_LIST_ELEMENTS_RO(bm->bgp, next, bgp)) {
7768 if (bgp->inst_type != BGP_INSTANCE_TYPE_VIEW)
7769 continue;
7770
7771 vector_set(comps, XSTRDUP(MTYPE_COMPLETION, bgp->name));
7772 }
7773 }
7774
7775 static const struct cmd_variable_handler bgp_viewvrf_var_handlers[] = {
7776 {.tokenname = "VIEWVRFNAME", .completions = bgp_viewvrf_autocomplete},
7777 {.completions = NULL},
7778 };
7779
7780 struct frr_pthread *bgp_pth_io;
7781 struct frr_pthread *bgp_pth_ka;
7782
7783 static void bgp_pthreads_init()
7784 {
7785 assert(!bgp_pth_io);
7786 assert(!bgp_pth_ka);
7787
7788 frr_pthread_init();
7789
7790 struct frr_pthread_attr io = {
7791 .start = frr_pthread_attr_default.start,
7792 .stop = frr_pthread_attr_default.stop,
7793 };
7794 struct frr_pthread_attr ka = {
7795 .start = bgp_keepalives_start,
7796 .stop = bgp_keepalives_stop,
7797 };
7798 bgp_pth_io = frr_pthread_new(&io, "BGP I/O thread", "bgpd_io");
7799 bgp_pth_ka = frr_pthread_new(&ka, "BGP Keepalives thread", "bgpd_ka");
7800 }
7801
7802 void bgp_pthreads_run()
7803 {
7804 frr_pthread_run(bgp_pth_io, NULL);
7805 frr_pthread_run(bgp_pth_ka, NULL);
7806
7807 /* Wait until threads are ready. */
7808 frr_pthread_wait_running(bgp_pth_io);
7809 frr_pthread_wait_running(bgp_pth_ka);
7810 }
7811
7812 void bgp_pthreads_finish()
7813 {
7814 frr_pthread_stop_all();
7815 frr_pthread_finish();
7816 }
7817
7818 void bgp_init(unsigned short instance)
7819 {
7820
7821 /* allocates some vital data structures used by peer commands in
7822 * vty_init */
7823
7824 /* pre-init pthreads */
7825 bgp_pthreads_init();
7826
7827 /* Init zebra. */
7828 bgp_zebra_init(bm->master, instance);
7829
7830 #if ENABLE_BGP_VNC
7831 vnc_zebra_init(bm->master);
7832 #endif
7833
7834 /* BGP VTY commands installation. */
7835 bgp_vty_init();
7836
7837 /* BGP inits. */
7838 bgp_attr_init();
7839 bgp_debug_init();
7840 bgp_dump_init();
7841 bgp_route_init();
7842 bgp_route_map_init();
7843 bgp_scan_vty_init();
7844 bgp_mplsvpn_init();
7845 #if ENABLE_BGP_VNC
7846 rfapi_init();
7847 #endif
7848 bgp_ethernetvpn_init();
7849 bgp_flowspec_vty_init();
7850
7851 /* Access list initialize. */
7852 access_list_init();
7853 access_list_add_hook(peer_distribute_update);
7854 access_list_delete_hook(peer_distribute_update);
7855
7856 /* Filter list initialize. */
7857 bgp_filter_init();
7858 as_list_add_hook(peer_aslist_add);
7859 as_list_delete_hook(peer_aslist_del);
7860
7861 /* Prefix list initialize.*/
7862 prefix_list_init();
7863 prefix_list_add_hook(peer_prefix_list_update);
7864 prefix_list_delete_hook(peer_prefix_list_update);
7865
7866 /* Community list initialize. */
7867 bgp_clist = community_list_init();
7868
7869 /* BFD init */
7870 bgp_bfd_init();
7871
7872 cmd_variable_handler_register(bgp_viewvrf_var_handlers);
7873 }
7874
7875 void bgp_terminate(void)
7876 {
7877 struct bgp *bgp;
7878 struct peer *peer;
7879 struct listnode *node, *nnode;
7880 struct listnode *mnode, *mnnode;
7881
7882 QOBJ_UNREG(bm);
7883
7884 /* Close the listener sockets first as this prevents peers from
7885 * attempting
7886 * to reconnect on receiving the peer unconfig message. In the presence
7887 * of a large number of peers this will ensure that no peer is left with
7888 * a dangling connection
7889 */
7890 /* reverse bgp_master_init */
7891 bgp_close();
7892
7893 if (bm->listen_sockets)
7894 list_delete(&bm->listen_sockets);
7895
7896 for (ALL_LIST_ELEMENTS(bm->bgp, mnode, mnnode, bgp))
7897 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer))
7898 if (peer->status == Established
7899 || peer->status == OpenSent
7900 || peer->status == OpenConfirm)
7901 bgp_notify_send(peer, BGP_NOTIFY_CEASE,
7902 BGP_NOTIFY_CEASE_PEER_UNCONFIG);
7903
7904 if (bm->process_main_queue)
7905 work_queue_free_and_null(&bm->process_main_queue);
7906
7907 if (bm->t_rmap_update)
7908 BGP_TIMER_OFF(bm->t_rmap_update);
7909
7910 bgp_lp_finish();
7911 }
FRRouting mirror