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
 243   from = vlib_frame_vector_args (from_frame);
 244   n_left_from = from_frame->n_vectors;
 245
 246   next_index = node->cached_next_index;
 247
 248   while (n_left_from > 0)
 249     {
 250       u32 n_left_to_next;
 251
 252       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
 253
 254       while (n_left_from > 0 && n_left_to_next > 0)
 255         {
 256           vlib_buffer_t *b0;
 257           u32 bi0, lbi0;
 258           ethernet_header_t *e0;
 259
 260           bi0 = from[0];
 261           to_next[0] = bi0;
 262           from += 1;
 263           to_next += 1;
 264           n_left_from -= 1;
 265           n_left_to_next -= 1;
 266
 267           b0 = vlib_get_buffer (vm, bi0);
 268           e0 = vlib_buffer_get_current (b0);
 269
 270           vnet_buffer (b0)->lisp.overlay_afi = LISP_AFI_MAC;
 271
 272           /* lookup dst + src mac */
 273           lbi0 = lisp_l2_fib_lookup (lgm, vnet_buffer (b0)->l2.bd_index,
 274                                      e0->src_address, e0->dst_address);
 275           vnet_buffer (b0)->ip.adj_index[VLIB_TX] = lbi0;
 276
 277
 278           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
 279             {
 280               l2_lisp_gpe_tx_trace_t *tr = vlib_add_trace (vm, node, b0,
 281                                                            sizeof (*tr));
 282               tr->dpo_index = lbi0;
 283             }
 284           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
 285                                            n_left_to_next, bi0, l2_arc_to_lb);
 286         }
 287
 288       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
 289     }
 290
 291   return from_frame->n_vectors;
 292 }
 293
 294 static u8 *
 295 format_l2_lisp_gpe_name (u8 * s, va_list * args)
 296 {
 297   u32 dev_instance = va_arg (*args, u32);
 298   return format (s, "l2_lisp_gpe%d", dev_instance);
 299 }
 300
 301 /* *INDENT-OFF* */
 302 VNET_DEVICE_CLASS (l2_lisp_gpe_device_class,static) = {
 303   .name = "L2_LISP_GPE",
 304   .format_device_name = format_l2_lisp_gpe_name,
 305   .format_tx_trace = format_l2_lisp_gpe_tx_trace,
 306   .tx_function = l2_lisp_gpe_interface_tx,
 307 };
 308 /* *INDENT-ON* */
 309
 310 typedef struct
 311 {
 312   u32 dpo_index;
 313 } nsh_lisp_gpe_tx_trace_t;
 314
 315 u8 *
 316 format_nsh_lisp_gpe_tx_trace (u8 * s, va_list * args)
 317 {
 318   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
 319   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
 320   nsh_lisp_gpe_tx_trace_t *t = va_arg (*args, nsh_lisp_gpe_tx_trace_t *);
 321
 322   s = format (s, "NSH-GPE-TX: tunnel %d", t->dpo_index);
 323   return s;
 324 }
 325
 326 /**
 327  * @brief LISP-GPE interface TX for NSH overlays.
 328  * @node nsh_lisp_gpe_interface_tx
 329  *
 330  * The NSH LISP-GPE interface TX function.
 331  *
 332  * @param[in]   vm        vlib_main_t corresponding to the current thread.
 333  * @param[in]   node      vlib_node_runtime_t data for this node.
 334  * @param[in]   frame     vlib_frame_t whose contents should be dispatched.
 335  *
 336  * @return number of vectors in frame.
 337  */
 338 static uword
 339 nsh_lisp_gpe_interface_tx (vlib_main_t * vm, vlib_node_runtime_t * node,
 340                            vlib_frame_t * from_frame)
 341 {
 342   u32 n_left_from, next_index, *from, *to_next;
 343   lisp_gpe_main_t *lgm = &lisp_gpe_main;
 344
 345   from = vlib_frame_vector_args (from_frame);
 346   n_left_from = from_frame->n_vectors;
 347
 348   next_index = node->cached_next_index;
 349
 350   while (n_left_from > 0)
 351     {
 352       u32 n_left_to_next;
 353
 354       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
 355
 356       while (n_left_from > 0 && n_left_to_next > 0)
 357         {
 358           vlib_buffer_t *b0;
 359           u32 bi0;
 360           u32 *nsh0, next0;
 361           const dpo_id_t *dpo0;
 362
 363           bi0 = from[0];
 364           to_next[0] = bi0;
 365           from += 1;
 366           to_next += 1;
 367           n_left_from -= 1;
 368           n_left_to_next -= 1;
 369
 370           b0 = vlib_get_buffer (vm, bi0);
 371           nsh0 = vlib_buffer_get_current (b0);
 372
 373           vnet_buffer (b0)->lisp.overlay_afi = LISP_AFI_LCAF;
 374
 375           /* lookup SPI + SI (second word of the NSH header).
 376            * NB: Load balancing was done by the control plane */
 377           dpo0 = lisp_nsh_fib_lookup (lgm, nsh0[1]);
 378
 379           next0 = dpo0->dpoi_next_node;
 380           vnet_buffer (b0)->ip.adj_index[VLIB_TX] = dpo0->dpoi_index;
 381
 382           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
 383             {
 384               nsh_lisp_gpe_tx_trace_t *tr = vlib_add_trace (vm, node, b0,
 385                                                             sizeof (*tr));
 386               tr->dpo_index = dpo0->dpoi_index;
 387             }
 388           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
 389                                            n_left_to_next, bi0, next0);
 390         }
 391
 392       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
 393     }
 394
 395   return from_frame->n_vectors;
 396 }
 397
 398 static u8 *
 399 format_nsh_lisp_gpe_name (u8 * s, va_list * args)
 400 {
 401   u32 dev_instance = va_arg (*args, u32);
 402   return format (s, "nsh_lisp_gpe%d", dev_instance);
 403 }
 404
 405 /* *INDENT-OFF* */
 406 VNET_DEVICE_CLASS (nsh_lisp_gpe_device_class,static) = {
 407   .name = "NSH_LISP_GPE",
 408   .format_device_name = format_nsh_lisp_gpe_name,
 409   .format_tx_trace = format_nsh_lisp_gpe_tx_trace,
 410   .tx_function = nsh_lisp_gpe_interface_tx,
 411 };
 412 /* *INDENT-ON* */
 413
 414 static vnet_hw_interface_t *
 415 lisp_gpe_create_iface (lisp_gpe_main_t * lgm, u32 vni, u32 dp_table,
 416                        vnet_device_class_t * dev_class,
 417                        tunnel_lookup_t * tuns)
 418 {
 419   u32 flen;
 420   u32 hw_if_index = ~0;
 421   u8 *new_name;
 422   vnet_hw_interface_t *hi;
 423   vnet_main_t *vnm = lgm->vnet_main;
 424
 425   /* create hw lisp_gpeX iface if needed, otherwise reuse existing */
 426   flen = vec_len (lgm->free_tunnel_hw_if_indices);
 427   if (flen > 0)
 428     {
 429       hw_if_index = lgm->free_tunnel_hw_if_indices[flen - 1];
 430       _vec_len (lgm->free_tunnel_hw_if_indices) -= 1;
 431
 432       hi = vnet_get_hw_interface (vnm, hw_if_index);
 433
 434       /* rename interface */
 435       new_name = format (0, "%U", dev_class->format_device_name, vni);
 436
 437       vec_add1 (new_name, 0);
 438       vnet_rename_interface (vnm, hw_if_index, (char *) new_name);
 439       vec_free (new_name);
 440
 441       /* clear old stats of freed interface before reuse */
 442       vnet_interface_main_t *im = &vnm->interface_main;
 443       vnet_interface_counter_lock (im);
 444       vlib_zero_combined_counter (&im->combined_sw_if_counters
 445                                   [VNET_INTERFACE_COUNTER_TX],
 446                                   hi->sw_if_index);
 447       vlib_zero_combined_counter (&im->combined_sw_if_counters
 448                                   [VNET_INTERFACE_COUNTER_RX],
 449                                   hi->sw_if_index);
 450       vlib_zero_simple_counter (&im->sw_if_counters
 451                                 [VNET_INTERFACE_COUNTER_DROP],
 452                                 hi->sw_if_index);
 453       vnet_interface_counter_unlock (im);
 454     }
 455   else
 456     {
 457       hw_if_index = vnet_register_interface (vnm, dev_class->index, vni,
 458                                              lisp_gpe_hw_class.index, 0);
 459       hi = vnet_get_hw_interface (vnm, hw_if_index);
 460     }
 461
 462   hash_set (tuns->hw_if_index_by_dp_table, dp_table, hw_if_index);
 463
 464   /* set tunnel termination: post decap, packets are tagged as having been
 465    * originated by lisp-gpe interface */
 466   hash_set (tuns->sw_if_index_by_vni, vni, hi->sw_if_index);
 467   hash_set (tuns->vni_by_sw_if_index, hi->sw_if_index, vni);
 468
 469   return hi;
 470 }
 471
 472 static void
 473 lisp_gpe_remove_iface (lisp_gpe_main_t * lgm, u32 hi_index, u32 dp_table,
 474                        tunnel_lookup_t * tuns)
 475 {
 476   vnet_main_t *vnm = lgm->vnet_main;
 477   vnet_hw_interface_t *hi;
 478   uword *vnip;
 479
 480   hi = vnet_get_hw_interface (vnm, hi_index);
 481
 482   /* disable interface */
 483   vnet_sw_interface_set_flags (vnm, hi->sw_if_index, 0 /* down */ );
 484   vnet_hw_interface_set_flags (vnm, hi->hw_if_index, 0 /* down */ );
 485   hash_unset (tuns->hw_if_index_by_dp_table, dp_table);
 486   vec_add1 (lgm->free_tunnel_hw_if_indices, hi->hw_if_index);
 487
 488   /* clean tunnel termination and vni to sw_if_index binding */
 489   vnip = hash_get (tuns->vni_by_sw_if_index, hi->sw_if_index);
 490   if (0 == vnip)
 491     {
 492       clib_warning ("No vni associated to interface %d", hi->sw_if_index);
 493       return;
 494     }
 495   hash_unset (tuns->sw_if_index_by_vni, vnip[0]);
 496   hash_unset (tuns->vni_by_sw_if_index, hi->sw_if_index);
 497 }
 498
 499 static void
 500 lisp_gpe_iface_set_table (u32 sw_if_index, u32 table_id)
 501 {
 502   fib_node_index_t fib_index;
 503
 504   fib_index = fib_table_find_or_create_and_lock (FIB_PROTOCOL_IP4, table_id);
 505   vec_validate (ip4_main.fib_index_by_sw_if_index, sw_if_index);
 506   ip4_main.fib_index_by_sw_if_index[sw_if_index] = fib_index;
 507   ip4_sw_interface_enable_disable (sw_if_index, 1);
 508
 509   fib_index = fib_table_find_or_create_and_lock (FIB_PROTOCOL_IP6, table_id);
 510   vec_validate (ip6_main.fib_index_by_sw_if_index, sw_if_index);
 511   ip6_main.fib_index_by_sw_if_index[sw_if_index] = fib_index;
 512   ip6_sw_interface_enable_disable (sw_if_index, 1);
 513 }
 514
 515 static void
 516 lisp_gpe_tenant_del_default_routes (u32 table_id)
 517 {
 518   fib_protocol_t proto;
 519
 520   FOR_EACH_FIB_IP_PROTOCOL (proto)
 521   {
 522     fib_prefix_t prefix = {
 523       .fp_proto = proto,
 524     };
 525     u32 fib_index;
 526
 527     fib_index = fib_table_find (prefix.fp_proto, table_id);
 528     fib_table_entry_special_remove (fib_index, &prefix, FIB_SOURCE_LISP);
 529     fib_table_unlock (fib_index, prefix.fp_proto);
 530   }
 531 }
 532
 533 static void
 534 lisp_gpe_tenant_add_default_routes (u32 table_id)
 535 {
 536   fib_protocol_t proto;
 537
 538   FOR_EACH_FIB_IP_PROTOCOL (proto)
 539   {
 540     fib_prefix_t prefix = {
 541       .fp_proto = proto,
 542     };
 543     u32 fib_index;
 544
 545     /*
 546      * Add a deafult route that results in a control plane punt DPO
 547      */
 548     fib_index = fib_table_find_or_create_and_lock (prefix.fp_proto, table_id);
 549     fib_table_entry_special_dpo_add (fib_index, &prefix, FIB_SOURCE_LISP,
 550                                      FIB_ENTRY_FLAG_EXCLUSIVE,
 551                                      lisp_cp_dpo_get (fib_proto_to_dpo
 552                                                       (proto)));
 553   }
 554 }
 555
 556
 557 /**
 558  * @brief Add/del LISP-GPE L3 interface.
 559  *
 560  * Creates LISP-GPE interface, sets ingress arcs from lisp_gpeX_lookup,
 561  * installs default routes that attract all traffic with no more specific
 562  * routes to lgpe-ipx-lookup, set egress arcs to ipx-lookup, sets
 563  * the interface in the right vrf and enables it.
 564  *
 565  * @param[in]   lgm     Reference to @ref lisp_gpe_main_t.
 566  * @param[in]   a       Parameters to create interface.
 567  *
 568  * @return number of vectors in frame.
 569  */
 570 u32
 571 lisp_gpe_add_l3_iface (lisp_gpe_main_t * lgm, u32 vni, u32 table_id)
 572 {
 573   vnet_main_t *vnm = lgm->vnet_main;
 574   tunnel_lookup_t *l3_ifaces = &lgm->l3_ifaces;
 575   vnet_hw_interface_t *hi;
 576   uword *hip, *si;
 577
 578   hip = hash_get (l3_ifaces->hw_if_index_by_dp_table, table_id);
 579
 580   if (hip)
 581     {
 582       clib_warning ("vrf %d already mapped to a vni", table_id);
 583       return ~0;
 584     }
 585
 586   si = hash_get (l3_ifaces->sw_if_index_by_vni, vni);
 587
 588   if (si)
 589     {
 590       clib_warning ("Interface for vni %d already exists", vni);
 591     }
 592
 593   /* create lisp iface and populate tunnel tables */
 594   hi = lisp_gpe_create_iface (lgm, vni, table_id,
 595                               &lisp_gpe_device_class, l3_ifaces);
 596
 597   /* insert default routes that point to lisp-cp lookup */
 598   lisp_gpe_iface_set_table (hi->sw_if_index, table_id);
 599   lisp_gpe_tenant_add_default_routes (table_id);
 600
 601   /* enable interface */
 602   vnet_sw_interface_set_flags (vnm, hi->sw_if_index,
 603                                VNET_SW_INTERFACE_FLAG_ADMIN_UP);
 604   vnet_hw_interface_set_flags (vnm, hi->hw_if_index,
 605                                VNET_HW_INTERFACE_FLAG_LINK_UP);
 606
 607   return (hi->sw_if_index);
 608 }
 609
 610 void
 611 lisp_gpe_del_l3_iface (lisp_gpe_main_t * lgm, u32 vni, u32 table_id)
 612 {
 613   vnet_main_t *vnm = lgm->vnet_main;
 614   tunnel_lookup_t *l3_ifaces = &lgm->l3_ifaces;
 615   vnet_hw_interface_t *hi;
 616   uword *hip;
 617
 618   hip = hash_get (l3_ifaces->hw_if_index_by_dp_table, table_id);
 619
 620   if (hip == 0)
 621     {
 622       clib_warning ("The interface for vrf %d doesn't exist", table_id);
 623       return;
 624     }
 625
 626   hi = vnet_get_hw_interface (vnm, hip[0]);
 627
 628   lisp_gpe_remove_iface (lgm, hip[0], table_id, &lgm->l3_ifaces);
 629
 630   /* unset default routes */
 631   ip4_sw_interface_enable_disable (hi->sw_if_index, 0);
 632   ip6_sw_interface_enable_disable (hi->sw_if_index, 0);
 633   lisp_gpe_tenant_del_default_routes (table_id);
 634 }
 635
 636 /**
 637  * @brief Add/del LISP-GPE L2 interface.
 638  *
 639  * Creates LISP-GPE interface, sets it in L2 mode in the appropriate
 640  * bridge domain, sets egress arcs and enables it.
 641  *
 642  * @param[in]   lgm     Reference to @ref lisp_gpe_main_t.
 643  * @param[in]   a       Parameters to create interface.
 644  *
 645  * @return number of vectors in frame.
 646  */
 647 u32
 648 lisp_gpe_add_l2_iface (lisp_gpe_main_t * lgm, u32 vni, u32 bd_id)
 649 {
 650   vnet_main_t *vnm = lgm->vnet_main;
 651   tunnel_lookup_t *l2_ifaces = &lgm->l2_ifaces;
 652   vnet_hw_interface_t *hi;
 653   uword *hip, *si;
 654   u16 bd_index;
 655
 656   bd_index = bd_find_or_add_bd_index (&bd_main, bd_id);
 657   hip = hash_get (l2_ifaces->hw_if_index_by_dp_table, bd_index);
 658
 659   if (hip)
 660     {
 661       clib_warning ("bridge domain %d already mapped to a vni", bd_id);
 662       return ~0;
 663     }
 664
 665   si = hash_get (l2_ifaces->sw_if_index_by_vni, vni);
 666   if (si)
 667     {
 668       clib_warning ("Interface for vni %d already exists", vni);
 669       return ~0;
 670     }
 671
 672   /* create lisp iface and populate tunnel tables */
 673   hi = lisp_gpe_create_iface (lgm, vni, bd_index,
 674                               &l2_lisp_gpe_device_class, &lgm->l2_ifaces);
 675
 676   /* enable interface */
 677   vnet_sw_interface_set_flags (vnm, hi->sw_if_index,
 678                                VNET_SW_INTERFACE_FLAG_ADMIN_UP);
 679   vnet_hw_interface_set_flags (vnm, hi->hw_if_index,
 680                                VNET_HW_INTERFACE_FLAG_LINK_UP);
 681
 682   l2_arc_to_lb = vlib_node_add_named_next (vlib_get_main (),
 683                                            hi->tx_node_index,
 684                                            "l2-load-balance");
 685
 686   /* we're ready. add iface to l2 bridge domain */
 687   set_int_l2_mode (lgm->vlib_main, vnm, MODE_L2_BRIDGE, hi->sw_if_index,
 688                    bd_index, 0, 0, 0);
 689
 690   return (hi->sw_if_index);
 691 }
 692
 693 /**
 694  * @brief Add/del LISP-GPE L2 interface.
 695  *
 696  * Creates LISP-GPE interface, sets it in L2 mode in the appropriate
 697  * bridge domain, sets egress arcs and enables it.
 698  *
 699  * @param[in]   lgm     Reference to @ref lisp_gpe_main_t.
 700  * @param[in]   a       Parameters to create interface.
 701  *
 702  * @return number of vectors in frame.
 703  */
 704 void
 705 lisp_gpe_del_l2_iface (lisp_gpe_main_t * lgm, u32 vni, u32 bd_id)
 706 {
 707   tunnel_lookup_t *l2_ifaces = &lgm->l2_ifaces;
 708
 709   u32 bd_index = bd_find_index (&bd_main, bd_id);
 710   ASSERT (bd_index != ~0);
 711   uword *hip = hash_get (l2_ifaces->hw_if_index_by_dp_table, bd_index);
 712
 713   if (hip == 0)
 714     {
 715       clib_warning ("The interface for bridge domain %d doesn't exist",
 716                     bd_id);
 717       return;
 718     }
 719   lisp_gpe_remove_iface (lgm, hip[0], bd_index, &lgm->l2_ifaces);
 720 }
 721
 722 /**
 723  * @brief Add LISP-GPE NSH interface.
 724  *
 725  * Creates LISP-GPE interface, sets it in L3 mode.
 726  *
 727  * @param[in]   lgm     Reference to @ref lisp_gpe_main_t.
 728  * @param[in]   a       Parameters to create interface.
 729  *
 730  * @return sw_if_index.
 731  */
 732 u32
 733 lisp_gpe_add_nsh_iface (lisp_gpe_main_t * lgm)
 734 {
 735   vnet_main_t *vnm = lgm->vnet_main;
 736   tunnel_lookup_t *nsh_ifaces = &lgm->nsh_ifaces;
 737   vnet_hw_interface_t *hi;
 738   uword *hip, *si;
 739
 740   hip = hash_get (nsh_ifaces->hw_if_index_by_dp_table, 0);
 741
 742   if (hip)
 743     {
 744       clib_warning ("NSH interface 0 already exists");
 745       return ~0;
 746     }
 747
 748   si = hash_get (nsh_ifaces->sw_if_index_by_vni, 0);
 749   if (si)
 750     {
 751       clib_warning ("NSH interface already exists");
 752       return ~0;
 753     }
 754
 755   /* create lisp iface and populate tunnel tables */
 756   hi = lisp_gpe_create_iface (lgm, 0, 0,
 757                               &nsh_lisp_gpe_device_class, &lgm->nsh_ifaces);
 758
 759   /* enable interface */
 760   vnet_sw_interface_set_flags (vnm, hi->sw_if_index,
 761                                VNET_SW_INTERFACE_FLAG_ADMIN_UP);
 762   vnet_hw_interface_set_flags (vnm, hi->hw_if_index,
 763                                VNET_HW_INTERFACE_FLAG_LINK_UP);
 764
 765   return (hi->sw_if_index);
 766 }
 767
 768 /**
 769  * @brief Del LISP-GPE NSH interface.
 770  *
 771  */
 772 void
 773 lisp_gpe_del_nsh_iface (lisp_gpe_main_t * lgm)
 774 {
 775   tunnel_lookup_t *nsh_ifaces = &lgm->nsh_ifaces;
 776   uword *hip;
 777
 778   hip = hash_get (nsh_ifaces->hw_if_index_by_dp_table, 0);
 779
 780   if (hip == 0)
 781     {
 782       clib_warning ("The NSH 0 interface doesn't exist");
 783       return;
 784     }
 785   lisp_gpe_remove_iface (lgm, hip[0], 0, &lgm->nsh_ifaces);
 786 }
 787
 788 static clib_error_t *
 789 lisp_gpe_add_del_iface_command_fn (vlib_main_t * vm, unformat_input_t * input,
 790                                    vlib_cli_command_t * cmd)
 791 {
 792   unformat_input_t _line_input, *line_input = &_line_input;
 793   u8 is_add = 1;
 794   u32 table_id, vni, bd_id;
 795   u8 vni_is_set = 0, vrf_is_set = 0, bd_index_is_set = 0;
 796   u8 nsh_iface = 0;
 797   clib_error_t *error = NULL;
 798
 799   if (vnet_lisp_gpe_enable_disable_status () == 0)
 800     {
 801       return clib_error_return (0, "LISP is disabled");
 802     }
 803
 804   /* Get a line of input. */
 805   if (!unformat_user (input, unformat_line_input, line_input))
 806     return 0;
 807
 808   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
 809     {
 810       if (unformat (line_input, "add"))
 811         is_add = 1;
 812       else if (unformat (line_input, "del"))
 813         is_add = 0;
 814       else if (unformat (line_input, "vrf %d", &table_id))
 815         {
 816           vrf_is_set = 1;
 817         }
 818       else if (unformat (line_input, "vni %d", &vni))
 819         {
 820           vni_is_set = 1;
 821         }
 822       else if (unformat (line_input, "bd %d", &bd_id))
 823         {
 824           bd_index_is_set = 1;
 825         }
 826       else if (unformat (line_input, "nsh"))
 827         {
 828           nsh_iface = 1;
 829         }
 830       else
 831         {
 832           error = clib_error_return (0, "parse error: '%U'",
 833                                      format_unformat_error, line_input);
 834           goto done;
 835         }
 836     }
 837
 838   if (nsh_iface)
 839     {
 840       if (is_add)
 841         {
 842           if (~0 == lisp_gpe_add_nsh_iface (&lisp_gpe_main))
 843             {
 844               error = clib_error_return (0, "NSH interface not created");
 845               goto done;
 846             }
 847         }
 848       else
 849         {
 850           lisp_gpe_del_nsh_iface (&lisp_gpe_main);
 851         }
 852       goto done;
 853     }
 854
 855   if (vrf_is_set && bd_index_is_set)
 856     {
 857       error = clib_error_return
 858         (0, "Cannot set both vrf and brdige domain index!");
 859       goto done;
 860     }
 861
 862   if (!vni_is_set)
 863     {
 864       error = clib_error_return (0, "vni must be set!");
 865       goto done;
 866     }
 867
 868   if (!vrf_is_set && !bd_index_is_set)
 869     {
 870       error =
 871         clib_error_return (0, "vrf or bridge domain index must be set!");
 872       goto done;
 873     }
 874
 875   if (bd_index_is_set)
 876     {
 877       if (is_add)
 878         {
 879           if (~0 == lisp_gpe_tenant_l2_iface_add_or_lock (vni, bd_id))
 880             {
 881               error = clib_error_return (0, "L2 interface not created");
 882               goto done;
 883             }
 884         }
 885       else
 886         lisp_gpe_tenant_l2_iface_unlock (vni);
 887     }
 888   else
 889     {
 890       if (is_add)
 891         {
 892           if (~0 == lisp_gpe_tenant_l3_iface_add_or_lock (vni, table_id))
 893             {
 894               error = clib_error_return (0, "L3 interface not created");
 895               goto done;
 896             }
 897         }
 898       else
 899         lisp_gpe_tenant_l3_iface_unlock (vni);
 900     }
 901
 902 done:
 903   unformat_free (line_input);
 904
 905   return error;
 906 }
 907
 908 /* *INDENT-OFF* */
 909 VLIB_CLI_COMMAND (add_del_lisp_gpe_iface_command, static) = {
 910   .path = "gpe iface",
 911   .short_help = "gpe iface add/del vni <vni> vrf <vrf>",
 912   .function = lisp_gpe_add_del_iface_command_fn,
 913 };
 914 /* *INDENT-ON* */
 915
 916 /*
 917  * fd.io coding-style-patch-verification: ON
 918  *
 919  * Local Variables:
 920  * eval: (c-set-style "gnu")
 921  * End:
 922  */