]>
Commit | Line | Data |
---|---|---|
8f5f5e91 DS |
1 | /* |
2 | * PIM for Quagga | |
3 | * Copyright (C) 2015 Cumulus Networks, Inc. | |
4 | * Donald Sharp | |
5 | * | |
6 | * This program is free software; you can redistribute it and/or modify | |
7 | * it under the terms of the GNU General Public License as published by | |
8 | * the Free Software Foundation; either version 2 of the License, or | |
9 | * (at your option) any later version. | |
10 | * | |
11 | * This program 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. | |
896014f4 DL |
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 | |
8f5f5e91 DS |
19 | */ |
20 | #include <zebra.h> | |
21 | ||
9bf3c633 | 22 | #include "lib/json.h" |
54b97c74 | 23 | #include "log.h" |
8f5f5e91 | 24 | #include "network.h" |
744d91b3 | 25 | #include "if.h" |
36d6bd7d DS |
26 | #include "linklist.h" |
27 | #include "prefix.h" | |
28 | #include "memory.h" | |
00d07c6f DS |
29 | #include "vty.h" |
30 | #include "vrf.h" | |
dfe43e25 | 31 | #include "plist.h" |
cba44481 | 32 | #include "nexthop.h" |
89b68082 | 33 | #include "table.h" |
3613d898 | 34 | #include "lib_errors.h" |
8f5f5e91 DS |
35 | |
36 | #include "pimd.h" | |
993e3d8e | 37 | #include "pim_instance.h" |
75a26779 | 38 | #include "pim_vty.h" |
54b97c74 | 39 | #include "pim_str.h" |
7176984f | 40 | #include "pim_iface.h" |
8f5f5e91 | 41 | #include "pim_rp.h" |
ed66602c | 42 | #include "pim_rpf.h" |
13afbd05 | 43 | #include "pim_sock.h" |
36d6bd7d | 44 | #include "pim_memory.h" |
e34e07e6 | 45 | #include "pim_neighbor.h" |
7667c556 | 46 | #include "pim_msdp.h" |
1bc98276 | 47 | #include "pim_nht.h" |
28309df0 SP |
48 | #include "pim_mroute.h" |
49 | #include "pim_oil.h" | |
50 | #include "pim_zebra.h" | |
d0e418b4 | 51 | #include "pim_bsm.h" |
c6ced474 | 52 | #include "pim_util.h" |
8c0a7680 | 53 | #include "pim_ssm.h" |
36d6bd7d | 54 | |
c2cf4b02 DS |
55 | /* Cleanup pim->rpf_hash each node data */ |
56 | void pim_rp_list_hash_clean(void *data) | |
57 | { | |
7c591950 | 58 | struct pim_nexthop_cache *pnc = (struct pim_nexthop_cache *)data; |
c2cf4b02 | 59 | |
6a154c88 | 60 | list_delete(&pnc->rp_list); |
6e1ef388 | 61 | |
7c591950 DS |
62 | hash_clean(pnc->upstream_hash, NULL); |
63 | hash_free(pnc->upstream_hash); | |
64 | pnc->upstream_hash = NULL; | |
1159c202 SP |
65 | if (pnc->nexthop) |
66 | nexthops_free(pnc->nexthop); | |
6e1ef388 DS |
67 | |
68 | XFREE(MTYPE_PIM_NEXTHOP_CACHE, pnc); | |
c2cf4b02 DS |
69 | } |
70 | ||
d62a17ae | 71 | static void pim_rp_info_free(struct rp_info *rp_info) |
36d6bd7d | 72 | { |
0a22ddfb | 73 | XFREE(MTYPE_PIM_FILTER_NAME, rp_info->plist); |
ff823fc9 | 74 | |
d62a17ae | 75 | XFREE(MTYPE_PIM_RP, rp_info); |
36d6bd7d DS |
76 | } |
77 | ||
d62a17ae | 78 | int pim_rp_list_cmp(void *v1, void *v2) |
36d6bd7d | 79 | { |
d62a17ae | 80 | struct rp_info *rp1 = (struct rp_info *)v1; |
81 | struct rp_info *rp2 = (struct rp_info *)v2; | |
5d1d18a1 | 82 | int ret; |
d62a17ae | 83 | |
84 | /* | |
85 | * Sort by RP IP address | |
86 | */ | |
b63192cf | 87 | ret = pim_addr_cmp(rp1->rp.rpf_addr, rp2->rp.rpf_addr); |
5d1d18a1 DL |
88 | if (ret) |
89 | return ret; | |
d62a17ae | 90 | |
91 | /* | |
92 | * Sort by group IP address | |
93 | */ | |
5d1d18a1 DL |
94 | ret = prefix_cmp(&rp1->group, &rp2->group); |
95 | if (ret) | |
96 | return ret; | |
d62a17ae | 97 | |
98 | return 0; | |
36d6bd7d DS |
99 | } |
100 | ||
d9c9a9ee | 101 | void pim_rp_init(struct pim_instance *pim) |
36d6bd7d | 102 | { |
d62a17ae | 103 | struct rp_info *rp_info; |
89b68082 | 104 | struct route_node *rn; |
36d6bd7d | 105 | |
d9c9a9ee DS |
106 | pim->rp_list = list_new(); |
107 | pim->rp_list->del = (void (*)(void *))pim_rp_info_free; | |
108 | pim->rp_list->cmp = pim_rp_list_cmp; | |
36d6bd7d | 109 | |
89b68082 | 110 | pim->rp_table = route_table_init(); |
89b68082 | 111 | |
d62a17ae | 112 | rp_info = XCALLOC(MTYPE_PIM_RP, sizeof(*rp_info)); |
36d6bd7d | 113 | |
c6ced474 | 114 | if (!pim_get_all_mcast_group(&rp_info->group)) { |
450971aa | 115 | flog_err(EC_LIB_DEVELOPMENT, |
5d1d18a1 | 116 | "Unable to convert all-multicast prefix"); |
6a154c88 | 117 | list_delete(&pim->rp_list); |
89b68082 | 118 | route_table_finish(pim->rp_table); |
2e8345c1 DS |
119 | XFREE(MTYPE_PIM_RP, rp_info); |
120 | return; | |
121 | } | |
b63192cf | 122 | rp_info->rp.rpf_addr = PIMADDR_ANY; |
36d6bd7d | 123 | |
d9c9a9ee | 124 | listnode_add(pim->rp_list, rp_info); |
89b68082 DS |
125 | |
126 | rn = route_node_get(pim->rp_table, &rp_info->group); | |
89b68082 | 127 | rn->info = rp_info; |
23fc858a | 128 | if (PIM_DEBUG_PIM_TRACE) |
5d1d18a1 DL |
129 | zlog_debug("Allocated: %p for rp_info: %p(%pFX) Lock: %d", rn, |
130 | rp_info, &rp_info->group, | |
131 | route_node_get_lock_count(rn)); | |
36d6bd7d DS |
132 | } |
133 | ||
d9c9a9ee | 134 | void pim_rp_free(struct pim_instance *pim) |
36d6bd7d | 135 | { |
e4e52805 DS |
136 | if (pim->rp_table) |
137 | route_table_finish(pim->rp_table); | |
138 | pim->rp_table = NULL; | |
906640db | 139 | |
140 | if (pim->rp_list) | |
141 | list_delete(&pim->rp_list); | |
36d6bd7d DS |
142 | } |
143 | ||
dfe43e25 DW |
144 | /* |
145 | * Given an RP's prefix-list, return the RP's rp_info for that prefix-list | |
146 | */ | |
d9c9a9ee | 147 | static struct rp_info *pim_rp_find_prefix_list(struct pim_instance *pim, |
1db07606 | 148 | pim_addr rp, const char *plist) |
36d6bd7d | 149 | { |
d62a17ae | 150 | struct listnode *node; |
151 | struct rp_info *rp_info; | |
152 | ||
d9c9a9ee | 153 | for (ALL_LIST_ELEMENTS_RO(pim->rp_list, node, rp_info)) { |
b63192cf | 154 | if ((!pim_addr_cmp(rp, rp_info->rp.rpf_addr)) && |
1db07606 | 155 | rp_info->plist && strcmp(rp_info->plist, plist) == 0) { |
d62a17ae | 156 | return rp_info; |
157 | } | |
158 | } | |
159 | ||
160 | return NULL; | |
36d6bd7d DS |
161 | } |
162 | ||
dfe43e25 DW |
163 | /* |
164 | * Return true if plist is used by any rp_info | |
165 | */ | |
d9c9a9ee | 166 | static int pim_rp_prefix_list_used(struct pim_instance *pim, const char *plist) |
dfe43e25 | 167 | { |
d62a17ae | 168 | struct listnode *node; |
169 | struct rp_info *rp_info; | |
170 | ||
d9c9a9ee | 171 | for (ALL_LIST_ELEMENTS_RO(pim->rp_list, node, rp_info)) { |
d62a17ae | 172 | if (rp_info->plist && strcmp(rp_info->plist, plist) == 0) { |
173 | return 1; | |
174 | } | |
175 | } | |
176 | ||
177 | return 0; | |
dfe43e25 DW |
178 | } |
179 | ||
180 | /* | |
d62a17ae | 181 | * Given an RP's address, return the RP's rp_info that is an exact match for |
182 | * 'group' | |
dfe43e25 | 183 | */ |
fd5540ea | 184 | static struct rp_info *pim_rp_find_exact(struct pim_instance *pim, pim_addr rp, |
123214ef | 185 | const struct prefix *group) |
36d6bd7d | 186 | { |
d62a17ae | 187 | struct listnode *node; |
188 | struct rp_info *rp_info; | |
36d6bd7d | 189 | |
d9c9a9ee | 190 | for (ALL_LIST_ELEMENTS_RO(pim->rp_list, node, rp_info)) { |
b63192cf | 191 | if ((!pim_addr_cmp(rp, rp_info->rp.rpf_addr)) && |
fd5540ea | 192 | prefix_same(&rp_info->group, group)) |
d62a17ae | 193 | return rp_info; |
194 | } | |
54b97c74 | 195 | |
d62a17ae | 196 | return NULL; |
36d6bd7d DS |
197 | } |
198 | ||
2b6b16fc DL |
199 | /* |
200 | * XXX: long-term issue: we don't actually have a good "ip address-list" | |
201 | * implementation. ("access-list XYZ" is the closest but honestly it's | |
202 | * kinda garbage.) | |
203 | * | |
204 | * So it's using a prefix-list to match an address here, which causes very | |
205 | * unexpected results for the user since prefix-lists by default only match | |
206 | * when the prefix length is an exact match too. i.e. you'd have to add the | |
207 | * "le 32" and do "ip prefix-list foo permit 10.0.0.0/24 le 32" | |
208 | * | |
209 | * To avoid this pitfall, this code uses "address_mode = true" for the prefix | |
210 | * list match (this is the only user for that.) | |
211 | * | |
212 | * In the long run, we need to add a "ip address-list", but that's a wholly | |
213 | * separate bag of worms, and existing configs using ip prefix-list would | |
214 | * drop into the UX pitfall. | |
215 | */ | |
216 | ||
217 | #include "lib/plist_int.h" | |
218 | ||
dfe43e25 DW |
219 | /* |
220 | * Given a group, return the rp_info for that group | |
221 | */ | |
28309df0 | 222 | struct rp_info *pim_rp_find_match_group(struct pim_instance *pim, |
123214ef | 223 | const struct prefix *group) |
36d6bd7d | 224 | { |
d62a17ae | 225 | struct listnode *node; |
b77b1550 | 226 | struct rp_info *best = NULL; |
d62a17ae | 227 | struct rp_info *rp_info; |
228 | struct prefix_list *plist; | |
2b6b16fc DL |
229 | const struct prefix *bp; |
230 | const struct prefix_list_entry *entry; | |
89b68082 | 231 | struct route_node *rn; |
d62a17ae | 232 | |
4646b86a | 233 | bp = NULL; |
d9c9a9ee | 234 | for (ALL_LIST_ELEMENTS_RO(pim->rp_list, node, rp_info)) { |
d62a17ae | 235 | if (rp_info->plist) { |
fd5540ea | 236 | plist = prefix_list_lookup(PIM_AFI, rp_info->plist); |
d62a17ae | 237 | |
2b6b16fc DL |
238 | if (prefix_list_apply_ext(plist, &entry, group, true) |
239 | == PREFIX_DENY || !entry) | |
b77b1550 DS |
240 | continue; |
241 | ||
242 | if (!best) { | |
243 | best = rp_info; | |
2b6b16fc | 244 | bp = &entry->prefix; |
b77b1550 DS |
245 | continue; |
246 | } | |
247 | ||
2b6b16fc | 248 | if (bp && bp->prefixlen < entry->prefix.prefixlen) { |
b77b1550 | 249 | best = rp_info; |
2b6b16fc | 250 | bp = &entry->prefix; |
b77b1550 | 251 | } |
d62a17ae | 252 | } |
253 | } | |
254 | ||
89b68082 DS |
255 | rn = route_node_match(pim->rp_table, group); |
256 | if (!rn) { | |
af4c2728 | 257 | flog_err( |
450971aa | 258 | EC_LIB_DEVELOPMENT, |
1d5453d6 | 259 | "%s: BUG We should have found default group information", |
5e81f5dd | 260 | __func__); |
89b68082 DS |
261 | return best; |
262 | } | |
263 | ||
264 | rp_info = rn->info; | |
cf568522 DS |
265 | if (PIM_DEBUG_PIM_TRACE) { |
266 | if (best) | |
267 | zlog_debug( | |
268 | "Lookedup(%pFX): prefix_list match %s, rn %p found: %pFX", | |
269 | group, best->plist, rn, &rp_info->group); | |
270 | else | |
271 | zlog_debug("Lookedup(%pFX): rn %p found:%pFX", group, | |
272 | rn, &rp_info->group); | |
273 | } | |
89b68082 | 274 | |
260c92c8 | 275 | route_unlock_node(rn); |
276 | ||
94dc0c4e DS |
277 | /* |
278 | * rp's with prefix lists have the group as 224.0.0.0/4 which will | |
279 | * match anything. So if we have a rp_info that should match a prefix | |
280 | * list then if we do match then best should be the answer( even | |
281 | * if it is NULL ) | |
282 | */ | |
283 | if (!rp_info || (rp_info && rp_info->plist)) | |
284 | return best; | |
285 | ||
286 | /* | |
287 | * So we have a non plist rp_info found in the lookup and no plists | |
288 | * at all to be choosen, return it! | |
289 | */ | |
89b68082 DS |
290 | if (!best) |
291 | return rp_info; | |
292 | ||
94dc0c4e DS |
293 | /* |
294 | * If we have a matching non prefix list and a matching prefix | |
295 | * list we should return the actual rp_info that has the LPM | |
296 | * If they are equal, use the prefix-list( but let's hope | |
297 | * the end-operator doesn't do this ) | |
298 | */ | |
299 | if (rp_info->group.prefixlen > bp->prefixlen) | |
89b68082 DS |
300 | best = rp_info; |
301 | ||
b77b1550 | 302 | return best; |
36d6bd7d | 303 | } |
75a26779 | 304 | |
dfe43e25 DW |
305 | /* |
306 | * When the user makes "ip pim rp" configuration changes or if they change the | |
307 | * prefix-list(s) used by these statements we must tickle the upstream state | |
308 | * for each group to make them re-lookup who their RP should be. | |
309 | * | |
310 | * This is a placeholder function for now. | |
311 | */ | |
e7016ceb | 312 | void pim_rp_refresh_group_to_rp_mapping(struct pim_instance *pim) |
dfe43e25 | 313 | { |
472ad383 | 314 | pim_msdp_i_am_rp_changed(pim); |
a749b900 | 315 | pim_upstream_reeval_use_rpt(pim); |
dfe43e25 DW |
316 | } |
317 | ||
d9c9a9ee DS |
318 | void pim_rp_prefix_list_update(struct pim_instance *pim, |
319 | struct prefix_list *plist) | |
dfe43e25 | 320 | { |
d62a17ae | 321 | struct listnode *node; |
322 | struct rp_info *rp_info; | |
323 | int refresh_needed = 0; | |
324 | ||
d9c9a9ee | 325 | for (ALL_LIST_ELEMENTS_RO(pim->rp_list, node, rp_info)) { |
d62a17ae | 326 | if (rp_info->plist |
327 | && strcmp(rp_info->plist, prefix_list_name(plist)) == 0) { | |
328 | refresh_needed = 1; | |
329 | break; | |
330 | } | |
331 | } | |
332 | ||
333 | if (refresh_needed) | |
472ad383 | 334 | pim_rp_refresh_group_to_rp_mapping(pim); |
dfe43e25 DW |
335 | } |
336 | ||
d62a17ae | 337 | static int pim_rp_check_interface_addrs(struct rp_info *rp_info, |
338 | struct pim_interface *pim_ifp) | |
7176984f | 339 | { |
d62a17ae | 340 | struct listnode *node; |
341 | struct pim_secondary_addr *sec_addr; | |
c6c615c1 | 342 | pim_addr sec_paddr; |
034db86b | 343 | |
b63192cf | 344 | if (!pim_addr_cmp(pim_ifp->primary_address, rp_info->rp.rpf_addr)) |
d62a17ae | 345 | return 1; |
7176984f | 346 | |
d62a17ae | 347 | if (!pim_ifp->sec_addr_list) { |
348 | return 0; | |
349 | } | |
7176984f | 350 | |
d62a17ae | 351 | for (ALL_LIST_ELEMENTS_RO(pim_ifp->sec_addr_list, node, sec_addr)) { |
c6c615c1 MR |
352 | sec_paddr = pim_addr_from_prefix(&sec_addr->addr); |
353 | /* If an RP-address is self, It should be enough to say | |
354 | * I am RP the prefix-length should not matter here */ | |
355 | if (!pim_addr_cmp(sec_paddr, rp_info->rp.rpf_addr)) | |
d62a17ae | 356 | return 1; |
d62a17ae | 357 | } |
7176984f | 358 | |
d62a17ae | 359 | return 0; |
7176984f | 360 | } |
361 | ||
fec883d9 DS |
362 | static void pim_rp_check_interfaces(struct pim_instance *pim, |
363 | struct rp_info *rp_info) | |
00d07c6f | 364 | { |
d62a17ae | 365 | struct interface *ifp; |
00d07c6f | 366 | |
d62a17ae | 367 | rp_info->i_am_rp = 0; |
451fda4f | 368 | FOR_ALL_INTERFACES (pim->vrf, ifp) { |
d62a17ae | 369 | struct pim_interface *pim_ifp = ifp->info; |
00d07c6f | 370 | |
d62a17ae | 371 | if (!pim_ifp) |
372 | continue; | |
00d07c6f | 373 | |
d62a17ae | 374 | if (pim_rp_check_interface_addrs(rp_info, pim_ifp)) { |
375 | rp_info->i_am_rp = 1; | |
376 | } | |
377 | } | |
00d07c6f DS |
378 | } |
379 | ||
28309df0 SP |
380 | void pim_upstream_update(struct pim_instance *pim, struct pim_upstream *up) |
381 | { | |
382 | struct pim_rpf old_rpf; | |
383 | enum pim_rpf_result rpf_result; | |
5d99ebea DL |
384 | pim_addr old_upstream_addr; |
385 | pim_addr new_upstream_addr; | |
28309df0 SP |
386 | |
387 | old_upstream_addr = up->upstream_addr; | |
388 | pim_rp_set_upstream_addr(pim, &new_upstream_addr, up->sg.src, | |
389 | up->sg.grp); | |
390 | ||
23fc858a | 391 | if (PIM_DEBUG_PIM_TRACE) |
5d1d18a1 | 392 | zlog_debug("%s: pim upstream update for old upstream %pPA", |
ee2bbf7c | 393 | __func__, &old_upstream_addr); |
28309df0 | 394 | |
5d99ebea | 395 | if (!pim_addr_cmp(old_upstream_addr, new_upstream_addr)) |
28309df0 SP |
396 | return; |
397 | ||
398 | /* Lets consider a case, where a PIM upstream has a better RP as a | |
399 | * result of a new RP configuration with more precise group range. | |
400 | * This upstream has to be added to the upstream hash of new RP's | |
401 | * NHT(pnc) and has to be removed from old RP's NHT upstream hash | |
402 | */ | |
5d99ebea | 403 | if (!pim_addr_is_any(old_upstream_addr)) { |
28309df0 | 404 | /* Deregister addr with Zebra NHT */ |
2dbe669b | 405 | if (PIM_DEBUG_PIM_TRACE) |
15569c58 | 406 | zlog_debug( |
b63192cf | 407 | "%s: Deregister upstream %s addr %pPA with Zebra NHT", |
408 | __func__, up->sg_str, &old_upstream_addr); | |
e6e53006 | 409 | pim_delete_tracked_nexthop(pim, old_upstream_addr, up, NULL); |
28309df0 SP |
410 | } |
411 | ||
412 | /* Update the upstream address */ | |
413 | up->upstream_addr = new_upstream_addr; | |
414 | ||
415 | old_rpf.source_nexthop.interface = up->rpf.source_nexthop.interface; | |
416 | ||
8c55c132 | 417 | rpf_result = pim_rpf_update(pim, up, &old_rpf, __func__); |
28309df0 | 418 | if (rpf_result == PIM_RPF_FAILURE) |
15569c58 | 419 | pim_mroute_del(up->channel_oil, __func__); |
28309df0 SP |
420 | |
421 | /* update kernel multicast forwarding cache (MFC) */ | |
7984af18 AK |
422 | if (up->rpf.source_nexthop.interface && up->channel_oil) |
423 | pim_upstream_mroute_iif_update(up->channel_oil, __func__); | |
28309df0 | 424 | |
b36576e4 AK |
425 | if (rpf_result == PIM_RPF_CHANGED || |
426 | (rpf_result == PIM_RPF_FAILURE && | |
427 | old_rpf.source_nexthop.interface)) | |
28309df0 SP |
428 | pim_zebra_upstream_rpf_changed(pim, up, &old_rpf); |
429 | ||
28309df0 SP |
430 | } |
431 | ||
6ed1cea1 | 432 | int pim_rp_new(struct pim_instance *pim, pim_addr rp_addr, struct prefix group, |
cc144e8b | 433 | const char *plist, enum rp_source rp_src_flag) |
d0e418b4 | 434 | { |
435 | int result = 0; | |
d62a17ae | 436 | struct rp_info *rp_info; |
437 | struct rp_info *rp_all; | |
438 | struct prefix group_all; | |
439 | struct listnode *node, *nnode; | |
440 | struct rp_info *tmp_rp_info; | |
441 | char buffer[BUFSIZ]; | |
b63192cf | 442 | pim_addr nht_p; |
94dc0c4e | 443 | struct route_node *rn = NULL; |
28309df0 | 444 | struct pim_upstream *up; |
62596d9a | 445 | bool upstream_updated = false; |
d62a17ae | 446 | |
6ed1cea1 | 447 | if (pim_addr_is_any(rp_addr)) |
1e0d1c25 DS |
448 | return PIM_RP_BAD_ADDRESS; |
449 | ||
d62a17ae | 450 | rp_info = XCALLOC(MTYPE_PIM_RP, sizeof(*rp_info)); |
d62a17ae | 451 | |
b63192cf | 452 | rp_info->rp.rpf_addr = rp_addr; |
d0e418b4 | 453 | prefix_copy(&rp_info->group, &group); |
454 | rp_info->rp_src = rp_src_flag; | |
d62a17ae | 455 | |
d62a17ae | 456 | if (plist) { |
457 | /* | |
458 | * Return if the prefix-list is already configured for this RP | |
459 | */ | |
1db07606 | 460 | if (pim_rp_find_prefix_list(pim, rp_addr, plist)) { |
d62a17ae | 461 | XFREE(MTYPE_PIM_RP, rp_info); |
462 | return PIM_SUCCESS; | |
463 | } | |
464 | ||
465 | /* | |
466 | * Barf if the prefix-list is already configured for an RP | |
467 | */ | |
d9c9a9ee | 468 | if (pim_rp_prefix_list_used(pim, plist)) { |
d62a17ae | 469 | XFREE(MTYPE_PIM_RP, rp_info); |
470 | return PIM_RP_PFXLIST_IN_USE; | |
471 | } | |
472 | ||
473 | /* | |
474 | * Free any existing rp_info entries for this RP | |
475 | */ | |
d9c9a9ee | 476 | for (ALL_LIST_ELEMENTS(pim->rp_list, node, nnode, |
d62a17ae | 477 | tmp_rp_info)) { |
b63192cf | 478 | if (!pim_addr_cmp(rp_info->rp.rpf_addr, |
479 | tmp_rp_info->rp.rpf_addr)) { | |
d62a17ae | 480 | if (tmp_rp_info->plist) |
99384c6e | 481 | pim_rp_del_config(pim, rp_addr, NULL, |
d0e418b4 | 482 | tmp_rp_info->plist); |
d62a17ae | 483 | else |
d0e418b4 | 484 | pim_rp_del_config( |
99384c6e | 485 | pim, rp_addr, |
d62a17ae | 486 | prefix2str(&tmp_rp_info->group, |
487 | buffer, BUFSIZ), | |
488 | NULL); | |
489 | } | |
490 | } | |
491 | ||
492 | rp_info->plist = XSTRDUP(MTYPE_PIM_FILTER_NAME, plist); | |
493 | } else { | |
89b68082 | 494 | |
c6ced474 | 495 | if (!pim_get_all_mcast_group(&group_all)) { |
2e8345c1 DS |
496 | XFREE(MTYPE_PIM_RP, rp_info); |
497 | return PIM_GROUP_BAD_ADDRESS; | |
498 | } | |
d9c9a9ee | 499 | rp_all = pim_rp_find_match_group(pim, &group_all); |
d62a17ae | 500 | |
501 | /* | |
502 | * Barf if group is a non-multicast subnet | |
503 | */ | |
504 | if (!prefix_match(&rp_all->group, &rp_info->group)) { | |
505 | XFREE(MTYPE_PIM_RP, rp_info); | |
506 | return PIM_GROUP_BAD_ADDRESS; | |
507 | } | |
508 | ||
509 | /* | |
510 | * Remove any prefix-list rp_info entries for this RP | |
511 | */ | |
d9c9a9ee | 512 | for (ALL_LIST_ELEMENTS(pim->rp_list, node, nnode, |
d62a17ae | 513 | tmp_rp_info)) { |
6ed1cea1 | 514 | if (tmp_rp_info->plist && |
b63192cf | 515 | (!pim_addr_cmp(rp_info->rp.rpf_addr, |
516 | tmp_rp_info->rp.rpf_addr))) { | |
99384c6e | 517 | pim_rp_del_config(pim, rp_addr, NULL, |
d0e418b4 | 518 | tmp_rp_info->plist); |
d62a17ae | 519 | } |
520 | } | |
521 | ||
522 | /* | |
b369d0cc | 523 | * Take over the 224.0.0.0/4 group if the rp is INADDR_ANY |
d62a17ae | 524 | */ |
cc144e8b | 525 | if (prefix_same(&rp_all->group, &rp_info->group) && |
526 | pim_rpf_addr_is_inaddr_any(&rp_all->rp)) { | |
d62a17ae | 527 | rp_all->rp.rpf_addr = rp_info->rp.rpf_addr; |
d0e418b4 | 528 | rp_all->rp_src = rp_src_flag; |
d62a17ae | 529 | XFREE(MTYPE_PIM_RP, rp_info); |
530 | ||
531 | /* Register addr with Zebra NHT */ | |
6ed1cea1 | 532 | nht_p = rp_all->rp.rpf_addr; |
2dbe669b | 533 | if (PIM_DEBUG_PIM_NHT_RP) |
d62a17ae | 534 | zlog_debug( |
b63192cf | 535 | "%s: NHT Register rp_all addr %pPA grp %pFX ", |
2dbe669b | 536 | __func__, &nht_p, &rp_all->group); |
28309df0 | 537 | |
dd3364cb | 538 | frr_each (rb_pim_upstream, &pim->upstream_head, up) { |
28309df0 SP |
539 | /* Find (*, G) upstream whose RP is not |
540 | * configured yet | |
541 | */ | |
01adb431 | 542 | if (pim_addr_is_any(up->upstream_addr) && |
2a27f13b | 543 | pim_addr_is_any(up->sg.src)) { |
28309df0 SP |
544 | struct prefix grp; |
545 | struct rp_info *trp_info; | |
546 | ||
5d99ebea | 547 | pim_addr_to_prefix(&grp, up->sg.grp); |
d0e418b4 | 548 | trp_info = pim_rp_find_match_group( |
549 | pim, &grp); | |
62596d9a | 550 | if (trp_info == rp_all) { |
28309df0 | 551 | pim_upstream_update(pim, up); |
62596d9a MR |
552 | upstream_updated = true; |
553 | } | |
28309df0 SP |
554 | } |
555 | } | |
62596d9a MR |
556 | if (upstream_updated) |
557 | pim_zebra_update_all_interfaces(pim); | |
28309df0 | 558 | |
5bd51314 DS |
559 | pim_rp_check_interfaces(pim, rp_all); |
560 | pim_rp_refresh_group_to_rp_mapping(pim); | |
e6e53006 | 561 | pim_find_or_track_nexthop(pim, nht_p, NULL, rp_all, |
4efdb9c6 | 562 | NULL); |
4533b847 | 563 | |
43763b11 DS |
564 | if (!pim_ecmp_nexthop_lookup(pim, |
565 | &rp_all->rp.source_nexthop, | |
e6e53006 | 566 | nht_p, &rp_all->group, 1)) |
43763b11 | 567 | return PIM_RP_NO_PATH; |
d62a17ae | 568 | return PIM_SUCCESS; |
569 | } | |
570 | ||
571 | /* | |
572 | * Return if the group is already configured for this RP | |
573 | */ | |
fd5540ea | 574 | tmp_rp_info = pim_rp_find_exact(pim, rp_addr, &rp_info->group); |
d0e418b4 | 575 | if (tmp_rp_info) { |
576 | if ((tmp_rp_info->rp_src != rp_src_flag) | |
577 | && (rp_src_flag == RP_SRC_STATIC)) | |
578 | tmp_rp_info->rp_src = rp_src_flag; | |
d62a17ae | 579 | XFREE(MTYPE_PIM_RP, rp_info); |
d0e418b4 | 580 | return result; |
d62a17ae | 581 | } |
582 | ||
583 | /* | |
584 | * Barf if this group is already covered by some other RP | |
585 | */ | |
d9c9a9ee | 586 | tmp_rp_info = pim_rp_find_match_group(pim, &rp_info->group); |
d62a17ae | 587 | |
588 | if (tmp_rp_info) { | |
589 | if (tmp_rp_info->plist) { | |
590 | XFREE(MTYPE_PIM_RP, rp_info); | |
591 | return PIM_GROUP_PFXLIST_OVERLAP; | |
592 | } else { | |
593 | /* | |
594 | * If the only RP that covers this group is an | |
595 | * RP configured for | |
596 | * 224.0.0.0/4 that is fine, ignore that one. | |
597 | * For all others | |
598 | * though we must return PIM_GROUP_OVERLAP | |
599 | */ | |
89b68082 DS |
600 | if (prefix_same(&rp_info->group, |
601 | &tmp_rp_info->group)) { | |
d0e418b4 | 602 | if ((rp_src_flag == RP_SRC_STATIC) |
603 | && (tmp_rp_info->rp_src | |
604 | == RP_SRC_STATIC)) { | |
605 | XFREE(MTYPE_PIM_RP, rp_info); | |
606 | return PIM_GROUP_OVERLAP; | |
607 | } | |
608 | ||
609 | result = pim_rp_change( | |
49b7b2c4 | 610 | pim, rp_addr, |
d0e418b4 | 611 | tmp_rp_info->group, |
612 | rp_src_flag); | |
d62a17ae | 613 | XFREE(MTYPE_PIM_RP, rp_info); |
d0e418b4 | 614 | return result; |
d62a17ae | 615 | } |
616 | } | |
617 | } | |
618 | } | |
619 | ||
d9c9a9ee | 620 | listnode_add_sort(pim->rp_list, rp_info); |
94dc0c4e DS |
621 | |
622 | if (!rp_info->plist) { | |
623 | rn = route_node_get(pim->rp_table, &rp_info->group); | |
624 | rn->info = rp_info; | |
625 | } | |
89b68082 | 626 | |
2dbe669b DA |
627 | if (PIM_DEBUG_PIM_TRACE) |
628 | zlog_debug("Allocated: %p for rp_info: %p(%pFX) Lock: %d", rn, | |
629 | rp_info, &rp_info->group, | |
94dc0c4e | 630 | rn ? route_node_get_lock_count(rn) : 0); |
d62a17ae | 631 | |
dd3364cb | 632 | frr_each (rb_pim_upstream, &pim->upstream_head, up) { |
2a27f13b | 633 | if (pim_addr_is_any(up->sg.src)) { |
28309df0 SP |
634 | struct prefix grp; |
635 | struct rp_info *trp_info; | |
636 | ||
5d99ebea | 637 | pim_addr_to_prefix(&grp, up->sg.grp); |
28309df0 SP |
638 | trp_info = pim_rp_find_match_group(pim, &grp); |
639 | ||
62596d9a | 640 | if (trp_info == rp_info) { |
28309df0 | 641 | pim_upstream_update(pim, up); |
62596d9a MR |
642 | upstream_updated = true; |
643 | } | |
28309df0 SP |
644 | } |
645 | } | |
646 | ||
62596d9a MR |
647 | if (upstream_updated) |
648 | pim_zebra_update_all_interfaces(pim); | |
649 | ||
5bd51314 DS |
650 | pim_rp_check_interfaces(pim, rp_info); |
651 | pim_rp_refresh_group_to_rp_mapping(pim); | |
652 | ||
d62a17ae | 653 | /* Register addr with Zebra NHT */ |
6ed1cea1 | 654 | nht_p = rp_info->rp.rpf_addr; |
2dbe669b | 655 | if (PIM_DEBUG_PIM_NHT_RP) |
b63192cf | 656 | zlog_debug("%s: NHT Register RP addr %pPA grp %pFX with Zebra ", |
2dbe669b | 657 | __func__, &nht_p, &rp_info->group); |
e6e53006 | 658 | pim_find_or_track_nexthop(pim, nht_p, NULL, rp_info, NULL); |
659 | if (!pim_ecmp_nexthop_lookup(pim, &rp_info->rp.source_nexthop, nht_p, | |
43763b11 DS |
660 | &rp_info->group, 1)) |
661 | return PIM_RP_NO_PATH; | |
d62a17ae | 662 | |
d62a17ae | 663 | return PIM_SUCCESS; |
75a26779 DS |
664 | } |
665 | ||
99384c6e MR |
666 | void pim_rp_del_config(struct pim_instance *pim, pim_addr rp_addr, |
667 | const char *group_range, const char *plist) | |
75a26779 | 668 | { |
d62a17ae | 669 | struct prefix group; |
d62a17ae | 670 | int result; |
d62a17ae | 671 | |
672 | if (group_range == NULL) | |
c6ced474 | 673 | result = pim_get_all_mcast_group(&group); |
d62a17ae | 674 | else |
675 | result = str2prefix(group_range, &group); | |
676 | ||
99384c6e MR |
677 | if (!result) { |
678 | if (PIM_DEBUG_PIM_TRACE) | |
679 | zlog_debug( | |
680 | "%s: String to prefix failed for %pPAs group", | |
681 | __func__, &rp_addr); | |
682 | return; | |
683 | } | |
d62a17ae | 684 | |
99384c6e | 685 | pim_rp_del(pim, rp_addr, group, plist, RP_SRC_STATIC); |
d0e418b4 | 686 | } |
687 | ||
9dca52b9 MR |
688 | int pim_rp_del(struct pim_instance *pim, pim_addr rp_addr, struct prefix group, |
689 | const char *plist, enum rp_source rp_src_flag) | |
d0e418b4 | 690 | { |
691 | struct prefix g_all; | |
692 | struct rp_info *rp_info; | |
693 | struct rp_info *rp_all; | |
b63192cf | 694 | pim_addr nht_p; |
d0e418b4 | 695 | struct route_node *rn; |
696 | bool was_plist = false; | |
697 | struct rp_info *trp_info; | |
698 | struct pim_upstream *up; | |
d0e418b4 | 699 | struct bsgrp_node *bsgrp = NULL; |
700 | struct bsm_rpinfo *bsrp = NULL; | |
62596d9a | 701 | bool upstream_updated = false; |
d0e418b4 | 702 | |
d62a17ae | 703 | if (plist) |
d9c9a9ee | 704 | rp_info = pim_rp_find_prefix_list(pim, rp_addr, plist); |
d62a17ae | 705 | else |
d9c9a9ee | 706 | rp_info = pim_rp_find_exact(pim, rp_addr, &group); |
d62a17ae | 707 | |
708 | if (!rp_info) | |
709 | return PIM_RP_NOT_FOUND; | |
710 | ||
711 | if (rp_info->plist) { | |
712 | XFREE(MTYPE_PIM_FILTER_NAME, rp_info->plist); | |
89b68082 | 713 | was_plist = true; |
d62a17ae | 714 | } |
715 | ||
23fc858a | 716 | if (PIM_DEBUG_PIM_TRACE) |
9dca52b9 MR |
717 | zlog_debug("%s: Delete RP %pPA for the group %pFX", __func__, |
718 | &rp_addr, &group); | |
d0e418b4 | 719 | |
720 | /* While static RP is getting deleted, we need to check if dynamic RP | |
721 | * present for the same group in BSM RP table, then install the dynamic | |
722 | * RP for the group node into the main rp table | |
723 | */ | |
724 | if (rp_src_flag == RP_SRC_STATIC) { | |
725 | bsgrp = pim_bsm_get_bsgrp_node(&pim->global_scope, &group); | |
726 | ||
727 | if (bsgrp) { | |
fdab2940 | 728 | bsrp = bsm_rpinfos_first(bsgrp->bsrp_list); |
d0e418b4 | 729 | if (bsrp) { |
9dca52b9 | 730 | if (PIM_DEBUG_PIM_TRACE) |
15569c58 | 731 | zlog_debug( |
9dca52b9 MR |
732 | "%s: BSM RP %pPA found for the group %pFX", |
733 | __func__, &bsrp->rp_address, | |
734 | &group); | |
d0e418b4 | 735 | return pim_rp_change(pim, bsrp->rp_address, |
736 | group, RP_SRC_BSR); | |
737 | } | |
738 | } else { | |
23fc858a | 739 | if (PIM_DEBUG_PIM_TRACE) |
d0e418b4 | 740 | zlog_debug( |
2dbe669b DA |
741 | "%s: BSM RP not found for the group %pFX", |
742 | __func__, &group); | |
d0e418b4 | 743 | } |
744 | } | |
745 | ||
d62a17ae | 746 | /* Deregister addr with Zebra NHT */ |
9dca52b9 | 747 | nht_p = rp_info->rp.rpf_addr; |
2dbe669b | 748 | if (PIM_DEBUG_PIM_NHT_RP) |
b63192cf | 749 | zlog_debug("%s: Deregister RP addr %pPA with Zebra ", __func__, |
2dbe669b | 750 | &nht_p); |
e6e53006 | 751 | pim_delete_tracked_nexthop(pim, nht_p, NULL, rp_info); |
d62a17ae | 752 | |
c6ced474 | 753 | if (!pim_get_all_mcast_group(&g_all)) |
e691f179 DS |
754 | return PIM_RP_BAD_ADDRESS; |
755 | ||
d9c9a9ee | 756 | rp_all = pim_rp_find_match_group(pim, &g_all); |
d62a17ae | 757 | |
758 | if (rp_all == rp_info) { | |
dd3364cb | 759 | frr_each (rb_pim_upstream, &pim->upstream_head, up) { |
8cfd7268 SP |
760 | /* Find the upstream (*, G) whose upstream address is |
761 | * same as the deleted RP | |
762 | */ | |
01adb431 DL |
763 | pim_addr rpf_addr; |
764 | ||
b63192cf | 765 | rpf_addr = rp_info->rp.rpf_addr; |
01adb431 | 766 | if (!pim_addr_cmp(up->upstream_addr, rpf_addr) && |
2a27f13b | 767 | pim_addr_is_any(up->sg.src)) { |
8cfd7268 | 768 | struct prefix grp; |
5d99ebea DL |
769 | |
770 | pim_addr_to_prefix(&grp, up->sg.grp); | |
8cfd7268 SP |
771 | trp_info = pim_rp_find_match_group(pim, &grp); |
772 | if (trp_info == rp_all) { | |
773 | pim_upstream_rpf_clear(pim, up); | |
01adb431 | 774 | up->upstream_addr = PIMADDR_ANY; |
8cfd7268 SP |
775 | } |
776 | } | |
777 | } | |
b63192cf | 778 | rp_all->rp.rpf_addr = PIMADDR_ANY; |
d62a17ae | 779 | rp_all->i_am_rp = 0; |
780 | return PIM_SUCCESS; | |
781 | } | |
782 | ||
d9c9a9ee | 783 | listnode_delete(pim->rp_list, rp_info); |
89b68082 DS |
784 | |
785 | if (!was_plist) { | |
786 | rn = route_node_get(pim->rp_table, &rp_info->group); | |
787 | if (rn) { | |
788 | if (rn->info != rp_info) | |
af4c2728 | 789 | flog_err( |
450971aa | 790 | EC_LIB_DEVELOPMENT, |
3613d898 | 791 | "Expected rn->info to be equal to rp_info"); |
89b68082 | 792 | |
2dbe669b | 793 | if (PIM_DEBUG_PIM_TRACE) |
996c9314 | 794 | zlog_debug( |
2dbe669b DA |
795 | "%s:Found for Freeing: %p for rp_info: %p(%pFX) Lock: %d", |
796 | __func__, rn, rp_info, &rp_info->group, | |
c10e14e9 | 797 | route_node_get_lock_count(rn)); |
2dbe669b | 798 | |
89b68082 DS |
799 | rn->info = NULL; |
800 | route_unlock_node(rn); | |
801 | route_unlock_node(rn); | |
802 | } | |
803 | } | |
804 | ||
472ad383 | 805 | pim_rp_refresh_group_to_rp_mapping(pim); |
093c928f | 806 | |
dd3364cb | 807 | frr_each (rb_pim_upstream, &pim->upstream_head, up) { |
8cfd7268 SP |
808 | /* Find the upstream (*, G) whose upstream address is same as |
809 | * the deleted RP | |
810 | */ | |
01adb431 DL |
811 | pim_addr rpf_addr; |
812 | ||
b63192cf | 813 | rpf_addr = rp_info->rp.rpf_addr; |
01adb431 | 814 | if (!pim_addr_cmp(up->upstream_addr, rpf_addr) && |
2a27f13b | 815 | pim_addr_is_any(up->sg.src)) { |
8cfd7268 SP |
816 | struct prefix grp; |
817 | ||
5d99ebea | 818 | pim_addr_to_prefix(&grp, up->sg.grp); |
8cfd7268 SP |
819 | trp_info = pim_rp_find_match_group(pim, &grp); |
820 | ||
821 | /* RP not found for the group grp */ | |
cc144e8b | 822 | if (pim_rpf_addr_is_inaddr_any(&trp_info->rp)) { |
8cfd7268 | 823 | pim_upstream_rpf_clear(pim, up); |
d0e418b4 | 824 | pim_rp_set_upstream_addr( |
825 | pim, &up->upstream_addr, up->sg.src, | |
826 | up->sg.grp); | |
8cfd7268 SP |
827 | } |
828 | ||
829 | /* RP found for the group grp */ | |
62596d9a | 830 | else { |
8cfd7268 | 831 | pim_upstream_update(pim, up); |
62596d9a MR |
832 | upstream_updated = true; |
833 | } | |
8cfd7268 SP |
834 | } |
835 | } | |
836 | ||
62596d9a MR |
837 | if (upstream_updated) |
838 | pim_zebra_update_all_interfaces(pim); | |
839 | ||
093c928f | 840 | XFREE(MTYPE_PIM_RP, rp_info); |
d62a17ae | 841 | return PIM_SUCCESS; |
75a26779 | 842 | } |
13afbd05 | 843 | |
49b7b2c4 | 844 | int pim_rp_change(struct pim_instance *pim, pim_addr new_rp_addr, |
d0e418b4 | 845 | struct prefix group, enum rp_source rp_src_flag) |
846 | { | |
b63192cf | 847 | pim_addr nht_p; |
d0e418b4 | 848 | struct route_node *rn; |
849 | int result = 0; | |
850 | struct rp_info *rp_info = NULL; | |
851 | struct pim_upstream *up; | |
62596d9a | 852 | bool upstream_updated = false; |
49b7b2c4 | 853 | pim_addr old_rp_addr; |
d0e418b4 | 854 | |
855 | rn = route_node_lookup(pim->rp_table, &group); | |
856 | if (!rn) { | |
857 | result = pim_rp_new(pim, new_rp_addr, group, NULL, rp_src_flag); | |
858 | return result; | |
859 | } | |
860 | ||
861 | rp_info = rn->info; | |
862 | ||
863 | if (!rp_info) { | |
864 | route_unlock_node(rn); | |
865 | result = pim_rp_new(pim, new_rp_addr, group, NULL, rp_src_flag); | |
866 | return result; | |
867 | } | |
868 | ||
b63192cf | 869 | old_rp_addr = rp_info->rp.rpf_addr; |
49b7b2c4 | 870 | if (!pim_addr_cmp(new_rp_addr, old_rp_addr)) { |
d0e418b4 | 871 | if (rp_info->rp_src != rp_src_flag) { |
872 | rp_info->rp_src = rp_src_flag; | |
873 | route_unlock_node(rn); | |
874 | return PIM_SUCCESS; | |
875 | } | |
876 | } | |
877 | ||
878 | /* Deregister old RP addr with Zebra NHT */ | |
49b7b2c4 MR |
879 | |
880 | if (!pim_addr_is_any(old_rp_addr)) { | |
881 | nht_p = rp_info->rp.rpf_addr; | |
2dbe669b | 882 | if (PIM_DEBUG_PIM_NHT_RP) |
b63192cf | 883 | zlog_debug("%s: Deregister RP addr %pPA with Zebra ", |
2dbe669b | 884 | __func__, &nht_p); |
e6e53006 | 885 | pim_delete_tracked_nexthop(pim, nht_p, NULL, rp_info); |
d0e418b4 | 886 | } |
887 | ||
888 | pim_rp_nexthop_del(rp_info); | |
889 | listnode_delete(pim->rp_list, rp_info); | |
890 | /* Update the new RP address*/ | |
49b7b2c4 | 891 | |
b63192cf | 892 | rp_info->rp.rpf_addr = new_rp_addr; |
d0e418b4 | 893 | rp_info->rp_src = rp_src_flag; |
894 | rp_info->i_am_rp = 0; | |
895 | ||
896 | listnode_add_sort(pim->rp_list, rp_info); | |
897 | ||
dd3364cb | 898 | frr_each (rb_pim_upstream, &pim->upstream_head, up) { |
2a27f13b | 899 | if (pim_addr_is_any(up->sg.src)) { |
d0e418b4 | 900 | struct prefix grp; |
901 | struct rp_info *trp_info; | |
902 | ||
5d99ebea | 903 | pim_addr_to_prefix(&grp, up->sg.grp); |
d0e418b4 | 904 | trp_info = pim_rp_find_match_group(pim, &grp); |
905 | ||
62596d9a | 906 | if (trp_info == rp_info) { |
d0e418b4 | 907 | pim_upstream_update(pim, up); |
62596d9a MR |
908 | upstream_updated = true; |
909 | } | |
d0e418b4 | 910 | } |
911 | } | |
912 | ||
62596d9a MR |
913 | if (upstream_updated) |
914 | pim_zebra_update_all_interfaces(pim); | |
915 | ||
d0e418b4 | 916 | /* Register new RP addr with Zebra NHT */ |
49b7b2c4 | 917 | nht_p = rp_info->rp.rpf_addr; |
2dbe669b | 918 | if (PIM_DEBUG_PIM_NHT_RP) |
b63192cf | 919 | zlog_debug("%s: NHT Register RP addr %pPA grp %pFX with Zebra ", |
2dbe669b | 920 | __func__, &nht_p, &rp_info->group); |
d0e418b4 | 921 | |
e6e53006 | 922 | pim_find_or_track_nexthop(pim, nht_p, NULL, rp_info, NULL); |
923 | if (!pim_ecmp_nexthop_lookup(pim, &rp_info->rp.source_nexthop, nht_p, | |
d0e418b4 | 924 | &rp_info->group, 1)) { |
925 | route_unlock_node(rn); | |
926 | return PIM_RP_NO_PATH; | |
927 | } | |
928 | ||
929 | pim_rp_check_interfaces(pim, rp_info); | |
930 | ||
931 | route_unlock_node(rn); | |
932 | ||
933 | pim_rp_refresh_group_to_rp_mapping(pim); | |
934 | ||
935 | return result; | |
936 | } | |
937 | ||
fec883d9 | 938 | void pim_rp_setup(struct pim_instance *pim) |
13afbd05 | 939 | { |
d62a17ae | 940 | struct listnode *node; |
941 | struct rp_info *rp_info; | |
b63192cf | 942 | pim_addr nht_p; |
d62a17ae | 943 | |
d9c9a9ee | 944 | for (ALL_LIST_ELEMENTS_RO(pim->rp_list, node, rp_info)) { |
cc144e8b | 945 | if (pim_rpf_addr_is_inaddr_any(&rp_info->rp)) |
d62a17ae | 946 | continue; |
947 | ||
5d1d18a1 | 948 | nht_p = rp_info->rp.rpf_addr; |
8cfd7268 | 949 | |
e6e53006 | 950 | pim_find_or_track_nexthop(pim, nht_p, NULL, rp_info, NULL); |
43763b11 | 951 | if (!pim_ecmp_nexthop_lookup(pim, &rp_info->rp.source_nexthop, |
e6e53006 | 952 | nht_p, &rp_info->group, 1)) |
43763b11 | 953 | if (PIM_DEBUG_PIM_NHT_RP) |
d62a17ae | 954 | zlog_debug( |
43763b11 | 955 | "Unable to lookup nexthop for rp specified"); |
d62a17ae | 956 | } |
13afbd05 DS |
957 | } |
958 | ||
54b97c74 | 959 | /* |
7176984f | 960 | * Checks to see if we should elect ourself the actual RP when new if |
961 | * addresses are added against an interface. | |
54b97c74 | 962 | */ |
d62a17ae | 963 | void pim_rp_check_on_if_add(struct pim_interface *pim_ifp) |
54b97c74 | 964 | { |
d62a17ae | 965 | struct listnode *node; |
966 | struct rp_info *rp_info; | |
967 | bool i_am_rp_changed = false; | |
d9c9a9ee | 968 | struct pim_instance *pim = pim_ifp->pim; |
d62a17ae | 969 | |
d9c9a9ee | 970 | if (pim->rp_list == NULL) |
d62a17ae | 971 | return; |
972 | ||
d9c9a9ee | 973 | for (ALL_LIST_ELEMENTS_RO(pim->rp_list, node, rp_info)) { |
cc144e8b | 974 | if (pim_rpf_addr_is_inaddr_any(&rp_info->rp)) |
d62a17ae | 975 | continue; |
976 | ||
977 | /* if i_am_rp is already set nothing to be done (adding new | |
978 | * addresses | |
979 | * is not going to make a difference). */ | |
980 | if (rp_info->i_am_rp) { | |
981 | continue; | |
982 | } | |
983 | ||
984 | if (pim_rp_check_interface_addrs(rp_info, pim_ifp)) { | |
985 | i_am_rp_changed = true; | |
986 | rp_info->i_am_rp = 1; | |
b63192cf | 987 | if (PIM_DEBUG_PIM_NHT_RP) |
988 | zlog_debug("%s: %pPA: i am rp", __func__, | |
989 | &rp_info->rp.rpf_addr); | |
d62a17ae | 990 | } |
991 | } | |
992 | ||
993 | if (i_am_rp_changed) { | |
472ad383 | 994 | pim_msdp_i_am_rp_changed(pim); |
a749b900 | 995 | pim_upstream_reeval_use_rpt(pim); |
d62a17ae | 996 | } |
7176984f | 997 | } |
36d6bd7d | 998 | |
7176984f | 999 | /* up-optimized re-evaluation of "i_am_rp". this is used when ifaddresses |
1000 | * are removed. Removing numbers is an uncommon event in an active network | |
1001 | * so I have made no attempt to optimize it. */ | |
fec883d9 | 1002 | void pim_i_am_rp_re_evaluate(struct pim_instance *pim) |
7176984f | 1003 | { |
d62a17ae | 1004 | struct listnode *node; |
1005 | struct rp_info *rp_info; | |
1006 | bool i_am_rp_changed = false; | |
1007 | int old_i_am_rp; | |
1008 | ||
d9c9a9ee | 1009 | if (pim->rp_list == NULL) |
d62a17ae | 1010 | return; |
1011 | ||
d9c9a9ee | 1012 | for (ALL_LIST_ELEMENTS_RO(pim->rp_list, node, rp_info)) { |
cc144e8b | 1013 | if (pim_rpf_addr_is_inaddr_any(&rp_info->rp)) |
d62a17ae | 1014 | continue; |
1015 | ||
1016 | old_i_am_rp = rp_info->i_am_rp; | |
fec883d9 | 1017 | pim_rp_check_interfaces(pim, rp_info); |
d62a17ae | 1018 | |
1019 | if (old_i_am_rp != rp_info->i_am_rp) { | |
1020 | i_am_rp_changed = true; | |
3d225d48 | 1021 | if (PIM_DEBUG_PIM_NHT_RP) { |
b63192cf | 1022 | if (rp_info->i_am_rp) |
1023 | zlog_debug("%s: %pPA: i am rp", | |
1024 | __func__, | |
1025 | &rp_info->rp.rpf_addr); | |
1026 | else | |
e6e53006 | 1027 | zlog_debug( |
1028 | "%s: %pPA: i am no longer rp", | |
1029 | __func__, | |
1030 | &rp_info->rp.rpf_addr); | |
d62a17ae | 1031 | } |
1032 | } | |
1033 | } | |
1034 | ||
1035 | if (i_am_rp_changed) { | |
472ad383 | 1036 | pim_msdp_i_am_rp_changed(pim); |
a749b900 | 1037 | pim_upstream_reeval_use_rpt(pim); |
d62a17ae | 1038 | } |
54b97c74 DS |
1039 | } |
1040 | ||
1041 | /* | |
1042 | * I_am_RP(G) is true if the group-to-RP mapping indicates that | |
1043 | * this router is the RP for the group. | |
1044 | * | |
1045 | * Since we only have static RP, all groups are part of this RP | |
1046 | */ | |
5d99ebea | 1047 | int pim_rp_i_am_rp(struct pim_instance *pim, pim_addr group) |
54b97c74 | 1048 | { |
d62a17ae | 1049 | struct prefix g; |
1050 | struct rp_info *rp_info; | |
36d6bd7d | 1051 | |
d62a17ae | 1052 | memset(&g, 0, sizeof(g)); |
131ded08 | 1053 | pim_addr_to_prefix(&g, group); |
d9c9a9ee | 1054 | rp_info = pim_rp_find_match_group(pim, &g); |
36d6bd7d | 1055 | |
d62a17ae | 1056 | if (rp_info) |
1057 | return rp_info->i_am_rp; | |
d62a17ae | 1058 | return 0; |
54b97c74 DS |
1059 | } |
1060 | ||
71694057 DS |
1061 | /* |
1062 | * RP(G) | |
1063 | * | |
1064 | * Return the RP that the Group belongs too. | |
1065 | */ | |
5d99ebea | 1066 | struct pim_rpf *pim_rp_g(struct pim_instance *pim, pim_addr group) |
71694057 | 1067 | { |
d62a17ae | 1068 | struct prefix g; |
1069 | struct rp_info *rp_info; | |
1070 | ||
1071 | memset(&g, 0, sizeof(g)); | |
8eb5ad6c | 1072 | pim_addr_to_prefix(&g, group); |
d62a17ae | 1073 | |
d9c9a9ee | 1074 | rp_info = pim_rp_find_match_group(pim, &g); |
d62a17ae | 1075 | |
1076 | if (rp_info) { | |
b63192cf | 1077 | pim_addr nht_p; |
43763b11 | 1078 | |
d62a17ae | 1079 | /* Register addr with Zebra NHT */ |
8eb5ad6c | 1080 | nht_p = rp_info->rp.rpf_addr; |
2dbe669b | 1081 | if (PIM_DEBUG_PIM_NHT_RP) |
d62a17ae | 1082 | zlog_debug( |
b63192cf | 1083 | "%s: NHT Register RP addr %pPA grp %pFX with Zebra", |
2dbe669b | 1084 | __func__, &nht_p, &rp_info->group); |
e6e53006 | 1085 | pim_find_or_track_nexthop(pim, nht_p, NULL, rp_info, NULL); |
43763b11 DS |
1086 | pim_rpf_set_refresh_time(pim); |
1087 | (void)pim_ecmp_nexthop_lookup(pim, &rp_info->rp.source_nexthop, | |
e6e53006 | 1088 | nht_p, &rp_info->group, 1); |
d62a17ae | 1089 | return (&rp_info->rp); |
1090 | } | |
1091 | ||
1092 | // About to Go Down | |
1093 | return NULL; | |
71694057 DS |
1094 | } |
1095 | ||
8f5f5e91 DS |
1096 | /* |
1097 | * Set the upstream IP address we want to talk to based upon | |
1098 | * the rp configured and the source address | |
1099 | * | |
1100 | * If we have don't have a RP configured and the source address is * | |
732c209c | 1101 | * then set the upstream addr as INADDR_ANY and return failure. |
8f5f5e91 DS |
1102 | * |
1103 | */ | |
5d99ebea DL |
1104 | int pim_rp_set_upstream_addr(struct pim_instance *pim, pim_addr *up, |
1105 | pim_addr source, pim_addr group) | |
8f5f5e91 | 1106 | { |
d62a17ae | 1107 | struct rp_info *rp_info; |
1108 | struct prefix g; | |
36d6bd7d | 1109 | |
d62a17ae | 1110 | memset(&g, 0, sizeof(g)); |
b1e132ac MR |
1111 | |
1112 | pim_addr_to_prefix(&g, group); | |
36d6bd7d | 1113 | |
d9c9a9ee | 1114 | rp_info = pim_rp_find_match_group(pim, &g); |
36d6bd7d | 1115 | |
cc144e8b | 1116 | if (!rp_info || ((pim_rpf_addr_is_inaddr_any(&rp_info->rp)) && |
b1e132ac | 1117 | (pim_addr_is_any(source)))) { |
3d225d48 | 1118 | if (PIM_DEBUG_PIM_NHT_RP) |
d62a17ae | 1119 | zlog_debug("%s: Received a (*,G) with no RP configured", |
15569c58 | 1120 | __func__); |
b1e132ac | 1121 | *up = PIMADDR_ANY; |
d62a17ae | 1122 | return 0; |
1123 | } | |
8f5f5e91 | 1124 | |
b1e132ac | 1125 | if (pim_addr_is_any(source)) |
b63192cf | 1126 | *up = rp_info->rp.rpf_addr; |
b1e132ac MR |
1127 | else |
1128 | *up = source; | |
8f5f5e91 | 1129 | |
d62a17ae | 1130 | return 1; |
8f5f5e91 | 1131 | } |
75a26779 | 1132 | |
0c8b717e DS |
1133 | int pim_rp_config_write(struct pim_instance *pim, struct vty *vty, |
1134 | const char *spaces) | |
75a26779 | 1135 | { |
d62a17ae | 1136 | struct listnode *node; |
1137 | struct rp_info *rp_info; | |
d62a17ae | 1138 | int count = 0; |
0c3182a0 | 1139 | pim_addr rp_addr; |
d62a17ae | 1140 | |
d9c9a9ee | 1141 | for (ALL_LIST_ELEMENTS_RO(pim->rp_list, node, rp_info)) { |
cc144e8b | 1142 | if (pim_rpf_addr_is_inaddr_any(&rp_info->rp)) |
d62a17ae | 1143 | continue; |
1144 | ||
d0e418b4 | 1145 | if (rp_info->rp_src == RP_SRC_BSR) |
1146 | continue; | |
1147 | ||
b63192cf | 1148 | rp_addr = rp_info->rp.rpf_addr; |
d62a17ae | 1149 | if (rp_info->plist) |
0c3182a0 MR |
1150 | vty_out(vty, |
1151 | "%s" PIM_AF_NAME | |
1152 | " pim rp %pPA prefix-list %s\n", | |
1153 | spaces, &rp_addr, rp_info->plist); | |
d62a17ae | 1154 | else |
0c3182a0 MR |
1155 | vty_out(vty, "%s" PIM_AF_NAME " pim rp %pPA %pFX\n", |
1156 | spaces, &rp_addr, &rp_info->group); | |
d62a17ae | 1157 | count++; |
1158 | } | |
1159 | ||
1160 | return count; | |
75a26779 DS |
1161 | } |
1162 | ||
8c0a7680 | 1163 | void pim_rp_show_information(struct pim_instance *pim, struct prefix *range, |
0095f482 | 1164 | struct vty *vty, json_object *json) |
00d07c6f | 1165 | { |
d62a17ae | 1166 | struct rp_info *rp_info; |
1167 | struct rp_info *prev_rp_info = NULL; | |
1168 | struct listnode *node; | |
025725f7 | 1169 | char source[7]; |
d62a17ae | 1170 | |
d62a17ae | 1171 | json_object *json_rp_rows = NULL; |
1172 | json_object *json_row = NULL; | |
1173 | ||
0095f482 | 1174 | if (!json) |
d62a17ae | 1175 | vty_out(vty, |
8c0a7680 | 1176 | "RP address group/prefix-list OIF I am RP Source Group-Type\n"); |
d9c9a9ee | 1177 | for (ALL_LIST_ELEMENTS_RO(pim->rp_list, node, rp_info)) { |
243e02ab DL |
1178 | if (pim_rpf_addr_is_inaddr_any(&rp_info->rp)) |
1179 | continue; | |
d62a17ae | 1180 | |
8c0a7680 DA |
1181 | #if PIM_IPV == 4 |
1182 | pim_addr group = rp_info->group.u.prefix4; | |
1183 | #else | |
1184 | pim_addr group = rp_info->group.u.prefix6; | |
1185 | #endif | |
1186 | const char *group_type = | |
1187 | pim_is_grp_ssm(pim, group) ? "SSM" : "ASM"; | |
1188 | ||
c07ddc36 | 1189 | if (range && !prefix_match(&rp_info->group, range)) |
8c0a7680 DA |
1190 | continue; |
1191 | ||
243e02ab DL |
1192 | if (rp_info->rp_src == RP_SRC_STATIC) |
1193 | strlcpy(source, "Static", sizeof(source)); | |
1194 | else if (rp_info->rp_src == RP_SRC_BSR) | |
1195 | strlcpy(source, "BSR", sizeof(source)); | |
1196 | else | |
1197 | strlcpy(source, "None", sizeof(source)); | |
0095f482 | 1198 | if (json) { |
243e02ab DL |
1199 | /* |
1200 | * If we have moved on to a new RP then add the | |
1201 | * entry for the previous RP | |
1202 | */ | |
1203 | if (prev_rp_info && | |
b63192cf | 1204 | (pim_addr_cmp(prev_rp_info->rp.rpf_addr, |
1205 | rp_info->rp.rpf_addr))) { | |
5d1d18a1 | 1206 | json_object_object_addf( |
b63192cf | 1207 | json, json_rp_rows, "%pPA", |
5d1d18a1 | 1208 | &prev_rp_info->rp.rpf_addr); |
243e02ab DL |
1209 | json_rp_rows = NULL; |
1210 | } | |
d62a17ae | 1211 | |
243e02ab DL |
1212 | if (!json_rp_rows) |
1213 | json_rp_rows = json_object_new_array(); | |
1214 | ||
1215 | json_row = json_object_new_object(); | |
b63192cf | 1216 | json_object_string_addf(json_row, "rpAddress", "%pPA", |
5d1d18a1 | 1217 | &rp_info->rp.rpf_addr); |
243e02ab DL |
1218 | if (rp_info->rp.source_nexthop.interface) |
1219 | json_object_string_add( | |
1220 | json_row, "outboundInterface", | |
1221 | rp_info->rp.source_nexthop | |
1222 | .interface->name); | |
1223 | else | |
1224 | json_object_string_add(json_row, | |
1225 | "outboundInterface", | |
1226 | "Unknown"); | |
1227 | if (rp_info->i_am_rp) | |
1228 | json_object_boolean_true_add(json_row, "iAmRP"); | |
1229 | else | |
1230 | json_object_boolean_false_add(json_row, | |
1231 | "iAmRP"); | |
d62a17ae | 1232 | |
243e02ab DL |
1233 | if (rp_info->plist) |
1234 | json_object_string_add(json_row, "prefixList", | |
1235 | rp_info->plist); | |
1236 | else | |
1237 | json_object_string_addf(json_row, "group", | |
1238 | "%pFX", | |
1239 | &rp_info->group); | |
1240 | json_object_string_add(json_row, "source", source); | |
8c0a7680 DA |
1241 | json_object_string_add(json_row, "groupType", |
1242 | group_type); | |
d62a17ae | 1243 | |
243e02ab DL |
1244 | json_object_array_add(json_rp_rows, json_row); |
1245 | } else { | |
b63192cf | 1246 | vty_out(vty, "%-15pPA ", &rp_info->rp.rpf_addr); |
d62a17ae | 1247 | |
243e02ab DL |
1248 | if (rp_info->plist) |
1249 | vty_out(vty, "%-18s ", rp_info->plist); | |
1250 | else | |
1251 | vty_out(vty, "%-18pFX ", &rp_info->group); | |
d62a17ae | 1252 | |
243e02ab DL |
1253 | if (rp_info->rp.source_nexthop.interface) |
1254 | vty_out(vty, "%-16s ", | |
1255 | rp_info->rp.source_nexthop | |
1256 | .interface->name); | |
1257 | else | |
1258 | vty_out(vty, "%-16s ", "(Unknown)"); | |
d62a17ae | 1259 | |
243e02ab DL |
1260 | if (rp_info->i_am_rp) |
1261 | vty_out(vty, "yes"); | |
1262 | else | |
1263 | vty_out(vty, "no"); | |
1264 | ||
8c0a7680 DA |
1265 | vty_out(vty, "%14s", source); |
1266 | vty_out(vty, "%6s\n", group_type); | |
d62a17ae | 1267 | } |
243e02ab | 1268 | prev_rp_info = rp_info; |
d62a17ae | 1269 | } |
1270 | ||
0095f482 | 1271 | if (json) { |
d62a17ae | 1272 | if (prev_rp_info && json_rp_rows) |
b63192cf | 1273 | json_object_object_addf(json, json_rp_rows, "%pPA", |
5d1d18a1 | 1274 | &prev_rp_info->rp.rpf_addr); |
d62a17ae | 1275 | } |
00d07c6f | 1276 | } |
cba44481 | 1277 | |
c9cd7fbc | 1278 | void pim_resolve_rp_nh(struct pim_instance *pim, struct pim_neighbor *nbr) |
cba44481 | 1279 | { |
d62a17ae | 1280 | struct listnode *node = NULL; |
1281 | struct rp_info *rp_info = NULL; | |
1282 | struct nexthop *nh_node = NULL; | |
b63192cf | 1283 | pim_addr nht_p; |
d62a17ae | 1284 | struct pim_nexthop_cache pnc; |
d62a17ae | 1285 | |
d9c9a9ee | 1286 | for (ALL_LIST_ELEMENTS_RO(pim->rp_list, node, rp_info)) { |
cc144e8b | 1287 | if (pim_rpf_addr_is_inaddr_any(&rp_info->rp)) |
d62a17ae | 1288 | continue; |
1289 | ||
5d1d18a1 | 1290 | nht_p = rp_info->rp.rpf_addr; |
d62a17ae | 1291 | memset(&pnc, 0, sizeof(struct pim_nexthop_cache)); |
e6e53006 | 1292 | if (!pim_find_or_track_nexthop(pim, nht_p, NULL, rp_info, &pnc)) |
cb9c7c50 DS |
1293 | continue; |
1294 | ||
1295 | for (nh_node = pnc.nexthop; nh_node; nh_node = nh_node->next) { | |
5d1d18a1 DL |
1296 | #if PIM_IPV == 4 |
1297 | if (!pim_addr_is_any(nh_node->gate.ipv4)) | |
1298 | continue; | |
1299 | #else | |
1300 | if (!pim_addr_is_any(nh_node->gate.ipv6)) | |
cb9c7c50 | 1301 | continue; |
5d1d18a1 | 1302 | #endif |
cb9c7c50 DS |
1303 | |
1304 | struct interface *ifp1 = if_lookup_by_index( | |
d3cc1e45 | 1305 | nh_node->ifindex, pim->vrf->vrf_id); |
c9cd7fbc DS |
1306 | |
1307 | if (nbr->interface != ifp1) | |
cb9c7c50 DS |
1308 | continue; |
1309 | ||
ae449dc5 | 1310 | #if PIM_IPV == 4 |
cb9c7c50 | 1311 | nh_node->gate.ipv4 = nbr->source_addr; |
9bb93fa0 DL |
1312 | #else |
1313 | nh_node->gate.ipv6 = nbr->source_addr; | |
1314 | #endif | |
5d1d18a1 | 1315 | if (PIM_DEBUG_PIM_NHT_RP) |
cb9c7c50 | 1316 | zlog_debug( |
b63192cf | 1317 | "%s: addr %pPA new nexthop addr %pPAs interface %s", |
5d1d18a1 | 1318 | __func__, &nht_p, &nbr->source_addr, |
9bb93fa0 | 1319 | ifp1->name); |
d62a17ae | 1320 | } |
1321 | } | |
cba44481 | 1322 | } |