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