2 * Copyright (c) 2018 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 <plugins/gbp/gbp.h>
17 #include <plugins/gbp/gbp_fwd_dpo.h>
18 #include <plugins/gbp/gbp_policy_dpo.h>
19 #include <plugins/gbp/gbp_route_domain.h>
21 #include <vnet/fib/fib_table.h>
22 #include <vnet/dpo/load_balance.h>
27 typedef struct gbp_subnet_key_t_
36 typedef struct gbp_subnet_t_
38 gbp_subnet_key_t *gs_key;
39 gbp_subnet_type_t gs_type;
48 } gs_stitched_external;
55 fib_node_index_t gs_fei;
59 * A DB of the subnets; key={pfx,fib-index}
66 gbp_subnet_t *gbp_subnet_pool;
69 gbp_subnet_db_find (u32 fib_index, const fib_prefix_t * pfx)
71 gbp_subnet_key_t key = {
73 .gsk_fib_index = fib_index,
77 p = hash_get_mem (gbp_subnet_db, &key);
82 return (INDEX_INVALID);
86 gbp_subnet_db_add (u32 fib_index, const fib_prefix_t * pfx, gbp_subnet_t * gs)
88 gbp_subnet_key_t *key;
90 key = clib_mem_alloc (sizeof (*key));
92 clib_memcpy (&(key->gsk_pfx), pfx, sizeof (*pfx));
93 key->gsk_fib_index = fib_index;
95 hash_set_mem (gbp_subnet_db, key, (gs - gbp_subnet_pool));
101 gbp_subnet_db_del (gbp_subnet_t * gs)
103 hash_unset_mem (gbp_subnet_db, gs->gs_key);
105 clib_mem_free (gs->gs_key);
111 gbp_subnet_transport_add (gbp_subnet_t * gs)
113 dpo_id_t gfd = DPO_INVALID;
114 gbp_route_domain_t *grd;
115 fib_protocol_t fproto;
117 fproto = gs->gs_key->gsk_pfx.fp_proto;
118 grd = gbp_route_domain_get (gs->gs_rd);
120 if (~0 == grd->grd_uu_sw_if_index[fproto])
121 return (VNET_API_ERROR_INVALID_SW_IF_INDEX);
123 gs->gs_fei = fib_table_entry_update_one_path (gs->gs_key->gsk_fib_index,
124 &gs->gs_key->gsk_pfx,
125 FIB_SOURCE_PLUGIN_HI,
127 fib_proto_to_dpo (fproto),
129 grd->grd_uu_sw_if_index
130 [fproto], ~0, 1, NULL,
131 FIB_ROUTE_PATH_FLAG_NONE);
139 gbp_subnet_internal_add (gbp_subnet_t * gs)
141 dpo_id_t gfd = DPO_INVALID;
143 gbp_fwd_dpo_add_or_lock (fib_proto_to_dpo (gs->gs_key->gsk_pfx.fp_proto),
146 gs->gs_fei = fib_table_entry_special_dpo_update (gs->gs_key->gsk_fib_index,
147 &gs->gs_key->gsk_pfx,
148 FIB_SOURCE_PLUGIN_HI,
149 FIB_ENTRY_FLAG_EXCLUSIVE,
158 gbp_subnet_external_add (gbp_subnet_t * gs, u32 sw_if_index, sclass_t sclass)
160 dpo_id_t gpd = DPO_INVALID;
162 gs->gs_stitched_external.gs_sclass = sclass;
163 gs->gs_stitched_external.gs_sw_if_index = sw_if_index;
165 gbp_policy_dpo_add_or_lock (fib_proto_to_dpo (gs->gs_key->gsk_pfx.fp_proto),
166 gbp_route_domain_get_scope (gs->gs_rd),
167 gs->gs_stitched_external.gs_sclass,
168 gs->gs_stitched_external.gs_sw_if_index, &gpd);
170 gs->gs_fei = fib_table_entry_special_dpo_update (gs->gs_key->gsk_fib_index,
171 &gs->gs_key->gsk_pfx,
172 FIB_SOURCE_PLUGIN_HI,
173 (FIB_ENTRY_FLAG_EXCLUSIVE |
174 FIB_ENTRY_FLAG_LOOSE_URPF_EXEMPT),
183 gbp_subnet_l3_out_add (gbp_subnet_t * gs, sclass_t sclass)
185 dpo_id_t gpd = DPO_INVALID;
187 gs->gs_l3_out.gs_sclass = sclass;
189 gbp_policy_dpo_add_or_lock (fib_proto_to_dpo (gs->gs_key->gsk_pfx.fp_proto),
190 gbp_route_domain_get_scope (gs->gs_rd),
191 gs->gs_l3_out.gs_sclass, ~0, &gpd);
193 gs->gs_fei = fib_table_entry_special_dpo_add (gs->gs_key->gsk_fib_index,
194 &gs->gs_key->gsk_pfx,
196 FIB_ENTRY_FLAG_INTERPOSE,
205 gbp_subnet_del_i (index_t gsi)
209 gs = pool_elt_at_index (gbp_subnet_pool, gsi);
211 if (GBP_SUBNET_L3_OUT == gs->gs_type)
212 fib_table_entry_delete_index (gs->gs_fei, FIB_SOURCE_SPECIAL);
214 fib_table_entry_delete_index (gs->gs_fei, FIB_SOURCE_PLUGIN_HI);
216 gbp_subnet_db_del (gs);
217 gbp_route_domain_unlock (gs->gs_rd);
219 pool_put (gbp_subnet_pool, gs);
223 gbp_subnet_del (u32 rd_id, const fib_prefix_t * pfx)
225 gbp_route_domain_t *grd;
229 grdi = gbp_route_domain_find (rd_id);
232 return (VNET_API_ERROR_NO_SUCH_FIB);
234 grd = gbp_route_domain_get (grdi);
235 fib_index = grd->grd_fib_index[pfx->fp_proto];
237 gsi = gbp_subnet_db_find (fib_index, pfx);
239 if (INDEX_INVALID == gsi)
240 return (VNET_API_ERROR_NO_SUCH_ENTRY);
242 gbp_subnet_del_i (gsi);
248 gbp_subnet_add (u32 rd_id,
249 const fib_prefix_t * pfx,
250 gbp_subnet_type_t type, u32 sw_if_index, sclass_t sclass)
252 gbp_route_domain_t *grd;
258 grdi = gbp_route_domain_find_and_lock (rd_id);
261 return (VNET_API_ERROR_NO_SUCH_FIB);
263 grd = gbp_route_domain_get (grdi);
264 fib_index = grd->grd_fib_index[pfx->fp_proto];
266 gsi = gbp_subnet_db_find (fib_index, pfx);
269 * this is an update if the subnet already exists, so remove the old
271 if (INDEX_INVALID != gsi)
272 gbp_subnet_del_i (gsi);
276 pool_get (gbp_subnet_pool, gs);
280 gbp_subnet_db_add (fib_index, pfx, gs);
284 case GBP_SUBNET_STITCHED_INTERNAL:
285 rv = gbp_subnet_internal_add (gs);
287 case GBP_SUBNET_STITCHED_EXTERNAL:
288 rv = gbp_subnet_external_add (gs, sw_if_index, sclass);
290 case GBP_SUBNET_TRANSPORT:
291 rv = gbp_subnet_transport_add (gs);
293 case GBP_SUBNET_L3_OUT:
294 rv = gbp_subnet_l3_out_add (gs, sclass);
301 static clib_error_t *
302 gbp_subnet_add_del_cli (vlib_main_t * vm,
303 unformat_input_t * input, vlib_cli_command_t * cmd)
305 vnet_main_t *vnm = vnet_get_main ();
306 fib_prefix_t pfx = {.fp_addr = ip46_address_initializer };
309 u32 sw_if_index = ~0;
310 gbp_subnet_type_t type = ~0;
315 while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
317 if (unformat (input, "del"))
319 else if (unformat (input, "rd %d", &rd_id))
323 (input, "prefix %U/%d", unformat_ip4_address, &pfx.fp_addr.ip4,
325 pfx.fp_proto = FIB_PROTOCOL_IP4;
328 (input, "prefix %U/%d", unformat_ip6_address, &pfx.fp_addr.ip6,
330 pfx.fp_proto = FIB_PROTOCOL_IP6;
331 else if (unformat (input, "type transport"))
332 type = GBP_SUBNET_TRANSPORT;
333 else if (unformat (input, "type internal"))
334 type = GBP_SUBNET_STITCHED_INTERNAL;
335 else if (unformat (input, "type external"))
336 type = GBP_SUBNET_STITCHED_EXTERNAL;
337 else if (unformat (input, "type l3out"))
338 type = GBP_SUBNET_L3_OUT;
341 (input, unformat_vnet_sw_interface, vnm, &sw_if_index))
343 else if (unformat (input, "sclass %u", &sclass))
352 rv = gbp_subnet_add (rd_id, &pfx, type, sw_if_index, sclass);
354 rv = gbp_subnet_del (rd_id, &pfx);
360 case VNET_API_ERROR_NO_SUCH_FIB:
361 return clib_error_return (0, "no such FIB");
364 return clib_error_return (0, "unknown error %d", rv);
368 * Add Group Based Policy Subnets
371 * @cliexstart{gbp subnet [del] rd <ID> prefix <prefix> type <type> [<interface>] [sclass <sclass>]}
375 VLIB_CLI_COMMAND (gbp_subnet_add_del, static) = {
376 .path = "gbp subnet",
377 .short_help = "gbp subnet [del] rd <ID> prefix <prefix> type <type> [<interface>] [sclass <sclass>]\n",
378 .function = gbp_subnet_add_del_cli,
385 gbp_subnet_walk (gbp_subnet_cb_t cb, void *ctx)
387 gbp_route_domain_t *grd;
392 sclass = SCLASS_INVALID;
396 pool_foreach (gs, gbp_subnet_pool,
398 grd = gbp_route_domain_get(gs->gs_rd);
402 case GBP_SUBNET_STITCHED_INTERNAL:
403 case GBP_SUBNET_TRANSPORT:
404 /* use defaults above */
406 case GBP_SUBNET_STITCHED_EXTERNAL:
407 sw_if_index = gs->gs_stitched_external.gs_sw_if_index;
408 sclass = gs->gs_stitched_external.gs_sclass;
410 case GBP_SUBNET_L3_OUT:
411 sclass = gs->gs_l3_out.gs_sclass;
415 if (WALK_STOP == cb (grd->grd_id, &gs->gs_key->gsk_pfx,
416 gs->gs_type, sw_if_index, sclass, ctx))
422 typedef enum gsb_subnet_show_flags_t_
424 GBP_SUBNET_SHOW_BRIEF,
425 GBP_SUBNET_SHOW_DETAILS,
426 } gsb_subnet_show_flags_t;
429 format_gbp_subnet_type (u8 * s, va_list * args)
431 gbp_subnet_type_t type = va_arg (*args, gbp_subnet_type_t);
435 case GBP_SUBNET_STITCHED_INTERNAL:
436 return (format (s, "stitched-internal"));
437 case GBP_SUBNET_STITCHED_EXTERNAL:
438 return (format (s, "stitched-external"));
439 case GBP_SUBNET_TRANSPORT:
440 return (format (s, "transport"));
441 case GBP_SUBNET_L3_OUT:
442 return (format (s, "l3-out"));
445 return (format (s, "unknown"));
449 format_gbp_subnet (u8 * s, va_list * args)
451 index_t gsi = va_arg (*args, index_t);
452 gsb_subnet_show_flags_t flags = va_arg (*args, gsb_subnet_show_flags_t);
456 gs = pool_elt_at_index (gbp_subnet_pool, gsi);
458 table_id = fib_table_get_table_id (gs->gs_key->gsk_fib_index,
459 gs->gs_key->gsk_pfx.fp_proto);
461 s = format (s, "[%d] tbl:%d %U %U", gsi, table_id,
462 format_fib_prefix, &gs->gs_key->gsk_pfx,
463 format_gbp_subnet_type, gs->gs_type);
467 case GBP_SUBNET_STITCHED_INTERNAL:
468 case GBP_SUBNET_TRANSPORT:
470 case GBP_SUBNET_STITCHED_EXTERNAL:
471 s = format (s, " {sclass:%d %U}", gs->gs_stitched_external.gs_sclass,
472 format_vnet_sw_if_index_name,
473 vnet_get_main (), gs->gs_stitched_external.gs_sw_if_index);
475 case GBP_SUBNET_L3_OUT:
476 s = format (s, " {sclass:%d}", gs->gs_l3_out.gs_sclass);
482 case GBP_SUBNET_SHOW_DETAILS:
484 s = format (s, "\n %U", format_fib_entry, gs->gs_fei,
485 FIB_ENTRY_FORMAT_DETAIL);
487 case GBP_SUBNET_SHOW_BRIEF:
493 static clib_error_t *
494 gbp_subnet_show (vlib_main_t * vm,
495 unformat_input_t * input, vlib_cli_command_t * cmd)
501 while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
503 if (unformat (input, "%d", &gsi))
509 if (INDEX_INVALID != gsi)
511 vlib_cli_output (vm, "%U", format_gbp_subnet, gsi,
512 GBP_SUBNET_SHOW_DETAILS);
517 pool_foreach_index(gsi, gbp_subnet_pool,
519 vlib_cli_output (vm, "%U", format_gbp_subnet, gsi,
520 GBP_SUBNET_SHOW_BRIEF);
529 * Show Group Based Policy Subnets
532 * @cliexstart{show gbp subnet}
536 VLIB_CLI_COMMAND (gbp_subnet_show_node, static) = {
537 .path = "show gbp subnet",
538 .short_help = "show gbp subnet\n",
539 .function = gbp_subnet_show,
543 static clib_error_t *
544 gbp_subnet_init (vlib_main_t * vm)
546 gbp_subnet_db = hash_create_mem (0,
547 sizeof (gbp_subnet_key_t), sizeof (u32));
552 VLIB_INIT_FUNCTION (gbp_subnet_init);
555 * fd.io coding-style-patch-verification: ON
558 * eval: (c-set-style "gnu")