blob: 2c1efa2f4bed0dd9e42c0dc6c8c62c4d2e070f20 [file] [log] [blame]
/*
* esp_decrypt.c : IPSec ESP decrypt node
*
* Copyright (c) 2015 Cisco and/or its affiliates.
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at:
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
#include <vnet/vnet.h>
#include <vnet/api_errno.h>
#include <vnet/ip/ip.h>
#include <vnet/l2/l2_input.h>
#include <vnet/ipsec/ipsec.h>
#include <vnet/ipsec/esp.h>
#include <vnet/ipsec/ipsec_io.h>
#include <vnet/ipsec/ipsec_tun.h>
#include <vnet/gre/packet.h>
#define foreach_esp_decrypt_next \
_ (DROP, "error-drop") \
_ (IP4_INPUT, "ip4-input-no-checksum") \
_ (IP6_INPUT, "ip6-input") \
_ (L2_INPUT, "l2-input") \
_ (MPLS_INPUT, "mpls-input") \
_ (HANDOFF, "handoff")
#define _(v, s) ESP_DECRYPT_NEXT_##v,
typedef enum
{
foreach_esp_decrypt_next
#undef _
ESP_DECRYPT_N_NEXT,
} esp_decrypt_next_t;
#define foreach_esp_decrypt_post_next \
_ (DROP, "error-drop") \
_ (IP4_INPUT, "ip4-input-no-checksum") \
_ (IP6_INPUT, "ip6-input") \
_ (MPLS_INPUT, "mpls-input") \
_ (L2_INPUT, "l2-input")
#define _(v, s) ESP_DECRYPT_POST_NEXT_##v,
typedef enum
{
foreach_esp_decrypt_post_next
#undef _
ESP_DECRYPT_POST_N_NEXT,
} esp_decrypt_post_next_t;
typedef struct
{
u32 seq;
u32 sa_seq;
u32 sa_seq_hi;
u32 pkt_seq_hi;
ipsec_crypto_alg_t crypto_alg;
ipsec_integ_alg_t integ_alg;
} esp_decrypt_trace_t;
typedef vl_counter_esp_decrypt_enum_t esp_decrypt_error_t;
/* The number of byres in the hisequence number */
#define N_HI_ESN_BYTES 4
/* packet trace format function */
static u8 *
format_esp_decrypt_trace (u8 * s, va_list * args)
{
CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
esp_decrypt_trace_t *t = va_arg (*args, esp_decrypt_trace_t *);
s = format (s,
"esp: crypto %U integrity %U pkt-seq %d sa-seq %u sa-seq-hi %u "
"pkt-seq-hi %u",
format_ipsec_crypto_alg, t->crypto_alg, format_ipsec_integ_alg,
t->integ_alg, t->seq, t->sa_seq, t->sa_seq_hi, t->pkt_seq_hi);
return s;
}
#define ESP_ENCRYPT_PD_F_FD_TRANSPORT (1 << 2)
static_always_inline void
esp_process_ops (vlib_main_t * vm, vlib_node_runtime_t * node,
vnet_crypto_op_t * ops, vlib_buffer_t * b[], u16 * nexts,
int e)
{
vnet_crypto_op_t *op = ops;
u32 n_fail, n_ops = vec_len (ops);
if (n_ops == 0)
return;
n_fail = n_ops - vnet_crypto_process_ops (vm, op, n_ops);
while (n_fail)
{
ASSERT (op - ops < n_ops);
if (op->status != VNET_CRYPTO_OP_STATUS_COMPLETED)
{
u32 err, bi = op->user_data;
if (op->status == VNET_CRYPTO_OP_STATUS_FAIL_BAD_HMAC)
err = e;
else
err = ESP_DECRYPT_ERROR_CRYPTO_ENGINE_ERROR;
esp_decrypt_set_next_index (b[bi], node, vm->thread_index, err, bi,
nexts, ESP_DECRYPT_NEXT_DROP,
vnet_buffer (b[bi])->ipsec.sad_index);
n_fail--;
}
op++;
}
}
static_always_inline void
esp_process_chained_ops (vlib_main_t * vm, vlib_node_runtime_t * node,
vnet_crypto_op_t * ops, vlib_buffer_t * b[],
u16 * nexts, vnet_crypto_op_chunk_t * chunks, int e)
{
vnet_crypto_op_t *op = ops;
u32 n_fail, n_ops = vec_len (ops);
if (PREDICT_TRUE (n_ops == 0))
return;
n_fail = n_ops - vnet_crypto_process_chained_ops (vm, op, chunks, n_ops);
while (n_fail)
{
ASSERT (op - ops < n_ops);
if (op->status != VNET_CRYPTO_OP_STATUS_COMPLETED)
{
u32 err, bi = op->user_data;
if (op->status == VNET_CRYPTO_OP_STATUS_FAIL_BAD_HMAC)
err = e;
else
err = ESP_DECRYPT_ERROR_CRYPTO_ENGINE_ERROR;
esp_decrypt_set_next_index (b[bi], node, vm->thread_index, err, bi,
nexts, ESP_DECRYPT_NEXT_DROP,
vnet_buffer (b[bi])->ipsec.sad_index);
n_fail--;
}
op++;
}
}
always_inline void
esp_remove_tail (vlib_main_t * vm, vlib_buffer_t * b, vlib_buffer_t * last,
u16 tail)
{
vlib_buffer_t *before_last = b;
if (last->current_length > tail)
{
last->current_length -= tail;
return;
}
ASSERT (b->flags & VLIB_BUFFER_NEXT_PRESENT);
while (b->flags & VLIB_BUFFER_NEXT_PRESENT)
{
before_last = b;
b = vlib_get_buffer (vm, b->next_buffer);
}
before_last->current_length -= tail - last->current_length;
vlib_buffer_free_one (vm, before_last->next_buffer);
before_last->flags &= ~VLIB_BUFFER_NEXT_PRESENT;
}
/* ICV is splitted in last two buffers so move it to the last buffer and
return pointer to it */
static_always_inline u8 *
esp_move_icv (vlib_main_t * vm, vlib_buffer_t * first,
esp_decrypt_packet_data_t * pd,
esp_decrypt_packet_data2_t * pd2, u16 icv_sz, u16 * dif)
{
vlib_buffer_t *before_last, *bp;
u16 last_sz = pd2->lb->current_length;
u16 first_sz = icv_sz - last_sz;
bp = before_last = first;
while (bp->flags & VLIB_BUFFER_NEXT_PRESENT)
{
before_last = bp;
bp = vlib_get_buffer (vm, bp->next_buffer);
}
u8 *lb_curr = vlib_buffer_get_current (pd2->lb);
memmove (lb_curr + first_sz, lb_curr, last_sz);
clib_memcpy_fast (lb_curr, vlib_buffer_get_tail (before_last) - first_sz,
first_sz);
before_last->current_length -= first_sz;
if (before_last == first)
pd->current_length -= first_sz;
clib_memset (vlib_buffer_get_tail (before_last), 0, first_sz);
if (dif)
dif[0] = first_sz;
pd2->lb = before_last;
pd2->icv_removed = 1;
pd2->free_buffer_index = before_last->next_buffer;
before_last->flags &= ~VLIB_BUFFER_NEXT_PRESENT;
return lb_curr;
}
static_always_inline u16
esp_insert_esn (vlib_main_t *vm, ipsec_sa_t *sa, esp_decrypt_packet_data_t *pd,
esp_decrypt_packet_data2_t *pd2, u32 *data_len, u8 **digest,
u16 *len, vlib_buffer_t *b, u8 *payload)
{
if (!ipsec_sa_is_set_USE_ESN (sa))
return 0;
/* shift ICV by 4 bytes to insert ESN */
u32 seq_hi = clib_host_to_net_u32 (pd->seq_hi);
u8 tmp[ESP_MAX_ICV_SIZE];
if (pd2->icv_removed)
{
u16 space_left = vlib_buffer_space_left_at_end (vm, pd2->lb);
if (space_left >= N_HI_ESN_BYTES)
{
clib_memcpy_fast (vlib_buffer_get_tail (pd2->lb), &seq_hi,
N_HI_ESN_BYTES);
*data_len += N_HI_ESN_BYTES;
}
else
return N_HI_ESN_BYTES;
len[0] = b->current_length;
}
else
{
clib_memcpy_fast (tmp, payload + len[0], ESP_MAX_ICV_SIZE);
clib_memcpy_fast (payload + len[0], &seq_hi, N_HI_ESN_BYTES);
clib_memcpy_fast (payload + len[0] + N_HI_ESN_BYTES, tmp,
ESP_MAX_ICV_SIZE);
*data_len += N_HI_ESN_BYTES;
*digest += N_HI_ESN_BYTES;
}
return N_HI_ESN_BYTES;
}
static_always_inline u8 *
esp_move_icv_esn (vlib_main_t * vm, vlib_buffer_t * first,
esp_decrypt_packet_data_t * pd,
esp_decrypt_packet_data2_t * pd2, u16 icv_sz,
ipsec_sa_t * sa, u8 * extra_esn, u32 * len)
{
u16 dif = 0;
u8 *digest = esp_move_icv (vm, first, pd, pd2, icv_sz, &dif);
if (dif)
*len -= dif;
if (ipsec_sa_is_set_USE_ESN (sa))
{
u32 seq_hi = clib_host_to_net_u32 (pd->seq_hi);
u16 space_left = vlib_buffer_space_left_at_end (vm, pd2->lb);
if (space_left >= N_HI_ESN_BYTES)
{
clib_memcpy_fast (vlib_buffer_get_tail (pd2->lb), &seq_hi,
N_HI_ESN_BYTES);
*len += N_HI_ESN_BYTES;
}
else
{
/* no space for ESN at the tail, use the next buffer
* (with ICV data) */
ASSERT (pd2->icv_removed);
vlib_buffer_t *tmp = vlib_get_buffer (vm, pd2->free_buffer_index);
clib_memcpy_fast (vlib_buffer_get_current (tmp) - N_HI_ESN_BYTES,
&seq_hi, N_HI_ESN_BYTES);
extra_esn[0] = 1;
}
}
return digest;
}
static_always_inline int
esp_decrypt_chain_integ (vlib_main_t *vm, ipsec_per_thread_data_t *ptd,
const esp_decrypt_packet_data_t *pd,
esp_decrypt_packet_data2_t *pd2, ipsec_sa_t *sa0,
vlib_buffer_t *b, u8 icv_sz, u8 *start_src,
u32 start_len, u8 **digest, u16 *n_ch,
u32 *integ_total_len)
{
vnet_crypto_op_chunk_t *ch;
vlib_buffer_t *cb = vlib_get_buffer (vm, b->next_buffer);
u16 n_chunks = 1;
u32 total_len;
vec_add2 (ptd->chunks, ch, 1);
total_len = ch->len = start_len;
ch->src = start_src;
while (1)
{
vec_add2 (ptd->chunks, ch, 1);
n_chunks += 1;
ch->src = vlib_buffer_get_current (cb);
if (pd2->lb == cb)
{
if (pd2->icv_removed)
ch->len = cb->current_length;
else
ch->len = cb->current_length - icv_sz;
if (ipsec_sa_is_set_USE_ESN (sa0))
{
u32 seq_hi = clib_host_to_net_u32 (pd->seq_hi);
u8 tmp[ESP_MAX_ICV_SIZE];
u8 *esn;
vlib_buffer_t *tmp_b;
u16 space_left = vlib_buffer_space_left_at_end (vm, pd2->lb);
if (space_left < N_HI_ESN_BYTES)
{
if (pd2->icv_removed)
{
/* use pre-data area from the last bufer
that was removed from the chain */
tmp_b = vlib_get_buffer (vm, pd2->free_buffer_index);
esn = tmp_b->data - N_HI_ESN_BYTES;
}
else
{
/* no space, need to allocate new buffer */
u32 tmp_bi = 0;
if (vlib_buffer_alloc (vm, &tmp_bi, 1) != 1)
return -1;
tmp_b = vlib_get_buffer (vm, tmp_bi);
esn = tmp_b->data;
pd2->free_buffer_index = tmp_bi;
}
clib_memcpy_fast (esn, &seq_hi, N_HI_ESN_BYTES);
vec_add2 (ptd->chunks, ch, 1);
n_chunks += 1;
ch->src = esn;
ch->len = N_HI_ESN_BYTES;
}
else
{
if (pd2->icv_removed)
{
clib_memcpy_fast (vlib_buffer_get_tail (pd2->lb),
&seq_hi, N_HI_ESN_BYTES);
}
else
{
clib_memcpy_fast (tmp, *digest, ESP_MAX_ICV_SIZE);
clib_memcpy_fast (*digest, &seq_hi, N_HI_ESN_BYTES);
clib_memcpy_fast (*digest + N_HI_ESN_BYTES, tmp,
ESP_MAX_ICV_SIZE);
*digest += N_HI_ESN_BYTES;
}
ch->len += N_HI_ESN_BYTES;
}
}
total_len += ch->len;
break;
}
else
total_len += ch->len = cb->current_length;
if (!(cb->flags & VLIB_BUFFER_NEXT_PRESENT))
break;
cb = vlib_get_buffer (vm, cb->next_buffer);
}
if (n_ch)
*n_ch = n_chunks;
if (integ_total_len)
*integ_total_len = total_len;
return 0;
}
static_always_inline u32
esp_decrypt_chain_crypto (vlib_main_t * vm, ipsec_per_thread_data_t * ptd,
esp_decrypt_packet_data_t * pd,
esp_decrypt_packet_data2_t * pd2,
ipsec_sa_t * sa0, vlib_buffer_t * b, u8 icv_sz,
u8 * start, u32 start_len, u8 ** tag, u16 * n_ch)
{
vnet_crypto_op_chunk_t *ch;
vlib_buffer_t *cb = b;
u16 n_chunks = 1;
u32 total_len;
vec_add2 (ptd->chunks, ch, 1);
total_len = ch->len = start_len;
ch->src = ch->dst = start;
cb = vlib_get_buffer (vm, cb->next_buffer);
n_chunks = 1;
while (1)
{
vec_add2 (ptd->chunks, ch, 1);
n_chunks += 1;
ch->src = ch->dst = vlib_buffer_get_current (cb);
if (pd2->lb == cb)
{
if (ipsec_sa_is_set_IS_AEAD (sa0))
{
if (pd2->lb->current_length < icv_sz)
{
u16 dif = 0;
*tag = esp_move_icv (vm, b, pd, pd2, icv_sz, &dif);
/* this chunk does not contain crypto data */
n_chunks -= 1;
/* and fix previous chunk's length as it might have
been changed */
ASSERT (n_chunks > 0);
if (pd2->lb == b)
{
total_len -= dif;
ch[-1].len -= dif;
}
else
{
total_len = total_len + pd2->lb->current_length -
ch[-1].len;
ch[-1].len = pd2->lb->current_length;
}
break;
}
else
*tag = vlib_buffer_get_tail (pd2->lb) - icv_sz;
}
if (pd2->icv_removed)
total_len += ch->len = cb->current_length;
else
total_len += ch->len = cb->current_length - icv_sz;
}
else
total_len += ch->len = cb->current_length;
if (!(cb->flags & VLIB_BUFFER_NEXT_PRESENT))
break;
cb = vlib_get_buffer (vm, cb->next_buffer);
}
if (n_ch)
*n_ch = n_chunks;
return total_len;
}
static_always_inline void
esp_decrypt_prepare_sync_op (vlib_main_t * vm, vlib_node_runtime_t * node,
ipsec_per_thread_data_t * ptd,
vnet_crypto_op_t *** crypto_ops,
vnet_crypto_op_t *** integ_ops,
vnet_crypto_op_t * op,
ipsec_sa_t * sa0, u8 * payload,
u16 len, u8 icv_sz, u8 iv_sz,
esp_decrypt_packet_data_t * pd,
esp_decrypt_packet_data2_t * pd2,
vlib_buffer_t * b, u16 * next, u32 index)
{
const u8 esp_sz = sizeof (esp_header_t);
if (PREDICT_TRUE (sa0->integ_op_id != VNET_CRYPTO_OP_NONE))
{
vnet_crypto_op_init (op, sa0->integ_op_id);
op->key_index = sa0->integ_key_index;
op->src = payload;
op->flags = VNET_CRYPTO_OP_FLAG_HMAC_CHECK;
op->user_data = index;
op->digest = payload + len;
op->digest_len = icv_sz;
op->len = len;
if (pd->is_chain)
{
/* buffer is chained */
op->len = pd->current_length;
/* special case when ICV is splitted and needs to be reassembled
* first -> move it to the last buffer. Also take into account
* that ESN needs to be added after encrypted data and may or
* may not fit in the tail.*/
if (pd2->lb->current_length < icv_sz)
{
u8 extra_esn = 0;
op->digest =
esp_move_icv_esn (vm, b, pd, pd2, icv_sz, sa0,
&extra_esn, &op->len);
if (extra_esn)
{
/* esn is in the last buffer, that was unlinked from
* the chain */
op->len = b->current_length;
}
else
{
if (pd2->lb == b)
{
/* we now have a single buffer of crypto data, adjust
* the length (second buffer contains only ICV) */
*integ_ops = &ptd->integ_ops;
*crypto_ops = &ptd->crypto_ops;
len = b->current_length;
goto out;
}
}
}
else
op->digest = vlib_buffer_get_tail (pd2->lb) - icv_sz;
op->flags |= VNET_CRYPTO_OP_FLAG_CHAINED_BUFFERS;
op->chunk_index = vec_len (ptd->chunks);
if (esp_decrypt_chain_integ (vm, ptd, pd, pd2, sa0, b, icv_sz,
payload, pd->current_length,
&op->digest, &op->n_chunks, 0) < 0)
{
esp_decrypt_set_next_index (
b, node, vm->thread_index, ESP_DECRYPT_ERROR_NO_BUFFERS, 0,
next, ESP_DECRYPT_NEXT_DROP, pd->sa_index);
return;
}
}
else
esp_insert_esn (vm, sa0, pd, pd2, &op->len, &op->digest, &len, b,
payload);
out:
vec_add_aligned (*(integ_ops[0]), op, 1, CLIB_CACHE_LINE_BYTES);
}
payload += esp_sz;
len -= esp_sz;
if (sa0->crypto_dec_op_id != VNET_CRYPTO_OP_NONE)
{
vnet_crypto_op_init (op, sa0->crypto_dec_op_id);
op->key_index = sa0->crypto_key_index;
op->iv = payload;
if (ipsec_sa_is_set_IS_CTR (sa0))
{
/* construct nonce in a scratch space in front of the IP header */
esp_ctr_nonce_t *nonce =
(esp_ctr_nonce_t *) (payload - esp_sz - pd->hdr_sz -
sizeof (*nonce));
if (ipsec_sa_is_set_IS_AEAD (sa0))
{
/* constuct aad in a scratch space in front of the nonce */
esp_header_t *esp0 = (esp_header_t *) (payload - esp_sz);
op->aad = (u8 *) nonce - sizeof (esp_aead_t);
op->aad_len = esp_aad_fill (op->aad, esp0, sa0, pd->seq_hi);
op->tag = payload + len;
op->tag_len = 16;
if (PREDICT_FALSE (ipsec_sa_is_set_IS_NULL_GMAC (sa0)))
{
/* RFC-4543 ENCR_NULL_AUTH_AES_GMAC: IV is part of AAD */
payload -= iv_sz;
len += iv_sz;
}
}
else
{
nonce->ctr = clib_host_to_net_u32 (1);
}
nonce->salt = sa0->salt;
ASSERT (sizeof (u64) == iv_sz);
nonce->iv = *(u64 *) op->iv;
op->iv = (u8 *) nonce;
}
op->src = op->dst = payload += iv_sz;
op->len = len - iv_sz;
op->user_data = index;
if (pd->is_chain && (pd2->lb != b))
{
/* buffer is chained */
op->flags |= VNET_CRYPTO_OP_FLAG_CHAINED_BUFFERS;
op->chunk_index = vec_len (ptd->chunks);
esp_decrypt_chain_crypto (vm, ptd, pd, pd2, sa0, b, icv_sz,
payload, len - pd->iv_sz + pd->icv_sz,
&op->tag, &op->n_chunks);
}
vec_add_aligned (*(crypto_ops[0]), op, 1, CLIB_CACHE_LINE_BYTES);
}
}
static_always_inline esp_decrypt_error_t
esp_decrypt_prepare_async_frame (vlib_main_t *vm, vlib_node_runtime_t *node,
ipsec_per_thread_data_t *ptd,
vnet_crypto_async_frame_t *f, ipsec_sa_t *sa0,
u8 *payload, u16 len, u8 icv_sz, u8 iv_sz,
esp_decrypt_packet_data_t *pd,
esp_decrypt_packet_data2_t *pd2, u32 bi,
vlib_buffer_t *b, u16 *next, u16 async_next)
{
const u8 esp_sz = sizeof (esp_header_t);
esp_decrypt_packet_data_t *async_pd = &(esp_post_data (b))->decrypt_data;
esp_decrypt_packet_data2_t *async_pd2 = esp_post_data2 (b);
u8 *tag = payload + len, *iv = payload + esp_sz, *aad = 0;
const u32 key_index = sa0->crypto_key_index;
u32 crypto_len, integ_len = 0;
i16 crypto_start_offset, integ_start_offset = 0;
u8 flags = 0;
if (!ipsec_sa_is_set_IS_AEAD (sa0))
{
/* linked algs */
integ_start_offset = payload - b->data;
integ_len = len;
if (PREDICT_TRUE (sa0->integ_op_id != VNET_CRYPTO_OP_NONE))
flags |= VNET_CRYPTO_OP_FLAG_HMAC_CHECK;
if (pd->is_chain)
{
/* buffer is chained */
integ_len = pd->current_length;
/* special case when ICV is splitted and needs to be reassembled
* first -> move it to the last buffer. Also take into account
* that ESN needs to be added after encrypted data and may or
* may not fit in the tail.*/
if (pd2->lb->current_length < icv_sz)
{
u8 extra_esn = 0;
tag = esp_move_icv_esn (vm, b, pd, pd2, icv_sz, sa0,
&extra_esn, &integ_len);
if (extra_esn)
{
/* esn is in the last buffer, that was unlinked from
* the chain */
integ_len = b->current_length;
}
else
{
if (pd2->lb == b)
{
/* we now have a single buffer of crypto data, adjust
* the length (second buffer contains only ICV) */
len = b->current_length;
goto out;
}
}
}
else
tag = vlib_buffer_get_tail (pd2->lb) - icv_sz;
flags |= VNET_CRYPTO_OP_FLAG_CHAINED_BUFFERS;
if (esp_decrypt_chain_integ (vm, ptd, pd, pd2, sa0, b, icv_sz,
payload, pd->current_length, &tag, 0,
&integ_len) < 0)
{
/* allocate buffer failed, will not add to frame and drop */
return (ESP_DECRYPT_ERROR_NO_BUFFERS);
}
}
else
esp_insert_esn (vm, sa0, pd, pd2, &integ_len, &tag, &len, b, payload);
}
out:
/* crypto */
payload += esp_sz;
len -= esp_sz;
iv = payload;
if (ipsec_sa_is_set_IS_CTR (sa0))
{
/* construct nonce in a scratch space in front of the IP header */
esp_ctr_nonce_t *nonce =
(esp_ctr_nonce_t *) (payload - esp_sz - pd->hdr_sz - sizeof (*nonce));
if (ipsec_sa_is_set_IS_AEAD (sa0))
{
/* constuct aad in a scratch space in front of the nonce */
esp_header_t *esp0 = (esp_header_t *) (payload - esp_sz);
aad = (u8 *) nonce - sizeof (esp_aead_t);
esp_aad_fill (aad, esp0, sa0, pd->seq_hi);
tag = payload + len;
if (PREDICT_FALSE (ipsec_sa_is_set_IS_NULL_GMAC (sa0)))
{
/* RFC-4543 ENCR_NULL_AUTH_AES_GMAC: IV is part of AAD */
payload -= iv_sz;
len += iv_sz;
}
}
else
{
nonce->ctr = clib_host_to_net_u32 (1);
}
nonce->salt = sa0->salt;
ASSERT (sizeof (u64) == iv_sz);
nonce->iv = *(u64 *) iv;
iv = (u8 *) nonce;
}
crypto_start_offset = (payload += iv_sz) - b->data;
crypto_len = len - iv_sz;
if (pd->is_chain && (pd2->lb != b))
{
/* buffer is chained */
flags |= VNET_CRYPTO_OP_FLAG_CHAINED_BUFFERS;
crypto_len = esp_decrypt_chain_crypto (vm, ptd, pd, pd2, sa0, b, icv_sz,
payload,
len - pd->iv_sz + pd->icv_sz,
&tag, 0);
}
*async_pd = *pd;
*async_pd2 = *pd2;
/* for AEAD integ_len - crypto_len will be negative, it is ok since it
* is ignored by the engine. */
vnet_crypto_async_add_to_frame (
vm, f, key_index, crypto_len, integ_len - crypto_len, crypto_start_offset,
integ_start_offset, bi, async_next, iv, tag, aad, flags);
return (ESP_DECRYPT_ERROR_RX_PKTS);
}
static_always_inline void
esp_decrypt_post_crypto (vlib_main_t *vm, vlib_node_runtime_t *node,
const u16 *next_by_next_header,
const esp_decrypt_packet_data_t *pd,
const esp_decrypt_packet_data2_t *pd2,
vlib_buffer_t *b, u16 *next, int is_ip6, int is_tun,
int is_async)
{
ipsec_sa_t *sa0 = ipsec_sa_get (pd->sa_index);
vlib_buffer_t *lb = b;
const u8 esp_sz = sizeof (esp_header_t);
const u8 tun_flags = IPSEC_SA_FLAG_IS_TUNNEL | IPSEC_SA_FLAG_IS_TUNNEL_V6;
u8 pad_length = 0, next_header = 0;
u16 icv_sz;
/*
* redo the anti-reply check
* in this frame say we have sequence numbers, s, s+1, s+1, s+1
* and s and s+1 are in the window. When we did the anti-replay
* check above we did so against the state of the window (W),
* after packet s-1. So each of the packets in the sequence will be
* accepted.
* This time s will be cheked against Ws-1, s+1 chceked against Ws
* (i.e. the window state is updated/advnaced)
* so this time the successive s+! packet will be dropped.
* This is a consequence of batching the decrypts. If the
* check-dcrypt-advance process was done for each packet it would
* be fine. But we batch the decrypts because it's much more efficient
* to do so in SW and if we offload to HW and the process is async.
*
* You're probably thinking, but this means an attacker can send the
* above sequence and cause VPP to perform decrpyts that will fail,
* and that's true. But if the attacker can determine s (a valid
* sequence number in the window) which is non-trivial, it can generate
* a sequence s, s+1, s+2, s+3, ... s+n and nothing will prevent any
* implementation, sequential or batching, from decrypting these.
*/
if (ipsec_sa_anti_replay_and_sn_advance (sa0, pd->seq, pd->seq_hi, true,
NULL))
{
esp_decrypt_set_next_index (b, node, vm->thread_index,
ESP_DECRYPT_ERROR_REPLAY, 0, next,
ESP_DECRYPT_NEXT_DROP, pd->sa_index);
return;
}
u64 n_lost =
ipsec_sa_anti_replay_advance (sa0, vm->thread_index, pd->seq, pd->seq_hi);
vlib_prefetch_simple_counter (&ipsec_sa_err_counters[IPSEC_SA_ERROR_LOST],
vm->thread_index, pd->sa_index);
if (pd->is_chain)
{
lb = pd2->lb;
icv_sz = pd2->icv_removed ? 0 : pd->icv_sz;
if (pd2->free_buffer_index)
{
vlib_buffer_free_one (vm, pd2->free_buffer_index);
lb->next_buffer = 0;
}
if (lb->current_length < sizeof (esp_footer_t) + icv_sz)
{
/* esp footer is either splitted in two buffers or in the before
* last buffer */
vlib_buffer_t *before_last = b, *bp = b;
while (bp->flags & VLIB_BUFFER_NEXT_PRESENT)
{
before_last = bp;
bp = vlib_get_buffer (vm, bp->next_buffer);
}
u8 *bt = vlib_buffer_get_tail (before_last);
if (lb->current_length == icv_sz)
{
esp_footer_t *f = (esp_footer_t *) (bt - sizeof (*f));
pad_length = f->pad_length;
next_header = f->next_header;
}
else
{
pad_length = (bt - 1)[0];
next_header = ((u8 *) vlib_buffer_get_current (lb))[0];
}
}
else
{
esp_footer_t *f =
(esp_footer_t *) (lb->data + lb->current_data +
lb->current_length - sizeof (esp_footer_t) -
icv_sz);
pad_length = f->pad_length;
next_header = f->next_header;
}
}
else
{
icv_sz = pd->icv_sz;
esp_footer_t *f =
(esp_footer_t *) (lb->data + lb->current_data + lb->current_length -
sizeof (esp_footer_t) - icv_sz);
pad_length = f->pad_length;
next_header = f->next_header;
}
u16 adv = pd->iv_sz + esp_sz;
u16 tail = sizeof (esp_footer_t) + pad_length + icv_sz;
u16 tail_orig = sizeof (esp_footer_t) + pad_length + pd->icv_sz;
b->flags &= ~VLIB_BUFFER_TOTAL_LENGTH_VALID;
if ((pd->flags & tun_flags) == 0 && !is_tun) /* transport mode */
{
u8 udp_sz = (is_ip6 == 0 && pd->flags & IPSEC_SA_FLAG_UDP_ENCAP) ?
sizeof (udp_header_t) : 0;
u16 ip_hdr_sz = pd->hdr_sz - udp_sz;
u8 *old_ip = b->data + pd->current_data - ip_hdr_sz - udp_sz;
u8 *ip = old_ip + adv + udp_sz;
if (is_ip6 && ip_hdr_sz > 64)
memmove (ip, old_ip, ip_hdr_sz);
else
clib_memcpy_le64 (ip, old_ip, ip_hdr_sz);
b->current_data = pd->current_data + adv - ip_hdr_sz;
b->current_length += ip_hdr_sz - adv;
esp_remove_tail (vm, b, lb, tail);
if (is_ip6)
{
ip6_header_t *ip6 = (ip6_header_t *) ip;
u16 len = clib_net_to_host_u16 (ip6->payload_length);
len -= adv + tail_orig;
ip6->payload_length = clib_host_to_net_u16 (len);
ip6->protocol = next_header;
next[0] = ESP_DECRYPT_NEXT_IP6_INPUT;
}
else
{
ip4_header_t *ip4 = (ip4_header_t *) ip;
ip_csum_t sum = ip4->checksum;
u16 len = clib_net_to_host_u16 (ip4->length);
len = clib_host_to_net_u16 (len - adv - tail_orig - udp_sz);
sum = ip_csum_update (sum, ip4->protocol, next_header,
ip4_header_t, protocol);
sum = ip_csum_update (sum, ip4->length, len, ip4_header_t, length);
ip4->checksum = ip_csum_fold (sum);
ip4->protocol = next_header;
ip4->length = len;
next[0] = ESP_DECRYPT_NEXT_IP4_INPUT;
}
}
else
{
if (PREDICT_TRUE (next_header == IP_PROTOCOL_IP_IN_IP))
{
next[0] = ESP_DECRYPT_NEXT_IP4_INPUT;
b->current_data = pd->current_data + adv;
b->current_length = pd->current_length - adv;
esp_remove_tail (vm, b, lb, tail);
}
else if (next_header == IP_PROTOCOL_IPV6)
{
next[0] = ESP_DECRYPT_NEXT_IP6_INPUT;
b->current_data = pd->current_data + adv;
b->current_length = pd->current_length - adv;
esp_remove_tail (vm, b, lb, tail);
}
else if (next_header == IP_PROTOCOL_MPLS_IN_IP)
{
next[0] = ESP_DECRYPT_NEXT_MPLS_INPUT;
b->current_data = pd->current_data + adv;
b->current_length = pd->current_length - adv;
esp_remove_tail (vm, b, lb, tail);
}
else if (is_tun && next_header == IP_PROTOCOL_GRE)
{
gre_header_t *gre;
b->current_data = pd->current_data + adv;
b->current_length = pd->current_length - adv - tail;
gre = vlib_buffer_get_current (b);
vlib_buffer_advance (b, sizeof (*gre));
switch (clib_net_to_host_u16 (gre->protocol))
{
case GRE_PROTOCOL_teb:
vnet_update_l2_len (b);
next[0] = ESP_DECRYPT_NEXT_L2_INPUT;
break;
case GRE_PROTOCOL_ip4:
next[0] = ESP_DECRYPT_NEXT_IP4_INPUT;
break;
case GRE_PROTOCOL_ip6:
next[0] = ESP_DECRYPT_NEXT_IP6_INPUT;
break;
default:
esp_decrypt_set_next_index (
b, node, vm->thread_index, ESP_DECRYPT_ERROR_UNSUP_PAYLOAD, 0,
next, ESP_DECRYPT_NEXT_DROP, pd->sa_index);
break;
}
}
else if ((next[0] = vec_elt (next_by_next_header, next_header)) !=
(u16) ~0)
{
b->current_data = pd->current_data + adv;
b->current_length = pd->current_length - adv;
esp_remove_tail (vm, b, lb, tail);
}
else
{
esp_decrypt_set_next_index (b, node, vm->thread_index,
ESP_DECRYPT_ERROR_UNSUP_PAYLOAD, 0, next,
ESP_DECRYPT_NEXT_DROP, pd->sa_index);
return;
}
if (is_tun)
{
if (ipsec_sa_is_set_IS_PROTECT (sa0))
{
/*
* There are two encap possibilities
* 1) the tunnel and ths SA are prodiving encap, i.e. it's
* MAC | SA-IP | TUN-IP | ESP | PAYLOAD
* implying the SA is in tunnel mode (on a tunnel interface)
* 2) only the tunnel provides encap
* MAC | TUN-IP | ESP | PAYLOAD
* implying the SA is in transport mode.
*
* For 2) we need only strip the tunnel encap and we're good.
* since the tunnel and crypto ecnap (int the tun=protect
* object) are the same and we verified above that these match
* for 1) we need to strip the SA-IP outer headers, to
* reveal the tunnel IP and then check that this matches
* the configured tunnel.
*/
const ipsec_tun_protect_t *itp;
itp =
ipsec_tun_protect_get (vnet_buffer (b)->ipsec.protect_index);
if (PREDICT_TRUE (next_header == IP_PROTOCOL_IP_IN_IP))
{
const ip4_header_t *ip4;
ip4 = vlib_buffer_get_current (b);
if (!ip46_address_is_equal_v4 (&itp->itp_tun.src,
&ip4->dst_address) ||
!ip46_address_is_equal_v4 (&itp->itp_tun.dst,
&ip4->src_address))
{
esp_decrypt_set_next_index (
b, node, vm->thread_index,
ESP_DECRYPT_ERROR_TUN_NO_PROTO, 0, next,
ESP_DECRYPT_NEXT_DROP, pd->sa_index);
}
}
else if (next_header == IP_PROTOCOL_IPV6)
{
const ip6_header_t *ip6;
ip6 = vlib_buffer_get_current (b);
if (!ip46_address_is_equal_v6 (&itp->itp_tun.src,
&ip6->dst_address) ||
!ip46_address_is_equal_v6 (&itp->itp_tun.dst,
&ip6->src_address))
{
esp_decrypt_set_next_index (
b, node, vm->thread_index,
ESP_DECRYPT_ERROR_TUN_NO_PROTO, 0, next,
ESP_DECRYPT_NEXT_DROP, pd->sa_index);
}
}
}
}
}
if (PREDICT_FALSE (n_lost))
vlib_increment_simple_counter (&ipsec_sa_err_counters[IPSEC_SA_ERROR_LOST],
vm->thread_index, pd->sa_index, n_lost);
}
always_inline uword
esp_decrypt_inline (vlib_main_t *vm, vlib_node_runtime_t *node,
vlib_frame_t *from_frame, int is_ip6, int is_tun,
u16 async_next_node)
{
ipsec_main_t *im = &ipsec_main;
const u16 *next_by_next_header = im->next_header_registrations;
u32 thread_index = vm->thread_index;
u16 len;
ipsec_per_thread_data_t *ptd = vec_elt_at_index (im->ptd, thread_index);
u32 *from = vlib_frame_vector_args (from_frame);
u32 n_left = from_frame->n_vectors;
vlib_buffer_t *bufs[VLIB_FRAME_SIZE], **b = bufs;
vlib_buffer_t *sync_bufs[VLIB_FRAME_SIZE];
u16 sync_nexts[VLIB_FRAME_SIZE], *sync_next = sync_nexts, n_sync = 0;
u16 async_nexts[VLIB_FRAME_SIZE], *async_next = async_nexts;
u16 noop_nexts[VLIB_FRAME_SIZE], n_noop = 0;
u32 sync_bi[VLIB_FRAME_SIZE];
u32 noop_bi[VLIB_FRAME_SIZE];
esp_decrypt_packet_data_t pkt_data[VLIB_FRAME_SIZE], *pd = pkt_data;
esp_decrypt_packet_data2_t pkt_data2[VLIB_FRAME_SIZE], *pd2 = pkt_data2;
esp_decrypt_packet_data_t cpd = { };
u32 current_sa_index = ~0, current_sa_bytes = 0, current_sa_pkts = 0;
const u8 esp_sz = sizeof (esp_header_t);
ipsec_sa_t *sa0 = 0;
vnet_crypto_op_t _op, *op = &_op;
vnet_crypto_op_t **crypto_ops;
vnet_crypto_op_t **integ_ops;
int is_async = im->async_mode;
vnet_crypto_async_op_id_t async_op = ~0;
vnet_crypto_async_frame_t *async_frames[VNET_CRYPTO_ASYNC_OP_N_IDS];
esp_decrypt_error_t err;
vlib_get_buffers (vm, from, b, n_left);
if (!is_async)
{
vec_reset_length (ptd->crypto_ops);
vec_reset_length (ptd->integ_ops);
vec_reset_length (ptd->chained_crypto_ops);
vec_reset_length (ptd->chained_integ_ops);
}
vec_reset_length (ptd->async_frames);
vec_reset_length (ptd->chunks);
clib_memset (sync_nexts, -1, sizeof (sync_nexts));
clib_memset (async_frames, 0, sizeof (async_frames));
while (n_left > 0)
{
u8 *payload;
err = ESP_DECRYPT_ERROR_RX_PKTS;
if (n_left > 2)
{
u8 *p;
vlib_prefetch_buffer_header (b[2], LOAD);
p = vlib_buffer_get_current (b[1]);
clib_prefetch_load (p);
p -= CLIB_CACHE_LINE_BYTES;
clib_prefetch_load (p);
}
u32 n_bufs = vlib_buffer_chain_linearize (vm, b[0]);
if (n_bufs == 0)
{
err = ESP_DECRYPT_ERROR_NO_BUFFERS;
esp_decrypt_set_next_index (b[0], node, thread_index, err, n_noop,
noop_nexts, ESP_DECRYPT_NEXT_DROP,
vnet_buffer (b[0])->ipsec.sad_index);
goto next;
}
if (vnet_buffer (b[0])->ipsec.sad_index != current_sa_index)
{
if (current_sa_pkts)
vlib_increment_combined_counter (&ipsec_sa_counters, thread_index,
current_sa_index, current_sa_pkts,
current_sa_bytes);
current_sa_bytes = current_sa_pkts = 0;
current_sa_index = vnet_buffer (b[0])->ipsec.sad_index;
vlib_prefetch_combined_counter (&ipsec_sa_counters, thread_index,
current_sa_index);
sa0 = ipsec_sa_get (current_sa_index);
/* fetch the second cacheline ASAP */
clib_prefetch_load (sa0->cacheline1);
cpd.icv_sz = sa0->integ_icv_size;
cpd.iv_sz = sa0->crypto_iv_size;
cpd.flags = sa0->flags;
cpd.sa_index = current_sa_index;
is_async = im->async_mode | ipsec_sa_is_set_IS_ASYNC (sa0);
}
if (PREDICT_FALSE ((u16) ~0 == sa0->thread_index))
{
/* this is the first packet to use this SA, claim the SA
* for this thread. this could happen simultaneously on
* another thread */
clib_atomic_cmp_and_swap (&sa0->thread_index, ~0,
ipsec_sa_assign_thread (thread_index));
}
if (PREDICT_FALSE (thread_index != sa0->thread_index))
{
vnet_buffer (b[0])->ipsec.thread_index = sa0->thread_index;
err = ESP_DECRYPT_ERROR_HANDOFF;
esp_decrypt_set_next_index (b[0], node, thread_index, err, n_noop,
noop_nexts, ESP_DECRYPT_NEXT_HANDOFF,
current_sa_index);
goto next;
}
/* store packet data for next round for easier prefetch */
pd->sa_data = cpd.sa_data;
pd->current_data = b[0]->current_data;
pd->hdr_sz = pd->current_data - vnet_buffer (b[0])->l3_hdr_offset;
payload = b[0]->data + pd->current_data;
pd->seq = clib_host_to_net_u32 (((esp_header_t *) payload)->seq);
pd->is_chain = 0;
pd2->lb = b[0];
pd2->free_buffer_index = 0;
pd2->icv_removed = 0;
if (n_bufs > 1)
{
pd->is_chain = 1;
/* find last buffer in the chain */
while (pd2->lb->flags & VLIB_BUFFER_NEXT_PRESENT)
pd2->lb = vlib_get_buffer (vm, pd2->lb->next_buffer);
crypto_ops = &ptd->chained_crypto_ops;
integ_ops = &ptd->chained_integ_ops;
}
else
{
crypto_ops = &ptd->crypto_ops;
integ_ops = &ptd->integ_ops;
}
pd->current_length = b[0]->current_length;
/* anti-reply check */
if (ipsec_sa_anti_replay_and_sn_advance (sa0, pd->seq, ~0, false,
&pd->seq_hi))
{
err = ESP_DECRYPT_ERROR_REPLAY;
esp_decrypt_set_next_index (b[0], node, thread_index, err, n_noop,
noop_nexts, ESP_DECRYPT_NEXT_DROP,
current_sa_index);
goto next;
}
if (pd->current_length < cpd.icv_sz + esp_sz + cpd.iv_sz)
{
err = ESP_DECRYPT_ERROR_RUNT;
esp_decrypt_set_next_index (b[0], node, thread_index, err, n_noop,
noop_nexts, ESP_DECRYPT_NEXT_DROP,
current_sa_index);
goto next;
}
len = pd->current_length - cpd.icv_sz;
current_sa_pkts += 1;
current_sa_bytes += vlib_buffer_length_in_chain (vm, b[0]);
if (is_async)
{
async_op = sa0->crypto_async_dec_op_id;
/* get a frame for this op if we don't yet have one or it's full
*/
if (NULL == async_frames[async_op] ||
vnet_crypto_async_frame_is_full (async_frames[async_op]))
{
async_frames[async_op] =
vnet_crypto_async_get_frame (vm, async_op);
if (PREDICT_FALSE (!async_frames[async_op]))
{
err = ESP_DECRYPT_ERROR_NO_AVAIL_FRAME;
esp_decrypt_set_next_index (
b[0], node, thread_index, err, n_noop, noop_nexts,
ESP_DECRYPT_NEXT_DROP, current_sa_index);
goto next;
}
/* Save the frame to the list we'll submit at the end */
vec_add1 (ptd->async_frames, async_frames[async_op]);
}
err = esp_decrypt_prepare_async_frame (
vm, node, ptd, async_frames[async_op], sa0, payload, len,
cpd.icv_sz, cpd.iv_sz, pd, pd2, from[b - bufs], b[0], async_next,
async_next_node);
if (ESP_DECRYPT_ERROR_RX_PKTS != err)
{
esp_decrypt_set_next_index (
b[0], node, thread_index, err, n_noop, noop_nexts,
ESP_DECRYPT_NEXT_DROP, current_sa_index);
}
}
else
esp_decrypt_prepare_sync_op (
vm, node, ptd, &crypto_ops, &integ_ops, op, sa0, payload, len,
cpd.icv_sz, cpd.iv_sz, pd, pd2, b[0], sync_next, n_sync);
/* next */
next:
if (ESP_DECRYPT_ERROR_RX_PKTS != err)
{
noop_bi[n_noop] = from[b - bufs];
n_noop++;
}
else if (!is_async)
{
sync_bi[n_sync] = from[b - bufs];
sync_bufs[n_sync] = b[0];
n_sync++;
sync_next++;
pd += 1;
pd2 += 1;
}
else
async_next++;
n_left -= 1;
b += 1;
}
if (PREDICT_TRUE (~0 != current_sa_index))
vlib_increment_combined_counter (&ipsec_sa_counters, thread_index,
current_sa_index, current_sa_pkts,
current_sa_bytes);
/* submit or free all of the open frames */
vnet_crypto_async_frame_t **async_frame;
vec_foreach (async_frame, ptd->async_frames)
{
/* free frame and move on if no ops were successfully added */
if (PREDICT_FALSE (!(*async_frame)->n_elts))
{
vnet_crypto_async_free_frame (vm, *async_frame);
continue;
}
if (vnet_crypto_async_submit_open_frame (vm, *async_frame) < 0)
{
n_noop += esp_async_recycle_failed_submit (
vm, *async_frame, node, ESP_DECRYPT_ERROR_CRYPTO_ENGINE_ERROR,
IPSEC_SA_ERROR_CRYPTO_ENGINE_ERROR, n_noop, noop_bi, noop_nexts,
ESP_DECRYPT_NEXT_DROP, false);
vnet_crypto_async_reset_frame (*async_frame);
vnet_crypto_async_free_frame (vm, *async_frame);
}
}
if (n_sync)
{
esp_process_ops (vm, node, ptd->integ_ops, sync_bufs, sync_nexts,
ESP_DECRYPT_ERROR_INTEG_ERROR);
esp_process_chained_ops (vm, node, ptd->chained_integ_ops, sync_bufs,
sync_nexts, ptd->chunks,
ESP_DECRYPT_ERROR_INTEG_ERROR);
esp_process_ops (vm, node, ptd->crypto_ops, sync_bufs, sync_nexts,
ESP_DECRYPT_ERROR_DECRYPTION_FAILED);
esp_process_chained_ops (vm, node, ptd->chained_crypto_ops, sync_bufs,
sync_nexts, ptd->chunks,
ESP_DECRYPT_ERROR_DECRYPTION_FAILED);
}
/* Post decryption ronud - adjust packet data start and length and next
node */
n_left = n_sync;
sync_next = sync_nexts;
pd = pkt_data;
pd2 = pkt_data2;
b = sync_bufs;
while (n_left)
{
if (n_left >= 2)
{
void *data = b[1]->data + pd[1].current_data;
/* buffer metadata */
vlib_prefetch_buffer_header (b[1], LOAD);
/* esp_footer_t */
CLIB_PREFETCH (data + pd[1].current_length - pd[1].icv_sz - 2,
CLIB_CACHE_LINE_BYTES, LOAD);
/* packet headers */
CLIB_PREFETCH (data - CLIB_CACHE_LINE_BYTES,
CLIB_CACHE_LINE_BYTES * 2, LOAD);
}
/* save the sa_index as GRE_teb post_crypto changes L2 opaque */
if (PREDICT_FALSE (b[0]->flags & VLIB_BUFFER_IS_TRACED))
current_sa_index = vnet_buffer (b[0])->ipsec.sad_index;
if (sync_next[0] >= ESP_DECRYPT_N_NEXT)
esp_decrypt_post_crypto (vm, node, next_by_next_header, pd, pd2, b[0],
sync_next, is_ip6, is_tun, 0);
/* trace: */
if (PREDICT_FALSE (b[0]->flags & VLIB_BUFFER_IS_TRACED))
{
esp_decrypt_trace_t *tr;
tr = vlib_add_trace (vm, node, b[0], sizeof (*tr));
sa0 = ipsec_sa_get (current_sa_index);
tr->crypto_alg = sa0->crypto_alg;
tr->integ_alg = sa0->integ_alg;
tr->seq = pd->seq;
tr->sa_seq = sa0->seq;
tr->sa_seq_hi = sa0->seq_hi;
tr->pkt_seq_hi = pd->seq_hi;
}
/* next */
n_left -= 1;
sync_next += 1;
pd += 1;
pd2 += 1;
b += 1;
}
vlib_node_increment_counter (vm, node->node_index, ESP_DECRYPT_ERROR_RX_PKTS,
from_frame->n_vectors);
if (n_sync)
vlib_buffer_enqueue_to_next (vm, node, sync_bi, sync_nexts, n_sync);
if (n_noop)
vlib_buffer_enqueue_to_next (vm, node, noop_bi, noop_nexts, n_noop);
return (from_frame->n_vectors);
}
always_inline uword
esp_decrypt_post_inline (vlib_main_t * vm,
vlib_node_runtime_t * node,
vlib_frame_t * from_frame, int is_ip6, int is_tun)
{
const ipsec_main_t *im = &ipsec_main;
const u16 *next_by_next_header = im->next_header_registrations;
u32 *from = vlib_frame_vector_args (from_frame);
u32 n_left = from_frame->n_vectors;
vlib_buffer_t *bufs[VLIB_FRAME_SIZE], **b = bufs;
u16 nexts[VLIB_FRAME_SIZE], *next = nexts;
vlib_get_buffers (vm, from, b, n_left);
while (n_left > 0)
{
esp_decrypt_packet_data_t *pd = &(esp_post_data (b[0]))->decrypt_data;
if (n_left > 2)
{
vlib_prefetch_buffer_header (b[2], LOAD);
vlib_prefetch_buffer_header (b[1], LOAD);
}
if (!pd->is_chain)
esp_decrypt_post_crypto (vm, node, next_by_next_header, pd, 0, b[0],
next, is_ip6, is_tun, 1);
else
{
esp_decrypt_packet_data2_t *pd2 = esp_post_data2 (b[0]);
esp_decrypt_post_crypto (vm, node, next_by_next_header, pd, pd2,
b[0], next, is_ip6, is_tun, 1);
}
/*trace: */
if (PREDICT_FALSE (b[0]->flags & VLIB_BUFFER_IS_TRACED))
{
ipsec_sa_t *sa0 = ipsec_sa_get (pd->sa_index);
esp_decrypt_trace_t *tr;
esp_decrypt_packet_data_t *async_pd =
&(esp_post_data (b[0]))->decrypt_data;
tr = vlib_add_trace (vm, node, b[0], sizeof (*tr));
sa0 = ipsec_sa_get (async_pd->sa_index);
tr->crypto_alg = sa0->crypto_alg;
tr->integ_alg = sa0->integ_alg;
tr->seq = pd->seq;
tr->sa_seq = sa0->seq;
tr->sa_seq_hi = sa0->seq_hi;
}
n_left--;
next++;
b++;
}
n_left = from_frame->n_vectors;
vlib_node_increment_counter (vm, node->node_index,
ESP_DECRYPT_ERROR_RX_POST_PKTS, n_left);
vlib_buffer_enqueue_to_next (vm, node, from, nexts, n_left);
return n_left;
}
VLIB_NODE_FN (esp4_decrypt_node) (vlib_main_t * vm,
vlib_node_runtime_t * node,
vlib_frame_t * from_frame)
{
return esp_decrypt_inline (vm, node, from_frame, 0, 0,
esp_decrypt_async_next.esp4_post_next);
}
VLIB_NODE_FN (esp4_decrypt_post_node) (vlib_main_t * vm,
vlib_node_runtime_t * node,
vlib_frame_t * from_frame)
{
return esp_decrypt_post_inline (vm, node, from_frame, 0, 0);
}
VLIB_NODE_FN (esp4_decrypt_tun_node) (vlib_main_t * vm,
vlib_node_runtime_t * node,
vlib_frame_t * from_frame)
{
return esp_decrypt_inline (vm, node, from_frame, 0, 1,
esp_decrypt_async_next.esp4_tun_post_next);
}
VLIB_NODE_FN (esp4_decrypt_tun_post_node) (vlib_main_t * vm,
vlib_node_runtime_t * node,
vlib_frame_t * from_frame)
{
return esp_decrypt_post_inline (vm, node, from_frame, 0, 1);
}
VLIB_NODE_FN (esp6_decrypt_node) (vlib_main_t * vm,
vlib_node_runtime_t * node,
vlib_frame_t * from_frame)
{
return esp_decrypt_inline (vm, node, from_frame, 1, 0,
esp_decrypt_async_next.esp6_post_next);
}
VLIB_NODE_FN (esp6_decrypt_post_node) (vlib_main_t * vm,
vlib_node_runtime_t * node,
vlib_frame_t * from_frame)
{
return esp_decrypt_post_inline (vm, node, from_frame, 1, 0);
}
VLIB_NODE_FN (esp6_decrypt_tun_node) (vlib_main_t * vm,
vlib_node_runtime_t * node,
vlib_frame_t * from_frame)
{
return esp_decrypt_inline (vm, node, from_frame, 1, 1,
esp_decrypt_async_next.esp6_tun_post_next);
}
VLIB_NODE_FN (esp6_decrypt_tun_post_node) (vlib_main_t * vm,
vlib_node_runtime_t * node,
vlib_frame_t * from_frame)
{
return esp_decrypt_post_inline (vm, node, from_frame, 1, 1);
}
/* *INDENT-OFF* */
VLIB_REGISTER_NODE (esp4_decrypt_node) = {
.name = "esp4-decrypt",
.vector_size = sizeof (u32),
.format_trace = format_esp_decrypt_trace,
.type = VLIB_NODE_TYPE_INTERNAL,
.n_errors = ESP_DECRYPT_N_ERROR,
.error_counters = esp_decrypt_error_counters,
.n_next_nodes = ESP_DECRYPT_N_NEXT,
.next_nodes = {
[ESP_DECRYPT_NEXT_DROP] = "ip4-drop",
[ESP_DECRYPT_NEXT_IP4_INPUT] = "ip4-input-no-checksum",
[ESP_DECRYPT_NEXT_IP6_INPUT] = "ip6-input",
[ESP_DECRYPT_NEXT_MPLS_INPUT] = "mpls-drop",
[ESP_DECRYPT_NEXT_L2_INPUT] = "l2-input",
[ESP_DECRYPT_NEXT_HANDOFF] = "esp4-decrypt-handoff",
},
};
VLIB_REGISTER_NODE (esp4_decrypt_post_node) = {
.name = "esp4-decrypt-post",
.vector_size = sizeof (u32),
.format_trace = format_esp_decrypt_trace,
.type = VLIB_NODE_TYPE_INTERNAL,
.n_errors = ESP_DECRYPT_N_ERROR,
.error_counters = esp_decrypt_error_counters,
.sibling_of = "esp4-decrypt",
};
VLIB_REGISTER_NODE (esp6_decrypt_node) = {
.name = "esp6-decrypt",
.vector_size = sizeof (u32),
.format_trace = format_esp_decrypt_trace,
.type = VLIB_NODE_TYPE_INTERNAL,
.n_errors = ESP_DECRYPT_N_ERROR,
.error_counters = esp_decrypt_error_counters,
.n_next_nodes = ESP_DECRYPT_N_NEXT,
.next_nodes = {
[ESP_DECRYPT_NEXT_DROP] = "ip6-drop",
[ESP_DECRYPT_NEXT_IP4_INPUT] = "ip4-input-no-checksum",
[ESP_DECRYPT_NEXT_IP6_INPUT] = "ip6-input",
[ESP_DECRYPT_NEXT_MPLS_INPUT] = "mpls-drop",
[ESP_DECRYPT_NEXT_L2_INPUT] = "l2-input",
[ESP_DECRYPT_NEXT_HANDOFF]= "esp6-decrypt-handoff",
},
};
VLIB_REGISTER_NODE (esp6_decrypt_post_node) = {
.name = "esp6-decrypt-post",
.vector_size = sizeof (u32),
.format_trace = format_esp_decrypt_trace,
.type = VLIB_NODE_TYPE_INTERNAL,
.n_errors = ESP_DECRYPT_N_ERROR,
.error_counters = esp_decrypt_error_counters,
.sibling_of = "esp6-decrypt",
};
VLIB_REGISTER_NODE (esp4_decrypt_tun_node) = {
.name = "esp4-decrypt-tun",
.vector_size = sizeof (u32),
.format_trace = format_esp_decrypt_trace,
.type = VLIB_NODE_TYPE_INTERNAL,
.n_errors = ESP_DECRYPT_N_ERROR,
.error_counters = esp_decrypt_error_counters,
.n_next_nodes = ESP_DECRYPT_N_NEXT,
.next_nodes = {
[ESP_DECRYPT_NEXT_DROP] = "ip4-drop",
[ESP_DECRYPT_NEXT_IP4_INPUT] = "ip4-input-no-checksum",
[ESP_DECRYPT_NEXT_IP6_INPUT] = "ip6-input",
[ESP_DECRYPT_NEXT_MPLS_INPUT] = "mpls-input",
[ESP_DECRYPT_NEXT_L2_INPUT] = "l2-input",
[ESP_DECRYPT_NEXT_HANDOFF] = "esp4-decrypt-tun-handoff",
},
};
VLIB_REGISTER_NODE (esp4_decrypt_tun_post_node) = {
.name = "esp4-decrypt-tun-post",
.vector_size = sizeof (u32),
.format_trace = format_esp_decrypt_trace,
.type = VLIB_NODE_TYPE_INTERNAL,
.n_errors = ESP_DECRYPT_N_ERROR,
.error_counters = esp_decrypt_error_counters,
.sibling_of = "esp4-decrypt-tun",
};
VLIB_REGISTER_NODE (esp6_decrypt_tun_node) = {
.name = "esp6-decrypt-tun",
.vector_size = sizeof (u32),
.format_trace = format_esp_decrypt_trace,
.type = VLIB_NODE_TYPE_INTERNAL,
.n_errors = ESP_DECRYPT_N_ERROR,
.error_counters = esp_decrypt_error_counters,
.n_next_nodes = ESP_DECRYPT_N_NEXT,
.next_nodes = {
[ESP_DECRYPT_NEXT_DROP] = "ip6-drop",
[ESP_DECRYPT_NEXT_IP4_INPUT] = "ip4-input-no-checksum",
[ESP_DECRYPT_NEXT_IP6_INPUT] = "ip6-input",
[ESP_DECRYPT_NEXT_MPLS_INPUT] = "mpls-input",
[ESP_DECRYPT_NEXT_L2_INPUT] = "l2-input",
[ESP_DECRYPT_NEXT_HANDOFF]= "esp6-decrypt-tun-handoff",
},
};
VLIB_REGISTER_NODE (esp6_decrypt_tun_post_node) = {
.name = "esp6-decrypt-tun-post",
.vector_size = sizeof (u32),
.format_trace = format_esp_decrypt_trace,
.type = VLIB_NODE_TYPE_INTERNAL,
.n_errors = ESP_DECRYPT_N_ERROR,
.error_counters = esp_decrypt_error_counters,
.sibling_of = "esp6-decrypt-tun",
};
/* *INDENT-ON* */
#ifndef CLIB_MARCH_VARIANT
static clib_error_t *
esp_decrypt_init (vlib_main_t *vm)
{
ipsec_main_t *im = &ipsec_main;
im->esp4_dec_fq_index =
vlib_frame_queue_main_init (esp4_decrypt_node.index, 0);
im->esp6_dec_fq_index =
vlib_frame_queue_main_init (esp6_decrypt_node.index, 0);
im->esp4_dec_tun_fq_index =
vlib_frame_queue_main_init (esp4_decrypt_tun_node.index, 0);
im->esp6_dec_tun_fq_index =
vlib_frame_queue_main_init (esp6_decrypt_tun_node.index, 0);
return 0;
}
VLIB_INIT_FUNCTION (esp_decrypt_init);
#endif
/*
* fd.io coding-style-patch-verification: ON
*
* Local Variables:
* eval: (c-set-style "gnu")
* End:
*/