misc: binary api fuzz test fixes
[vpp.git] / src / plugins / dhcp / dhcp_api.c
1 /*
2  *------------------------------------------------------------------
3  * dhcp_api.c - dhcp 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 <dhcp/dhcp_proxy.h>
26 #include <dhcp/client.h>
27 #include <dhcp/dhcp6_pd_client_dp.h>
28 #include <dhcp/dhcp6_ia_na_client_dp.h>
29 #include <dhcp/dhcp6_client_common_dp.h>
30 #include <vnet/fib/fib_table.h>
31 #include <vnet/ip/ip_types_api.h>
32
33 /* define message IDs */
34 #include <vnet/format_fns.h>
35 #include <dhcp/dhcp.api_enum.h>
36 #include <dhcp/dhcp.api_types.h>
37
38 /**
39  * Base message ID fot the plugin
40  */
41 static u32 dhcp_base_msg_id;
42 #define REPLY_MSG_ID_BASE dhcp_base_msg_id
43
44 #include <vlibapi/api_helper_macros.h>
45
46 #define  DHCP_PLUGIN_VERSION_MAJOR 1
47 #define  DHCP_PLUGIN_VERSION_MINOR 0
48
49 static void
50 vl_api_dhcp_plugin_get_version_t_handler (vl_api_dhcp_plugin_get_version_t *
51                                           mp)
52 {
53   vl_api_dhcp_plugin_get_version_reply_t *rmp;
54   int msg_size = sizeof (*rmp);
55   vl_api_registration_t *reg;
56
57   reg = vl_api_client_index_to_registration (mp->client_index);
58   if (!reg)
59     return;
60
61   rmp = vl_msg_api_alloc (msg_size);
62   clib_memset (rmp, 0, msg_size);
63   rmp->_vl_msg_id =
64     ntohs (VL_API_DHCP_PLUGIN_GET_VERSION_REPLY + REPLY_MSG_ID_BASE);
65   rmp->context = mp->context;
66   rmp->major = htonl (DHCP_PLUGIN_VERSION_MAJOR);
67   rmp->minor = htonl (DHCP_PLUGIN_VERSION_MINOR);
68
69   vl_api_send_msg (reg, (u8 *) rmp);
70 }
71
72 static void
73 vl_api_dhcp_plugin_control_ping_t_handler (vl_api_dhcp_plugin_control_ping_t *
74                                            mp)
75 {
76   vl_api_dhcp_plugin_control_ping_reply_t *rmp;
77   int rv = 0;
78
79   /* *INDENT-OFF* */
80   REPLY_MACRO2 (VL_API_DHCP_PLUGIN_CONTROL_PING_REPLY,
81   ({
82     rmp->vpe_pid = ntohl (getpid ());
83   }));
84   /* *INDENT-ON* */
85 }
86
87 static void
88 vl_api_dhcp6_duid_ll_set_t_handler (vl_api_dhcp6_duid_ll_set_t * mp)
89 {
90   vl_api_dhcp6_duid_ll_set_reply_t *rmp;
91   dhcpv6_duid_ll_string_t *duid;
92   int rv = 0;
93
94   duid = (dhcpv6_duid_ll_string_t *) mp->duid_ll;
95   if (duid->duid_type != htonl (DHCPV6_DUID_LL))
96     {
97       rv = VNET_API_ERROR_INVALID_VALUE;
98       goto reply;
99     }
100   clib_memcpy (&client_duid, &duid, sizeof (client_duid));
101
102 reply:
103   REPLY_MACRO (VL_API_DHCP6_DUID_LL_SET_REPLY);
104 }
105
106 static void
107 vl_api_dhcp_proxy_set_vss_t_handler (vl_api_dhcp_proxy_set_vss_t * mp)
108 {
109   vl_api_dhcp_proxy_set_vss_reply_t *rmp;
110   u8 *vpn_ascii_id;
111   int rv;
112
113   mp->vpn_ascii_id[sizeof (mp->vpn_ascii_id) - 1] = 0;
114   vpn_ascii_id = format (0, "%s", mp->vpn_ascii_id);
115   rv =
116     dhcp_proxy_set_vss ((mp->is_ipv6 ? FIB_PROTOCOL_IP6 : FIB_PROTOCOL_IP4),
117                         ntohl (mp->tbl_id), ntohl (mp->vss_type),
118                         vpn_ascii_id, ntohl (mp->oui), ntohl (mp->vpn_index),
119                         mp->is_add == 0);
120
121   REPLY_MACRO (VL_API_DHCP_PROXY_SET_VSS_REPLY);
122 }
123
124
125 static void vl_api_dhcp_proxy_config_t_handler
126   (vl_api_dhcp_proxy_config_t * mp)
127 {
128   vl_api_dhcp_proxy_set_vss_reply_t *rmp;
129   ip46_address_t src, server;
130   int rv = -1;
131
132   if (mp->dhcp_src_address.af != mp->dhcp_server.af)
133     {
134       rv = VNET_API_ERROR_INVALID_ARGUMENT;
135       goto reply;
136     }
137
138   ip_address_decode (&mp->dhcp_src_address, &src);
139   ip_address_decode (&mp->dhcp_server, &server);
140
141   if (mp->dhcp_src_address.af == ADDRESS_IP4)
142     {
143       rv = dhcp4_proxy_set_server (&server,
144                                    &src,
145                                    (u32) ntohl (mp->rx_vrf_id),
146                                    (u32) ntohl (mp->server_vrf_id),
147                                    (int) (mp->is_add == 0));
148     }
149   else
150     {
151       rv = dhcp6_proxy_set_server (&server,
152                                    &src,
153                                    (u32) ntohl (mp->rx_vrf_id),
154                                    (u32) ntohl (mp->server_vrf_id),
155                                    (int) (mp->is_add == 0));
156     }
157
158 reply:
159   REPLY_MACRO (VL_API_DHCP_PROXY_CONFIG_REPLY);
160 }
161
162 static void
163 vl_api_dhcp_proxy_dump_t_handler (vl_api_dhcp_proxy_dump_t * mp)
164 {
165   vl_api_registration_t *reg;
166
167   reg = vl_api_client_index_to_registration (mp->client_index);
168   if (!reg)
169     return;;
170
171   dhcp_proxy_dump ((mp->is_ip6 == 1 ?
172                     FIB_PROTOCOL_IP6 : FIB_PROTOCOL_IP4), reg, mp->context);
173 }
174
175 void
176 dhcp_send_details (fib_protocol_t proto,
177                    void *opaque, u32 context, dhcp_proxy_t * proxy)
178 {
179   vl_api_dhcp_proxy_details_t *mp;
180   vl_api_registration_t *reg = opaque;
181   vl_api_dhcp_server_t *v_server;
182   dhcp_server_t *server;
183   fib_table_t *s_fib;
184   dhcp_vss_t *vss;
185   u32 count;
186   size_t n;
187
188   count = vec_len (proxy->dhcp_servers);
189   n = sizeof (*mp) + (count * sizeof (vl_api_dhcp_server_t));
190   mp = vl_msg_api_alloc (n);
191   if (!mp)
192     return;
193   clib_memset (mp, 0, n);
194   mp->_vl_msg_id = ntohs (VL_API_DHCP_PROXY_DETAILS + REPLY_MSG_ID_BASE);
195   mp->context = context;
196   mp->count = count;
197
198   mp->is_ipv6 = (proto == FIB_PROTOCOL_IP6);
199   mp->rx_vrf_id =
200     htonl (dhcp_proxy_rx_table_get_table_id (proto, proxy->rx_fib_index));
201
202   vss = dhcp_get_vss_info (&dhcp_proxy_main, proxy->rx_fib_index, proto);
203
204   if (vss)
205     {
206       mp->vss_type = ntohl (vss->vss_type);
207       if (vss->vss_type == VSS_TYPE_ASCII)
208         {
209           u32 id_len = vec_len (vss->vpn_ascii_id);
210           clib_memcpy (mp->vss_vpn_ascii_id, vss->vpn_ascii_id, id_len);
211         }
212       else if (vss->vss_type == VSS_TYPE_VPN_ID)
213         {
214           u32 oui = ((u32) vss->vpn_id[0] << 16) + ((u32) vss->vpn_id[1] << 8)
215             + ((u32) vss->vpn_id[2]);
216           u32 fib_id = ((u32) vss->vpn_id[3] << 24) +
217             ((u32) vss->vpn_id[4] << 16) + ((u32) vss->vpn_id[5] << 8) +
218             ((u32) vss->vpn_id[6]);
219           mp->vss_oui = htonl (oui);
220           mp->vss_fib_id = htonl (fib_id);
221         }
222     }
223   else
224     mp->vss_type = VSS_TYPE_INVALID;
225
226   vec_foreach_index (count, proxy->dhcp_servers)
227   {
228     server = &proxy->dhcp_servers[count];
229     v_server = &mp->servers[count];
230
231     s_fib = fib_table_get (server->server_fib_index, proto);
232
233     v_server->server_vrf_id = htonl (s_fib->ft_table_id);
234
235     if (mp->is_ipv6)
236       {
237         memcpy (&v_server->dhcp_server.un, &server->dhcp_server.ip6, 16);
238       }
239     else
240       {
241         /* put the address in the first bytes */
242         memcpy (&v_server->dhcp_server.un, &server->dhcp_server.ip4, 4);
243       }
244   }
245
246   if (mp->is_ipv6)
247     {
248       memcpy (&mp->dhcp_src_address.un, &proxy->dhcp_src_address.ip6, 16);
249     }
250   else
251     {
252       /* put the address in the first bytes */
253       memcpy (&mp->dhcp_src_address.un, &proxy->dhcp_src_address.ip4, 4);
254     }
255   vl_api_send_msg (reg, (u8 *) mp);
256 }
257
258 static void
259 dhcp_client_lease_encode (vl_api_dhcp_lease_t * lease,
260                           const dhcp_client_t * client)
261 {
262   size_t len;
263   u8 i;
264
265   lease->is_ipv6 = 0;           // only support IPv6 clients
266   lease->sw_if_index = ntohl (client->sw_if_index);
267   lease->state = ntohl (client->state);
268   len = clib_min (sizeof (lease->hostname) - 1, vec_len (client->hostname));
269   clib_memcpy (&lease->hostname, client->hostname, len);
270   lease->hostname[len] = 0;
271
272   lease->mask_width = client->installed.subnet_mask_width;
273   clib_memcpy (&lease->host_address.un,
274                (u8 *) & client->installed.leased_address,
275                sizeof (ip4_address_t));
276   clib_memcpy (&lease->router_address.un,
277                (u8 *) & client->installed.router_address,
278                sizeof (ip4_address_t));
279
280   lease->count = vec_len (client->domain_server_address);
281   for (i = 0; i < lease->count; i++)
282     clib_memcpy (&lease->domain_server[i].address,
283                  (u8 *) & client->domain_server_address[i],
284                  sizeof (ip4_address_t));
285
286   clib_memcpy (&lease->host_mac[0], client->client_hardware_address, 6);
287 }
288
289 static void
290 dhcp_client_data_encode (vl_api_dhcp_client_t * vclient,
291                          const dhcp_client_t * client)
292 {
293   size_t len;
294
295   vclient->sw_if_index = ntohl (client->sw_if_index);
296   len = clib_min (sizeof (vclient->hostname) - 1, vec_len (client->hostname));
297   clib_memcpy (&vclient->hostname, client->hostname, len);
298   vclient->hostname[len] = 0;
299
300   len = clib_min (sizeof (vclient->id) - 1,
301                   vec_len (client->client_identifier));
302   clib_memcpy (&vclient->id, client->client_identifier, len);
303   vclient->id[len] = 0;
304
305   if (NULL != client->event_callback)
306     vclient->want_dhcp_event = 1;
307   else
308     vclient->want_dhcp_event = 0;
309   vclient->set_broadcast_flag = client->set_broadcast_flag;
310   vclient->dscp = ip_dscp_encode (client->dscp);
311   vclient->pid = client->pid;
312 }
313
314 static void
315 dhcp_compl_event_callback (u32 client_index, const dhcp_client_t * client)
316 {
317   vl_api_registration_t *reg;
318   vl_api_dhcp_compl_event_t *mp;
319
320   reg = vl_api_client_index_to_registration (client_index);
321   if (!reg)
322     return;
323
324   mp = vl_msg_api_alloc (sizeof (*mp));
325   mp->client_index = client_index;
326   mp->pid = client->pid;
327   dhcp_client_lease_encode (&mp->lease, client);
328
329   mp->_vl_msg_id = ntohs (VL_API_DHCP_COMPL_EVENT + REPLY_MSG_ID_BASE);
330
331   vl_api_send_msg (reg, (u8 *) mp);
332 }
333
334 static void vl_api_dhcp_client_config_t_handler
335   (vl_api_dhcp_client_config_t * mp)
336 {
337   vlib_main_t *vm = vlib_get_main ();
338   vl_api_dhcp_client_config_reply_t *rmp;
339   u32 sw_if_index;
340   ip_dscp_t dscp;
341   int rv = 0;
342
343   VALIDATE_SW_IF_INDEX (&(mp->client));
344
345   sw_if_index = ntohl (mp->client.sw_if_index);
346   dscp = ip_dscp_decode (mp->client.dscp);
347
348   rv = dhcp_client_config (mp->is_add,
349                            mp->client_index,
350                            vm,
351                            sw_if_index,
352                            mp->client.hostname,
353                            mp->client.id,
354                            (mp->client.want_dhcp_event ?
355                             dhcp_compl_event_callback :
356                             NULL),
357                            mp->client.set_broadcast_flag,
358                            dscp, mp->client.pid);
359
360   BAD_SW_IF_INDEX_LABEL;
361   REPLY_MACRO (VL_API_DHCP_CLIENT_CONFIG_REPLY);
362 }
363
364 typedef struct dhcp_client_send_walk_ctx_t_
365 {
366   vl_api_registration_t *reg;
367   u32 context;
368 } dhcp_client_send_walk_ctx_t;
369
370 static int
371 send_dhcp_client_entry (const dhcp_client_t * client, void *arg)
372 {
373   dhcp_client_send_walk_ctx_t *ctx;
374   vl_api_dhcp_client_details_t *mp;
375   u32 count;
376   size_t n;
377
378   ctx = arg;
379
380   count = vec_len (client->domain_server_address);
381   n = sizeof (*mp) + (count * sizeof (vl_api_domain_server_t));
382   mp = vl_msg_api_alloc (n);
383   if (!mp)
384     return 0;
385   clib_memset (mp, 0, n);
386
387   mp->_vl_msg_id = ntohs (VL_API_DHCP_CLIENT_DETAILS + REPLY_MSG_ID_BASE);
388   mp->context = ctx->context;
389
390   dhcp_client_data_encode (&mp->client, client);
391   dhcp_client_lease_encode (&mp->lease, client);
392
393   vl_api_send_msg (ctx->reg, (u8 *) mp);
394
395   return (1);
396 }
397
398 static void
399 vl_api_dhcp_client_dump_t_handler (vl_api_dhcp_client_dump_t * mp)
400 {
401   vl_api_registration_t *reg;
402
403   reg = vl_api_client_index_to_registration (mp->client_index);
404   if (!reg)
405     return;
406
407   dhcp_client_send_walk_ctx_t ctx = {
408     .reg = reg,
409     .context = mp->context,
410   };
411   dhcp_client_walk (send_dhcp_client_entry, &ctx);
412 }
413
414 static void
415   vl_api_dhcp6_clients_enable_disable_t_handler
416   (vl_api_dhcp6_clients_enable_disable_t * mp)
417 {
418   vl_api_dhcp6_clients_enable_disable_reply_t *rmp;
419   int rv = 0;
420
421   dhcp6_clients_enable_disable (mp->enable);
422
423   REPLY_MACRO (VL_API_DHCP6_CLIENTS_ENABLE_DISABLE_REPLY);
424 }
425
426 void
427   vl_api_want_dhcp6_reply_events_t_handler
428   (vl_api_want_dhcp6_reply_events_t * mp)
429 {
430   vpe_api_main_t *am = &vpe_api_main;
431   vl_api_want_dhcp6_reply_events_reply_t *rmp;
432   int rv = 0;
433
434   uword *p =
435     hash_get (am->dhcp6_reply_events_registration_hash, mp->client_index);
436   vpe_client_registration_t *rp;
437   if (p)
438     {
439       if (mp->enable_disable)
440         {
441           clib_warning ("pid %d: already enabled...", ntohl (mp->pid));
442           rv = VNET_API_ERROR_INVALID_REGISTRATION;
443           goto reply;
444         }
445       else
446         {
447           rp = pool_elt_at_index (am->dhcp6_reply_events_registrations, p[0]);
448           pool_put (am->dhcp6_reply_events_registrations, rp);
449           hash_unset (am->dhcp6_reply_events_registration_hash,
450                       mp->client_index);
451           if (pool_elts (am->dhcp6_reply_events_registrations) == 0)
452             dhcp6_set_publisher_node (~0, DHCP6_DP_REPORT_MAX);
453           goto reply;
454         }
455     }
456   if (mp->enable_disable == 0)
457     {
458       clib_warning ("pid %d: already disabled...", ntohl (mp->pid));
459       rv = VNET_API_ERROR_INVALID_REGISTRATION;
460       goto reply;
461     }
462   pool_get (am->dhcp6_reply_events_registrations, rp);
463   rp->client_index = mp->client_index;
464   rp->client_pid = ntohl (mp->pid);
465   hash_set (am->dhcp6_reply_events_registration_hash, rp->client_index,
466             rp - am->dhcp6_reply_events_registrations);
467   dhcp6_set_publisher_node (dhcp6_reply_process_node.index,
468                             DHCP6_DP_REPLY_REPORT);
469
470 reply:
471   REPLY_MACRO (VL_API_WANT_DHCP6_REPLY_EVENTS_REPLY);
472 }
473
474 void
475   vl_api_want_dhcp6_pd_reply_events_t_handler
476   (vl_api_want_dhcp6_pd_reply_events_t * mp)
477 {
478   vpe_api_main_t *am = &vpe_api_main;
479   vl_api_want_dhcp6_pd_reply_events_reply_t *rmp;
480   int rv = 0;
481
482   uword *p =
483     hash_get (am->dhcp6_pd_reply_events_registration_hash, mp->client_index);
484   vpe_client_registration_t *rp;
485   if (p)
486     {
487       if (mp->enable_disable)
488         {
489           clib_warning ("pid %d: already enabled...", ntohl (mp->pid));
490           rv = VNET_API_ERROR_INVALID_REGISTRATION;
491           goto reply;
492         }
493       else
494         {
495           rp =
496             pool_elt_at_index (am->dhcp6_pd_reply_events_registrations, p[0]);
497           pool_put (am->dhcp6_pd_reply_events_registrations, rp);
498           hash_unset (am->dhcp6_pd_reply_events_registration_hash,
499                       mp->client_index);
500           if (pool_elts (am->dhcp6_pd_reply_events_registrations) == 0)
501             dhcp6_pd_set_publisher_node (~0, DHCP6_PD_DP_REPORT_MAX);
502           goto reply;
503         }
504     }
505   if (mp->enable_disable == 0)
506     {
507       clib_warning ("pid %d: already disabled...", ntohl (mp->pid));
508       rv = VNET_API_ERROR_INVALID_REGISTRATION;
509       goto reply;
510     }
511   pool_get (am->dhcp6_pd_reply_events_registrations, rp);
512   rp->client_index = mp->client_index;
513   rp->client_pid = ntohl (mp->pid);
514   hash_set (am->dhcp6_pd_reply_events_registration_hash, rp->client_index,
515             rp - am->dhcp6_pd_reply_events_registrations);
516   dhcp6_pd_set_publisher_node (dhcp6_pd_reply_process_node.index,
517                                DHCP6_PD_DP_REPLY_REPORT);
518
519 reply:
520   REPLY_MACRO (VL_API_WANT_DHCP6_PD_REPLY_EVENTS_REPLY);
521 }
522
523 void
524   vl_api_dhcp6_send_client_message_t_handler
525   (vl_api_dhcp6_send_client_message_t * mp)
526 {
527   vl_api_dhcp6_send_client_message_reply_t *rmp;
528   dhcp6_send_client_message_params_t params;
529   vlib_main_t *vm = vlib_get_main ();
530   u32 n_addresses;
531   u32 i;
532   int rv = 0;
533
534   VALIDATE_SW_IF_INDEX (mp);
535
536   BAD_SW_IF_INDEX_LABEL;
537   REPLY_MACRO (VL_API_DHCP6_SEND_CLIENT_MESSAGE_REPLY);
538
539   if (rv != 0)
540     return;
541
542   params.sw_if_index = ntohl (mp->sw_if_index);
543   params.server_index = ntohl (mp->server_index);
544   params.irt = ntohl (mp->irt);
545   params.mrt = ntohl (mp->mrt);
546   params.mrc = ntohl (mp->mrc);
547   params.mrd = ntohl (mp->mrd);
548   params.msg_type = ntohl (mp->msg_type);
549   params.T1 = ntohl (mp->T1);
550   params.T2 = ntohl (mp->T2);
551   n_addresses = ntohl (mp->n_addresses);
552   /* Make sure that the number of addresses is sane */
553   if (n_addresses * sizeof (params.addresses) > vl_msg_api_max_length (mp))
554     {
555       rv = VNET_API_ERROR_INVALID_VALUE;
556       goto bad_sw_if_index;
557     }
558   params.addresses = 0;
559   if (n_addresses > 0)
560     vec_validate (params.addresses, n_addresses - 1);
561   for (i = 0; i < n_addresses; i++)
562     {
563       vl_api_dhcp6_address_info_t *ai = &mp->addresses[i];
564       dhcp6_send_client_message_params_address_t *addr = &params.addresses[i];
565       addr->preferred_lt = ntohl (ai->preferred_time);
566       addr->valid_lt = ntohl (ai->valid_time);
567       ip6_address_decode (ai->address, &addr->address);
568     }
569
570   dhcp6_send_client_message (vm, ntohl (mp->sw_if_index), mp->stop, &params);
571 }
572
573 void
574   vl_api_dhcp6_pd_send_client_message_t_handler
575   (vl_api_dhcp6_pd_send_client_message_t * mp)
576 {
577   vl_api_dhcp6_pd_send_client_message_reply_t *rmp;
578   dhcp6_pd_send_client_message_params_t params;
579   vlib_main_t *vm = vlib_get_main ();
580   u32 n_prefixes;
581   u32 i;
582   int rv = 0;
583
584   VALIDATE_SW_IF_INDEX (mp);
585
586   BAD_SW_IF_INDEX_LABEL;
587   REPLY_MACRO (VL_API_DHCP6_PD_SEND_CLIENT_MESSAGE_REPLY);
588
589   if (rv != 0)
590     return;
591
592   params.sw_if_index = ntohl (mp->sw_if_index);
593   params.server_index = ntohl (mp->server_index);
594   params.irt = ntohl (mp->irt);
595   params.mrt = ntohl (mp->mrt);
596   params.mrc = ntohl (mp->mrc);
597   params.mrd = ntohl (mp->mrd);
598   params.msg_type = ntohl (mp->msg_type);
599   params.T1 = ntohl (mp->T1);
600   params.T2 = ntohl (mp->T2);
601   n_prefixes = ntohl (mp->n_prefixes);
602
603   /* Minimal check to see that the number of prefixes is sane */
604   if (n_prefixes * sizeof (params.prefixes) > vl_msg_api_max_length (mp))
605     {
606       rv = VNET_API_ERROR_INVALID_VALUE;
607       goto bad_sw_if_index;
608     }
609
610   params.prefixes = 0;
611   if (n_prefixes > 0)
612     vec_validate (params.prefixes, n_prefixes - 1);
613   for (i = 0; i < n_prefixes; i++)
614     {
615       vl_api_dhcp6_pd_prefix_info_t *pi = &mp->prefixes[i];
616       dhcp6_pd_send_client_message_params_prefix_t *pref =
617         &params.prefixes[i];
618       pref->preferred_lt = ntohl (pi->preferred_time);
619       pref->valid_lt = ntohl (pi->valid_time);
620       ip6_address_decode (pi->prefix.address, &pref->prefix);
621       pref->prefix_length = pi->prefix.len;
622     }
623
624   dhcp6_pd_send_client_message (vm, ntohl (mp->sw_if_index), mp->stop,
625                                 &params);
626 }
627
628 static clib_error_t *
629 call_dhcp6_reply_event_callbacks (void *data,
630                                   _vnet_dhcp6_reply_event_function_list_elt_t
631                                   * elt)
632 {
633   clib_error_t *error = 0;
634
635   while (elt)
636     {
637       error = elt->fp (data);
638       if (error)
639         return error;
640       elt = elt->next_dhcp6_reply_event_function;
641     }
642
643   return error;
644 }
645
646 static uword
647 dhcp6_reply_process (vlib_main_t * vm, vlib_node_runtime_t * rt,
648                      vlib_frame_t * f)
649 {
650   /* These cross the longjmp  boundary (vlib_process_wait_for_event)
651    * and need to be volatile - to prevent them from being optimized into
652    * a register - which could change during suspension */
653
654   while (1)
655     {
656       vlib_process_wait_for_event (vm);
657       uword event_type = DHCP6_DP_REPLY_REPORT;
658       void *event_data = vlib_process_get_event_data (vm, &event_type);
659
660       int i;
661       if (event_type == DHCP6_DP_REPLY_REPORT)
662         {
663           address_report_t *events = event_data;
664           for (i = 0; i < vec_len (events); i++)
665             {
666               u32 event_size =
667                 sizeof (vl_api_dhcp6_reply_event_t) +
668                 vec_len (events[i].addresses) *
669                 sizeof (vl_api_dhcp6_address_info_t);
670               vl_api_dhcp6_reply_event_t *event = clib_mem_alloc (event_size);
671               clib_memset (event, 0, event_size);
672
673               event->sw_if_index = htonl (events[i].body.sw_if_index);
674               event->server_index = htonl (events[i].body.server_index);
675               event->msg_type = events[i].body.msg_type;
676               event->T1 = htonl (events[i].body.T1);
677               event->T2 = htonl (events[i].body.T2);
678               event->inner_status_code =
679                 htons (events[i].body.inner_status_code);
680               event->status_code = htons (events[i].body.status_code);
681               event->preference = events[i].body.preference;
682
683               event->n_addresses = htonl (vec_len (events[i].addresses));
684               vl_api_dhcp6_address_info_t *address =
685                 (typeof (address)) event->addresses;
686               u32 j;
687               for (j = 0; j < vec_len (events[i].addresses); j++)
688                 {
689                   dhcp6_address_info_t *info = &events[i].addresses[j];
690                   ip6_address_encode (&info->address, address->address);
691                   address->valid_time = htonl (info->valid_time);
692                   address->preferred_time = htonl (info->preferred_time);
693                   address++;
694                 }
695               vec_free (events[i].addresses);
696
697               dhcp6_ia_na_client_public_main_t *dcpm =
698                 &dhcp6_ia_na_client_public_main;
699               call_dhcp6_reply_event_callbacks (event, dcpm->functions);
700
701               vpe_client_registration_t *reg;
702               /* *INDENT-OFF* */
703               pool_foreach(reg, vpe_api_main.dhcp6_reply_events_registrations,
704               ({
705                 vl_api_registration_t *vl_reg;
706                 vl_reg =
707                   vl_api_client_index_to_registration (reg->client_index);
708                 if (vl_reg && vl_api_can_send_msg (vl_reg))
709                   {
710                     vl_api_dhcp6_reply_event_t *msg =
711                       vl_msg_api_alloc (event_size);
712                     clib_memcpy (msg, event, event_size);
713                     msg->_vl_msg_id = htons (VL_API_DHCP6_REPLY_EVENT + REPLY_MSG_ID_BASE);
714                     msg->client_index = reg->client_index;
715                     msg->pid = reg->client_pid;
716                     vl_api_send_msg (vl_reg, (u8 *) msg);
717                   }
718               }));
719               /* *INDENT-ON* */
720
721               clib_mem_free (event);
722             }
723         }
724       vlib_process_put_event_data (vm, event_data);
725     }
726
727   return 0;
728 }
729
730 /* *INDENT-OFF* */
731 VLIB_REGISTER_NODE (dhcp6_reply_process_node) = {
732   .function = dhcp6_reply_process,
733   .type = VLIB_NODE_TYPE_PROCESS,
734   .name = "dhcp6-reply-publisher-process",
735 };
736 /* *INDENT-ON* */
737
738 static clib_error_t *
739 call_dhcp6_pd_reply_event_callbacks (void *data,
740                                      _vnet_dhcp6_pd_reply_event_function_list_elt_t
741                                      * elt)
742 {
743   clib_error_t *error = 0;
744
745   while (elt)
746     {
747       error = elt->fp (data);
748       if (error)
749         return error;
750       elt = elt->next_dhcp6_pd_reply_event_function;
751     }
752
753   return error;
754 }
755
756 static uword
757 dhcp6_pd_reply_process (vlib_main_t * vm, vlib_node_runtime_t * rt,
758                         vlib_frame_t * f)
759 {
760   /* These cross the longjmp  boundary (vlib_process_wait_for_event)
761    * and need to be volatile - to prevent them from being optimized into
762    * a register - which could change during suspension */
763
764   while (1)
765     {
766       vlib_process_wait_for_event (vm);
767       uword event_type = DHCP6_PD_DP_REPLY_REPORT;
768       void *event_data = vlib_process_get_event_data (vm, &event_type);
769
770       int i;
771       if (event_type == DHCP6_PD_DP_REPLY_REPORT)
772         {
773           prefix_report_t *events = event_data;
774           for (i = 0; i < vec_len (events); i++)
775             {
776               u32 event_size =
777                 sizeof (vl_api_dhcp6_pd_reply_event_t) +
778                 vec_len (events[i].prefixes) *
779                 sizeof (vl_api_dhcp6_pd_prefix_info_t);
780               vl_api_dhcp6_pd_reply_event_t *event =
781                 clib_mem_alloc (event_size);
782               clib_memset (event, 0, event_size);
783
784               event->sw_if_index = htonl (events[i].body.sw_if_index);
785               event->server_index = htonl (events[i].body.server_index);
786               event->msg_type = events[i].body.msg_type;
787               event->T1 = htonl (events[i].body.T1);
788               event->T2 = htonl (events[i].body.T2);
789               event->inner_status_code =
790                 htons (events[i].body.inner_status_code);
791               event->status_code = htons (events[i].body.status_code);
792               event->preference = events[i].body.preference;
793
794               event->n_prefixes = htonl (vec_len (events[i].prefixes));
795               vl_api_dhcp6_pd_prefix_info_t *prefix =
796                 (typeof (prefix)) event->prefixes;
797               u32 j;
798               for (j = 0; j < vec_len (events[i].prefixes); j++)
799                 {
800                   dhcp6_prefix_info_t *info = &events[i].prefixes[j];
801                   ip6_address_encode (&info->prefix, prefix->prefix.address);
802                   prefix->prefix.len = info->prefix_length;
803                   prefix->valid_time = htonl (info->valid_time);
804                   prefix->preferred_time = htonl (info->preferred_time);
805                   prefix++;
806                 }
807               vec_free (events[i].prefixes);
808
809               dhcp6_pd_client_public_main_t *dpcpm =
810                 &dhcp6_pd_client_public_main;
811               call_dhcp6_pd_reply_event_callbacks (event, dpcpm->functions);
812
813               vpe_client_registration_t *reg;
814               /* *INDENT-OFF* */
815               pool_foreach(reg, vpe_api_main.dhcp6_pd_reply_events_registrations,
816               ({
817                 vl_api_registration_t *vl_reg;
818                 vl_reg =
819                   vl_api_client_index_to_registration (reg->client_index);
820                 if (vl_reg && vl_api_can_send_msg (vl_reg))
821                   {
822                     vl_api_dhcp6_pd_reply_event_t *msg =
823                       vl_msg_api_alloc (event_size);
824                     clib_memcpy (msg, event, event_size);
825                     msg->_vl_msg_id = htons (VL_API_DHCP6_PD_REPLY_EVENT + REPLY_MSG_ID_BASE);
826                     msg->client_index = reg->client_index;
827                     msg->pid = reg->client_pid;
828                     vl_api_send_msg (vl_reg, (u8 *) msg);
829                   }
830               }));
831               /* *INDENT-ON* */
832
833               clib_mem_free (event);
834             }
835         }
836       vlib_process_put_event_data (vm, event_data);
837     }
838
839   return 0;
840 }
841
842 /* *INDENT-OFF* */
843 VLIB_REGISTER_NODE (dhcp6_pd_reply_process_node) = {
844   .function = dhcp6_pd_reply_process,
845   .type = VLIB_NODE_TYPE_PROCESS,
846   .name = "dhcp6-pd-reply-publisher-process",
847 };
848 /* *INDENT-ON* */
849
850 /*
851  * dhcp_api_hookup
852  * Add vpe's API message handlers to the table.
853  * vlib has already mapped shared memory and
854  * added the client registration handlers.
855  * See .../vlib-api/vlibmemory/memclnt_vlib.c:memclnt_process()
856  */
857 #include <dhcp/dhcp.api.c>
858
859 static clib_error_t *
860 dhcp_api_hookup (vlib_main_t * vm)
861 {
862   /*
863    * Set up the (msg_name, crc, message-id) table
864    */
865   dhcp_base_msg_id = setup_message_id_table ();
866
867   dhcp6_pd_set_publisher_node (dhcp6_pd_reply_process_node.index,
868                                DHCP6_PD_DP_REPLY_REPORT);
869   dhcp6_set_publisher_node (dhcp6_reply_process_node.index,
870                             DHCP6_DP_REPLY_REPORT);
871
872   return 0;
873 }
874
875 VLIB_API_INIT_FUNCTION (dhcp_api_hookup);
876
877 #include <vlib/unix/plugin.h>
878 #include <vpp/app/version.h>
879
880 /* *INDENT-OFF* */
881 VLIB_PLUGIN_REGISTER () = {
882     .version = VPP_BUILD_VER,
883     .description = "Dynamic Host Configuration Protocol (DHCP)",
884 };
885 /* *INDENT-ON* */
886
887 /*
888  * fd.io coding-style-patch-verification: ON
889  *
890  * Local Variables:
891  * eval: (c-set-style "gnu")
892  * End:
893  */