#include <plugins/ikev2/ikev2.h>
#include <plugins/ikev2/ikev2_priv.h>
#include <openssl/sha.h>
+#include <vnet/ipsec/ipsec_punt.h>
+
+#define IKEV2_LIVENESS_RETRIES 3
+#define IKEV2_LIVENESS_PERIOD_CHECK 30
ikev2_main_t ikev2_main;
IKEV2_N_NEXT,
} ikev2_next_t;
+typedef u32 ikev2_non_esp_marker;
+
+static_always_inline u16
+ikev2_get_port (ikev2_sa_t * sa)
+{
+ return sa->natt ? IKEV2_PORT_NATT : IKEV2_PORT;
+}
+
+static_always_inline int
+ikev2_insert_non_esp_marker (ike_header_t * ike, int len)
+{
+ memmove ((u8 *) ike + sizeof (ikev2_non_esp_marker), ike, len);
+ clib_memset (ike, 0, sizeof (ikev2_non_esp_marker));
+ return len + sizeof (ikev2_non_esp_marker);
+}
+
static ikev2_sa_transform_t *
ikev2_find_transform_data (ikev2_sa_transform_t * t)
{
ikev2_sa_transform_t *t = 0, *t2;
ikev2_main_t *km = &ikev2_main;
-
/*move some data to the new SA */
#define _(A) ({void* __tmp__ = (A); (A) = 0; __tmp__;})
sa->i_nonce = _(sai->i_nonce);
sa->i_auth.key = _(sai->i_auth.key);
sa->last_sa_init_req_packet_data = _(sai->last_sa_init_req_packet_data);
sa->childs = _(sai->childs);
+ sa->udp_encap = sai->udp_encap;
+ sa->ipsec_over_udp_port = sai->ipsec_over_udp_port;
+ sa->dst_port = sai->dst_port;
+ sa->sw_if_index = sai->sw_if_index;
#undef _
vec_free (keymat);
}
+static_always_inline u8 *
+ikev2_compute_nat_sha1 (u64 ispi, u64 rspi, u32 ip, u16 port)
+{
+ /* ispi, rspi, ip, port */
+ u8 buf[8 + 8 + 4 + 2];
+ u8 *res = vec_new (u8, 20);
+
+ clib_memcpy_fast (&buf[0], &ispi, sizeof (ispi));
+ clib_memcpy_fast (&buf[8], &rspi, sizeof (rspi));
+ clib_memcpy_fast (&buf[8 + 8], &ip, sizeof (ip));
+ clib_memcpy_fast (&buf[8 + 8 + 4], &port, sizeof (port));
+ SHA1 (buf, sizeof (buf), res);
+ return res;
+}
+
static void
ikev2_process_sa_init_req (vlib_main_t * vm, ikev2_sa_t * sa,
- ike_header_t * ike)
+ ike_header_t * ike, udp_header_t * udp)
{
int p = 0;
u32 len = clib_net_to_host_u32 (ike->length);
else if (payload == IKEV2_PAYLOAD_NOTIFY)
{
ikev2_notify_t *n = ikev2_parse_notify_payload (ikep);
+ if (n->msg_type == IKEV2_NOTIFY_MSG_NAT_DETECTION_SOURCE_IP)
+ {
+ u8 *src_sha =
+ ikev2_compute_nat_sha1 (clib_net_to_host_u64 (ike->ispi), 0,
+ clib_net_to_host_u32 (sa->
+ iaddr.as_u32),
+ udp->src_port);
+ if (clib_memcmp (src_sha, n->data, vec_len (src_sha)))
+ {
+ sa->natt = 1;
+ ikev2_elog_uint (IKEV2_LOG_DEBUG, "ispi %lx initiator"
+ " behind NAT", sa->ispi);
+ }
+ vec_free (src_sha);
+ }
+ else if (n->msg_type ==
+ IKEV2_NOTIFY_MSG_NAT_DETECTION_DESTINATION_IP)
+ {
+ u8 *dst_sha =
+ ikev2_compute_nat_sha1 (clib_net_to_host_u64 (ike->ispi), 0,
+ clib_net_to_host_u32 (sa->
+ raddr.as_u32),
+ udp->dst_port);
+ if (clib_memcmp (dst_sha, n->data, vec_len (dst_sha)))
+ {
+ sa->natt = 1;
+ ikev2_elog_uint (IKEV2_LOG_DEBUG, "ispi %lx responder"
+ " (self) behind NAT", sa->ispi);
+ }
+ vec_free (dst_sha);
+ }
vec_free (n);
}
else if (payload == IKEV2_PAYLOAD_VENDOR)
static void
ikev2_process_sa_init_resp (vlib_main_t * vm, ikev2_sa_t * sa,
- ike_header_t * ike)
+ ike_header_t * ike, udp_header_t * udp)
{
int p = 0;
u32 len = clib_net_to_host_u32 (ike->length);
else if (payload == IKEV2_PAYLOAD_NOTIFY)
{
ikev2_notify_t *n = ikev2_parse_notify_payload (ikep);
+ if (n->msg_type == IKEV2_NOTIFY_MSG_NAT_DETECTION_SOURCE_IP)
+ {
+ u8 *src_sha = ikev2_compute_nat_sha1 (ike->ispi,
+ ike->rspi,
+ clib_net_to_host_u32
+ (sa->raddr.as_u32),
+ udp->src_port);
+ if (clib_memcmp (src_sha, n->data, vec_len (src_sha)))
+ {
+ ikev2_elog_uint (IKEV2_LOG_DEBUG, "ispi %lx responder"
+ " behind NAT, unsupported", sa->ispi);
+ }
+ vec_free (src_sha);
+ }
+ else if (n->msg_type ==
+ IKEV2_NOTIFY_MSG_NAT_DETECTION_DESTINATION_IP)
+ {
+ u8 *dst_sha = ikev2_compute_nat_sha1 (ike->ispi,
+ ike->rspi,
+ sa->iaddr.as_u32,
+ udp->dst_port);
+ if (clib_memcmp (dst_sha, n->data, vec_len (dst_sha)))
+ {
+ sa->natt = 1;
+ ikev2_elog_uint (IKEV2_LOG_DEBUG, "ispi %lx initiator"
+ " (self) behind NAT", sa->ispi);
+ }
+ vec_free (dst_sha);
+ }
vec_free (n);
}
else if (payload == IKEV2_PAYLOAD_VENDOR)
tr_integ =
ikev2_sa_get_td_for_type (sa->r_proposals, IKEV2_TRANSFORM_TYPE_INTEG);
+ if (!sa->sk_ar || !sa->sk_ai)
+ return 0;
+
while (p < len &&
*payload != IKEV2_PAYLOAD_NONE && last_payload != IKEV2_PAYLOAD_SK)
{
ike_payload_header_t *ikep;
u32 plen;
+ sa->liveness_retries = 0;
ikev2_elog_exchange ("ispi %lx rspi %lx INFORMATIONAL received "
"from %d.%d.%d.%d", clib_host_to_net_u64 (ike->ispi),
clib_host_to_net_u64 (ike->rspi), sa->iaddr.as_u32);
if (ikep->flags & IKEV2_PAYLOAD_FLAG_CRITICAL)
{
sa->unsupported_cp = payload;
- return;
+ goto cleanup_and_exit;
}
}
}));
/* *INDENT-ON* */
+ if (sel_p)
+ {
+ sa->udp_encap = sel_p->udp_encap;
+ sa->ipsec_over_udp_port = sel_p->ipsec_over_udp_port;
+ }
vec_free (authmsg);
if (sa->state == IKEV2_STATE_AUTHENTICATED)
ikev2_sa_auth_init (ikev2_sa_t * sa)
{
ikev2_main_t *km = &ikev2_main;
- u8 *authmsg, *key_pad, *psk = 0, *auth = 0;
+ u8 *authmsg, *key_pad, *psk = 0;
ikev2_sa_transform_t *tr_prf;
tr_prf =
key_pad = format (0, "%s", IKEV2_KEY_PAD);
authmsg = ikev2_sa_generate_authmsg (sa, 0);
psk = ikev2_calc_prf (tr_prf, sa->i_auth.data, key_pad);
- auth = ikev2_calc_prf (tr_prf, psk, authmsg);
-
if (sa->i_auth.method == IKEV2_AUTH_METHOD_SHARED_KEY_MIC)
{
vec_free (psk);
vec_free (key_pad);
- vec_free (auth);
vec_free (authmsg);
}
ipsec_key_t loc_ckey, rem_ckey, loc_ikey, rem_ikey;
u8 is_rekey;
u32 old_remote_sa_id;
+ u16 ipsec_over_udp_port;
+ u16 src_port;
+ u16 dst_port;
} ikev2_add_ipsec_tunnel_args_t;
static void
IPSEC_PROTOCOL_ESP, a->encr_type,
&a->loc_ckey, a->integ_type, &a->loc_ikey,
a->flags, 0, a->salt_local, &a->local_ip,
- &a->remote_ip, NULL);
+ &a->remote_ip, NULL, a->src_port, a->dst_port);
rv |= ipsec_sa_add_and_lock (a->remote_sa_id, a->remote_spi,
IPSEC_PROTOCOL_ESP, a->encr_type, &a->rem_ckey,
a->integ_type, &a->rem_ikey,
(a->flags | IPSEC_SA_FLAG_IS_INBOUND), 0,
a->salt_remote, &a->remote_ip,
- &a->local_ip, NULL);
+ &a->local_ip, NULL, a->ipsec_over_udp_port,
+ a->ipsec_over_udp_port);
rv |= ipsec_tun_protect_update (sw_if_index, NULL, a->local_sa_id, sas_in);
}
static int
-ikev2_create_tunnel_interface (vnet_main_t * vnm,
+ikev2_create_tunnel_interface (vlib_main_t * vm,
u32 thread_index,
ikev2_sa_t * sa,
ikev2_child_sa_t * child, u32 sa_index,
}
a.flags = IPSEC_SA_FLAG_USE_ANTI_REPLAY;
+ if (sa->udp_encap)
+ {
+ a.flags |= IPSEC_SA_FLAG_IS_TUNNEL;
+ a.flags |= IPSEC_SA_FLAG_UDP_ENCAP;
+ }
+ if (sa->natt)
+ a.flags |= IPSEC_SA_FLAG_UDP_ENCAP;
a.is_rekey = is_rekey;
tr = ikev2_sa_get_td_for_type (proposals, IKEV2_TRANSFORM_TYPE_ESN);
a.salt_remote = child->salt_er;
a.salt_local = child->salt_ei;
}
+ a.dst_port = a.src_port = sa->ipsec_over_udp_port;
}
else
{
a.salt_remote = child->salt_ei;
a.salt_local = child->salt_er;
}
+ a.dst_port = sa->natt ? sa->dst_port : sa->ipsec_over_udp_port;
+ a.src_port = sa->ipsec_over_udp_port;
}
if (sa->is_profile_index_set)
if (p && p->lifetime)
{
- child->time_to_expiration =
- vlib_time_now (vnm->vlib_main) + p->lifetime;
+ child->time_to_expiration = vlib_time_now (vm) + p->lifetime;
if (p->lifetime_jitter)
{
// This is not much better than rand(3), which Coverity warns
// however fast. If this perturbance to the expiration time
// needs to use a better RNG then we may need to use something
// like /dev/urandom which has significant overhead.
- u32 rnd = (u32) (vlib_time_now (vnm->vlib_main) * 1e6);
+ u32 rnd = (u32) (vlib_time_now (vm) * 1e6);
rnd = random_u32 (&rnd);
child->time_to_expiration += 1 + (rnd % p->lifetime_jitter);
child->remote_sa_id = a.remote_sa_id = remote_sa_id;
a.sw_if_index = (sa->is_tun_itf_set ? sa->tun_itf : ~0);
+ a.ipsec_over_udp_port = sa->ipsec_over_udp_port;
vl_api_rpc_call_main_thread (ikev2_add_tunnel_from_main,
(u8 *) & a, sizeof (a));
}
static u32
-ikev2_generate_message (ikev2_sa_t * sa, ike_header_t * ike, void *user)
+ikev2_generate_message (ikev2_sa_t * sa, ike_header_t * ike, void *user,
+ udp_header_t * udp)
{
v8 *integ = 0;
ike_payload_header_t *ph;
}
else
{
+ ASSERT (udp);
+
ike->rspi = clib_host_to_net_u64 (sa->rspi);
ikev2_payload_add_sa (chain, sa->r_proposals);
ikev2_payload_add_ke (chain, sa->dh_group, sa->r_dh_data);
ikev2_payload_add_nonce (chain, sa->r_nonce);
+
+ u8 *nat_detection_sha1 =
+ ikev2_compute_nat_sha1 (clib_host_to_net_u64 (sa->ispi),
+ clib_host_to_net_u64 (sa->rspi),
+ clib_host_to_net_u32 (sa->raddr.as_u32),
+ udp->dst_port);
+ ikev2_payload_add_notify (chain,
+ IKEV2_NOTIFY_MSG_NAT_DETECTION_SOURCE_IP,
+ nat_detection_sha1);
+ vec_free (nat_detection_sha1);
+ nat_detection_sha1 =
+ ikev2_compute_nat_sha1 (clib_host_to_net_u64 (sa->ispi),
+ clib_host_to_net_u64 (sa->rspi),
+ sa->iaddr.as_u32, udp->src_port);
+ ikev2_payload_add_notify (chain,
+ IKEV2_NOTIFY_MSG_NAT_DETECTION_DESTINATION_IP,
+ nat_detection_sha1);
+ vec_free (nat_detection_sha1);
}
}
else if (ike->exchange == IKEV2_EXCHANGE_IKE_AUTH)
}
else
{
- if (sa->rekey)
+ if (vec_len (sa->rekey) > 0)
{
ikev2_payload_add_sa (chain, sa->rekey[0].r_proposal);
ikev2_payload_add_nonce (chain, sa->r_nonce);
return -1;
}
+static void
+ikev2_init_sa (vlib_main_t * vm, ikev2_sa_t * sa)
+{
+ ikev2_main_t *km = &ikev2_main;
+ sa->liveness_period_check = vlib_time_now (vm) + km->liveness_period;
+}
+
+static void
+ikev2_del_sa_init_from_main (u64 * ispi)
+{
+ ikev2_main_t *km = &ikev2_main;
+ uword *p = hash_get (km->sa_by_ispi, *ispi);
+ if (p)
+ {
+ ikev2_sa_t *sai = pool_elt_at_index (km->sais, p[0]);
+ hash_unset (km->sa_by_ispi, sai->ispi);
+ ikev2_sa_free_all_vec (sai);
+ pool_put (km->sais, sai);
+ }
+}
+
+static void
+ikev2_del_sa_init (u64 ispi)
+{
+ vl_api_rpc_call_main_thread (ikev2_del_sa_init_from_main, (u8 *) & ispi,
+ sizeof (ispi));
+}
static uword
ikev2_node_fn (vlib_main_t * vm,
ikev2_sa_t *sa0 = 0;
ikev2_sa_t sa; /* temporary store for SA */
int len = 0;
- int r;
+ int r, is_req = 0, has_non_esp_marker = 0;
/* speculatively enqueue b0 to the current next frame */
bi0 = from[0];
n_left_to_next -= 1;
b0 = vlib_get_buffer (vm, bi0);
- ike0 = vlib_buffer_get_current (b0);
- vlib_buffer_advance (b0, -sizeof (*udp0));
- udp0 = vlib_buffer_get_current (b0);
- vlib_buffer_advance (b0, -sizeof (*ip40));
- ip40 = vlib_buffer_get_current (b0);
+
+ if (b0->punt_reason == ipsec_punt_reason[IPSEC_PUNT_IP4_SPI_UDP_0])
+ {
+ u8 *ptr = vlib_buffer_get_current (b0);
+ ip40 = (ip4_header_t *) ptr;
+ ptr += sizeof (*ip40);
+ udp0 = (udp_header_t *) ptr;
+ ptr += sizeof (*udp0);
+ ike0 = (ike_header_t *) ptr;
+ }
+ else
+ {
+ ike0 = vlib_buffer_get_current (b0);
+ vlib_buffer_advance (b0, -sizeof (*udp0));
+ udp0 = vlib_buffer_get_current (b0);
+ vlib_buffer_advance (b0, -sizeof (*ip40));
+ ip40 = vlib_buffer_get_current (b0);
+ }
+
+ /* check for non-esp marker */
+ if (*((u32 *) ike0) == 0)
+ {
+ ike0 = (ike_header_t *) ((u8 *) ike0 + sizeof (u32));
+ has_non_esp_marker = 1;
+ }
if (ike0->version != IKE_VERSION_2)
{
{
sa0->raddr.as_u32 = ip40->dst_address.as_u32;
sa0->iaddr.as_u32 = ip40->src_address.as_u32;
+ sa0->dst_port = clib_net_to_host_u16 (udp0->src_port);
r = ikev2_retransmit_sa_init (ike0, sa0->iaddr,
sa0->raddr);
goto dispatch0;
}
- ikev2_process_sa_init_req (vm, sa0, ike0);
+ ikev2_process_sa_init_req (vm, sa0, ike0, udp0);
if (sa0->state == IKEV2_STATE_SA_INIT)
{
if (sa0->state == IKEV2_STATE_SA_INIT
|| sa0->state == IKEV2_STATE_NOTIFY_AND_DELETE)
{
- len = ikev2_generate_message (sa0, ike0, 0);
+ len = ikev2_generate_message (sa0, ike0, 0, udp0);
}
if (sa0->state == IKEV2_STATE_SA_INIT)
pool_get (km->per_thread_data[thread_index].sas,
sa0);
clib_memcpy_fast (sa0, &sa, sizeof (*sa0));
+ ikev2_init_sa (vm, sa0);
hash_set (km->
per_thread_data[thread_index].sa_by_rspi,
sa0->rspi,
}
else //received sa_init without initiator flag
{
- ikev2_process_sa_init_resp (vm, sa0, ike0);
+ sa0->raddr.as_u32 = ip40->src_address.as_u32;
+ sa0->iaddr.as_u32 = ip40->dst_address.as_u32;
+ ikev2_process_sa_init_resp (vm, sa0, ike0, udp0);
if (sa0->state == IKEV2_STATE_SA_INIT)
{
+ is_req = 1;
ike0->exchange = IKEV2_EXCHANGE_IKE_AUTH;
uword *p = hash_get (km->sa_by_ispi, ike0->ispi);
if (p)
ikev2_sa_t *sai =
pool_elt_at_index (km->sais, p[0]);
- ikev2_complete_sa_data (sa0, sai);
- ikev2_calc_keys (sa0);
- ikev2_sa_auth_init (sa0);
- len = ikev2_generate_message (sa0, ike0, 0);
+ if (clib_atomic_bool_cmp_and_swap
+ (&sai->init_response_received, 0, 1))
+ {
+ ikev2_complete_sa_data (sa0, sai);
+ ikev2_calc_keys (sa0);
+ ikev2_sa_auth_init (sa0);
+ len =
+ ikev2_generate_message (sa0, ike0, 0, udp0);
+ }
+ else
+ {
+ /* we've already processed sa-init response */
+ sa0->state = IKEV2_STATE_UNKNOWN;
+ }
}
}
goto dispatch0;
}
+ sa0->dst_port = clib_net_to_host_u16 (udp0->src_port);
ikev2_process_auth_req (vm, sa0, ike0);
ikev2_sa_auth (sa0);
if (sa0->state == IKEV2_STATE_AUTHENTICATED)
ikev2_initial_contact_cleanup (sa0);
ikev2_sa_match_ts (sa0);
if (sa0->state != IKEV2_STATE_TS_UNACCEPTABLE)
- ikev2_create_tunnel_interface (km->vnet_main,
- thread_index, sa0,
+ ikev2_create_tunnel_interface (vm, thread_index, sa0,
&sa0->childs[0],
p[0], 0, 0);
}
if (sa0->is_initiator)
{
- uword *p = hash_get (km->sa_by_ispi, ike0->ispi);
- if (p)
- {
- ikev2_sa_t *sai =
- pool_elt_at_index (km->sais, p[0]);
- hash_unset (km->sa_by_ispi, sai->ispi);
- ikev2_sa_free_all_vec (sai);
- pool_put (km->sais, sai);
- }
+ ikev2_del_sa_init (ike0->ispi);
}
else
{
- len = ikev2_generate_message (sa0, ike0, 0);
+ len = ikev2_generate_message (sa0, ike0, 0, udp0);
}
}
}
}
}
}
- if (!sa0->is_initiator)
+ if (!(ike0->flags & IKEV2_HDR_FLAG_RESPONSE))
{
- len = ikev2_generate_message (sa0, ike0, 0);
+ ike0->flags |= IKEV2_HDR_FLAG_RESPONSE;
+ len = ikev2_generate_message (sa0, ike0, 0, udp0);
}
}
}
if (sa0->rekey[0].protocol_id != IKEV2_PROTOCOL_IKE)
{
if (sa0->childs)
- vec_free (sa0->childs);
+ ikev2_sa_free_all_child_sa (&sa0->childs);
ikev2_child_sa_t *child;
vec_add2 (sa0->childs, child, 1);
+ clib_memset (child, 0, sizeof (*child));
child->r_proposals = sa0->rekey[0].r_proposal;
child->i_proposals = sa0->rekey[0].i_proposal;
child->tsi = sa0->rekey[0].tsi;
child->tsr = sa0->rekey[0].tsr;
- ikev2_create_tunnel_interface (km->vnet_main,
- thread_index, sa0,
- child, p[0],
+ ikev2_create_tunnel_interface (vm, thread_index,
+ sa0, child, p[0],
child - sa0->childs,
1);
}
if (sa0->is_initiator)
{
- vec_del1 (sa0->rekey, 0);
+ vec_free (sa0->rekey);
}
else
{
- len = ikev2_generate_message (sa0, ike0, 0);
+ len = ikev2_generate_message (sa0, ike0, 0, udp0);
}
}
}
ip40->dst_address.as_u32 = sa0->iaddr.as_u32;
ip40->src_address.as_u32 = sa0->raddr.as_u32;
}
+
+ if (is_req)
+ {
+ udp0->dst_port = udp0->src_port =
+ clib_net_to_host_u16 (ikev2_get_port (sa0));
+
+ if (udp0->dst_port == clib_net_to_host_u16 (IKEV2_PORT_NATT)
+ && sa0->natt)
+ {
+ if (!has_non_esp_marker)
+ len = ikev2_insert_non_esp_marker (ike0, len);
+ }
+ }
+ else
+ {
+ if (has_non_esp_marker)
+ len += sizeof (ikev2_non_esp_marker);
+
+ u16 tp = udp0->dst_port;
+ udp0->dst_port = udp0->src_port;
+ udp0->src_port = tp;
+ }
+
udp0->length =
clib_host_to_net_u16 (len + sizeof (udp_header_t));
udp0->checksum = 0;
return r;
}
- /* Integrity */
- error = 1;
- vec_foreach (td, km->supported_transforms)
- {
- if (td->type == IKEV2_TRANSFORM_TYPE_INTEG
- && td->integ_type == ts->integ_alg)
+ if (is_ike || IKEV2_TRANSFORM_ENCR_TYPE_AES_GCM_16 != ts->crypto_alg)
+ {
+ /* Integrity */
+ error = 1;
+ vec_foreach (td, km->supported_transforms)
{
- vec_add1 (proposal->transforms, *td);
- error = 0;
- break;
+ if (td->type == IKEV2_TRANSFORM_TYPE_INTEG
+ && td->integ_type == ts->integ_alg)
+ {
+ vec_add1 (proposal->transforms, *td);
+ error = 0;
+ break;
+ }
}
- }
- if (error)
- {
- ikev2_elog_error
- ("Didn't find any supported algorithm for IKEV2_TRANSFORM_TYPE_INTEG");
- r = clib_error_return (0, "Unsupported algorithm");
- return r;
+ if (error)
+ {
+ ikev2_elog_error
+ ("Didn't find any supported algorithm for IKEV2_TRANSFORM_TYPE_INTEG");
+ r = clib_error_return (0, "Unsupported algorithm");
+ return r;
+ }
}
/* PRF */
static void
ikev2_send_ike (vlib_main_t * vm, ip4_address_t * src, ip4_address_t * dst,
- u32 bi0, u32 len)
+ u32 bi0, u32 len, u16 src_port, u16 dst_port, u32 sw_if_index)
{
ip4_header_t *ip40;
udp_header_t *udp0;
ip40->protocol = IP_PROTOCOL_UDP;
ip40->dst_address.as_u32 = dst->as_u32;
ip40->src_address.as_u32 = src->as_u32;
- udp0->dst_port = clib_host_to_net_u16 (500);
- udp0->src_port = clib_host_to_net_u16 (500);
+ udp0->dst_port = clib_host_to_net_u16 (dst_port);
+ udp0->src_port = clib_host_to_net_u16 (src_port);
udp0->length = clib_host_to_net_u16 (len + sizeof (udp_header_t));
udp0->checksum = 0;
b0->current_length = len + sizeof (ip4_header_t) + sizeof (udp_header_t);
ip40->length = clib_host_to_net_u16 (b0->current_length);
ip40->checksum = ip4_header_checksum (ip40);
+ vnet_buffer (b0)->sw_if_index[VLIB_RX] = sw_if_index;
+ vnet_buffer (b0)->sw_if_index[VLIB_TX] = ~0;
/* send the request */
f = vlib_get_frame_to_node (vm, ip4_lookup_node.index);
return 0;
}
+static_always_inline vnet_api_error_t
+ikev2_register_udp_port (ikev2_profile_t * p, u16 port)
+{
+ ikev2_main_t *km = &ikev2_main;
+ udp_dst_port_info_t *pi;
+
+ uword *v = hash_get (km->udp_ports, port);
+ pi = udp_get_dst_port_info (&udp_main, port, UDP_IP4);
+
+ if (v)
+ {
+ /* IKE already uses this port, only increment reference counter */
+ ASSERT (pi);
+ v[0]++;
+ }
+ else
+ {
+ if (pi)
+ return VNET_API_ERROR_UDP_PORT_TAKEN;
+
+ udp_register_dst_port (km->vlib_main, port,
+ ipsec4_tun_input_node.index, 1);
+ hash_set (km->udp_ports, port, 1);
+ }
+ p->ipsec_over_udp_port = port;
+ return 0;
+}
+
+static_always_inline void
+ikev2_unregister_udp_port (ikev2_profile_t * p)
+{
+ ikev2_main_t *km = &ikev2_main;
+ uword *v;
+
+ if (p->ipsec_over_udp_port == IPSEC_UDP_PORT_NONE)
+ return;
+
+ v = hash_get (km->udp_ports, p->ipsec_over_udp_port);
+ if (!v)
+ return;
+
+ v[0]--;
+
+ if (v[0] == 0)
+ {
+ udp_unregister_dst_port (km->vlib_main, p->ipsec_over_udp_port, 1);
+ hash_unset (km->udp_ports, p->ipsec_over_udp_port);
+ }
+
+ p->ipsec_over_udp_port = IPSEC_UDP_PORT_NONE;
+}
+
clib_error_t *
ikev2_add_del_profile (vlib_main_t * vm, u8 * name, int is_add)
{
pool_get (km->profiles, p);
clib_memset (p, 0, sizeof (*p));
p->name = vec_dup (name);
+ p->ipsec_over_udp_port = IPSEC_UDP_PORT_NONE;
p->responder.sw_if_index = ~0;
p->tun_itf = ~0;
uword index = p - km->profiles;
if (!p)
return clib_error_return (0, "policy %v does not exists", name);
+ ikev2_unregister_udp_port (p);
+
vec_free (p->name);
pool_put (km->profiles, p);
mhash_unset (&km->profile_index_by_name, name, 0);
return 0;
}
+vnet_api_error_t
+ikev2_set_profile_ipsec_udp_port (vlib_main_t * vm, u8 * name, u16 port,
+ u8 is_set)
+{
+ ikev2_profile_t *p = ikev2_profile_index_by_name (name);
+ ikev2_main_t *km = &ikev2_main;
+ vnet_api_error_t rv = 0;
+ uword *v;
+
+ if (!p)
+ return VNET_API_ERROR_INVALID_VALUE;
+
+ if (is_set)
+ {
+ if (p->ipsec_over_udp_port != IPSEC_UDP_PORT_NONE)
+ return VNET_API_ERROR_VALUE_EXIST;
+
+ rv = ikev2_register_udp_port (p, port);
+ }
+ else
+ {
+ v = hash_get (km->udp_ports, port);
+ if (!v)
+ return VNET_API_ERROR_IKE_NO_PORT;
+
+ if (p->ipsec_over_udp_port == IPSEC_UDP_PORT_NONE)
+ return VNET_API_ERROR_INVALID_VALUE;
+
+ ikev2_unregister_udp_port (p);
+ }
+ return rv;
+}
+
+clib_error_t *
+ikev2_set_profile_udp_encap (vlib_main_t * vm, u8 * name)
+{
+ ikev2_profile_t *p = ikev2_profile_index_by_name (name);
+ clib_error_t *r;
+
+ if (!p)
+ {
+ r = clib_error_return (0, "unknown profile %v", name);
+ return r;
+ }
+
+ p->udp_encap = 1;
+ return 0;
+}
+
clib_error_t *
ikev2_set_profile_sa_lifetime (vlib_main_t * vm, u8 * name,
u64 lifetime, u32 jitter, u32 handover,
ikev2_sa_free_proposal_vector (&proposals);
sa.is_initiator = 1;
- sa.profile_index = km->profiles - p;
+ sa.profile_index = p - km->profiles;
sa.is_profile_index_set = 1;
sa.state = IKEV2_STATE_SA_INIT;
sa.tun_itf = p->tun_itf;
+ sa.udp_encap = p->udp_encap;
+ sa.ipsec_over_udp_port = p->ipsec_over_udp_port;
sa.is_tun_itf_set = 1;
sa.initial_contact = 1;
+ sa.dst_port = IKEV2_PORT;
ikev2_generate_sa_init_data (&sa);
ikev2_payload_add_ke (chain, sa.dh_group, sa.i_dh_data);
ikev2_payload_add_nonce (chain, sa.i_nonce);
RAND_bytes ((u8 *) & sa.childs[0].i_proposals[0].spi,
sizeof (sa.childs[0].i_proposals[0].spi));
-
-
/* Add NAT detection notification messages (mandatory) */
- u8 nat_detection_source[8 + 8 + 4 + 2];
- u8 *nat_detection_sha1 = vec_new (u8, 20);
-
- u64 tmpspi = clib_host_to_net_u64 (sa.ispi);
- clib_memcpy_fast (&nat_detection_source[0], &tmpspi, sizeof (tmpspi));
- tmpspi = clib_host_to_net_u64 (sa.rspi);
- clib_memcpy_fast (&nat_detection_source[8], &tmpspi, sizeof (tmpspi));
- u16 tmpport = clib_host_to_net_u16 (500);
- clib_memcpy_fast (&nat_detection_source[8 + 8 + 4], &tmpport,
- sizeof (tmpport));
- u32 tmpip = clib_host_to_net_u32 (if_ip->as_u32);
- clib_memcpy_fast (&nat_detection_source[8 + 8], &tmpip, sizeof (tmpip));
- SHA1 (nat_detection_source, sizeof (nat_detection_source),
- nat_detection_sha1);
+ u8 *nat_detection_sha1 =
+ ikev2_compute_nat_sha1 (clib_host_to_net_u64 (sa.ispi),
+ clib_host_to_net_u64 (sa.rspi),
+ clib_host_to_net_u32 (if_ip->as_u32),
+ clib_host_to_net_u16 (IKEV2_PORT));
+
ikev2_payload_add_notify (chain, IKEV2_NOTIFY_MSG_NAT_DETECTION_SOURCE_IP,
nat_detection_sha1);
- tmpip = clib_host_to_net_u32 (p->responder.ip4.as_u32);
- clib_memcpy_fast (&nat_detection_source[8 + 8], &tmpip, sizeof (tmpip));
- SHA1 (nat_detection_source, sizeof (nat_detection_source),
- nat_detection_sha1);
+ vec_free (nat_detection_sha1);
+ nat_detection_sha1 =
+ ikev2_compute_nat_sha1 (clib_host_to_net_u64 (sa.ispi),
+ clib_host_to_net_u64 (sa.rspi),
+ clib_host_to_net_u32 (p->responder.ip4.as_u32),
+ clib_host_to_net_u16 (sa.dst_port));
ikev2_payload_add_notify (chain,
IKEV2_NOTIFY_MSG_NAT_DETECTION_DESTINATION_IP,
nat_detection_sha1);
sa.i_auth.method = p->auth.method;
sa.i_auth.hex = p->auth.hex;
sa.i_auth.data = vec_dup (p->auth.data);
+ sa.sw_if_index = p->responder.sw_if_index;
vec_add (sa.childs[0].tsi, &p->loc_ts, 1);
vec_add (sa.childs[0].tsr, &p->rem_ts, 1);
clib_memcpy_fast (sa0, &sa, sizeof (*sa0));
hash_set (km->sa_by_ispi, sa0->ispi, sa0 - km->sais);
- ikev2_send_ike (vm, if_ip, &p->responder.ip4, bi0, len);
+ ikev2_send_ike (vm, if_ip, &p->responder.ip4, bi0, len,
+ IKEV2_PORT, sa.dst_port, sa.sw_if_index);
ikev2_elog_exchange ("ispi %lx rspi %lx IKEV2_EXCHANGE_SA_INIT sent to "
"%d.%d.%d.%d", clib_host_to_net_u64 (sa0->ispi), 0,
sa->del->spi = csa->i_proposals->spi;
ike0->msgid = clib_host_to_net_u32 (sa->last_init_msg_id + 1);
sa->last_init_msg_id = clib_net_to_host_u32 (ike0->msgid);
- len = ikev2_generate_message (sa, ike0, 0);
-
- ikev2_send_ike (vm, &sa->iaddr, &sa->raddr, bi0, len);
+ len = ikev2_generate_message (sa, ike0, 0, 0);
+ if (sa->natt)
+ len = ikev2_insert_non_esp_marker (ike0, len);
+ ikev2_send_ike (vm, &sa->iaddr, &sa->raddr, bi0, len,
+ ikev2_get_port (sa), sa->dst_port, sa->sw_if_index);
/* delete local child SA */
ikev2_delete_tunnel_interface (km->vnet_main, sa, csa);
fsa->del->spi = ispi;
ike0->msgid = clib_host_to_net_u32 (fsa->last_init_msg_id + 1);
fsa->last_init_msg_id = clib_net_to_host_u32 (ike0->msgid);
- len = ikev2_generate_message (fsa, ike0, 0);
-
- ikev2_send_ike (vm, &fsa->iaddr, &fsa->raddr, bi0, len);
+ len = ikev2_generate_message (fsa, ike0, 0, 0);
+ if (fsa->natt)
+ len = ikev2_insert_non_esp_marker (ike0, len);
+ ikev2_send_ike (vm, &fsa->iaddr, &fsa->raddr, bi0, len,
+ ikev2_get_port (fsa), fsa->dst_port, fsa->sw_if_index);
}
RAND_bytes ((u8 *) & proposals[0].spi, sizeof (proposals[0].spi));
rekey->spi = proposals[0].spi;
rekey->ispi = csa->i_proposals->spi;
- len = ikev2_generate_message (sa, ike0, proposals);
- ikev2_send_ike (vm, &sa->iaddr, &sa->raddr, bi0, len);
+ len = ikev2_generate_message (sa, ike0, proposals, 0);
+ if (sa->natt)
+ len = ikev2_insert_non_esp_marker (ike0, len);
+ ikev2_send_ike (vm, &sa->iaddr, &sa->raddr, bi0, len,
+ ikev2_get_port (sa), ikev2_get_port (sa), sa->sw_if_index);
vec_free (proposals);
}
km->vnet_main = vnet_get_main ();
km->vlib_main = vm;
+ km->liveness_period = IKEV2_LIVENESS_PERIOD_CHECK;
+ km->liveness_max_retries = IKEV2_LIVENESS_RETRIES;
ikev2_crypto_init (km);
mhash_init_vec_string (&km->profile_index_by_name, sizeof (uword));
- vec_validate (km->per_thread_data, tm->n_vlib_mains - 1);
+ vec_validate_aligned (km->per_thread_data, tm->n_vlib_mains - 1,
+ CLIB_CACHE_LINE_BYTES);
for (thread_id = 0; thread_id < tm->n_vlib_mains - 1; thread_id++)
{
km->per_thread_data[thread_id].sa_by_rspi =
km->sa_by_ispi = hash_create (0, sizeof (uword));
km->sw_if_indices = hash_create (0, 0);
+ km->udp_ports = hash_create (0, sizeof (uword));
- udp_register_dst_port (vm, 500, ikev2_node.index, 1);
+ udp_register_dst_port (vm, IKEV2_PORT, ikev2_node.index, 1);
+ udp_register_dst_port (vm, IKEV2_PORT_NATT, ikev2_node.index, 1);
+ vlib_punt_hdl_t punt_hdl = vlib_punt_client_register ("ikev2");
+ vlib_punt_register (punt_hdl, ipsec_punt_reason[IPSEC_PUNT_IP4_SPI_UDP_0],
+ "ikev2");
ikev2_cli_reference ();
km->log_level = IKEV2_LOG_ERROR;
/* *INDENT-OFF* */
VLIB_INIT_FUNCTION (ikev2_init) =
{
- .runs_after = VLIB_INITS("ipsec_init"),
+ .runs_after = VLIB_INITS("ipsec_init", "ipsec_punt_init"),
};
/* *INDENT-ON* */
return 0;
}
+clib_error_t *
+ikev2_set_liveness_params (u32 period, u32 max_retries)
+{
+ ikev2_main_t *km = &ikev2_main;
+
+ if (period == 0 || max_retries == 0)
+ return clib_error_return (0, "invalid args");
+
+ km->liveness_period = period;
+ km->liveness_max_retries = max_retries;
+ return 0;
+}
+
static void
ikev2_mngr_process_ipsec_sa (ipsec_sa_t * ipsec_sa)
{
hash_foreach (ispi, sai, km->sa_by_ispi,
({
sa = pool_elt_at_index (km->sais, sai);
+ if (sa->init_response_received)
+ continue;
+
u32 bi0;
if (vlib_buffer_alloc (km->vlib_main, &bi0, 1) != 1)
return;
sa->last_sa_init_req_packet_data,
vec_len (sa->last_sa_init_req_packet_data));
ikev2_send_ike (km->vlib_main, &sa->iaddr, &sa->raddr, bi0,
- vec_len (sa->last_sa_init_req_packet_data));
+ vec_len (sa->last_sa_init_req_packet_data),
+ ikev2_get_port (sa), IKEV2_PORT, sa->sw_if_index);
}));
/* *INDENT-ON* */
}
static vlib_node_registration_t ikev2_mngr_process_node;
+static void
+ikev2_send_informational_request (ikev2_sa_t * sa)
+{
+ ikev2_main_t *km = &ikev2_main;
+ ip4_address_t *src, *dst;
+ ike_header_t *ike0;
+ u32 bi0 = 0;
+ u16 dp;
+ int len;
+
+ bi0 = ikev2_get_new_ike_header_buff (km->vlib_main, &ike0);
+
+ ike0->exchange = IKEV2_EXCHANGE_INFORMATIONAL;
+ ike0->ispi = clib_host_to_net_u64 (sa->ispi);
+ ike0->rspi = clib_host_to_net_u64 (sa->rspi);
+ ike0->msgid = clib_host_to_net_u32 (sa->last_init_msg_id + 1);
+ sa->last_init_msg_id = clib_net_to_host_u32 (ike0->msgid);
+ len = ikev2_generate_message (sa, ike0, 0, 0);
+ if (sa->natt)
+ len = ikev2_insert_non_esp_marker (ike0, len);
+
+ if (sa->is_initiator)
+ {
+ src = &sa->iaddr;
+ dst = &sa->raddr;
+ }
+ else
+ {
+ dst = &sa->iaddr;
+ src = &sa->raddr;
+ }
+
+ dp = sa->dst_port ? sa->dst_port : ikev2_get_port (sa);
+ ikev2_send_ike (km->vlib_main, src, dst, bi0, len, ikev2_get_port (sa), dp,
+ sa->sw_if_index);
+}
+
+static_always_inline int
+ikev2_mngr_process_responder_sas (ikev2_sa_t * sa)
+{
+ ikev2_main_t *km = &ikev2_main;
+ vlib_main_t *vm = km->vlib_main;
+
+ if (!sa->sk_ai || !sa->sk_ar)
+ return 0;
+
+ if (sa->liveness_retries >= km->liveness_max_retries)
+ return 1;
+
+ f64 now = vlib_time_now (vm);
+
+ if (sa->liveness_period_check < now)
+ {
+ sa->liveness_retries++;
+ sa->liveness_period_check = now + km->liveness_period;
+ ikev2_send_informational_request (sa);
+ }
+ return 0;
+}
+
static uword
ikev2_mngr_process_fn (vlib_main_t * vm, vlib_node_runtime_t * rt,
vlib_frame_t * f)
{
ikev2_main_t *km = &ikev2_main;
ipsec_main_t *im = &ipsec_main;
+ ikev2_profile_t *p;
+ ikev2_child_sa_t *c;
+ u32 *sai;
while (1)
{
vec_foreach (tkm, km->per_thread_data)
{
ikev2_sa_t *sa;
+ u32 *to_be_deleted = 0;
+
/* *INDENT-OFF* */
pool_foreach (sa, tkm->sas, ({
ikev2_child_sa_t *c;
{
req_sent |= ikev2_mngr_process_child_sa(sa, c, del_old_ids);
}
+
+ if (ikev2_mngr_process_responder_sas (sa))
+ vec_add1 (to_be_deleted, sa - tkm->sas);
}));
/* *INDENT-ON* */
+
+ vec_foreach (sai, to_be_deleted)
+ {
+ sa = pool_elt_at_index (tkm->sas, sai[0]);
+ u8 reinitiate = (sa->is_initiator && sa->is_profile_index_set);
+ vec_foreach (c, sa->childs)
+ {
+ ikev2_delete_tunnel_interface (km->vnet_main, sa, c);
+ ikev2_sa_del_child_sa (sa, c);
+ }
+ ikev2_sa_free_all_vec (sa);
+ hash_unset (tkm->sa_by_rspi, sa->rspi);
+ pool_put (tkm->sas, sa);
+
+ if (reinitiate)
+ {
+ p = pool_elt_at_index (km->profiles, sa->profile_index);
+ if (p)
+ {
+ ikev2_initiate_sa_init (vm, p->name);
+ }
+ }
+ }
+ vec_free (to_be_deleted);
}
/* process ipsec sas */