Propagate duplicate IF addr add/del error up to API.
[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_TABLE, sw_interface_set_table)               \
58 _(SW_INTERFACE_GET_TABLE, sw_interface_get_table)               \
59 _(SW_INTERFACE_SET_UNNUMBERED, sw_interface_set_unnumbered)     \
60 _(SW_INTERFACE_CLEAR_STATS, sw_interface_clear_stats)           \
61 _(SW_INTERFACE_TAG_ADD_DEL, sw_interface_tag_add_del)           \
62 _(SW_INTERFACE_SET_MAC_ADDRESS, sw_interface_set_mac_address)
63
64 static void
65 vl_api_sw_interface_set_flags_t_handler (vl_api_sw_interface_set_flags_t * mp)
66 {
67   vl_api_sw_interface_set_flags_reply_t *rmp;
68   vnet_main_t *vnm = vnet_get_main ();
69   int rv = 0;
70   clib_error_t *error;
71   u16 flags;
72
73   VALIDATE_SW_IF_INDEX (mp);
74
75   flags = mp->admin_up_down ? VNET_SW_INTERFACE_FLAG_ADMIN_UP : 0;
76
77   error = vnet_sw_interface_set_flags (vnm, ntohl (mp->sw_if_index), flags);
78   if (error)
79     {
80       rv = -1;
81       clib_error_report (error);
82     }
83
84   BAD_SW_IF_INDEX_LABEL;
85   REPLY_MACRO (VL_API_SW_INTERFACE_SET_FLAGS_REPLY);
86 }
87
88 static void
89 vl_api_sw_interface_set_mtu_t_handler (vl_api_sw_interface_set_mtu_t * mp)
90 {
91   vl_api_sw_interface_set_mtu_reply_t *rmp;
92   vnet_main_t *vnm = vnet_get_main ();
93   u32 flags = ETHERNET_INTERFACE_FLAG_MTU;
94   u32 sw_if_index = ntohl (mp->sw_if_index);
95   u16 mtu = ntohs (mp->mtu);
96   ethernet_main_t *em = &ethernet_main;
97   int rv = 0;
98
99   VALIDATE_SW_IF_INDEX (mp);
100
101   vnet_sw_interface_t *si = vnet_get_sw_interface (vnm, sw_if_index);
102   if (si->type != VNET_SW_INTERFACE_TYPE_HARDWARE)
103     {
104       rv = VNET_API_ERROR_INVALID_VALUE;
105       goto bad_sw_if_index;
106     }
107
108   vnet_hw_interface_t *hi = vnet_get_hw_interface (vnm, si->hw_if_index);
109   ethernet_interface_t *eif = ethernet_get_interface (em, si->hw_if_index);
110
111   if (!eif)
112     {
113       rv = VNET_API_ERROR_FEATURE_DISABLED;
114       goto bad_sw_if_index;
115     }
116
117   if (mtu < hi->min_supported_packet_bytes)
118     {
119       rv = VNET_API_ERROR_INVALID_VALUE;
120       goto bad_sw_if_index;
121     }
122
123   if (mtu > hi->max_supported_packet_bytes)
124     {
125       rv = VNET_API_ERROR_INVALID_VALUE;
126       goto bad_sw_if_index;
127     }
128
129   if (hi->max_packet_bytes != mtu)
130     {
131       hi->max_packet_bytes = mtu;
132       ethernet_set_flags (vnm, si->hw_if_index, flags);
133     }
134
135   BAD_SW_IF_INDEX_LABEL;
136   REPLY_MACRO (VL_API_SW_INTERFACE_SET_MTU_REPLY);
137 }
138
139 static void
140 send_sw_interface_details (vpe_api_main_t * am,
141                            unix_shared_memory_queue_t * q,
142                            vnet_sw_interface_t * swif,
143                            u8 * interface_name, u32 context)
144 {
145   vnet_hw_interface_t *hi =
146     vnet_get_sup_hw_interface (am->vnet_main, swif->sw_if_index);
147
148   vl_api_sw_interface_details_t *mp = vl_msg_api_alloc (sizeof (*mp));
149   memset (mp, 0, sizeof (*mp));
150   mp->_vl_msg_id = ntohs (VL_API_SW_INTERFACE_DETAILS);
151   mp->sw_if_index = ntohl (swif->sw_if_index);
152   mp->sup_sw_if_index = ntohl (swif->sup_sw_if_index);
153   mp->admin_up_down = (swif->flags & VNET_SW_INTERFACE_FLAG_ADMIN_UP) ? 1 : 0;
154   mp->link_up_down = (hi->flags & VNET_HW_INTERFACE_FLAG_LINK_UP) ? 1 : 0;
155   mp->link_duplex = ((hi->flags & VNET_HW_INTERFACE_FLAG_DUPLEX_MASK) >>
156                      VNET_HW_INTERFACE_FLAG_DUPLEX_SHIFT);
157   mp->link_speed = ((hi->flags & VNET_HW_INTERFACE_FLAG_SPEED_MASK) >>
158                     VNET_HW_INTERFACE_FLAG_SPEED_SHIFT);
159   mp->link_mtu = ntohs (hi->max_packet_bytes);
160   mp->context = context;
161
162   strncpy ((char *) mp->interface_name,
163            (char *) interface_name, ARRAY_LEN (mp->interface_name) - 1);
164
165   /* Send the L2 address for ethernet physical intfcs */
166   if (swif->sup_sw_if_index == swif->sw_if_index
167       && hi->hw_class_index == ethernet_hw_interface_class.index)
168     {
169       ethernet_main_t *em = ethernet_get_main (am->vlib_main);
170       ethernet_interface_t *ei;
171
172       ei = pool_elt_at_index (em->interfaces, hi->hw_instance);
173       ASSERT (sizeof (mp->l2_address) >= sizeof (ei->address));
174       clib_memcpy (mp->l2_address, ei->address, sizeof (ei->address));
175       mp->l2_address_length = ntohl (sizeof (ei->address));
176     }
177   else if (swif->sup_sw_if_index != swif->sw_if_index)
178     {
179       vnet_sub_interface_t *sub = &swif->sub;
180       mp->sub_id = ntohl (sub->id);
181       mp->sub_dot1ad = sub->eth.flags.dot1ad;
182       mp->sub_number_of_tags =
183         sub->eth.flags.one_tag + sub->eth.flags.two_tags * 2;
184       mp->sub_outer_vlan_id = ntohs (sub->eth.outer_vlan_id);
185       mp->sub_inner_vlan_id = ntohs (sub->eth.inner_vlan_id);
186       mp->sub_exact_match = sub->eth.flags.exact_match;
187       mp->sub_default = sub->eth.flags.default_sub;
188       mp->sub_outer_vlan_id_any = sub->eth.flags.outer_vlan_id_any;
189       mp->sub_inner_vlan_id_any = sub->eth.flags.inner_vlan_id_any;
190
191       /* vlan tag rewrite data */
192       u32 vtr_op = L2_VTR_DISABLED;
193       u32 vtr_push_dot1q = 0, vtr_tag1 = 0, vtr_tag2 = 0;
194
195       if (l2vtr_get (am->vlib_main, am->vnet_main, swif->sw_if_index,
196                      &vtr_op, &vtr_push_dot1q, &vtr_tag1, &vtr_tag2) != 0)
197         {
198           // error - default to disabled
199           mp->vtr_op = ntohl (L2_VTR_DISABLED);
200           clib_warning ("cannot get vlan tag rewrite for sw_if_index %d",
201                         swif->sw_if_index);
202         }
203       else
204         {
205           mp->vtr_op = ntohl (vtr_op);
206           mp->vtr_push_dot1q = ntohl (vtr_push_dot1q);
207           mp->vtr_tag1 = ntohl (vtr_tag1);
208           mp->vtr_tag2 = ntohl (vtr_tag2);
209         }
210     }
211
212   /* pbb tag rewrite data */
213   ethernet_header_t eth_hdr;
214   u32 vtr_op = L2_VTR_DISABLED;
215   u16 outer_tag = 0;
216   u16 b_vlanid = 0;
217   u32 i_sid = 0;
218   memset (&eth_hdr, 0, sizeof (eth_hdr));
219
220   if (!l2pbb_get (am->vlib_main, am->vnet_main, swif->sw_if_index,
221                   &vtr_op, &outer_tag, &eth_hdr, &b_vlanid, &i_sid))
222     {
223       mp->sub_dot1ah = 1;
224       clib_memcpy (mp->b_dmac, eth_hdr.dst_address,
225                    sizeof (eth_hdr.dst_address));
226       clib_memcpy (mp->b_smac, eth_hdr.src_address,
227                    sizeof (eth_hdr.src_address));
228       mp->b_vlanid = b_vlanid;
229       mp->i_sid = i_sid;
230     }
231
232   u8 *tag = vnet_get_sw_interface_tag (vnet_get_main (), swif->sw_if_index);
233   if (tag)
234     strncpy ((char *) mp->tag, (char *) tag, ARRAY_LEN (mp->tag) - 1);
235
236   vl_msg_api_send_shmem (q, (u8 *) & mp);
237 }
238
239 static void
240 vl_api_sw_interface_dump_t_handler (vl_api_sw_interface_dump_t * mp)
241 {
242   vpe_api_main_t *am = &vpe_api_main;
243   vnet_sw_interface_t *swif;
244   vnet_interface_main_t *im = &am->vnet_main->interface_main;
245
246   unix_shared_memory_queue_t *q =
247     vl_api_client_index_to_input_queue (mp->client_index);
248   if (q == 0)
249     return;
250
251   u8 *filter = 0, *name = 0;
252   if (mp->name_filter_valid)
253     {
254       mp->name_filter[ARRAY_LEN (mp->name_filter) - 1] = 0;
255       filter = format (0, "%s%c", mp->name_filter, 0);
256     }
257
258   char *strcasestr (char *, char *);    /* lnx hdr file botch */
259   /* *INDENT-OFF* */
260   pool_foreach (swif, im->sw_interfaces,
261   ({
262     if (!vnet_swif_is_api_visible (swif))
263         continue;
264     vec_reset_length(name);
265     name = format (name, "%U%c", format_vnet_sw_interface_name, am->vnet_main,
266                    swif, 0);
267
268     if (filter && !strcasestr((char *) name, (char *) filter))
269         continue;
270
271     send_sw_interface_details (am, q, swif, name, mp->context);
272   }));
273   /* *INDENT-ON* */
274
275   vec_free (name);
276   vec_free (filter);
277 }
278
279 static void
280   vl_api_sw_interface_add_del_address_t_handler
281   (vl_api_sw_interface_add_del_address_t * mp)
282 {
283   vlib_main_t *vm = vlib_get_main ();
284   vnet_main_t *vnm = vnet_get_main ();
285   vl_api_sw_interface_add_del_address_reply_t *rmp;
286   int rv = 0;
287   u32 is_del;
288   clib_error_t *error = 0;
289
290   VALIDATE_SW_IF_INDEX (mp);
291
292   is_del = mp->is_add == 0;
293   vnm->api_errno = 0;
294
295   if (mp->del_all)
296     ip_del_all_interface_addresses (vm, ntohl (mp->sw_if_index));
297   else if (mp->is_ipv6)
298     error = ip6_add_del_interface_address (vm, ntohl (mp->sw_if_index),
299                                            (void *) mp->address,
300                                            mp->address_length, is_del);
301   else
302     error = ip4_add_del_interface_address (vm, ntohl (mp->sw_if_index),
303                                            (void *) mp->address,
304                                            mp->address_length, is_del);
305
306   if (error)
307     {
308       rv = vnm->api_errno;
309       clib_error_report (error);
310       goto done;
311     }
312
313   BAD_SW_IF_INDEX_LABEL;
314
315 done:
316   REPLY_MACRO (VL_API_SW_INTERFACE_ADD_DEL_ADDRESS_REPLY);
317 }
318
319 void stats_dslock_with_hint (int hint, int tag) __attribute__ ((weak));
320 void
321 stats_dslock_with_hint (int hint, int tag)
322 {
323 }
324
325 void stats_dsunlock (void) __attribute__ ((weak));
326 void
327 stats_dsunlock (void)
328 {
329 }
330
331 static void
332 vl_api_sw_interface_set_table_t_handler (vl_api_sw_interface_set_table_t * mp)
333 {
334   vl_api_sw_interface_set_table_reply_t *rmp;
335   u32 sw_if_index = ntohl (mp->sw_if_index);
336   u32 table_id = ntohl (mp->vrf_id);
337   int rv = 0;
338
339   VALIDATE_SW_IF_INDEX (mp);
340
341   stats_dslock_with_hint (1 /* release hint */ , 4 /* tag */ );
342
343   if (mp->is_ipv6)
344     rv = ip_table_bind (FIB_PROTOCOL_IP6, sw_if_index, table_id, 1);
345   else
346     rv = ip_table_bind (FIB_PROTOCOL_IP4, sw_if_index, table_id, 1);
347
348   stats_dsunlock ();
349
350   BAD_SW_IF_INDEX_LABEL;
351
352   REPLY_MACRO (VL_API_SW_INTERFACE_SET_TABLE_REPLY);
353 }
354
355 int
356 ip_table_bind (fib_protocol_t fproto,
357                u32 sw_if_index, u32 table_id, u8 is_api)
358 {
359   CLIB_UNUSED (ip_interface_address_t * ia);
360   u32 fib_index, mfib_index;
361   fib_source_t src;
362   mfib_source_t msrc;
363
364   if (is_api)
365     {
366       src = FIB_SOURCE_API;
367       msrc = MFIB_SOURCE_API;
368     }
369   else
370     {
371       src = FIB_SOURCE_CLI;
372       msrc = MFIB_SOURCE_CLI;
373     }
374
375   /*
376    * This is temporary whilst I do the song and dance with the CSIT version
377    */
378   if (0 != table_id)
379     {
380       fib_index = fib_table_find_or_create_and_lock (fproto, table_id, src);
381       mfib_index =
382         mfib_table_find_or_create_and_lock (fproto, table_id, msrc);
383     }
384   else
385     {
386       fib_index = 0;
387       mfib_index = 0;
388     }
389
390   /*
391    * This if table does not exist = error is what we want in the end.
392    */
393   /* fib_index = fib_table_find (fproto, table_id); */
394   /* mfib_index = mfib_table_find (fproto, table_id); */
395
396   /* if (~0 == fib_index || ~0 == mfib_index) */
397   /*   { */
398   /*     return (VNET_API_ERROR_NO_SUCH_FIB); */
399   /*   } */
400
401   if (FIB_PROTOCOL_IP6 == fproto)
402     {
403       /*
404        * If the interface already has in IP address, then a change int
405        * VRF is not allowed. The IP address applied must first be removed.
406        * We do not do that automatically here, since VPP has no knowledge
407        * of whether thoses subnets are valid in the destination VRF.
408        */
409       /* *INDENT-OFF* */
410       foreach_ip_interface_address (&ip6_main.lookup_main,
411                                     ia, sw_if_index,
412                                     1 /* honor unnumbered */ ,
413       ({
414         return (VNET_API_ERROR_ADDRESS_FOUND_FOR_INTERFACE);
415       }));
416       /* *INDENT-ON* */
417
418       vec_validate (ip6_main.fib_index_by_sw_if_index, sw_if_index);
419       vec_validate (ip6_main.mfib_index_by_sw_if_index, sw_if_index);
420
421       /*
422        * tell those that are interested that the binding is changing.
423        */
424       ip6_table_bind_callback_t *cb;
425       vec_foreach (cb, ip6_main.table_bind_callbacks)
426         cb->function (&ip6_main, cb->function_opaque,
427                       sw_if_index,
428                       fib_index,
429                       ip6_main.fib_index_by_sw_if_index[sw_if_index]);
430
431       if (0 == table_id)
432         {
433           /* reset back to default */
434           if (0 != ip6_main.fib_index_by_sw_if_index[sw_if_index])
435             fib_table_unlock (ip6_main.fib_index_by_sw_if_index[sw_if_index],
436                               FIB_PROTOCOL_IP6, src);
437           if (0 != ip6_main.mfib_index_by_sw_if_index[sw_if_index])
438             mfib_table_unlock (ip6_main.mfib_index_by_sw_if_index
439                                [sw_if_index], FIB_PROTOCOL_IP6, msrc);
440
441         }
442       else
443         {
444           /* we need to lock the table now it's inuse */
445           fib_table_lock (fib_index, FIB_PROTOCOL_IP6, src);
446           mfib_table_lock (mfib_index, FIB_PROTOCOL_IP6, msrc);
447         }
448
449       ip6_main.fib_index_by_sw_if_index[sw_if_index] = fib_index;
450       ip6_main.mfib_index_by_sw_if_index[sw_if_index] = mfib_index;
451     }
452   else
453     {
454       /*
455        * If the interface already has in IP address, then a change int
456        * VRF is not allowed. The IP address applied must first be removed.
457        * We do not do that automatically here, since VPP has no knowledge
458        * of whether thoses subnets are valid in the destination VRF.
459        */
460       /* *INDENT-OFF* */
461       foreach_ip_interface_address (&ip4_main.lookup_main,
462                                     ia, sw_if_index,
463                                     1 /* honor unnumbered */ ,
464       ({
465         return (VNET_API_ERROR_ADDRESS_FOUND_FOR_INTERFACE);
466       }));
467       /* *INDENT-ON* */
468
469       vec_validate (ip4_main.fib_index_by_sw_if_index, sw_if_index);
470       vec_validate (ip4_main.mfib_index_by_sw_if_index, sw_if_index);
471
472       /*
473        * tell those that are interested that the binding is changing.
474        */
475       ip4_table_bind_callback_t *cb;
476       vec_foreach (cb, ip4_main.table_bind_callbacks)
477         cb->function (&ip4_main, cb->function_opaque,
478                       sw_if_index,
479                       fib_index,
480                       ip4_main.fib_index_by_sw_if_index[sw_if_index]);
481
482       if (0 == table_id)
483         {
484           /* reset back to default */
485           if (0 != ip4_main.fib_index_by_sw_if_index[sw_if_index])
486             fib_table_unlock (ip4_main.fib_index_by_sw_if_index[sw_if_index],
487                               FIB_PROTOCOL_IP4, src);
488           if (0 != ip4_main.mfib_index_by_sw_if_index[sw_if_index])
489             mfib_table_unlock (ip4_main.mfib_index_by_sw_if_index
490                                [sw_if_index], FIB_PROTOCOL_IP4, msrc);
491
492         }
493       else
494         {
495           /* we need to lock the table now it's inuse */
496           fib_index = fib_table_find_or_create_and_lock (FIB_PROTOCOL_IP4,
497                                                          table_id, src);
498
499           mfib_index = mfib_table_find_or_create_and_lock (FIB_PROTOCOL_IP4,
500                                                            table_id, msrc);
501         }
502
503       ip4_main.fib_index_by_sw_if_index[sw_if_index] = fib_index;
504       ip4_main.mfib_index_by_sw_if_index[sw_if_index] = mfib_index;
505     }
506
507   /*
508    * Temporary. undo the locks from the find and create at the staart
509    */
510   if (0 != table_id)
511     {
512       fib_table_unlock (fib_index, fproto, src);
513       mfib_table_unlock (mfib_index, fproto, msrc);
514     }
515
516   return (0);
517 }
518
519 static void
520 send_sw_interface_get_table_reply (unix_shared_memory_queue_t * q,
521                                    u32 context, int retval, u32 vrf_id)
522 {
523   vl_api_sw_interface_get_table_reply_t *mp;
524
525   mp = vl_msg_api_alloc (sizeof (*mp));
526   memset (mp, 0, sizeof (*mp));
527   mp->_vl_msg_id = ntohs (VL_API_SW_INTERFACE_GET_TABLE_REPLY);
528   mp->context = context;
529   mp->retval = htonl (retval);
530   mp->vrf_id = htonl (vrf_id);
531
532   vl_msg_api_send_shmem (q, (u8 *) & mp);
533 }
534
535 static void
536 vl_api_sw_interface_get_table_t_handler (vl_api_sw_interface_get_table_t * mp)
537 {
538   unix_shared_memory_queue_t *q;
539   fib_table_t *fib_table = 0;
540   u32 sw_if_index = ~0;
541   u32 fib_index = ~0;
542   u32 table_id = ~0;
543   fib_protocol_t fib_proto = FIB_PROTOCOL_IP4;
544   int rv = 0;
545
546   q = vl_api_client_index_to_input_queue (mp->client_index);
547   if (q == 0)
548     return;
549
550   VALIDATE_SW_IF_INDEX (mp);
551
552   sw_if_index = ntohl (mp->sw_if_index);
553
554   if (mp->is_ipv6)
555     fib_proto = FIB_PROTOCOL_IP6;
556
557   fib_index = fib_table_get_index_for_sw_if_index (fib_proto, sw_if_index);
558   if (fib_index != ~0)
559     {
560       fib_table = fib_table_get (fib_index, fib_proto);
561       table_id = fib_table->ft_table_id;
562     }
563
564   BAD_SW_IF_INDEX_LABEL;
565
566   send_sw_interface_get_table_reply (q, mp->context, rv, table_id);
567 }
568
569 static void vl_api_sw_interface_set_unnumbered_t_handler
570   (vl_api_sw_interface_set_unnumbered_t * mp)
571 {
572   vl_api_sw_interface_set_unnumbered_reply_t *rmp;
573   int rv = 0;
574   vnet_main_t *vnm = vnet_get_main ();
575   u32 sw_if_index = ntohl (mp->sw_if_index);
576   u32 unnumbered_sw_if_index = ntohl (mp->unnumbered_sw_if_index);
577   u32 was_unnum;
578
579   /*
580    * The API message field names are backwards from
581    * the underlying data structure names.
582    * It's not worth changing them now.
583    */
584   if (!vnet_sw_interface_is_api_valid (vnm, unnumbered_sw_if_index))
585     {
586       rv = VNET_API_ERROR_INVALID_SW_IF_INDEX;
587       goto done;
588     }
589
590   /* Only check the "use loop0" field when setting the binding */
591   if (mp->is_add && !vnet_sw_interface_is_api_valid (vnm, sw_if_index))
592     {
593       rv = VNET_API_ERROR_INVALID_SW_IF_INDEX_2;
594       goto done;
595     }
596
597   vnet_sw_interface_t *si =
598     vnet_get_sw_interface (vnm, unnumbered_sw_if_index);
599   was_unnum = (si->flags & VNET_SW_INTERFACE_FLAG_UNNUMBERED);
600
601   if (mp->is_add)
602     {
603       si->flags |= VNET_SW_INTERFACE_FLAG_UNNUMBERED;
604       si->unnumbered_sw_if_index = sw_if_index;
605
606       ip4_main.lookup_main.if_address_pool_index_by_sw_if_index
607         [unnumbered_sw_if_index] =
608         ip4_main.
609         lookup_main.if_address_pool_index_by_sw_if_index[sw_if_index];
610       ip6_main.
611         lookup_main.if_address_pool_index_by_sw_if_index
612         [unnumbered_sw_if_index] =
613         ip6_main.
614         lookup_main.if_address_pool_index_by_sw_if_index[sw_if_index];
615     }
616   else
617     {
618       si->flags &= ~(VNET_SW_INTERFACE_FLAG_UNNUMBERED);
619       si->unnumbered_sw_if_index = (u32) ~ 0;
620
621       ip4_main.lookup_main.if_address_pool_index_by_sw_if_index
622         [unnumbered_sw_if_index] = ~0;
623       ip6_main.lookup_main.if_address_pool_index_by_sw_if_index
624         [unnumbered_sw_if_index] = ~0;
625     }
626
627   if (was_unnum != (si->flags & VNET_SW_INTERFACE_FLAG_UNNUMBERED))
628     {
629       ip4_sw_interface_enable_disable (unnumbered_sw_if_index, mp->is_add);
630       ip6_sw_interface_enable_disable (unnumbered_sw_if_index, mp->is_add);
631     }
632
633 done:
634   REPLY_MACRO (VL_API_SW_INTERFACE_SET_UNNUMBERED_REPLY);
635 }
636
637 static void
638 vl_api_sw_interface_clear_stats_t_handler (vl_api_sw_interface_clear_stats_t *
639                                            mp)
640 {
641   vl_api_sw_interface_clear_stats_reply_t *rmp;
642
643   vnet_main_t *vnm = vnet_get_main ();
644   vnet_interface_main_t *im = &vnm->interface_main;
645   vlib_simple_counter_main_t *sm;
646   vlib_combined_counter_main_t *cm;
647   static vnet_main_t **my_vnet_mains;
648   int i, j, n_counters;
649   int rv = 0;
650
651   if (mp->sw_if_index != ~0)
652     VALIDATE_SW_IF_INDEX (mp);
653
654   vec_reset_length (my_vnet_mains);
655
656   for (i = 0; i < vec_len (vnet_mains); i++)
657     {
658       if (vnet_mains[i])
659         vec_add1 (my_vnet_mains, vnet_mains[i]);
660     }
661
662   if (vec_len (vnet_mains) == 0)
663     vec_add1 (my_vnet_mains, vnm);
664
665   n_counters = vec_len (im->combined_sw_if_counters);
666
667   for (j = 0; j < n_counters; j++)
668     {
669       for (i = 0; i < vec_len (my_vnet_mains); i++)
670         {
671           im = &my_vnet_mains[i]->interface_main;
672           cm = im->combined_sw_if_counters + j;
673           if (mp->sw_if_index == (u32) ~ 0)
674             vlib_clear_combined_counters (cm);
675           else
676             vlib_zero_combined_counter (cm, ntohl (mp->sw_if_index));
677         }
678     }
679
680   n_counters = vec_len (im->sw_if_counters);
681
682   for (j = 0; j < n_counters; j++)
683     {
684       for (i = 0; i < vec_len (my_vnet_mains); i++)
685         {
686           im = &my_vnet_mains[i]->interface_main;
687           sm = im->sw_if_counters + j;
688           if (mp->sw_if_index == (u32) ~ 0)
689             vlib_clear_simple_counters (sm);
690           else
691             vlib_zero_simple_counter (sm, ntohl (mp->sw_if_index));
692         }
693     }
694
695   BAD_SW_IF_INDEX_LABEL;
696
697   REPLY_MACRO (VL_API_SW_INTERFACE_CLEAR_STATS_REPLY);
698 }
699
700 #define API_LINK_STATE_EVENT 1
701 #define API_ADMIN_UP_DOWN_EVENT 2
702
703 static int
704 event_data_cmp (void *a1, void *a2)
705 {
706   uword *e1 = a1;
707   uword *e2 = a2;
708
709   return (word) e1[0] - (word) e2[0];
710 }
711
712 static void
713 send_sw_interface_event (vpe_api_main_t * am,
714                          vpe_client_registration_t * reg,
715                          unix_shared_memory_queue_t * q,
716                          vnet_sw_interface_t * swif)
717 {
718   vl_api_sw_interface_event_t *mp;
719   vnet_main_t *vnm = am->vnet_main;
720
721   vnet_hw_interface_t *hi = vnet_get_sup_hw_interface (vnm,
722                                                        swif->sw_if_index);
723   mp = vl_msg_api_alloc (sizeof (*mp));
724   memset (mp, 0, sizeof (*mp));
725   mp->_vl_msg_id = ntohs (VL_API_SW_INTERFACE_EVENT);
726   mp->sw_if_index = ntohl (swif->sw_if_index);
727   mp->client_index = reg->client_index;
728   mp->pid = reg->client_pid;
729
730   mp->admin_up_down = (swif->flags & VNET_SW_INTERFACE_FLAG_ADMIN_UP) ? 1 : 0;
731   mp->link_up_down = (hi->flags & VNET_HW_INTERFACE_FLAG_LINK_UP) ? 1 : 0;
732   vl_msg_api_send_shmem (q, (u8 *) & mp);
733 }
734
735 static uword
736 link_state_process (vlib_main_t * vm,
737                     vlib_node_runtime_t * rt, vlib_frame_t * f)
738 {
739   vpe_api_main_t *vam = &vpe_api_main;
740   vnet_main_t *vnm = vam->vnet_main;
741   vnet_sw_interface_t *swif;
742   uword *event_data = 0;
743   vpe_client_registration_t *reg;
744   int i;
745   u32 prev_sw_if_index;
746   unix_shared_memory_queue_t *q;
747
748   vam->link_state_process_up = 1;
749
750   while (1)
751     {
752       vlib_process_wait_for_event (vm);
753
754       /* Unified list of changed link or admin state sw_if_indices */
755       vlib_process_get_events_with_type
756         (vm, &event_data, API_LINK_STATE_EVENT);
757       vlib_process_get_events_with_type
758         (vm, &event_data, API_ADMIN_UP_DOWN_EVENT);
759
760       /* Sort, so we can eliminate duplicates */
761       vec_sort_with_function (event_data, event_data_cmp);
762
763       prev_sw_if_index = ~0;
764
765       for (i = 0; i < vec_len (event_data); i++)
766         {
767           /* Only one message per swif */
768           if (prev_sw_if_index == event_data[i])
769             continue;
770           prev_sw_if_index = event_data[i];
771
772           /* *INDENT-OFF* */
773           pool_foreach(reg, vam->interface_events_registrations,
774           ({
775             q = vl_api_client_index_to_input_queue (reg->client_index);
776             if (q)
777               {
778                 /* sw_interface may be deleted already */
779                 if (!pool_is_free_index (vnm->interface_main.sw_interfaces,
780                                          event_data[i]))
781                   {
782                     swif = vnet_get_sw_interface (vnm, event_data[i]);
783                     send_sw_interface_event (vam, reg, q, swif);
784                   }
785               }
786           }));
787           /* *INDENT-ON* */
788         }
789       vec_reset_length (event_data);
790     }
791
792   return 0;
793 }
794
795 static clib_error_t *link_up_down_function (vnet_main_t * vm, u32 hw_if_index,
796                                             u32 flags);
797 static clib_error_t *admin_up_down_function (vnet_main_t * vm,
798                                              u32 hw_if_index, u32 flags);
799
800 /* *INDENT-OFF* */
801 VLIB_REGISTER_NODE (link_state_process_node,static) = {
802   .function = link_state_process,
803   .type = VLIB_NODE_TYPE_PROCESS,
804   .name = "vpe-link-state-process",
805 };
806 /* *INDENT-ON* */
807
808 VNET_SW_INTERFACE_ADMIN_UP_DOWN_FUNCTION (admin_up_down_function);
809 VNET_HW_INTERFACE_LINK_UP_DOWN_FUNCTION (link_up_down_function);
810
811 static clib_error_t *
812 link_up_down_function (vnet_main_t * vm, u32 hw_if_index, u32 flags)
813 {
814   vpe_api_main_t *vam = &vpe_api_main;
815   vnet_hw_interface_t *hi = vnet_get_hw_interface (vm, hw_if_index);
816
817   if (vam->link_state_process_up)
818     vlib_process_signal_event (vam->vlib_main,
819                                link_state_process_node.index,
820                                API_LINK_STATE_EVENT, hi->sw_if_index);
821   return 0;
822 }
823
824 static clib_error_t *
825 admin_up_down_function (vnet_main_t * vm, u32 sw_if_index, u32 flags)
826 {
827   vpe_api_main_t *vam = &vpe_api_main;
828
829   /*
830    * Note: it's perfectly fair to set a subif admin up / admin down.
831    * Note the subtle distinction between this routine and the previous
832    * routine.
833    */
834   if (vam->link_state_process_up)
835     vlib_process_signal_event (vam->vlib_main,
836                                link_state_process_node.index,
837                                API_ADMIN_UP_DOWN_EVENT, sw_if_index);
838   return 0;
839 }
840
841 static void vl_api_sw_interface_tag_add_del_t_handler
842   (vl_api_sw_interface_tag_add_del_t * mp)
843 {
844   vnet_main_t *vnm = vnet_get_main ();
845   vl_api_sw_interface_tag_add_del_reply_t *rmp;
846   int rv = 0;
847   u8 *tag;
848   u32 sw_if_index = ntohl (mp->sw_if_index);
849
850   VALIDATE_SW_IF_INDEX (mp);
851
852   if (mp->is_add)
853     {
854       if (mp->tag[0] == 0)
855         {
856           rv = VNET_API_ERROR_INVALID_VALUE;
857           goto out;
858         }
859
860       mp->tag[ARRAY_LEN (mp->tag) - 1] = 0;
861       tag = format (0, "%s%c", mp->tag, 0);
862       vnet_set_sw_interface_tag (vnm, tag, sw_if_index);
863     }
864   else
865     vnet_clear_sw_interface_tag (vnm, sw_if_index);
866
867   BAD_SW_IF_INDEX_LABEL;
868 out:
869   REPLY_MACRO (VL_API_SW_INTERFACE_TAG_ADD_DEL_REPLY);
870 }
871
872 static void vl_api_sw_interface_set_mac_address_t_handler
873   (vl_api_sw_interface_set_mac_address_t * mp)
874 {
875   vl_api_sw_interface_set_mac_address_reply_t *rmp;
876   vnet_main_t *vnm = vnet_get_main ();
877   u32 sw_if_index = ntohl (mp->sw_if_index);
878   u64 mac;
879   clib_error_t *error;
880   int rv = 0;
881
882   VALIDATE_SW_IF_INDEX (mp);
883
884   mac = ((u64) mp->mac_address[0] << (8 * 0)
885          | (u64) mp->mac_address[1] << (8 * 1)
886          | (u64) mp->mac_address[2] << (8 * 2)
887          | (u64) mp->mac_address[3] << (8 * 3)
888          | (u64) mp->mac_address[4] << (8 * 4)
889          | (u64) mp->mac_address[5] << (8 * 5));
890
891   error = vnet_hw_interface_change_mac_address (vnm, sw_if_index, mac);
892   if (error)
893     {
894       rv = VNET_API_ERROR_UNIMPLEMENTED;
895       clib_error_report (error);
896       goto out;
897     }
898
899   BAD_SW_IF_INDEX_LABEL;
900 out:
901   REPLY_MACRO (VL_API_SW_INTERFACE_SET_MAC_ADDRESS_REPLY);
902 }
903
904 /*
905  * vpe_api_hookup
906  * Add vpe's API message handlers to the table.
907  * vlib has alread mapped shared memory and
908  * added the client registration handlers.
909  * See .../vlib-api/vlibmemory/memclnt_vlib.c:memclnt_process()
910  */
911 #define vl_msg_name_crc_list
912 #include <vnet/interface.api.h>
913 #undef vl_msg_name_crc_list
914
915 static void
916 setup_message_id_table (api_main_t * am)
917 {
918 #define _(id,n,crc) vl_msg_api_add_msg_name_crc (am, #n "_" #crc, id);
919   foreach_vl_msg_name_crc_interface;
920 #undef _
921 }
922
923 pub_sub_handler (interface_events, INTERFACE_EVENTS);
924
925 static clib_error_t *
926 interface_api_hookup (vlib_main_t * vm)
927 {
928   api_main_t *am = &api_main;
929
930 #define _(N,n)                                                  \
931     vl_msg_api_set_handlers(VL_API_##N, #n,                     \
932                            vl_api_##n##_t_handler,              \
933                            vl_noop_handler,                     \
934                            vl_api_##n##_t_endian,               \
935                            vl_api_##n##_t_print,                \
936                            sizeof(vl_api_##n##_t), 1);
937   foreach_vpe_api_msg;
938 #undef _
939
940   /*
941    * Set up the (msg_name, crc, message-id) table
942    */
943   setup_message_id_table (am);
944
945   return 0;
946 }
947
948 VLIB_API_INIT_FUNCTION (interface_api_hookup);
949
950 /*
951  * fd.io coding-style-patch-verification: ON
952  *
953  * Local Variables:
954  * eval: (c-set-style "gnu")
955  * End:
956  */