src/plugins/gbp/gbp_policy_dpo.c

   1 /*
   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:
   6  *
   7  *     http://www.apache.org/licenses/LICENSE-2.0
   8  *
   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.
  14  */
  15
  16 #include <vnet/dpo/dvr_dpo.h>
  17 #include <vnet/dpo/drop_dpo.h>
  18 #include <vnet/vxlan-gbp/vxlan_gbp_packet.h>
  19
  20 #include <plugins/gbp/gbp.h>
  21 #include <plugins/gbp/gbp_policy_dpo.h>
  22 #include <plugins/gbp/gbp_recirc.h>
  23
  24 #ifndef CLIB_MARCH_VARIANT
  25 /**
  26  * DPO pool
  27  */
  28 gbp_policy_dpo_t *gbp_policy_dpo_pool;
  29
  30 /**
  31  * DPO type registered for these GBP FWD
  32  */
  33 dpo_type_t gbp_policy_dpo_type;
  34
  35 static gbp_policy_dpo_t *
  36 gbp_policy_dpo_alloc (void)
  37 {
  38   gbp_policy_dpo_t *gpd;
  39
  40   pool_get_aligned_zero (gbp_policy_dpo_pool, gpd, CLIB_CACHE_LINE_BYTES);
  41
  42   return (gpd);
  43 }
  44
  45 static inline gbp_policy_dpo_t *
  46 gbp_policy_dpo_get_from_dpo (const dpo_id_t * dpo)
  47 {
  48   ASSERT (gbp_policy_dpo_type == dpo->dpoi_type);
  49
  50   return (gbp_policy_dpo_get (dpo->dpoi_index));
  51 }
  52
  53 static inline index_t
  54 gbp_policy_dpo_get_index (gbp_policy_dpo_t * gpd)
  55 {
  56   return (gpd - gbp_policy_dpo_pool);
  57 }
  58
  59 static void
  60 gbp_policy_dpo_lock (dpo_id_t * dpo)
  61 {
  62   gbp_policy_dpo_t *gpd;
  63
  64   gpd = gbp_policy_dpo_get_from_dpo (dpo);
  65   gpd->gpd_locks++;
  66 }
  67
  68 static void
  69 gbp_policy_dpo_unlock (dpo_id_t * dpo)
  70 {
  71   gbp_policy_dpo_t *gpd;
  72
  73   gpd = gbp_policy_dpo_get_from_dpo (dpo);
  74   gpd->gpd_locks--;
  75
  76   if (0 == gpd->gpd_locks)
  77     {
  78       dpo_reset (&gpd->gpd_dpo);
  79       pool_put (gbp_policy_dpo_pool, gpd);
  80     }
  81 }
  82
  83 static u32
  84 gbp_policy_dpo_get_urpf (const dpo_id_t * dpo)
  85 {
  86   gbp_policy_dpo_t *gpd;
  87
  88   gpd = gbp_policy_dpo_get_from_dpo (dpo);
  89
  90   return (gpd->gpd_sw_if_index);
  91 }
  92
  93 void
  94 gbp_policy_dpo_add_or_lock (dpo_proto_t dproto,
  95                             sclass_t sclass, u32 sw_if_index, dpo_id_t * dpo)
  96 {
  97   gbp_policy_dpo_t *gpd;
  98   dpo_id_t parent = DPO_INVALID;
  99
 100   gpd = gbp_policy_dpo_alloc ();
 101
 102   gpd->gpd_proto = dproto;
 103   gpd->gpd_sw_if_index = sw_if_index;
 104   gpd->gpd_sclass = sclass;
 105
 106   if (~0 != sw_if_index)
 107     {
 108       /*
 109        * stack on the DVR DPO for the output interface
 110        */
 111       dvr_dpo_add_or_lock (sw_if_index, dproto, &parent);
 112     }
 113   else
 114     {
 115       dpo_copy (&parent, drop_dpo_get (dproto));
 116     }
 117
 118   dpo_stack (gbp_policy_dpo_type, dproto, &gpd->gpd_dpo, &parent);
 119   dpo_set (dpo, gbp_policy_dpo_type, dproto, gbp_policy_dpo_get_index (gpd));
 120 }
 121
 122 u8 *
 123 format_gbp_policy_dpo (u8 * s, va_list * ap)
 124 {
 125   index_t index = va_arg (*ap, index_t);
 126   u32 indent = va_arg (*ap, u32);
 127   gbp_policy_dpo_t *gpd = gbp_policy_dpo_get (index);
 128   vnet_main_t *vnm = vnet_get_main ();
 129
 130   s = format (s, "gbp-policy-dpo: %U, sclass:%d out:%U",
 131               format_dpo_proto, gpd->gpd_proto,
 132               (int) gpd->gpd_sclass,
 133               format_vnet_sw_if_index_name, vnm, gpd->gpd_sw_if_index);
 134   s = format (s, "\n%U", format_white_space, indent + 2);
 135   s = format (s, "%U", format_dpo_id, &gpd->gpd_dpo, indent + 4);
 136
 137   return (s);
 138 }
 139
 140 /**
 141  * Interpose a policy DPO
 142  */
 143 static void
 144 gbp_policy_dpo_interpose (const dpo_id_t * original,
 145                           const dpo_id_t * parent, dpo_id_t * clone)
 146 {
 147   gbp_policy_dpo_t *gpd, *gpd_clone;
 148
 149   gpd_clone = gbp_policy_dpo_alloc ();
 150   gpd = gbp_policy_dpo_get (original->dpoi_index);
 151
 152   gpd_clone->gpd_proto = gpd->gpd_proto;
 153   gpd_clone->gpd_sclass = gpd->gpd_sclass;
 154   gpd_clone->gpd_sw_if_index = gpd->gpd_sw_if_index;
 155
 156   dpo_stack (gbp_policy_dpo_type,
 157              gpd_clone->gpd_proto, &gpd_clone->gpd_dpo, parent);
 158
 159   dpo_set (clone,
 160            gbp_policy_dpo_type,
 161            gpd_clone->gpd_proto, gbp_policy_dpo_get_index (gpd_clone));
 162 }
 163
 164 const static dpo_vft_t gbp_policy_dpo_vft = {
 165   .dv_lock = gbp_policy_dpo_lock,
 166   .dv_unlock = gbp_policy_dpo_unlock,
 167   .dv_format = format_gbp_policy_dpo,
 168   .dv_get_urpf = gbp_policy_dpo_get_urpf,
 169   .dv_mk_interpose = gbp_policy_dpo_interpose,
 170 };
 171
 172 /**
 173  * @brief The per-protocol VLIB graph nodes that are assigned to a glean
 174  *        object.
 175  *
 176  * this means that these graph nodes are ones from which a glean is the
 177  * parent object in the DPO-graph.
 178  */
 179 const static char *const gbp_policy_dpo_ip4_nodes[] = {
 180   "ip4-gbp-policy-dpo",
 181   NULL,
 182 };
 183
 184 const static char *const gbp_policy_dpo_ip6_nodes[] = {
 185   "ip6-gbp-policy-dpo",
 186   NULL,
 187 };
 188
 189 const static char *const *const gbp_policy_dpo_nodes[DPO_PROTO_NUM] = {
 190   [DPO_PROTO_IP4] = gbp_policy_dpo_ip4_nodes,
 191   [DPO_PROTO_IP6] = gbp_policy_dpo_ip6_nodes,
 192 };
 193
 194 dpo_type_t
 195 gbp_policy_dpo_get_type (void)
 196 {
 197   return (gbp_policy_dpo_type);
 198 }
 199
 200 static clib_error_t *
 201 gbp_policy_dpo_module_init (vlib_main_t * vm)
 202 {
 203   gbp_policy_dpo_type = dpo_register_new_type (&gbp_policy_dpo_vft,
 204                                                gbp_policy_dpo_nodes);
 205
 206   return (NULL);
 207 }
 208
 209 VLIB_INIT_FUNCTION (gbp_policy_dpo_module_init);
 210 #endif /* CLIB_MARCH_VARIANT */
 211
 212 typedef struct gbp_policy_dpo_trace_t_
 213 {
 214   u32 sclass;
 215   u32 dclass;
 216   u32 acl_index;
 217   u32 a_bit;
 218   u32 action;
 219 } gbp_policy_dpo_trace_t;
 220
 221 typedef enum
 222 {
 223   GBP_POLICY_DROP,
 224   GBP_POLICY_N_NEXT,
 225 } gbp_policy_next_t;
 226
 227 always_inline u32
 228 gbp_rule_l3_redirect (const gbp_rule_t * gu, vlib_buffer_t * b0, int is_ip6)
 229 {
 230   gbp_policy_node_t pnode;
 231   const dpo_id_t *dpo;
 232   dpo_proto_t dproto;
 233
 234   pnode = (is_ip6 ? GBP_POLICY_NODE_IP6 : GBP_POLICY_NODE_IP4);
 235   dproto = (is_ip6 ? DPO_PROTO_IP6 : DPO_PROTO_IP4);
 236   dpo = &gu->gu_dpo[pnode][dproto];
 237
 238   /* The flow hash is still valid as this is a IP packet being switched */
 239   vnet_buffer (b0)->ip.adj_index[VLIB_TX] = dpo->dpoi_index;
 240
 241   return (dpo->dpoi_next_node);
 242 }
 243
 244 always_inline uword
 245 gbp_policy_dpo_inline (vlib_main_t * vm,
 246                        vlib_node_runtime_t * node,
 247                        vlib_frame_t * from_frame, u8 is_ip6)
 248 {
 249   gbp_main_t *gm = &gbp_main;
 250   u32 n_left_from, next_index, *from, *to_next;
 251   gbp_rule_t *gu;
 252
 253   from = vlib_frame_vector_args (from_frame);
 254   n_left_from = from_frame->n_vectors;
 255
 256   next_index = node->cached_next_index;
 257
 258   while (n_left_from > 0)
 259     {
 260       u32 n_left_to_next;
 261
 262       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
 263
 264       while (n_left_from > 0 && n_left_to_next > 0)
 265         {
 266           const gbp_policy_dpo_t *gpd0;
 267           u32 bi0, next0;
 268           gbp_contract_key_t key0;
 269           gbp_contract_t *gc0;
 270           vlib_buffer_t *b0;
 271           index_t gci0;
 272           u8 action0;
 273
 274           action0 = 0;
 275           bi0 = from[0];
 276           to_next[0] = bi0;
 277           from += 1;
 278           to_next += 1;
 279           n_left_from -= 1;
 280           n_left_to_next -= 1;
 281           next0 = GBP_POLICY_DROP;
 282
 283           b0 = vlib_get_buffer (vm, bi0);
 284
 285           gc0 = NULL;
 286           gpd0 = gbp_policy_dpo_get (vnet_buffer (b0)->ip.adj_index[VLIB_TX]);
 287           vnet_buffer (b0)->ip.adj_index[VLIB_TX] = gpd0->gpd_dpo.dpoi_index;
 288
 289           if (vnet_buffer2 (b0)->gbp.flags & VXLAN_GBP_GPFLAGS_A)
 290             {
 291               next0 = gpd0->gpd_dpo.dpoi_next_node;
 292               key0.as_u32 = ~0;
 293               goto trace;
 294             }
 295
 296           key0.gck_src = vnet_buffer2 (b0)->gbp.sclass;
 297           key0.gck_dst = gpd0->gpd_sclass;
 298
 299           if (SCLASS_INVALID != key0.gck_src)
 300             {
 301               if (PREDICT_FALSE (key0.gck_src == key0.gck_dst))
 302                 {
 303                   /*
 304                    * intra-epg allowed
 305                    */
 306                   next0 = gpd0->gpd_dpo.dpoi_next_node;
 307                   vnet_buffer2 (b0)->gbp.flags |= VXLAN_GBP_GPFLAGS_A;
 308                   action0 = 0;
 309                 }
 310               else
 311                 {
 312                   gci0 = gbp_contract_find (&key0);
 313
 314                   if (INDEX_INVALID != gci0)
 315                     {
 316                       fa_5tuple_opaque_t pkt_5tuple0;
 317                       u32 acl_pos_p0, acl_match_p0;
 318                       u32 rule_match_p0, trace_bitmap0;
 319                       /*
 320                        * tests against the ACL
 321                        */
 322                       gc0 = gbp_contract_get (gci0);
 323                       acl_plugin_fill_5tuple_inline (gm->
 324                                                      acl_plugin.p_acl_main,
 325                                                      gc0->gc_lc_index, b0,
 326                                                      is_ip6,
 327                                                      /* is_input */ 1,
 328                                                      /* is_l2_path */ 0,
 329                                                      &pkt_5tuple0);
 330                       acl_plugin_match_5tuple_inline (gm->
 331                                                       acl_plugin.p_acl_main,
 332                                                       gc0->gc_lc_index,
 333                                                       &pkt_5tuple0, is_ip6,
 334                                                       &action0, &acl_pos_p0,
 335                                                       &acl_match_p0,
 336                                                       &rule_match_p0,
 337                                                       &trace_bitmap0);
 338
 339                       if (action0 > 0)
 340                         {
 341                           vnet_buffer2 (b0)->gbp.flags |= VXLAN_GBP_GPFLAGS_A;
 342                           gu = gbp_rule_get (gc0->gc_rules[rule_match_p0]);
 343                           action0 = gu->gu_action;
 344
 345                           switch (gu->gu_action)
 346                             {
 347                             case GBP_RULE_PERMIT:
 348                               next0 = gpd0->gpd_dpo.dpoi_next_node;
 349                               break;
 350                             case GBP_RULE_DENY:
 351                               next0 = 0;
 352                               break;
 353                             case GBP_RULE_REDIRECT:
 354                               next0 = gbp_rule_l3_redirect (gu, b0, is_ip6);
 355                               break;
 356                             }
 357                         }
 358                     }
 359                 }
 360             }
 361           else
 362             {
 363               /*
 364                * the src EPG is not set when the packet arrives on an EPG
 365                * uplink interface and we do not need to apply policy
 366                */
 367               next0 = gpd0->gpd_dpo.dpoi_next_node;
 368             }
 369         trace:
 370           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
 371             {
 372               gbp_policy_dpo_trace_t *tr;
 373
 374               tr = vlib_add_trace (vm, node, b0, sizeof (*tr));
 375               tr->sclass = key0.gck_src;
 376               tr->dclass = key0.gck_dst;
 377               tr->acl_index = (gc0 ? gc0->gc_acl_index : ~0);
 378               tr->a_bit = vnet_buffer2 (b0)->gbp.flags & VXLAN_GBP_GPFLAGS_A;
 379               tr->action = action0;
 380             }
 381
 382           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
 383                                            n_left_to_next, bi0, next0);
 384         }
 385       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
 386     }
 387   return from_frame->n_vectors;
 388 }
 389
 390 static u8 *
 391 format_gbp_policy_dpo_trace (u8 * s, va_list * args)
 392 {
 393   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
 394   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
 395   gbp_policy_dpo_trace_t *t = va_arg (*args, gbp_policy_dpo_trace_t *);
 396
 397   s = format (s, " sclass:%d dclass:%d acl-index:%d a-bit:%d action:%d",
 398               t->sclass, t->dclass, t->acl_index, t->a_bit, t->action);
 399
 400   return s;
 401 }
 402
 403 VLIB_NODE_FN (ip4_gbp_policy_dpo_node) (vlib_main_t * vm,
 404                                         vlib_node_runtime_t * node,
 405                                         vlib_frame_t * from_frame)
 406 {
 407   return (gbp_policy_dpo_inline (vm, node, from_frame, 0));
 408 }
 409
 410 VLIB_NODE_FN (ip6_gbp_policy_dpo_node) (vlib_main_t * vm,
 411                                         vlib_node_runtime_t * node,
 412                                         vlib_frame_t * from_frame)
 413 {
 414   return (gbp_policy_dpo_inline (vm, node, from_frame, 1));
 415 }
 416
 417 /* *INDENT-OFF* */
 418 VLIB_REGISTER_NODE (ip4_gbp_policy_dpo_node) = {
 419     .name = "ip4-gbp-policy-dpo",
 420     .vector_size = sizeof (u32),
 421     .format_trace = format_gbp_policy_dpo_trace,
 422     .n_next_nodes = GBP_POLICY_N_NEXT,
 423     .next_nodes =
 424     {
 425         [GBP_POLICY_DROP] = "ip4-drop",
 426     }
 427 };
 428 VLIB_REGISTER_NODE (ip6_gbp_policy_dpo_node) = {
 429     .name = "ip6-gbp-policy-dpo",
 430     .vector_size = sizeof (u32),
 431     .format_trace = format_gbp_policy_dpo_trace,
 432     .n_next_nodes = GBP_POLICY_N_NEXT,
 433     .next_nodes =
 434     {
 435         [GBP_POLICY_DROP] = "ip6-drop",
 436     }
 437 };
 438 /* *INDENT-ON* */
 439
 440 /*
 441  * fd.io coding-style-patch-verification: ON
 442  *
 443  * Local Variables:
 444  * eval: (c-set-style "gnu")
 445  * End:
 446  */