2 * Copyright (c) 2016 Cisco and/or its affiliates.
3 * Licensed under the Apache License, Version 2.0 (the "License");
4 * you may not use this file except in compliance with the License.
5 * You may obtain a copy of the License at:
7 * http://www.apache.org/licenses/LICENSE-2.0
9 * Unless required by applicable law or agreed to in writing, software
10 * distributed under the License is distributed on an "AS IS" BASIS,
11 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12 * See the License for the specific language governing permissions and
13 * limitations under the License.
16 #include <vlib/vlib.h>
18 #include <vnet/mfib/mfib_entry.h>
19 #include <vnet/mfib/mfib_entry_src.h>
20 #include <vnet/mfib/mfib_entry_cover.h>
21 #include <vnet/fib/fib_path_list.h>
22 #include <vnet/fib/fib_walk.h>
24 #include <vnet/dpo/drop_dpo.h>
25 #include <vnet/dpo/replicate_dpo.h>
30 vlib_log_class_t mfib_entry_logger;
33 * Pool of path extensions
35 static mfib_path_ext_t *mfib_path_ext_pool;
38 * String names for each source
40 static const char *mfib_source_names[] = MFIB_SOURCE_NAMES;
43 * Pool for all fib_entries
45 mfib_entry_t *mfib_entry_pool;
48 mfib_entry_get_node (fib_node_index_t index)
50 return ((fib_node_t*)mfib_entry_get(index));
54 mfib_entry_get_proto (const mfib_entry_t * mfib_entry)
56 return (mfib_entry->mfe_prefix.fp_proto);
59 fib_forward_chain_type_t
60 mfib_entry_get_default_chain_type (const mfib_entry_t *mfib_entry)
62 switch (mfib_entry->mfe_prefix.fp_proto)
64 case FIB_PROTOCOL_IP4:
65 return (FIB_FORW_CHAIN_TYPE_MCAST_IP4);
66 case FIB_PROTOCOL_IP6:
67 return (FIB_FORW_CHAIN_TYPE_MCAST_IP6);
68 case FIB_PROTOCOL_MPLS:
72 return (FIB_FORW_CHAIN_TYPE_MCAST_IP4);
76 format_mfib_entry_dpo (u8 * s, va_list * args)
78 index_t fei = va_arg(*args, index_t);
79 CLIB_UNUSED(u32 indent) = va_arg(*args, u32);
81 return (format(s, "%U",
82 format_mfib_entry, fei,
83 MFIB_ENTRY_FORMAT_BRIEF));
86 static inline mfib_path_ext_t *
87 mfib_entry_path_ext_get (index_t mi)
89 return (pool_elt_at_index(mfib_path_ext_pool, mi));
93 format_mfib_entry_path_ext (u8 * s, va_list * args)
95 mfib_path_ext_t *path_ext;
96 index_t mpi = va_arg(*args, index_t);
98 path_ext = mfib_entry_path_ext_get(mpi);
99 return (format(s, "path:%d flags:%U",
101 format_mfib_itf_flags, path_ext->mfpe_flags));
105 format_mfib_entry (u8 * s, va_list * args)
107 fib_node_index_t fei, mfi;
108 mfib_entry_t *mfib_entry;
109 mfib_entry_src_t *msrc;
113 fei = va_arg (*args, fib_node_index_t);
114 level = va_arg (*args, int);
115 mfib_entry = mfib_entry_get(fei);
117 s = format (s, "%U", format_mfib_prefix, &mfib_entry->mfe_prefix);
118 s = format (s, ": %U", format_mfib_entry_flags, mfib_entry->mfe_flags);
120 if (level >= MFIB_ENTRY_FORMAT_DETAIL)
122 fib_node_index_t path_index, mpi;
124 s = format (s, "\n");
125 s = format (s, " fib:%d", mfib_entry->mfe_fib_index);
126 s = format (s, " index:%d", mfib_entry_get_index(mfib_entry));
127 s = format (s, " locks:%d\n", mfib_entry->mfe_node.fn_locks);
128 vec_foreach(msrc, mfib_entry->mfe_srcs)
130 s = format (s, " src:%s locks:%d:",
131 mfib_source_names[msrc->mfes_src],
132 msrc->mfes_ref_count);
133 if (msrc->mfes_cover != FIB_NODE_INDEX_INVALID)
135 s = format (s, " cover:%d", msrc->mfes_cover);
137 s = format (s, " %U\n", format_mfib_entry_flags, msrc->mfes_flags);
138 if (FIB_NODE_INDEX_INVALID != msrc->mfes_pl)
140 s = fib_path_list_format(msrc->mfes_pl, s);
142 s = format (s, " Extensions:\n");
143 hash_foreach(path_index, mpi, msrc->mfes_exts,
145 s = format(s, " %U\n", format_mfib_entry_path_ext, mpi);
147 s = format (s, " Interface-Forwarding:\n");
148 hash_foreach(sw_if_index, mfi, msrc->mfes_itfs,
150 s = format(s, " %U\n", format_mfib_itf, mfi);
155 s = format(s, "\n Interfaces:");
156 hash_foreach(sw_if_index, mfi, mfib_entry->mfe_itfs,
158 s = format(s, "\n %U", format_mfib_itf, mfi);
160 if (MFIB_RPF_ID_NONE != mfib_entry->mfe_rpf_id)
162 s = format(s, "\n RPF-ID:%d", mfib_entry->mfe_rpf_id);
164 s = format(s, "\n %U-chain\n %U",
165 format_fib_forw_chain_type,
166 mfib_entry_get_default_chain_type(mfib_entry),
168 &mfib_entry->mfe_rep,
172 if (level >= MFIB_ENTRY_FORMAT_DETAIL2)
174 s = format(s, "\nchildren:");
175 s = fib_node_children_format(mfib_entry->mfe_node.fn_children, s);
182 mfib_entry_from_fib_node (fib_node_t *node)
184 ASSERT(FIB_NODE_TYPE_MFIB_ENTRY == node->fn_type);
185 return ((mfib_entry_t*)node);
189 mfib_entry_src_cmp_for_sort (void * v1,
192 mfib_entry_src_t *esrc1 = v1, *esrc2 = v2;
194 return (esrc1->mfes_src - esrc2->mfes_src);
198 mfib_entry_src_init (mfib_entry_t *mfib_entry,
199 mfib_source_t source)
202 mfib_entry_src_t esrc = {
203 .mfes_pl = FIB_NODE_INDEX_INVALID,
204 .mfes_flags = MFIB_ENTRY_FLAG_NONE,
206 .mfes_cover = FIB_NODE_INDEX_INVALID,
207 .mfes_sibling = FIB_NODE_INDEX_INVALID,
211 vec_add1(mfib_entry->mfe_srcs, esrc);
212 vec_sort_with_function(mfib_entry->mfe_srcs,
213 mfib_entry_src_cmp_for_sort);
216 static mfib_entry_src_t *
217 mfib_entry_src_find (const mfib_entry_t *mfib_entry,
218 mfib_source_t source,
222 mfib_entry_src_t *esrc;
226 vec_foreach(esrc, mfib_entry->mfe_srcs)
228 if (esrc->mfes_src == source)
245 static mfib_entry_src_t *
246 mfib_entry_src_find_or_create (mfib_entry_t *mfib_entry,
247 mfib_source_t source)
249 mfib_entry_src_t *msrc;
251 msrc = mfib_entry_src_find(mfib_entry, source, NULL);
255 mfib_entry_src_init(mfib_entry, source);
256 msrc = mfib_entry_src_find(mfib_entry, source, NULL);
262 static mfib_entry_src_t *
263 mfib_entry_src_update (mfib_entry_t *mfib_entry,
264 mfib_source_t source,
266 mfib_entry_flags_t entry_flags)
268 mfib_entry_src_t *msrc;
270 msrc = mfib_entry_src_find_or_create(mfib_entry, source);
272 msrc->mfes_flags = entry_flags;
273 msrc->mfes_rpf_id = rpf_id;
278 static mfib_entry_src_t *
279 mfib_entry_src_update_and_lock (mfib_entry_t *mfib_entry,
280 mfib_source_t source,
282 mfib_entry_flags_t entry_flags)
284 mfib_entry_src_t *msrc;
286 msrc = mfib_entry_src_update(mfib_entry, source, rpf_id, entry_flags);
288 msrc->mfes_ref_count++;
294 mfib_entry_get_best_src (const mfib_entry_t *mfib_entry)
296 mfib_entry_src_t *bsrc;
299 * the enum of sources is deliberately arranged in priority order
301 if (0 == vec_len(mfib_entry->mfe_srcs))
307 bsrc = vec_elt_at_index(mfib_entry->mfe_srcs, 0);
314 mfib_entry_get_best_source (const mfib_entry_t *mfib_entry)
316 mfib_entry_src_t *bsrc;
318 bsrc = mfib_entry_get_best_src(mfib_entry);
320 return (bsrc->mfes_src);
324 mfib_entry_is_sourced (fib_node_index_t mfib_entry_index,
325 mfib_source_t source)
327 mfib_entry_t *mfib_entry;
329 mfib_entry = mfib_entry_get(mfib_entry_index);
331 return (NULL != mfib_entry_src_find(mfib_entry, source, NULL));
335 mfib_entry_is_host (fib_node_index_t mfib_entry_index)
337 return (mfib_prefix_is_host(mfib_entry_get_prefix(mfib_entry_index)));
342 mfib_entry_src_flush (mfib_entry_src_t *msrc)
347 hash_foreach(sw_if_index, mfii, msrc->mfes_itfs,
349 mfib_itf_delete(mfib_itf_get(mfii));
351 hash_free(msrc->mfes_itfs);
352 msrc->mfes_itfs = NULL;
353 fib_path_list_unlock(msrc->mfes_pl);
357 mfib_entry_src_remove (mfib_entry_t *mfib_entry,
358 mfib_source_t source)
361 mfib_entry_src_t *msrc;
364 msrc = mfib_entry_src_find(mfib_entry, source, &index);
368 ASSERT(0 != msrc->mfes_ref_count);
369 msrc->mfes_ref_count--;
371 if (0 == msrc->mfes_ref_count)
373 mfib_entry_src_deactivate(mfib_entry, msrc);
374 mfib_entry_src_flush(msrc);
376 vec_del1(mfib_entry->mfe_srcs, index);
377 if (vec_len (mfib_entry->mfe_srcs) > 1)
378 vec_sort_with_function(mfib_entry->mfe_srcs,
379 mfib_entry_src_cmp_for_sort);
385 mfib_entry_child_add (fib_node_index_t mfib_entry_index,
386 fib_node_type_t child_type,
387 fib_node_index_t child_index)
389 return (fib_node_child_add(FIB_NODE_TYPE_MFIB_ENTRY,
396 mfib_entry_child_remove (fib_node_index_t mfib_entry_index,
399 fib_node_child_remove(FIB_NODE_TYPE_MFIB_ENTRY,
404 static mfib_entry_t *
405 mfib_entry_alloc (u32 fib_index,
406 const mfib_prefix_t *prefix,
407 fib_node_index_t *mfib_entry_index)
409 mfib_entry_t *mfib_entry;
411 pool_get_aligned(mfib_entry_pool, mfib_entry, CLIB_CACHE_LINE_BYTES);
413 fib_node_init(&mfib_entry->mfe_node,
414 FIB_NODE_TYPE_MFIB_ENTRY);
417 * Some of the members require non-default initialisation
418 * so we also init those that don't and thus save on the call to clib_memset.
420 mfib_entry->mfe_flags = 0;
421 mfib_entry->mfe_fib_index = fib_index;
422 mfib_entry->mfe_prefix = *prefix;
423 mfib_entry->mfe_srcs = NULL;
424 mfib_entry->mfe_itfs = NULL;
425 mfib_entry->mfe_rpf_id = MFIB_RPF_ID_NONE;
426 mfib_entry->mfe_pl = FIB_NODE_INDEX_INVALID;
428 dpo_reset(&mfib_entry->mfe_rep);
430 *mfib_entry_index = mfib_entry_get_index(mfib_entry);
432 MFIB_ENTRY_DBG(mfib_entry, "alloc");
437 static inline mfib_path_ext_t *
438 mfib_entry_path_ext_find (mfib_path_ext_t *exts,
439 fib_node_index_t path_index)
443 p = hash_get(exts, path_index);
447 return (mfib_entry_path_ext_get(p[0]));
453 static mfib_path_ext_t*
454 mfib_path_ext_add (mfib_entry_src_t *msrc,
455 fib_node_index_t path_index,
456 mfib_itf_flags_t mfi_flags)
458 mfib_path_ext_t *path_ext;
460 pool_get(mfib_path_ext_pool, path_ext);
462 path_ext->mfpe_flags = mfi_flags;
463 path_ext->mfpe_path = path_index;
465 hash_set(msrc->mfes_exts, path_index,
466 path_ext - mfib_path_ext_pool);
472 mfib_path_ext_remove (mfib_entry_src_t *msrc,
473 fib_node_index_t path_index)
475 mfib_path_ext_t *path_ext;
477 path_ext = mfib_entry_path_ext_find(msrc->mfes_exts, path_index);
479 hash_unset(msrc->mfes_exts, path_index);
480 pool_put(mfib_path_ext_pool, path_ext);
483 typedef struct mfib_entry_collect_forwarding_ctx_t_
485 load_balance_path_t * next_hops;
486 fib_forward_chain_type_t fct;
487 mfib_entry_src_t *msrc;
488 } mfib_entry_collect_forwarding_ctx_t;
490 static fib_path_list_walk_rc_t
491 mfib_entry_src_collect_forwarding (fib_node_index_t pl_index,
492 fib_node_index_t path_index,
495 mfib_entry_collect_forwarding_ctx_t *ctx;
496 load_balance_path_t *nh;
501 * if the path is not resolved, don't include it.
503 if (!fib_path_is_resolved(path_index))
505 return (FIB_PATH_LIST_WALK_CONTINUE);
509 * If the path is not forwarding to use it
511 mfib_path_ext_t *path_ext;
513 path_ext = mfib_entry_path_ext_find(ctx->msrc->mfes_exts,
516 if (NULL != path_ext &&
517 !(path_ext->mfpe_flags & MFIB_ITF_FLAG_FORWARD))
519 return (FIB_PATH_LIST_WALK_CONTINUE);
524 case FIB_FORW_CHAIN_TYPE_MCAST_IP4:
525 case FIB_FORW_CHAIN_TYPE_MCAST_IP6:
527 * EOS traffic with no label to stack, we need the IP Adj
529 vec_add2(ctx->next_hops, nh, 1);
531 nh->path_index = path_index;
532 nh->path_weight = fib_path_get_weight(path_index);
533 fib_path_contribute_forwarding(path_index, ctx->fct, &nh->path_dpo);
536 case FIB_FORW_CHAIN_TYPE_UNICAST_IP4:
537 case FIB_FORW_CHAIN_TYPE_UNICAST_IP6:
538 case FIB_FORW_CHAIN_TYPE_MPLS_NON_EOS:
539 case FIB_FORW_CHAIN_TYPE_MPLS_EOS:
540 case FIB_FORW_CHAIN_TYPE_ETHERNET:
541 case FIB_FORW_CHAIN_TYPE_NSH:
542 case FIB_FORW_CHAIN_TYPE_BIER:
547 return (FIB_PATH_LIST_WALK_CONTINUE);
551 mfib_entry_stack (mfib_entry_t *mfib_entry,
552 mfib_entry_src_t *msrc)
556 dp = fib_proto_to_dpo(mfib_entry_get_proto(mfib_entry));
559 * unlink the enty from the previous path list.
561 if (FIB_NODE_INDEX_INVALID != mfib_entry->mfe_pl)
563 fib_path_list_child_remove(mfib_entry->mfe_pl,
564 mfib_entry->mfe_sibling);
569 mfib_entry_collect_forwarding_ctx_t ctx = {
571 .fct = mfib_entry_get_default_chain_type(mfib_entry),
576 * link the entry to the path-list.
577 * The entry needs to be a child so that we receive the back-walk
578 * updates to recalculate forwarding.
580 mfib_entry->mfe_pl = msrc->mfes_pl;
581 mfib_entry->mfe_flags = msrc->mfes_flags;
582 mfib_entry->mfe_itfs = msrc->mfes_itfs;
583 mfib_entry->mfe_rpf_id = msrc->mfes_rpf_id;
585 if (FIB_NODE_INDEX_INVALID != mfib_entry->mfe_pl)
587 mfib_entry->mfe_sibling =
588 fib_path_list_child_add(mfib_entry->mfe_pl,
589 FIB_NODE_TYPE_MFIB_ENTRY,
590 mfib_entry_get_index(mfib_entry));
592 fib_path_list_walk(mfib_entry->mfe_pl,
593 mfib_entry_src_collect_forwarding,
596 if (!(MFIB_ENTRY_FLAG_EXCLUSIVE & mfib_entry->mfe_flags))
598 if (NULL == ctx.next_hops)
601 * no next-hops, stack directly on the drop
603 dpo_stack(DPO_MFIB_ENTRY, dp,
604 &mfib_entry->mfe_rep,
610 * each path contirbutes a next-hop. form a replicate
611 * from those choices.
613 if (!dpo_id_is_valid(&mfib_entry->mfe_rep) ||
614 dpo_is_drop(&mfib_entry->mfe_rep))
616 dpo_id_t tmp_dpo = DPO_INVALID;
620 replicate_create(0, dp));
622 dpo_stack(DPO_MFIB_ENTRY, dp,
623 &mfib_entry->mfe_rep,
628 replicate_multipath_update(&mfib_entry->mfe_rep,
635 * for exclusive routes the source provided a replicate DPO
636 * which we stashed in the special path list with one path,
637 * so we can stack directly on that.
639 ASSERT(1 == vec_len(ctx.next_hops));
641 if (NULL != ctx.next_hops)
643 dpo_stack(DPO_MFIB_ENTRY, dp,
644 &mfib_entry->mfe_rep,
645 &ctx.next_hops[0].path_dpo);
646 dpo_reset(&ctx.next_hops[0].path_dpo);
647 vec_free(ctx.next_hops);
651 dpo_stack(DPO_MFIB_ENTRY, dp,
652 &mfib_entry->mfe_rep,
659 dpo_stack(DPO_MFIB_ENTRY, dp,
660 &mfib_entry->mfe_rep,
665 * time for walkies fido.
667 fib_node_back_walk_ctx_t bw_ctx = {
668 .fnbw_reason = FIB_NODE_BW_REASON_FLAG_EVALUATE,
671 fib_walk_sync(FIB_NODE_TYPE_MFIB_ENTRY,
672 mfib_entry_get_index(mfib_entry),
676 static fib_node_index_t*
677 mfib_entry_src_paths_add (mfib_entry_src_t *msrc,
678 const fib_route_path_t *rpaths)
680 ASSERT(!(MFIB_ENTRY_FLAG_EXCLUSIVE & msrc->mfes_flags));
682 if (FIB_NODE_INDEX_INVALID == msrc->mfes_pl)
684 /* A non-shared path-list */
685 msrc->mfes_pl = fib_path_list_create(FIB_PATH_LIST_FLAG_NO_URPF,
687 fib_path_list_lock(msrc->mfes_pl);
690 return (fib_path_list_paths_add(msrc->mfes_pl, rpaths));
693 static fib_node_index_t*
694 mfib_entry_src_paths_remove (mfib_entry_src_t *msrc,
695 const fib_route_path_t *rpaths)
697 ASSERT(!(MFIB_ENTRY_FLAG_EXCLUSIVE & msrc->mfes_flags));
699 return (fib_path_list_paths_remove(msrc->mfes_pl, rpaths));
703 mfib_entry_recalculate_forwarding (mfib_entry_t *mfib_entry,
704 mfib_source_t old_best)
706 mfib_entry_src_t *bsrc, *osrc;
709 * copy the forwarding data from the bast source
711 bsrc = mfib_entry_get_best_src(mfib_entry);
712 osrc = mfib_entry_src_find(mfib_entry, old_best, NULL);
716 if (bsrc->mfes_src != old_best)
719 * we are changing from one source to another
720 * deactivate the old, and activate the new
722 mfib_entry_src_deactivate(mfib_entry, osrc);
723 mfib_entry_src_activate(mfib_entry, bsrc);
728 mfib_entry_src_deactivate(mfib_entry, osrc);
731 mfib_entry_stack(mfib_entry, bsrc);
732 mfib_entry_cover_update_notify(mfib_entry);
737 mfib_entry_create (u32 fib_index,
738 mfib_source_t source,
739 const mfib_prefix_t *prefix,
741 mfib_entry_flags_t entry_flags,
744 fib_node_index_t mfib_entry_index;
745 mfib_entry_t *mfib_entry;
746 mfib_entry_src_t *msrc;
748 mfib_entry = mfib_entry_alloc(fib_index, prefix,
750 msrc = mfib_entry_src_update(mfib_entry, source,
751 rpf_id, entry_flags);
753 if (INDEX_INVALID != repi)
756 * The source is providing its own replicate DPO.
757 * Create a sepcial path-list to manage it, that way
758 * this entry and the source are equivalent to a normal
761 fib_node_index_t old_pl_index;
763 dpo_id_t dpo = DPO_INVALID;
765 dp = fib_proto_to_dpo(mfib_entry_get_proto(mfib_entry));
766 old_pl_index = msrc->mfes_pl;
768 dpo_set(&dpo, DPO_REPLICATE, dp, repi);
771 fib_path_list_create_special(dp,
772 FIB_PATH_LIST_FLAG_EXCLUSIVE,
776 fib_path_list_lock(msrc->mfes_pl);
777 fib_path_list_unlock(old_pl_index);
780 mfib_entry_recalculate_forwarding(mfib_entry, MFIB_SOURCE_NONE);
782 return (mfib_entry_index);
786 mfib_entry_ok_for_delete (mfib_entry_t *mfib_entry)
788 return (0 == vec_len(mfib_entry->mfe_srcs));
792 mfib_entry_src_ok_for_delete (const mfib_entry_src_t *msrc)
794 return ((INDEX_INVALID == msrc->mfes_cover &&
795 MFIB_ENTRY_FLAG_NONE == msrc->mfes_flags &&
796 0 == fib_path_list_get_n_paths(msrc->mfes_pl)) &&
797 (0 == hash_elts(msrc->mfes_itfs)));
799 /* return ((MFIB_ENTRY_FLAG_NONE == msrc->mfes_flags) && */
800 /* (0 == fib_path_list_get_n_paths(msrc->mfes_pl)) && */
801 /* (0 == hash_elts(msrc->mfes_itfs))); */
806 mfib_entry_update_i (mfib_entry_t *mfib_entry,
807 mfib_entry_src_t *msrc,
808 mfib_source_t current_best,
811 if (INDEX_INVALID != repi)
814 * The source is providing its own replicate DPO.
815 * Create a sepcial path-list to manage it, that way
816 * this entry and the source are equivalent to a normal
819 fib_node_index_t old_pl_index;
821 dpo_id_t dpo = DPO_INVALID;
823 dp = fib_proto_to_dpo(mfib_entry_get_proto(mfib_entry));
824 old_pl_index = msrc->mfes_pl;
826 dpo_set(&dpo, DPO_REPLICATE, dp, repi);
829 fib_path_list_create_special(dp,
830 FIB_PATH_LIST_FLAG_EXCLUSIVE,
834 fib_path_list_lock(msrc->mfes_pl);
835 fib_path_list_unlock(old_pl_index);
838 if (mfib_entry_src_ok_for_delete(msrc))
841 * this source has no interfaces and no flags.
842 * it has nothing left to give - remove it
844 mfib_entry_src_remove(mfib_entry, msrc->mfes_src);
847 mfib_entry_recalculate_forwarding(mfib_entry, current_best);
851 mfib_entry_special_add (fib_node_index_t mfib_entry_index,
852 mfib_source_t source,
853 mfib_entry_flags_t entry_flags,
857 mfib_source_t current_best;
858 mfib_entry_t *mfib_entry;
859 mfib_entry_src_t *msrc;
861 mfib_entry = mfib_entry_get(mfib_entry_index);
862 current_best = mfib_entry_get_best_source(mfib_entry);
864 msrc = mfib_entry_src_update_and_lock(mfib_entry, source, rpf_id,
867 mfib_entry_update_i(mfib_entry, msrc, current_best, repi);
869 return (mfib_entry_ok_for_delete(mfib_entry));
873 mfib_entry_update (fib_node_index_t mfib_entry_index,
874 mfib_source_t source,
875 mfib_entry_flags_t entry_flags,
879 mfib_source_t current_best;
880 mfib_entry_t *mfib_entry;
881 mfib_entry_src_t *msrc;
883 mfib_entry = mfib_entry_get(mfib_entry_index);
884 current_best = mfib_entry_get_best_source(mfib_entry);
885 msrc = mfib_entry_src_update(mfib_entry, source, rpf_id, entry_flags);
887 mfib_entry_update_i(mfib_entry, msrc, current_best, repi);
889 return (mfib_entry_ok_for_delete(mfib_entry));
893 mfib_entry_itf_add (mfib_entry_src_t *msrc,
897 hash_set(msrc->mfes_itfs, sw_if_index, mi);
901 mfib_entry_itf_remove (mfib_entry_src_t *msrc,
906 mfi = mfib_entry_itf_find(msrc->mfes_itfs, sw_if_index);
908 mfib_itf_delete(mfi);
910 hash_unset(msrc->mfes_itfs, sw_if_index);
914 mfib_entry_path_itf_based (const fib_route_path_t *rpath)
916 return (!(rpath->frp_flags & FIB_ROUTE_PATH_BIER_IMP) &&
917 ~0 != rpath->frp_sw_if_index);
921 mfib_entry_path_update (fib_node_index_t mfib_entry_index,
922 mfib_source_t source,
923 const fib_route_path_t *rpaths)
925 fib_node_index_t* path_indices, path_index;
926 const fib_route_path_t *rpath;
927 mfib_source_t current_best;
928 mfib_path_ext_t *path_ext;
929 mfib_entry_t *mfib_entry;
930 mfib_entry_src_t *msrc;
931 mfib_itf_flags_t old;
934 mfib_entry = mfib_entry_get(mfib_entry_index);
935 ASSERT(NULL != mfib_entry);
936 current_best = mfib_entry_get_best_source(mfib_entry);
937 msrc = mfib_entry_src_find_or_create(mfib_entry, source);
940 * add the path to the path-list. If it's a duplicate we'll get
941 * back the original path.
943 path_indices = mfib_entry_src_paths_add(msrc, rpaths);
945 vec_foreach_index(ii, path_indices)
947 path_index = path_indices[ii];
950 if (FIB_NODE_INDEX_INVALID == path_index)
954 * find the path extension for that path
956 path_ext = mfib_entry_path_ext_find(msrc->mfes_exts, path_index);
958 if (NULL == path_ext)
960 old = MFIB_ITF_FLAG_NONE;
961 path_ext = mfib_path_ext_add(msrc, path_index,
962 rpath->frp_mitf_flags);
966 old = path_ext->mfpe_flags;
967 path_ext->mfpe_flags = rpath->frp_mitf_flags;
971 * Has the path changed its contribution to the input interface set.
972 * Which only paths with interfaces can do...
974 if (mfib_entry_path_itf_based(rpath))
976 mfib_itf_t *mfib_itf;
978 if (old != rpath->frp_mitf_flags)
981 * change of flag contributions
983 mfib_itf = mfib_entry_itf_find(msrc->mfes_itfs,
984 rpath->frp_sw_if_index);
986 if (NULL == mfib_itf)
988 mfib_entry_itf_add(msrc,
989 rpath->frp_sw_if_index,
990 mfib_itf_create(path_index,
991 rpath->frp_mitf_flags));
995 if (mfib_itf_update(mfib_itf,
997 rpath->frp_mitf_flags))
1000 * no more interface flags on this path, remove
1001 * from the data-plane set
1003 mfib_entry_itf_remove(msrc, rpath->frp_sw_if_index);
1009 vec_free(path_indices);
1011 mfib_entry_recalculate_forwarding(mfib_entry, current_best);
1015 * mfib_entry_path_remove
1017 * remove a path from the entry.
1018 * return the mfib_entry's index if it is still present, INVALID otherwise.
1021 mfib_entry_path_remove (fib_node_index_t mfib_entry_index,
1022 mfib_source_t source,
1023 const fib_route_path_t *rpaths)
1025 fib_node_index_t path_index, *path_indices;
1026 const fib_route_path_t *rpath;
1027 mfib_source_t current_best;
1028 mfib_entry_t *mfib_entry;
1029 mfib_entry_src_t *msrc;
1032 mfib_entry = mfib_entry_get(mfib_entry_index);
1033 ASSERT(NULL != mfib_entry);
1034 current_best = mfib_entry_get_best_source(mfib_entry);
1035 msrc = mfib_entry_src_find(mfib_entry, source, NULL);
1040 * there are no paths left for this source
1042 return (mfib_entry_ok_for_delete(mfib_entry));
1046 * remove the paths from the path-list. If it's not there we'll get
1047 * back an empty vector
1049 path_indices = mfib_entry_src_paths_remove(msrc, rpaths);
1051 vec_foreach_index(ii, path_indices)
1053 path_index = path_indices[ii];
1054 rpath = &rpaths[ii];
1056 if (FIB_NODE_INDEX_INVALID == path_index)
1060 * don't need the extension, nor the interface anymore
1062 mfib_path_ext_remove(msrc, path_index);
1063 if (mfib_entry_path_itf_based(rpath))
1065 mfib_itf_t *mfib_itf;
1067 mfib_itf = mfib_entry_itf_find(msrc->mfes_itfs,
1068 rpath->frp_sw_if_index);
1070 if (mfib_itf_update(mfib_itf,
1072 MFIB_ITF_FLAG_NONE))
1075 * no more interface flags on this path, remove
1076 * from the data-plane set
1078 mfib_entry_itf_remove(msrc, rpath->frp_sw_if_index);
1082 if (mfib_entry_src_ok_for_delete(msrc))
1085 * this source has no interfaces and no flags.
1086 * it has nothing left to give - remove it
1088 mfib_entry_src_remove(mfib_entry, source);
1091 vec_free(path_indices);
1093 mfib_entry_recalculate_forwarding(mfib_entry, current_best);
1095 return (mfib_entry_ok_for_delete(mfib_entry));
1101 * The source is withdrawing all the paths it provided
1104 mfib_entry_delete (fib_node_index_t mfib_entry_index,
1105 mfib_source_t source)
1107 mfib_source_t current_best;
1108 mfib_entry_t *mfib_entry;
1110 mfib_entry = mfib_entry_get(mfib_entry_index);
1111 current_best = mfib_entry_get_best_source(mfib_entry);
1112 mfib_entry_src_remove(mfib_entry, source);
1114 mfib_entry_recalculate_forwarding(mfib_entry, current_best);
1116 return (mfib_entry_ok_for_delete(mfib_entry));
1120 fib_ip4_address_compare (ip4_address_t * a1,
1124 * IP addresses are unsiged ints. the return value here needs to be signed
1125 * a simple subtraction won't cut it.
1126 * If the addresses are the same, the sort order is undefiend, so phoey.
1128 return ((clib_net_to_host_u32(a1->data_u32) >
1129 clib_net_to_host_u32(a2->data_u32) ) ?
1134 fib_ip6_address_compare (ip6_address_t * a1,
1138 for (i = 0; i < ARRAY_LEN (a1->as_u16); i++)
1140 int cmp = (clib_net_to_host_u16 (a1->as_u16[i]) -
1141 clib_net_to_host_u16 (a2->as_u16[i]));
1149 mfib_entry_cmp (fib_node_index_t mfib_entry_index1,
1150 fib_node_index_t mfib_entry_index2)
1152 mfib_entry_t *mfib_entry1, *mfib_entry2;
1155 mfib_entry1 = mfib_entry_get(mfib_entry_index1);
1156 mfib_entry2 = mfib_entry_get(mfib_entry_index2);
1158 switch (mfib_entry1->mfe_prefix.fp_proto)
1160 case FIB_PROTOCOL_IP4:
1161 cmp = fib_ip4_address_compare(&mfib_entry1->mfe_prefix.fp_grp_addr.ip4,
1162 &mfib_entry2->mfe_prefix.fp_grp_addr.ip4);
1166 cmp = fib_ip4_address_compare(&mfib_entry1->mfe_prefix.fp_src_addr.ip4,
1167 &mfib_entry2->mfe_prefix.fp_src_addr.ip4);
1170 case FIB_PROTOCOL_IP6:
1171 cmp = fib_ip6_address_compare(&mfib_entry1->mfe_prefix.fp_grp_addr.ip6,
1172 &mfib_entry2->mfe_prefix.fp_grp_addr.ip6);
1176 cmp = fib_ip6_address_compare(&mfib_entry1->mfe_prefix.fp_src_addr.ip6,
1177 &mfib_entry2->mfe_prefix.fp_src_addr.ip6);
1180 case FIB_PROTOCOL_MPLS:
1187 cmp = (mfib_entry1->mfe_prefix.fp_len - mfib_entry2->mfe_prefix.fp_len);
1193 mfib_entry_cmp_for_sort (void *i1, void *i2)
1195 fib_node_index_t *mfib_entry_index1 = i1, *mfib_entry_index2 = i2;
1197 return (mfib_entry_cmp(*mfib_entry_index1,
1198 *mfib_entry_index2));
1202 mfib_entry_last_lock_gone (fib_node_t *node)
1204 mfib_entry_t *mfib_entry;
1205 mfib_entry_src_t *msrc;
1207 mfib_entry = mfib_entry_from_fib_node(node);
1209 dpo_reset(&mfib_entry->mfe_rep);
1211 MFIB_ENTRY_DBG(mfib_entry, "last-lock");
1213 vec_foreach(msrc, mfib_entry->mfe_srcs)
1215 mfib_entry_src_flush(msrc);
1218 vec_free(mfib_entry->mfe_srcs);
1220 fib_node_deinit(&mfib_entry->mfe_node);
1221 pool_put(mfib_entry_pool, mfib_entry);
1225 mfib_entry_get_stats_index (fib_node_index_t fib_entry_index)
1227 mfib_entry_t *mfib_entry;
1229 mfib_entry = mfib_entry_get(fib_entry_index);
1231 return (mfib_entry->mfe_rep.dpoi_index);
1235 * mfib_entry_back_walk_notify
1237 * A back walk has reach this entry.
1239 static fib_node_back_walk_rc_t
1240 mfib_entry_back_walk_notify (fib_node_t *node,
1241 fib_node_back_walk_ctx_t *ctx)
1243 mfib_entry_t *mfib_entry;
1245 mfib_entry = mfib_entry_from_fib_node(node);
1246 mfib_entry_recalculate_forwarding(mfib_entry,
1247 mfib_entry_get_best_source(mfib_entry));
1249 return (FIB_NODE_BACK_WALK_CONTINUE);
1253 mfib_entry_show_memory (void)
1255 fib_show_memory_usage("multicast-Entry",
1256 pool_elts(mfib_entry_pool),
1257 pool_len(mfib_entry_pool),
1258 sizeof(mfib_entry_t));
1262 * The MFIB entry's graph node virtual function table
1264 static const fib_node_vft_t mfib_entry_vft = {
1265 .fnv_get = mfib_entry_get_node,
1266 .fnv_last_lock = mfib_entry_last_lock_gone,
1267 .fnv_back_walk = mfib_entry_back_walk_notify,
1268 .fnv_mem_show = mfib_entry_show_memory,
1272 mfib_entry_lock (fib_node_index_t mfib_entry_index)
1274 mfib_entry_t *mfib_entry;
1276 mfib_entry = mfib_entry_get(mfib_entry_index);
1278 fib_node_lock(&mfib_entry->mfe_node);
1282 mfib_entry_unlock (fib_node_index_t mfib_entry_index)
1284 mfib_entry_t *mfib_entry;
1286 mfib_entry = mfib_entry_get(mfib_entry_index);
1288 fib_node_unlock(&mfib_entry->mfe_node);
1292 mfib_entry_dpo_lock (dpo_id_t *dpo)
1296 mfib_entry_dpo_unlock (dpo_id_t *dpo)
1300 const static dpo_vft_t mfib_entry_dpo_vft = {
1301 .dv_lock = mfib_entry_dpo_lock,
1302 .dv_unlock = mfib_entry_dpo_unlock,
1303 .dv_format = format_mfib_entry_dpo,
1304 .dv_mem_show = mfib_entry_show_memory,
1307 const static char* const mfib_entry_ip4_nodes[] =
1309 "ip4-mfib-forward-rpf",
1312 const static char* const mfib_entry_ip6_nodes[] =
1314 "ip6-mfib-forward-rpf",
1318 const static char* const * const mfib_entry_nodes[DPO_PROTO_NUM] =
1320 [DPO_PROTO_IP4] = mfib_entry_ip4_nodes,
1321 [DPO_PROTO_IP6] = mfib_entry_ip6_nodes,
1325 mfib_entry_module_init (void)
1327 fib_node_register_type (FIB_NODE_TYPE_MFIB_ENTRY, &mfib_entry_vft);
1328 dpo_register(DPO_MFIB_ENTRY, &mfib_entry_dpo_vft, mfib_entry_nodes);
1329 mfib_entry_logger = vlib_log_register_class("mfib", "entry");
1333 mfib_entry_encode (fib_node_index_t mfib_entry_index)
1335 fib_path_encode_ctx_t ctx = {
1338 mfib_entry_t *mfib_entry;
1339 fib_route_path_t *rpath;
1340 mfib_entry_src_t *bsrc;
1342 mfib_entry = mfib_entry_get(mfib_entry_index);
1343 bsrc = mfib_entry_get_best_src(mfib_entry);
1345 if (FIB_NODE_INDEX_INVALID != bsrc->mfes_pl)
1347 fib_path_list_walk_w_ext(bsrc->mfes_pl,
1353 vec_foreach(rpath, ctx.rpaths)
1355 mfib_itf_t *mfib_itf;
1357 mfib_itf = mfib_entry_itf_find(bsrc->mfes_itfs,
1358 rpath->frp_sw_if_index);
1361 rpath->frp_mitf_flags = mfib_itf->mfi_flags;
1365 return (ctx.rpaths);
1368 const mfib_prefix_t *
1369 mfib_entry_get_prefix (fib_node_index_t mfib_entry_index)
1371 mfib_entry_t *mfib_entry;
1373 mfib_entry = mfib_entry_get(mfib_entry_index);
1375 return (&mfib_entry->mfe_prefix);
1379 mfib_entry_get_fib_index (fib_node_index_t mfib_entry_index)
1381 mfib_entry_t *mfib_entry;
1383 mfib_entry = mfib_entry_get(mfib_entry_index);
1385 return (mfib_entry->mfe_fib_index);
1389 mfib_entry_contribute_ip_forwarding (fib_node_index_t mfib_entry_index)
1391 mfib_entry_t *mfib_entry;
1393 mfib_entry = mfib_entry_get(mfib_entry_index);
1395 return (&mfib_entry->mfe_rep);
1399 mfib_entry_contribute_forwarding (fib_node_index_t mfib_entry_index,
1400 fib_forward_chain_type_t type,
1401 mfib_entry_fwd_flags_t flags,
1405 * An IP mFIB entry can only provide a forwarding chain that
1406 * is the same IP proto as the prefix.
1407 * No use-cases (i know of) for other combinations.
1409 mfib_entry_t *mfib_entry;
1412 mfib_entry = mfib_entry_get(mfib_entry_index);
1414 dp = fib_proto_to_dpo(mfib_entry->mfe_prefix.fp_proto);
1416 if (type == mfib_forw_chain_type_from_dpo_proto(dp))
1420 rep = replicate_get(mfib_entry->mfe_rep.dpoi_index);
1422 if ((rep->rep_flags & REPLICATE_FLAGS_HAS_LOCAL) &&
1423 (flags & MFIB_ENTRY_FWD_FLAG_NO_LOCAL))
1426 * caller does not want the local paths that the entry has
1428 dpo_set(dpo, DPO_REPLICATE, rep->rep_proto,
1429 replicate_dup(REPLICATE_FLAGS_NONE,
1430 mfib_entry->mfe_rep.dpoi_index));
1434 dpo_copy(dpo, &mfib_entry->mfe_rep);
1439 dpo_copy(dpo, drop_dpo_get(dp));
1444 * fib_entry_cover_changed
1446 * this entry is tracking its cover and that cover has changed.
1449 mfib_entry_cover_changed (fib_node_index_t mfib_entry_index)
1451 mfib_entry_t *mfib_entry;
1452 mfib_entry_src_t *msrc;
1455 mfib_entry = mfib_entry_get(mfib_entry_index);
1456 msrc = mfib_entry_get_best_src(mfib_entry);
1458 res = mfib_entry_src_cover_change(mfib_entry, msrc);
1460 if (MFIB_SRC_REEVALUATE == res)
1462 mfib_entry_recalculate_forwarding(mfib_entry, msrc->mfes_src);
1464 MFIB_ENTRY_DBG(mfib_entry, "cover-changed");
1468 * mfib_entry_cover_updated
1470 * this entry is tracking its cover and that cover has been updated
1471 * (i.e. its forwarding information has changed).
1474 mfib_entry_cover_updated (fib_node_index_t mfib_entry_index)
1476 mfib_entry_t *mfib_entry;
1477 mfib_entry_src_t *msrc;
1480 mfib_entry = mfib_entry_get(mfib_entry_index);
1481 msrc = mfib_entry_get_best_src(mfib_entry);
1483 res = mfib_entry_src_cover_update(mfib_entry, msrc);
1485 if (MFIB_SRC_REEVALUATE == res)
1487 mfib_entry_recalculate_forwarding(mfib_entry, msrc->mfes_src);
1489 MFIB_ENTRY_DBG(mfib_entry, "cover-updated");
1493 mfib_entry_pool_size (void)
1495 return (pool_elts(mfib_entry_pool));
1498 static clib_error_t *
1499 show_mfib_entry_command (vlib_main_t * vm,
1500 unformat_input_t * input,
1501 vlib_cli_command_t * cmd)
1503 fib_node_index_t fei;
1505 if (unformat (input, "%d", &fei))
1508 * show one in detail
1510 if (!pool_is_free_index(mfib_entry_pool, fei))
1512 vlib_cli_output (vm, "%d@%U",
1514 format_mfib_entry, fei,
1515 MFIB_ENTRY_FORMAT_DETAIL2);
1519 vlib_cli_output (vm, "entry %d invalid", fei);
1527 vlib_cli_output (vm, "FIB Entries:");
1528 pool_foreach_index(fei, mfib_entry_pool,
1530 vlib_cli_output (vm, "%d@%U",
1532 format_mfib_entry, fei,
1533 MFIB_ENTRY_FORMAT_BRIEF);
1541 * This commnad displays an entry, or all entries, in the mfib tables indexed by their unique
1542 * numerical indentifier.
1544 VLIB_CLI_COMMAND (show_mfib_entry, static) = {
1545 .path = "show mfib entry",
1546 .function = show_mfib_entry_command,
1547 .short_help = "show mfib entry",