src/vnet/lisp-gpe/interface.c

   1 /*
   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:
   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 /**
  17  * @file
  18  * @brief Common utility functions for LISP-GPE interfaces.
  19  *
  20  */
  21
  22 #include <vppinfra/error.h>
  23 #include <vppinfra/hash.h>
  24 #include <vnet/vnet.h>
  25 #include <vnet/ip/ip.h>
  26 #include <vnet/udp/udp.h>
  27 #include <vnet/ethernet/ethernet.h>
  28 #include <vnet/lisp-gpe/lisp_gpe.h>
  29 #include <vnet/lisp-gpe/lisp_gpe_fwd_entry.h>
  30 #include <vnet/lisp-gpe/lisp_gpe_tenant.h>
  31 #include <vnet/lisp-gpe/lisp_gpe_adjacency.h>
  32 #include <vnet/adj/adj.h>
  33 #include <vnet/fib/fib_table.h>
  34 #include <vnet/fib/ip4_fib.h>
  35 #include <vnet/fib/ip6_fib.h>
  36 #include <vnet/lisp-cp/lisp_cp_dpo.h>
  37
  38 /**
  39  * @brief The VLIB node arc/edge from the interface's TX node, to the L2
  40  * load-balanceing node. Which is where all packets go
  41  */
  42 static uword l2_arc_to_lb;
  43
  44 #define foreach_lisp_gpe_tx_next        \
  45   _(DROP, "error-drop")                 \
  46   _(IP4_LOOKUP, "ip4-lookup")           \
  47   _(IP6_LOOKUP, "ip6-lookup")
  48
  49 typedef enum
  50 {
  51 #define _(sym,str) LISP_GPE_TX_NEXT_##sym,
  52   foreach_lisp_gpe_tx_next
  53 #undef _
  54     LISP_GPE_TX_N_NEXT,
  55 } lisp_gpe_tx_next_t;
  56
  57 typedef struct
  58 {
  59   u32 tunnel_index;
  60 } lisp_gpe_tx_trace_t;
  61
  62 u8 *
  63 format_lisp_gpe_tx_trace (u8 * s, va_list * args)
  64 {
  65   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
  66   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
  67   lisp_gpe_tx_trace_t *t = va_arg (*args, lisp_gpe_tx_trace_t *);
  68
  69   s = format (s, "LISP-GPE-TX: tunnel %d", t->tunnel_index);
  70   return s;
  71 }
  72
  73 #define is_v4_packet(_h) ((*(u8*) _h) & 0xF0) == 0x40
  74
  75 /**
  76  * @brief LISP-GPE interface TX (encap) function.
  77  * @node lisp_gpe_interface_tx
  78  *
  79  * The LISP-GPE interface TX (encap) function.
  80  *
  81  * Looks up the associated tunnel based on the adjacency hit in the SD FIB
  82  * and if the tunnel is multihomed it uses the flow hash to determine
  83  * sub-tunnel, and rewrite string, to be used to encapsulate the packet.
  84  *
  85  * @param[in]   vm      vlib_main_t corresponding to the current thread.
  86  * @param[in]   node    vlib_node_runtime_t data for this node.
  87  * @param[in]   frame   vlib_frame_t whose contents should be dispatched.
  88  *
  89  * @return number of vectors in frame.
  90  */
  91 static uword
  92 lisp_gpe_interface_tx (vlib_main_t * vm, vlib_node_runtime_t * node,
  93                        vlib_frame_t * from_frame)
  94 {
  95   u32 n_left_from, next_index, *from, *to_next;
  96   lisp_gpe_main_t *lgm = &lisp_gpe_main;
  97
  98   from = vlib_frame_vector_args (from_frame);
  99   n_left_from = from_frame->n_vectors;
 100
 101   next_index = node->cached_next_index;
 102
 103   while (n_left_from > 0)
 104     {
 105       u32 n_left_to_next;
 106
 107       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
 108
 109       while (n_left_from > 0 && n_left_to_next > 0)
 110         {
 111           u32 bi0, adj_index0, next0;
 112           const ip_adjacency_t *adj0;
 113           const dpo_id_t *dpo0;
 114           vlib_buffer_t *b0;
 115           u8 is_v4_0;
 116
 117           bi0 = from[0];
 118           to_next[0] = bi0;
 119           from += 1;
 120           to_next += 1;
 121           n_left_from -= 1;
 122           n_left_to_next -= 1;
 123
 124           b0 = vlib_get_buffer (vm, bi0);
 125
 126           /* Fixup the checksum and len fields in the LISP tunnel encap
 127            * that was applied at the midchain node */
 128           is_v4_0 = is_v4_packet (vlib_buffer_get_current (b0));
 129           ip_udp_fixup_one (lgm->vlib_main, b0, is_v4_0);
 130
 131           /* Follow the DPO on which the midchain is stacked */
 132           adj_index0 = vnet_buffer (b0)->ip.adj_index[VLIB_TX];
 133           adj0 = adj_get (adj_index0);
 134           dpo0 = &adj0->sub_type.midchain.next_dpo;
 135           next0 = dpo0->dpoi_next_node;
 136           vnet_buffer (b0)->ip.adj_index[VLIB_TX] = dpo0->dpoi_index;
 137
 138           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
 139             {
 140               lisp_gpe_tx_trace_t *tr = vlib_add_trace (vm, node, b0,
 141                                                         sizeof (*tr));
 142               tr->tunnel_index = adj_index0;
 143             }
 144           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
 145                                            n_left_to_next, bi0, next0);
 146         }
 147
 148       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
 149     }
 150
 151   return from_frame->n_vectors;
 152 }
 153
 154 static u8 *
 155 format_lisp_gpe_name (u8 * s, va_list * args)
 156 {
 157   u32 dev_instance = va_arg (*args, u32);
 158   return format (s, "lisp_gpe%d", dev_instance);
 159 }
 160
 161 /* *INDENT-OFF* */
 162 VNET_DEVICE_CLASS (lisp_gpe_device_class) = {
 163   .name = "LISP_GPE",
 164   .format_device_name = format_lisp_gpe_name,
 165   .format_tx_trace = format_lisp_gpe_tx_trace,
 166   .tx_function = lisp_gpe_interface_tx,
 167 };
 168 /* *INDENT-ON* */
 169
 170 u8 *
 171 format_lisp_gpe_header_with_length (u8 * s, va_list * args)
 172 {
 173   lisp_gpe_header_t *h = va_arg (*args, lisp_gpe_header_t *);
 174   u32 max_header_bytes = va_arg (*args, u32);
 175   u32 header_bytes;
 176
 177   header_bytes = sizeof (h[0]);
 178   if (max_header_bytes != 0 && header_bytes > max_header_bytes)
 179     return format (s, "lisp-gpe header truncated");
 180
 181   s = format (s, "flags: ");
 182 #define _(n,v) if (h->flags & v) s = format (s, "%s ", #n);
 183   foreach_lisp_gpe_flag_bit;
 184 #undef _
 185
 186   s = format (s, "\n  ver_res %d res %d next_protocol %d iid %d(%x)",
 187               h->ver_res, h->res, h->next_protocol,
 188               clib_net_to_host_u32 (h->iid << 8),
 189               clib_net_to_host_u32 (h->iid << 8));
 190   return s;
 191 }
 192
 193 /* *INDENT-OFF* */
 194 VNET_HW_INTERFACE_CLASS (lisp_gpe_hw_class) = {
 195   .name = "LISP_GPE",
 196   .format_header = format_lisp_gpe_header_with_length,
 197   .build_rewrite = lisp_gpe_build_rewrite,
 198   .update_adjacency = lisp_gpe_update_adjacency,
 199 };
 200 /* *INDENT-ON* */
 201
 202
 203 typedef struct
 204 {
 205   u32 dpo_index;
 206 } l2_lisp_gpe_tx_trace_t;
 207
 208 static u8 *
 209 format_l2_lisp_gpe_tx_trace (u8 * s, va_list * args)
 210 {
 211   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
 212   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
 213   l2_lisp_gpe_tx_trace_t *t = va_arg (*args, l2_lisp_gpe_tx_trace_t *);
 214
 215   s = format (s, "L2-LISP-GPE-TX: load-balance %d", t->dpo_index);
 216   return s;
 217 }
 218
 219 /**
 220  * @brief LISP-GPE interface TX (encap) function for L2 overlays.
 221  * @node l2_lisp_gpe_interface_tx
 222  *
 223  * The L2 LISP-GPE interface TX (encap) function.
 224  *
 225  * Uses bridge domain index, source and destination ethernet addresses to
 226  * lookup tunnel. If the tunnel is multihomed a flow has is used to determine
 227  * the sub-tunnel and therefore the rewrite string to be used to encapsulate
 228  * the packets.
 229  *
 230  * @param[in]   vm        vlib_main_t corresponding to the current thread.
 231  * @param[in]   node      vlib_node_runtime_t data for this node.
 232  * @param[in]   frame     vlib_frame_t whose contents should be dispatched.
 233  *
 234  * @return number of vectors in frame.
 235  */
 236 static uword
 237 l2_lisp_gpe_interface_tx (vlib_main_t * vm, vlib_node_runtime_t * node,
 238                           vlib_frame_t * from_frame)
 239 {
 240   u32 n_left_from, next_index, *from, *to_next;
 241   lisp_gpe_main_t *lgm = &lisp_gpe_main;
 242   u32 thread_index = vlib_get_thread_index ();
 243   vlib_combined_counter_main_t *cm = &load_balance_main.lbm_to_counters;
 244
 245   from = vlib_frame_vector_args (from_frame);
 246   n_left_from = from_frame->n_vectors;
 247
 248   next_index = node->cached_next_index;
 249
 250   while (n_left_from > 0)
 251     {
 252       u32 n_left_to_next;
 253
 254       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
 255
 256       while (n_left_from > 0 && n_left_to_next > 0)
 257         {
 258           vlib_buffer_t *b0;
 259           u32 bi0, lbi0;
 260           ethernet_header_t *e0;
 261
 262           bi0 = from[0];
 263           to_next[0] = bi0;
 264           from += 1;
 265           to_next += 1;
 266           n_left_from -= 1;
 267           n_left_to_next -= 1;
 268
 269           b0 = vlib_get_buffer (vm, bi0);
 270           e0 = vlib_buffer_get_current (b0);
 271
 272           vnet_buffer (b0)->lisp.overlay_afi = LISP_AFI_MAC;
 273
 274           /* lookup dst + src mac */
 275           lbi0 = lisp_l2_fib_lookup (lgm, vnet_buffer (b0)->l2.bd_index,
 276                                      e0->src_address, e0->dst_address);
 277           vnet_buffer (b0)->ip.adj_index[VLIB_TX] = lbi0;
 278
 279           vlib_increment_combined_counter (cm, thread_index, lbi0, 1,
 280                                            vlib_buffer_length_in_chain (vm,
 281                                                                         b0));
 282           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
 283             {
 284               l2_lisp_gpe_tx_trace_t *tr = vlib_add_trace (vm, node, b0,
 285                                                            sizeof (*tr));
 286               tr->dpo_index = lbi0;
 287             }
 288           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
 289                                            n_left_to_next, bi0, l2_arc_to_lb);
 290         }
 291
 292       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
 293     }
 294
 295   return from_frame->n_vectors;
 296 }
 297
 298 static u8 *
 299 format_l2_lisp_gpe_name (u8 * s, va_list * args)
 300 {
 301   u32 dev_instance = va_arg (*args, u32);
 302   return format (s, "l2_lisp_gpe%d", dev_instance);
 303 }
 304
 305 /* *INDENT-OFF* */
 306 VNET_DEVICE_CLASS (l2_lisp_gpe_device_class,static) = {
 307   .name = "L2_LISP_GPE",
 308   .format_device_name = format_l2_lisp_gpe_name,
 309   .format_tx_trace = format_l2_lisp_gpe_tx_trace,
 310   .tx_function = l2_lisp_gpe_interface_tx,
 311 };
 312 /* *INDENT-ON* */
 313
 314 typedef struct
 315 {
 316   u32 dpo_index;
 317 } nsh_lisp_gpe_tx_trace_t;
 318
 319 u8 *
 320 format_nsh_lisp_gpe_tx_trace (u8 * s, va_list * args)
 321 {
 322   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
 323   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
 324   nsh_lisp_gpe_tx_trace_t *t = va_arg (*args, nsh_lisp_gpe_tx_trace_t *);
 325
 326   s = format (s, "NSH-GPE-TX: tunnel %d", t->dpo_index);
 327   return s;
 328 }
 329
 330 /**
 331  * @brief LISP-GPE interface TX for NSH overlays.
 332  * @node nsh_lisp_gpe_interface_tx
 333  *
 334  * The NSH LISP-GPE interface TX function.
 335  *
 336  * @param[in]   vm        vlib_main_t corresponding to the current thread.
 337  * @param[in]   node      vlib_node_runtime_t data for this node.
 338  * @param[in]   frame     vlib_frame_t whose contents should be dispatched.
 339  *
 340  * @return number of vectors in frame.
 341  */
 342 static uword
 343 nsh_lisp_gpe_interface_tx (vlib_main_t * vm, vlib_node_runtime_t * node,
 344                            vlib_frame_t * from_frame)
 345 {
 346   u32 n_left_from, next_index, *from, *to_next;
 347   lisp_gpe_main_t *lgm = &lisp_gpe_main;
 348
 349   from = vlib_frame_vector_args (from_frame);
 350   n_left_from = from_frame->n_vectors;
 351
 352   next_index = node->cached_next_index;
 353
 354   while (n_left_from > 0)
 355     {
 356       u32 n_left_to_next;
 357
 358       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
 359
 360       while (n_left_from > 0 && n_left_to_next > 0)
 361         {
 362           vlib_buffer_t *b0;
 363           u32 bi0;
 364           u32 *nsh0, next0;
 365           const dpo_id_t *dpo0;
 366
 367           bi0 = from[0];
 368           to_next[0] = bi0;
 369           from += 1;
 370           to_next += 1;
 371           n_left_from -= 1;
 372           n_left_to_next -= 1;
 373
 374           b0 = vlib_get_buffer (vm, bi0);
 375           nsh0 = vlib_buffer_get_current (b0);
 376
 377           vnet_buffer (b0)->lisp.overlay_afi = LISP_AFI_LCAF;
 378
 379           /* lookup SPI + SI (second word of the NSH header).
 380            * NB: Load balancing was done by the control plane */
 381           dpo0 = lisp_nsh_fib_lookup (lgm, nsh0[1]);
 382
 383           next0 = dpo0->dpoi_next_node;
 384           vnet_buffer (b0)->ip.adj_index[VLIB_TX] = dpo0->dpoi_index;
 385
 386           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
 387             {
 388               nsh_lisp_gpe_tx_trace_t *tr = vlib_add_trace (vm, node, b0,
 389                                                             sizeof (*tr));
 390               tr->dpo_index = dpo0->dpoi_index;
 391             }
 392           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
 393                                            n_left_to_next, bi0, next0);
 394         }
 395
 396       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
 397     }
 398
 399   return from_frame->n_vectors;
 400 }
 401
 402 static u8 *
 403 format_nsh_lisp_gpe_name (u8 * s, va_list * args)
 404 {
 405   u32 dev_instance = va_arg (*args, u32);
 406   return format (s, "nsh_lisp_gpe%d", dev_instance);
 407 }
 408
 409 /* *INDENT-OFF* */
 410 VNET_DEVICE_CLASS (nsh_lisp_gpe_device_class,static) = {
 411   .name = "NSH_LISP_GPE",
 412   .format_device_name = format_nsh_lisp_gpe_name,
 413   .format_tx_trace = format_nsh_lisp_gpe_tx_trace,
 414   .tx_function = nsh_lisp_gpe_interface_tx,
 415 };
 416 /* *INDENT-ON* */
 417
 418 static vnet_hw_interface_t *
 419 lisp_gpe_create_iface (lisp_gpe_main_t * lgm, u32 vni, u32 dp_table,
 420                        vnet_device_class_t * dev_class,
 421                        tunnel_lookup_t * tuns)
 422 {
 423   u32 flen;
 424   u32 hw_if_index = ~0;
 425   u8 *new_name;
 426   vnet_hw_interface_t *hi;
 427   vnet_main_t *vnm = lgm->vnet_main;
 428
 429   /* create hw lisp_gpeX iface if needed, otherwise reuse existing */
 430   flen = vec_len (lgm->free_tunnel_hw_if_indices);
 431   if (flen > 0)
 432     {
 433       hw_if_index = lgm->free_tunnel_hw_if_indices[flen - 1];
 434       _vec_len (lgm->free_tunnel_hw_if_indices) -= 1;
 435
 436       hi = vnet_get_hw_interface (vnm, hw_if_index);
 437
 438       /* rename interface */
 439       new_name = format (0, "%U", dev_class->format_device_name, vni);
 440
 441       vec_add1 (new_name, 0);
 442       vnet_rename_interface (vnm, hw_if_index, (char *) new_name);
 443       vec_free (new_name);
 444
 445       /* clear old stats of freed interface before reuse */
 446       vnet_interface_main_t *im = &vnm->interface_main;
 447       vnet_interface_counter_lock (im);
 448       vlib_zero_combined_counter (&im->combined_sw_if_counters
 449                                   [VNET_INTERFACE_COUNTER_TX],
 450                                   hi->sw_if_index);
 451       vlib_zero_combined_counter (&im->combined_sw_if_counters
 452                                   [VNET_INTERFACE_COUNTER_RX],
 453                                   hi->sw_if_index);
 454       vlib_zero_simple_counter (&im->sw_if_counters
 455                                 [VNET_INTERFACE_COUNTER_DROP],
 456                                 hi->sw_if_index);
 457       vnet_interface_counter_unlock (im);
 458     }
 459   else
 460     {
 461       hw_if_index = vnet_register_interface (vnm, dev_class->index, vni,
 462                                              lisp_gpe_hw_class.index, 0);
 463       hi = vnet_get_hw_interface (vnm, hw_if_index);
 464     }
 465
 466   hash_set (tuns->hw_if_index_by_dp_table, dp_table, hw_if_index);
 467
 468   /* set tunnel termination: post decap, packets are tagged as having been
 469    * originated by lisp-gpe interface */
 470   hash_set (tuns->sw_if_index_by_vni, vni, hi->sw_if_index);
 471   hash_set (tuns->vni_by_sw_if_index, hi->sw_if_index, vni);
 472
 473   return hi;
 474 }
 475
 476 static void
 477 lisp_gpe_remove_iface (lisp_gpe_main_t * lgm, u32 hi_index, u32 dp_table,
 478                        tunnel_lookup_t * tuns)
 479 {
 480   vnet_main_t *vnm = lgm->vnet_main;
 481   vnet_hw_interface_t *hi;
 482   uword *vnip;
 483
 484   hi = vnet_get_hw_interface (vnm, hi_index);
 485
 486   /* disable interface */
 487   vnet_sw_interface_set_flags (vnm, hi->sw_if_index, 0 /* down */ );
 488   vnet_hw_interface_set_flags (vnm, hi->hw_if_index, 0 /* down */ );
 489   hash_unset (tuns->hw_if_index_by_dp_table, dp_table);
 490   vec_add1 (lgm->free_tunnel_hw_if_indices, hi->hw_if_index);
 491
 492   /* clean tunnel termination and vni to sw_if_index binding */
 493   vnip = hash_get (tuns->vni_by_sw_if_index, hi->sw_if_index);
 494   if (0 == vnip)
 495     {
 496       clib_warning ("No vni associated to interface %d", hi->sw_if_index);
 497       return;
 498     }
 499   hash_unset (tuns->sw_if_index_by_vni, vnip[0]);
 500   hash_unset (tuns->vni_by_sw_if_index, hi->sw_if_index);
 501 }
 502
 503 static void
 504 lisp_gpe_iface_set_table (u32 sw_if_index, u32 table_id)
 505 {
 506   fib_node_index_t fib_index;
 507
 508   fib_index = fib_table_find_or_create_and_lock (FIB_PROTOCOL_IP4, table_id);
 509   vec_validate (ip4_main.fib_index_by_sw_if_index, sw_if_index);
 510   ip4_main.fib_index_by_sw_if_index[sw_if_index] = fib_index;
 511   ip4_sw_interface_enable_disable (sw_if_index, 1);
 512
 513   fib_index = fib_table_find_or_create_and_lock (FIB_PROTOCOL_IP6, table_id);
 514   vec_validate (ip6_main.fib_index_by_sw_if_index, sw_if_index);
 515   ip6_main.fib_index_by_sw_if_index[sw_if_index] = fib_index;
 516   ip6_sw_interface_enable_disable (sw_if_index, 1);
 517 }
 518
 519 static void
 520 lisp_gpe_tenant_del_default_routes (u32 table_id)
 521 {
 522   fib_protocol_t proto;
 523
 524   FOR_EACH_FIB_IP_PROTOCOL (proto)
 525   {
 526     fib_prefix_t prefix = {
 527       .fp_proto = proto,
 528     };
 529     u32 fib_index;
 530
 531     fib_index = fib_table_find (prefix.fp_proto, table_id);
 532     fib_table_entry_special_remove (fib_index, &prefix, FIB_SOURCE_LISP);
 533     fib_table_unlock (fib_index, prefix.fp_proto);
 534   }
 535 }
 536
 537 static void
 538 lisp_gpe_tenant_add_default_routes (u32 table_id)
 539 {
 540   fib_protocol_t proto;
 541
 542   FOR_EACH_FIB_IP_PROTOCOL (proto)
 543   {
 544     fib_prefix_t prefix = {
 545       .fp_proto = proto,
 546     };
 547     u32 fib_index;
 548
 549     /*
 550      * Add a deafult route that results in a control plane punt DPO
 551      */
 552     fib_index = fib_table_find_or_create_and_lock (prefix.fp_proto, table_id);
 553     fib_table_entry_special_dpo_add (fib_index, &prefix, FIB_SOURCE_LISP,
 554                                      FIB_ENTRY_FLAG_EXCLUSIVE,
 555                                      lisp_cp_dpo_get (fib_proto_to_dpo
 556                                                       (proto)));
 557   }
 558 }
 559
 560
 561 /**
 562  * @brief Add/del LISP-GPE L3 interface.
 563  *
 564  * Creates LISP-GPE interface, sets ingress arcs from lisp_gpeX_lookup,
 565  * installs default routes that attract all traffic with no more specific
 566  * routes to lgpe-ipx-lookup, set egress arcs to ipx-lookup, sets
 567  * the interface in the right vrf and enables it.
 568  *
 569  * @param[in]   lgm     Reference to @ref lisp_gpe_main_t.
 570  * @param[in]   a       Parameters to create interface.
 571  *
 572  * @return number of vectors in frame.
 573  */
 574 u32
 575 lisp_gpe_add_l3_iface (lisp_gpe_main_t * lgm, u32 vni, u32 table_id)
 576 {
 577   vnet_main_t *vnm = lgm->vnet_main;
 578   tunnel_lookup_t *l3_ifaces = &lgm->l3_ifaces;
 579   vnet_hw_interface_t *hi;
 580   uword *hip, *si;
 581
 582   hip = hash_get (l3_ifaces->hw_if_index_by_dp_table, table_id);
 583
 584   if (hip)
 585     {
 586       clib_warning ("vrf %d already mapped to a vni", table_id);
 587       return ~0;
 588     }
 589
 590   si = hash_get (l3_ifaces->sw_if_index_by_vni, vni);
 591
 592   if (si)
 593     {
 594       clib_warning ("Interface for vni %d already exists", vni);
 595     }
 596
 597   /* create lisp iface and populate tunnel tables */
 598   hi = lisp_gpe_create_iface (lgm, vni, table_id,
 599                               &lisp_gpe_device_class, l3_ifaces);
 600
 601   /* insert default routes that point to lisp-cp lookup */
 602   lisp_gpe_iface_set_table (hi->sw_if_index, table_id);
 603   lisp_gpe_tenant_add_default_routes (table_id);
 604
 605   /* enable interface */
 606   vnet_sw_interface_set_flags (vnm, hi->sw_if_index,
 607                                VNET_SW_INTERFACE_FLAG_ADMIN_UP);
 608   vnet_hw_interface_set_flags (vnm, hi->hw_if_index,
 609                                VNET_HW_INTERFACE_FLAG_LINK_UP);
 610
 611   return (hi->sw_if_index);
 612 }
 613
 614 void
 615 lisp_gpe_del_l3_iface (lisp_gpe_main_t * lgm, u32 vni, u32 table_id)
 616 {
 617   vnet_main_t *vnm = lgm->vnet_main;
 618   tunnel_lookup_t *l3_ifaces = &lgm->l3_ifaces;
 619   vnet_hw_interface_t *hi;
 620   uword *hip;
 621
 622   hip = hash_get (l3_ifaces->hw_if_index_by_dp_table, table_id);
 623
 624   if (hip == 0)
 625     {
 626       clib_warning ("The interface for vrf %d doesn't exist", table_id);
 627       return;
 628     }
 629
 630   hi = vnet_get_hw_interface (vnm, hip[0]);
 631
 632   lisp_gpe_remove_iface (lgm, hip[0], table_id, &lgm->l3_ifaces);
 633
 634   /* unset default routes */
 635   ip4_sw_interface_enable_disable (hi->sw_if_index, 0);
 636   ip6_sw_interface_enable_disable (hi->sw_if_index, 0);
 637   lisp_gpe_tenant_del_default_routes (table_id);
 638 }
 639
 640 /**
 641  * @brief Add/del LISP-GPE L2 interface.
 642  *
 643  * Creates LISP-GPE interface, sets it in L2 mode in the appropriate
 644  * bridge domain, sets egress arcs and enables it.
 645  *
 646  * @param[in]   lgm     Reference to @ref lisp_gpe_main_t.
 647  * @param[in]   a       Parameters to create interface.
 648  *
 649  * @return number of vectors in frame.
 650  */
 651 u32
 652 lisp_gpe_add_l2_iface (lisp_gpe_main_t * lgm, u32 vni, u32 bd_id)
 653 {
 654   vnet_main_t *vnm = lgm->vnet_main;
 655   tunnel_lookup_t *l2_ifaces = &lgm->l2_ifaces;
 656   vnet_hw_interface_t *hi;
 657   uword *hip, *si;
 658   u16 bd_index;
 659
 660   if (bd_id > L2_BD_ID_MAX)
 661     {
 662       clib_warning ("bridge domain ID %d exceed 16M limit", bd_id);
 663       return ~0;
 664     }
 665
 666   bd_index = bd_find_or_add_bd_index (&bd_main, bd_id);
 667   hip = hash_get (l2_ifaces->hw_if_index_by_dp_table, bd_index);
 668
 669   if (hip)
 670     {
 671       clib_warning ("bridge domain %d already mapped to a vni", bd_id);
 672       return ~0;
 673     }
 674
 675   si = hash_get (l2_ifaces->sw_if_index_by_vni, vni);
 676   if (si)
 677     {
 678       clib_warning ("Interface for vni %d already exists", vni);
 679       return ~0;
 680     }
 681
 682   /* create lisp iface and populate tunnel tables */
 683   hi = lisp_gpe_create_iface (lgm, vni, bd_index,
 684                               &l2_lisp_gpe_device_class, &lgm->l2_ifaces);
 685
 686   /* enable interface */
 687   vnet_sw_interface_set_flags (vnm, hi->sw_if_index,
 688                                VNET_SW_INTERFACE_FLAG_ADMIN_UP);
 689   vnet_hw_interface_set_flags (vnm, hi->hw_if_index,
 690                                VNET_HW_INTERFACE_FLAG_LINK_UP);
 691
 692   l2_arc_to_lb = vlib_node_add_named_next (vlib_get_main (),
 693                                            hi->tx_node_index,
 694                                            "l2-load-balance");
 695
 696   /* we're ready. add iface to l2 bridge domain */
 697   set_int_l2_mode (lgm->vlib_main, vnm, MODE_L2_BRIDGE, hi->sw_if_index,
 698                    bd_index, 0, 0, 0);
 699
 700   return (hi->sw_if_index);
 701 }
 702
 703 /**
 704  * @brief Add/del LISP-GPE L2 interface.
 705  *
 706  * Creates LISP-GPE interface, sets it in L2 mode in the appropriate
 707  * bridge domain, sets egress arcs and enables it.
 708  *
 709  * @param[in]   lgm     Reference to @ref lisp_gpe_main_t.
 710  * @param[in]   a       Parameters to create interface.
 711  *
 712  * @return number of vectors in frame.
 713  */
 714 void
 715 lisp_gpe_del_l2_iface (lisp_gpe_main_t * lgm, u32 vni, u32 bd_id)
 716 {
 717   tunnel_lookup_t *l2_ifaces = &lgm->l2_ifaces;
 718   vnet_hw_interface_t *hi;
 719
 720   u32 bd_index = bd_find_index (&bd_main, bd_id);
 721   ASSERT (bd_index != ~0);
 722   uword *hip = hash_get (l2_ifaces->hw_if_index_by_dp_table, bd_index);
 723
 724   if (hip == 0)
 725     {
 726       clib_warning ("The interface for bridge domain %d doesn't exist",
 727                     bd_id);
 728       return;
 729     }
 730
 731   /* Remove interface from bridge .. by enabling L3 mode */
 732   hi = vnet_get_hw_interface (lgm->vnet_main, hip[0]);
 733   set_int_l2_mode (lgm->vlib_main, lgm->vnet_main, MODE_L3, hi->sw_if_index,
 734                    0, 0, 0, 0);
 735   lisp_gpe_remove_iface (lgm, hip[0], bd_index, &lgm->l2_ifaces);
 736 }
 737
 738 /**
 739  * @brief Add LISP-GPE NSH interface.
 740  *
 741  * Creates LISP-GPE interface, sets it in L3 mode.
 742  *
 743  * @param[in]   lgm     Reference to @ref lisp_gpe_main_t.
 744  * @param[in]   a       Parameters to create interface.
 745  *
 746  * @return sw_if_index.
 747  */
 748 u32
 749 vnet_lisp_gpe_add_nsh_iface (lisp_gpe_main_t * lgm)
 750 {
 751   vnet_main_t *vnm = lgm->vnet_main;
 752   tunnel_lookup_t *nsh_ifaces = &lgm->nsh_ifaces;
 753   vnet_hw_interface_t *hi;
 754   uword *hip, *si;
 755
 756   hip = hash_get (nsh_ifaces->hw_if_index_by_dp_table, 0);
 757
 758   if (hip)
 759     {
 760       clib_warning ("NSH interface 0 already exists");
 761       return ~0;
 762     }
 763
 764   si = hash_get (nsh_ifaces->sw_if_index_by_vni, 0);
 765   if (si)
 766     {
 767       clib_warning ("NSH interface already exists");
 768       return ~0;
 769     }
 770
 771   /* create lisp iface and populate tunnel tables */
 772   hi = lisp_gpe_create_iface (lgm, 0, 0,
 773                               &nsh_lisp_gpe_device_class, &lgm->nsh_ifaces);
 774
 775   /* enable interface */
 776   vnet_sw_interface_set_flags (vnm, hi->sw_if_index,
 777                                VNET_SW_INTERFACE_FLAG_ADMIN_UP);
 778   vnet_hw_interface_set_flags (vnm, hi->hw_if_index,
 779                                VNET_HW_INTERFACE_FLAG_LINK_UP);
 780
 781   return (hi->sw_if_index);
 782 }
 783
 784 /**
 785  * @brief Del LISP-GPE NSH interface.
 786  *
 787  */
 788 void
 789 vnet_lisp_gpe_del_nsh_iface (lisp_gpe_main_t * lgm)
 790 {
 791   tunnel_lookup_t *nsh_ifaces = &lgm->nsh_ifaces;
 792   uword *hip;
 793
 794   hip = hash_get (nsh_ifaces->hw_if_index_by_dp_table, 0);
 795
 796   if (hip == 0)
 797     {
 798       clib_warning ("The NSH 0 interface doesn't exist");
 799       return;
 800     }
 801   lisp_gpe_remove_iface (lgm, hip[0], 0, &lgm->nsh_ifaces);
 802 }
 803
 804 static clib_error_t *
 805 lisp_gpe_add_del_iface_command_fn (vlib_main_t * vm, unformat_input_t * input,
 806                                    vlib_cli_command_t * cmd)
 807 {
 808   unformat_input_t _line_input, *line_input = &_line_input;
 809   u8 is_add = 1;
 810   u32 table_id, vni, bd_id;
 811   u8 vni_is_set = 0, vrf_is_set = 0, bd_index_is_set = 0;
 812   u8 nsh_iface = 0;
 813   clib_error_t *error = NULL;
 814
 815   if (vnet_lisp_gpe_enable_disable_status () == 0)
 816     {
 817       return clib_error_return (0, "LISP is disabled");
 818     }
 819
 820   /* Get a line of input. */
 821   if (!unformat_user (input, unformat_line_input, line_input))
 822     return 0;
 823
 824   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
 825     {
 826       if (unformat (line_input, "add"))
 827         is_add = 1;
 828       else if (unformat (line_input, "del"))
 829         is_add = 0;
 830       else if (unformat (line_input, "vrf %d", &table_id))
 831         {
 832           vrf_is_set = 1;
 833         }
 834       else if (unformat (line_input, "vni %d", &vni))
 835         {
 836           vni_is_set = 1;
 837         }
 838       else if (unformat (line_input, "bd %d", &bd_id))
 839         {
 840           bd_index_is_set = 1;
 841         }
 842       else if (unformat (line_input, "nsh"))
 843         {
 844           nsh_iface = 1;
 845         }
 846       else
 847         {
 848           error = clib_error_return (0, "parse error: '%U'",
 849                                      format_unformat_error, line_input);
 850           goto done;
 851         }
 852     }
 853
 854   if (nsh_iface)
 855     {
 856       if (is_add)
 857         {
 858           if (~0 == vnet_lisp_gpe_add_nsh_iface (&lisp_gpe_main))
 859             {
 860               error = clib_error_return (0, "NSH interface not created");
 861               goto done;
 862             }
 863         }
 864       else
 865         {
 866           vnet_lisp_gpe_del_nsh_iface (&lisp_gpe_main);
 867         }
 868       goto done;
 869     }
 870
 871   if (vrf_is_set && bd_index_is_set)
 872     {
 873       error = clib_error_return
 874         (0, "Cannot set both vrf and brdige domain index!");
 875       goto done;
 876     }
 877
 878   if (!vni_is_set)
 879     {
 880       error = clib_error_return (0, "vni must be set!");
 881       goto done;
 882     }
 883
 884   if (!vrf_is_set && !bd_index_is_set)
 885     {
 886       error =
 887         clib_error_return (0, "vrf or bridge domain index must be set!");
 888       goto done;
 889     }
 890
 891   if (bd_index_is_set)
 892     {
 893       if (is_add)
 894         {
 895           if (~0 == lisp_gpe_tenant_l2_iface_add_or_lock (vni, bd_id))
 896             {
 897               error = clib_error_return (0, "L2 interface not created");
 898               goto done;
 899             }
 900         }
 901       else
 902         lisp_gpe_tenant_l2_iface_unlock (vni);
 903     }
 904   else
 905     {
 906       if (is_add)
 907         {
 908           if (~0 == lisp_gpe_tenant_l3_iface_add_or_lock (vni, table_id))
 909             {
 910               error = clib_error_return (0, "L3 interface not created");
 911               goto done;
 912             }
 913         }
 914       else
 915         lisp_gpe_tenant_l3_iface_unlock (vni);
 916     }
 917
 918 done:
 919   unformat_free (line_input);
 920
 921   return error;
 922 }
 923
 924 /* *INDENT-OFF* */
 925 VLIB_CLI_COMMAND (add_del_lisp_gpe_iface_command, static) = {
 926   .path = "gpe iface",
 927   .short_help = "gpe iface add/del vni <vni> vrf <vrf>",
 928   .function = lisp_gpe_add_del_iface_command_fn,
 929 };
 930 /* *INDENT-ON* */
 931
 932 /*
 933  * fd.io coding-style-patch-verification: ON
 934  *
 935  * Local Variables:
 936  * eval: (c-set-style "gnu")
 937  * End:
 938  */