src/vnet/ipsec/ipsec.c

   1 /*
   2  * ipsec.c : IPSEC module functions
   3  *
   4  * Copyright (c) 2015 Cisco and/or its affiliates.
   5  * Licensed under the Apache License, Version 2.0 (the "License");
   6  * you may not use this file except in compliance with the License.
   7  * You may obtain a copy of the License at:
   8  *
   9  *     http://www.apache.org/licenses/LICENSE-2.0
  10  *
  11  * Unless required by applicable law or agreed to in writing, software
  12  * distributed under the License is distributed on an "AS IS" BASIS,
  13  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  14  * See the License for the specific language governing permissions and
  15  * limitations under the License.
  16  */
  17
  18 #include <vnet/vnet.h>
  19 #include <vnet/api_errno.h>
  20 #include <vnet/ip/ip.h>
  21 #include <vnet/interface.h>
  22 #include <vnet/udp/udp.h>
  23
  24 #include <vnet/ipsec/ipsec.h>
  25 #include <vnet/ipsec/esp.h>
  26 #include <vnet/ipsec/ah.h>
  27
  28 ipsec_main_t ipsec_main;
  29
  30 static void
  31 ipsec_rand_seed (void)
  32 {
  33   struct
  34   {
  35     time_t time;
  36     pid_t pid;
  37     void *p;
  38   } seed_data;
  39
  40   seed_data.time = time (NULL);
  41   seed_data.pid = getpid ();
  42   seed_data.p = (void *) &seed_data;
  43
  44   RAND_seed ((const void *) &seed_data, sizeof (seed_data));
  45 }
  46
  47 static clib_error_t *
  48 ipsec_check_ah_support (ipsec_sa_t * sa)
  49 {
  50   if (sa->integ_alg == IPSEC_INTEG_ALG_NONE)
  51     return clib_error_return (0, "unsupported none integ-alg");
  52   return 0;
  53 }
  54
  55 static clib_error_t *
  56 ipsec_check_esp_support (ipsec_sa_t * sa)
  57 {
  58   if (sa->crypto_alg == IPSEC_CRYPTO_ALG_AES_GCM_128)
  59     return clib_error_return (0, "unsupported aes-gcm-128 crypto-alg");
  60   if (sa->crypto_alg == IPSEC_CRYPTO_ALG_AES_GCM_192)
  61     return clib_error_return (0, "unsupported aes-gcm-192 crypto-alg");
  62   if (sa->crypto_alg == IPSEC_CRYPTO_ALG_AES_GCM_256)
  63     return clib_error_return (0, "unsupported aes-gcm-256 crypto-alg");
  64
  65   return 0;
  66 }
  67
  68 clib_error_t *
  69 ipsec_add_del_sa_sess_cb (ipsec_main_t * im, u32 sa_index, u8 is_add)
  70 {
  71   ipsec_ah_backend_t *ah =
  72     pool_elt_at_index (im->ah_backends, im->ah_current_backend);
  73   if (ah->add_del_sa_sess_cb)
  74     {
  75       clib_error_t *err = ah->add_del_sa_sess_cb (sa_index, is_add);
  76       if (err)
  77         return err;
  78     }
  79   ipsec_esp_backend_t *esp =
  80     pool_elt_at_index (im->esp_backends, im->esp_current_backend);
  81   if (esp->add_del_sa_sess_cb)
  82     {
  83       clib_error_t *err = esp->add_del_sa_sess_cb (sa_index, is_add);
  84       if (err)
  85         return err;
  86     }
  87   return 0;
  88 }
  89
  90 clib_error_t *
  91 ipsec_check_support_cb (ipsec_main_t * im, ipsec_sa_t * sa)
  92 {
  93   clib_error_t *error = 0;
  94
  95   if (PREDICT_FALSE (sa->protocol == IPSEC_PROTOCOL_AH))
  96     {
  97       ipsec_ah_backend_t *ah =
  98         pool_elt_at_index (im->ah_backends, im->ah_current_backend);
  99       ASSERT (ah->check_support_cb);
 100       error = ah->check_support_cb (sa);
 101     }
 102   else
 103     {
 104       ipsec_esp_backend_t *esp =
 105         pool_elt_at_index (im->esp_backends, im->esp_current_backend);
 106       ASSERT (esp->check_support_cb);
 107       error = esp->check_support_cb (sa);
 108     }
 109   return error;
 110 }
 111
 112
 113 static void
 114 ipsec_add_node (vlib_main_t * vm, const char *node_name,
 115                 const char *prev_node_name, u32 * out_node_index,
 116                 u32 * out_next_index)
 117 {
 118   vlib_node_t *prev_node, *node;
 119   prev_node = vlib_get_node_by_name (vm, (u8 *) prev_node_name);
 120   ASSERT (prev_node);
 121   node = vlib_get_node_by_name (vm, (u8 *) node_name);
 122   ASSERT (node);
 123   *out_node_index = node->index;
 124   *out_next_index = vlib_node_add_next (vm, prev_node->index, node->index);
 125 }
 126
 127 u32
 128 ipsec_register_ah_backend (vlib_main_t * vm, ipsec_main_t * im,
 129                            const char *name,
 130                            const char *ah4_encrypt_node_name,
 131                            const char *ah4_decrypt_node_name,
 132                            const char *ah6_encrypt_node_name,
 133                            const char *ah6_decrypt_node_name,
 134                            check_support_cb_t ah_check_support_cb,
 135                            add_del_sa_sess_cb_t ah_add_del_sa_sess_cb)
 136 {
 137   ipsec_ah_backend_t *b;
 138   pool_get (im->ah_backends, b);
 139   b->name = format (NULL, "%s", name);
 140
 141   ipsec_add_node (vm, ah4_encrypt_node_name, "ipsec4-output-feature",
 142                   &b->ah4_encrypt_node_index, &b->ah4_encrypt_next_index);
 143   ipsec_add_node (vm, ah4_decrypt_node_name, "ipsec4-input-feature",
 144                   &b->ah4_decrypt_node_index, &b->ah4_decrypt_next_index);
 145   ipsec_add_node (vm, ah6_encrypt_node_name, "ipsec6-output-feature",
 146                   &b->ah6_encrypt_node_index, &b->ah6_encrypt_next_index);
 147   ipsec_add_node (vm, ah6_decrypt_node_name, "ipsec6-input-feature",
 148                   &b->ah6_decrypt_node_index, &b->ah6_decrypt_next_index);
 149
 150   b->check_support_cb = ah_check_support_cb;
 151   b->add_del_sa_sess_cb = ah_add_del_sa_sess_cb;
 152   return b - im->ah_backends;
 153 }
 154
 155 u32
 156 ipsec_register_esp_backend (vlib_main_t * vm, ipsec_main_t * im,
 157                             const char *name,
 158                             const char *esp4_encrypt_node_name,
 159                             const char *esp4_decrypt_node_name,
 160                             const char *esp6_encrypt_node_name,
 161                             const char *esp6_decrypt_node_name,
 162                             check_support_cb_t esp_check_support_cb,
 163                             add_del_sa_sess_cb_t esp_add_del_sa_sess_cb)
 164 {
 165   ipsec_esp_backend_t *b;
 166   pool_get (im->esp_backends, b);
 167   b->name = format (NULL, "%s", name);
 168
 169   ipsec_add_node (vm, esp4_encrypt_node_name, "ipsec4-output-feature",
 170                   &b->esp4_encrypt_node_index, &b->esp4_encrypt_next_index);
 171   ipsec_add_node (vm, esp4_decrypt_node_name, "ipsec4-input-feature",
 172                   &b->esp4_decrypt_node_index, &b->esp4_decrypt_next_index);
 173   ipsec_add_node (vm, esp6_encrypt_node_name, "ipsec6-output-feature",
 174                   &b->esp6_encrypt_node_index, &b->esp6_encrypt_next_index);
 175   ipsec_add_node (vm, esp6_decrypt_node_name, "ipsec6-input-feature",
 176                   &b->esp6_decrypt_node_index, &b->esp6_decrypt_next_index);
 177
 178   b->check_support_cb = esp_check_support_cb;
 179   b->add_del_sa_sess_cb = esp_add_del_sa_sess_cb;
 180   return b - im->esp_backends;
 181 }
 182
 183 static walk_rc_t
 184 ipsec_sa_restack (ipsec_sa_t * sa, void *ctx)
 185 {
 186   ipsec_sa_stack (sa);
 187
 188   return (WALK_CONTINUE);
 189 }
 190
 191 int
 192 ipsec_select_ah_backend (ipsec_main_t * im, u32 backend_idx)
 193 {
 194   if (pool_elts (im->sad) > 0
 195       || pool_is_free_index (im->ah_backends, backend_idx))
 196     {
 197       return -1;
 198     }
 199   ipsec_ah_backend_t *b = pool_elt_at_index (im->ah_backends, backend_idx);
 200   im->ah_current_backend = backend_idx;
 201   im->ah4_encrypt_node_index = b->ah4_encrypt_node_index;
 202   im->ah4_decrypt_node_index = b->ah4_decrypt_node_index;
 203   im->ah4_encrypt_next_index = b->ah4_encrypt_next_index;
 204   im->ah4_decrypt_next_index = b->ah4_decrypt_next_index;
 205   im->ah6_encrypt_node_index = b->ah6_encrypt_node_index;
 206   im->ah6_decrypt_node_index = b->ah6_decrypt_node_index;
 207   im->ah6_encrypt_next_index = b->ah6_encrypt_next_index;
 208   im->ah6_decrypt_next_index = b->ah6_decrypt_next_index;
 209
 210   ipsec_sa_walk (ipsec_sa_restack, NULL);
 211   return 0;
 212 }
 213
 214 int
 215 ipsec_select_esp_backend (ipsec_main_t * im, u32 backend_idx)
 216 {
 217   if (pool_elts (im->sad) > 0
 218       || pool_is_free_index (im->esp_backends, backend_idx))
 219     {
 220       return -1;
 221     }
 222   ipsec_esp_backend_t *b = pool_elt_at_index (im->esp_backends, backend_idx);
 223   im->esp_current_backend = backend_idx;
 224   im->esp4_encrypt_node_index = b->esp4_encrypt_node_index;
 225   im->esp4_decrypt_node_index = b->esp4_decrypt_node_index;
 226   im->esp4_encrypt_next_index = b->esp4_encrypt_next_index;
 227   im->esp4_decrypt_next_index = b->esp4_decrypt_next_index;
 228   im->esp6_encrypt_node_index = b->esp6_encrypt_node_index;
 229   im->esp6_decrypt_node_index = b->esp6_decrypt_node_index;
 230   im->esp6_encrypt_next_index = b->esp6_encrypt_next_index;
 231   im->esp6_decrypt_next_index = b->esp6_decrypt_next_index;
 232
 233   ipsec_sa_walk (ipsec_sa_restack, NULL);
 234   return 0;
 235 }
 236
 237 static clib_error_t *
 238 ipsec_init (vlib_main_t * vm)
 239 {
 240   clib_error_t *error;
 241   ipsec_main_t *im = &ipsec_main;
 242   vlib_thread_main_t *tm = vlib_get_thread_main ();
 243
 244   ipsec_rand_seed ();
 245
 246   clib_memset (im, 0, sizeof (im[0]));
 247
 248   im->vnet_main = vnet_get_main ();
 249   im->vlib_main = vm;
 250
 251   im->spd_index_by_spd_id = hash_create (0, sizeof (uword));
 252   im->sa_index_by_sa_id = hash_create (0, sizeof (uword));
 253   im->spd_index_by_sw_if_index = hash_create (0, sizeof (uword));
 254
 255   vec_validate_aligned (im->empty_buffers, tm->n_vlib_mains - 1,
 256                         CLIB_CACHE_LINE_BYTES);
 257
 258   vlib_node_t *node = vlib_get_node_by_name (vm, (u8 *) "error-drop");
 259   ASSERT (node);
 260   im->error_drop_node_index = node->index;
 261
 262   u32 idx = ipsec_register_ah_backend (vm, im, "default openssl backend",
 263                                        "ah4-encrypt",
 264                                        "ah4-decrypt",
 265                                        "ah6-encrypt",
 266                                        "ah6-decrypt",
 267                                        ipsec_check_ah_support,
 268                                        NULL);
 269
 270   im->ah_default_backend = idx;
 271   int rv = ipsec_select_ah_backend (im, idx);
 272   ASSERT (0 == rv);
 273   (void) (rv);                  // avoid warning
 274
 275   idx = ipsec_register_esp_backend (vm, im, "default openssl backend",
 276                                     "esp4-encrypt",
 277                                     "esp4-decrypt",
 278                                     "esp6-encrypt",
 279                                     "esp6-decrypt",
 280                                     ipsec_check_esp_support, NULL);
 281   im->esp_default_backend = idx;
 282
 283   rv = ipsec_select_esp_backend (im, idx);
 284   ASSERT (0 == rv);
 285   (void) (rv);                  // avoid warning
 286
 287   if ((error = vlib_call_init_function (vm, ipsec_cli_init)))
 288     return error;
 289
 290   if ((error = vlib_call_init_function (vm, ipsec_tunnel_if_init)))
 291     return error;
 292
 293   ipsec_proto_init ();
 294
 295   return 0;
 296 }
 297
 298 VLIB_INIT_FUNCTION (ipsec_init);
 299
 300 /*
 301  * fd.io coding-style-patch-verification: ON
 302  *
 303  * Local Variables:
 304  * eval: (c-set-style "gnu")
 305  * End:
 306  */