src/vnet/ipsec/ipsec_format.c - fdio/vpp - Gitiles

 /*
  * 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>
 #include <vnet/ipsec/ipsec_itf.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)
 {
   ipsec_crypto_alg_t *r = va_arg (*args, ipsec_crypto_alg_t *);

   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)
 {
   ipsec_integ_alg_t *r = va_arg (*args, ipsec_integ_alg_t *);

   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 != IPSEC_POLICY_PROTOCOL_ANY)
     {
       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_out_spd_flow_cache (u8 *s, va_list *args)
 {
   ipsec_main_t *im = &ipsec_main;

   s = format (s, "\nipv4-outbound-spd-flow-cache-entries: %u",
 	      im->ipsec4_out_spd_flow_cache_entries);

   return (s);
 }

 u8 *
 format_ipsec_in_spd_flow_cache (u8 *s, va_list *args)
 {
   ipsec_main_t *im = &ipsec_main;

   s = format (s, "\nipv4-inbound-spd-flow-cache-entries: %u",
 	      im->ipsec4_in_spd_flow_cache_entries);

   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);
   vlib_counter_t counts;
   counter_t lost;
   ipsec_sa_t *sa;

   if (pool_is_free_index (ipsec_sa_pool, sai))
     {
       s = format (s, "No such SA index: %d", sai);
       goto done;
     }

   sa = ipsec_sa_get (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   thread-index:%d", sa->thread_index);
   s = format (s, "\n   seq %u seq-hi %u", sa->seq, sa->seq_hi);
   s = format (s, "\n   window %U", 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]");
   s = format (s, "\n   UDP:[src:%d dst:%d]",
 	      clib_host_to_net_u16 (sa->udp_hdr.src_port),
 	      clib_host_to_net_u16 (sa->udp_hdr.dst_port));

   vlib_get_combined_counter (&ipsec_sa_counters, sai, &counts);
   lost = vlib_get_simple_counter (&ipsec_sa_lost_counters, sai);
   s = format (s, "\n   tx/rx:[packets:%Ld bytes:%Ld], lost:[packets:%Ld]",
 	      counts.packets, counts.bytes, lost);

   if (ipsec_sa_is_set_IS_TUNNEL (sa))
     s = format (s, "\n%U", format_tunnel, &sa->tunnel, 3);

 done:
   return (s);
 }

 u8 *
 format_ipsec_tun_protect_index (u8 * s, va_list * args)
 {
   u32 itpi = va_arg (*args, index_t);
   ipsec_tun_protect_t *itp;

   if (pool_is_free_index (ipsec_tun_protect_pool, itpi))
     return (format (s, "No such tunnel index: %d", itpi));

   itp = pool_elt_at_index (ipsec_tun_protect_pool, itpi);

   return (format (s, "%U", format_ipsec_tun_protect, itp));
 }

 u8 *
 format_ipsec_tun_protect_flags (u8 * s, va_list * args)
 {
   ipsec_protect_flags_t flags = va_arg (*args, int);

   if (IPSEC_PROTECT_NONE == flags)
     s = format (s, "none");
 #define _(a,b,c)                                \
   else if (flags & IPSEC_PROTECT_##a)           \
     s = format (s, "%s", c);                    \
   foreach_ipsec_protect_flags
 #undef _

   return (s);
 }

 u8 *
 format_ipsec_tun_protect (u8 * s, va_list * args)
 {
   ipsec_tun_protect_t *itp = va_arg (*args, ipsec_tun_protect_t *);
   u32 sai;

   s = format (s, "%U flags:[%U]", format_vnet_sw_if_index_name,
 	      vnet_get_main (), itp->itp_sw_if_index,
 	      format_ipsec_tun_protect_flags, itp->itp_flags);
   if (!ip_address_is_zero (itp->itp_key))
     s = format (s, ": %U", format_ip_address, itp->itp_key);
   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* */

   return (s);
 }

 u8 *
 format_ipsec4_tunnel_kv (u8 * s, va_list * args)
 {
   ipsec4_tunnel_kv_t *kv = va_arg (*args, ipsec4_tunnel_kv_t *);
   ip4_address_t ip;
   u32 spi;

   ipsec4_tunnel_extract_key (kv, &ip, &spi);

   s = format (s, "remote:%U spi:%u (0x%08x) sa:%d tun:%d",
 	      format_ip4_address, &ip,
 	      clib_net_to_host_u32 (spi),
 	      clib_net_to_host_u32 (spi),
 	      kv->value.sa_index, kv->value.tun_index);

   return (s);
 }

 u8 *
 format_ipsec6_tunnel_kv (u8 * s, va_list * args)
 {
   ipsec6_tunnel_kv_t *kv = va_arg (*args, ipsec6_tunnel_kv_t *);

   s = format (s, "remote:%U spi:%u (0x%08x) sa:%d tun:%d",
 	      format_ip6_address, &kv->key.remote_ip,
 	      clib_net_to_host_u32 (kv->key.spi),
 	      clib_net_to_host_u32 (kv->key.spi),
 	      kv->value.sa_index, kv->value.tun_index);

   return (s);
 }

 u8 *
 format_ipsec_itf (u8 * s, va_list * a)
 {
   index_t ii = va_arg (*a, index_t);
   ipsec_itf_t *itf;

   itf = ipsec_itf_get (ii);
   s = format (s, "[%d] %U %U",
 	      ii, format_vnet_sw_if_index_name, vnet_get_main (),
 	      itf->ii_sw_if_index, format_tunnel_mode, itf->ii_mode);

   return (s);
 }

 /*
  * fd.io coding-style-patch-verification: ON
  *
  * Local Variables:
  * eval: (c-set-style "gnu")
  * End:
  */
	/*
	* 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>
	#include <vnet/ipsec/ipsec_itf.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)
	{
	ipsec_crypto_alg_t r = va_arg (args, ipsec_crypto_alg_t *);

	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)
	{
	ipsec_integ_alg_t r = va_arg (args, ipsec_integ_alg_t *);

	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 != IPSEC_POLICY_PROTOCOL_ANY)
	{
	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_out_spd_flow_cache (u8 s, va_list args)
	{
	ipsec_main_t *im = &ipsec_main;

	s = format (s, "\nipv4-outbound-spd-flow-cache-entries: %u",
	im->ipsec4_out_spd_flow_cache_entries);

	return (s);
	}

	u8 *
	format_ipsec_in_spd_flow_cache (u8 s, va_list args)
	{
	ipsec_main_t *im = &ipsec_main;

	s = format (s, "\nipv4-inbound-spd-flow-cache-entries: %u",
	im->ipsec4_in_spd_flow_cache_entries);

	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);
	vlib_counter_t counts;
	counter_t lost;
	ipsec_sa_t *sa;

	if (pool_is_free_index (ipsec_sa_pool, sai))
	{
	s = format (s, "No such SA index: %d", sai);
	goto done;
	}

	sa = ipsec_sa_get (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 thread-index:%d", sa->thread_index);
	s = format (s, "\n seq %u seq-hi %u", sa->seq, sa->seq_hi);
	s = format (s, "\n window %U", 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]");
	s = format (s, "\n UDP:[src:%d dst:%d]",
	clib_host_to_net_u16 (sa->udp_hdr.src_port),
	clib_host_to_net_u16 (sa->udp_hdr.dst_port));

	vlib_get_combined_counter (&ipsec_sa_counters, sai, &counts);
	lost = vlib_get_simple_counter (&ipsec_sa_lost_counters, sai);
	s = format (s, "\n tx/rx:[packets:%Ld bytes:%Ld], lost:[packets:%Ld]",
	counts.packets, counts.bytes, lost);

	if (ipsec_sa_is_set_IS_TUNNEL (sa))
	s = format (s, "\n%U", format_tunnel, &sa->tunnel, 3);

	done:
	return (s);
	}

	u8 *
	format_ipsec_tun_protect_index (u8 * s, va_list * args)
	{
	u32 itpi = va_arg (*args, index_t);
	ipsec_tun_protect_t *itp;

	if (pool_is_free_index (ipsec_tun_protect_pool, itpi))
	return (format (s, "No such tunnel index: %d", itpi));

	itp = pool_elt_at_index (ipsec_tun_protect_pool, itpi);

	return (format (s, "%U", format_ipsec_tun_protect, itp));
	}

	u8 *
	format_ipsec_tun_protect_flags (u8 * s, va_list * args)
	{
	ipsec_protect_flags_t flags = va_arg (*args, int);

	if (IPSEC_PROTECT_NONE == flags)
	s = format (s, "none");
	#define _(a,b,c) \
	else if (flags & IPSEC_PROTECT_##a) \
	s = format (s, "%s", c); \
	foreach_ipsec_protect_flags
	#undef _

	return (s);
	}

	u8 *
	format_ipsec_tun_protect (u8 * s, va_list * args)
	{
	ipsec_tun_protect_t itp = va_arg (args, ipsec_tun_protect_t *);
	u32 sai;

	s = format (s, "%U flags:[%U]", format_vnet_sw_if_index_name,
	vnet_get_main (), itp->itp_sw_if_index,
	format_ipsec_tun_protect_flags, itp->itp_flags);
	if (!ip_address_is_zero (itp->itp_key))
	s = format (s, ": %U", format_ip_address, itp->itp_key);
	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 */

	return (s);
	}

	u8 *
	format_ipsec4_tunnel_kv (u8 * s, va_list * args)
	{
	ipsec4_tunnel_kv_t kv = va_arg (args, ipsec4_tunnel_kv_t *);
	ip4_address_t ip;
	u32 spi;

	ipsec4_tunnel_extract_key (kv, &ip, &spi);

	s = format (s, "remote:%U spi:%u (0x%08x) sa:%d tun:%d",
	format_ip4_address, &ip,
	clib_net_to_host_u32 (spi),
	clib_net_to_host_u32 (spi),
	kv->value.sa_index, kv->value.tun_index);

	return (s);
	}

	u8 *
	format_ipsec6_tunnel_kv (u8 * s, va_list * args)
	{
	ipsec6_tunnel_kv_t kv = va_arg (args, ipsec6_tunnel_kv_t *);

	s = format (s, "remote:%U spi:%u (0x%08x) sa:%d tun:%d",
	format_ip6_address, &kv->key.remote_ip,
	clib_net_to_host_u32 (kv->key.spi),
	clib_net_to_host_u32 (kv->key.spi),
	kv->value.sa_index, kv->value.tun_index);

	return (s);
	}

	u8 *
	format_ipsec_itf (u8 * s, va_list * a)
	{
	index_t ii = va_arg (*a, index_t);
	ipsec_itf_t *itf;

	itf = ipsec_itf_get (ii);
	s = format (s, "[%d] %U %U",
	ii, format_vnet_sw_if_index_name, vnet_get_main (),
	itf->ii_sw_if_index, format_tunnel_mode, itf->ii_mode);

	return (s);
	}

	/*
	* fd.io coding-style-patch-verification: ON
	*
	* Local Variables:
	* eval: (c-set-style "gnu")
	* End:
	*/