Reorganize source tree to use single autotools instance
[vpp.git] / src / vnet / lisp-gpe / lisp_gpe_sub_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  * @file
17  * @brief LISP sub-interfaces.
18  *
19  */
20 #include <vnet/lisp-gpe/lisp_gpe_tenant.h>
21 #include <vnet/lisp-gpe/lisp_gpe_sub_interface.h>
22 #include <vnet/fib/fib_table.h>
23 #include <vnet/interface.h>
24
25 /**
26  * @brief Pool of all l3-sub-interfaces
27  */
28 static lisp_gpe_sub_interface_t *lisp_gpe_sub_interface_pool;
29
30 /**
31  * A DB of all LISP L3 sub-interfaces. The key is:{VNI,l-RLOC}
32  */
33 static uword *lisp_gpe_sub_interfaces;
34
35 /**
36  * A DB of all VNET L3 sub-interfaces. The key is:{VNI,l-RLOC}
37  * Used in the data-plane for interface lookup on decap.
38  */
39 uword *lisp_gpe_sub_interfaces_sw_if_index;
40
41 /**
42  * The next available sub-interface ID. FIXME
43  */
44 static u32 lisp_gpe_sub_interface_id;
45
46
47 static index_t
48 lisp_gpe_sub_interface_db_find (const ip_address_t * lrloc, u32 vni)
49 {
50   uword *p;
51
52   lisp_gpe_sub_interface_key_t key = {
53     .local_rloc = *lrloc,
54     .vni = clib_host_to_net_u32 (vni),
55   };
56
57   p = hash_get_mem (lisp_gpe_sub_interfaces, &key);
58
59   if (NULL == p)
60     return (INDEX_INVALID);
61   else
62     return (p[0]);
63 }
64
65 static void
66 lisp_gpe_sub_interface_db_insert (const lisp_gpe_sub_interface_t * l3s)
67 {
68   hash_set_mem (lisp_gpe_sub_interfaces,
69                 &l3s->key, l3s - lisp_gpe_sub_interface_pool);
70   hash_set_mem (lisp_gpe_sub_interfaces_sw_if_index,
71                 &l3s->key, l3s->sw_if_index);
72 }
73
74 static void
75 lisp_gpe_sub_interface_db_remove (const lisp_gpe_sub_interface_t * l3s)
76 {
77   hash_unset_mem (lisp_gpe_sub_interfaces, &l3s->key);
78   hash_unset_mem (lisp_gpe_sub_interfaces_sw_if_index, &l3s->key);
79 }
80
81 lisp_gpe_sub_interface_t *
82 lisp_gpe_sub_interface_get_i (index_t l3si)
83 {
84   return (pool_elt_at_index (lisp_gpe_sub_interface_pool, l3si));
85 }
86
87 static void
88 lisp_gpe_sub_interface_set_table (u32 sw_if_index, u32 table_id)
89 {
90   fib_node_index_t fib_index;
91
92   fib_index = fib_table_find_or_create_and_lock (FIB_PROTOCOL_IP4, table_id);
93   ASSERT (FIB_NODE_INDEX_INVALID != fib_index);
94
95   vec_validate (ip4_main.fib_index_by_sw_if_index, sw_if_index);
96   ip4_main.fib_index_by_sw_if_index[sw_if_index] = fib_index;
97
98   fib_index = fib_table_find_or_create_and_lock (FIB_PROTOCOL_IP6, table_id);
99   ASSERT (FIB_NODE_INDEX_INVALID != fib_index);
100
101   vec_validate (ip6_main.fib_index_by_sw_if_index, sw_if_index);
102   ip6_main.fib_index_by_sw_if_index[sw_if_index] = fib_index;
103 }
104
105 static void
106 lisp_gpe_sub_interface_unset_table (u32 sw_if_index, u32 table_id)
107 {
108   ip4_main.fib_index_by_sw_if_index[sw_if_index] = 0;
109   ip4_sw_interface_enable_disable (sw_if_index, 0);
110
111   ip6_main.fib_index_by_sw_if_index[sw_if_index] = 0;
112   ip6_sw_interface_enable_disable (sw_if_index, 0);
113 }
114
115 index_t
116 lisp_gpe_sub_interface_find_or_create_and_lock (const ip_address_t * lrloc,
117                                                 u32 overlay_table_id, u32 vni)
118 {
119   lisp_gpe_sub_interface_t *l3s;
120   index_t l3si;
121
122   l3si = lisp_gpe_sub_interface_db_find (lrloc, clib_host_to_net_u32 (vni));
123
124   if (INDEX_INVALID == l3si)
125     {
126       u32 main_sw_if_index, sub_sw_if_index;
127
128       /*
129        * find the main interface from the VNI
130        */
131       main_sw_if_index =
132         lisp_gpe_tenant_l3_iface_add_or_lock (vni, overlay_table_id);
133
134       vnet_sw_interface_t sub_itf_template = {
135         .type = VNET_SW_INTERFACE_TYPE_SUB,
136         .flood_class = VNET_FLOOD_CLASS_NORMAL,
137         .sup_sw_if_index = main_sw_if_index,
138         .sub.id = lisp_gpe_sub_interface_id++,
139       };
140
141       if (NULL != vnet_create_sw_interface (vnet_get_main (),
142                                             &sub_itf_template,
143                                             &sub_sw_if_index))
144         return (INDEX_INVALID);
145
146       pool_get (lisp_gpe_sub_interface_pool, l3s);
147       memset (l3s, 0, sizeof (*l3s));
148       l3s->key = clib_mem_alloc (sizeof (*l3s->key));
149       memset (l3s->key, 0, sizeof (*l3s->key));
150
151       l3s->key->local_rloc = *lrloc;
152       l3s->key->vni = clib_host_to_net_u32 (vni);
153       l3s->main_sw_if_index = main_sw_if_index;
154       l3s->sw_if_index = sub_sw_if_index;
155       l3s->eid_table_id = overlay_table_id;
156
157       l3si = (l3s - lisp_gpe_sub_interface_pool);
158
159       // FIXME. enable When we get an adj
160       ip6_sw_interface_enable_disable (l3s->sw_if_index, 1);
161       ip4_sw_interface_enable_disable (l3s->sw_if_index, 1);
162
163       vnet_sw_interface_set_flags (vnet_get_main (),
164                                    l3s->sw_if_index,
165                                    VNET_SW_INTERFACE_FLAG_ADMIN_UP);
166
167       lisp_gpe_sub_interface_db_insert (l3s);
168     }
169   else
170     {
171       l3s = lisp_gpe_sub_interface_get_i (l3si);
172       l3s->eid_table_id = overlay_table_id;
173     }
174
175   lisp_gpe_sub_interface_set_table (l3s->sw_if_index, l3s->eid_table_id);
176   l3s->locks++;
177
178   return (l3si);
179 }
180
181 void
182 lisp_gpe_sub_interface_unlock (index_t l3si)
183 {
184   lisp_gpe_sub_interface_t *l3s;
185
186   l3s = lisp_gpe_sub_interface_get_i (l3si);
187
188   l3s->locks--;
189
190   if (0 == l3s->locks)
191     {
192       lisp_gpe_sub_interface_unset_table (l3s->sw_if_index,
193                                           l3s->eid_table_id);
194
195       lisp_gpe_tenant_l3_iface_unlock (clib_net_to_host_u32 (l3s->key->vni));
196       vnet_sw_interface_set_flags (vnet_get_main (), l3s->sw_if_index, 0);
197       vnet_delete_sub_interface (l3s->sw_if_index);
198
199       lisp_gpe_sub_interface_db_remove (l3s);
200
201       clib_mem_free (l3s->key);
202       pool_put (lisp_gpe_sub_interface_pool, l3s);
203     }
204 }
205
206 const lisp_gpe_sub_interface_t *
207 lisp_gpe_sub_interface_get (index_t l3si)
208 {
209   return (lisp_gpe_sub_interface_get_i (l3si));
210 }
211
212 u8 *
213 format_lisp_gpe_sub_interface (u8 * s, va_list ap)
214 {
215   lisp_gpe_sub_interface_t *l3s = va_arg (ap, lisp_gpe_sub_interface_t *);
216   vnet_main_t *vnm = vnet_get_main ();
217
218   s = format (s, "%=16U",
219               format_vnet_sw_interface_name,
220               vnm, vnet_get_sw_interface (vnm, l3s->sw_if_index));
221   s = format (s, "%=10d", clib_net_to_host_u32 (l3s->key->vni));
222   s = format (s, "%=12d", l3s->sw_if_index);
223   s = format (s, "%U", format_ip_address, &l3s->key->local_rloc);
224
225   return (s);
226 }
227
228 /** CLI command to show LISP-GPE interfaces. */
229 static clib_error_t *
230 lisp_gpe_sub_interface_show (vlib_main_t * vm,
231                              unformat_input_t * input,
232                              vlib_cli_command_t * cmd)
233 {
234   lisp_gpe_sub_interface_t *l3s;
235
236   vlib_cli_output (vm, "%=16s%=10s%=12s%s", "Name", "VNI", "SW IF Index",
237                    "local RLOC");
238
239   /* *INDENT-OFF* */
240   pool_foreach (l3s, lisp_gpe_sub_interface_pool,
241   ({
242     vlib_cli_output (vm, "%U", format_lisp_gpe_sub_interface, l3s);
243   }));
244   /* *INDENT-ON* */
245
246   return 0;
247 }
248
249 /* *INDENT-OFF* */
250 VLIB_CLI_COMMAND (lisp_gpe_sub_interface_command) = {
251   .path = "show lisp gpe sub-interface",
252   .short_help = "show lisp gpe sub-interface",
253   .function = lisp_gpe_sub_interface_show,
254 };
255 /* *INDENT-ON* */
256
257 static clib_error_t *
258 lisp_gpe_sub_interface_module_init (vlib_main_t * vm)
259 {
260   lisp_gpe_sub_interfaces =
261     hash_create_mem (0,
262                      sizeof (lisp_gpe_sub_interface_key_t), sizeof (uword));
263   lisp_gpe_sub_interfaces_sw_if_index =
264     hash_create_mem (0,
265                      sizeof (lisp_gpe_sub_interface_key_t), sizeof (uword));
266
267   return (NULL);
268 }
269
270 VLIB_INIT_FUNCTION (lisp_gpe_sub_interface_module_init);
271
272 /*
273  * fd.io coding-style-patch-verification: ON
274  *
275  * Local Variables:
276  * eval: (c-set-style "gnu")
277  * End:
278  */