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;
41 static const char *mfib_src_attribute_names[] = MFIB_ENTRY_SRC_ATTRIBUTES;
44 * Pool for all fib_entries
46 mfib_entry_t *mfib_entry_pool;
49 mfib_entry_get_node (fib_node_index_t index)
51 return ((fib_node_t*)mfib_entry_get(index));
55 mfib_entry_get_proto (const mfib_entry_t * mfib_entry)
57 return (mfib_entry->mfe_prefix.fp_proto);
60 fib_forward_chain_type_t
61 mfib_entry_get_default_chain_type (const mfib_entry_t *mfib_entry)
63 switch (mfib_entry->mfe_prefix.fp_proto)
65 case FIB_PROTOCOL_IP4:
66 return (FIB_FORW_CHAIN_TYPE_MCAST_IP4);
67 case FIB_PROTOCOL_IP6:
68 return (FIB_FORW_CHAIN_TYPE_MCAST_IP6);
69 case FIB_PROTOCOL_MPLS:
73 return (FIB_FORW_CHAIN_TYPE_MCAST_IP4);
77 format_mfib_entry_dpo (u8 * s, va_list * args)
79 index_t fei = va_arg(*args, index_t);
80 CLIB_UNUSED(u32 indent) = va_arg(*args, u32);
82 return (format(s, "%U",
83 format_mfib_entry, fei,
84 MFIB_ENTRY_FORMAT_BRIEF));
87 static inline mfib_path_ext_t *
88 mfib_entry_path_ext_get (index_t mi)
90 return (pool_elt_at_index(mfib_path_ext_pool, mi));
94 format_mfib_entry_path_ext (u8 * s, va_list * args)
96 mfib_path_ext_t *path_ext;
97 index_t mpi = va_arg(*args, index_t);
99 path_ext = mfib_entry_path_ext_get(mpi);
100 return (format(s, "path:%d flags:%U",
102 format_mfib_itf_flags, path_ext->mfpe_flags));
106 format_mfib_entry_src_flags (u8 *s, va_list *args)
108 mfib_entry_src_attribute_t sattr;
109 mfib_entry_src_flags_t flag = va_arg(*args, int);
113 return format(s, "none");
116 FOR_EACH_MFIB_SRC_ATTRIBUTE(sattr) {
117 if ((1 << sattr) & flag) {
118 s = format (s, "%s,", mfib_src_attribute_names[sattr]);
126 format_mfib_entry (u8 * s, va_list * args)
128 fib_node_index_t fei, mfi;
129 mfib_entry_t *mfib_entry;
130 mfib_entry_src_t *msrc;
134 fei = va_arg (*args, fib_node_index_t);
135 level = va_arg (*args, int);
136 mfib_entry = mfib_entry_get(fei);
138 s = format (s, "%U", format_mfib_prefix, &mfib_entry->mfe_prefix);
139 s = format (s, ": %U", format_mfib_entry_flags, mfib_entry->mfe_flags);
141 if (level >= MFIB_ENTRY_FORMAT_DETAIL)
143 fib_node_index_t path_index, mpi;
145 s = format (s, "\n");
146 s = format (s, " fib:%d", mfib_entry->mfe_fib_index);
147 s = format (s, " index:%d", mfib_entry_get_index(mfib_entry));
148 s = format (s, " locks:%d\n", mfib_entry->mfe_node.fn_locks);
149 vec_foreach(msrc, mfib_entry->mfe_srcs)
151 s = format (s, " src:%s flags:%U locks:%d:",
152 mfib_source_names[msrc->mfes_src],
153 format_mfib_entry_src_flags, msrc->mfes_flags,
154 msrc->mfes_ref_count);
155 if (msrc->mfes_cover != FIB_NODE_INDEX_INVALID)
157 s = format (s, " cover:%d", msrc->mfes_cover);
159 s = format (s, " %U\n", format_mfib_entry_flags, msrc->mfes_route_flags);
160 if (FIB_NODE_INDEX_INVALID != msrc->mfes_pl)
162 s = fib_path_list_format(msrc->mfes_pl, s);
164 s = format (s, " Extensions:\n");
165 hash_foreach(path_index, mpi, msrc->mfes_exts,
167 s = format(s, " %U\n", format_mfib_entry_path_ext, mpi);
169 s = format (s, " Interface-Forwarding:\n");
170 hash_foreach(sw_if_index, mfi, msrc->mfes_itfs,
172 s = format(s, " %U\n", format_mfib_itf, mfi);
177 s = format(s, "\n Interfaces:");
178 hash_foreach(sw_if_index, mfi, mfib_entry->mfe_itfs,
180 s = format(s, "\n %U", format_mfib_itf, mfi);
182 if (MFIB_RPF_ID_NONE != mfib_entry->mfe_rpf_id)
184 s = format(s, "\n RPF-ID:%d", mfib_entry->mfe_rpf_id);
186 s = format(s, "\n %U-chain\n %U",
187 format_fib_forw_chain_type,
188 mfib_entry_get_default_chain_type(mfib_entry),
190 &mfib_entry->mfe_rep,
194 if (level >= MFIB_ENTRY_FORMAT_DETAIL2)
196 s = format(s, "\nchildren:");
197 s = fib_node_children_format(mfib_entry->mfe_node.fn_children, s);
204 mfib_entry_from_fib_node (fib_node_t *node)
206 ASSERT(FIB_NODE_TYPE_MFIB_ENTRY == node->fn_type);
207 return ((mfib_entry_t*)node);
211 mfib_entry_src_cmp_for_sort (void * v1,
214 mfib_entry_src_t *esrc1 = v1, *esrc2 = v2;
216 return (esrc1->mfes_src - esrc2->mfes_src);
220 mfib_entry_src_init (mfib_entry_t *mfib_entry,
221 mfib_source_t source)
224 mfib_entry_src_t esrc = {
225 .mfes_pl = FIB_NODE_INDEX_INVALID,
226 .mfes_route_flags = MFIB_ENTRY_FLAG_NONE,
228 .mfes_cover = FIB_NODE_INDEX_INVALID,
229 .mfes_sibling = FIB_NODE_INDEX_INVALID,
233 vec_add1(mfib_entry->mfe_srcs, esrc);
234 vec_sort_with_function(mfib_entry->mfe_srcs,
235 mfib_entry_src_cmp_for_sort);
238 static mfib_entry_src_t *
239 mfib_entry_src_find (const mfib_entry_t *mfib_entry,
240 mfib_source_t source,
244 mfib_entry_src_t *esrc;
248 vec_foreach(esrc, mfib_entry->mfe_srcs)
250 if (esrc->mfes_src == source)
267 static mfib_entry_src_t *
268 mfib_entry_src_find_or_create (mfib_entry_t *mfib_entry,
269 mfib_source_t source)
271 mfib_entry_src_t *msrc;
273 msrc = mfib_entry_src_find(mfib_entry, source, NULL);
277 mfib_entry_src_init(mfib_entry, source);
278 msrc = mfib_entry_src_find(mfib_entry, source, NULL);
284 static mfib_entry_src_t *
285 mfib_entry_src_update (mfib_entry_t *mfib_entry,
286 mfib_source_t source,
288 mfib_entry_flags_t entry_flags)
290 mfib_entry_src_t *msrc;
292 msrc = mfib_entry_src_find_or_create(mfib_entry, source);
294 msrc->mfes_route_flags = entry_flags;
295 msrc->mfes_rpf_id = rpf_id;
296 msrc->mfes_flags &= ~MFIB_ENTRY_SRC_FLAG_STALE;
301 static mfib_entry_src_t *
302 mfib_entry_src_update_and_lock (mfib_entry_t *mfib_entry,
303 mfib_source_t source,
305 mfib_entry_flags_t entry_flags)
307 mfib_entry_src_t *msrc;
309 msrc = mfib_entry_src_update(mfib_entry, source, rpf_id, entry_flags);
311 msrc->mfes_ref_count++;
312 msrc->mfes_flags &= ~MFIB_ENTRY_SRC_FLAG_STALE;
318 mfib_entry_get_best_src (const mfib_entry_t *mfib_entry)
320 mfib_entry_src_t *bsrc;
323 * the enum of sources is deliberately arranged in priority order
325 if (0 == vec_len(mfib_entry->mfe_srcs))
331 bsrc = vec_elt_at_index(mfib_entry->mfe_srcs, 0);
338 mfib_entry_get_best_source (const mfib_entry_t *mfib_entry)
340 mfib_entry_src_t *bsrc;
342 bsrc = mfib_entry_get_best_src(mfib_entry);
344 return (bsrc->mfes_src);
348 mfib_entry_is_sourced (fib_node_index_t mfib_entry_index,
349 mfib_source_t source)
351 mfib_entry_t *mfib_entry;
353 mfib_entry = mfib_entry_get(mfib_entry_index);
355 return (NULL != mfib_entry_src_find(mfib_entry, source, NULL));
359 mfib_entry_is_marked (fib_node_index_t mfib_entry_index,
360 mfib_source_t source)
362 mfib_entry_t *mfib_entry;
363 mfib_entry_src_t *esrc;
365 mfib_entry = mfib_entry_get(mfib_entry_index);
367 esrc = mfib_entry_src_find(mfib_entry, source, NULL);
375 return (!!(esrc->mfes_flags & MFIB_ENTRY_SRC_FLAG_STALE));
380 mfib_entry_mark (fib_node_index_t fib_entry_index,
381 mfib_source_t source)
383 mfib_entry_t *mfib_entry;
384 mfib_entry_src_t *esrc;
386 mfib_entry = mfib_entry_get(fib_entry_index);
388 esrc = mfib_entry_src_find(mfib_entry, source, NULL);
392 esrc->mfes_flags |= MFIB_ENTRY_SRC_FLAG_STALE;
397 mfib_entry_is_host (fib_node_index_t mfib_entry_index)
399 return (mfib_prefix_is_host(mfib_entry_get_prefix(mfib_entry_index)));
404 mfib_entry_src_flush (mfib_entry_src_t *msrc)
409 hash_foreach(sw_if_index, mfii, msrc->mfes_itfs,
411 mfib_itf_delete(mfib_itf_get(mfii));
413 hash_free(msrc->mfes_itfs);
414 msrc->mfes_itfs = NULL;
415 hash_free(msrc->mfes_exts);
416 msrc->mfes_exts = NULL;
417 fib_path_list_unlock(msrc->mfes_pl);
421 mfib_entry_src_remove (mfib_entry_t *mfib_entry,
422 mfib_source_t source)
425 mfib_entry_src_t *msrc;
428 msrc = mfib_entry_src_find(mfib_entry, source, &index);
432 ASSERT(0 != msrc->mfes_ref_count);
433 msrc->mfes_ref_count--;
435 if (0 == msrc->mfes_ref_count)
437 mfib_entry_src_deactivate(mfib_entry, msrc);
438 mfib_entry_src_flush(msrc);
440 vec_del1(mfib_entry->mfe_srcs, index);
441 if (vec_len (mfib_entry->mfe_srcs) > 1)
442 vec_sort_with_function(mfib_entry->mfe_srcs,
443 mfib_entry_src_cmp_for_sort);
449 mfib_entry_child_add (fib_node_index_t mfib_entry_index,
450 fib_node_type_t child_type,
451 fib_node_index_t child_index)
453 return (fib_node_child_add(FIB_NODE_TYPE_MFIB_ENTRY,
460 mfib_entry_child_remove (fib_node_index_t mfib_entry_index,
463 fib_node_child_remove(FIB_NODE_TYPE_MFIB_ENTRY,
468 static mfib_entry_t *
469 mfib_entry_alloc (u32 fib_index,
470 const mfib_prefix_t *prefix,
471 fib_node_index_t *mfib_entry_index)
473 mfib_entry_t *mfib_entry;
475 pool_get_aligned(mfib_entry_pool, mfib_entry, CLIB_CACHE_LINE_BYTES);
477 fib_node_init(&mfib_entry->mfe_node,
478 FIB_NODE_TYPE_MFIB_ENTRY);
481 * Some of the members require non-default initialisation
482 * so we also init those that don't and thus save on the call to clib_memset.
484 mfib_entry->mfe_flags = 0;
485 mfib_entry->mfe_fib_index = fib_index;
486 mfib_entry->mfe_prefix = *prefix;
487 mfib_entry->mfe_srcs = NULL;
488 mfib_entry->mfe_itfs = NULL;
489 mfib_entry->mfe_rpf_id = MFIB_RPF_ID_NONE;
490 mfib_entry->mfe_pl = FIB_NODE_INDEX_INVALID;
492 dpo_reset(&mfib_entry->mfe_rep);
494 *mfib_entry_index = mfib_entry_get_index(mfib_entry);
496 MFIB_ENTRY_DBG(mfib_entry, "alloc");
501 static inline mfib_path_ext_t *
502 mfib_entry_path_ext_find (uword *exts,
503 fib_node_index_t path_index)
507 p = hash_get(exts, path_index);
511 return (mfib_entry_path_ext_get(p[0]));
517 static mfib_path_ext_t*
518 mfib_path_ext_add (mfib_entry_src_t *msrc,
519 fib_node_index_t path_index,
520 mfib_itf_flags_t mfi_flags)
522 mfib_path_ext_t *path_ext;
524 pool_get(mfib_path_ext_pool, path_ext);
526 path_ext->mfpe_flags = mfi_flags;
527 path_ext->mfpe_path = path_index;
529 hash_set(msrc->mfes_exts, path_index,
530 path_ext - mfib_path_ext_pool);
536 mfib_path_ext_remove (mfib_entry_src_t *msrc,
537 fib_node_index_t path_index)
539 mfib_path_ext_t *path_ext;
541 path_ext = mfib_entry_path_ext_find(msrc->mfes_exts, path_index);
543 hash_unset(msrc->mfes_exts, path_index);
544 pool_put(mfib_path_ext_pool, path_ext);
547 typedef struct mfib_entry_collect_forwarding_ctx_t_
549 load_balance_path_t * next_hops;
550 fib_forward_chain_type_t fct;
551 mfib_entry_src_t *msrc;
552 dpo_proto_t payload_proto;
553 } mfib_entry_collect_forwarding_ctx_t;
555 static fib_path_list_walk_rc_t
556 mfib_entry_src_collect_forwarding (fib_node_index_t pl_index,
557 fib_node_index_t path_index,
560 mfib_entry_collect_forwarding_ctx_t *ctx;
561 load_balance_path_t *nh;
566 * if the path is not resolved, don't include it.
568 if (!fib_path_is_resolved(path_index))
570 return (FIB_PATH_LIST_WALK_CONTINUE);
574 * If the path is not forwarding to use it
576 mfib_path_ext_t *path_ext;
578 path_ext = mfib_entry_path_ext_find(ctx->msrc->mfes_exts,
581 if (NULL != path_ext &&
582 !(path_ext->mfpe_flags & MFIB_ITF_FLAG_FORWARD))
584 return (FIB_PATH_LIST_WALK_CONTINUE);
589 case FIB_FORW_CHAIN_TYPE_MCAST_IP4:
590 case FIB_FORW_CHAIN_TYPE_MCAST_IP6:
592 * EOS traffic with no label to stack, we need the IP Adj
594 vec_add2(ctx->next_hops, nh, 1);
596 nh->path_index = path_index;
597 nh->path_weight = fib_path_get_weight(path_index);
598 fib_path_contribute_forwarding(path_index, ctx->fct,
599 ctx->payload_proto, &nh->path_dpo);
602 case FIB_FORW_CHAIN_TYPE_UNICAST_IP4:
603 case FIB_FORW_CHAIN_TYPE_UNICAST_IP6:
604 case FIB_FORW_CHAIN_TYPE_MPLS_NON_EOS:
605 case FIB_FORW_CHAIN_TYPE_MPLS_EOS:
606 case FIB_FORW_CHAIN_TYPE_ETHERNET:
607 case FIB_FORW_CHAIN_TYPE_NSH:
608 case FIB_FORW_CHAIN_TYPE_BIER:
613 return (FIB_PATH_LIST_WALK_CONTINUE);
617 mfib_entry_stack (mfib_entry_t *mfib_entry,
618 mfib_entry_src_t *msrc)
622 dp = fib_proto_to_dpo(mfib_entry_get_proto(mfib_entry));
625 * unlink the enty from the previous path list.
627 if (FIB_NODE_INDEX_INVALID != mfib_entry->mfe_pl)
629 fib_path_list_child_remove(mfib_entry->mfe_pl,
630 mfib_entry->mfe_sibling);
635 mfib_entry_collect_forwarding_ctx_t ctx = {
637 .fct = mfib_entry_get_default_chain_type(mfib_entry),
639 .payload_proto = fib_proto_to_dpo(mfib_entry->mfe_prefix.fp_proto),
643 * link the entry to the path-list.
644 * The entry needs to be a child so that we receive the back-walk
645 * updates to recalculate forwarding.
647 mfib_entry->mfe_pl = msrc->mfes_pl;
648 mfib_entry->mfe_flags = msrc->mfes_route_flags;
649 mfib_entry->mfe_itfs = msrc->mfes_itfs;
650 mfib_entry->mfe_rpf_id = msrc->mfes_rpf_id;
652 if (FIB_NODE_INDEX_INVALID != mfib_entry->mfe_pl)
654 mfib_entry->mfe_sibling =
655 fib_path_list_child_add(mfib_entry->mfe_pl,
656 FIB_NODE_TYPE_MFIB_ENTRY,
657 mfib_entry_get_index(mfib_entry));
659 fib_path_list_walk(mfib_entry->mfe_pl,
660 mfib_entry_src_collect_forwarding,
663 if (!(MFIB_ENTRY_FLAG_EXCLUSIVE & mfib_entry->mfe_flags))
665 if (NULL == ctx.next_hops)
668 * no next-hops, stack directly on the drop
670 dpo_stack(DPO_MFIB_ENTRY, dp,
671 &mfib_entry->mfe_rep,
677 * each path contirbutes a next-hop. form a replicate
678 * from those choices.
680 if (!dpo_id_is_valid(&mfib_entry->mfe_rep) ||
681 dpo_is_drop(&mfib_entry->mfe_rep))
683 dpo_id_t tmp_dpo = DPO_INVALID;
687 replicate_create(0, dp));
689 dpo_stack(DPO_MFIB_ENTRY, dp,
690 &mfib_entry->mfe_rep,
695 replicate_multipath_update(&mfib_entry->mfe_rep,
702 * for exclusive routes the source provided a replicate DPO
703 * which we stashed in the special path list with one path,
704 * so we can stack directly on that.
706 ASSERT(1 == vec_len(ctx.next_hops));
708 if (NULL != ctx.next_hops)
710 dpo_stack(DPO_MFIB_ENTRY, dp,
711 &mfib_entry->mfe_rep,
712 &ctx.next_hops[0].path_dpo);
713 dpo_reset(&ctx.next_hops[0].path_dpo);
714 vec_free(ctx.next_hops);
718 dpo_stack(DPO_MFIB_ENTRY, dp,
719 &mfib_entry->mfe_rep,
726 dpo_stack(DPO_MFIB_ENTRY, dp,
727 &mfib_entry->mfe_rep,
732 * time for walkies fido.
734 fib_node_back_walk_ctx_t bw_ctx = {
735 .fnbw_reason = FIB_NODE_BW_REASON_FLAG_EVALUATE,
738 fib_walk_sync(FIB_NODE_TYPE_MFIB_ENTRY,
739 mfib_entry_get_index(mfib_entry),
743 static fib_node_index_t*
744 mfib_entry_src_paths_add (mfib_entry_src_t *msrc,
745 const fib_route_path_t *rpaths)
747 ASSERT(!(MFIB_ENTRY_FLAG_EXCLUSIVE & msrc->mfes_route_flags));
749 msrc->mfes_flags &= ~MFIB_ENTRY_SRC_FLAG_STALE;
751 if (FIB_NODE_INDEX_INVALID == msrc->mfes_pl)
753 /* A non-shared path-list */
754 msrc->mfes_pl = fib_path_list_create(FIB_PATH_LIST_FLAG_NO_URPF,
756 fib_path_list_lock(msrc->mfes_pl);
759 return (fib_path_list_paths_add(msrc->mfes_pl, rpaths));
762 static fib_node_index_t*
763 mfib_entry_src_paths_remove (mfib_entry_src_t *msrc,
764 const fib_route_path_t *rpaths)
766 ASSERT(!(MFIB_ENTRY_FLAG_EXCLUSIVE & msrc->mfes_route_flags));
768 msrc->mfes_flags &= ~MFIB_ENTRY_SRC_FLAG_STALE;
770 return (fib_path_list_paths_remove(msrc->mfes_pl, rpaths));
774 mfib_entry_recalculate_forwarding (mfib_entry_t *mfib_entry,
775 mfib_source_t old_best)
777 mfib_entry_src_t *bsrc, *osrc;
780 * copy the forwarding data from the bast source
782 bsrc = mfib_entry_get_best_src(mfib_entry);
783 osrc = mfib_entry_src_find(mfib_entry, old_best, NULL);
787 if (bsrc->mfes_src != old_best)
790 * we are changing from one source to another
791 * deactivate the old, and activate the new
793 mfib_entry_src_deactivate(mfib_entry, osrc);
794 mfib_entry_src_activate(mfib_entry, bsrc);
799 mfib_entry_src_deactivate(mfib_entry, osrc);
802 mfib_entry_stack(mfib_entry, bsrc);
803 mfib_entry_cover_update_notify(mfib_entry);
808 mfib_entry_create (u32 fib_index,
809 mfib_source_t source,
810 const mfib_prefix_t *prefix,
812 mfib_entry_flags_t entry_flags,
815 fib_node_index_t mfib_entry_index;
816 mfib_entry_t *mfib_entry;
817 mfib_entry_src_t *msrc;
819 mfib_entry = mfib_entry_alloc(fib_index, prefix,
821 msrc = mfib_entry_src_update(mfib_entry, source,
822 rpf_id, entry_flags);
824 if (INDEX_INVALID != repi)
827 * The source is providing its own replicate DPO.
828 * Create a sepcial path-list to manage it, that way
829 * this entry and the source are equivalent to a normal
832 fib_node_index_t old_pl_index;
834 dpo_id_t dpo = DPO_INVALID;
836 dp = fib_proto_to_dpo(mfib_entry_get_proto(mfib_entry));
837 old_pl_index = msrc->mfes_pl;
839 dpo_set(&dpo, DPO_REPLICATE, dp, repi);
842 fib_path_list_create_special(dp,
843 FIB_PATH_LIST_FLAG_EXCLUSIVE,
847 fib_path_list_lock(msrc->mfes_pl);
848 fib_path_list_unlock(old_pl_index);
851 mfib_entry_recalculate_forwarding(mfib_entry, MFIB_SOURCE_NONE);
853 return (mfib_entry_index);
857 mfib_entry_ok_for_delete (mfib_entry_t *mfib_entry)
859 return (0 == vec_len(mfib_entry->mfe_srcs));
863 mfib_entry_src_ok_for_delete (const mfib_entry_src_t *msrc)
865 return ((INDEX_INVALID == msrc->mfes_cover &&
866 MFIB_ENTRY_FLAG_NONE == msrc->mfes_route_flags &&
867 0 == fib_path_list_get_n_paths(msrc->mfes_pl)) &&
868 (0 == hash_elts(msrc->mfes_itfs)));
870 /* return ((MFIB_ENTRY_FLAG_NONE == msrc->mfes_route_flags) && */
871 /* (0 == fib_path_list_get_n_paths(msrc->mfes_pl)) && */
872 /* (0 == hash_elts(msrc->mfes_itfs))); */
877 mfib_entry_update_i (mfib_entry_t *mfib_entry,
878 mfib_entry_src_t *msrc,
879 mfib_source_t current_best,
882 if (INDEX_INVALID != repi)
885 * The source is providing its own replicate DPO.
886 * Create a sepcial path-list to manage it, that way
887 * this entry and the source are equivalent to a normal
890 fib_node_index_t old_pl_index;
892 dpo_id_t dpo = DPO_INVALID;
894 dp = fib_proto_to_dpo(mfib_entry_get_proto(mfib_entry));
895 old_pl_index = msrc->mfes_pl;
897 dpo_set(&dpo, DPO_REPLICATE, dp, repi);
900 fib_path_list_create_special(dp,
901 FIB_PATH_LIST_FLAG_EXCLUSIVE,
905 fib_path_list_lock(msrc->mfes_pl);
906 fib_path_list_unlock(old_pl_index);
909 if (mfib_entry_src_ok_for_delete(msrc))
912 * this source has no interfaces and no flags.
913 * it has nothing left to give - remove it
915 mfib_entry_src_remove(mfib_entry, msrc->mfes_src);
918 mfib_entry_recalculate_forwarding(mfib_entry, current_best);
922 mfib_entry_special_add (fib_node_index_t mfib_entry_index,
923 mfib_source_t source,
924 mfib_entry_flags_t entry_flags,
928 mfib_source_t current_best;
929 mfib_entry_t *mfib_entry;
930 mfib_entry_src_t *msrc;
932 mfib_entry = mfib_entry_get(mfib_entry_index);
933 current_best = mfib_entry_get_best_source(mfib_entry);
935 msrc = mfib_entry_src_update_and_lock(mfib_entry, source, rpf_id,
938 mfib_entry_update_i(mfib_entry, msrc, current_best, repi);
940 return (mfib_entry_ok_for_delete(mfib_entry));
944 mfib_entry_update (fib_node_index_t mfib_entry_index,
945 mfib_source_t source,
946 mfib_entry_flags_t entry_flags,
950 mfib_source_t current_best;
951 mfib_entry_t *mfib_entry;
952 mfib_entry_src_t *msrc;
954 mfib_entry = mfib_entry_get(mfib_entry_index);
955 current_best = mfib_entry_get_best_source(mfib_entry);
956 msrc = mfib_entry_src_update(mfib_entry, source, rpf_id, entry_flags);
958 mfib_entry_update_i(mfib_entry, msrc, current_best, repi);
960 return (mfib_entry_ok_for_delete(mfib_entry));
964 mfib_entry_itf_add (mfib_entry_src_t *msrc,
968 hash_set(msrc->mfes_itfs, sw_if_index, mi);
972 mfib_entry_itf_remove (mfib_entry_src_t *msrc,
977 mfi = mfib_entry_itf_find(msrc->mfes_itfs, sw_if_index);
979 mfib_itf_delete(mfi);
981 hash_unset(msrc->mfes_itfs, sw_if_index);
985 mfib_entry_path_itf_based (const fib_route_path_t *rpath)
987 return (!(rpath->frp_flags & FIB_ROUTE_PATH_BIER_IMP) &&
988 ~0 != rpath->frp_sw_if_index);
992 mfib_entry_path_update (fib_node_index_t mfib_entry_index,
993 mfib_source_t source,
994 const fib_route_path_t *rpaths)
996 fib_node_index_t* path_indices, path_index;
997 const fib_route_path_t *rpath;
998 mfib_source_t current_best;
999 mfib_path_ext_t *path_ext;
1000 const mfib_prefix_t *pfx;
1001 mfib_entry_t *mfib_entry;
1002 mfib_entry_src_t *msrc;
1003 mfib_itf_flags_t old;
1006 mfib_entry = mfib_entry_get(mfib_entry_index);
1007 pfx = mfib_entry_get_prefix(mfib_entry_index);
1008 ASSERT(NULL != mfib_entry);
1009 current_best = mfib_entry_get_best_source(mfib_entry);
1010 msrc = mfib_entry_src_find_or_create(mfib_entry, source);
1013 * add the path to the path-list. If it's a duplicate we'll get
1014 * back the original path.
1016 path_indices = mfib_entry_src_paths_add(msrc, rpaths);
1018 vec_foreach_index(ii, path_indices)
1020 path_index = path_indices[ii];
1021 rpath = &rpaths[ii];
1023 if (FIB_NODE_INDEX_INVALID == path_index)
1027 * find the path extension for that path
1029 path_ext = mfib_entry_path_ext_find(msrc->mfes_exts, path_index);
1031 if (NULL == path_ext)
1033 old = MFIB_ITF_FLAG_NONE;
1034 path_ext = mfib_path_ext_add(msrc, path_index,
1035 rpath->frp_mitf_flags);
1039 old = path_ext->mfpe_flags;
1040 path_ext->mfpe_flags = rpath->frp_mitf_flags;
1044 * Has the path changed its contribution to the input interface set.
1045 * Which only paths with interfaces can do...
1047 if (mfib_entry_path_itf_based(rpath))
1049 mfib_itf_t *mfib_itf;
1051 if (old != rpath->frp_mitf_flags)
1054 * change of flag contributions
1056 mfib_itf = mfib_entry_itf_find(msrc->mfes_itfs,
1057 rpath->frp_sw_if_index);
1059 if (NULL == mfib_itf)
1061 index_t mfib_itf_i = mfib_itf_create(path_index,
1062 rpath->frp_mitf_flags);
1063 mfib_entry_itf_add(msrc,
1064 rpath->frp_sw_if_index,
1067 if (MFIB_ITF_FLAG_ACCEPT & rpath->frp_mitf_flags)
1069 /* new accepting interface - add the mac to the driver */
1070 mfib_itf_mac_add(mfib_itf_get(mfib_itf_i), pfx);
1075 u8 was_accept = !!(old & MFIB_ITF_FLAG_ACCEPT);
1076 u8 is_accept = !!(rpath->frp_mitf_flags & MFIB_ITF_FLAG_ACCEPT);
1078 if (mfib_itf_update(mfib_itf,
1080 rpath->frp_mitf_flags))
1083 * no more interface flags on this path, remove
1084 * from the data-plane set
1088 mfib_itf_mac_del(mfib_itf, pfx);
1091 mfib_entry_itf_remove(msrc, rpath->frp_sw_if_index);
1096 * is there a change to the ACCEPT flag that
1097 * requires us to update hte driver with the
1100 if (is_accept != was_accept)
1104 mfib_itf_mac_add(mfib_itf, pfx);
1106 else if (was_accept)
1108 mfib_itf_mac_del(mfib_itf, pfx);
1116 vec_free(path_indices);
1118 mfib_entry_recalculate_forwarding(mfib_entry, current_best);
1122 * mfib_entry_path_remove
1124 * remove a path from the entry.
1125 * return the mfib_entry's index if it is still present, INVALID otherwise.
1128 mfib_entry_path_remove (fib_node_index_t mfib_entry_index,
1129 mfib_source_t source,
1130 const fib_route_path_t *rpaths)
1132 fib_node_index_t path_index, *path_indices;
1133 const fib_route_path_t *rpath;
1134 mfib_source_t current_best;
1135 const mfib_prefix_t *pfx;
1136 mfib_entry_t *mfib_entry;
1137 mfib_entry_src_t *msrc;
1140 mfib_entry = mfib_entry_get(mfib_entry_index);
1141 pfx = mfib_entry_get_prefix(mfib_entry_index);
1142 ASSERT(NULL != mfib_entry);
1143 current_best = mfib_entry_get_best_source(mfib_entry);
1144 msrc = mfib_entry_src_find(mfib_entry, source, NULL);
1149 * there are no paths left for this source
1151 return (mfib_entry_ok_for_delete(mfib_entry));
1155 * remove the paths from the path-list. If it's not there we'll get
1156 * back an empty vector
1158 path_indices = mfib_entry_src_paths_remove(msrc, rpaths);
1160 vec_foreach_index(ii, path_indices)
1162 path_index = path_indices[ii];
1163 rpath = &rpaths[ii];
1165 if (FIB_NODE_INDEX_INVALID == path_index)
1169 * don't need the extension, nor the interface anymore
1171 mfib_path_ext_remove(msrc, path_index);
1172 if (mfib_entry_path_itf_based(rpath))
1174 u8 was_accept, is_accept;
1175 mfib_itf_t *mfib_itf;
1177 mfib_itf = mfib_entry_itf_find(msrc->mfes_itfs,
1178 rpath->frp_sw_if_index);
1179 was_accept = !!(MFIB_ITF_FLAG_ACCEPT & mfib_itf->mfi_flags);
1181 if (mfib_itf_update(mfib_itf,
1183 MFIB_ITF_FLAG_NONE))
1187 mfib_itf_mac_del(mfib_itf, pfx);
1191 * no more interface flags on this path, remove
1192 * from the data-plane set
1194 mfib_entry_itf_remove(msrc, rpath->frp_sw_if_index);
1198 is_accept = !!(MFIB_ITF_FLAG_ACCEPT & mfib_itf->mfi_flags);
1200 if (was_accept && !is_accept)
1202 mfib_itf_mac_del(mfib_itf, pfx);
1207 vec_free(path_indices);
1209 if (mfib_entry_src_ok_for_delete(msrc))
1212 * this source has no interfaces and no flags.
1213 * it has nothing left to give - remove it
1215 mfib_entry_src_remove(mfib_entry, source);
1218 mfib_entry_recalculate_forwarding(mfib_entry, current_best);
1220 return (mfib_entry_ok_for_delete(mfib_entry));
1226 * The source is withdrawing all the paths it provided
1229 mfib_entry_delete (fib_node_index_t mfib_entry_index,
1230 mfib_source_t source)
1232 mfib_source_t current_best;
1233 mfib_entry_t *mfib_entry;
1235 mfib_entry = mfib_entry_get(mfib_entry_index);
1236 current_best = mfib_entry_get_best_source(mfib_entry);
1237 mfib_entry_src_remove(mfib_entry, source);
1239 mfib_entry_recalculate_forwarding(mfib_entry, current_best);
1241 return (mfib_entry_ok_for_delete(mfib_entry));
1245 fib_ip4_address_compare (ip4_address_t * a1,
1249 * IP addresses are unsiged ints. the return value here needs to be signed
1250 * a simple subtraction won't cut it.
1251 * If the addresses are the same, the sort order is undefiend, so phoey.
1253 return ((clib_net_to_host_u32(a1->data_u32) >
1254 clib_net_to_host_u32(a2->data_u32) ) ?
1259 fib_ip6_address_compare (ip6_address_t * a1,
1263 for (i = 0; i < ARRAY_LEN (a1->as_u16); i++)
1265 int cmp = (clib_net_to_host_u16 (a1->as_u16[i]) -
1266 clib_net_to_host_u16 (a2->as_u16[i]));
1274 mfib_entry_cmp (fib_node_index_t mfib_entry_index1,
1275 fib_node_index_t mfib_entry_index2)
1277 mfib_entry_t *mfib_entry1, *mfib_entry2;
1280 mfib_entry1 = mfib_entry_get(mfib_entry_index1);
1281 mfib_entry2 = mfib_entry_get(mfib_entry_index2);
1283 switch (mfib_entry1->mfe_prefix.fp_proto)
1285 case FIB_PROTOCOL_IP4:
1286 cmp = fib_ip4_address_compare(&mfib_entry1->mfe_prefix.fp_grp_addr.ip4,
1287 &mfib_entry2->mfe_prefix.fp_grp_addr.ip4);
1291 cmp = fib_ip4_address_compare(&mfib_entry1->mfe_prefix.fp_src_addr.ip4,
1292 &mfib_entry2->mfe_prefix.fp_src_addr.ip4);
1295 case FIB_PROTOCOL_IP6:
1296 cmp = fib_ip6_address_compare(&mfib_entry1->mfe_prefix.fp_grp_addr.ip6,
1297 &mfib_entry2->mfe_prefix.fp_grp_addr.ip6);
1301 cmp = fib_ip6_address_compare(&mfib_entry1->mfe_prefix.fp_src_addr.ip6,
1302 &mfib_entry2->mfe_prefix.fp_src_addr.ip6);
1305 case FIB_PROTOCOL_MPLS:
1312 cmp = (mfib_entry1->mfe_prefix.fp_len - mfib_entry2->mfe_prefix.fp_len);
1318 mfib_entry_cmp_for_sort (void *i1, void *i2)
1320 fib_node_index_t *mfib_entry_index1 = i1, *mfib_entry_index2 = i2;
1322 return (mfib_entry_cmp(*mfib_entry_index1,
1323 *mfib_entry_index2));
1327 mfib_entry_last_lock_gone (fib_node_t *node)
1329 mfib_entry_t *mfib_entry;
1330 mfib_entry_src_t *msrc;
1332 mfib_entry = mfib_entry_from_fib_node(node);
1334 dpo_reset(&mfib_entry->mfe_rep);
1336 MFIB_ENTRY_DBG(mfib_entry, "last-lock");
1338 vec_foreach(msrc, mfib_entry->mfe_srcs)
1340 mfib_entry_src_flush(msrc);
1343 vec_free(mfib_entry->mfe_srcs);
1345 fib_node_deinit(&mfib_entry->mfe_node);
1346 pool_put(mfib_entry_pool, mfib_entry);
1350 mfib_entry_get_stats_index (fib_node_index_t fib_entry_index)
1352 mfib_entry_t *mfib_entry;
1354 mfib_entry = mfib_entry_get(fib_entry_index);
1356 return (mfib_entry->mfe_rep.dpoi_index);
1360 * mfib_entry_back_walk_notify
1362 * A back walk has reach this entry.
1364 static fib_node_back_walk_rc_t
1365 mfib_entry_back_walk_notify (fib_node_t *node,
1366 fib_node_back_walk_ctx_t *ctx)
1368 mfib_entry_t *mfib_entry;
1370 mfib_entry = mfib_entry_from_fib_node(node);
1371 mfib_entry_recalculate_forwarding(mfib_entry,
1372 mfib_entry_get_best_source(mfib_entry));
1374 return (FIB_NODE_BACK_WALK_CONTINUE);
1378 mfib_entry_show_memory (void)
1380 fib_show_memory_usage("multicast-Entry",
1381 pool_elts(mfib_entry_pool),
1382 pool_len(mfib_entry_pool),
1383 sizeof(mfib_entry_t));
1387 * The MFIB entry's graph node virtual function table
1389 static const fib_node_vft_t mfib_entry_vft = {
1390 .fnv_get = mfib_entry_get_node,
1391 .fnv_last_lock = mfib_entry_last_lock_gone,
1392 .fnv_back_walk = mfib_entry_back_walk_notify,
1393 .fnv_mem_show = mfib_entry_show_memory,
1397 mfib_entry_lock (fib_node_index_t mfib_entry_index)
1399 mfib_entry_t *mfib_entry;
1401 mfib_entry = mfib_entry_get(mfib_entry_index);
1403 fib_node_lock(&mfib_entry->mfe_node);
1407 mfib_entry_unlock (fib_node_index_t mfib_entry_index)
1409 mfib_entry_t *mfib_entry;
1411 mfib_entry = mfib_entry_get(mfib_entry_index);
1413 fib_node_unlock(&mfib_entry->mfe_node);
1417 mfib_entry_dpo_lock (dpo_id_t *dpo)
1421 mfib_entry_dpo_unlock (dpo_id_t *dpo)
1425 const static dpo_vft_t mfib_entry_dpo_vft = {
1426 .dv_lock = mfib_entry_dpo_lock,
1427 .dv_unlock = mfib_entry_dpo_unlock,
1428 .dv_format = format_mfib_entry_dpo,
1429 .dv_mem_show = mfib_entry_show_memory,
1432 const static char* const mfib_entry_ip4_nodes[] =
1434 "ip4-mfib-forward-rpf",
1437 const static char* const mfib_entry_ip6_nodes[] =
1439 "ip6-mfib-forward-rpf",
1443 const static char* const * const mfib_entry_nodes[DPO_PROTO_NUM] =
1445 [DPO_PROTO_IP4] = mfib_entry_ip4_nodes,
1446 [DPO_PROTO_IP6] = mfib_entry_ip6_nodes,
1450 mfib_entry_module_init (void)
1452 fib_node_register_type (FIB_NODE_TYPE_MFIB_ENTRY, &mfib_entry_vft);
1453 dpo_register(DPO_MFIB_ENTRY, &mfib_entry_dpo_vft, mfib_entry_nodes);
1454 mfib_entry_logger = vlib_log_register_class("mfib", "entry");
1458 mfib_entry_encode (fib_node_index_t mfib_entry_index)
1460 fib_path_encode_ctx_t ctx = {
1463 mfib_entry_t *mfib_entry;
1464 fib_route_path_t *rpath;
1465 mfib_entry_src_t *bsrc;
1467 mfib_entry = mfib_entry_get(mfib_entry_index);
1468 bsrc = mfib_entry_get_best_src(mfib_entry);
1470 if (FIB_NODE_INDEX_INVALID != bsrc->mfes_pl)
1472 fib_path_list_walk_w_ext(bsrc->mfes_pl,
1478 vec_foreach(rpath, ctx.rpaths)
1480 mfib_itf_t *mfib_itf;
1482 mfib_itf = mfib_entry_itf_find(bsrc->mfes_itfs,
1483 rpath->frp_sw_if_index);
1486 rpath->frp_mitf_flags = mfib_itf->mfi_flags;
1490 return (ctx.rpaths);
1493 const mfib_prefix_t *
1494 mfib_entry_get_prefix (fib_node_index_t mfib_entry_index)
1496 mfib_entry_t *mfib_entry;
1498 mfib_entry = mfib_entry_get(mfib_entry_index);
1500 return (&mfib_entry->mfe_prefix);
1504 mfib_entry_get_fib_index (fib_node_index_t mfib_entry_index)
1506 mfib_entry_t *mfib_entry;
1508 mfib_entry = mfib_entry_get(mfib_entry_index);
1510 return (mfib_entry->mfe_fib_index);
1514 mfib_entry_contribute_ip_forwarding (fib_node_index_t mfib_entry_index)
1516 mfib_entry_t *mfib_entry;
1518 mfib_entry = mfib_entry_get(mfib_entry_index);
1520 return (&mfib_entry->mfe_rep);
1524 mfib_entry_contribute_forwarding (fib_node_index_t mfib_entry_index,
1525 fib_forward_chain_type_t type,
1526 mfib_entry_fwd_flags_t flags,
1530 * An IP mFIB entry can only provide a forwarding chain that
1531 * is the same IP proto as the prefix.
1532 * No use-cases (i know of) for other combinations.
1534 mfib_entry_t *mfib_entry;
1537 mfib_entry = mfib_entry_get(mfib_entry_index);
1539 dp = fib_proto_to_dpo(mfib_entry->mfe_prefix.fp_proto);
1541 if (type == mfib_forw_chain_type_from_dpo_proto(dp))
1545 rep = replicate_get(mfib_entry->mfe_rep.dpoi_index);
1547 if ((rep->rep_flags & REPLICATE_FLAGS_HAS_LOCAL) &&
1548 (flags & MFIB_ENTRY_FWD_FLAG_NO_LOCAL))
1551 * caller does not want the local paths that the entry has
1553 dpo_proto_t rep_proto = rep->rep_proto;
1554 dpo_set(dpo, DPO_REPLICATE, rep_proto,
1555 replicate_dup(REPLICATE_FLAGS_NONE,
1556 mfib_entry->mfe_rep.dpoi_index));
1560 dpo_copy(dpo, &mfib_entry->mfe_rep);
1565 dpo_copy(dpo, drop_dpo_get(dp));
1570 * fib_entry_cover_changed
1572 * this entry is tracking its cover and that cover has changed.
1575 mfib_entry_cover_changed (fib_node_index_t mfib_entry_index)
1577 mfib_entry_t *mfib_entry;
1578 mfib_entry_src_t *msrc;
1581 mfib_entry = mfib_entry_get(mfib_entry_index);
1582 msrc = mfib_entry_get_best_src(mfib_entry);
1584 res = mfib_entry_src_cover_change(mfib_entry, msrc);
1586 if (MFIB_SRC_REEVALUATE == res)
1588 mfib_entry_recalculate_forwarding(mfib_entry, msrc->mfes_src);
1590 MFIB_ENTRY_DBG(mfib_entry, "cover-changed");
1594 * mfib_entry_cover_updated
1596 * this entry is tracking its cover and that cover has been updated
1597 * (i.e. its forwarding information has changed).
1600 mfib_entry_cover_updated (fib_node_index_t mfib_entry_index)
1602 mfib_entry_t *mfib_entry;
1603 mfib_entry_src_t *msrc;
1606 mfib_entry = mfib_entry_get(mfib_entry_index);
1607 msrc = mfib_entry_get_best_src(mfib_entry);
1609 res = mfib_entry_src_cover_update(mfib_entry, msrc);
1611 if (MFIB_SRC_REEVALUATE == res)
1613 mfib_entry_recalculate_forwarding(mfib_entry, msrc->mfes_src);
1615 MFIB_ENTRY_DBG(mfib_entry, "cover-updated");
1619 mfib_entry_pool_size (void)
1621 return (pool_elts(mfib_entry_pool));
1624 static clib_error_t *
1625 show_mfib_entry_command (vlib_main_t * vm,
1626 unformat_input_t * input,
1627 vlib_cli_command_t * cmd)
1629 fib_node_index_t fei;
1631 if (unformat (input, "%d", &fei))
1634 * show one in detail
1636 if (!pool_is_free_index(mfib_entry_pool, fei))
1638 vlib_cli_output (vm, "%d@%U",
1640 format_mfib_entry, fei,
1641 MFIB_ENTRY_FORMAT_DETAIL2);
1645 vlib_cli_output (vm, "entry %d invalid", fei);
1653 vlib_cli_output (vm, "FIB Entries:");
1654 pool_foreach_index (fei, mfib_entry_pool)
1656 vlib_cli_output (vm, "%d@%U",
1658 format_mfib_entry, fei,
1659 MFIB_ENTRY_FORMAT_BRIEF);
1667 * This command displays an entry, or all entries, in the mfib tables indexed
1668 * by their unique numerical identifier.
1670 VLIB_CLI_COMMAND (show_mfib_entry, static) = {
1671 .path = "show mfib entry",
1672 .function = show_mfib_entry_command,
1673 .short_help = "show mfib entry",