api: refactor vlibmemory
[vpp.git] / src / vnet / interface_api.c
1 /*
2  *------------------------------------------------------------------
3  * interface_api.c - vnet interface api
4  *
5  * Copyright (c) 2016 Cisco and/or its affiliates.
6  * Licensed under the Apache License, Version 2.0 (the "License");
7  * you may not use this file except in compliance with the License.
8  * You may obtain a copy of the License at:
9  *
10  *     http://www.apache.org/licenses/LICENSE-2.0
11  *
12  * Unless required by applicable law or agreed to in writing, software
13  * distributed under the License is distributed on an "AS IS" BASIS,
14  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
15  * See the License for the specific language governing permissions and
16  * limitations under the License.
17  *------------------------------------------------------------------
18  */
19
20 #include <vnet/vnet.h>
21 #include <vlibmemory/api.h>
22
23 #include <vnet/interface.h>
24 #include <vnet/api_errno.h>
25 #include <vnet/ethernet/ethernet.h>
26 #include <vnet/ip/ip.h>
27 #include <vnet/fib/fib_table.h>
28 #include <vnet/mfib/mfib_table.h>
29 #include <vnet/l2/l2_vtr.h>
30 #include <vnet/vnet_msg_enum.h>
31 #include <vnet/fib/fib_api.h>
32 #include <vnet/mfib/mfib_table.h>
33
34 #define vl_typedefs             /* define message structures */
35 #include <vnet/vnet_all_api_h.h>
36 #undef vl_typedefs
37
38 #define vl_endianfun            /* define message structures */
39 #include <vnet/vnet_all_api_h.h>
40 #undef vl_endianfun
41
42 /* instantiate all the print functions we know about */
43 #define vl_print(handle, ...) vlib_cli_output (handle, __VA_ARGS__)
44 #define vl_printfun
45 #include <vnet/vnet_all_api_h.h>
46 #undef vl_printfun
47
48 #include <vlibapi/api_helper_macros.h>
49 vpe_api_main_t vpe_api_main;
50
51 #define foreach_vpe_api_msg                                     \
52 _(SW_INTERFACE_SET_FLAGS, sw_interface_set_flags)               \
53 _(SW_INTERFACE_SET_MTU, sw_interface_set_mtu)                   \
54 _(WANT_INTERFACE_EVENTS, want_interface_events)                 \
55 _(SW_INTERFACE_DUMP, sw_interface_dump)                         \
56 _(SW_INTERFACE_ADD_DEL_ADDRESS, sw_interface_add_del_address)   \
57 _(SW_INTERFACE_SET_RX_MODE, sw_interface_set_rx_mode)           \
58 _(SW_INTERFACE_SET_TABLE, sw_interface_set_table)               \
59 _(SW_INTERFACE_GET_TABLE, sw_interface_get_table)               \
60 _(SW_INTERFACE_SET_UNNUMBERED, sw_interface_set_unnumbered)     \
61 _(SW_INTERFACE_CLEAR_STATS, sw_interface_clear_stats)           \
62 _(SW_INTERFACE_TAG_ADD_DEL, sw_interface_tag_add_del)           \
63 _(SW_INTERFACE_SET_MAC_ADDRESS, sw_interface_set_mac_address)   \
64 _(CREATE_VLAN_SUBIF, create_vlan_subif)                         \
65 _(CREATE_SUBIF, create_subif)                                   \
66 _(DELETE_SUBIF, delete_subif)                                   \
67 _(CREATE_LOOPBACK, create_loopback)                             \
68 _(CREATE_LOOPBACK_INSTANCE, create_loopback_instance)           \
69 _(DELETE_LOOPBACK, delete_loopback)                             \
70 _(INTERFACE_NAME_RENUMBER, interface_name_renumber)
71
72 static void
73 vl_api_sw_interface_set_flags_t_handler (vl_api_sw_interface_set_flags_t * mp)
74 {
75   vl_api_sw_interface_set_flags_reply_t *rmp;
76   vnet_main_t *vnm = vnet_get_main ();
77   int rv = 0;
78   clib_error_t *error;
79   u16 flags;
80
81   VALIDATE_SW_IF_INDEX (mp);
82
83   flags = mp->admin_up_down ? VNET_SW_INTERFACE_FLAG_ADMIN_UP : 0;
84
85   error = vnet_sw_interface_set_flags (vnm, ntohl (mp->sw_if_index), flags);
86   if (error)
87     {
88       rv = -1;
89       clib_error_report (error);
90     }
91
92   BAD_SW_IF_INDEX_LABEL;
93   REPLY_MACRO (VL_API_SW_INTERFACE_SET_FLAGS_REPLY);
94 }
95
96 static void
97 vl_api_sw_interface_set_mtu_t_handler (vl_api_sw_interface_set_mtu_t * mp)
98 {
99   vl_api_sw_interface_set_mtu_reply_t *rmp;
100   vnet_main_t *vnm = vnet_get_main ();
101   u32 flags = ETHERNET_INTERFACE_FLAG_MTU;
102   u32 sw_if_index = ntohl (mp->sw_if_index);
103   u16 mtu = ntohs (mp->mtu);
104   ethernet_main_t *em = &ethernet_main;
105   int rv = 0;
106
107   VALIDATE_SW_IF_INDEX (mp);
108
109   vnet_sw_interface_t *si = vnet_get_sw_interface (vnm, sw_if_index);
110   if (si->type != VNET_SW_INTERFACE_TYPE_HARDWARE)
111     {
112       rv = VNET_API_ERROR_INVALID_VALUE;
113       goto bad_sw_if_index;
114     }
115
116   vnet_hw_interface_t *hi = vnet_get_hw_interface (vnm, si->hw_if_index);
117   ethernet_interface_t *eif = ethernet_get_interface (em, si->hw_if_index);
118
119   if (!eif)
120     {
121       rv = VNET_API_ERROR_FEATURE_DISABLED;
122       goto bad_sw_if_index;
123     }
124
125   if (mtu < hi->min_supported_packet_bytes)
126     {
127       rv = VNET_API_ERROR_INVALID_VALUE;
128       goto bad_sw_if_index;
129     }
130
131   if (mtu > hi->max_supported_packet_bytes)
132     {
133       rv = VNET_API_ERROR_INVALID_VALUE;
134       goto bad_sw_if_index;
135     }
136
137   if (hi->max_packet_bytes != mtu)
138     {
139       hi->max_packet_bytes = mtu;
140       ethernet_set_flags (vnm, si->hw_if_index, flags);
141     }
142
143   BAD_SW_IF_INDEX_LABEL;
144   REPLY_MACRO (VL_API_SW_INTERFACE_SET_MTU_REPLY);
145 }
146
147 static void
148 send_sw_interface_details (vpe_api_main_t * am,
149                            vl_api_registration_t * rp,
150                            vnet_sw_interface_t * swif,
151                            u8 * interface_name, u32 context)
152 {
153   vnet_hw_interface_t *hi =
154     vnet_get_sup_hw_interface (am->vnet_main, swif->sw_if_index);
155
156   vl_api_sw_interface_details_t *mp = vl_msg_api_alloc (sizeof (*mp));
157   memset (mp, 0, sizeof (*mp));
158   mp->_vl_msg_id = ntohs (VL_API_SW_INTERFACE_DETAILS);
159   mp->sw_if_index = ntohl (swif->sw_if_index);
160   mp->sup_sw_if_index = ntohl (swif->sup_sw_if_index);
161   mp->admin_up_down = (swif->flags & VNET_SW_INTERFACE_FLAG_ADMIN_UP) ? 1 : 0;
162   mp->link_up_down = (hi->flags & VNET_HW_INTERFACE_FLAG_LINK_UP) ? 1 : 0;
163   mp->link_duplex = ((hi->flags & VNET_HW_INTERFACE_FLAG_DUPLEX_MASK) >>
164                      VNET_HW_INTERFACE_FLAG_DUPLEX_SHIFT);
165   mp->link_speed = ((hi->flags & VNET_HW_INTERFACE_FLAG_SPEED_MASK) >>
166                     VNET_HW_INTERFACE_FLAG_SPEED_SHIFT);
167   mp->link_mtu = ntohs (hi->max_packet_bytes);
168   mp->context = context;
169
170   strncpy ((char *) mp->interface_name,
171            (char *) interface_name, ARRAY_LEN (mp->interface_name) - 1);
172
173   /* Send the L2 address for ethernet physical intfcs */
174   if (swif->sup_sw_if_index == swif->sw_if_index
175       && hi->hw_class_index == ethernet_hw_interface_class.index)
176     {
177       ethernet_main_t *em = ethernet_get_main (am->vlib_main);
178       ethernet_interface_t *ei;
179
180       ei = pool_elt_at_index (em->interfaces, hi->hw_instance);
181       ASSERT (sizeof (mp->l2_address) >= sizeof (ei->address));
182       clib_memcpy (mp->l2_address, ei->address, sizeof (ei->address));
183       mp->l2_address_length = ntohl (sizeof (ei->address));
184     }
185   else if (swif->sup_sw_if_index != swif->sw_if_index)
186     {
187       vnet_sub_interface_t *sub = &swif->sub;
188       mp->sub_id = ntohl (sub->id);
189       mp->sub_dot1ad = sub->eth.flags.dot1ad;
190       mp->sub_number_of_tags =
191         sub->eth.flags.one_tag + sub->eth.flags.two_tags * 2;
192       mp->sub_outer_vlan_id = ntohs (sub->eth.outer_vlan_id);
193       mp->sub_inner_vlan_id = ntohs (sub->eth.inner_vlan_id);
194       mp->sub_exact_match = sub->eth.flags.exact_match;
195       mp->sub_default = sub->eth.flags.default_sub;
196       mp->sub_outer_vlan_id_any = sub->eth.flags.outer_vlan_id_any;
197       mp->sub_inner_vlan_id_any = sub->eth.flags.inner_vlan_id_any;
198
199       /* vlan tag rewrite data */
200       u32 vtr_op = L2_VTR_DISABLED;
201       u32 vtr_push_dot1q = 0, vtr_tag1 = 0, vtr_tag2 = 0;
202
203       if (l2vtr_get (am->vlib_main, am->vnet_main, swif->sw_if_index,
204                      &vtr_op, &vtr_push_dot1q, &vtr_tag1, &vtr_tag2) != 0)
205         {
206           // error - default to disabled
207           mp->vtr_op = ntohl (L2_VTR_DISABLED);
208           clib_warning ("cannot get vlan tag rewrite for sw_if_index %d",
209                         swif->sw_if_index);
210         }
211       else
212         {
213           mp->vtr_op = ntohl (vtr_op);
214           mp->vtr_push_dot1q = ntohl (vtr_push_dot1q);
215           mp->vtr_tag1 = ntohl (vtr_tag1);
216           mp->vtr_tag2 = ntohl (vtr_tag2);
217         }
218     }
219
220   /* pbb tag rewrite data */
221   ethernet_header_t eth_hdr;
222   u32 vtr_op = L2_VTR_DISABLED;
223   u16 outer_tag = 0;
224   u16 b_vlanid = 0;
225   u32 i_sid = 0;
226   memset (&eth_hdr, 0, sizeof (eth_hdr));
227
228   if (!l2pbb_get (am->vlib_main, am->vnet_main, swif->sw_if_index,
229                   &vtr_op, &outer_tag, &eth_hdr, &b_vlanid, &i_sid))
230     {
231       mp->sub_dot1ah = 1;
232       clib_memcpy (mp->b_dmac, eth_hdr.dst_address,
233                    sizeof (eth_hdr.dst_address));
234       clib_memcpy (mp->b_smac, eth_hdr.src_address,
235                    sizeof (eth_hdr.src_address));
236       mp->b_vlanid = b_vlanid;
237       mp->i_sid = i_sid;
238     }
239
240   u8 *tag = vnet_get_sw_interface_tag (vnet_get_main (), swif->sw_if_index);
241   if (tag)
242     strncpy ((char *) mp->tag, (char *) tag, ARRAY_LEN (mp->tag) - 1);
243
244   vl_api_send_msg (rp, (u8 *) mp);
245 }
246
247 static void
248 vl_api_sw_interface_dump_t_handler (vl_api_sw_interface_dump_t * mp)
249 {
250   vpe_api_main_t *am = &vpe_api_main;
251   vnet_sw_interface_t *swif;
252   vnet_interface_main_t *im = &am->vnet_main->interface_main;
253   vl_api_registration_t *rp;
254
255   rp = vl_api_client_index_to_registration (mp->client_index);
256
257   if (rp == 0)
258     {
259       clib_warning ("Client %d AWOL", mp->client_index);
260       return;
261     }
262
263   u8 *filter = 0, *name = 0;
264   if (mp->name_filter_valid)
265     {
266       mp->name_filter[ARRAY_LEN (mp->name_filter) - 1] = 0;
267       filter = format (0, "%s%c", mp->name_filter, 0);
268     }
269
270   char *strcasestr (char *, char *);    /* lnx hdr file botch */
271   /* *INDENT-OFF* */
272   pool_foreach (swif, im->sw_interfaces,
273   ({
274     if (!vnet_swif_is_api_visible (swif))
275         continue;
276     vec_reset_length(name);
277     name = format (name, "%U%c", format_vnet_sw_interface_name, am->vnet_main,
278                    swif, 0);
279
280     if (filter && !strcasestr((char *) name, (char *) filter))
281         continue;
282
283     send_sw_interface_details (am, rp, swif, name, mp->context);
284   }));
285   /* *INDENT-ON* */
286
287   vec_free (name);
288   vec_free (filter);
289 }
290
291 static void
292   vl_api_sw_interface_add_del_address_t_handler
293   (vl_api_sw_interface_add_del_address_t * mp)
294 {
295   vlib_main_t *vm = vlib_get_main ();
296   vnet_main_t *vnm = vnet_get_main ();
297   vl_api_sw_interface_add_del_address_reply_t *rmp;
298   int rv = 0;
299   u32 is_del;
300   clib_error_t *error = 0;
301
302   VALIDATE_SW_IF_INDEX (mp);
303
304   is_del = mp->is_add == 0;
305   vnm->api_errno = 0;
306
307   if (mp->del_all)
308     ip_del_all_interface_addresses (vm, ntohl (mp->sw_if_index));
309   else if (mp->is_ipv6)
310     error = ip6_add_del_interface_address (vm, ntohl (mp->sw_if_index),
311                                            (void *) mp->address,
312                                            mp->address_length, is_del);
313   else
314     error = ip4_add_del_interface_address (vm, ntohl (mp->sw_if_index),
315                                            (void *) mp->address,
316                                            mp->address_length, is_del);
317
318   if (error)
319     {
320       rv = vnm->api_errno;
321       clib_error_report (error);
322       goto done;
323     }
324
325   BAD_SW_IF_INDEX_LABEL;
326
327 done:
328   REPLY_MACRO (VL_API_SW_INTERFACE_ADD_DEL_ADDRESS_REPLY);
329 }
330
331 void stats_dslock_with_hint (int hint, int tag) __attribute__ ((weak));
332 void
333 stats_dslock_with_hint (int hint, int tag)
334 {
335 }
336
337 void stats_dsunlock (void) __attribute__ ((weak));
338 void
339 stats_dsunlock (void)
340 {
341 }
342
343 static void
344 vl_api_sw_interface_set_table_t_handler (vl_api_sw_interface_set_table_t * mp)
345 {
346   vl_api_sw_interface_set_table_reply_t *rmp;
347   u32 sw_if_index = ntohl (mp->sw_if_index);
348   u32 table_id = ntohl (mp->vrf_id);
349   int rv = 0;
350
351   VALIDATE_SW_IF_INDEX (mp);
352
353   stats_dslock_with_hint (1 /* release hint */ , 4 /* tag */ );
354
355   if (mp->is_ipv6)
356     rv = ip_table_bind (FIB_PROTOCOL_IP6, sw_if_index, table_id, 1);
357   else
358     rv = ip_table_bind (FIB_PROTOCOL_IP4, sw_if_index, table_id, 1);
359
360   stats_dsunlock ();
361
362   BAD_SW_IF_INDEX_LABEL;
363
364   REPLY_MACRO (VL_API_SW_INTERFACE_SET_TABLE_REPLY);
365 }
366
367 int
368 ip_table_bind (fib_protocol_t fproto,
369                u32 sw_if_index, u32 table_id, u8 is_api)
370 {
371   CLIB_UNUSED (ip_interface_address_t * ia);
372   u32 fib_index, mfib_index;
373   fib_source_t src;
374   mfib_source_t msrc;
375
376   if (is_api)
377     {
378       src = FIB_SOURCE_API;
379       msrc = MFIB_SOURCE_API;
380     }
381   else
382     {
383       src = FIB_SOURCE_CLI;
384       msrc = MFIB_SOURCE_CLI;
385     }
386
387   /*
388    * This is temporary whilst I do the song and dance with the CSIT version
389    */
390   if (0 != table_id)
391     {
392       fib_index = fib_table_find_or_create_and_lock (fproto, table_id, src);
393       mfib_index =
394         mfib_table_find_or_create_and_lock (fproto, table_id, msrc);
395     }
396   else
397     {
398       fib_index = 0;
399       mfib_index = 0;
400     }
401
402   /*
403    * This if table does not exist = error is what we want in the end.
404    */
405   /* fib_index = fib_table_find (fproto, table_id); */
406   /* mfib_index = mfib_table_find (fproto, table_id); */
407
408   /* if (~0 == fib_index || ~0 == mfib_index) */
409   /*   { */
410   /*     return (VNET_API_ERROR_NO_SUCH_FIB); */
411   /*   } */
412
413   if (FIB_PROTOCOL_IP6 == fproto)
414     {
415       /*
416        * If the interface already has in IP address, then a change int
417        * VRF is not allowed. The IP address applied must first be removed.
418        * We do not do that automatically here, since VPP has no knowledge
419        * of whether thoses subnets are valid in the destination VRF.
420        */
421       /* *INDENT-OFF* */
422       foreach_ip_interface_address (&ip6_main.lookup_main,
423                                     ia, sw_if_index,
424                                     1 /* honor unnumbered */ ,
425       ({
426         return (VNET_API_ERROR_ADDRESS_FOUND_FOR_INTERFACE);
427       }));
428       /* *INDENT-ON* */
429
430       vec_validate (ip6_main.fib_index_by_sw_if_index, sw_if_index);
431       vec_validate (ip6_main.mfib_index_by_sw_if_index, sw_if_index);
432
433       /*
434        * tell those that are interested that the binding is changing.
435        */
436       ip6_table_bind_callback_t *cb;
437       vec_foreach (cb, ip6_main.table_bind_callbacks)
438         cb->function (&ip6_main, cb->function_opaque,
439                       sw_if_index,
440                       fib_index,
441                       ip6_main.fib_index_by_sw_if_index[sw_if_index]);
442
443       if (0 == table_id)
444         {
445           /* reset back to default */
446           if (0 != ip6_main.fib_index_by_sw_if_index[sw_if_index])
447             fib_table_unlock (ip6_main.fib_index_by_sw_if_index[sw_if_index],
448                               FIB_PROTOCOL_IP6, src);
449           if (0 != ip6_main.mfib_index_by_sw_if_index[sw_if_index])
450             mfib_table_unlock (ip6_main.mfib_index_by_sw_if_index
451                                [sw_if_index], FIB_PROTOCOL_IP6, msrc);
452
453         }
454       else
455         {
456           /* we need to lock the table now it's inuse */
457           fib_table_lock (fib_index, FIB_PROTOCOL_IP6, src);
458           mfib_table_lock (mfib_index, FIB_PROTOCOL_IP6, msrc);
459         }
460
461       ip6_main.fib_index_by_sw_if_index[sw_if_index] = fib_index;
462       ip6_main.mfib_index_by_sw_if_index[sw_if_index] = mfib_index;
463     }
464   else
465     {
466       /*
467        * If the interface already has in IP address, then a change int
468        * VRF is not allowed. The IP address applied must first be removed.
469        * We do not do that automatically here, since VPP has no knowledge
470        * of whether thoses subnets are valid in the destination VRF.
471        */
472       /* *INDENT-OFF* */
473       foreach_ip_interface_address (&ip4_main.lookup_main,
474                                     ia, sw_if_index,
475                                     1 /* honor unnumbered */ ,
476       ({
477         return (VNET_API_ERROR_ADDRESS_FOUND_FOR_INTERFACE);
478       }));
479       /* *INDENT-ON* */
480
481       vec_validate (ip4_main.fib_index_by_sw_if_index, sw_if_index);
482       vec_validate (ip4_main.mfib_index_by_sw_if_index, sw_if_index);
483
484       /*
485        * tell those that are interested that the binding is changing.
486        */
487       ip4_table_bind_callback_t *cb;
488       vec_foreach (cb, ip4_main.table_bind_callbacks)
489         cb->function (&ip4_main, cb->function_opaque,
490                       sw_if_index,
491                       fib_index,
492                       ip4_main.fib_index_by_sw_if_index[sw_if_index]);
493
494       if (0 == table_id)
495         {
496           /* reset back to default */
497           if (0 != ip4_main.fib_index_by_sw_if_index[sw_if_index])
498             fib_table_unlock (ip4_main.fib_index_by_sw_if_index[sw_if_index],
499                               FIB_PROTOCOL_IP4, src);
500           if (0 != ip4_main.mfib_index_by_sw_if_index[sw_if_index])
501             mfib_table_unlock (ip4_main.mfib_index_by_sw_if_index
502                                [sw_if_index], FIB_PROTOCOL_IP4, msrc);
503
504         }
505       else
506         {
507           /* we need to lock the table now it's inuse */
508           fib_index = fib_table_find_or_create_and_lock (FIB_PROTOCOL_IP4,
509                                                          table_id, src);
510
511           mfib_index = mfib_table_find_or_create_and_lock (FIB_PROTOCOL_IP4,
512                                                            table_id, msrc);
513         }
514
515       ip4_main.fib_index_by_sw_if_index[sw_if_index] = fib_index;
516       ip4_main.mfib_index_by_sw_if_index[sw_if_index] = mfib_index;
517     }
518
519   /*
520    * Temporary. undo the locks from the find and create at the staart
521    */
522   if (0 != table_id)
523     {
524       fib_table_unlock (fib_index, fproto, src);
525       mfib_table_unlock (mfib_index, fproto, msrc);
526     }
527
528   return (0);
529 }
530
531 static void
532 send_sw_interface_get_table_reply (svm_queue_t * q,
533                                    u32 context, int retval, u32 vrf_id)
534 {
535   vl_api_sw_interface_get_table_reply_t *mp;
536
537   mp = vl_msg_api_alloc (sizeof (*mp));
538   memset (mp, 0, sizeof (*mp));
539   mp->_vl_msg_id = ntohs (VL_API_SW_INTERFACE_GET_TABLE_REPLY);
540   mp->context = context;
541   mp->retval = htonl (retval);
542   mp->vrf_id = htonl (vrf_id);
543
544   vl_msg_api_send_shmem (q, (u8 *) & mp);
545 }
546
547 static void
548 vl_api_sw_interface_get_table_t_handler (vl_api_sw_interface_get_table_t * mp)
549 {
550   svm_queue_t *q;
551   fib_table_t *fib_table = 0;
552   u32 sw_if_index = ~0;
553   u32 fib_index = ~0;
554   u32 table_id = ~0;
555   fib_protocol_t fib_proto = FIB_PROTOCOL_IP4;
556   int rv = 0;
557
558   q = vl_api_client_index_to_input_queue (mp->client_index);
559   if (q == 0)
560     return;
561
562   VALIDATE_SW_IF_INDEX (mp);
563
564   sw_if_index = ntohl (mp->sw_if_index);
565
566   if (mp->is_ipv6)
567     fib_proto = FIB_PROTOCOL_IP6;
568
569   fib_index = fib_table_get_index_for_sw_if_index (fib_proto, sw_if_index);
570   if (fib_index != ~0)
571     {
572       fib_table = fib_table_get (fib_index, fib_proto);
573       table_id = fib_table->ft_table_id;
574     }
575
576   BAD_SW_IF_INDEX_LABEL;
577
578   send_sw_interface_get_table_reply (q, mp->context, rv, table_id);
579 }
580
581 static void vl_api_sw_interface_set_unnumbered_t_handler
582   (vl_api_sw_interface_set_unnumbered_t * mp)
583 {
584   vl_api_sw_interface_set_unnumbered_reply_t *rmp;
585   int rv = 0;
586   vnet_main_t *vnm = vnet_get_main ();
587   u32 sw_if_index = ntohl (mp->sw_if_index);
588   u32 unnumbered_sw_if_index = ntohl (mp->unnumbered_sw_if_index);
589   u32 was_unnum;
590
591   /*
592    * The API message field names are backwards from
593    * the underlying data structure names.
594    * It's not worth changing them now.
595    */
596   if (!vnet_sw_interface_is_api_valid (vnm, unnumbered_sw_if_index))
597     {
598       rv = VNET_API_ERROR_INVALID_SW_IF_INDEX;
599       goto done;
600     }
601
602   /* Only check the "use loop0" field when setting the binding */
603   if (mp->is_add && !vnet_sw_interface_is_api_valid (vnm, sw_if_index))
604     {
605       rv = VNET_API_ERROR_INVALID_SW_IF_INDEX_2;
606       goto done;
607     }
608
609   vnet_sw_interface_t *si =
610     vnet_get_sw_interface (vnm, unnumbered_sw_if_index);
611   was_unnum = (si->flags & VNET_SW_INTERFACE_FLAG_UNNUMBERED);
612
613   if (mp->is_add)
614     {
615       si->flags |= VNET_SW_INTERFACE_FLAG_UNNUMBERED;
616       si->unnumbered_sw_if_index = sw_if_index;
617
618       ip4_main.lookup_main.if_address_pool_index_by_sw_if_index
619         [unnumbered_sw_if_index] =
620         ip4_main.
621         lookup_main.if_address_pool_index_by_sw_if_index[sw_if_index];
622       ip6_main.
623         lookup_main.if_address_pool_index_by_sw_if_index
624         [unnumbered_sw_if_index] =
625         ip6_main.
626         lookup_main.if_address_pool_index_by_sw_if_index[sw_if_index];
627     }
628   else
629     {
630       si->flags &= ~(VNET_SW_INTERFACE_FLAG_UNNUMBERED);
631       si->unnumbered_sw_if_index = (u32) ~ 0;
632
633       ip4_main.lookup_main.if_address_pool_index_by_sw_if_index
634         [unnumbered_sw_if_index] = ~0;
635       ip6_main.lookup_main.if_address_pool_index_by_sw_if_index
636         [unnumbered_sw_if_index] = ~0;
637     }
638
639   if (was_unnum != (si->flags & VNET_SW_INTERFACE_FLAG_UNNUMBERED))
640     {
641       ip4_sw_interface_enable_disable (unnumbered_sw_if_index, mp->is_add);
642       ip6_sw_interface_enable_disable (unnumbered_sw_if_index, mp->is_add);
643     }
644
645 done:
646   REPLY_MACRO (VL_API_SW_INTERFACE_SET_UNNUMBERED_REPLY);
647 }
648
649 static void
650 vl_api_sw_interface_clear_stats_t_handler (vl_api_sw_interface_clear_stats_t *
651                                            mp)
652 {
653   vl_api_sw_interface_clear_stats_reply_t *rmp;
654
655   vnet_main_t *vnm = vnet_get_main ();
656   vnet_interface_main_t *im = &vnm->interface_main;
657   vlib_simple_counter_main_t *sm;
658   vlib_combined_counter_main_t *cm;
659   static vnet_main_t **my_vnet_mains;
660   int i, j, n_counters;
661   int rv = 0;
662
663   if (mp->sw_if_index != ~0)
664     VALIDATE_SW_IF_INDEX (mp);
665
666   vec_reset_length (my_vnet_mains);
667
668   for (i = 0; i < vec_len (vnet_mains); i++)
669     {
670       if (vnet_mains[i])
671         vec_add1 (my_vnet_mains, vnet_mains[i]);
672     }
673
674   if (vec_len (vnet_mains) == 0)
675     vec_add1 (my_vnet_mains, vnm);
676
677   n_counters = vec_len (im->combined_sw_if_counters);
678
679   for (j = 0; j < n_counters; j++)
680     {
681       for (i = 0; i < vec_len (my_vnet_mains); i++)
682         {
683           im = &my_vnet_mains[i]->interface_main;
684           cm = im->combined_sw_if_counters + j;
685           if (mp->sw_if_index == (u32) ~ 0)
686             vlib_clear_combined_counters (cm);
687           else
688             vlib_zero_combined_counter (cm, ntohl (mp->sw_if_index));
689         }
690     }
691
692   n_counters = vec_len (im->sw_if_counters);
693
694   for (j = 0; j < n_counters; j++)
695     {
696       for (i = 0; i < vec_len (my_vnet_mains); i++)
697         {
698           im = &my_vnet_mains[i]->interface_main;
699           sm = im->sw_if_counters + j;
700           if (mp->sw_if_index == (u32) ~ 0)
701             vlib_clear_simple_counters (sm);
702           else
703             vlib_zero_simple_counter (sm, ntohl (mp->sw_if_index));
704         }
705     }
706
707   BAD_SW_IF_INDEX_LABEL;
708
709   REPLY_MACRO (VL_API_SW_INTERFACE_CLEAR_STATS_REPLY);
710 }
711
712 #define API_LINK_STATE_EVENT 1
713 #define API_ADMIN_UP_DOWN_EVENT 2
714
715 static int
716 event_data_cmp (void *a1, void *a2)
717 {
718   uword *e1 = a1;
719   uword *e2 = a2;
720
721   return (word) e1[0] - (word) e2[0];
722 }
723
724 static void
725 send_sw_interface_event (vpe_api_main_t * am,
726                          vpe_client_registration_t * reg,
727                          svm_queue_t * q, vnet_sw_interface_t * swif)
728 {
729   vl_api_sw_interface_event_t *mp;
730   vnet_main_t *vnm = am->vnet_main;
731
732   vnet_hw_interface_t *hi = vnet_get_sup_hw_interface (vnm,
733                                                        swif->sw_if_index);
734   mp = vl_msg_api_alloc (sizeof (*mp));
735   memset (mp, 0, sizeof (*mp));
736   mp->_vl_msg_id = ntohs (VL_API_SW_INTERFACE_EVENT);
737   mp->sw_if_index = ntohl (swif->sw_if_index);
738   mp->client_index = reg->client_index;
739   mp->pid = reg->client_pid;
740
741   mp->admin_up_down = (swif->flags & VNET_SW_INTERFACE_FLAG_ADMIN_UP) ? 1 : 0;
742   mp->link_up_down = (hi->flags & VNET_HW_INTERFACE_FLAG_LINK_UP) ? 1 : 0;
743   vl_msg_api_send_shmem (q, (u8 *) & mp);
744 }
745
746 static uword
747 link_state_process (vlib_main_t * vm,
748                     vlib_node_runtime_t * rt, vlib_frame_t * f)
749 {
750   vpe_api_main_t *vam = &vpe_api_main;
751   vnet_main_t *vnm = vam->vnet_main;
752   vnet_sw_interface_t *swif;
753   uword *event_data = 0;
754   vpe_client_registration_t *reg;
755   int i;
756   u32 prev_sw_if_index;
757   svm_queue_t *q;
758
759   vam->link_state_process_up = 1;
760
761   while (1)
762     {
763       vlib_process_wait_for_event (vm);
764
765       /* Unified list of changed link or admin state sw_if_indices */
766       vlib_process_get_events_with_type
767         (vm, &event_data, API_LINK_STATE_EVENT);
768       vlib_process_get_events_with_type
769         (vm, &event_data, API_ADMIN_UP_DOWN_EVENT);
770
771       /* Sort, so we can eliminate duplicates */
772       vec_sort_with_function (event_data, event_data_cmp);
773
774       prev_sw_if_index = ~0;
775
776       for (i = 0; i < vec_len (event_data); i++)
777         {
778           /* Only one message per swif */
779           if (prev_sw_if_index == event_data[i])
780             continue;
781           prev_sw_if_index = event_data[i];
782
783           /* *INDENT-OFF* */
784           pool_foreach(reg, vam->interface_events_registrations,
785           ({
786             q = vl_api_client_index_to_input_queue (reg->client_index);
787             if (q)
788               {
789                 /* sw_interface may be deleted already */
790                 if (!pool_is_free_index (vnm->interface_main.sw_interfaces,
791                                          event_data[i]))
792                   {
793                     swif = vnet_get_sw_interface (vnm, event_data[i]);
794                     send_sw_interface_event (vam, reg, q, swif);
795                   }
796               }
797           }));
798           /* *INDENT-ON* */
799         }
800       vec_reset_length (event_data);
801     }
802
803   return 0;
804 }
805
806 static clib_error_t *link_up_down_function (vnet_main_t * vm, u32 hw_if_index,
807                                             u32 flags);
808 static clib_error_t *admin_up_down_function (vnet_main_t * vm,
809                                              u32 hw_if_index, u32 flags);
810
811 /* *INDENT-OFF* */
812 VLIB_REGISTER_NODE (link_state_process_node,static) = {
813   .function = link_state_process,
814   .type = VLIB_NODE_TYPE_PROCESS,
815   .name = "vpe-link-state-process",
816 };
817 /* *INDENT-ON* */
818
819 VNET_SW_INTERFACE_ADMIN_UP_DOWN_FUNCTION (admin_up_down_function);
820 VNET_HW_INTERFACE_LINK_UP_DOWN_FUNCTION (link_up_down_function);
821
822 static clib_error_t *
823 link_up_down_function (vnet_main_t * vm, u32 hw_if_index, u32 flags)
824 {
825   vpe_api_main_t *vam = &vpe_api_main;
826   vnet_hw_interface_t *hi = vnet_get_hw_interface (vm, hw_if_index);
827
828   if (vam->link_state_process_up)
829     vlib_process_signal_event (vam->vlib_main,
830                                link_state_process_node.index,
831                                API_LINK_STATE_EVENT, hi->sw_if_index);
832   return 0;
833 }
834
835 static clib_error_t *
836 admin_up_down_function (vnet_main_t * vm, u32 sw_if_index, u32 flags)
837 {
838   vpe_api_main_t *vam = &vpe_api_main;
839
840   /*
841    * Note: it's perfectly fair to set a subif admin up / admin down.
842    * Note the subtle distinction between this routine and the previous
843    * routine.
844    */
845   if (vam->link_state_process_up)
846     vlib_process_signal_event (vam->vlib_main,
847                                link_state_process_node.index,
848                                API_ADMIN_UP_DOWN_EVENT, sw_if_index);
849   return 0;
850 }
851
852 static void vl_api_sw_interface_tag_add_del_t_handler
853   (vl_api_sw_interface_tag_add_del_t * mp)
854 {
855   vnet_main_t *vnm = vnet_get_main ();
856   vl_api_sw_interface_tag_add_del_reply_t *rmp;
857   int rv = 0;
858   u8 *tag;
859   u32 sw_if_index = ntohl (mp->sw_if_index);
860
861   VALIDATE_SW_IF_INDEX (mp);
862
863   if (mp->is_add)
864     {
865       if (mp->tag[0] == 0)
866         {
867           rv = VNET_API_ERROR_INVALID_VALUE;
868           goto out;
869         }
870
871       mp->tag[ARRAY_LEN (mp->tag) - 1] = 0;
872       tag = format (0, "%s%c", mp->tag, 0);
873       vnet_set_sw_interface_tag (vnm, tag, sw_if_index);
874     }
875   else
876     vnet_clear_sw_interface_tag (vnm, sw_if_index);
877
878   BAD_SW_IF_INDEX_LABEL;
879 out:
880   REPLY_MACRO (VL_API_SW_INTERFACE_TAG_ADD_DEL_REPLY);
881 }
882
883 static void vl_api_sw_interface_set_mac_address_t_handler
884   (vl_api_sw_interface_set_mac_address_t * mp)
885 {
886   vl_api_sw_interface_set_mac_address_reply_t *rmp;
887   vnet_main_t *vnm = vnet_get_main ();
888   u32 sw_if_index = ntohl (mp->sw_if_index);
889   vnet_sw_interface_t *si;
890   clib_error_t *error;
891   int rv = 0;
892
893   VALIDATE_SW_IF_INDEX (mp);
894
895   si = vnet_get_sw_interface (vnm, sw_if_index);
896   error = vnet_hw_interface_change_mac_address (vnm, si->hw_if_index,
897                                                 mp->mac_address);
898   if (error)
899     {
900       rv = VNET_API_ERROR_UNIMPLEMENTED;
901       clib_error_report (error);
902       goto out;
903     }
904
905   BAD_SW_IF_INDEX_LABEL;
906 out:
907   REPLY_MACRO (VL_API_SW_INTERFACE_SET_MAC_ADDRESS_REPLY);
908 }
909
910 static void vl_api_sw_interface_set_rx_mode_t_handler
911   (vl_api_sw_interface_set_rx_mode_t * mp)
912 {
913   vl_api_sw_interface_set_rx_mode_reply_t *rmp;
914   vnet_main_t *vnm = vnet_get_main ();
915   u32 sw_if_index = ntohl (mp->sw_if_index);
916   vnet_sw_interface_t *si;
917   clib_error_t *error;
918   int rv = 0;
919
920   VALIDATE_SW_IF_INDEX (mp);
921
922   si = vnet_get_sw_interface (vnm, sw_if_index);
923   error = set_hw_interface_change_rx_mode (vnm, si->hw_if_index,
924                                            mp->queue_id_valid,
925                                            ntohl (mp->queue_id), mp->mode);
926   if (error)
927     {
928       rv = VNET_API_ERROR_UNIMPLEMENTED;
929       clib_error_report (error);
930       goto out;
931     }
932
933   BAD_SW_IF_INDEX_LABEL;
934 out:
935   REPLY_MACRO (VL_API_SW_INTERFACE_SET_RX_MODE_REPLY);
936 }
937
938 static void
939 vl_api_create_vlan_subif_t_handler (vl_api_create_vlan_subif_t * mp)
940 {
941   vl_api_create_vlan_subif_reply_t *rmp;
942   vnet_main_t *vnm = vnet_get_main ();
943   u32 sw_if_index = (u32) ~ 0;
944   vnet_hw_interface_t *hi;
945   int rv = 0;
946   u32 id;
947   vnet_sw_interface_t template;
948   uword *p;
949   vnet_interface_main_t *im = &vnm->interface_main;
950   u64 sup_and_sub_key;
951   svm_queue_t *q;
952   clib_error_t *error;
953
954   VALIDATE_SW_IF_INDEX (mp);
955
956   hi = vnet_get_sup_hw_interface (vnm, ntohl (mp->sw_if_index));
957
958   if (hi->bond_info == VNET_HW_INTERFACE_BOND_INFO_SLAVE)
959     {
960       rv = VNET_API_ERROR_BOND_SLAVE_NOT_ALLOWED;
961       goto out;
962     }
963
964   id = ntohl (mp->vlan_id);
965   if (id == 0 || id > 4095)
966     {
967       rv = VNET_API_ERROR_INVALID_VLAN;
968       goto out;
969     }
970
971   sup_and_sub_key = ((u64) (hi->sw_if_index) << 32) | (u64) id;
972
973   p = hash_get_mem (im->sw_if_index_by_sup_and_sub, &sup_and_sub_key);
974   if (p)
975     {
976       rv = VNET_API_ERROR_VLAN_ALREADY_EXISTS;
977       goto out;
978     }
979
980   memset (&template, 0, sizeof (template));
981   template.type = VNET_SW_INTERFACE_TYPE_SUB;
982   template.sup_sw_if_index = hi->sw_if_index;
983   template.sub.id = id;
984   template.sub.eth.raw_flags = 0;
985   template.sub.eth.flags.one_tag = 1;
986   template.sub.eth.outer_vlan_id = id;
987   template.sub.eth.flags.exact_match = 1;
988
989   error = vnet_create_sw_interface (vnm, &template, &sw_if_index);
990   if (error)
991     {
992       clib_error_report (error);
993       rv = VNET_API_ERROR_INVALID_REGISTRATION;
994       goto out;
995     }
996
997   u64 *kp = clib_mem_alloc (sizeof (*kp));
998   *kp = sup_and_sub_key;
999
1000   hash_set (hi->sub_interface_sw_if_index_by_id, id, sw_if_index);
1001   hash_set_mem (im->sw_if_index_by_sup_and_sub, kp, sw_if_index);
1002
1003   BAD_SW_IF_INDEX_LABEL;
1004
1005 out:
1006   q = vl_api_client_index_to_input_queue (mp->client_index);
1007   if (!q)
1008     return;
1009
1010   rmp = vl_msg_api_alloc (sizeof (*rmp));
1011   rmp->_vl_msg_id = htons (VL_API_CREATE_VLAN_SUBIF_REPLY);
1012   rmp->context = mp->context;
1013   rmp->retval = htonl (rv);
1014   rmp->sw_if_index = htonl (sw_if_index);
1015   vl_msg_api_send_shmem (q, (u8 *) & rmp);
1016 }
1017
1018 static void
1019 vl_api_create_subif_t_handler (vl_api_create_subif_t * mp)
1020 {
1021   vl_api_create_subif_reply_t *rmp;
1022   vnet_main_t *vnm = vnet_get_main ();
1023   u32 sw_if_index = ~0;
1024   int rv = 0;
1025   u32 sub_id;
1026   vnet_sw_interface_t *si;
1027   vnet_hw_interface_t *hi;
1028   vnet_sw_interface_t template;
1029   uword *p;
1030   vnet_interface_main_t *im = &vnm->interface_main;
1031   u64 sup_and_sub_key;
1032   clib_error_t *error;
1033
1034   VALIDATE_SW_IF_INDEX (mp);
1035
1036   si = vnet_get_sup_sw_interface (vnm, ntohl (mp->sw_if_index));
1037   hi = vnet_get_sup_hw_interface (vnm, ntohl (mp->sw_if_index));
1038
1039   if (hi->bond_info == VNET_HW_INTERFACE_BOND_INFO_SLAVE)
1040     {
1041       rv = VNET_API_ERROR_BOND_SLAVE_NOT_ALLOWED;
1042       goto out;
1043     }
1044
1045   sw_if_index = si->sw_if_index;
1046   sub_id = ntohl (mp->sub_id);
1047
1048   sup_and_sub_key = ((u64) (sw_if_index) << 32) | (u64) sub_id;
1049
1050   p = hash_get_mem (im->sw_if_index_by_sup_and_sub, &sup_and_sub_key);
1051   if (p)
1052     {
1053       if (CLIB_DEBUG > 0)
1054         clib_warning ("sup sw_if_index %d, sub id %d already exists\n",
1055                       sw_if_index, sub_id);
1056       rv = VNET_API_ERROR_SUBIF_ALREADY_EXISTS;
1057       goto out;
1058     }
1059
1060   memset (&template, 0, sizeof (template));
1061   template.type = VNET_SW_INTERFACE_TYPE_SUB;
1062   template.sup_sw_if_index = sw_if_index;
1063   template.sub.id = sub_id;
1064   template.sub.eth.flags.no_tags = mp->no_tags;
1065   template.sub.eth.flags.one_tag = mp->one_tag;
1066   template.sub.eth.flags.two_tags = mp->two_tags;
1067   template.sub.eth.flags.dot1ad = mp->dot1ad;
1068   template.sub.eth.flags.exact_match = mp->exact_match;
1069   template.sub.eth.flags.default_sub = mp->default_sub;
1070   template.sub.eth.flags.outer_vlan_id_any = mp->outer_vlan_id_any;
1071   template.sub.eth.flags.inner_vlan_id_any = mp->inner_vlan_id_any;
1072   template.sub.eth.outer_vlan_id = ntohs (mp->outer_vlan_id);
1073   template.sub.eth.inner_vlan_id = ntohs (mp->inner_vlan_id);
1074
1075   error = vnet_create_sw_interface (vnm, &template, &sw_if_index);
1076   if (error)
1077     {
1078       clib_error_report (error);
1079       rv = VNET_API_ERROR_SUBIF_CREATE_FAILED;
1080       goto out;
1081     }
1082
1083   u64 *kp = clib_mem_alloc (sizeof (*kp));
1084   *kp = sup_and_sub_key;
1085
1086   hash_set (hi->sub_interface_sw_if_index_by_id, sub_id, sw_if_index);
1087   hash_set_mem (im->sw_if_index_by_sup_and_sub, kp, sw_if_index);
1088
1089   BAD_SW_IF_INDEX_LABEL;
1090
1091 out:
1092
1093   /* *INDENT-OFF* */
1094   REPLY_MACRO2(VL_API_CREATE_SUBIF_REPLY,
1095   ({
1096     rmp->sw_if_index = ntohl(sw_if_index);
1097   }));
1098   /* *INDENT-ON* */
1099 }
1100
1101 static void
1102 vl_api_delete_subif_t_handler (vl_api_delete_subif_t * mp)
1103 {
1104   vl_api_delete_subif_reply_t *rmp;
1105   int rv;
1106
1107   rv = vnet_delete_sub_interface (ntohl (mp->sw_if_index));
1108
1109   REPLY_MACRO (VL_API_DELETE_SUBIF_REPLY);
1110 }
1111
1112 static void
1113 vl_api_interface_name_renumber_t_handler (vl_api_interface_name_renumber_t *
1114                                           mp)
1115 {
1116   vl_api_interface_name_renumber_reply_t *rmp;
1117   int rv = 0;
1118
1119   VALIDATE_SW_IF_INDEX (mp);
1120
1121   rv = vnet_interface_name_renumber
1122     (ntohl (mp->sw_if_index), ntohl (mp->new_show_dev_instance));
1123
1124   BAD_SW_IF_INDEX_LABEL;
1125
1126   REPLY_MACRO (VL_API_INTERFACE_NAME_RENUMBER_REPLY);
1127 }
1128
1129 static void
1130 vl_api_create_loopback_t_handler (vl_api_create_loopback_t * mp)
1131 {
1132   vl_api_create_loopback_reply_t *rmp;
1133   u32 sw_if_index;
1134   int rv;
1135
1136   rv = vnet_create_loopback_interface (&sw_if_index, mp->mac_address, 0, 0);
1137
1138   /* *INDENT-OFF* */
1139   REPLY_MACRO2(VL_API_CREATE_LOOPBACK_REPLY,
1140   ({
1141     rmp->sw_if_index = ntohl (sw_if_index);
1142   }));
1143   /* *INDENT-ON* */
1144 }
1145
1146 static void vl_api_create_loopback_instance_t_handler
1147   (vl_api_create_loopback_instance_t * mp)
1148 {
1149   vl_api_create_loopback_instance_reply_t *rmp;
1150   u32 sw_if_index;
1151   u8 is_specified = mp->is_specified;
1152   u32 user_instance = ntohl (mp->user_instance);
1153   int rv;
1154
1155   rv = vnet_create_loopback_interface (&sw_if_index, mp->mac_address,
1156                                        is_specified, user_instance);
1157
1158   /* *INDENT-OFF* */
1159   REPLY_MACRO2(VL_API_CREATE_LOOPBACK_INSTANCE_REPLY,
1160   ({
1161     rmp->sw_if_index = ntohl (sw_if_index);
1162   }));
1163   /* *INDENT-ON* */
1164 }
1165
1166 static void
1167 vl_api_delete_loopback_t_handler (vl_api_delete_loopback_t * mp)
1168 {
1169   vl_api_delete_loopback_reply_t *rmp;
1170   u32 sw_if_index;
1171   int rv;
1172
1173   sw_if_index = ntohl (mp->sw_if_index);
1174   rv = vnet_delete_loopback_interface (sw_if_index);
1175
1176   REPLY_MACRO (VL_API_DELETE_LOOPBACK_REPLY);
1177 }
1178
1179 /*
1180  * vpe_api_hookup
1181  * Add vpe's API message handlers to the table.
1182  * vlib has alread mapped shared memory and
1183  * added the client registration handlers.
1184  * See .../vlib-api/vlibmemory/memclnt_vlib.c:memclnt_process()
1185  */
1186 #define vl_msg_name_crc_list
1187 #include <vnet/interface.api.h>
1188 #undef vl_msg_name_crc_list
1189
1190 static void
1191 setup_message_id_table (api_main_t * am)
1192 {
1193 #define _(id,n,crc) vl_msg_api_add_msg_name_crc (am, #n "_" #crc, id);
1194   foreach_vl_msg_name_crc_interface;
1195 #undef _
1196 }
1197
1198 pub_sub_handler (interface_events, INTERFACE_EVENTS);
1199
1200 static clib_error_t *
1201 interface_api_hookup (vlib_main_t * vm)
1202 {
1203   api_main_t *am = &api_main;
1204
1205 #define _(N,n)                                                  \
1206     vl_msg_api_set_handlers(VL_API_##N, #n,                     \
1207                            vl_api_##n##_t_handler,              \
1208                            vl_noop_handler,                     \
1209                            vl_api_##n##_t_endian,               \
1210                            vl_api_##n##_t_print,                \
1211                            sizeof(vl_api_##n##_t), 1);
1212   foreach_vpe_api_msg;
1213 #undef _
1214
1215   /*
1216    * Set up the (msg_name, crc, message-id) table
1217    */
1218   setup_message_id_table (am);
1219
1220   return 0;
1221 }
1222
1223 VLIB_API_INIT_FUNCTION (interface_api_hookup);
1224
1225 /*
1226  * fd.io coding-style-patch-verification: ON
1227  *
1228  * Local Variables:
1229  * eval: (c-set-style "gnu")
1230  * End:
1231  */