IPSEC; dpdk backend for tunnel interface encryption
[vpp.git] / src / vnet / ipsec / ipsec_api.c
1 /*
2  *------------------------------------------------------------------
3  * ipsec_api.c - ipsec 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/ip/ip.h>
26 #include <vnet/ip/ip_types_api.h>
27 #include <vnet/fib/fib.h>
28
29 #include <vnet/vnet_msg_enum.h>
30
31 #if WITH_LIBSSL > 0
32 #include <vnet/ipsec/ipsec.h>
33 #endif /* IPSEC */
34
35 #define vl_typedefs             /* define message structures */
36 #include <vnet/vnet_all_api_h.h>
37 #undef vl_typedefs
38
39 #define vl_endianfun            /* define message structures */
40 #include <vnet/vnet_all_api_h.h>
41 #undef vl_endianfun
42
43 /* instantiate all the print functions we know about */
44 #define vl_print(handle, ...) vlib_cli_output (handle, __VA_ARGS__)
45 #define vl_printfun
46 #include <vnet/vnet_all_api_h.h>
47 #undef vl_printfun
48
49 #include <vlibapi/api_helper_macros.h>
50
51 #define foreach_vpe_api_msg                                     \
52 _(IPSEC_SPD_ADD_DEL, ipsec_spd_add_del)                         \
53 _(IPSEC_INTERFACE_ADD_DEL_SPD, ipsec_interface_add_del_spd)     \
54 _(IPSEC_SPD_ENTRY_ADD_DEL, ipsec_spd_entry_add_del)             \
55 _(IPSEC_SAD_ENTRY_ADD_DEL, ipsec_sad_entry_add_del)             \
56 _(IPSEC_SA_SET_KEY, ipsec_sa_set_key)                           \
57 _(IPSEC_SA_DUMP, ipsec_sa_dump)                                 \
58 _(IPSEC_SPDS_DUMP, ipsec_spds_dump)                             \
59 _(IPSEC_SPD_DUMP, ipsec_spd_dump)                               \
60 _(IPSEC_SPD_INTERFACE_DUMP, ipsec_spd_interface_dump)           \
61 _(IPSEC_TUNNEL_IF_ADD_DEL, ipsec_tunnel_if_add_del)             \
62 _(IPSEC_TUNNEL_IF_SET_KEY, ipsec_tunnel_if_set_key)             \
63 _(IPSEC_TUNNEL_IF_SET_SA, ipsec_tunnel_if_set_sa)               \
64 _(IPSEC_SELECT_BACKEND, ipsec_select_backend)                   \
65 _(IPSEC_BACKEND_DUMP, ipsec_backend_dump)
66
67 static void
68 vl_api_ipsec_spd_add_del_t_handler (vl_api_ipsec_spd_add_del_t * mp)
69 {
70 #if WITH_LIBSSL == 0
71   clib_warning ("unimplemented");
72 #else
73
74   vlib_main_t *vm __attribute__ ((unused)) = vlib_get_main ();
75   vl_api_ipsec_spd_add_del_reply_t *rmp;
76   int rv;
77
78   rv = ipsec_add_del_spd (vm, ntohl (mp->spd_id), mp->is_add);
79
80   REPLY_MACRO (VL_API_IPSEC_SPD_ADD_DEL_REPLY);
81 #endif
82 }
83
84 static void vl_api_ipsec_interface_add_del_spd_t_handler
85   (vl_api_ipsec_interface_add_del_spd_t * mp)
86 {
87   vlib_main_t *vm __attribute__ ((unused)) = vlib_get_main ();
88   vl_api_ipsec_interface_add_del_spd_reply_t *rmp;
89   int rv;
90   u32 sw_if_index __attribute__ ((unused));
91   u32 spd_id __attribute__ ((unused));
92
93   sw_if_index = ntohl (mp->sw_if_index);
94   spd_id = ntohl (mp->spd_id);
95
96   VALIDATE_SW_IF_INDEX (mp);
97
98 #if WITH_LIBSSL > 0
99   rv = ipsec_set_interface_spd (vm, sw_if_index, spd_id, mp->is_add);
100 #else
101   rv = VNET_API_ERROR_UNIMPLEMENTED;
102 #endif
103
104   BAD_SW_IF_INDEX_LABEL;
105
106   REPLY_MACRO (VL_API_IPSEC_INTERFACE_ADD_DEL_SPD_REPLY);
107 }
108
109 static int
110 ipsec_spd_action_decode (vl_api_ipsec_spd_action_t in,
111                          ipsec_policy_action_t * out)
112 {
113   in = clib_net_to_host_u32 (in);
114
115   switch (in)
116     {
117 #define _(v,f,s) case IPSEC_API_SPD_ACTION_##f: \
118       *out = IPSEC_POLICY_ACTION_##f;              \
119       return (0);
120       foreach_ipsec_policy_action
121 #undef _
122     }
123   return (VNET_API_ERROR_UNIMPLEMENTED);
124 }
125
126 static void vl_api_ipsec_spd_entry_add_del_t_handler
127   (vl_api_ipsec_spd_entry_add_del_t * mp)
128 {
129   vlib_main_t *vm __attribute__ ((unused)) = vlib_get_main ();
130   vl_api_ipsec_spd_entry_add_del_reply_t *rmp;
131   ip46_type_t itype;
132   u32 stat_index;
133   int rv;
134
135   stat_index = ~0;
136
137 #if WITH_LIBSSL > 0
138   ipsec_policy_t p;
139
140   clib_memset (&p, 0, sizeof (p));
141
142   p.id = ntohl (mp->entry.spd_id);
143   p.priority = ntohl (mp->entry.priority);
144
145   itype = ip_address_decode (&mp->entry.remote_address_start, &p.raddr.start);
146   ip_address_decode (&mp->entry.remote_address_stop, &p.raddr.stop);
147   ip_address_decode (&mp->entry.local_address_start, &p.laddr.start);
148   ip_address_decode (&mp->entry.local_address_stop, &p.laddr.stop);
149
150   p.is_ipv6 = (itype == IP46_TYPE_IP6);
151
152   p.protocol = mp->entry.protocol;
153   /* leave the ports in network order */
154   p.rport.start = mp->entry.remote_port_start;
155   p.rport.stop = mp->entry.remote_port_stop;
156   p.lport.start = mp->entry.local_port_start;
157   p.lport.stop = mp->entry.local_port_stop;
158
159   rv = ipsec_spd_action_decode (mp->entry.policy, &p.policy);
160
161   if (rv)
162     goto out;
163
164   /* policy action resolve unsupported */
165   if (p.policy == IPSEC_POLICY_ACTION_RESOLVE)
166     {
167       clib_warning ("unsupported action: 'resolve'");
168       rv = VNET_API_ERROR_UNIMPLEMENTED;
169       goto out;
170     }
171   p.sa_id = ntohl (mp->entry.sa_id);
172   rv =
173     ipsec_policy_mk_type (mp->entry.is_outbound, p.is_ipv6, p.policy,
174                           &p.type);
175   if (rv)
176     goto out;
177
178   rv = ipsec_add_del_policy (vm, &p, mp->is_add, &stat_index);
179   if (rv)
180     goto out;
181
182 #else
183   rv = VNET_API_ERROR_UNIMPLEMENTED;
184   goto out;
185 #endif
186
187 out:
188   /* *INDENT-OFF* */
189   REPLY_MACRO2 (VL_API_IPSEC_SPD_ENTRY_ADD_DEL_REPLY,
190   ({
191     rmp->stat_index = ntohl(stat_index);
192   }));
193   /* *INDENT-ON* */
194 }
195
196 static int
197 ipsec_proto_decode (vl_api_ipsec_proto_t in, ipsec_protocol_t * out)
198 {
199   in = clib_net_to_host_u32 (in);
200
201   switch (in)
202     {
203     case IPSEC_API_PROTO_ESP:
204       *out = IPSEC_PROTOCOL_ESP;
205       return (0);
206     case IPSEC_API_PROTO_AH:
207       *out = IPSEC_PROTOCOL_AH;
208       return (0);
209     }
210   return (VNET_API_ERROR_INVALID_PROTOCOL);
211 }
212
213 static vl_api_ipsec_proto_t
214 ipsec_proto_encode (ipsec_protocol_t p)
215 {
216   switch (p)
217     {
218     case IPSEC_PROTOCOL_ESP:
219       return clib_host_to_net_u32 (IPSEC_API_PROTO_ESP);
220     case IPSEC_PROTOCOL_AH:
221       return clib_host_to_net_u32 (IPSEC_API_PROTO_AH);
222     }
223   return (VNET_API_ERROR_UNIMPLEMENTED);
224 }
225
226 static int
227 ipsec_crypto_algo_decode (vl_api_ipsec_crypto_alg_t in,
228                           ipsec_crypto_alg_t * out)
229 {
230   in = clib_net_to_host_u32 (in);
231
232   switch (in)
233     {
234 #define _(v,f,s) case IPSEC_API_CRYPTO_ALG_##f: \
235       *out = IPSEC_CRYPTO_ALG_##f;              \
236       return (0);
237       foreach_ipsec_crypto_alg
238 #undef _
239     }
240   return (VNET_API_ERROR_INVALID_ALGORITHM);
241 }
242
243 static vl_api_ipsec_crypto_alg_t
244 ipsec_crypto_algo_encode (ipsec_crypto_alg_t c)
245 {
246   switch (c)
247     {
248 #define _(v,f,s) case IPSEC_CRYPTO_ALG_##f:                     \
249       return clib_host_to_net_u32(IPSEC_API_CRYPTO_ALG_##f);
250       foreach_ipsec_crypto_alg
251 #undef _
252     case IPSEC_CRYPTO_N_ALG:
253       break;
254     }
255   ASSERT (0);
256   return (VNET_API_ERROR_UNIMPLEMENTED);
257 }
258
259
260 static int
261 ipsec_integ_algo_decode (vl_api_ipsec_integ_alg_t in, ipsec_integ_alg_t * out)
262 {
263   in = clib_net_to_host_u32 (in);
264
265   switch (in)
266     {
267 #define _(v,f,s) case IPSEC_API_INTEG_ALG_##f:  \
268       *out = IPSEC_INTEG_ALG_##f;               \
269       return (0);
270       foreach_ipsec_integ_alg
271 #undef _
272     }
273   return (VNET_API_ERROR_INVALID_ALGORITHM);
274 }
275
276 static vl_api_ipsec_integ_alg_t
277 ipsec_integ_algo_encode (ipsec_integ_alg_t i)
278 {
279   switch (i)
280     {
281 #define _(v,f,s) case IPSEC_INTEG_ALG_##f:                      \
282       return (clib_host_to_net_u32(IPSEC_API_INTEG_ALG_##f));
283       foreach_ipsec_integ_alg
284 #undef _
285     case IPSEC_INTEG_N_ALG:
286       break;
287     }
288   ASSERT (0);
289   return (VNET_API_ERROR_UNIMPLEMENTED);
290 }
291
292 static void
293 ipsec_key_decode (const vl_api_key_t * key, ipsec_key_t * out)
294 {
295   ipsec_mk_key (out, key->data, key->length);
296 }
297
298 static void
299 ipsec_key_encode (const ipsec_key_t * in, vl_api_key_t * out)
300 {
301   out->length = in->len;
302   clib_memcpy (out->data, in->data, out->length);
303 }
304
305 static ipsec_sa_flags_t
306 ipsec_sa_flags_decode (vl_api_ipsec_sad_flags_t in)
307 {
308   ipsec_sa_flags_t flags = IPSEC_SA_FLAG_NONE;
309   in = clib_net_to_host_u32 (in);
310
311   if (in & IPSEC_API_SAD_FLAG_USE_ESN)
312     flags |= IPSEC_SA_FLAG_USE_ESN;
313   if (in & IPSEC_API_SAD_FLAG_USE_ANTI_REPLAY)
314     flags |= IPSEC_SA_FLAG_USE_ANTI_REPLAY;
315   if (in & IPSEC_API_SAD_FLAG_IS_TUNNEL)
316     flags |= IPSEC_SA_FLAG_IS_TUNNEL;
317   if (in & IPSEC_API_SAD_FLAG_IS_TUNNEL_V6)
318     flags |= IPSEC_SA_FLAG_IS_TUNNEL_V6;
319   if (in & IPSEC_API_SAD_FLAG_UDP_ENCAP)
320     flags |= IPSEC_SA_FLAG_UDP_ENCAP;
321
322   return (flags);
323 }
324
325 static vl_api_ipsec_sad_flags_t
326 ipsec_sad_flags_encode (const ipsec_sa_t * sa)
327 {
328   vl_api_ipsec_sad_flags_t flags = IPSEC_API_SAD_FLAG_NONE;
329
330   if (ipsec_sa_is_set_USE_ESN (sa))
331     flags |= IPSEC_API_SAD_FLAG_USE_ESN;
332   if (ipsec_sa_is_set_USE_ANTI_REPLAY (sa))
333     flags |= IPSEC_API_SAD_FLAG_USE_ANTI_REPLAY;
334   if (ipsec_sa_is_set_IS_TUNNEL (sa))
335     flags |= IPSEC_API_SAD_FLAG_IS_TUNNEL;
336   if (ipsec_sa_is_set_IS_TUNNEL_V6 (sa))
337     flags |= IPSEC_API_SAD_FLAG_IS_TUNNEL_V6;
338   if (ipsec_sa_is_set_UDP_ENCAP (sa))
339     flags |= IPSEC_API_SAD_FLAG_UDP_ENCAP;
340
341   return clib_host_to_net_u32 (flags);
342 }
343
344 static void vl_api_ipsec_sad_entry_add_del_t_handler
345   (vl_api_ipsec_sad_entry_add_del_t * mp)
346 {
347   vlib_main_t *vm __attribute__ ((unused)) = vlib_get_main ();
348   vl_api_ipsec_sad_entry_add_del_reply_t *rmp;
349   ip46_address_t tun_src = { }, tun_dst =
350   {
351   };
352   ipsec_key_t crypto_key, integ_key;
353   ipsec_crypto_alg_t crypto_alg;
354   ipsec_integ_alg_t integ_alg;
355   ipsec_protocol_t proto;
356   ipsec_sa_flags_t flags;
357   u32 id, spi, sa_index = ~0;
358   int rv;
359
360 #if WITH_LIBSSL > 0
361
362   id = ntohl (mp->entry.sad_id);
363   spi = ntohl (mp->entry.spi);
364
365   rv = ipsec_proto_decode (mp->entry.protocol, &proto);
366
367   if (rv)
368     goto out;
369
370   rv = ipsec_crypto_algo_decode (mp->entry.crypto_algorithm, &crypto_alg);
371
372   if (rv)
373     goto out;
374
375   rv = ipsec_integ_algo_decode (mp->entry.integrity_algorithm, &integ_alg);
376
377   if (rv)
378     goto out;
379
380   ipsec_key_decode (&mp->entry.crypto_key, &crypto_key);
381   ipsec_key_decode (&mp->entry.integrity_key, &integ_key);
382
383   flags = ipsec_sa_flags_decode (mp->entry.flags);
384
385   ip_address_decode (&mp->entry.tunnel_src, &tun_src);
386   ip_address_decode (&mp->entry.tunnel_dst, &tun_dst);
387
388   if (mp->is_add)
389     rv = ipsec_sa_add (id, spi, proto,
390                        crypto_alg, &crypto_key,
391                        integ_alg, &integ_key, flags,
392                        0, mp->entry.salt, &tun_src, &tun_dst, &sa_index);
393   else
394     rv = ipsec_sa_del (id);
395
396 #else
397   rv = VNET_API_ERROR_UNIMPLEMENTED;
398 #endif
399
400 out:
401   /* *INDENT-OFF* */
402   REPLY_MACRO2 (VL_API_IPSEC_SAD_ENTRY_ADD_DEL_REPLY,
403   {
404     rmp->stat_index = htonl (sa_index);
405   });
406   /* *INDENT-ON* */
407 }
408
409 static void
410 send_ipsec_spds_details (ipsec_spd_t * spd, vl_api_registration_t * reg,
411                          u32 context)
412 {
413   vl_api_ipsec_spds_details_t *mp;
414   u32 n_policies = 0;
415
416   mp = vl_msg_api_alloc (sizeof (*mp));
417   clib_memset (mp, 0, sizeof (*mp));
418   mp->_vl_msg_id = ntohs (VL_API_IPSEC_SPDS_DETAILS);
419   mp->context = context;
420
421   mp->spd_id = htonl (spd->id);
422 #define _(s, n) n_policies += vec_len (spd->policies[IPSEC_SPD_POLICY_##s]);
423   foreach_ipsec_spd_policy_type
424 #undef _
425     mp->npolicies = htonl (n_policies);
426
427   vl_api_send_msg (reg, (u8 *) mp);
428 }
429
430 static void
431 vl_api_ipsec_spds_dump_t_handler (vl_api_ipsec_spds_dump_t * mp)
432 {
433   vl_api_registration_t *reg;
434   ipsec_main_t *im = &ipsec_main;
435   ipsec_spd_t *spd;
436 #if WITH_LIBSSL > 0
437   reg = vl_api_client_index_to_registration (mp->client_index);
438   if (!reg)
439     return;
440
441   /* *INDENT-OFF* */
442   pool_foreach (spd, im->spds, ({
443     send_ipsec_spds_details (spd, reg, mp->context);
444   }));
445   /* *INDENT-ON* */
446 #else
447   clib_warning ("unimplemented");
448 #endif
449 }
450
451 vl_api_ipsec_spd_action_t
452 ipsec_spd_action_encode (ipsec_policy_action_t in)
453 {
454   vl_api_ipsec_spd_action_t out = IPSEC_API_SPD_ACTION_BYPASS;
455
456   switch (in)
457     {
458 #define _(v,f,s) case IPSEC_POLICY_ACTION_##f: \
459       out = IPSEC_API_SPD_ACTION_##f;          \
460       break;
461       foreach_ipsec_policy_action
462 #undef _
463     }
464   return (clib_host_to_net_u32 (out));
465 }
466
467 static void
468 send_ipsec_spd_details (ipsec_policy_t * p, vl_api_registration_t * reg,
469                         u32 context)
470 {
471   vl_api_ipsec_spd_details_t *mp;
472
473   mp = vl_msg_api_alloc (sizeof (*mp));
474   clib_memset (mp, 0, sizeof (*mp));
475   mp->_vl_msg_id = ntohs (VL_API_IPSEC_SPD_DETAILS);
476   mp->context = context;
477
478   mp->entry.spd_id = htonl (p->id);
479   mp->entry.priority = htonl (p->priority);
480   mp->entry.is_outbound = ((p->type == IPSEC_SPD_POLICY_IP6_OUTBOUND) ||
481                            (p->type == IPSEC_SPD_POLICY_IP4_OUTBOUND));
482
483   ip_address_encode (&p->laddr.start, IP46_TYPE_ANY,
484                      &mp->entry.local_address_start);
485   ip_address_encode (&p->laddr.stop, IP46_TYPE_ANY,
486                      &mp->entry.local_address_stop);
487   ip_address_encode (&p->raddr.start, IP46_TYPE_ANY,
488                      &mp->entry.remote_address_start);
489   ip_address_encode (&p->raddr.stop, IP46_TYPE_ANY,
490                      &mp->entry.remote_address_stop);
491   mp->entry.local_port_start = p->lport.start;
492   mp->entry.local_port_stop = p->lport.stop;
493   mp->entry.remote_port_start = p->rport.start;
494   mp->entry.remote_port_stop = p->rport.stop;
495   mp->entry.protocol = p->protocol;
496   mp->entry.policy = ipsec_spd_action_encode (p->policy);
497   mp->entry.sa_id = htonl (p->sa_id);
498
499   vl_api_send_msg (reg, (u8 *) mp);
500 }
501
502 static void
503 vl_api_ipsec_spd_dump_t_handler (vl_api_ipsec_spd_dump_t * mp)
504 {
505   vl_api_registration_t *reg;
506   ipsec_main_t *im = &ipsec_main;
507   ipsec_spd_policy_type_t ptype;
508   ipsec_policy_t *policy;
509   ipsec_spd_t *spd;
510   uword *p;
511   u32 spd_index, *ii;
512 #if WITH_LIBSSL > 0
513   reg = vl_api_client_index_to_registration (mp->client_index);
514   if (!reg)
515     return;
516
517   p = hash_get (im->spd_index_by_spd_id, ntohl (mp->spd_id));
518   if (!p)
519     return;
520
521   spd_index = p[0];
522   spd = pool_elt_at_index (im->spds, spd_index);
523
524   /* *INDENT-OFF* */
525   FOR_EACH_IPSEC_SPD_POLICY_TYPE(ptype) {
526     vec_foreach(ii, spd->policies[ptype])
527       {
528         policy = pool_elt_at_index(im->policies, *ii);
529
530         if (mp->sa_id == ~(0) || ntohl (mp->sa_id) == policy->sa_id)
531           send_ipsec_spd_details (policy, reg, mp->context);
532       }
533   }
534   /* *INDENT-ON* */
535 #else
536   clib_warning ("unimplemented");
537 #endif
538 }
539
540 static void
541 send_ipsec_spd_interface_details (vl_api_registration_t * reg, u32 spd_index,
542                                   u32 sw_if_index, u32 context)
543 {
544   vl_api_ipsec_spd_interface_details_t *mp;
545
546   mp = vl_msg_api_alloc (sizeof (*mp));
547   clib_memset (mp, 0, sizeof (*mp));
548   mp->_vl_msg_id = ntohs (VL_API_IPSEC_SPD_INTERFACE_DETAILS);
549   mp->context = context;
550
551   mp->spd_index = htonl (spd_index);
552   mp->sw_if_index = htonl (sw_if_index);
553
554   vl_api_send_msg (reg, (u8 *) mp);
555 }
556
557 static void
558 vl_api_ipsec_spd_interface_dump_t_handler (vl_api_ipsec_spd_interface_dump_t *
559                                            mp)
560 {
561   ipsec_main_t *im = &ipsec_main;
562   vl_api_registration_t *reg;
563   u32 k, v, spd_index;
564
565 #if WITH_LIBSSL > 0
566   reg = vl_api_client_index_to_registration (mp->client_index);
567   if (!reg)
568     return;
569
570   if (mp->spd_index_valid)
571     {
572       spd_index = ntohl (mp->spd_index);
573       /* *INDENT-OFF* */
574       hash_foreach(k, v, im->spd_index_by_sw_if_index, ({
575         if (v == spd_index)
576           send_ipsec_spd_interface_details(reg, v, k, mp->context);
577       }));
578       /* *INDENT-ON* */
579     }
580   else
581     {
582       /* *INDENT-OFF* */
583       hash_foreach(k, v, im->spd_index_by_sw_if_index, ({
584         send_ipsec_spd_interface_details(reg, v, k, mp->context);
585       }));
586       /* *INDENT-ON* */
587     }
588
589 #else
590   clib_warning ("unimplemented");
591 #endif
592 }
593
594 static void
595 vl_api_ipsec_sa_set_key_t_handler (vl_api_ipsec_sa_set_key_t * mp)
596 {
597   vlib_main_t *vm __attribute__ ((unused)) = vlib_get_main ();
598   vl_api_ipsec_sa_set_key_reply_t *rmp;
599   ipsec_key_t ck, ik;
600   u32 id;
601   int rv;
602 #if WITH_LIBSSL > 0
603
604   id = ntohl (mp->sa_id);
605
606   ipsec_key_decode (&mp->crypto_key, &ck);
607   ipsec_key_decode (&mp->integrity_key, &ik);
608
609   rv = ipsec_set_sa_key (id, &ck, &ik);
610 #else
611   rv = VNET_API_ERROR_UNIMPLEMENTED;
612 #endif
613
614   REPLY_MACRO (VL_API_IPSEC_SA_SET_KEY_REPLY);
615 }
616
617 static void
618 vl_api_ipsec_tunnel_if_add_del_t_handler (vl_api_ipsec_tunnel_if_add_del_t *
619                                           mp)
620 {
621   vl_api_ipsec_tunnel_if_add_del_reply_t *rmp;
622   ipsec_main_t *im = &ipsec_main;
623   vnet_main_t *vnm = im->vnet_main;
624   u32 sw_if_index = ~0;
625   ip46_type_t itype;
626   int rv;
627
628 #if WITH_LIBSSL > 0
629   ipsec_add_del_tunnel_args_t tun;
630
631   clib_memset (&tun, 0, sizeof (ipsec_add_del_tunnel_args_t));
632
633   tun.is_add = mp->is_add;
634   tun.esn = mp->esn;
635   tun.anti_replay = mp->anti_replay;
636   tun.local_spi = ntohl (mp->local_spi);
637   tun.remote_spi = ntohl (mp->remote_spi);
638   tun.crypto_alg = mp->crypto_alg;
639   tun.local_crypto_key_len = mp->local_crypto_key_len;
640   tun.remote_crypto_key_len = mp->remote_crypto_key_len;
641   tun.integ_alg = mp->integ_alg;
642   tun.local_integ_key_len = mp->local_integ_key_len;
643   tun.remote_integ_key_len = mp->remote_integ_key_len;
644   tun.udp_encap = mp->udp_encap;
645   tun.tx_table_id = ntohl (mp->tx_table_id);
646   tun.salt = mp->salt;
647   itype = ip_address_decode (&mp->local_ip, &tun.local_ip);
648   itype = ip_address_decode (&mp->remote_ip, &tun.remote_ip);
649   tun.is_ip6 = (IP46_TYPE_IP6 == itype);
650   memcpy (&tun.local_crypto_key, &mp->local_crypto_key,
651           mp->local_crypto_key_len);
652   memcpy (&tun.remote_crypto_key, &mp->remote_crypto_key,
653           mp->remote_crypto_key_len);
654   memcpy (&tun.local_integ_key, &mp->local_integ_key,
655           mp->local_integ_key_len);
656   memcpy (&tun.remote_integ_key, &mp->remote_integ_key,
657           mp->remote_integ_key_len);
658   tun.renumber = mp->renumber;
659   tun.show_instance = ntohl (mp->show_instance);
660
661   rv = ipsec_add_del_tunnel_if_internal (vnm, &tun, &sw_if_index);
662
663 #else
664   rv = VNET_API_ERROR_UNIMPLEMENTED;
665 #endif
666
667   /* *INDENT-OFF* */
668   REPLY_MACRO2 (VL_API_IPSEC_TUNNEL_IF_ADD_DEL_REPLY,
669   ({
670     rmp->sw_if_index = htonl (sw_if_index);
671   }));
672   /* *INDENT-ON* */
673 }
674
675 static void
676 send_ipsec_sa_details (ipsec_sa_t * sa, vl_api_registration_t * reg,
677                        u32 context, u32 sw_if_index)
678 {
679   vl_api_ipsec_sa_details_t *mp;
680
681   mp = vl_msg_api_alloc (sizeof (*mp));
682   clib_memset (mp, 0, sizeof (*mp));
683   mp->_vl_msg_id = ntohs (VL_API_IPSEC_SA_DETAILS);
684   mp->context = context;
685
686   mp->entry.sad_id = htonl (sa->id);
687   mp->entry.spi = htonl (sa->spi);
688   mp->entry.protocol = ipsec_proto_encode (sa->protocol);
689   mp->entry.tx_table_id =
690     htonl (fib_table_get_table_id (sa->tx_fib_index, FIB_PROTOCOL_IP4));
691
692   mp->entry.crypto_algorithm = ipsec_crypto_algo_encode (sa->crypto_alg);
693   ipsec_key_encode (&sa->crypto_key, &mp->entry.crypto_key);
694
695   mp->entry.integrity_algorithm = ipsec_integ_algo_encode (sa->integ_alg);
696   ipsec_key_encode (&sa->integ_key, &mp->entry.integrity_key);
697
698   mp->entry.flags = ipsec_sad_flags_encode (sa);
699
700   if (ipsec_sa_is_set_IS_TUNNEL (sa))
701     {
702       ip_address_encode (&sa->tunnel_src_addr, IP46_TYPE_ANY,
703                          &mp->entry.tunnel_src);
704       ip_address_encode (&sa->tunnel_dst_addr, IP46_TYPE_ANY,
705                          &mp->entry.tunnel_dst);
706     }
707
708   mp->sw_if_index = htonl (sw_if_index);
709   mp->salt = clib_host_to_net_u32 (sa->salt);
710   mp->seq_outbound = clib_host_to_net_u64 (((u64) sa->seq));
711   mp->last_seq_inbound = clib_host_to_net_u64 (((u64) sa->last_seq));
712   if (ipsec_sa_is_set_USE_ESN (sa))
713     {
714       mp->seq_outbound |= (u64) (clib_host_to_net_u32 (sa->seq_hi));
715       mp->last_seq_inbound |= (u64) (clib_host_to_net_u32 (sa->last_seq_hi));
716     }
717   if (ipsec_sa_is_set_USE_ANTI_REPLAY (sa))
718     mp->replay_window = clib_host_to_net_u64 (sa->replay_window);
719
720   vl_api_send_msg (reg, (u8 *) mp);
721 }
722
723
724 static void
725 vl_api_ipsec_sa_dump_t_handler (vl_api_ipsec_sa_dump_t * mp)
726 {
727   vl_api_registration_t *reg;
728   ipsec_main_t *im = &ipsec_main;
729   vnet_main_t *vnm = im->vnet_main;
730   ipsec_sa_t *sa;
731   ipsec_tunnel_if_t *t;
732   u32 *sa_index_to_tun_if_index = 0;
733
734 #if WITH_LIBSSL > 0
735   reg = vl_api_client_index_to_registration (mp->client_index);
736   if (!reg || pool_elts (im->sad) == 0)
737     return;
738
739   vec_validate_init_empty (sa_index_to_tun_if_index, vec_len (im->sad) - 1,
740                            ~0);
741
742   /* *INDENT-OFF* */
743   pool_foreach (t, im->tunnel_interfaces,
744   ({
745     vnet_hw_interface_t *hi;
746     u32 sw_if_index = ~0;
747
748     hi = vnet_get_hw_interface (vnm, t->hw_if_index);
749     sw_if_index = hi->sw_if_index;
750     sa_index_to_tun_if_index[t->input_sa_index] = sw_if_index;
751     sa_index_to_tun_if_index[t->output_sa_index] = sw_if_index;
752   }));
753
754   pool_foreach (sa, im->sad,
755   ({
756     if (mp->sa_id == ~(0) || ntohl (mp->sa_id) == sa->id)
757       send_ipsec_sa_details (sa, reg, mp->context,
758                              sa_index_to_tun_if_index[sa - im->sad]);
759   }));
760   /* *INDENT-ON* */
761
762   vec_free (sa_index_to_tun_if_index);
763 #else
764   clib_warning ("unimplemented");
765 #endif
766 }
767
768
769 static void
770 vl_api_ipsec_tunnel_if_set_key_t_handler (vl_api_ipsec_tunnel_if_set_key_t *
771                                           mp)
772 {
773   vl_api_ipsec_tunnel_if_set_key_reply_t *rmp;
774   ipsec_main_t *im = &ipsec_main;
775   vnet_main_t *vnm = im->vnet_main;
776   vnet_sw_interface_t *sw;
777   u8 *key = 0;
778   int rv;
779
780 #if WITH_LIBSSL > 0
781   sw = vnet_get_sw_interface (vnm, ntohl (mp->sw_if_index));
782
783   switch (mp->key_type)
784     {
785     case IPSEC_IF_SET_KEY_TYPE_LOCAL_CRYPTO:
786     case IPSEC_IF_SET_KEY_TYPE_REMOTE_CRYPTO:
787       if (mp->alg < IPSEC_CRYPTO_ALG_AES_CBC_128 ||
788           mp->alg >= IPSEC_CRYPTO_N_ALG)
789         {
790           rv = VNET_API_ERROR_INVALID_ALGORITHM;
791           goto out;
792         }
793       break;
794     case IPSEC_IF_SET_KEY_TYPE_LOCAL_INTEG:
795     case IPSEC_IF_SET_KEY_TYPE_REMOTE_INTEG:
796       if (mp->alg >= IPSEC_INTEG_N_ALG)
797         {
798           rv = VNET_API_ERROR_INVALID_ALGORITHM;
799           goto out;
800         }
801       break;
802     case IPSEC_IF_SET_KEY_TYPE_NONE:
803     default:
804       rv = VNET_API_ERROR_UNIMPLEMENTED;
805       goto out;
806       break;
807     }
808
809   key = vec_new (u8, mp->key_len);
810   clib_memcpy (key, mp->key, mp->key_len);
811
812   rv = ipsec_set_interface_key (vnm, sw->hw_if_index, mp->key_type, mp->alg,
813                                 key);
814   vec_free (key);
815 #else
816   clib_warning ("unimplemented");
817 #endif
818
819 out:
820   REPLY_MACRO (VL_API_IPSEC_TUNNEL_IF_SET_KEY_REPLY);
821 }
822
823
824 static void
825 vl_api_ipsec_tunnel_if_set_sa_t_handler (vl_api_ipsec_tunnel_if_set_sa_t * mp)
826 {
827   vl_api_ipsec_tunnel_if_set_sa_reply_t *rmp;
828   ipsec_main_t *im = &ipsec_main;
829   vnet_main_t *vnm = im->vnet_main;
830   vnet_sw_interface_t *sw;
831   int rv;
832
833 #if WITH_LIBSSL > 0
834   sw = vnet_get_sw_interface (vnm, ntohl (mp->sw_if_index));
835
836   rv = ipsec_set_interface_sa (vnm, sw->hw_if_index, ntohl (mp->sa_id),
837                                mp->is_outbound);
838 #else
839   clib_warning ("unimplemented");
840 #endif
841
842   REPLY_MACRO (VL_API_IPSEC_TUNNEL_IF_SET_SA_REPLY);
843 }
844
845 static void
846 vl_api_ipsec_backend_dump_t_handler (vl_api_ipsec_backend_dump_t * mp)
847 {
848   vl_api_registration_t *rp;
849   ipsec_main_t *im = &ipsec_main;
850   u32 context = mp->context;
851
852   rp = vl_api_client_index_to_registration (mp->client_index);
853
854   if (rp == 0)
855     {
856       clib_warning ("Client %d AWOL", mp->client_index);
857       return;
858     }
859
860   ipsec_ah_backend_t *ab;
861   ipsec_esp_backend_t *eb;
862   /* *INDENT-OFF* */
863   pool_foreach (ab, im->ah_backends, {
864     vl_api_ipsec_backend_details_t *mp = vl_msg_api_alloc (sizeof (*mp));
865     clib_memset (mp, 0, sizeof (*mp));
866     mp->_vl_msg_id = ntohs (VL_API_IPSEC_BACKEND_DETAILS);
867     mp->context = context;
868     snprintf ((char *)mp->name, sizeof (mp->name), "%.*s", vec_len (ab->name),
869               ab->name);
870     mp->protocol = ntohl (IPSEC_API_PROTO_AH);
871     mp->index = ab - im->ah_backends;
872     mp->active = mp->index == im->ah_current_backend ? 1 : 0;
873     vl_api_send_msg (rp, (u8 *)mp);
874   });
875   pool_foreach (eb, im->esp_backends, {
876     vl_api_ipsec_backend_details_t *mp = vl_msg_api_alloc (sizeof (*mp));
877     clib_memset (mp, 0, sizeof (*mp));
878     mp->_vl_msg_id = ntohs (VL_API_IPSEC_BACKEND_DETAILS);
879     mp->context = context;
880     snprintf ((char *)mp->name, sizeof (mp->name), "%.*s", vec_len (eb->name),
881               eb->name);
882     mp->protocol = ntohl (IPSEC_API_PROTO_ESP);
883     mp->index = eb - im->esp_backends;
884     mp->active = mp->index == im->esp_current_backend ? 1 : 0;
885     vl_api_send_msg (rp, (u8 *)mp);
886   });
887   /* *INDENT-ON* */
888 }
889
890 static void
891 vl_api_ipsec_select_backend_t_handler (vl_api_ipsec_select_backend_t * mp)
892 {
893   ipsec_main_t *im = &ipsec_main;
894   vl_api_ipsec_select_backend_reply_t *rmp;
895   ipsec_protocol_t protocol;
896   int rv = 0;
897   if (pool_elts (im->sad) > 0)
898     {
899       rv = VNET_API_ERROR_INSTANCE_IN_USE;
900       goto done;
901     }
902
903   rv = ipsec_proto_decode (mp->protocol, &protocol);
904
905   if (rv)
906     goto done;
907
908 #if WITH_LIBSSL > 0
909   switch (protocol)
910     {
911     case IPSEC_PROTOCOL_ESP:
912       rv = ipsec_select_esp_backend (im, mp->index);
913       break;
914     case IPSEC_PROTOCOL_AH:
915       rv = ipsec_select_ah_backend (im, mp->index);
916       break;
917     default:
918       rv = VNET_API_ERROR_INVALID_PROTOCOL;
919       break;
920     }
921 #else
922   clib_warning ("unimplemented");       /* FIXME */
923 #endif
924 done:
925   REPLY_MACRO (VL_API_IPSEC_SELECT_BACKEND_REPLY);
926 }
927
928 /*
929  * ipsec_api_hookup
930  * Add vpe's API message handlers to the table.
931  * vlib has already mapped shared memory and
932  * added the client registration handlers.
933  * See .../vlib-api/vlibmemory/memclnt_vlib.c:memclnt_process()
934  */
935 #define vl_msg_name_crc_list
936 #include <vnet/vnet_all_api_h.h>
937 #undef vl_msg_name_crc_list
938
939 static void
940 setup_message_id_table (api_main_t * am)
941 {
942 #define _(id,n,crc) vl_msg_api_add_msg_name_crc (am, #n "_" #crc, id);
943   foreach_vl_msg_name_crc_ipsec;
944 #undef _
945 }
946
947 static clib_error_t *
948 ipsec_api_hookup (vlib_main_t * vm)
949 {
950   api_main_t *am = &api_main;
951
952 #define _(N,n)                                                  \
953     vl_msg_api_set_handlers(VL_API_##N, #n,                     \
954                            vl_api_##n##_t_handler,              \
955                            vl_noop_handler,                     \
956                            vl_api_##n##_t_endian,               \
957                            vl_api_##n##_t_print,                \
958                            sizeof(vl_api_##n##_t), 1);
959   foreach_vpe_api_msg;
960 #undef _
961
962   /*
963    * Set up the (msg_name, crc, message-id) table
964    */
965   setup_message_id_table (am);
966
967   return 0;
968 }
969
970 VLIB_API_INIT_FUNCTION (ipsec_api_hookup);
971
972 /*
973  * fd.io coding-style-patch-verification: ON
974  *
975  * Local Variables:
976  * eval: (c-set-style "gnu")
977  * End:
978  */