dhcp: fix crash on unicast renewal send
[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
376   ctx = arg;
377
378   mp = vl_msg_api_alloc (sizeof (*mp));
379   clib_memset (mp, 0, sizeof (*mp));
380
381   mp->_vl_msg_id = ntohs (VL_API_DHCP_CLIENT_DETAILS + REPLY_MSG_ID_BASE);
382   mp->context = ctx->context;
383
384   dhcp_client_data_encode (&mp->client, client);
385   dhcp_client_lease_encode (&mp->lease, client);
386
387   vl_api_send_msg (ctx->reg, (u8 *) mp);
388
389   return (1);
390 }
391
392 static void
393 vl_api_dhcp_client_dump_t_handler (vl_api_dhcp_client_dump_t * mp)
394 {
395   vl_api_registration_t *reg;
396
397   reg = vl_api_client_index_to_registration (mp->client_index);
398   if (!reg)
399     return;
400
401   dhcp_client_send_walk_ctx_t ctx = {
402     .reg = reg,
403     .context = mp->context,
404   };
405   dhcp_client_walk (send_dhcp_client_entry, &ctx);
406 }
407
408 static void
409   vl_api_dhcp6_clients_enable_disable_t_handler
410   (vl_api_dhcp6_clients_enable_disable_t * mp)
411 {
412   vl_api_dhcp6_clients_enable_disable_reply_t *rmp;
413   int rv = 0;
414
415   dhcp6_clients_enable_disable (mp->enable);
416
417   REPLY_MACRO (VL_API_DHCP6_CLIENTS_ENABLE_DISABLE_REPLY);
418 }
419
420 void
421   vl_api_want_dhcp6_reply_events_t_handler
422   (vl_api_want_dhcp6_reply_events_t * mp)
423 {
424   vpe_api_main_t *am = &vpe_api_main;
425   vl_api_want_dhcp6_reply_events_reply_t *rmp;
426   int rv = 0;
427
428   uword *p =
429     hash_get (am->dhcp6_reply_events_registration_hash, mp->client_index);
430   vpe_client_registration_t *rp;
431   if (p)
432     {
433       if (mp->enable_disable)
434         {
435           clib_warning ("pid %d: already enabled...", ntohl (mp->pid));
436           rv = VNET_API_ERROR_INVALID_REGISTRATION;
437           goto reply;
438         }
439       else
440         {
441           rp = pool_elt_at_index (am->dhcp6_reply_events_registrations, p[0]);
442           pool_put (am->dhcp6_reply_events_registrations, rp);
443           hash_unset (am->dhcp6_reply_events_registration_hash,
444                       mp->client_index);
445           if (pool_elts (am->dhcp6_reply_events_registrations) == 0)
446             dhcp6_set_publisher_node (~0, DHCP6_DP_REPORT_MAX);
447           goto reply;
448         }
449     }
450   if (mp->enable_disable == 0)
451     {
452       clib_warning ("pid %d: already disabled...", ntohl (mp->pid));
453       rv = VNET_API_ERROR_INVALID_REGISTRATION;
454       goto reply;
455     }
456   pool_get (am->dhcp6_reply_events_registrations, rp);
457   rp->client_index = mp->client_index;
458   rp->client_pid = ntohl (mp->pid);
459   hash_set (am->dhcp6_reply_events_registration_hash, rp->client_index,
460             rp - am->dhcp6_reply_events_registrations);
461   dhcp6_set_publisher_node (dhcp6_reply_process_node.index,
462                             DHCP6_DP_REPLY_REPORT);
463
464 reply:
465   REPLY_MACRO (VL_API_WANT_DHCP6_REPLY_EVENTS_REPLY);
466 }
467
468 void
469   vl_api_want_dhcp6_pd_reply_events_t_handler
470   (vl_api_want_dhcp6_pd_reply_events_t * mp)
471 {
472   vpe_api_main_t *am = &vpe_api_main;
473   vl_api_want_dhcp6_pd_reply_events_reply_t *rmp;
474   int rv = 0;
475
476   uword *p =
477     hash_get (am->dhcp6_pd_reply_events_registration_hash, mp->client_index);
478   vpe_client_registration_t *rp;
479   if (p)
480     {
481       if (mp->enable_disable)
482         {
483           clib_warning ("pid %d: already enabled...", ntohl (mp->pid));
484           rv = VNET_API_ERROR_INVALID_REGISTRATION;
485           goto reply;
486         }
487       else
488         {
489           rp =
490             pool_elt_at_index (am->dhcp6_pd_reply_events_registrations, p[0]);
491           pool_put (am->dhcp6_pd_reply_events_registrations, rp);
492           hash_unset (am->dhcp6_pd_reply_events_registration_hash,
493                       mp->client_index);
494           if (pool_elts (am->dhcp6_pd_reply_events_registrations) == 0)
495             dhcp6_pd_set_publisher_node (~0, DHCP6_PD_DP_REPORT_MAX);
496           goto reply;
497         }
498     }
499   if (mp->enable_disable == 0)
500     {
501       clib_warning ("pid %d: already disabled...", ntohl (mp->pid));
502       rv = VNET_API_ERROR_INVALID_REGISTRATION;
503       goto reply;
504     }
505   pool_get (am->dhcp6_pd_reply_events_registrations, rp);
506   rp->client_index = mp->client_index;
507   rp->client_pid = ntohl (mp->pid);
508   hash_set (am->dhcp6_pd_reply_events_registration_hash, rp->client_index,
509             rp - am->dhcp6_pd_reply_events_registrations);
510   dhcp6_pd_set_publisher_node (dhcp6_pd_reply_process_node.index,
511                                DHCP6_PD_DP_REPLY_REPORT);
512
513 reply:
514   REPLY_MACRO (VL_API_WANT_DHCP6_PD_REPLY_EVENTS_REPLY);
515 }
516
517 void
518   vl_api_dhcp6_send_client_message_t_handler
519   (vl_api_dhcp6_send_client_message_t * mp)
520 {
521   vl_api_dhcp6_send_client_message_reply_t *rmp;
522   dhcp6_send_client_message_params_t params;
523   vlib_main_t *vm = vlib_get_main ();
524   u32 n_addresses;
525   u32 i;
526   int rv = 0;
527
528   VALIDATE_SW_IF_INDEX (mp);
529
530   BAD_SW_IF_INDEX_LABEL;
531   REPLY_MACRO (VL_API_DHCP6_SEND_CLIENT_MESSAGE_REPLY);
532
533   if (rv != 0)
534     return;
535
536   params.sw_if_index = ntohl (mp->sw_if_index);
537   params.server_index = ntohl (mp->server_index);
538   params.irt = ntohl (mp->irt);
539   params.mrt = ntohl (mp->mrt);
540   params.mrc = ntohl (mp->mrc);
541   params.mrd = ntohl (mp->mrd);
542   params.msg_type = ntohl (mp->msg_type);
543   params.T1 = ntohl (mp->T1);
544   params.T2 = ntohl (mp->T2);
545   n_addresses = ntohl (mp->n_addresses);
546   params.addresses = 0;
547   if (n_addresses > 0)
548     vec_validate (params.addresses, n_addresses - 1);
549   for (i = 0; i < n_addresses; i++)
550     {
551       vl_api_dhcp6_address_info_t *ai = &mp->addresses[i];
552       dhcp6_send_client_message_params_address_t *addr = &params.addresses[i];
553       addr->preferred_lt = ntohl (ai->preferred_time);
554       addr->valid_lt = ntohl (ai->valid_time);
555       ip6_address_decode (ai->address, &addr->address);
556     }
557
558   dhcp6_send_client_message (vm, ntohl (mp->sw_if_index), mp->stop, &params);
559 }
560
561 void
562   vl_api_dhcp6_pd_send_client_message_t_handler
563   (vl_api_dhcp6_pd_send_client_message_t * mp)
564 {
565   vl_api_dhcp6_pd_send_client_message_reply_t *rmp;
566   dhcp6_pd_send_client_message_params_t params;
567   vlib_main_t *vm = vlib_get_main ();
568   u32 n_prefixes;
569   u32 i;
570   int rv = 0;
571
572   VALIDATE_SW_IF_INDEX (mp);
573
574   BAD_SW_IF_INDEX_LABEL;
575   REPLY_MACRO (VL_API_DHCP6_PD_SEND_CLIENT_MESSAGE_REPLY);
576
577   if (rv != 0)
578     return;
579
580   params.sw_if_index = ntohl (mp->sw_if_index);
581   params.server_index = ntohl (mp->server_index);
582   params.irt = ntohl (mp->irt);
583   params.mrt = ntohl (mp->mrt);
584   params.mrc = ntohl (mp->mrc);
585   params.mrd = ntohl (mp->mrd);
586   params.msg_type = ntohl (mp->msg_type);
587   params.T1 = ntohl (mp->T1);
588   params.T2 = ntohl (mp->T2);
589   n_prefixes = ntohl (mp->n_prefixes);
590   params.prefixes = 0;
591   if (n_prefixes > 0)
592     vec_validate (params.prefixes, n_prefixes - 1);
593   for (i = 0; i < n_prefixes; i++)
594     {
595       vl_api_dhcp6_pd_prefix_info_t *pi = &mp->prefixes[i];
596       dhcp6_pd_send_client_message_params_prefix_t *pref =
597         &params.prefixes[i];
598       pref->preferred_lt = ntohl (pi->preferred_time);
599       pref->valid_lt = ntohl (pi->valid_time);
600       ip6_address_decode (pi->prefix.address, &pref->prefix);
601       pref->prefix_length = pi->prefix.len;
602     }
603
604   dhcp6_pd_send_client_message (vm, ntohl (mp->sw_if_index), mp->stop,
605                                 &params);
606 }
607
608 static clib_error_t *
609 call_dhcp6_reply_event_callbacks (void *data,
610                                   _vnet_dhcp6_reply_event_function_list_elt_t
611                                   * elt)
612 {
613   clib_error_t *error = 0;
614
615   while (elt)
616     {
617       error = elt->fp (data);
618       if (error)
619         return error;
620       elt = elt->next_dhcp6_reply_event_function;
621     }
622
623   return error;
624 }
625
626 static uword
627 dhcp6_reply_process (vlib_main_t * vm, vlib_node_runtime_t * rt,
628                      vlib_frame_t * f)
629 {
630   /* These cross the longjmp  boundary (vlib_process_wait_for_event)
631    * and need to be volatile - to prevent them from being optimized into
632    * a register - which could change during suspension */
633
634   while (1)
635     {
636       vlib_process_wait_for_event (vm);
637       uword event_type = DHCP6_DP_REPLY_REPORT;
638       void *event_data = vlib_process_get_event_data (vm, &event_type);
639
640       int i;
641       if (event_type == DHCP6_DP_REPLY_REPORT)
642         {
643           address_report_t *events = event_data;
644           for (i = 0; i < vec_len (events); i++)
645             {
646               u32 event_size =
647                 sizeof (vl_api_dhcp6_reply_event_t) +
648                 vec_len (events[i].addresses) *
649                 sizeof (vl_api_dhcp6_address_info_t);
650               vl_api_dhcp6_reply_event_t *event = clib_mem_alloc (event_size);
651               clib_memset (event, 0, event_size);
652
653               event->sw_if_index = htonl (events[i].body.sw_if_index);
654               event->server_index = htonl (events[i].body.server_index);
655               event->msg_type = events[i].body.msg_type;
656               event->T1 = htonl (events[i].body.T1);
657               event->T2 = htonl (events[i].body.T2);
658               event->inner_status_code =
659                 htons (events[i].body.inner_status_code);
660               event->status_code = htons (events[i].body.status_code);
661               event->preference = events[i].body.preference;
662
663               event->n_addresses = htonl (vec_len (events[i].addresses));
664               vl_api_dhcp6_address_info_t *address =
665                 (typeof (address)) event->addresses;
666               u32 j;
667               for (j = 0; j < vec_len (events[i].addresses); j++)
668                 {
669                   dhcp6_address_info_t *info = &events[i].addresses[j];
670                   ip6_address_encode (&info->address, address->address);
671                   address->valid_time = htonl (info->valid_time);
672                   address->preferred_time = htonl (info->preferred_time);
673                   address++;
674                 }
675               vec_free (events[i].addresses);
676
677               dhcp6_ia_na_client_public_main_t *dcpm =
678                 &dhcp6_ia_na_client_public_main;
679               call_dhcp6_reply_event_callbacks (event, dcpm->functions);
680
681               vpe_client_registration_t *reg;
682               /* *INDENT-OFF* */
683               pool_foreach(reg, vpe_api_main.dhcp6_reply_events_registrations,
684               ({
685                 vl_api_registration_t *vl_reg;
686                 vl_reg =
687                   vl_api_client_index_to_registration (reg->client_index);
688                 if (vl_reg && vl_api_can_send_msg (vl_reg))
689                   {
690                     vl_api_dhcp6_reply_event_t *msg =
691                       vl_msg_api_alloc (event_size);
692                     clib_memcpy (msg, event, event_size);
693                     msg->_vl_msg_id = htons (VL_API_DHCP6_REPLY_EVENT + REPLY_MSG_ID_BASE);
694                     msg->client_index = reg->client_index;
695                     msg->pid = reg->client_pid;
696                     vl_api_send_msg (vl_reg, (u8 *) msg);
697                   }
698               }));
699               /* *INDENT-ON* */
700
701               clib_mem_free (event);
702             }
703         }
704       vlib_process_put_event_data (vm, event_data);
705     }
706
707   return 0;
708 }
709
710 /* *INDENT-OFF* */
711 VLIB_REGISTER_NODE (dhcp6_reply_process_node) = {
712   .function = dhcp6_reply_process,
713   .type = VLIB_NODE_TYPE_PROCESS,
714   .name = "dhcp6-reply-publisher-process",
715 };
716 /* *INDENT-ON* */
717
718 static clib_error_t *
719 call_dhcp6_pd_reply_event_callbacks (void *data,
720                                      _vnet_dhcp6_pd_reply_event_function_list_elt_t
721                                      * elt)
722 {
723   clib_error_t *error = 0;
724
725   while (elt)
726     {
727       error = elt->fp (data);
728       if (error)
729         return error;
730       elt = elt->next_dhcp6_pd_reply_event_function;
731     }
732
733   return error;
734 }
735
736 static uword
737 dhcp6_pd_reply_process (vlib_main_t * vm, vlib_node_runtime_t * rt,
738                         vlib_frame_t * f)
739 {
740   /* These cross the longjmp  boundary (vlib_process_wait_for_event)
741    * and need to be volatile - to prevent them from being optimized into
742    * a register - which could change during suspension */
743
744   while (1)
745     {
746       vlib_process_wait_for_event (vm);
747       uword event_type = DHCP6_PD_DP_REPLY_REPORT;
748       void *event_data = vlib_process_get_event_data (vm, &event_type);
749
750       int i;
751       if (event_type == DHCP6_PD_DP_REPLY_REPORT)
752         {
753           prefix_report_t *events = event_data;
754           for (i = 0; i < vec_len (events); i++)
755             {
756               u32 event_size =
757                 sizeof (vl_api_dhcp6_pd_reply_event_t) +
758                 vec_len (events[i].prefixes) *
759                 sizeof (vl_api_dhcp6_pd_prefix_info_t);
760               vl_api_dhcp6_pd_reply_event_t *event =
761                 clib_mem_alloc (event_size);
762               clib_memset (event, 0, event_size);
763
764               event->sw_if_index = htonl (events[i].body.sw_if_index);
765               event->server_index = htonl (events[i].body.server_index);
766               event->msg_type = events[i].body.msg_type;
767               event->T1 = htonl (events[i].body.T1);
768               event->T2 = htonl (events[i].body.T2);
769               event->inner_status_code =
770                 htons (events[i].body.inner_status_code);
771               event->status_code = htons (events[i].body.status_code);
772               event->preference = events[i].body.preference;
773
774               event->n_prefixes = htonl (vec_len (events[i].prefixes));
775               vl_api_dhcp6_pd_prefix_info_t *prefix =
776                 (typeof (prefix)) event->prefixes;
777               u32 j;
778               for (j = 0; j < vec_len (events[i].prefixes); j++)
779                 {
780                   dhcp6_prefix_info_t *info = &events[i].prefixes[j];
781                   ip6_address_encode (&info->prefix, prefix->prefix.address);
782                   prefix->prefix.len = info->prefix_length;
783                   prefix->valid_time = htonl (info->valid_time);
784                   prefix->preferred_time = htonl (info->preferred_time);
785                   prefix++;
786                 }
787               vec_free (events[i].prefixes);
788
789               dhcp6_pd_client_public_main_t *dpcpm =
790                 &dhcp6_pd_client_public_main;
791               call_dhcp6_pd_reply_event_callbacks (event, dpcpm->functions);
792
793               vpe_client_registration_t *reg;
794               /* *INDENT-OFF* */
795               pool_foreach(reg, vpe_api_main.dhcp6_pd_reply_events_registrations,
796               ({
797                 vl_api_registration_t *vl_reg;
798                 vl_reg =
799                   vl_api_client_index_to_registration (reg->client_index);
800                 if (vl_reg && vl_api_can_send_msg (vl_reg))
801                   {
802                     vl_api_dhcp6_pd_reply_event_t *msg =
803                       vl_msg_api_alloc (event_size);
804                     clib_memcpy (msg, event, event_size);
805                     msg->_vl_msg_id = htons (VL_API_DHCP6_PD_REPLY_EVENT + REPLY_MSG_ID_BASE);
806                     msg->client_index = reg->client_index;
807                     msg->pid = reg->client_pid;
808                     vl_api_send_msg (vl_reg, (u8 *) msg);
809                   }
810               }));
811               /* *INDENT-ON* */
812
813               clib_mem_free (event);
814             }
815         }
816       vlib_process_put_event_data (vm, event_data);
817     }
818
819   return 0;
820 }
821
822 /* *INDENT-OFF* */
823 VLIB_REGISTER_NODE (dhcp6_pd_reply_process_node) = {
824   .function = dhcp6_pd_reply_process,
825   .type = VLIB_NODE_TYPE_PROCESS,
826   .name = "dhcp6-pd-reply-publisher-process",
827 };
828 /* *INDENT-ON* */
829
830 /*
831  * dhcp_api_hookup
832  * Add vpe's API message handlers to the table.
833  * vlib has already mapped shared memory and
834  * added the client registration handlers.
835  * See .../vlib-api/vlibmemory/memclnt_vlib.c:memclnt_process()
836  */
837 #include <dhcp/dhcp.api.c>
838
839 static clib_error_t *
840 dhcp_api_hookup (vlib_main_t * vm)
841 {
842   /*
843    * Set up the (msg_name, crc, message-id) table
844    */
845   dhcp_base_msg_id = setup_message_id_table ();
846
847   dhcp6_pd_set_publisher_node (dhcp6_pd_reply_process_node.index,
848                                DHCP6_PD_DP_REPLY_REPORT);
849   dhcp6_set_publisher_node (dhcp6_reply_process_node.index,
850                             DHCP6_DP_REPLY_REPORT);
851
852   return 0;
853 }
854
855 VLIB_API_INIT_FUNCTION (dhcp_api_hookup);
856
857 #include <vlib/unix/plugin.h>
858 #include <vpp/app/version.h>
859
860 /* *INDENT-OFF* */
861 VLIB_PLUGIN_REGISTER () = {
862     .version = VPP_BUILD_VER,
863     .description = "Dynamic Host Configuration Protocol (DHCP)",
864 };
865 /* *INDENT-ON* */
866
867 /*
868  * fd.io coding-style-patch-verification: ON
869  *
870  * Local Variables:
871  * eval: (c-set-style "gnu")
872  * End:
873  */