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