Fix VPP-1487 DHCP client does not support option 6-domain server
[vpp.git] / src / vnet / 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 <vnet/dhcp/dhcp_proxy.h>
26 #include <vnet/dhcp/client.h>
27 #include <vnet/dhcp/dhcp6_pd_client_dp.h>
28 #include <vnet/dhcp/dhcp6_ia_na_client_dp.h>
29 #include <vnet/dhcp/dhcp6_client_common_dp.h>
30 #include <vnet/fib/fib_table.h>
31
32 #include <vnet/vnet_msg_enum.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
50 #define foreach_vpe_api_msg                       \
51 _(DHCP_PROXY_CONFIG,dhcp_proxy_config)            \
52 _(DHCP_PROXY_DUMP,dhcp_proxy_dump)                \
53 _(DHCP_PROXY_SET_VSS,dhcp_proxy_set_vss)          \
54 _(DHCP_CLIENT_CONFIG, dhcp_client_config)         \
55 _(DHCP_CLIENT_DUMP, dhcp_client_dump)             \
56 _(WANT_DHCP6_PD_REPLY_EVENTS, want_dhcp6_pd_reply_events)               \
57 _(DHCP6_PD_SEND_CLIENT_MESSAGE, dhcp6_pd_send_client_message)           \
58 _(WANT_DHCP6_REPLY_EVENTS, want_dhcp6_reply_events)               \
59 _(DHCP6_SEND_CLIENT_MESSAGE, dhcp6_send_client_message)           \
60 _(DHCP6_CLIENTS_ENABLE_DISABLE, dhcp6_clients_enable_disable)     \
61 _(DHCP6_DUID_LL_SET, dhcp6_duid_ll_set)
62
63
64 static void
65 vl_api_dhcp_proxy_set_vss_t_handler (vl_api_dhcp_proxy_set_vss_t * mp)
66 {
67   vl_api_dhcp_proxy_set_vss_reply_t *rmp;
68   u8 *vpn_ascii_id;
69   int rv;
70
71   mp->vpn_ascii_id[sizeof (mp->vpn_ascii_id) - 1] = 0;
72   vpn_ascii_id = format (0, "%s", mp->vpn_ascii_id);
73   rv =
74     dhcp_proxy_set_vss ((mp->is_ipv6 ? FIB_PROTOCOL_IP6 : FIB_PROTOCOL_IP4),
75                         ntohl (mp->tbl_id), mp->vss_type, vpn_ascii_id,
76                         ntohl (mp->oui), ntohl (mp->vpn_index),
77                         mp->is_add == 0);
78
79   REPLY_MACRO (VL_API_DHCP_PROXY_SET_VSS_REPLY);
80 }
81
82
83 static void vl_api_dhcp_proxy_config_t_handler
84   (vl_api_dhcp_proxy_config_t * mp)
85 {
86   vl_api_dhcp_proxy_set_vss_reply_t *rmp;
87   ip46_address_t src, server;
88   int rv = -1;
89
90   if (mp->is_ipv6)
91     {
92       clib_memcpy (&src.ip6, mp->dhcp_src_address, sizeof (src.ip6));
93       clib_memcpy (&server.ip6, mp->dhcp_server, sizeof (server.ip6));
94
95       rv = dhcp6_proxy_set_server (&server,
96                                    &src,
97                                    (u32) ntohl (mp->rx_vrf_id),
98                                    (u32) ntohl (mp->server_vrf_id),
99                                    (int) (mp->is_add == 0));
100     }
101   else
102     {
103       ip46_address_reset (&src);
104       ip46_address_reset (&server);
105
106       clib_memcpy (&src.ip4, mp->dhcp_src_address, sizeof (src.ip4));
107       clib_memcpy (&server.ip4, mp->dhcp_server, sizeof (server.ip4));
108
109       rv = dhcp4_proxy_set_server (&server,
110                                    &src,
111                                    (u32) ntohl (mp->rx_vrf_id),
112                                    (u32) ntohl (mp->server_vrf_id),
113                                    (int) (mp->is_add == 0));
114     }
115
116
117   REPLY_MACRO (VL_API_DHCP_PROXY_CONFIG_REPLY);
118 }
119
120 static void
121 vl_api_dhcp_proxy_dump_t_handler (vl_api_dhcp_proxy_dump_t * mp)
122 {
123   vl_api_registration_t *reg;
124
125   reg = vl_api_client_index_to_registration (mp->client_index);
126   if (!reg)
127     return;;
128
129   dhcp_proxy_dump ((mp->is_ip6 == 1 ?
130                     FIB_PROTOCOL_IP6 : FIB_PROTOCOL_IP4), reg, mp->context);
131 }
132
133 void
134 dhcp_send_details (fib_protocol_t proto,
135                    void *opaque, u32 context, dhcp_proxy_t * proxy)
136 {
137   vl_api_dhcp_proxy_details_t *mp;
138   vl_api_registration_t *reg = opaque;
139   vl_api_dhcp_server_t *v_server;
140   dhcp_server_t *server;
141   fib_table_t *s_fib;
142   dhcp_vss_t *vss;
143   u32 count;
144   size_t n;
145
146   count = vec_len (proxy->dhcp_servers);
147   n = sizeof (*mp) + (count * sizeof (vl_api_dhcp_server_t));
148   mp = vl_msg_api_alloc (n);
149   if (!mp)
150     return;
151   clib_memset (mp, 0, n);
152   mp->_vl_msg_id = ntohs (VL_API_DHCP_PROXY_DETAILS);
153   mp->context = context;
154   mp->count = count;
155
156   mp->is_ipv6 = (proto == FIB_PROTOCOL_IP6);
157   mp->rx_vrf_id =
158     htonl (dhcp_proxy_rx_table_get_table_id (proto, proxy->rx_fib_index));
159
160   vss = dhcp_get_vss_info (&dhcp_proxy_main, proxy->rx_fib_index, proto);
161
162   if (vss)
163     {
164       mp->vss_type = vss->vss_type;
165       if (vss->vss_type == VSS_TYPE_ASCII)
166         {
167           u32 id_len = vec_len (vss->vpn_ascii_id);
168           clib_memcpy (mp->vss_vpn_ascii_id, vss->vpn_ascii_id, id_len);
169         }
170       else if (vss->vss_type == VSS_TYPE_VPN_ID)
171         {
172           u32 oui = ((u32) vss->vpn_id[0] << 16) + ((u32) vss->vpn_id[1] << 8)
173             + ((u32) vss->vpn_id[2]);
174           u32 fib_id = ((u32) vss->vpn_id[3] << 24) +
175             ((u32) vss->vpn_id[4] << 16) + ((u32) vss->vpn_id[5] << 8) +
176             ((u32) vss->vpn_id[6]);
177           mp->vss_oui = htonl (oui);
178           mp->vss_fib_id = htonl (fib_id);
179         }
180     }
181   else
182     mp->vss_type = VSS_TYPE_INVALID;
183
184   vec_foreach_index (count, proxy->dhcp_servers)
185   {
186     server = &proxy->dhcp_servers[count];
187     v_server = &mp->servers[count];
188
189     s_fib = fib_table_get (server->server_fib_index, proto);
190
191     v_server->server_vrf_id = htonl (s_fib->ft_table_id);
192
193     if (mp->is_ipv6)
194       {
195         memcpy (v_server->dhcp_server, &server->dhcp_server.ip6, 16);
196       }
197     else
198       {
199         /* put the address in the first bytes */
200         memcpy (v_server->dhcp_server, &server->dhcp_server.ip4, 4);
201       }
202   }
203
204   if (mp->is_ipv6)
205     {
206       memcpy (mp->dhcp_src_address, &proxy->dhcp_src_address.ip6, 16);
207     }
208   else
209     {
210       /* put the address in the first bytes */
211       memcpy (mp->dhcp_src_address, &proxy->dhcp_src_address.ip4, 4);
212     }
213   vl_api_send_msg (reg, (u8 *) mp);
214 }
215
216 static void
217 dhcp_client_lease_encode (vl_api_dhcp_lease_t * lease,
218                           const dhcp_client_t * client)
219 {
220   size_t len;
221   u8 i;
222
223   lease->is_ipv6 = 0;           // only support IPv6 clients
224   lease->sw_if_index = ntohl (client->sw_if_index);
225   lease->state = client->state;
226   len = clib_min (sizeof (lease->hostname) - 1, vec_len (client->hostname));
227   clib_memcpy (&lease->hostname, client->hostname, len);
228   lease->hostname[len] = 0;
229
230   lease->mask_width = client->subnet_mask_width;
231   clib_memcpy (&lease->host_address[0], (u8 *) & client->leased_address,
232                sizeof (ip4_address_t));
233   clib_memcpy (&lease->router_address[0], (u8 *) & client->router_address,
234                sizeof (ip4_address_t));
235
236   lease->count = vec_len (client->domain_server_address);
237   for (i = 0; i < lease->count; i++)
238     clib_memcpy (&lease->domain_server[i].address,
239                  (u8 *) & client->domain_server_address[i],
240                  sizeof (ip4_address_t));
241
242   if (NULL != client->l2_rewrite)
243     clib_memcpy (&lease->host_mac[0], client->l2_rewrite + 6, 6);
244 }
245
246 static void
247 dhcp_client_data_encode (vl_api_dhcp_client_t * vclient,
248                          const dhcp_client_t * client)
249 {
250   size_t len;
251
252   vclient->sw_if_index = ntohl (client->sw_if_index);
253   len = clib_min (sizeof (vclient->hostname) - 1, vec_len (client->hostname));
254   clib_memcpy (&vclient->hostname, client->hostname, len);
255   vclient->hostname[len] = 0;
256
257   len = clib_min (sizeof (vclient->id) - 1,
258                   vec_len (client->client_identifier));
259   clib_memcpy (&vclient->id, client->client_identifier, len);
260   vclient->id[len] = 0;
261
262   if (NULL != client->event_callback)
263     vclient->want_dhcp_event = 1;
264   else
265     vclient->want_dhcp_event = 0;
266   vclient->set_broadcast_flag = client->set_broadcast_flag;
267   vclient->pid = client->pid;
268 }
269
270 static void
271 dhcp_compl_event_callback (u32 client_index, const dhcp_client_t * client)
272 {
273   vl_api_registration_t *reg;
274   vl_api_dhcp_compl_event_t *mp;
275
276   reg = vl_api_client_index_to_registration (client_index);
277   if (!reg)
278     return;
279
280   mp = vl_msg_api_alloc (sizeof (*mp));
281   mp->client_index = client_index;
282   mp->pid = client->pid;
283   dhcp_client_lease_encode (&mp->lease, client);
284
285   mp->_vl_msg_id = ntohs (VL_API_DHCP_COMPL_EVENT);
286
287   vl_api_send_msg (reg, (u8 *) mp);
288 }
289
290 static void vl_api_dhcp_client_config_t_handler
291   (vl_api_dhcp_client_config_t * mp)
292 {
293   vlib_main_t *vm = vlib_get_main ();
294   vl_api_dhcp_client_config_reply_t *rmp;
295   u32 sw_if_index;
296   int rv = 0;
297
298   sw_if_index = ntohl (mp->client.sw_if_index);
299   if (!vnet_sw_if_index_is_api_valid (sw_if_index))
300     {
301       rv = VNET_API_ERROR_INVALID_SW_IF_INDEX;
302       goto bad_sw_if_index;
303     }
304
305   rv = dhcp_client_config (mp->is_add,
306                            mp->client_index,
307                            vm,
308                            sw_if_index,
309                            mp->client.hostname,
310                            mp->client.id,
311                            (mp->client.want_dhcp_event ?
312                             dhcp_compl_event_callback :
313                             NULL),
314                            mp->client.set_broadcast_flag, mp->client.pid);
315
316   BAD_SW_IF_INDEX_LABEL;
317
318   REPLY_MACRO (VL_API_DHCP_CLIENT_CONFIG_REPLY);
319 }
320
321 typedef struct dhcp_client_send_walk_ctx_t_
322 {
323   vl_api_registration_t *reg;
324   u32 context;
325 } dhcp_client_send_walk_ctx_t;
326
327 static int
328 send_dhcp_client_entry (const dhcp_client_t * client, void *arg)
329 {
330   dhcp_client_send_walk_ctx_t *ctx;
331   vl_api_dhcp_client_details_t *mp;
332
333   ctx = arg;
334
335   mp = vl_msg_api_alloc (sizeof (*mp));
336   clib_memset (mp, 0, sizeof (*mp));
337
338   mp->_vl_msg_id = ntohs (VL_API_DHCP_CLIENT_DETAILS);
339   mp->context = ctx->context;
340
341   dhcp_client_data_encode (&mp->client, client);
342   dhcp_client_lease_encode (&mp->lease, client);
343
344   vl_api_send_msg (ctx->reg, (u8 *) mp);
345
346   return (1);
347 }
348
349 static void
350 vl_api_dhcp_client_dump_t_handler (vl_api_dhcp_client_dump_t * mp)
351 {
352   vl_api_registration_t *reg;
353
354   reg = vl_api_client_index_to_registration (mp->client_index);
355   if (!reg)
356     return;
357
358   dhcp_client_send_walk_ctx_t ctx = {
359     .reg = reg,
360     .context = mp->context,
361   };
362   dhcp_client_walk (send_dhcp_client_entry, &ctx);
363 }
364
365 /*
366  * dhcp_api_hookup
367  * Add vpe's API message handlers to the table.
368  * vlib has already mapped shared memory and
369  * added the client registration handlers.
370  * See .../vlib-api/vlibmemory/memclnt_vlib.c:memclnt_process()
371  */
372 #define vl_msg_name_crc_list
373 #include <vnet/vnet_all_api_h.h>
374 #undef vl_msg_name_crc_list
375
376 static void
377 setup_message_id_table (api_main_t * am)
378 {
379 #define _(id,n,crc) vl_msg_api_add_msg_name_crc (am, #n "_" #crc, id);
380   foreach_vl_msg_name_crc_dhcp;
381 #undef _
382 }
383
384 static clib_error_t *
385 dhcp_api_hookup (vlib_main_t * vm)
386 {
387   api_main_t *am = &api_main;
388
389 #define _(N,n)                                                  \
390     vl_msg_api_set_handlers(VL_API_##N, #n,                     \
391                            vl_api_##n##_t_handler,              \
392                            vl_noop_handler,                     \
393                            vl_api_##n##_t_endian,               \
394                            vl_api_##n##_t_print,                \
395                            sizeof(vl_api_##n##_t), 1);
396   foreach_vpe_api_msg;
397 #undef _
398
399   /*
400    * Set up the (msg_name, crc, message-id) table
401    */
402   setup_message_id_table (am);
403
404   dhcp6_pd_set_publisher_node (dhcp6_pd_reply_process_node.index,
405                                DHCP6_PD_DP_REPLY_REPORT);
406   dhcp6_set_publisher_node (dhcp6_reply_process_node.index,
407                             DHCP6_DP_REPLY_REPORT);
408
409   return 0;
410 }
411
412 VLIB_API_INIT_FUNCTION (dhcp_api_hookup);
413
414 /*
415  * fd.io coding-style-patch-verification: ON
416  *
417  * Local Variables:
418  * eval: (c-set-style "gnu")
419  * End:
420  */