IPSEC: tunnel scaling - don't stack the inbould SA
[vpp.git] / src / vnet / ipsec / ipsec_format.c
1 /*
2  * decap.c : IPSec tunnel support
3  *
4  * Copyright (c) 2015 Cisco and/or its affiliates.
5  * Licensed under the Apache License, Version 2.0 (the "License");
6  * you may not use this file except in compliance with the License.
7  * You may obtain a copy of the License at:
8  *
9  *     http://www.apache.org/licenses/LICENSE-2.0
10  *
11  * Unless required by applicable law or agreed to in writing, software
12  * distributed under the License is distributed on an "AS IS" BASIS,
13  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14  * See the License for the specific language governing permissions and
15  * limitations under the License.
16  */
17
18 #include <vnet/vnet.h>
19 #include <vnet/api_errno.h>
20 #include <vnet/ip/ip.h>
21 #include <vnet/interface.h>
22 #include <vnet/fib/fib_table.h>
23
24 #include <vnet/ipsec/ipsec.h>
25
26 u8 *
27 format_ipsec_policy_action (u8 * s, va_list * args)
28 {
29   u32 i = va_arg (*args, u32);
30   char *t = 0;
31
32   switch (i)
33     {
34 #define _(v,f,str) case IPSEC_POLICY_ACTION_##f: t = str; break;
35       foreach_ipsec_policy_action
36 #undef _
37     default:
38       s = format (s, "unknown");
39     }
40   s = format (s, "%s", t);
41   return s;
42 }
43
44 u8 *
45 format_ipsec_policy_type (u8 * s, va_list * args)
46 {
47   u32 i = va_arg (*args, u32);
48   char *t = 0;
49
50   switch (i)
51     {
52 #define _(f,str) case IPSEC_SPD_POLICY_##f: t = str; break;
53       foreach_ipsec_spd_policy_type
54 #undef _
55     default:
56       s = format (s, "unknown");
57     }
58   s = format (s, "%s", t);
59   return s;
60 }
61
62 uword
63 unformat_ipsec_policy_action (unformat_input_t * input, va_list * args)
64 {
65   u32 *r = va_arg (*args, u32 *);
66
67   if (0);
68 #define _(v,f,s) else if (unformat (input, s)) *r = IPSEC_POLICY_ACTION_##f;
69   foreach_ipsec_policy_action
70 #undef _
71     else
72     return 0;
73   return 1;
74 }
75
76 u8 *
77 format_ipsec_crypto_alg (u8 * s, va_list * args)
78 {
79   u32 i = va_arg (*args, u32);
80   u8 *t = 0;
81
82   switch (i)
83     {
84 #define _(v,f,str) case IPSEC_CRYPTO_ALG_##f: t = (u8 *) str; break;
85       foreach_ipsec_crypto_alg
86 #undef _
87     default:
88       s = format (s, "unknown");
89     }
90   s = format (s, "%s", t);
91   return s;
92 }
93
94 uword
95 unformat_ipsec_crypto_alg (unformat_input_t * input, va_list * args)
96 {
97   u32 *r = va_arg (*args, u32 *);
98
99   if (0);
100 #define _(v,f,s) else if (unformat (input, s)) *r = IPSEC_CRYPTO_ALG_##f;
101   foreach_ipsec_crypto_alg
102 #undef _
103     else
104     return 0;
105   return 1;
106 }
107
108 u8 *
109 format_ipsec_integ_alg (u8 * s, va_list * args)
110 {
111   u32 i = va_arg (*args, u32);
112   u8 *t = 0;
113
114   switch (i)
115     {
116 #define _(v,f,str) case IPSEC_INTEG_ALG_##f: t = (u8 *) str; break;
117       foreach_ipsec_integ_alg
118 #undef _
119     default:
120       s = format (s, "unknown");
121     }
122   s = format (s, "%s", t);
123   return s;
124 }
125
126 uword
127 unformat_ipsec_integ_alg (unformat_input_t * input, va_list * args)
128 {
129   u32 *r = va_arg (*args, u32 *);
130
131   if (0);
132 #define _(v,f,s) else if (unformat (input, s)) *r = IPSEC_INTEG_ALG_##f;
133   foreach_ipsec_integ_alg
134 #undef _
135     else
136     return 0;
137   return 1;
138 }
139
140 u8 *
141 format_ipsec_replay_window (u8 * s, va_list * args)
142 {
143   u64 w = va_arg (*args, u64);
144   u8 i;
145
146   for (i = 0; i < 64; i++)
147     {
148       s = format (s, "%u", w & (1ULL << i) ? 1 : 0);
149     }
150
151   return s;
152 }
153
154 u8 *
155 format_ipsec_policy (u8 * s, va_list * args)
156 {
157   u32 pi = va_arg (*args, u32);
158   ipsec_main_t *im = &ipsec_main;
159   ipsec_policy_t *p;
160   vlib_counter_t counts;
161
162   p = pool_elt_at_index (im->policies, pi);
163
164   s = format (s, "  [%d] priority %d action %U type %U protocol ",
165               pi, p->priority,
166               format_ipsec_policy_action, p->policy,
167               format_ipsec_policy_type, p->type);
168   if (p->protocol)
169     {
170       s = format (s, "%U", format_ip_protocol, p->protocol);
171     }
172   else
173     {
174       s = format (s, "any");
175     }
176   if (p->policy == IPSEC_POLICY_ACTION_PROTECT)
177     {
178       s = format (s, " sa %u", p->sa_id);
179     }
180
181   s = format (s, "\n     local addr range %U - %U port range %u - %u",
182               format_ip46_address, &p->laddr.start, IP46_TYPE_ANY,
183               format_ip46_address, &p->laddr.stop, IP46_TYPE_ANY,
184               clib_net_to_host_u16 (p->lport.start),
185               clib_net_to_host_u16 (p->lport.stop));
186   s = format (s, "\n     remote addr range %U - %U port range %u - %u",
187               format_ip46_address, &p->raddr.start, IP46_TYPE_ANY,
188               format_ip46_address, &p->raddr.stop, IP46_TYPE_ANY,
189               clib_net_to_host_u16 (p->rport.start),
190               clib_net_to_host_u16 (p->rport.stop));
191
192   vlib_get_combined_counter (&ipsec_spd_policy_counters, pi, &counts);
193   s = format (s, "\n     packets %u bytes %u", counts.packets, counts.bytes);
194
195   return (s);
196 }
197
198 u8 *
199 format_ipsec_spd (u8 * s, va_list * args)
200 {
201   u32 si = va_arg (*args, u32);
202   ipsec_main_t *im = &ipsec_main;
203   ipsec_spd_t *spd;
204   u32 *i;
205
206   spd = pool_elt_at_index (im->spds, si);
207
208   s = format (s, "spd %u", spd->id);
209
210 #define _(v, n)                                                 \
211   s = format (s, "\n %s:", n);                                  \
212   vec_foreach(i, spd->policies[IPSEC_SPD_POLICY_##v])           \
213   {                                                             \
214     s = format (s, "\n %U", format_ipsec_policy, *i);           \
215   }
216   foreach_ipsec_spd_policy_type;
217 #undef _
218
219   return (s);
220 }
221
222 u8 *
223 format_ipsec_key (u8 * s, va_list * args)
224 {
225   ipsec_key_t *key = va_arg (*args, ipsec_key_t *);
226
227   return (format (s, "%U", format_hex_bytes, key->data, key->len));
228 }
229
230 uword
231 unformat_ipsec_key (unformat_input_t * input, va_list * args)
232 {
233   ipsec_key_t *key = va_arg (*args, ipsec_key_t *);
234   u8 *data;
235
236   if (unformat (input, "%U", unformat_hex_string, &data))
237     {
238       ipsec_mk_key (key, data, vec_len (data));
239       vec_free (data);
240     }
241   else
242     return 0;
243   return 1;
244 }
245
246 u8 *
247 format_ipsec_sa_flags (u8 * s, va_list * args)
248 {
249   ipsec_sa_flags_t flags = va_arg (*args, int);
250
251   if (0)
252     ;
253 #define _(v, f, str) else if (flags & IPSEC_SA_FLAG_##f) s = format(s, "%s ", str);
254   foreach_ipsec_sa_flags
255 #undef _
256     return (s);
257 }
258
259 u8 *
260 format_ipsec_sa (u8 * s, va_list * args)
261 {
262   u32 sai = va_arg (*args, u32);
263   ipsec_main_t *im = &ipsec_main;
264   vlib_counter_t counts;
265   u32 tx_table_id;
266   ipsec_sa_t *sa;
267
268   sa = pool_elt_at_index (im->sad, sai);
269
270   s = format (s, "[%d] sa 0x%x spi %u mode %s%s protocol %s %U",
271               sai, sa->id, sa->spi,
272               ipsec_sa_is_set_IS_TUNNEL (sa) ? "tunnel" : "transport",
273               ipsec_sa_is_set_IS_TUNNEL_V6 (sa) ? "-ip6" : "",
274               sa->protocol ? "esp" : "ah", format_ipsec_sa_flags, sa->flags);
275   s = format (s, "\n   seq %u seq-hi %u", sa->seq, sa->seq_hi);
276   s = format (s, "\n   last-seq %u last-seq-hi %u window %U",
277               sa->last_seq, sa->last_seq_hi,
278               format_ipsec_replay_window, sa->replay_window);
279   s = format (s, "\n   crypto alg %U%s%U",
280               format_ipsec_crypto_alg, sa->crypto_alg,
281               sa->crypto_alg ? " key " : "",
282               format_ipsec_key, &sa->crypto_key);
283   s = format (s, "\n   integrity alg %U%s%U",
284               format_ipsec_integ_alg, sa->integ_alg,
285               sa->integ_alg ? " key " : "", format_ipsec_key, &sa->integ_key);
286   vlib_get_combined_counter (&ipsec_sa_counters, sai, &counts);
287   s = format (s, "\n   packets %u bytes %u", counts.packets, counts.bytes);
288
289   if (ipsec_sa_is_set_IS_TUNNEL (sa))
290     {
291       tx_table_id = fib_table_get_table_id (sa->tx_fib_index,
292                                             FIB_PROTOCOL_IP4);
293       s = format (s, "\n   table-ID %d tunnel src %U dst %U",
294                   tx_table_id,
295                   format_ip46_address, &sa->tunnel_src_addr, IP46_TYPE_ANY,
296                   format_ip46_address, &sa->tunnel_dst_addr, IP46_TYPE_ANY);
297       if (!ipsec_sa_is_set_IS_INBOUND (sa))
298         {
299           s =
300             format (s, "\n    resovle via fib-entry: %d",
301                     sa->fib_entry_index);
302           s = format (s, "\n    stacked on:");
303           s =
304             format (s, "\n      %U", format_dpo_id,
305                     &sa->dpo[IPSEC_PROTOCOL_ESP], 6);
306         }
307     }
308
309   return (s);
310 }
311
312 /*
313  * fd.io coding-style-patch-verification: ON
314  *
315  * Local Variables:
316  * eval: (c-set-style "gnu")
317  * End:
318  */