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/ip/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), clib_net_to_host_u32 (h->iid));
 189   return s;
 190 }
 191
 192 /* *INDENT-OFF* */
 193 VNET_HW_INTERFACE_CLASS (lisp_gpe_hw_class) = {
 194   .name = "LISP_GPE",
 195   .format_header = format_lisp_gpe_header_with_length,
 196   .build_rewrite = lisp_gpe_build_rewrite,
 197   .update_adjacency = lisp_gpe_update_adjacency,
 198 };
 199 /* *INDENT-ON* */
 200
 201
 202 typedef struct
 203 {
 204   u32 dpo_index;
 205 } l2_lisp_gpe_tx_trace_t;
 206
 207 static u8 *
 208 format_l2_lisp_gpe_tx_trace (u8 * s, va_list * args)
 209 {
 210   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
 211   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
 212   l2_lisp_gpe_tx_trace_t *t = va_arg (*args, l2_lisp_gpe_tx_trace_t *);
 213
 214   s = format (s, "L2-LISP-GPE-TX: load-balance %d", t->dpo_index);
 215   return s;
 216 }
 217
 218 /**
 219  * @brief LISP-GPE interface TX (encap) function for L2 overlays.
 220  * @node l2_lisp_gpe_interface_tx
 221  *
 222  * The L2 LISP-GPE interface TX (encap) function.
 223  *
 224  * Uses bridge domain index, source and destination ethernet addresses to
 225  * lookup tunnel. If the tunnel is multihomed a flow has is used to determine
 226  * the sub-tunnel and therefore the rewrite string to be used to encapsulate
 227  * the packets.
 228  *
 229  * @param[in]   vm        vlib_main_t corresponding to the current thread.
 230  * @param[in]   node      vlib_node_runtime_t data for this node.
 231  * @param[in]   frame     vlib_frame_t whose contents should be dispatched.
 232  *
 233  * @return number of vectors in frame.
 234  */
 235 static uword
 236 l2_lisp_gpe_interface_tx (vlib_main_t * vm, vlib_node_runtime_t * node,
 237                           vlib_frame_t * from_frame)
 238 {
 239   u32 n_left_from, next_index, *from, *to_next;
 240   lisp_gpe_main_t *lgm = &lisp_gpe_main;
 241
 242   from = vlib_frame_vector_args (from_frame);
 243   n_left_from = from_frame->n_vectors;
 244
 245   next_index = node->cached_next_index;
 246
 247   while (n_left_from > 0)
 248     {
 249       u32 n_left_to_next;
 250
 251       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
 252
 253       while (n_left_from > 0 && n_left_to_next > 0)
 254         {
 255           vlib_buffer_t *b0;
 256           u32 bi0, lbi0;
 257           ethernet_header_t *e0;
 258
 259           bi0 = from[0];
 260           to_next[0] = bi0;
 261           from += 1;
 262           to_next += 1;
 263           n_left_from -= 1;
 264           n_left_to_next -= 1;
 265
 266           b0 = vlib_get_buffer (vm, bi0);
 267           e0 = vlib_buffer_get_current (b0);
 268
 269           vnet_buffer (b0)->lisp.overlay_afi = LISP_AFI_MAC;
 270
 271           /* lookup dst + src mac */
 272           lbi0 = lisp_l2_fib_lookup (lgm, vnet_buffer (b0)->l2.bd_index,
 273                                      e0->src_address, e0->dst_address);
 274           vnet_buffer (b0)->ip.adj_index[VLIB_TX] = lbi0;
 275
 276
 277           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
 278             {
 279               l2_lisp_gpe_tx_trace_t *tr = vlib_add_trace (vm, node, b0,
 280                                                            sizeof (*tr));
 281               tr->dpo_index = lbi0;
 282             }
 283           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
 284                                            n_left_to_next, bi0, l2_arc_to_lb);
 285         }
 286
 287       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
 288     }
 289
 290   return from_frame->n_vectors;
 291 }
 292
 293 static u8 *
 294 format_l2_lisp_gpe_name (u8 * s, va_list * args)
 295 {
 296   u32 dev_instance = va_arg (*args, u32);
 297   return format (s, "l2_lisp_gpe%d", dev_instance);
 298 }
 299
 300 /* *INDENT-OFF* */
 301 VNET_DEVICE_CLASS (l2_lisp_gpe_device_class,static) = {
 302   .name = "L2_LISP_GPE",
 303   .format_device_name = format_l2_lisp_gpe_name,
 304   .format_tx_trace = format_l2_lisp_gpe_tx_trace,
 305   .tx_function = l2_lisp_gpe_interface_tx,
 306 };
 307 /* *INDENT-ON* */
 308
 309 typedef struct
 310 {
 311   u32 dpo_index;
 312 } nsh_lisp_gpe_tx_trace_t;
 313
 314 u8 *
 315 format_nsh_lisp_gpe_tx_trace (u8 * s, va_list * args)
 316 {
 317   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
 318   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
 319   nsh_lisp_gpe_tx_trace_t *t = va_arg (*args, nsh_lisp_gpe_tx_trace_t *);
 320
 321   s = format (s, "NSH-GPE-TX: tunnel %d", t->dpo_index);
 322   return s;
 323 }
 324
 325 /**
 326  * @brief LISP-GPE interface TX for NSH overlays.
 327  * @node nsh_lisp_gpe_interface_tx
 328  *
 329  * The NSH LISP-GPE interface TX function.
 330  *
 331  * @param[in]   vm        vlib_main_t corresponding to the current thread.
 332  * @param[in]   node      vlib_node_runtime_t data for this node.
 333  * @param[in]   frame     vlib_frame_t whose contents should be dispatched.
 334  *
 335  * @return number of vectors in frame.
 336  */
 337 static uword
 338 nsh_lisp_gpe_interface_tx (vlib_main_t * vm, vlib_node_runtime_t * node,
 339                            vlib_frame_t * from_frame)
 340 {
 341   u32 n_left_from, next_index, *from, *to_next;
 342   lisp_gpe_main_t *lgm = &lisp_gpe_main;
 343
 344   from = vlib_frame_vector_args (from_frame);
 345   n_left_from = from_frame->n_vectors;
 346
 347   next_index = node->cached_next_index;
 348
 349   while (n_left_from > 0)
 350     {
 351       u32 n_left_to_next;
 352
 353       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
 354
 355       while (n_left_from > 0 && n_left_to_next > 0)
 356         {
 357           vlib_buffer_t *b0;
 358           u32 bi0;
 359           u32 *nsh0, next0;
 360           const dpo_id_t *dpo0;
 361
 362           bi0 = from[0];
 363           to_next[0] = bi0;
 364           from += 1;
 365           to_next += 1;
 366           n_left_from -= 1;
 367           n_left_to_next -= 1;
 368
 369           b0 = vlib_get_buffer (vm, bi0);
 370           nsh0 = vlib_buffer_get_current (b0);
 371
 372           vnet_buffer (b0)->lisp.overlay_afi = LISP_AFI_LCAF;
 373
 374           /* lookup SPI + SI (second word of the NSH header).
 375            * NB: Load balancing was done by the control plane */
 376           dpo0 = lisp_nsh_fib_lookup (lgm, nsh0[1]);
 377
 378           next0 = dpo0->dpoi_next_node;
 379           vnet_buffer (b0)->ip.adj_index[VLIB_TX] = dpo0->dpoi_index;
 380
 381           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
 382             {
 383               nsh_lisp_gpe_tx_trace_t *tr = vlib_add_trace (vm, node, b0,
 384                                                             sizeof (*tr));
 385               tr->dpo_index = dpo0->dpoi_index;
 386             }
 387           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
 388                                            n_left_to_next, bi0, next0);
 389         }
 390
 391       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
 392     }
 393
 394   return from_frame->n_vectors;
 395 }
 396
 397 static u8 *
 398 format_nsh_lisp_gpe_name (u8 * s, va_list * args)
 399 {
 400   u32 dev_instance = va_arg (*args, u32);
 401   return format (s, "nsh_lisp_gpe%d", dev_instance);
 402 }
 403
 404 /* *INDENT-OFF* */
 405 VNET_DEVICE_CLASS (nsh_lisp_gpe_device_class,static) = {
 406   .name = "NSH_LISP_GPE",
 407   .format_device_name = format_nsh_lisp_gpe_name,
 408   .format_tx_trace = format_nsh_lisp_gpe_tx_trace,
 409   .tx_function = nsh_lisp_gpe_interface_tx,
 410 };
 411 /* *INDENT-ON* */
 412
 413 static vnet_hw_interface_t *
 414 lisp_gpe_create_iface (lisp_gpe_main_t * lgm, u32 vni, u32 dp_table,
 415                        vnet_device_class_t * dev_class,
 416                        tunnel_lookup_t * tuns)
 417 {
 418   u32 flen;
 419   u32 hw_if_index = ~0;
 420   u8 *new_name;
 421   vnet_hw_interface_t *hi;
 422   vnet_main_t *vnm = lgm->vnet_main;
 423
 424   /* create hw lisp_gpeX iface if needed, otherwise reuse existing */
 425   flen = vec_len (lgm->free_tunnel_hw_if_indices);
 426   if (flen > 0)
 427     {
 428       hw_if_index = lgm->free_tunnel_hw_if_indices[flen - 1];
 429       _vec_len (lgm->free_tunnel_hw_if_indices) -= 1;
 430
 431       hi = vnet_get_hw_interface (vnm, hw_if_index);
 432
 433       /* rename interface */
 434       new_name = format (0, "%U", dev_class->format_device_name, vni);
 435
 436       vec_add1 (new_name, 0);
 437       vnet_rename_interface (vnm, hw_if_index, (char *) new_name);
 438       vec_free (new_name);
 439
 440       /* clear old stats of freed interface before reuse */
 441       vnet_interface_main_t *im = &vnm->interface_main;
 442       vnet_interface_counter_lock (im);
 443       vlib_zero_combined_counter (&im->combined_sw_if_counters
 444                                   [VNET_INTERFACE_COUNTER_TX],
 445                                   hi->sw_if_index);
 446       vlib_zero_combined_counter (&im->combined_sw_if_counters
 447                                   [VNET_INTERFACE_COUNTER_RX],
 448                                   hi->sw_if_index);
 449       vlib_zero_simple_counter (&im->sw_if_counters
 450                                 [VNET_INTERFACE_COUNTER_DROP],
 451                                 hi->sw_if_index);
 452       vnet_interface_counter_unlock (im);
 453     }
 454   else
 455     {
 456       hw_if_index = vnet_register_interface (vnm, dev_class->index, vni,
 457                                              lisp_gpe_hw_class.index, 0);
 458       hi = vnet_get_hw_interface (vnm, hw_if_index);
 459     }
 460
 461   hash_set (tuns->hw_if_index_by_dp_table, dp_table, hw_if_index);
 462
 463   /* set tunnel termination: post decap, packets are tagged as having been
 464    * originated by lisp-gpe interface */
 465   hash_set (tuns->sw_if_index_by_vni, vni, hi->sw_if_index);
 466   hash_set (tuns->vni_by_sw_if_index, hi->sw_if_index, vni);
 467
 468   return hi;
 469 }
 470
 471 static void
 472 lisp_gpe_remove_iface (lisp_gpe_main_t * lgm, u32 hi_index, u32 dp_table,
 473                        tunnel_lookup_t * tuns)
 474 {
 475   vnet_main_t *vnm = lgm->vnet_main;
 476   vnet_hw_interface_t *hi;
 477   uword *vnip;
 478
 479   hi = vnet_get_hw_interface (vnm, hi_index);
 480
 481   /* disable interface */
 482   vnet_sw_interface_set_flags (vnm, hi->sw_if_index, 0 /* down */ );
 483   vnet_hw_interface_set_flags (vnm, hi->hw_if_index, 0 /* down */ );
 484   hash_unset (tuns->hw_if_index_by_dp_table, dp_table);
 485   vec_add1 (lgm->free_tunnel_hw_if_indices, hi->hw_if_index);
 486
 487   /* clean tunnel termination and vni to sw_if_index binding */
 488   vnip = hash_get (tuns->vni_by_sw_if_index, hi->sw_if_index);
 489   if (0 == vnip)
 490     {
 491       clib_warning ("No vni associated to interface %d", hi->sw_if_index);
 492       return;
 493     }
 494   hash_unset (tuns->sw_if_index_by_vni, vnip[0]);
 495   hash_unset (tuns->vni_by_sw_if_index, hi->sw_if_index);
 496 }
 497
 498 static void
 499 lisp_gpe_iface_set_table (u32 sw_if_index, u32 table_id)
 500 {
 501   fib_node_index_t fib_index;
 502
 503   fib_index = fib_table_find_or_create_and_lock (FIB_PROTOCOL_IP4, table_id);
 504   vec_validate (ip4_main.fib_index_by_sw_if_index, sw_if_index);
 505   ip4_main.fib_index_by_sw_if_index[sw_if_index] = fib_index;
 506   ip4_sw_interface_enable_disable (sw_if_index, 1);
 507
 508   fib_index = fib_table_find_or_create_and_lock (FIB_PROTOCOL_IP6, table_id);
 509   vec_validate (ip6_main.fib_index_by_sw_if_index, sw_if_index);
 510   ip6_main.fib_index_by_sw_if_index[sw_if_index] = fib_index;
 511   ip6_sw_interface_enable_disable (sw_if_index, 1);
 512 }
 513
 514 static void
 515 lisp_gpe_tenant_del_default_routes (u32 table_id)
 516 {
 517   fib_protocol_t proto;
 518
 519   FOR_EACH_FIB_IP_PROTOCOL (proto)
 520   {
 521     fib_prefix_t prefix = {
 522       .fp_proto = proto,
 523     };
 524     u32 fib_index;
 525
 526     fib_index = fib_table_find (prefix.fp_proto, table_id);
 527     fib_table_entry_special_remove (fib_index, &prefix, FIB_SOURCE_LISP);
 528     fib_table_unlock (fib_index, prefix.fp_proto);
 529   }
 530 }
 531
 532 static void
 533 lisp_gpe_tenant_add_default_routes (u32 table_id)
 534 {
 535   fib_protocol_t proto;
 536
 537   FOR_EACH_FIB_IP_PROTOCOL (proto)
 538   {
 539     fib_prefix_t prefix = {
 540       .fp_proto = proto,
 541     };
 542     u32 fib_index;
 543
 544     /*
 545      * Add a deafult route that results in a control plane punt DPO
 546      */
 547     fib_index = fib_table_find_or_create_and_lock (prefix.fp_proto, table_id);
 548     fib_table_entry_special_dpo_add (fib_index, &prefix, FIB_SOURCE_LISP,
 549                                      FIB_ENTRY_FLAG_EXCLUSIVE,
 550                                      lisp_cp_dpo_get (fib_proto_to_dpo
 551                                                       (proto)));
 552   }
 553 }
 554
 555
 556 /**
 557  * @brief Add/del LISP-GPE L3 interface.
 558  *
 559  * Creates LISP-GPE interface, sets ingress arcs from lisp_gpeX_lookup,
 560  * installs default routes that attract all traffic with no more specific
 561  * routes to lgpe-ipx-lookup, set egress arcs to ipx-lookup, sets
 562  * the interface in the right vrf and enables it.
 563  *
 564  * @param[in]   lgm     Reference to @ref lisp_gpe_main_t.
 565  * @param[in]   a       Parameters to create interface.
 566  *
 567  * @return number of vectors in frame.
 568  */
 569 u32
 570 lisp_gpe_add_l3_iface (lisp_gpe_main_t * lgm, u32 vni, u32 table_id)
 571 {
 572   vnet_main_t *vnm = lgm->vnet_main;
 573   tunnel_lookup_t *l3_ifaces = &lgm->l3_ifaces;
 574   vnet_hw_interface_t *hi;
 575   uword *hip, *si;
 576
 577   hip = hash_get (l3_ifaces->hw_if_index_by_dp_table, table_id);
 578
 579   if (hip)
 580     {
 581       clib_warning ("vrf %d already mapped to a vni", table_id);
 582       return ~0;
 583     }
 584
 585   si = hash_get (l3_ifaces->sw_if_index_by_vni, vni);
 586
 587   if (si)
 588     {
 589       clib_warning ("Interface for vni %d already exists", vni);
 590     }
 591
 592   /* create lisp iface and populate tunnel tables */
 593   hi = lisp_gpe_create_iface (lgm, vni, table_id,
 594                               &lisp_gpe_device_class, l3_ifaces);
 595
 596   /* insert default routes that point to lisp-cp lookup */
 597   lisp_gpe_iface_set_table (hi->sw_if_index, table_id);
 598   lisp_gpe_tenant_add_default_routes (table_id);
 599
 600   /* enable interface */
 601   vnet_sw_interface_set_flags (vnm, hi->sw_if_index,
 602                                VNET_SW_INTERFACE_FLAG_ADMIN_UP);
 603   vnet_hw_interface_set_flags (vnm, hi->hw_if_index,
 604                                VNET_HW_INTERFACE_FLAG_LINK_UP);
 605
 606   return (hi->sw_if_index);
 607 }
 608
 609 void
 610 lisp_gpe_del_l3_iface (lisp_gpe_main_t * lgm, u32 vni, u32 table_id)
 611 {
 612   vnet_main_t *vnm = lgm->vnet_main;
 613   tunnel_lookup_t *l3_ifaces = &lgm->l3_ifaces;
 614   vnet_hw_interface_t *hi;
 615   uword *hip;
 616
 617   hip = hash_get (l3_ifaces->hw_if_index_by_dp_table, table_id);
 618
 619   if (hip == 0)
 620     {
 621       clib_warning ("The interface for vrf %d doesn't exist", table_id);
 622       return;
 623     }
 624
 625   hi = vnet_get_hw_interface (vnm, hip[0]);
 626
 627   lisp_gpe_remove_iface (lgm, hip[0], table_id, &lgm->l3_ifaces);
 628
 629   /* unset default routes */
 630   ip4_sw_interface_enable_disable (hi->sw_if_index, 0);
 631   ip6_sw_interface_enable_disable (hi->sw_if_index, 0);
 632   lisp_gpe_tenant_del_default_routes (table_id);
 633 }
 634
 635 /**
 636  * @brief Add/del LISP-GPE L2 interface.
 637  *
 638  * Creates LISP-GPE interface, sets it in L2 mode in the appropriate
 639  * bridge domain, sets egress arcs and enables it.
 640  *
 641  * @param[in]   lgm     Reference to @ref lisp_gpe_main_t.
 642  * @param[in]   a       Parameters to create interface.
 643  *
 644  * @return number of vectors in frame.
 645  */
 646 u32
 647 lisp_gpe_add_l2_iface (lisp_gpe_main_t * lgm, u32 vni, u32 bd_id)
 648 {
 649   vnet_main_t *vnm = lgm->vnet_main;
 650   tunnel_lookup_t *l2_ifaces = &lgm->l2_ifaces;
 651   vnet_hw_interface_t *hi;
 652   uword *hip, *si;
 653   u16 bd_index;
 654
 655   bd_index = bd_find_or_add_bd_index (&bd_main, bd_id);
 656   hip = hash_get (l2_ifaces->hw_if_index_by_dp_table, bd_index);
 657
 658   if (hip)
 659     {
 660       clib_warning ("bridge domain %d already mapped to a vni", bd_id);
 661       return ~0;
 662     }
 663
 664   si = hash_get (l2_ifaces->sw_if_index_by_vni, vni);
 665   if (si)
 666     {
 667       clib_warning ("Interface for vni %d already exists", vni);
 668       return ~0;
 669     }
 670
 671   /* create lisp iface and populate tunnel tables */
 672   hi = lisp_gpe_create_iface (lgm, vni, bd_index,
 673                               &l2_lisp_gpe_device_class, &lgm->l2_ifaces);
 674
 675   /* enable interface */
 676   vnet_sw_interface_set_flags (vnm, hi->sw_if_index,
 677                                VNET_SW_INTERFACE_FLAG_ADMIN_UP);
 678   vnet_hw_interface_set_flags (vnm, hi->hw_if_index,
 679                                VNET_HW_INTERFACE_FLAG_LINK_UP);
 680
 681   l2_arc_to_lb = vlib_node_add_named_next (vlib_get_main (),
 682                                            hi->tx_node_index,
 683                                            "l2-load-balance");
 684
 685   /* we're ready. add iface to l2 bridge domain */
 686   set_int_l2_mode (lgm->vlib_main, vnm, MODE_L2_BRIDGE, hi->sw_if_index,
 687                    bd_index, 0, 0, 0);
 688
 689   return (hi->sw_if_index);
 690 }
 691
 692 /**
 693  * @brief Add/del LISP-GPE L2 interface.
 694  *
 695  * Creates LISP-GPE interface, sets it in L2 mode in the appropriate
 696  * bridge domain, sets egress arcs and enables it.
 697  *
 698  * @param[in]   lgm     Reference to @ref lisp_gpe_main_t.
 699  * @param[in]   a       Parameters to create interface.
 700  *
 701  * @return number of vectors in frame.
 702  */
 703 void
 704 lisp_gpe_del_l2_iface (lisp_gpe_main_t * lgm, u32 vni, u32 bd_id)
 705 {
 706   tunnel_lookup_t *l2_ifaces = &lgm->l2_ifaces;
 707   u16 bd_index;
 708   uword *hip;
 709
 710   bd_index = bd_find_or_add_bd_index (&bd_main, bd_id);
 711   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       return (NULL);
 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  */