3 * Copyright (C) 2016 Cumulus Networks, Inc.
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful, but
11 * WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * General Public License for more details.
15 * You should have received a copy of the GNU General Public License along
16 * with this program; see the file COPYING; if not, write to the Free Software
17 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
23 #include <lib/jhash.h>
25 #include <lib/prefix.h>
26 #include <lib/sockunion.h>
27 #include <lib/stream.h>
28 #include <lib/thread.h>
30 #include <lib/plist.h>
34 #include "pim_memory.h"
35 #include "pim_iface.h"
39 #include "pim_upstream.h"
43 #include "pim_msdp_packet.h"
44 #include "pim_msdp_socket.h"
46 // struct pim_msdp pim_msdp, *msdp = &pim_msdp;
48 static void pim_msdp_peer_listen(struct pim_msdp_peer
*mp
);
49 static void pim_msdp_peer_cr_timer_setup(struct pim_msdp_peer
*mp
, bool start
);
50 static void pim_msdp_peer_ka_timer_setup(struct pim_msdp_peer
*mp
, bool start
);
51 static void pim_msdp_peer_hold_timer_setup(struct pim_msdp_peer
*mp
,
53 static void pim_msdp_peer_free(struct pim_msdp_peer
*mp
);
54 static void pim_msdp_enable(struct pim_instance
*pim
);
55 static void pim_msdp_sa_adv_timer_setup(struct pim_instance
*pim
, bool start
);
56 static void pim_msdp_sa_deref(struct pim_msdp_sa
*sa
,
57 enum pim_msdp_sa_flags flags
);
58 static int pim_msdp_mg_mbr_comp(const void *p1
, const void *p2
);
59 static void pim_msdp_mg_mbr_free(struct pim_msdp_mg_mbr
*mbr
);
60 static void pim_msdp_mg_mbr_do_del(struct pim_msdp_mg
*mg
,
61 struct pim_msdp_mg_mbr
*mbr
);
63 /************************ SA cache management ******************************/
64 static void pim_msdp_sa_timer_expiry_log(struct pim_msdp_sa
*sa
,
65 const char *timer_str
)
67 zlog_debug("MSDP SA %s %s timer expired", sa
->sg_str
, timer_str
);
70 /* RFC-3618:Sec-5.1 - global active source advertisement timer */
71 static int pim_msdp_sa_adv_timer_cb(struct thread
*t
)
73 struct pim_instance
*pim
= THREAD_ARG(t
);
75 if (PIM_DEBUG_MSDP_EVENTS
) {
76 zlog_debug("MSDP SA advertisment timer expired");
79 pim_msdp_sa_adv_timer_setup(pim
, true /* start */);
80 pim_msdp_pkt_sa_tx(pim
);
83 static void pim_msdp_sa_adv_timer_setup(struct pim_instance
*pim
, bool start
)
85 THREAD_OFF(pim
->msdp
.sa_adv_timer
);
87 thread_add_timer(pim
->msdp
.master
, pim_msdp_sa_adv_timer_cb
,
88 pim
, PIM_MSDP_SA_ADVERTISMENT_TIME
,
89 &pim
->msdp
.sa_adv_timer
);
93 /* RFC-3618:Sec-5.3 - SA cache state timer */
94 static int pim_msdp_sa_state_timer_cb(struct thread
*t
)
96 struct pim_msdp_sa
*sa
;
100 if (PIM_DEBUG_MSDP_EVENTS
) {
101 pim_msdp_sa_timer_expiry_log(sa
, "state");
104 pim_msdp_sa_deref(sa
, PIM_MSDP_SAF_PEER
);
107 static void pim_msdp_sa_state_timer_setup(struct pim_msdp_sa
*sa
, bool start
)
109 THREAD_OFF(sa
->sa_state_timer
);
111 thread_add_timer(sa
->pim
->msdp
.master
,
112 pim_msdp_sa_state_timer_cb
, sa
,
113 PIM_MSDP_SA_HOLD_TIME
, &sa
->sa_state_timer
);
117 static void pim_msdp_sa_upstream_del(struct pim_msdp_sa
*sa
)
119 struct pim_upstream
*up
= sa
->up
;
125 if (PIM_UPSTREAM_FLAG_TEST_SRC_MSDP(up
->flags
)) {
126 PIM_UPSTREAM_FLAG_UNSET_SRC_MSDP(up
->flags
);
127 sa
->flags
|= PIM_MSDP_SAF_UP_DEL_IN_PROG
;
128 pim_upstream_del(sa
->pim
, up
, __PRETTY_FUNCTION__
);
129 sa
->flags
&= ~PIM_MSDP_SAF_UP_DEL_IN_PROG
;
132 if (PIM_DEBUG_MSDP_EVENTS
) {
133 zlog_debug("MSDP SA %s de-referenced SPT", sa
->sg_str
);
137 static bool pim_msdp_sa_upstream_add_ok(struct pim_msdp_sa
*sa
,
138 struct pim_upstream
*xg_up
)
140 if (!(sa
->flags
& PIM_MSDP_SAF_PEER
)) {
141 /* SA should have been rxed from a peer */
144 /* check if we are RP */
145 if (!I_am_RP(sa
->pim
, sa
->sg
.grp
)) {
149 /* check if we have a (*, G) with a non-empty immediate OIL */
153 memset(&sg
, 0, sizeof(sg
));
156 xg_up
= pim_upstream_find(sa
->pim
, &sg
);
158 if (!xg_up
|| (xg_up
->join_state
!= PIM_UPSTREAM_JOINED
)) {
159 /* join desired will be true for such (*, G) entries so we will
160 * just look at join_state and let the PIM state machine do the
169 /* Upstream add evaluation needs to happen everytime -
170 * 1. Peer reference is added or removed.
171 * 2. The RP for a group changes.
172 * 3. joinDesired for the associated (*, G) changes
173 * 4. associated (*, G) is removed - this seems like a bit redundant
174 * (considering #4); but just in case an entry gets nuked without
175 * upstream state transition
177 static void pim_msdp_sa_upstream_update(struct pim_msdp_sa
*sa
,
178 struct pim_upstream
*xg_up
,
181 struct pim_upstream
*up
;
183 if (!pim_msdp_sa_upstream_add_ok(sa
, xg_up
)) {
184 pim_msdp_sa_upstream_del(sa
);
193 up
= pim_upstream_find(sa
->pim
, &sa
->sg
);
194 if (up
&& (PIM_UPSTREAM_FLAG_TEST_SRC_MSDP(up
->flags
))) {
195 /* somehow we lost track of the upstream ptr? best log it */
197 if (PIM_DEBUG_MSDP_EVENTS
) {
198 zlog_debug("MSDP SA %s SPT reference missing",
204 /* RFC3618: "RP triggers a (S, G) join event towards the data source
205 * as if a JP message was rxed addressed to the RP itself." */
206 up
= pim_upstream_add(sa
->pim
, &sa
->sg
, NULL
/* iif */,
207 PIM_UPSTREAM_FLAG_MASK_SRC_MSDP
,
208 __PRETTY_FUNCTION__
, NULL
);
212 /* update inherited oil */
213 pim_upstream_inherited_olist(sa
->pim
, up
);
214 /* should we also start the kat in parallel? we will need it
217 if (PIM_DEBUG_MSDP_EVENTS
) {
218 zlog_debug("MSDP SA %s referenced SPT", sa
->sg_str
);
221 if (PIM_DEBUG_MSDP_EVENTS
) {
222 zlog_debug("MSDP SA %s SPT reference failed",
228 /* release all mem associated with a sa */
229 static void pim_msdp_sa_free(struct pim_msdp_sa
*sa
)
231 pim_msdp_sa_state_timer_setup(sa
, false);
233 XFREE(MTYPE_PIM_MSDP_SA
, sa
);
236 static struct pim_msdp_sa
*pim_msdp_sa_new(struct pim_instance
*pim
,
237 struct prefix_sg
*sg
,
240 struct pim_msdp_sa
*sa
;
242 sa
= XCALLOC(MTYPE_PIM_MSDP_SA
, sizeof(*sa
));
244 zlog_err("%s: PIM XCALLOC(%zu) failure", __PRETTY_FUNCTION__
,
251 pim_str_sg_set(sg
, sa
->sg_str
);
253 sa
->uptime
= pim_time_monotonic_sec();
255 /* insert into misc tables for easy access */
256 sa
= hash_get(pim
->msdp
.sa_hash
, sa
, hash_alloc_intern
);
258 zlog_err("%s: PIM hash get failure", __PRETTY_FUNCTION__
);
259 pim_msdp_sa_free(sa
);
262 listnode_add_sort(pim
->msdp
.sa_list
, sa
);
264 if (PIM_DEBUG_MSDP_EVENTS
) {
265 zlog_debug("MSDP SA %s created", sa
->sg_str
);
271 static struct pim_msdp_sa
*pim_msdp_sa_find(struct pim_instance
*pim
,
272 struct prefix_sg
*sg
)
274 struct pim_msdp_sa lookup
;
277 return hash_lookup(pim
->msdp
.sa_hash
, &lookup
);
280 static struct pim_msdp_sa
*pim_msdp_sa_add(struct pim_instance
*pim
,
281 struct prefix_sg
*sg
,
284 struct pim_msdp_sa
*sa
;
286 sa
= pim_msdp_sa_find(pim
, sg
);
291 return pim_msdp_sa_new(pim
, sg
, rp
);
294 static void pim_msdp_sa_del(struct pim_msdp_sa
*sa
)
296 /* this is somewhat redundant - still want to be careful not to leave
297 * stale upstream references */
298 pim_msdp_sa_upstream_del(sa
);
301 pim_msdp_sa_state_timer_setup(sa
, false /* start */);
303 /* remove the entry from various tables */
304 listnode_delete(sa
->pim
->msdp
.sa_list
, sa
);
305 hash_release(sa
->pim
->msdp
.sa_hash
, sa
);
307 if (PIM_DEBUG_MSDP_EVENTS
) {
308 zlog_debug("MSDP SA %s deleted", sa
->sg_str
);
311 /* free up any associated memory */
312 pim_msdp_sa_free(sa
);
315 static void pim_msdp_sa_peer_ip_set(struct pim_msdp_sa
*sa
,
316 struct pim_msdp_peer
*mp
, struct in_addr rp
)
318 struct pim_msdp_peer
*old_mp
;
320 /* optimize the "no change" case as it will happen
321 * frequently/periodically */
322 if (mp
&& (sa
->peer
.s_addr
== mp
->peer
.s_addr
)) {
326 /* any time the peer ip changes also update the rp address */
327 if (PIM_INADDR_ISNOT_ANY(sa
->peer
)) {
328 old_mp
= pim_msdp_peer_find(sa
->pim
, sa
->peer
);
329 if (old_mp
&& old_mp
->sa_cnt
) {
338 sa
->peer
.s_addr
= PIM_NET_INADDR_ANY
;
343 /* When a local active-source is removed there is no way to withdraw the
344 * source from peers. We will simply remove it from the SA cache so it will
345 * not be sent in supsequent SA updates. Peers will consequently timeout the
347 * Similarly a "peer-added" SA is never explicitly deleted. It is simply
348 * aged out overtime if not seen in the SA updates from the peers.
349 * XXX: should we provide a knob to drop entries learnt from a peer when the
351 static void pim_msdp_sa_deref(struct pim_msdp_sa
*sa
,
352 enum pim_msdp_sa_flags flags
)
354 bool update_up
= false;
356 if ((sa
->flags
& PIM_MSDP_SAF_LOCAL
)) {
357 if (flags
& PIM_MSDP_SAF_LOCAL
) {
358 if (PIM_DEBUG_MSDP_EVENTS
) {
359 zlog_debug("MSDP SA %s local reference removed",
362 if (sa
->pim
->msdp
.local_cnt
)
363 --sa
->pim
->msdp
.local_cnt
;
367 if ((sa
->flags
& PIM_MSDP_SAF_PEER
)) {
368 if (flags
& PIM_MSDP_SAF_PEER
) {
371 if (PIM_DEBUG_MSDP_EVENTS
) {
372 zlog_debug("MSDP SA %s peer reference removed",
375 pim_msdp_sa_state_timer_setup(sa
, false /* start */);
376 rp
.s_addr
= INADDR_ANY
;
377 pim_msdp_sa_peer_ip_set(sa
, NULL
/* mp */, rp
);
378 /* if peer ref was removed we need to remove the msdp
387 pim_msdp_sa_upstream_update(sa
, NULL
/* xg_up */, "sa-deref");
390 if (!(sa
->flags
& PIM_MSDP_SAF_REF
)) {
395 void pim_msdp_sa_ref(struct pim_instance
*pim
, struct pim_msdp_peer
*mp
,
396 struct prefix_sg
*sg
, struct in_addr rp
)
398 struct pim_msdp_sa
*sa
;
400 sa
= pim_msdp_sa_add(pim
, sg
, rp
);
407 if (!(sa
->flags
& PIM_MSDP_SAF_PEER
)) {
408 sa
->flags
|= PIM_MSDP_SAF_PEER
;
409 if (PIM_DEBUG_MSDP_EVENTS
) {
410 zlog_debug("MSDP SA %s added by peer",
414 pim_msdp_sa_peer_ip_set(sa
, mp
, rp
);
415 /* start/re-start the state timer to prevent cache expiry */
416 pim_msdp_sa_state_timer_setup(sa
, true /* start */);
417 /* We re-evaluate SA "SPT-trigger" everytime we hear abt it from
419 * peer. XXX: If this becomes too much of a periodic overhead we
420 * can make it event based */
421 pim_msdp_sa_upstream_update(sa
, NULL
/* xg_up */, "peer-ref");
423 if (!(sa
->flags
& PIM_MSDP_SAF_LOCAL
)) {
424 sa
->flags
|= PIM_MSDP_SAF_LOCAL
;
425 ++sa
->pim
->msdp
.local_cnt
;
426 if (PIM_DEBUG_MSDP_EVENTS
) {
427 zlog_debug("MSDP SA %s added locally",
430 /* send an immediate SA update to peers */
431 pim_msdp_pkt_sa_tx_one(sa
);
433 sa
->flags
&= ~PIM_MSDP_SAF_STALE
;
437 /* The following criteria must be met to originate an SA from the MSDP
439 * 1. KAT must be running i.e. source is active.
440 * 2. We must be RP for the group.
441 * 3. Source must be registrable to the RP (this is where the RFC is vague
442 * and especially ambiguous in CLOS networks; with anycast RP all sources
443 * are potentially registrable to all RPs in the domain). We assume #3 is
445 * a. We are also the FHR-DR for the source (OR)
446 * b. We rxed a pim register (null or data encapsulated) within the last
447 * (3 * (1.5 * register_suppression_timer))).
449 static bool pim_msdp_sa_local_add_ok(struct pim_upstream
*up
)
451 struct pim_instance
*pim
= up
->channel_oil
->pim
;
453 if (!(pim
->msdp
.flags
& PIM_MSDPF_ENABLE
)) {
457 if (!up
->t_ka_timer
) {
458 /* stream is not active */
462 if (!I_am_RP(pim
, up
->sg
.grp
)) {
463 /* we are not RP for the group */
467 /* we are the FHR-DR for this stream or we are RP and have seen
469 * from a FHR for this source */
470 if (PIM_UPSTREAM_FLAG_TEST_FHR(up
->flags
) || up
->t_msdp_reg_timer
) {
477 static void pim_msdp_sa_local_add(struct pim_instance
*pim
,
478 struct prefix_sg
*sg
)
482 pim_msdp_sa_ref(pim
, NULL
/* mp */, sg
, rp
);
485 void pim_msdp_sa_local_del(struct pim_instance
*pim
, struct prefix_sg
*sg
)
487 struct pim_msdp_sa
*sa
;
489 sa
= pim_msdp_sa_find(pim
, sg
);
491 pim_msdp_sa_deref(sa
, PIM_MSDP_SAF_LOCAL
);
495 /* we need to be very cautious with this API as SA del too can trigger an
496 * upstream del and we will get stuck in a simple loop */
497 static void pim_msdp_sa_local_del_on_up_del(struct pim_instance
*pim
,
498 struct prefix_sg
*sg
)
500 struct pim_msdp_sa
*sa
;
502 sa
= pim_msdp_sa_find(pim
, sg
);
504 if (PIM_DEBUG_MSDP_INTERNAL
) {
505 zlog_debug("MSDP local sa %s del on up del",
509 /* if there is no local reference escape */
510 if (!(sa
->flags
& PIM_MSDP_SAF_LOCAL
)) {
511 if (PIM_DEBUG_MSDP_INTERNAL
) {
512 zlog_debug("MSDP local sa %s del; no local ref",
518 if (sa
->flags
& PIM_MSDP_SAF_UP_DEL_IN_PROG
) {
519 /* MSDP is the one that triggered the upstream del. if
521 * we most certainly have a bug in the PIM upstream
523 * will not have a local reference unless the KAT is
524 * running. And if the
525 * KAT is running there MUST be an additional
526 * source-stream reference to
527 * the flow. Accounting for such cases requires lot of
529 * address this in the next release? - XXX */
531 "MSDP sa %s SPT teardown is causing the local entry to be removed",
536 /* we are dropping the sa on upstream del we should not have an
537 * upstream reference */
539 if (PIM_DEBUG_MSDP_INTERNAL
) {
540 zlog_debug("MSDP local sa %s del; up non-NULL",
545 pim_msdp_sa_deref(sa
, PIM_MSDP_SAF_LOCAL
);
549 /* Local SA qualification needs to be re-evaluated when -
550 * 1. KAT is started or stopped
552 * 3. Whenever FHR status changes for a (S,G) - XXX - currently there
553 * is no clear path to transition an entry out of "MASK_FHR" need
554 * to discuss this with Donald. May result in some strangeness if the
555 * FHR is also the RP.
556 * 4. When msdp_reg timer is started or stopped
558 void pim_msdp_sa_local_update(struct pim_upstream
*up
)
560 struct pim_instance
*pim
= up
->channel_oil
->pim
;
562 if (pim_msdp_sa_local_add_ok(up
)) {
563 pim_msdp_sa_local_add(pim
, &up
->sg
);
565 pim_msdp_sa_local_del(pim
, &up
->sg
);
569 static void pim_msdp_sa_local_setup(struct pim_instance
*pim
)
571 struct pim_upstream
*up
;
572 struct listnode
*up_node
;
574 for (ALL_LIST_ELEMENTS_RO(pim
->upstream_list
, up_node
, up
)) {
575 pim_msdp_sa_local_update(up
);
579 /* whenever the RP changes we need to re-evaluate the "local" SA-cache */
580 /* XXX: needs to be tested */
581 void pim_msdp_i_am_rp_changed(struct pim_instance
*pim
)
583 struct listnode
*sanode
;
584 struct listnode
*nextnode
;
585 struct pim_msdp_sa
*sa
;
587 if (!(pim
->msdp
.flags
& PIM_MSDPF_ENABLE
)) {
588 /* if the feature is not enabled do nothing */
592 if (PIM_DEBUG_MSDP_INTERNAL
) {
593 zlog_debug("MSDP i_am_rp changed");
596 /* mark all local entries as stale */
597 for (ALL_LIST_ELEMENTS_RO(pim
->msdp
.sa_list
, sanode
, sa
)) {
598 if (sa
->flags
& PIM_MSDP_SAF_LOCAL
) {
599 sa
->flags
|= PIM_MSDP_SAF_STALE
;
603 /* re-setup local SA entries */
604 pim_msdp_sa_local_setup(pim
);
606 for (ALL_LIST_ELEMENTS(pim
->msdp
.sa_list
, sanode
, nextnode
, sa
)) {
607 /* purge stale SA entries */
608 if (sa
->flags
& PIM_MSDP_SAF_STALE
) {
609 /* clear the stale flag; the entry may be kept even
612 sa
->flags
&= ~PIM_MSDP_SAF_STALE
;
613 /* sa_deref can end up freeing the sa; so don't access
615 pim_msdp_sa_deref(sa
, PIM_MSDP_SAF_LOCAL
);
617 /* if the souce is still active check if we can
619 pim_msdp_sa_upstream_update(sa
, NULL
/* xg_up */,
625 /* We track the join state of (*, G) entries. If G has sources in the SA-cache
626 * we need to setup or teardown SPT when the JoinDesired status changes for
628 void pim_msdp_up_join_state_changed(struct pim_instance
*pim
,
629 struct pim_upstream
*xg_up
)
631 struct listnode
*sanode
;
632 struct pim_msdp_sa
*sa
;
634 if (PIM_DEBUG_MSDP_INTERNAL
) {
635 zlog_debug("MSDP join state changed for %s", xg_up
->sg_str
);
638 /* If this is not really an XG entry just move on */
639 if ((xg_up
->sg
.src
.s_addr
!= INADDR_ANY
)
640 || (xg_up
->sg
.grp
.s_addr
== INADDR_ANY
)) {
644 /* XXX: Need to maintain SAs per-group to avoid all this unnecessary
646 for (ALL_LIST_ELEMENTS_RO(pim
->msdp
.sa_list
, sanode
, sa
)) {
647 if (sa
->sg
.grp
.s_addr
!= xg_up
->sg
.grp
.s_addr
) {
650 pim_msdp_sa_upstream_update(sa
, xg_up
, "up-jp-change");
654 static void pim_msdp_up_xg_del(struct pim_instance
*pim
, struct prefix_sg
*sg
)
656 struct listnode
*sanode
;
657 struct pim_msdp_sa
*sa
;
659 if (PIM_DEBUG_MSDP_INTERNAL
) {
660 zlog_debug("MSDP %s del", pim_str_sg_dump(sg
));
663 /* If this is not really an XG entry just move on */
664 if ((sg
->src
.s_addr
!= INADDR_ANY
) || (sg
->grp
.s_addr
== INADDR_ANY
)) {
668 /* XXX: Need to maintain SAs per-group to avoid all this unnecessary
670 for (ALL_LIST_ELEMENTS_RO(pim
->msdp
.sa_list
, sanode
, sa
)) {
671 if (sa
->sg
.grp
.s_addr
!= sg
->grp
.s_addr
) {
674 pim_msdp_sa_upstream_update(sa
, NULL
/* xg */, "up-jp-change");
678 void pim_msdp_up_del(struct pim_instance
*pim
, struct prefix_sg
*sg
)
680 if (PIM_DEBUG_MSDP_INTERNAL
) {
681 zlog_debug("MSDP up %s del", pim_str_sg_dump(sg
));
683 if (sg
->src
.s_addr
== INADDR_ANY
) {
684 pim_msdp_up_xg_del(pim
, sg
);
686 pim_msdp_sa_local_del_on_up_del(pim
, sg
);
690 /* sa hash and peer list helpers */
691 static unsigned int pim_msdp_sa_hash_key_make(void *p
)
693 struct pim_msdp_sa
*sa
= p
;
695 return (jhash_2words(sa
->sg
.src
.s_addr
, sa
->sg
.grp
.s_addr
, 0));
698 static int pim_msdp_sa_hash_eq(const void *p1
, const void *p2
)
700 const struct pim_msdp_sa
*sa1
= p1
;
701 const struct pim_msdp_sa
*sa2
= p2
;
703 return ((sa1
->sg
.src
.s_addr
== sa2
->sg
.src
.s_addr
)
704 && (sa1
->sg
.grp
.s_addr
== sa2
->sg
.grp
.s_addr
));
707 static int pim_msdp_sa_comp(const void *p1
, const void *p2
)
709 const struct pim_msdp_sa
*sa1
= p1
;
710 const struct pim_msdp_sa
*sa2
= p2
;
712 if (ntohl(sa1
->sg
.grp
.s_addr
) < ntohl(sa2
->sg
.grp
.s_addr
))
715 if (ntohl(sa1
->sg
.grp
.s_addr
) > ntohl(sa2
->sg
.grp
.s_addr
))
718 if (ntohl(sa1
->sg
.src
.s_addr
) < ntohl(sa2
->sg
.src
.s_addr
))
721 if (ntohl(sa1
->sg
.src
.s_addr
) > ntohl(sa2
->sg
.src
.s_addr
))
727 /* RFC-3618:Sec-10.1.3 - Peer-RPF forwarding */
728 /* XXX: this can use a bit of refining and extensions */
729 bool pim_msdp_peer_rpf_check(struct pim_msdp_peer
*mp
, struct in_addr rp
)
731 if (mp
->peer
.s_addr
== rp
.s_addr
) {
738 /************************ Peer session management **************************/
739 char *pim_msdp_state_dump(enum pim_msdp_peer_state state
, char *buf
,
743 case PIM_MSDP_DISABLED
:
744 snprintf(buf
, buf_size
, "%s", "disabled");
746 case PIM_MSDP_INACTIVE
:
747 snprintf(buf
, buf_size
, "%s", "inactive");
749 case PIM_MSDP_LISTEN
:
750 snprintf(buf
, buf_size
, "%s", "listen");
752 case PIM_MSDP_CONNECTING
:
753 snprintf(buf
, buf_size
, "%s", "connecting");
755 case PIM_MSDP_ESTABLISHED
:
756 snprintf(buf
, buf_size
, "%s", "established");
759 snprintf(buf
, buf_size
, "unk-%d", state
);
764 char *pim_msdp_peer_key_dump(struct pim_msdp_peer
*mp
, char *buf
, int buf_size
,
767 char peer_str
[INET_ADDRSTRLEN
];
768 char local_str
[INET_ADDRSTRLEN
];
770 pim_inet4_dump("<peer?>", mp
->peer
, peer_str
, sizeof(peer_str
));
772 pim_inet4_dump("<local?>", mp
->local
, local_str
,
774 snprintf(buf
, buf_size
, "MSDP peer %s local %s mg %s", peer_str
,
775 local_str
, mp
->mesh_group_name
);
777 snprintf(buf
, buf_size
, "MSDP peer %s", peer_str
);
783 static void pim_msdp_peer_state_chg_log(struct pim_msdp_peer
*mp
)
785 char state_str
[PIM_MSDP_STATE_STRLEN
];
787 pim_msdp_state_dump(mp
->state
, state_str
, sizeof(state_str
));
788 zlog_debug("MSDP peer %s state chg to %s", mp
->key_str
, state_str
);
791 /* MSDP Connection State Machine actions (defined in RFC-3618:Sec-11.2) */
792 /* 11.2.A2: active peer - start connect retry timer; when the timer fires
793 * a tcp connection will be made */
794 static void pim_msdp_peer_connect(struct pim_msdp_peer
*mp
)
796 mp
->state
= PIM_MSDP_CONNECTING
;
797 if (PIM_DEBUG_MSDP_EVENTS
) {
798 pim_msdp_peer_state_chg_log(mp
);
801 pim_msdp_peer_cr_timer_setup(mp
, true /* start */);
804 /* 11.2.A3: passive peer - just listen for connections */
805 static void pim_msdp_peer_listen(struct pim_msdp_peer
*mp
)
807 mp
->state
= PIM_MSDP_LISTEN
;
808 if (PIM_DEBUG_MSDP_EVENTS
) {
809 pim_msdp_peer_state_chg_log(mp
);
812 /* this is interntionally asymmetric i.e. we set up listen-socket when
814 * first listening peer is configured; but don't bother tearing it down
816 * all the peers go down */
817 pim_msdp_sock_listen(mp
->pim
);
820 /* 11.2.A4 and 11.2.A5: transition active or passive peer to
821 * established state */
822 void pim_msdp_peer_established(struct pim_msdp_peer
*mp
)
824 if (mp
->state
!= PIM_MSDP_ESTABLISHED
) {
828 mp
->state
= PIM_MSDP_ESTABLISHED
;
829 mp
->uptime
= pim_time_monotonic_sec();
831 if (PIM_DEBUG_MSDP_EVENTS
) {
832 pim_msdp_peer_state_chg_log(mp
);
835 /* stop retry timer on active peers */
836 pim_msdp_peer_cr_timer_setup(mp
, false /* start */);
838 /* send KA; start KA and hold timers */
839 pim_msdp_pkt_ka_tx(mp
);
840 pim_msdp_peer_ka_timer_setup(mp
, true /* start */);
841 pim_msdp_peer_hold_timer_setup(mp
, true /* start */);
843 pim_msdp_pkt_sa_tx_to_one_peer(mp
);
845 PIM_MSDP_PEER_WRITE_ON(mp
);
846 PIM_MSDP_PEER_READ_ON(mp
);
849 /* 11.2.A6, 11.2.A7 and 11.2.A8: shutdown the peer tcp connection */
850 void pim_msdp_peer_stop_tcp_conn(struct pim_msdp_peer
*mp
, bool chg_state
)
853 if (mp
->state
== PIM_MSDP_ESTABLISHED
) {
856 mp
->state
= PIM_MSDP_INACTIVE
;
857 if (PIM_DEBUG_MSDP_EVENTS
) {
858 pim_msdp_peer_state_chg_log(mp
);
862 if (PIM_DEBUG_MSDP_INTERNAL
) {
863 zlog_debug("MSDP peer %s pim_msdp_peer_stop_tcp_conn",
866 /* stop read and write threads */
867 PIM_MSDP_PEER_READ_OFF(mp
);
868 PIM_MSDP_PEER_WRITE_OFF(mp
);
873 stream_reset(mp
->ibuf
);
875 stream_fifo_clean(mp
->obuf
);
877 /* stop all peer timers */
878 pim_msdp_peer_ka_timer_setup(mp
, false /* start */);
879 pim_msdp_peer_cr_timer_setup(mp
, false /* start */);
880 pim_msdp_peer_hold_timer_setup(mp
, false /* start */);
882 /* close connection */
889 /* RFC-3618:Sec-5.6 - stop the peer tcp connection and startover */
890 void pim_msdp_peer_reset_tcp_conn(struct pim_msdp_peer
*mp
, const char *rc_str
)
892 if (PIM_DEBUG_EVENTS
) {
893 zlog_debug("MSDP peer %s tcp reset %s", mp
->key_str
, rc_str
);
894 snprintf(mp
->last_reset
, sizeof(mp
->last_reset
), "%s", rc_str
);
897 /* close the connection and transition to listening or connecting */
898 pim_msdp_peer_stop_tcp_conn(mp
, true /* chg_state */);
899 if (PIM_MSDP_PEER_IS_LISTENER(mp
)) {
900 pim_msdp_peer_listen(mp
);
902 pim_msdp_peer_connect(mp
);
906 static void pim_msdp_peer_timer_expiry_log(struct pim_msdp_peer
*mp
,
907 const char *timer_str
)
909 zlog_debug("MSDP peer %s %s timer expired", mp
->key_str
, timer_str
);
912 /* RFC-3618:Sec-5.4 - peer hold timer */
913 static int pim_msdp_peer_hold_timer_cb(struct thread
*t
)
915 struct pim_msdp_peer
*mp
;
919 if (PIM_DEBUG_MSDP_EVENTS
) {
920 pim_msdp_peer_timer_expiry_log(mp
, "hold");
923 if (mp
->state
!= PIM_MSDP_ESTABLISHED
) {
927 if (PIM_DEBUG_MSDP_EVENTS
) {
928 pim_msdp_peer_state_chg_log(mp
);
930 pim_msdp_peer_reset_tcp_conn(mp
, "ht-expired");
934 static void pim_msdp_peer_hold_timer_setup(struct pim_msdp_peer
*mp
, bool start
)
936 struct pim_instance
*pim
= mp
->pim
;
937 THREAD_OFF(mp
->hold_timer
);
939 thread_add_timer(pim
->msdp
.master
, pim_msdp_peer_hold_timer_cb
,
940 mp
, PIM_MSDP_PEER_HOLD_TIME
, &mp
->hold_timer
);
945 /* RFC-3618:Sec-5.5 - peer keepalive timer */
946 static int pim_msdp_peer_ka_timer_cb(struct thread
*t
)
948 struct pim_msdp_peer
*mp
;
952 if (PIM_DEBUG_MSDP_EVENTS
) {
953 pim_msdp_peer_timer_expiry_log(mp
, "ka");
956 pim_msdp_pkt_ka_tx(mp
);
957 pim_msdp_peer_ka_timer_setup(mp
, true /* start */);
960 static void pim_msdp_peer_ka_timer_setup(struct pim_msdp_peer
*mp
, bool start
)
962 THREAD_OFF(mp
->ka_timer
);
964 thread_add_timer(mp
->pim
->msdp
.master
,
965 pim_msdp_peer_ka_timer_cb
, mp
,
966 PIM_MSDP_PEER_KA_TIME
, &mp
->ka_timer
);
970 static void pim_msdp_peer_active_connect(struct pim_msdp_peer
*mp
)
974 rc
= pim_msdp_sock_connect(mp
);
976 if (PIM_DEBUG_MSDP_INTERNAL
) {
977 zlog_debug("MSDP peer %s pim_msdp_peer_active_connect: %d",
984 /* connect failed restart the connect-retry timer */
985 pim_msdp_peer_cr_timer_setup(mp
, true /* start */);
988 case connect_success
:
989 /* connect was sucessful move to established */
990 pim_msdp_peer_established(mp
);
993 case connect_in_progress
:
994 /* for NB content we need to wait till sock is readable or
996 PIM_MSDP_PEER_WRITE_ON(mp
);
997 PIM_MSDP_PEER_READ_ON(mp
);
998 /* also restart connect-retry timer to reset the socket if
1001 pim_msdp_peer_cr_timer_setup(mp
, true /* start */);
1006 /* RFC-3618:Sec-5.6 - connection retry on active peer */
1007 static int pim_msdp_peer_cr_timer_cb(struct thread
*t
)
1009 struct pim_msdp_peer
*mp
;
1013 if (PIM_DEBUG_MSDP_EVENTS
) {
1014 pim_msdp_peer_timer_expiry_log(mp
, "connect-retry");
1017 if (mp
->state
!= PIM_MSDP_CONNECTING
|| PIM_MSDP_PEER_IS_LISTENER(mp
)) {
1021 pim_msdp_peer_active_connect(mp
);
1024 static void pim_msdp_peer_cr_timer_setup(struct pim_msdp_peer
*mp
, bool start
)
1026 THREAD_OFF(mp
->cr_timer
);
1029 mp
->pim
->msdp
.master
, pim_msdp_peer_cr_timer_cb
, mp
,
1030 PIM_MSDP_PEER_CONNECT_RETRY_TIME
, &mp
->cr_timer
);
1034 /* if a valid packet is rxed from the peer we can restart hold timer */
1035 void pim_msdp_peer_pkt_rxed(struct pim_msdp_peer
*mp
)
1037 if (mp
->state
== PIM_MSDP_ESTABLISHED
) {
1038 pim_msdp_peer_hold_timer_setup(mp
, true /* start */);
1042 /* if a valid packet is txed to the peer we can restart ka timer and avoid
1043 * unnecessary ka noise in the network */
1044 void pim_msdp_peer_pkt_txed(struct pim_msdp_peer
*mp
)
1046 if (mp
->state
== PIM_MSDP_ESTABLISHED
) {
1047 pim_msdp_peer_ka_timer_setup(mp
, true /* start */);
1048 if (PIM_DEBUG_MSDP_INTERNAL
) {
1049 zlog_debug("MSDP ka timer restart on pkt tx to %s",
1055 static void pim_msdp_addr2su(union sockunion
*su
, struct in_addr addr
)
1058 su
->sin
.sin_addr
= addr
;
1059 su
->sin
.sin_family
= AF_INET
;
1060 #ifdef HAVE_STRUCT_SOCKADDR_IN_SIN_LEN
1061 su
->sin
.sin_len
= sizeof(struct sockaddr_in
);
1062 #endif /* HAVE_STRUCT_SOCKADDR_IN_SIN_LEN */
1065 /* 11.2.A1: create a new peer and transition state to listen or connecting */
1066 static enum pim_msdp_err
pim_msdp_peer_new(struct pim_instance
*pim
,
1067 struct in_addr peer_addr
,
1068 struct in_addr local_addr
,
1069 const char *mesh_group_name
,
1070 struct pim_msdp_peer
**mp_p
)
1072 struct pim_msdp_peer
*mp
;
1074 pim_msdp_enable(pim
);
1076 mp
= XCALLOC(MTYPE_PIM_MSDP_PEER
, sizeof(*mp
));
1078 zlog_err("%s: PIM XCALLOC(%zu) failure", __PRETTY_FUNCTION__
,
1080 return PIM_MSDP_ERR_OOM
;
1084 mp
->peer
= peer_addr
;
1085 pim_inet4_dump("<peer?>", mp
->peer
, mp
->key_str
, sizeof(mp
->key_str
));
1086 pim_msdp_addr2su(&mp
->su_peer
, mp
->peer
);
1087 mp
->local
= local_addr
;
1088 /* XXX: originator_id setting needs to move to the mesh group */
1089 pim
->msdp
.originator_id
= local_addr
;
1090 pim_msdp_addr2su(&mp
->su_local
, mp
->local
);
1091 mp
->mesh_group_name
= XSTRDUP(MTYPE_PIM_MSDP_MG_NAME
, mesh_group_name
);
1092 mp
->state
= PIM_MSDP_INACTIVE
;
1094 strcpy(mp
->last_reset
, "-");
1095 /* higher IP address is listener */
1096 if (ntohl(mp
->local
.s_addr
) > ntohl(mp
->peer
.s_addr
)) {
1097 mp
->flags
|= PIM_MSDP_PEERF_LISTENER
;
1100 /* setup packet buffers */
1101 mp
->ibuf
= stream_new(PIM_MSDP_MAX_PACKET_SIZE
);
1102 mp
->obuf
= stream_fifo_new();
1104 /* insert into misc tables for easy access */
1105 mp
= hash_get(pim
->msdp
.peer_hash
, mp
, hash_alloc_intern
);
1106 listnode_add_sort(pim
->msdp
.peer_list
, mp
);
1108 if (PIM_DEBUG_MSDP_EVENTS
) {
1109 zlog_debug("MSDP peer %s created", mp
->key_str
);
1111 pim_msdp_peer_state_chg_log(mp
);
1114 /* fireup the connect state machine */
1115 if (PIM_MSDP_PEER_IS_LISTENER(mp
)) {
1116 pim_msdp_peer_listen(mp
);
1118 pim_msdp_peer_connect(mp
);
1123 return PIM_MSDP_ERR_NONE
;
1126 struct pim_msdp_peer
*pim_msdp_peer_find(struct pim_instance
*pim
,
1127 struct in_addr peer_addr
)
1129 struct pim_msdp_peer lookup
;
1131 lookup
.peer
= peer_addr
;
1132 return hash_lookup(pim
->msdp
.peer_hash
, &lookup
);
1135 /* add peer configuration if it doesn't already exist */
1136 enum pim_msdp_err
pim_msdp_peer_add(struct pim_instance
*pim
,
1137 struct in_addr peer_addr
,
1138 struct in_addr local_addr
,
1139 const char *mesh_group_name
,
1140 struct pim_msdp_peer
**mp_p
)
1142 struct pim_msdp_peer
*mp
;
1148 if (peer_addr
.s_addr
== local_addr
.s_addr
) {
1149 /* skip session setup if config is invalid */
1150 if (PIM_DEBUG_MSDP_EVENTS
) {
1151 char peer_str
[INET_ADDRSTRLEN
];
1153 pim_inet4_dump("<peer?>", peer_addr
, peer_str
,
1155 zlog_debug("%s add skipped as DIP=SIP", peer_str
);
1157 return PIM_MSDP_ERR_SIP_EQ_DIP
;
1160 mp
= pim_msdp_peer_find(pim
, peer_addr
);
1165 return PIM_MSDP_ERR_PEER_EXISTS
;
1168 return pim_msdp_peer_new(pim
, peer_addr
, local_addr
, mesh_group_name
,
1172 /* release all mem associated with a peer */
1173 static void pim_msdp_peer_free(struct pim_msdp_peer
*mp
)
1176 * Let's make sure we are not running when we delete
1177 * the underlying data structure
1179 pim_msdp_peer_cr_timer_setup(mp
, false);
1180 pim_msdp_peer_ka_timer_setup(mp
, false);
1183 stream_free(mp
->ibuf
);
1187 stream_fifo_free(mp
->obuf
);
1190 if (mp
->mesh_group_name
) {
1191 XFREE(MTYPE_PIM_MSDP_MG_NAME
, mp
->mesh_group_name
);
1193 XFREE(MTYPE_PIM_MSDP_PEER
, mp
);
1196 /* delete the peer config */
1197 static enum pim_msdp_err
pim_msdp_peer_do_del(struct pim_msdp_peer
*mp
)
1199 /* stop the tcp connection and shutdown all timers */
1200 pim_msdp_peer_stop_tcp_conn(mp
, true /* chg_state */);
1202 /* remove the session from various tables */
1203 listnode_delete(mp
->pim
->msdp
.peer_list
, mp
);
1204 hash_release(mp
->pim
->msdp
.peer_hash
, mp
);
1206 if (PIM_DEBUG_MSDP_EVENTS
) {
1207 zlog_debug("MSDP peer %s deleted", mp
->key_str
);
1210 /* free up any associated memory */
1211 pim_msdp_peer_free(mp
);
1213 return PIM_MSDP_ERR_NONE
;
1216 enum pim_msdp_err
pim_msdp_peer_del(struct pim_instance
*pim
,
1217 struct in_addr peer_addr
)
1219 struct pim_msdp_peer
*mp
;
1221 mp
= pim_msdp_peer_find(pim
, peer_addr
);
1223 return PIM_MSDP_ERR_NO_PEER
;
1226 return pim_msdp_peer_do_del(mp
);
1229 /* peer hash and peer list helpers */
1230 static unsigned int pim_msdp_peer_hash_key_make(void *p
)
1232 struct pim_msdp_peer
*mp
= p
;
1233 return (jhash_1word(mp
->peer
.s_addr
, 0));
1236 static int pim_msdp_peer_hash_eq(const void *p1
, const void *p2
)
1238 const struct pim_msdp_peer
*mp1
= p1
;
1239 const struct pim_msdp_peer
*mp2
= p2
;
1241 return (mp1
->peer
.s_addr
== mp2
->peer
.s_addr
);
1244 static int pim_msdp_peer_comp(const void *p1
, const void *p2
)
1246 const struct pim_msdp_peer
*mp1
= p1
;
1247 const struct pim_msdp_peer
*mp2
= p2
;
1249 if (ntohl(mp1
->peer
.s_addr
) < ntohl(mp2
->peer
.s_addr
))
1252 if (ntohl(mp1
->peer
.s_addr
) > ntohl(mp2
->peer
.s_addr
))
1258 /************************** Mesh group management **************************/
1259 static void pim_msdp_mg_free(struct pim_instance
*pim
, struct pim_msdp_mg
*mg
)
1261 /* If the mesh-group has valid member or src_ip don't delete it */
1262 if (!mg
|| mg
->mbr_cnt
|| (mg
->src_ip
.s_addr
!= INADDR_ANY
)) {
1266 if (PIM_DEBUG_MSDP_EVENTS
) {
1267 zlog_debug("MSDP mesh-group %s deleted", mg
->mesh_group_name
);
1269 if (mg
->mesh_group_name
)
1270 XFREE(MTYPE_PIM_MSDP_MG_NAME
, mg
->mesh_group_name
);
1273 list_delete_and_null(&mg
->mbr_list
);
1275 XFREE(MTYPE_PIM_MSDP_MG
, mg
);
1276 pim
->msdp
.mg
= NULL
;
1279 static struct pim_msdp_mg
*pim_msdp_mg_new(const char *mesh_group_name
)
1281 struct pim_msdp_mg
*mg
;
1283 mg
= XCALLOC(MTYPE_PIM_MSDP_MG
, sizeof(*mg
));
1285 zlog_err("%s: PIM XCALLOC(%zu) failure", __PRETTY_FUNCTION__
,
1290 mg
->mesh_group_name
= XSTRDUP(MTYPE_PIM_MSDP_MG_NAME
, mesh_group_name
);
1291 mg
->mbr_list
= list_new();
1292 mg
->mbr_list
->del
= (void (*)(void *))pim_msdp_mg_mbr_free
;
1293 mg
->mbr_list
->cmp
= (int (*)(void *, void *))pim_msdp_mg_mbr_comp
;
1295 if (PIM_DEBUG_MSDP_EVENTS
) {
1296 zlog_debug("MSDP mesh-group %s created", mg
->mesh_group_name
);
1301 enum pim_msdp_err
pim_msdp_mg_del(struct pim_instance
*pim
,
1302 const char *mesh_group_name
)
1304 struct pim_msdp_mg
*mg
= pim
->msdp
.mg
;
1305 struct pim_msdp_mg_mbr
*mbr
;
1307 if (!mg
|| strcmp(mg
->mesh_group_name
, mesh_group_name
)) {
1308 return PIM_MSDP_ERR_NO_MG
;
1311 /* delete all the mesh-group members */
1312 while (!list_isempty(mg
->mbr_list
)) {
1313 mbr
= listnode_head(mg
->mbr_list
);
1314 pim_msdp_mg_mbr_do_del(mg
, mbr
);
1318 mg
->src_ip
.s_addr
= INADDR_ANY
;
1320 /* free up the mesh-group */
1321 pim_msdp_mg_free(pim
, mg
);
1322 return PIM_MSDP_ERR_NONE
;
1325 static enum pim_msdp_err
pim_msdp_mg_add(struct pim_instance
*pim
,
1326 const char *mesh_group_name
)
1329 if (!strcmp(pim
->msdp
.mg
->mesh_group_name
, mesh_group_name
)) {
1330 return PIM_MSDP_ERR_NONE
;
1332 /* currently only one mesh-group can exist at a time */
1333 return PIM_MSDP_ERR_MAX_MESH_GROUPS
;
1336 pim
->msdp
.mg
= pim_msdp_mg_new(mesh_group_name
);
1337 if (!pim
->msdp
.mg
) {
1338 return PIM_MSDP_ERR_OOM
;
1341 return PIM_MSDP_ERR_NONE
;
1344 static int pim_msdp_mg_mbr_comp(const void *p1
, const void *p2
)
1346 const struct pim_msdp_mg_mbr
*mbr1
= p1
;
1347 const struct pim_msdp_mg_mbr
*mbr2
= p2
;
1349 if (ntohl(mbr1
->mbr_ip
.s_addr
) < ntohl(mbr2
->mbr_ip
.s_addr
))
1352 if (ntohl(mbr1
->mbr_ip
.s_addr
) > ntohl(mbr2
->mbr_ip
.s_addr
))
1358 static void pim_msdp_mg_mbr_free(struct pim_msdp_mg_mbr
*mbr
)
1360 XFREE(MTYPE_PIM_MSDP_MG_MBR
, mbr
);
1363 static struct pim_msdp_mg_mbr
*pim_msdp_mg_mbr_find(struct pim_instance
*pim
,
1364 struct in_addr mbr_ip
)
1366 struct pim_msdp_mg_mbr
*mbr
;
1367 struct listnode
*mbr_node
;
1369 if (!pim
->msdp
.mg
) {
1372 /* we can move this to a hash but considering that number of peers in
1373 * a mesh-group that seems like bit of an overkill */
1374 for (ALL_LIST_ELEMENTS_RO(pim
->msdp
.mg
->mbr_list
, mbr_node
, mbr
)) {
1375 if (mbr
->mbr_ip
.s_addr
== mbr_ip
.s_addr
) {
1382 enum pim_msdp_err
pim_msdp_mg_mbr_add(struct pim_instance
*pim
,
1383 const char *mesh_group_name
,
1384 struct in_addr mbr_ip
)
1387 struct pim_msdp_mg_mbr
*mbr
;
1388 struct pim_msdp_mg
*mg
;
1390 rc
= pim_msdp_mg_add(pim
, mesh_group_name
);
1391 if (rc
!= PIM_MSDP_ERR_NONE
) {
1396 mbr
= pim_msdp_mg_mbr_find(pim
, mbr_ip
);
1398 return PIM_MSDP_ERR_MG_MBR_EXISTS
;
1401 mbr
= XCALLOC(MTYPE_PIM_MSDP_MG_MBR
, sizeof(*mbr
));
1403 zlog_err("%s: PIM XCALLOC(%zu) failure", __PRETTY_FUNCTION__
,
1405 /* if there are no references to the mg free it */
1406 pim_msdp_mg_free(pim
, mg
);
1407 return PIM_MSDP_ERR_OOM
;
1409 mbr
->mbr_ip
= mbr_ip
;
1410 listnode_add_sort(mg
->mbr_list
, mbr
);
1412 /* if valid SIP has been configured add peer session */
1413 if (mg
->src_ip
.s_addr
!= INADDR_ANY
) {
1414 pim_msdp_peer_add(pim
, mbr_ip
, mg
->src_ip
, mesh_group_name
,
1418 if (PIM_DEBUG_MSDP_EVENTS
) {
1419 char ip_str
[INET_ADDRSTRLEN
];
1420 pim_inet4_dump("<mbr?>", mbr
->mbr_ip
, ip_str
, sizeof(ip_str
));
1421 zlog_debug("MSDP mesh-group %s mbr %s created",
1422 mg
->mesh_group_name
, ip_str
);
1425 return PIM_MSDP_ERR_NONE
;
1428 static void pim_msdp_mg_mbr_do_del(struct pim_msdp_mg
*mg
,
1429 struct pim_msdp_mg_mbr
*mbr
)
1431 /* Delete active peer session if any */
1433 pim_msdp_peer_do_del(mbr
->mp
);
1436 listnode_delete(mg
->mbr_list
, mbr
);
1437 if (PIM_DEBUG_MSDP_EVENTS
) {
1438 char ip_str
[INET_ADDRSTRLEN
];
1439 pim_inet4_dump("<mbr?>", mbr
->mbr_ip
, ip_str
, sizeof(ip_str
));
1440 zlog_debug("MSDP mesh-group %s mbr %s deleted",
1441 mg
->mesh_group_name
, ip_str
);
1443 pim_msdp_mg_mbr_free(mbr
);
1449 enum pim_msdp_err
pim_msdp_mg_mbr_del(struct pim_instance
*pim
,
1450 const char *mesh_group_name
,
1451 struct in_addr mbr_ip
)
1453 struct pim_msdp_mg_mbr
*mbr
;
1454 struct pim_msdp_mg
*mg
= pim
->msdp
.mg
;
1456 if (!mg
|| strcmp(mg
->mesh_group_name
, mesh_group_name
)) {
1457 return PIM_MSDP_ERR_NO_MG
;
1460 mbr
= pim_msdp_mg_mbr_find(pim
, mbr_ip
);
1462 return PIM_MSDP_ERR_NO_MG_MBR
;
1465 pim_msdp_mg_mbr_do_del(mg
, mbr
);
1466 /* if there are no references to the mg free it */
1467 pim_msdp_mg_free(pim
, mg
);
1469 return PIM_MSDP_ERR_NONE
;
1472 static void pim_msdp_mg_src_do_del(struct pim_instance
*pim
)
1474 struct pim_msdp_mg_mbr
*mbr
;
1475 struct listnode
*mbr_node
;
1476 struct pim_msdp_mg
*mg
= pim
->msdp
.mg
;
1478 /* SIP is being removed - tear down all active peer sessions */
1479 for (ALL_LIST_ELEMENTS_RO(mg
->mbr_list
, mbr_node
, mbr
)) {
1481 pim_msdp_peer_do_del(mbr
->mp
);
1485 if (PIM_DEBUG_MSDP_EVENTS
) {
1486 zlog_debug("MSDP mesh-group %s src cleared",
1487 mg
->mesh_group_name
);
1491 enum pim_msdp_err
pim_msdp_mg_src_del(struct pim_instance
*pim
,
1492 const char *mesh_group_name
)
1494 struct pim_msdp_mg
*mg
= pim
->msdp
.mg
;
1496 if (!mg
|| strcmp(mg
->mesh_group_name
, mesh_group_name
)) {
1497 return PIM_MSDP_ERR_NO_MG
;
1500 if (mg
->src_ip
.s_addr
!= INADDR_ANY
) {
1501 mg
->src_ip
.s_addr
= INADDR_ANY
;
1502 pim_msdp_mg_src_do_del(pim
);
1503 /* if there are no references to the mg free it */
1504 pim_msdp_mg_free(pim
, mg
);
1506 return PIM_MSDP_ERR_NONE
;
1509 enum pim_msdp_err
pim_msdp_mg_src_add(struct pim_instance
*pim
,
1510 const char *mesh_group_name
,
1511 struct in_addr src_ip
)
1514 struct pim_msdp_mg_mbr
*mbr
;
1515 struct listnode
*mbr_node
;
1516 struct pim_msdp_mg
*mg
;
1518 if (src_ip
.s_addr
== INADDR_ANY
) {
1519 pim_msdp_mg_src_del(pim
, mesh_group_name
);
1520 return PIM_MSDP_ERR_NONE
;
1523 rc
= pim_msdp_mg_add(pim
, mesh_group_name
);
1524 if (rc
!= PIM_MSDP_ERR_NONE
) {
1529 if (mg
->src_ip
.s_addr
!= INADDR_ANY
) {
1530 pim_msdp_mg_src_do_del(pim
);
1532 mg
->src_ip
= src_ip
;
1534 for (ALL_LIST_ELEMENTS_RO(mg
->mbr_list
, mbr_node
, mbr
)) {
1535 pim_msdp_peer_add(pim
, mbr
->mbr_ip
, mg
->src_ip
, mesh_group_name
,
1539 if (PIM_DEBUG_MSDP_EVENTS
) {
1540 char ip_str
[INET_ADDRSTRLEN
];
1541 pim_inet4_dump("<src?>", mg
->src_ip
, ip_str
, sizeof(ip_str
));
1542 zlog_debug("MSDP mesh-group %s src %s set", mg
->mesh_group_name
,
1545 return PIM_MSDP_ERR_NONE
;
1548 /*********************** MSDP feature APIs *********************************/
1549 int pim_msdp_config_write_helper(struct pim_instance
*pim
, struct vty
*vty
,
1552 struct listnode
*mbrnode
;
1553 struct pim_msdp_mg_mbr
*mbr
;
1554 struct pim_msdp_mg
*mg
= pim
->msdp
.mg
;
1555 char mbr_str
[INET_ADDRSTRLEN
];
1556 char src_str
[INET_ADDRSTRLEN
];
1563 if (mg
->src_ip
.s_addr
!= INADDR_ANY
) {
1564 pim_inet4_dump("<src?>", mg
->src_ip
, src_str
, sizeof(src_str
));
1565 vty_out(vty
, "%sip msdp mesh-group %s source %s\n", spaces
,
1566 mg
->mesh_group_name
, src_str
);
1570 for (ALL_LIST_ELEMENTS_RO(mg
->mbr_list
, mbrnode
, mbr
)) {
1571 pim_inet4_dump("<mbr?>", mbr
->mbr_ip
, mbr_str
, sizeof(mbr_str
));
1572 vty_out(vty
, "%sip msdp mesh-group %s member %s\n", spaces
,
1573 mg
->mesh_group_name
, mbr_str
);
1579 int pim_msdp_config_write(struct vty
*vty
)
1581 return pim_msdp_config_write_helper(pimg
, vty
, "");
1584 /* Enable feature including active/periodic timers etc. on the first peer
1585 * config. Till then MSDP should just stay quiet. */
1586 static void pim_msdp_enable(struct pim_instance
*pim
)
1588 if (pim
->msdp
.flags
& PIM_MSDPF_ENABLE
) {
1589 /* feature is already enabled */
1592 pim
->msdp
.flags
|= PIM_MSDPF_ENABLE
;
1593 pim
->msdp
.work_obuf
= stream_new(PIM_MSDP_MAX_PACKET_SIZE
);
1594 pim_msdp_sa_adv_timer_setup(pim
, true /* start */);
1595 /* setup sa cache based on local sources */
1596 pim_msdp_sa_local_setup(pim
);
1600 void pim_msdp_init(struct pim_instance
*pim
, struct thread_master
*master
)
1602 pim
->msdp
.master
= master
;
1605 snprintf(hash_name
, 64, "PIM %s MSDP Peer Hash", pim
->vrf
->name
);
1606 pim
->msdp
.peer_hash
= hash_create(pim_msdp_peer_hash_key_make
,
1607 pim_msdp_peer_hash_eq
, hash_name
);
1608 pim
->msdp
.peer_list
= list_new();
1609 pim
->msdp
.peer_list
->del
= (void (*)(void *))pim_msdp_peer_free
;
1610 pim
->msdp
.peer_list
->cmp
= (int (*)(void *, void *))pim_msdp_peer_comp
;
1612 snprintf(hash_name
, 64, "PIM %s MSDP SA Hash", pim
->vrf
->name
);
1613 pim
->msdp
.sa_hash
= hash_create(pim_msdp_sa_hash_key_make
,
1614 pim_msdp_sa_hash_eq
, hash_name
);
1615 pim
->msdp
.sa_list
= list_new();
1616 pim
->msdp
.sa_list
->del
= (void (*)(void *))pim_msdp_sa_free
;
1617 pim
->msdp
.sa_list
->cmp
= (int (*)(void *, void *))pim_msdp_sa_comp
;
1620 /* counterpart to MSDP init; XXX: unused currently */
1621 void pim_msdp_exit(struct pim_instance
*pim
)
1623 pim_msdp_sa_adv_timer_setup(pim
, false);
1625 /* XXX: stop listener and delete all peer sessions */
1627 if (pim
->msdp
.peer_hash
) {
1628 hash_free(pim
->msdp
.peer_hash
);
1629 pim
->msdp
.peer_hash
= NULL
;
1632 if (pim
->msdp
.peer_list
) {
1633 list_delete_and_null(&pim
->msdp
.peer_list
);
1636 if (pim
->msdp
.sa_hash
) {
1637 hash_free(pim
->msdp
.sa_hash
);
1638 pim
->msdp
.sa_hash
= NULL
;
1641 if (pim
->msdp
.sa_list
) {
1642 list_delete_and_null(&pim
->msdp
.sa_list
);