blob: e6e828931dd6361776613131536c230cb99fa745 [file] [log] [blame]
/*
* decap.c : IPSec tunnel support
*
* 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/interface.h>
#include <vnet/fib/fib_table.h>
#include <vnet/ipsec/ipsec.h>
#include <vnet/ipsec/ipsec_tun.h>
u8 *
format_ipsec_policy_action (u8 * s, va_list * args)
{
u32 i = va_arg (*args, u32);
char *t = 0;
switch (i)
{
#define _(v,f,str) case IPSEC_POLICY_ACTION_##f: t = str; break;
foreach_ipsec_policy_action
#undef _
default:
s = format (s, "unknown");
}
s = format (s, "%s", t);
return s;
}
u8 *
format_ipsec_policy_type (u8 * s, va_list * args)
{
u32 i = va_arg (*args, u32);
char *t = 0;
switch (i)
{
#define _(f,str) case IPSEC_SPD_POLICY_##f: t = str; break;
foreach_ipsec_spd_policy_type
#undef _
default:
s = format (s, "unknown");
}
s = format (s, "%s", t);
return s;
}
uword
unformat_ipsec_policy_action (unformat_input_t * input, va_list * args)
{
u32 *r = va_arg (*args, u32 *);
if (0);
#define _(v,f,s) else if (unformat (input, s)) *r = IPSEC_POLICY_ACTION_##f;
foreach_ipsec_policy_action
#undef _
else
return 0;
return 1;
}
u8 *
format_ipsec_crypto_alg (u8 * s, va_list * args)
{
u32 i = va_arg (*args, u32);
u8 *t = 0;
switch (i)
{
#define _(v,f,str) case IPSEC_CRYPTO_ALG_##f: t = (u8 *) str; break;
foreach_ipsec_crypto_alg
#undef _
default:
s = format (s, "unknown");
}
s = format (s, "%s", t);
return s;
}
uword
unformat_ipsec_crypto_alg (unformat_input_t * input, va_list * args)
{
u32 *r = va_arg (*args, u32 *);
if (0);
#define _(v,f,s) else if (unformat (input, s)) *r = IPSEC_CRYPTO_ALG_##f;
foreach_ipsec_crypto_alg
#undef _
else
return 0;
return 1;
}
u8 *
format_ipsec_integ_alg (u8 * s, va_list * args)
{
u32 i = va_arg (*args, u32);
u8 *t = 0;
switch (i)
{
#define _(v,f,str) case IPSEC_INTEG_ALG_##f: t = (u8 *) str; break;
foreach_ipsec_integ_alg
#undef _
default:
s = format (s, "unknown");
}
s = format (s, "%s", t);
return s;
}
uword
unformat_ipsec_integ_alg (unformat_input_t * input, va_list * args)
{
u32 *r = va_arg (*args, u32 *);
if (0);
#define _(v,f,s) else if (unformat (input, s)) *r = IPSEC_INTEG_ALG_##f;
foreach_ipsec_integ_alg
#undef _
else
return 0;
return 1;
}
u8 *
format_ipsec_replay_window (u8 * s, va_list * args)
{
u64 w = va_arg (*args, u64);
u8 i;
for (i = 0; i < 64; i++)
{
s = format (s, "%u", w & (1ULL << i) ? 1 : 0);
}
return s;
}
u8 *
format_ipsec_policy (u8 * s, va_list * args)
{
u32 pi = va_arg (*args, u32);
ip46_type_t ip_type = IP46_TYPE_IP4;
ipsec_main_t *im = &ipsec_main;
ipsec_policy_t *p;
vlib_counter_t counts;
p = pool_elt_at_index (im->policies, pi);
s = format (s, " [%d] priority %d action %U type %U protocol ",
pi, p->priority,
format_ipsec_policy_action, p->policy,
format_ipsec_policy_type, p->type);
if (p->protocol)
{
s = format (s, "%U", format_ip_protocol, p->protocol);
}
else
{
s = format (s, "any");
}
if (p->policy == IPSEC_POLICY_ACTION_PROTECT)
{
s = format (s, " sa %u", p->sa_id);
}
if (p->is_ipv6)
{
ip_type = IP46_TYPE_IP6;
}
s = format (s, "\n local addr range %U - %U port range %u - %u",
format_ip46_address, &p->laddr.start, ip_type,
format_ip46_address, &p->laddr.stop, ip_type,
p->lport.start, p->lport.stop);
s = format (s, "\n remote addr range %U - %U port range %u - %u",
format_ip46_address, &p->raddr.start, ip_type,
format_ip46_address, &p->raddr.stop, ip_type,
p->rport.start, p->rport.stop);
vlib_get_combined_counter (&ipsec_spd_policy_counters, pi, &counts);
s = format (s, "\n packets %u bytes %u", counts.packets, counts.bytes);
return (s);
}
u8 *
format_ipsec_spd (u8 * s, va_list * args)
{
u32 si = va_arg (*args, u32);
ipsec_main_t *im = &ipsec_main;
ipsec_spd_t *spd;
u32 *i;
if (pool_is_free_index (im->spds, si))
{
s = format (s, "No such SPD index: %d", si);
goto done;
}
spd = pool_elt_at_index (im->spds, si);
s = format (s, "spd %u", spd->id);
#define _(v, n) \
s = format (s, "\n %s:", n); \
vec_foreach(i, spd->policies[IPSEC_SPD_POLICY_##v]) \
{ \
s = format (s, "\n %U", format_ipsec_policy, *i); \
}
foreach_ipsec_spd_policy_type;
#undef _
done:
return (s);
}
u8 *
format_ipsec_key (u8 * s, va_list * args)
{
ipsec_key_t *key = va_arg (*args, ipsec_key_t *);
return (format (s, "%U", format_hex_bytes, key->data, key->len));
}
uword
unformat_ipsec_key (unformat_input_t * input, va_list * args)
{
ipsec_key_t *key = va_arg (*args, ipsec_key_t *);
u8 *data;
if (unformat (input, "%U", unformat_hex_string, &data))
{
ipsec_mk_key (key, data, vec_len (data));
vec_free (data);
}
else
return 0;
return 1;
}
u8 *
format_ipsec_sa_flags (u8 * s, va_list * args)
{
ipsec_sa_flags_t flags = va_arg (*args, int);
#define _(v, f, str) if (flags & IPSEC_SA_FLAG_##f) s = format(s, "%s ", str);
foreach_ipsec_sa_flags
#undef _
return (s);
}
u8 *
format_ipsec_sa (u8 * s, va_list * args)
{
u32 sai = va_arg (*args, u32);
ipsec_format_flags_t flags = va_arg (*args, ipsec_format_flags_t);
ipsec_main_t *im = &ipsec_main;
vlib_counter_t counts;
u32 tx_table_id;
ipsec_sa_t *sa;
if (pool_is_free_index (im->sad, sai))
{
s = format (s, "No such SA index: %d", sai);
goto done;
}
sa = pool_elt_at_index (im->sad, sai);
s = format (s, "[%d] sa %u (0x%x) spi %u (0x%08x) protocol:%s flags:[%U]",
sai, sa->id, sa->id, sa->spi, sa->spi,
sa->protocol ? "esp" : "ah", format_ipsec_sa_flags, sa->flags);
if (!(flags & IPSEC_FORMAT_DETAIL))
goto done;
s = format (s, "\n locks %d", sa->node.fn_locks);
s = format (s, "\n salt 0x%x", clib_net_to_host_u32 (sa->salt));
s = format (s, "\n seq %u seq-hi %u", sa->seq, sa->seq_hi);
s = format (s, "\n last-seq %u last-seq-hi %u window %U",
sa->last_seq, sa->last_seq_hi,
format_ipsec_replay_window, sa->replay_window);
s = format (s, "\n crypto alg %U",
format_ipsec_crypto_alg, sa->crypto_alg);
if (sa->crypto_alg && (flags & IPSEC_FORMAT_INSECURE))
s = format (s, " key %U", format_ipsec_key, &sa->crypto_key);
else
s = format (s, " key [redacted]");
s = format (s, "\n integrity alg %U",
format_ipsec_integ_alg, sa->integ_alg);
if (sa->integ_alg && (flags & IPSEC_FORMAT_INSECURE))
s = format (s, " key %U", format_ipsec_key, &sa->integ_key);
else
s = format (s, " key [redacted]");
vlib_get_combined_counter (&ipsec_sa_counters, sai, &counts);
s = format (s, "\n packets %u bytes %u", counts.packets, counts.bytes);
if (ipsec_sa_is_set_IS_TUNNEL (sa))
{
tx_table_id = fib_table_get_table_id (sa->tx_fib_index,
FIB_PROTOCOL_IP4);
s = format (s, "\n table-ID %d tunnel src %U dst %U",
tx_table_id,
format_ip46_address, &sa->tunnel_src_addr, IP46_TYPE_ANY,
format_ip46_address, &sa->tunnel_dst_addr, IP46_TYPE_ANY);
if (!ipsec_sa_is_set_IS_INBOUND (sa))
{
s =
format (s, "\n resovle via fib-entry: %d",
sa->fib_entry_index);
s = format (s, "\n stacked on:");
s = format (s, "\n %U", format_dpo_id, &sa->dpo, 6);
}
}
done:
return (s);
}
u8 *
format_ipsec_tun_protect (u8 * s, va_list * args)
{
u32 itpi = va_arg (*args, u32);
ipsec_tun_protect_t *itp;
u32 sai;
if (pool_is_free_index (ipsec_protect_pool, itpi))
{
s = format (s, "No such tunnel index: %d", itpi);
goto done;
}
itp = pool_elt_at_index (ipsec_protect_pool, itpi);
s = format (s, "%U", format_vnet_sw_if_index_name,
vnet_get_main (), itp->itp_sw_if_index);
s = format (s, "\n output-sa:");
s =
format (s, "\n %U", format_ipsec_sa, itp->itp_out_sa,
IPSEC_FORMAT_BRIEF);
s = format (s, "\n input-sa:");
/* *INDENT-OFF* */
FOR_EACH_IPSEC_PROTECT_INPUT_SAI(itp, sai,
({
s = format (s, "\n %U", format_ipsec_sa, sai, IPSEC_FORMAT_BRIEF);
}));
/* *INDENT-ON* */
done:
return (s);
}
u8 *
format_ipsec4_tunnel_key (u8 * s, va_list * args)
{
ipsec4_tunnel_key_t *key = va_arg (*args, ipsec4_tunnel_key_t *);
s = format (s, "remote:%U spi:%u (0x%08x)",
format_ip4_address, &key->remote_ip,
clib_net_to_host_u32 (key->spi),
clib_net_to_host_u32 (key->spi));
return (s);
}
u8 *
format_ipsec6_tunnel_key (u8 * s, va_list * args)
{
ipsec6_tunnel_key_t *key = va_arg (*args, ipsec6_tunnel_key_t *);
s = format (s, "remote:%U spi:%u (0x%08x)",
format_ip6_address, &key->remote_ip,
clib_net_to_host_u32 (key->spi),
clib_net_to_host_u32 (key->spi));
return (s);
}
/*
* fd.io coding-style-patch-verification: ON
*
* Local Variables:
* eval: (c-set-style "gnu")
* End:
*/