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
 389   if (mp->is_add)
 390     rv = ipsec_sa_add (id, spi, proto,
 391                        crypto_alg, &crypto_key,
 392                        integ_alg, &integ_key, flags,
 393                        0, 0, &tun_src, &tun_dst, &sa_index);
 394   else
 395     rv = ipsec_sa_del (id);
 396
 397 #else
 398   rv = VNET_API_ERROR_UNIMPLEMENTED;
 399 #endif
 400
 401 out:
 402   /* *INDENT-OFF* */
 403   REPLY_MACRO2 (VL_API_IPSEC_SAD_ENTRY_ADD_DEL_REPLY,
 404   {
 405     rmp->stat_index = htonl (sa_index);
 406   });
 407   /* *INDENT-ON* */
 408 }
 409
 410 static void
 411 send_ipsec_spds_details (ipsec_spd_t * spd, vl_api_registration_t * reg,
 412                          u32 context)
 413 {
 414   vl_api_ipsec_spds_details_t *mp;
 415   u32 n_policies = 0;
 416
 417   mp = vl_msg_api_alloc (sizeof (*mp));
 418   clib_memset (mp, 0, sizeof (*mp));
 419   mp->_vl_msg_id = ntohs (VL_API_IPSEC_SPDS_DETAILS);
 420   mp->context = context;
 421
 422   mp->spd_id = htonl (spd->id);
 423 #define _(s, n) n_policies += vec_len (spd->policies[IPSEC_SPD_POLICY_##s]);
 424   foreach_ipsec_spd_policy_type
 425 #undef _
 426     mp->npolicies = htonl (n_policies);
 427
 428   vl_api_send_msg (reg, (u8 *) mp);
 429 }
 430
 431 static void
 432 vl_api_ipsec_spds_dump_t_handler (vl_api_ipsec_spds_dump_t * mp)
 433 {
 434   vl_api_registration_t *reg;
 435   ipsec_main_t *im = &ipsec_main;
 436   ipsec_spd_t *spd;
 437 #if WITH_LIBSSL > 0
 438   reg = vl_api_client_index_to_registration (mp->client_index);
 439   if (!reg)
 440     return;
 441
 442   /* *INDENT-OFF* */
 443   pool_foreach (spd, im->spds, ({
 444     send_ipsec_spds_details (spd, reg, mp->context);
 445   }));
 446   /* *INDENT-ON* */
 447 #else
 448   clib_warning ("unimplemented");
 449 #endif
 450 }
 451
 452 vl_api_ipsec_spd_action_t
 453 ipsec_spd_action_encode (ipsec_policy_action_t in)
 454 {
 455   vl_api_ipsec_spd_action_t out = IPSEC_API_SPD_ACTION_BYPASS;
 456
 457   switch (in)
 458     {
 459 #define _(v,f,s) case IPSEC_POLICY_ACTION_##f: \
 460       out = IPSEC_API_SPD_ACTION_##f;          \
 461       break;
 462       foreach_ipsec_policy_action
 463 #undef _
 464     }
 465   return (clib_host_to_net_u32 (out));
 466 }
 467
 468 static void
 469 send_ipsec_spd_details (ipsec_policy_t * p, vl_api_registration_t * reg,
 470                         u32 context)
 471 {
 472   vl_api_ipsec_spd_details_t *mp;
 473
 474   mp = vl_msg_api_alloc (sizeof (*mp));
 475   clib_memset (mp, 0, sizeof (*mp));
 476   mp->_vl_msg_id = ntohs (VL_API_IPSEC_SPD_DETAILS);
 477   mp->context = context;
 478
 479   mp->entry.spd_id = htonl (p->id);
 480   mp->entry.priority = htonl (p->priority);
 481   mp->entry.is_outbound = ((p->type == IPSEC_SPD_POLICY_IP6_OUTBOUND) ||
 482                            (p->type == IPSEC_SPD_POLICY_IP4_OUTBOUND));
 483
 484   ip_address_encode (&p->laddr.start, IP46_TYPE_ANY,
 485                      &mp->entry.local_address_start);
 486   ip_address_encode (&p->laddr.stop, IP46_TYPE_ANY,
 487                      &mp->entry.local_address_stop);
 488   ip_address_encode (&p->raddr.start, IP46_TYPE_ANY,
 489                      &mp->entry.remote_address_start);
 490   ip_address_encode (&p->raddr.stop, IP46_TYPE_ANY,
 491                      &mp->entry.remote_address_stop);
 492   mp->entry.local_port_start = p->lport.start;
 493   mp->entry.local_port_stop = p->lport.stop;
 494   mp->entry.remote_port_start = p->rport.start;
 495   mp->entry.remote_port_stop = p->rport.stop;
 496   mp->entry.protocol = p->protocol;
 497   mp->entry.policy = ipsec_spd_action_encode (p->policy);
 498   mp->entry.sa_id = htonl (p->sa_id);
 499
 500   vl_api_send_msg (reg, (u8 *) mp);
 501 }
 502
 503 static void
 504 vl_api_ipsec_spd_dump_t_handler (vl_api_ipsec_spd_dump_t * mp)
 505 {
 506   vl_api_registration_t *reg;
 507   ipsec_main_t *im = &ipsec_main;
 508   ipsec_spd_policy_type_t ptype;
 509   ipsec_policy_t *policy;
 510   ipsec_spd_t *spd;
 511   uword *p;
 512   u32 spd_index, *ii;
 513 #if WITH_LIBSSL > 0
 514   reg = vl_api_client_index_to_registration (mp->client_index);
 515   if (!reg)
 516     return;
 517
 518   p = hash_get (im->spd_index_by_spd_id, ntohl (mp->spd_id));
 519   if (!p)
 520     return;
 521
 522   spd_index = p[0];
 523   spd = pool_elt_at_index (im->spds, spd_index);
 524
 525   /* *INDENT-OFF* */
 526   FOR_EACH_IPSEC_SPD_POLICY_TYPE(ptype) {
 527     vec_foreach(ii, spd->policies[ptype])
 528       {
 529         policy = pool_elt_at_index(im->policies, *ii);
 530
 531         if (mp->sa_id == ~(0) || ntohl (mp->sa_id) == policy->sa_id)
 532           send_ipsec_spd_details (policy, reg, mp->context);
 533       }
 534   }
 535   /* *INDENT-ON* */
 536 #else
 537   clib_warning ("unimplemented");
 538 #endif
 539 }
 540
 541 static void
 542 send_ipsec_spd_interface_details (vl_api_registration_t * reg, u32 spd_index,
 543                                   u32 sw_if_index, u32 context)
 544 {
 545   vl_api_ipsec_spd_interface_details_t *mp;
 546
 547   mp = vl_msg_api_alloc (sizeof (*mp));
 548   clib_memset (mp, 0, sizeof (*mp));
 549   mp->_vl_msg_id = ntohs (VL_API_IPSEC_SPD_INTERFACE_DETAILS);
 550   mp->context = context;
 551
 552   mp->spd_index = htonl (spd_index);
 553   mp->sw_if_index = htonl (sw_if_index);
 554
 555   vl_api_send_msg (reg, (u8 *) mp);
 556 }
 557
 558 static void
 559 vl_api_ipsec_spd_interface_dump_t_handler (vl_api_ipsec_spd_interface_dump_t *
 560                                            mp)
 561 {
 562   ipsec_main_t *im = &ipsec_main;
 563   vl_api_registration_t *reg;
 564   u32 k, v, spd_index;
 565
 566 #if WITH_LIBSSL > 0
 567   reg = vl_api_client_index_to_registration (mp->client_index);
 568   if (!reg)
 569     return;
 570
 571   if (mp->spd_index_valid)
 572     {
 573       spd_index = ntohl (mp->spd_index);
 574       /* *INDENT-OFF* */
 575       hash_foreach(k, v, im->spd_index_by_sw_if_index, ({
 576         if (v == spd_index)
 577           send_ipsec_spd_interface_details(reg, v, k, mp->context);
 578       }));
 579       /* *INDENT-ON* */
 580     }
 581   else
 582     {
 583       /* *INDENT-OFF* */
 584       hash_foreach(k, v, im->spd_index_by_sw_if_index, ({
 585         send_ipsec_spd_interface_details(reg, v, k, mp->context);
 586       }));
 587       /* *INDENT-ON* */
 588     }
 589
 590 #else
 591   clib_warning ("unimplemented");
 592 #endif
 593 }
 594
 595 static void
 596 vl_api_ipsec_sa_set_key_t_handler (vl_api_ipsec_sa_set_key_t * mp)
 597 {
 598   vlib_main_t *vm __attribute__ ((unused)) = vlib_get_main ();
 599   vl_api_ipsec_sa_set_key_reply_t *rmp;
 600   ipsec_key_t ck, ik;
 601   u32 id;
 602   int rv;
 603 #if WITH_LIBSSL > 0
 604
 605   id = ntohl (mp->sa_id);
 606
 607   ipsec_key_decode (&mp->crypto_key, &ck);
 608   ipsec_key_decode (&mp->integrity_key, &ik);
 609
 610   rv = ipsec_set_sa_key (id, &ck, &ik);
 611 #else
 612   rv = VNET_API_ERROR_UNIMPLEMENTED;
 613 #endif
 614
 615   REPLY_MACRO (VL_API_IPSEC_SA_SET_KEY_REPLY);
 616 }
 617
 618 static void
 619 vl_api_ipsec_tunnel_if_add_del_t_handler (vl_api_ipsec_tunnel_if_add_del_t *
 620                                           mp)
 621 {
 622   vl_api_ipsec_tunnel_if_add_del_reply_t *rmp;
 623   ipsec_main_t *im = &ipsec_main;
 624   vnet_main_t *vnm = im->vnet_main;
 625   u32 sw_if_index = ~0;
 626   ip46_type_t itype;
 627   int rv;
 628
 629 #if WITH_LIBSSL > 0
 630   ipsec_add_del_tunnel_args_t tun;
 631
 632   clib_memset (&tun, 0, sizeof (ipsec_add_del_tunnel_args_t));
 633
 634   tun.is_add = mp->is_add;
 635   tun.esn = mp->esn;
 636   tun.anti_replay = mp->anti_replay;
 637   tun.local_spi = ntohl (mp->local_spi);
 638   tun.remote_spi = ntohl (mp->remote_spi);
 639   tun.crypto_alg = mp->crypto_alg;
 640   tun.local_crypto_key_len = mp->local_crypto_key_len;
 641   tun.remote_crypto_key_len = mp->remote_crypto_key_len;
 642   tun.integ_alg = mp->integ_alg;
 643   tun.local_integ_key_len = mp->local_integ_key_len;
 644   tun.remote_integ_key_len = mp->remote_integ_key_len;
 645   tun.udp_encap = mp->udp_encap;
 646   tun.tx_table_id = ntohl (mp->tx_table_id);
 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       if (pool_is_free_index (im->esp_backends, mp->index))
 913         {
 914           rv = VNET_API_ERROR_INVALID_VALUE;
 915           break;
 916         }
 917       ipsec_select_esp_backend (im, mp->index);
 918       break;
 919     case IPSEC_PROTOCOL_AH:
 920       if (pool_is_free_index (im->ah_backends, mp->index))
 921         {
 922           rv = VNET_API_ERROR_INVALID_VALUE;
 923           break;
 924         }
 925       ipsec_select_ah_backend (im, mp->index);
 926       break;
 927     default:
 928       rv = VNET_API_ERROR_INVALID_VALUE;
 929       break;
 930     }
 931 #else
 932   clib_warning ("unimplemented");       /* FIXME */
 933 #endif
 934 done:
 935   REPLY_MACRO (VL_API_IPSEC_SELECT_BACKEND_REPLY);
 936 }
 937
 938 /*
 939  * ipsec_api_hookup
 940  * Add vpe's API message handlers to the table.
 941  * vlib has already mapped shared memory and
 942  * added the client registration handlers.
 943  * See .../vlib-api/vlibmemory/memclnt_vlib.c:memclnt_process()
 944  */
 945 #define vl_msg_name_crc_list
 946 #include <vnet/vnet_all_api_h.h>
 947 #undef vl_msg_name_crc_list
 948
 949 static void
 950 setup_message_id_table (api_main_t * am)
 951 {
 952 #define _(id,n,crc) vl_msg_api_add_msg_name_crc (am, #n "_" #crc, id);
 953   foreach_vl_msg_name_crc_ipsec;
 954 #undef _
 955 }
 956
 957 static clib_error_t *
 958 ipsec_api_hookup (vlib_main_t * vm)
 959 {
 960   api_main_t *am = &api_main;
 961
 962 #define _(N,n)                                                  \
 963     vl_msg_api_set_handlers(VL_API_##N, #n,                     \
 964                            vl_api_##n##_t_handler,              \
 965                            vl_noop_handler,                     \
 966                            vl_api_##n##_t_endian,               \
 967                            vl_api_##n##_t_print,                \
 968                            sizeof(vl_api_##n##_t), 1);
 969   foreach_vpe_api_msg;
 970 #undef _
 971
 972   /*
 973    * Set up the (msg_name, crc, message-id) table
 974    */
 975   setup_message_id_table (am);
 976
 977   return 0;
 978 }
 979
 980 VLIB_API_INIT_FUNCTION (ipsec_api_hookup);
 981
 982 /*
 983  * fd.io coding-style-patch-verification: ON
 984  *
 985  * Local Variables:
 986  * eval: (c-set-style "gnu")
 987  * End:
 988  */