ikev2: add support for custom ipsec-over-udp port
[vpp.git] / src / vnet / ipsec / ipsec_cli.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.h>
23 #include <vnet/ipip/ipip.h>
24
25 #include <vnet/ipsec/ipsec.h>
26 #include <vnet/ipsec/ipsec_tun.h>
27
28 static clib_error_t *
29 set_interface_spd_command_fn (vlib_main_t * vm,
30                               unformat_input_t * input,
31                               vlib_cli_command_t * cmd)
32 {
33   unformat_input_t _line_input, *line_input = &_line_input;
34   ipsec_main_t *im = &ipsec_main;
35   u32 sw_if_index = (u32) ~ 0;
36   u32 spd_id;
37   int is_add = 1;
38   clib_error_t *error = NULL;
39
40   if (!unformat_user (input, unformat_line_input, line_input))
41     return 0;
42
43   if (unformat
44       (line_input, "%U %u", unformat_vnet_sw_interface, im->vnet_main,
45        &sw_if_index, &spd_id))
46     ;
47   else if (unformat (line_input, "del"))
48     is_add = 0;
49   else
50     {
51       error = clib_error_return (0, "parse error: '%U'",
52                                  format_unformat_error, line_input);
53       goto done;
54     }
55
56   ipsec_set_interface_spd (vm, sw_if_index, spd_id, is_add);
57
58 done:
59   unformat_free (line_input);
60
61   return error;
62 }
63
64 /* *INDENT-OFF* */
65 VLIB_CLI_COMMAND (set_interface_spd_command, static) = {
66     .path = "set interface ipsec spd",
67     .short_help =
68     "set interface ipsec spd <int> <id>",
69     .function = set_interface_spd_command_fn,
70 };
71 /* *INDENT-ON* */
72
73 static clib_error_t *
74 ipsec_sa_add_del_command_fn (vlib_main_t * vm,
75                              unformat_input_t * input,
76                              vlib_cli_command_t * cmd)
77 {
78   unformat_input_t _line_input, *line_input = &_line_input;
79   ip46_address_t tun_src = { }, tun_dst =
80   {
81   };
82   ipsec_crypto_alg_t crypto_alg;
83   ipsec_integ_alg_t integ_alg;
84   ipsec_protocol_t proto;
85   ipsec_sa_flags_t flags;
86   clib_error_t *error;
87   ipsec_key_t ck = { 0 };
88   ipsec_key_t ik = { 0 };
89   u32 id, spi, salt;
90   int is_add, rv;
91
92   salt = 0;
93   error = NULL;
94   is_add = 0;
95   flags = IPSEC_SA_FLAG_NONE;
96   proto = IPSEC_PROTOCOL_ESP;
97   integ_alg = IPSEC_INTEG_ALG_NONE;
98   crypto_alg = IPSEC_CRYPTO_ALG_NONE;
99
100   if (!unformat_user (input, unformat_line_input, line_input))
101     return 0;
102
103   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
104     {
105       if (unformat (line_input, "add %u", &id))
106         is_add = 1;
107       else if (unformat (line_input, "del %u", &id))
108         is_add = 0;
109       else if (unformat (line_input, "spi %u", &spi))
110         ;
111       else if (unformat (line_input, "salt 0x%x", &salt))
112         ;
113       else if (unformat (line_input, "esp"))
114         proto = IPSEC_PROTOCOL_ESP;
115       else if (unformat (line_input, "ah"))
116         proto = IPSEC_PROTOCOL_AH;
117       else if (unformat (line_input, "crypto-key %U",
118                          unformat_ipsec_key, &ck))
119         ;
120       else if (unformat (line_input, "crypto-alg %U",
121                          unformat_ipsec_crypto_alg, &crypto_alg))
122         ;
123       else if (unformat (line_input, "integ-key %U", unformat_ipsec_key, &ik))
124         ;
125       else if (unformat (line_input, "integ-alg %U",
126                          unformat_ipsec_integ_alg, &integ_alg))
127         ;
128       else if (unformat (line_input, "tunnel-src %U",
129                          unformat_ip46_address, &tun_src, IP46_TYPE_ANY))
130         {
131           flags |= IPSEC_SA_FLAG_IS_TUNNEL;
132           if (!ip46_address_is_ip4 (&tun_src))
133             flags |= IPSEC_SA_FLAG_IS_TUNNEL_V6;
134         }
135       else if (unformat (line_input, "tunnel-dst %U",
136                          unformat_ip46_address, &tun_dst, IP46_TYPE_ANY))
137         ;
138       else if (unformat (line_input, "udp-encap"))
139         flags |= IPSEC_SA_FLAG_UDP_ENCAP;
140       else
141         {
142           error = clib_error_return (0, "parse error: '%U'",
143                                      format_unformat_error, line_input);
144           goto done;
145         }
146     }
147
148   if (is_add)
149     rv = ipsec_sa_add_and_lock (id, spi, proto, crypto_alg,
150                                 &ck, integ_alg, &ik, flags,
151                                 0, clib_host_to_net_u32 (salt),
152                                 &tun_src, &tun_dst, NULL,
153                                 IPSEC_UDP_PORT_NONE);
154   else
155     rv = ipsec_sa_unlock_id (id);
156
157   if (rv)
158     error = clib_error_return (0, "failed");
159
160 done:
161   unformat_free (line_input);
162
163   return error;
164 }
165
166 /* *INDENT-OFF* */
167 VLIB_CLI_COMMAND (ipsec_sa_add_del_command, static) = {
168     .path = "ipsec sa",
169     .short_help =
170     "ipsec sa [add|del]",
171     .function = ipsec_sa_add_del_command_fn,
172 };
173 /* *INDENT-ON* */
174
175 static clib_error_t *
176 ipsec_spd_add_del_command_fn (vlib_main_t * vm,
177                               unformat_input_t * input,
178                               vlib_cli_command_t * cmd)
179 {
180   unformat_input_t _line_input, *line_input = &_line_input;
181   u32 spd_id = ~0;
182   int is_add = ~0;
183   clib_error_t *error = NULL;
184
185   if (!unformat_user (input, unformat_line_input, line_input))
186     return 0;
187
188   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
189     {
190       if (unformat (line_input, "add"))
191         is_add = 1;
192       else if (unformat (line_input, "del"))
193         is_add = 0;
194       else if (unformat (line_input, "%u", &spd_id))
195         ;
196       else
197         {
198           error = clib_error_return (0, "parse error: '%U'",
199                                      format_unformat_error, line_input);
200           goto done;
201         }
202     }
203
204   if (spd_id == ~0)
205     {
206       error = clib_error_return (0, "please specify SPD ID");
207       goto done;
208     }
209
210   ipsec_add_del_spd (vm, spd_id, is_add);
211
212 done:
213   unformat_free (line_input);
214
215   return error;
216 }
217
218 /* *INDENT-OFF* */
219 VLIB_CLI_COMMAND (ipsec_spd_add_del_command, static) = {
220     .path = "ipsec spd",
221     .short_help =
222     "ipsec spd [add|del] <id>",
223     .function = ipsec_spd_add_del_command_fn,
224 };
225 /* *INDENT-ON* */
226
227
228 static clib_error_t *
229 ipsec_policy_add_del_command_fn (vlib_main_t * vm,
230                                  unformat_input_t * input,
231                                  vlib_cli_command_t * cmd)
232 {
233   unformat_input_t _line_input, *line_input = &_line_input;
234   ipsec_policy_t p;
235   int rv, is_add = 0;
236   u32 tmp, tmp2, stat_index;
237   clib_error_t *error = NULL;
238   u32 is_outbound;
239
240   clib_memset (&p, 0, sizeof (p));
241   p.lport.stop = p.rport.stop = ~0;
242   is_outbound = 0;
243
244   if (!unformat_user (input, unformat_line_input, line_input))
245     return 0;
246
247   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
248     {
249       if (unformat (line_input, "add"))
250         is_add = 1;
251       else if (unformat (line_input, "del"))
252         is_add = 0;
253       else if (unformat (line_input, "spd %u", &p.id))
254         ;
255       else if (unformat (line_input, "inbound"))
256         is_outbound = 0;
257       else if (unformat (line_input, "outbound"))
258         is_outbound = 1;
259       else if (unformat (line_input, "priority %d", &p.priority))
260         ;
261       else if (unformat (line_input, "protocol %u", &tmp))
262         p.protocol = (u8) tmp;
263       else
264         if (unformat
265             (line_input, "action %U", unformat_ipsec_policy_action,
266              &p.policy))
267         {
268           if (p.policy == IPSEC_POLICY_ACTION_RESOLVE)
269             {
270               error = clib_error_return (0, "unsupported action: 'resolve'");
271               goto done;
272             }
273         }
274       else if (unformat (line_input, "sa %u", &p.sa_id))
275         ;
276       else if (unformat (line_input, "local-ip-range %U - %U",
277                          unformat_ip4_address, &p.laddr.start.ip4,
278                          unformat_ip4_address, &p.laddr.stop.ip4))
279         ;
280       else if (unformat (line_input, "remote-ip-range %U - %U",
281                          unformat_ip4_address, &p.raddr.start.ip4,
282                          unformat_ip4_address, &p.raddr.stop.ip4))
283         ;
284       else if (unformat (line_input, "local-ip-range %U - %U",
285                          unformat_ip6_address, &p.laddr.start.ip6,
286                          unformat_ip6_address, &p.laddr.stop.ip6))
287         {
288           p.is_ipv6 = 1;
289         }
290       else if (unformat (line_input, "remote-ip-range %U - %U",
291                          unformat_ip6_address, &p.raddr.start.ip6,
292                          unformat_ip6_address, &p.raddr.stop.ip6))
293         {
294           p.is_ipv6 = 1;
295         }
296       else if (unformat (line_input, "local-port-range %u - %u", &tmp, &tmp2))
297         {
298           p.lport.start = tmp;
299           p.lport.stop = tmp2;
300         }
301       else
302         if (unformat (line_input, "remote-port-range %u - %u", &tmp, &tmp2))
303         {
304           p.rport.start = tmp;
305           p.rport.stop = tmp2;
306         }
307       else
308         {
309           error = clib_error_return (0, "parse error: '%U'",
310                                      format_unformat_error, line_input);
311           goto done;
312         }
313     }
314
315   rv = ipsec_policy_mk_type (is_outbound, p.is_ipv6, p.policy, &p.type);
316
317   if (rv)
318     {
319       error = clib_error_return (0, "unsupported policy type for:",
320                                  " outboud:%s %s action:%U",
321                                  (is_outbound ? "yes" : "no"),
322                                  (p.is_ipv6 ? "IPv4" : "IPv6"),
323                                  format_ipsec_policy_action, p.policy);
324       goto done;
325     }
326
327   rv = ipsec_add_del_policy (vm, &p, is_add, &stat_index);
328
329   if (!rv)
330     vlib_cli_output (vm, "policy-index:%d", stat_index);
331   else
332     vlib_cli_output (vm, "error:%d", rv);
333
334 done:
335   unformat_free (line_input);
336
337   return error;
338 }
339
340 /* *INDENT-OFF* */
341 VLIB_CLI_COMMAND (ipsec_policy_add_del_command, static) = {
342     .path = "ipsec policy",
343     .short_help =
344     "ipsec policy [add|del] spd <id> priority <n> ",
345     .function = ipsec_policy_add_del_command_fn,
346 };
347 /* *INDENT-ON* */
348
349 static void
350 ipsec_sa_show_all (vlib_main_t * vm, ipsec_main_t * im, u8 detail)
351 {
352   u32 sai;
353
354   /* *INDENT-OFF* */
355   pool_foreach_index (sai, im->sad, ({
356     vlib_cli_output(vm, "%U", format_ipsec_sa, sai,
357                     (detail ? IPSEC_FORMAT_DETAIL : IPSEC_FORMAT_BRIEF));
358   }));
359   /* *INDENT-ON* */
360 }
361
362 static void
363 ipsec_spd_show_all (vlib_main_t * vm, ipsec_main_t * im)
364 {
365   u32 spdi;
366
367   /* *INDENT-OFF* */
368   pool_foreach_index (spdi, im->spds, ({
369     vlib_cli_output(vm, "%U", format_ipsec_spd, spdi);
370   }));
371   /* *INDENT-ON* */
372 }
373
374 static void
375 ipsec_spd_bindings_show_all (vlib_main_t * vm, ipsec_main_t * im)
376 {
377   u32 spd_id, sw_if_index;
378   ipsec_spd_t *spd;
379
380   vlib_cli_output (vm, "SPD Bindings:");
381
382   /* *INDENT-OFF* */
383   hash_foreach(sw_if_index, spd_id, im->spd_index_by_sw_if_index, ({
384     spd = pool_elt_at_index (im->spds, spd_id);
385     vlib_cli_output (vm, "  %d -> %U", spd->id,
386                      format_vnet_sw_if_index_name, im->vnet_main,
387                      sw_if_index);
388   }));
389   /* *INDENT-ON* */
390 }
391
392 static walk_rc_t
393 ipsec_tun_protect_show_one (index_t itpi, void *ctx)
394 {
395   vlib_cli_output (ctx, "%U", format_ipsec_tun_protect_index, itpi);
396
397   return (WALK_CONTINUE);
398 }
399
400 static void
401 ipsec_tunnel_show_all (vlib_main_t * vm)
402 {
403   ipsec_tun_protect_walk (ipsec_tun_protect_show_one, vm);
404 }
405
406 static clib_error_t *
407 show_ipsec_command_fn (vlib_main_t * vm,
408                        unformat_input_t * input, vlib_cli_command_t * cmd)
409 {
410   ipsec_main_t *im = &ipsec_main;
411
412   ipsec_sa_show_all (vm, im, 0);
413   ipsec_spd_show_all (vm, im);
414   ipsec_spd_bindings_show_all (vm, im);
415   ipsec_tun_protect_walk (ipsec_tun_protect_show_one, vm);
416
417   return 0;
418 }
419
420 /* *INDENT-OFF* */
421 VLIB_CLI_COMMAND (show_ipsec_command, static) = {
422     .path = "show ipsec all",
423     .short_help = "show ipsec all",
424     .function = show_ipsec_command_fn,
425 };
426 /* *INDENT-ON* */
427
428 static clib_error_t *
429 show_ipsec_sa_command_fn (vlib_main_t * vm,
430                           unformat_input_t * input, vlib_cli_command_t * cmd)
431 {
432   ipsec_main_t *im = &ipsec_main;
433   u32 sai = ~0;
434   u8 detail = 0;
435
436   while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
437     {
438       if (unformat (input, "%u", &sai))
439         ;
440       if (unformat (input, "detail"))
441         detail = 1;
442       else
443         break;
444     }
445
446   if (~0 == sai)
447     ipsec_sa_show_all (vm, im, detail);
448   else
449     vlib_cli_output (vm, "%U", format_ipsec_sa, sai,
450                      IPSEC_FORMAT_DETAIL | IPSEC_FORMAT_INSECURE);
451
452   return 0;
453 }
454
455 static clib_error_t *
456 clear_ipsec_sa_command_fn (vlib_main_t * vm,
457                            unformat_input_t * input, vlib_cli_command_t * cmd)
458 {
459   ipsec_main_t *im = &ipsec_main;
460   u32 sai = ~0;
461
462   while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
463     {
464       if (unformat (input, "%u", &sai))
465         ;
466       else
467         break;
468     }
469
470   if (~0 == sai)
471     {
472       /* *INDENT-OFF* */
473       pool_foreach_index (sai, im->sad, ({
474         ipsec_sa_clear(sai);
475       }));
476       /* *INDENT-ON* */
477     }
478   else
479     {
480       if (pool_is_free_index (im->sad, sai))
481         return clib_error_return (0, "unknown SA index: %d", sai);
482       else
483         ipsec_sa_clear (sai);
484     }
485
486   return 0;
487 }
488
489 /* *INDENT-OFF* */
490 VLIB_CLI_COMMAND (show_ipsec_sa_command, static) = {
491     .path = "show ipsec sa",
492     .short_help = "show ipsec sa [index]",
493     .function = show_ipsec_sa_command_fn,
494 };
495
496 VLIB_CLI_COMMAND (clear_ipsec_sa_command, static) = {
497     .path = "clear ipsec sa",
498     .short_help = "clear ipsec sa [index]",
499     .function = clear_ipsec_sa_command_fn,
500 };
501 /* *INDENT-ON* */
502
503 static clib_error_t *
504 show_ipsec_spd_command_fn (vlib_main_t * vm,
505                            unformat_input_t * input, vlib_cli_command_t * cmd)
506 {
507   ipsec_main_t *im = &ipsec_main;
508   u8 show_bindings = 0;
509   u32 spdi = ~0;
510
511   while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
512     {
513       if (unformat (input, "%u", &spdi))
514         ;
515       else if (unformat (input, "bindings"))
516         show_bindings = 1;
517       else
518         break;
519     }
520
521   if (show_bindings)
522     ipsec_spd_bindings_show_all (vm, im);
523   else if (~0 != spdi)
524     vlib_cli_output (vm, "%U", format_ipsec_spd, spdi);
525   else
526     ipsec_spd_show_all (vm, im);
527
528   return 0;
529 }
530
531 /* *INDENT-OFF* */
532 VLIB_CLI_COMMAND (show_ipsec_spd_command, static) = {
533     .path = "show ipsec spd",
534     .short_help = "show ipsec spd [index]",
535     .function = show_ipsec_spd_command_fn,
536 };
537 /* *INDENT-ON* */
538
539 static clib_error_t *
540 show_ipsec_tunnel_command_fn (vlib_main_t * vm,
541                               unformat_input_t * input,
542                               vlib_cli_command_t * cmd)
543 {
544   ipsec_tunnel_show_all (vm);
545
546   return 0;
547 }
548
549 /* *INDENT-OFF* */
550 VLIB_CLI_COMMAND (show_ipsec_tunnel_command, static) = {
551     .path = "show ipsec tunnel",
552     .short_help = "show ipsec tunnel",
553     .function = show_ipsec_tunnel_command_fn,
554 };
555 /* *INDENT-ON* */
556
557 static clib_error_t *
558 ipsec_show_backends_command_fn (vlib_main_t * vm,
559                                 unformat_input_t * input,
560                                 vlib_cli_command_t * cmd)
561 {
562   ipsec_main_t *im = &ipsec_main;
563   u32 verbose = 0;
564
565   (void) unformat (input, "verbose %u", &verbose);
566
567   vlib_cli_output (vm, "IPsec AH backends available:");
568   u8 *s = format (NULL, "%=25s %=25s %=10s\n", "Name", "Index", "Active");
569   ipsec_ah_backend_t *ab;
570   /* *INDENT-OFF* */
571   pool_foreach (ab, im->ah_backends, {
572     s = format (s, "%=25s %=25u %=10s\n", ab->name, ab - im->ah_backends,
573                 ab - im->ah_backends == im->ah_current_backend ? "yes" : "no");
574     if (verbose) {
575         vlib_node_t *n;
576         n = vlib_get_node (vm, ab->ah4_encrypt_node_index);
577         s = format (s, "     enc4 %s (next %d)\n", n->name, ab->ah4_encrypt_next_index);
578         n = vlib_get_node (vm, ab->ah4_decrypt_node_index);
579         s = format (s, "     dec4 %s (next %d)\n", n->name, ab->ah4_decrypt_next_index);
580         n = vlib_get_node (vm, ab->ah6_encrypt_node_index);
581         s = format (s, "     enc6 %s (next %d)\n", n->name, ab->ah6_encrypt_next_index);
582         n = vlib_get_node (vm, ab->ah6_decrypt_node_index);
583         s = format (s, "     dec6 %s (next %d)\n", n->name, ab->ah6_decrypt_next_index);
584     }
585   });
586   /* *INDENT-ON* */
587   vlib_cli_output (vm, "%v", s);
588   _vec_len (s) = 0;
589   vlib_cli_output (vm, "IPsec ESP backends available:");
590   s = format (s, "%=25s %=25s %=10s\n", "Name", "Index", "Active");
591   ipsec_esp_backend_t *eb;
592   /* *INDENT-OFF* */
593   pool_foreach (eb, im->esp_backends, {
594     s = format (s, "%=25s %=25u %=10s\n", eb->name, eb - im->esp_backends,
595                 eb - im->esp_backends == im->esp_current_backend ? "yes"
596                                                                  : "no");
597     if (verbose) {
598         vlib_node_t *n;
599         n = vlib_get_node (vm, eb->esp4_encrypt_node_index);
600         s = format (s, "     enc4 %s (next %d)\n", n->name, eb->esp4_encrypt_next_index);
601         n = vlib_get_node (vm, eb->esp4_decrypt_node_index);
602         s = format (s, "     dec4 %s (next %d)\n", n->name, eb->esp4_decrypt_next_index);
603         n = vlib_get_node (vm, eb->esp6_encrypt_node_index);
604         s = format (s, "     enc6 %s (next %d)\n", n->name, eb->esp6_encrypt_next_index);
605         n = vlib_get_node (vm, eb->esp6_decrypt_node_index);
606         s = format (s, "     dec6 %s (next %d)\n", n->name, eb->esp6_decrypt_next_index);
607     }
608   });
609   /* *INDENT-ON* */
610   vlib_cli_output (vm, "%v", s);
611
612   vec_free (s);
613   return 0;
614 }
615
616 /* *INDENT-OFF* */
617 VLIB_CLI_COMMAND (ipsec_show_backends_command, static) = {
618     .path = "show ipsec backends",
619     .short_help = "show ipsec backends",
620     .function = ipsec_show_backends_command_fn,
621 };
622 /* *INDENT-ON* */
623
624 static clib_error_t *
625 ipsec_select_backend_command_fn (vlib_main_t * vm,
626                                  unformat_input_t * input,
627                                  vlib_cli_command_t * cmd)
628 {
629   unformat_input_t _line_input, *line_input = &_line_input;
630   ipsec_main_t *im = &ipsec_main;
631   clib_error_t *error;
632   u32 backend_index;
633
634   error = ipsec_rsc_in_use (im);
635
636   if (error)
637     return error;
638
639   /* Get a line of input. */
640   if (!unformat_user (input, unformat_line_input, line_input))
641     return 0;
642
643   if (unformat (line_input, "ah"))
644     {
645       if (unformat (line_input, "%u", &backend_index))
646         {
647           if (ipsec_select_ah_backend (im, backend_index) < 0)
648             {
649               return clib_error_return (0, "Invalid AH backend index `%u'",
650                                         backend_index);
651             }
652         }
653       else
654         {
655           return clib_error_return (0, "Invalid backend index `%U'",
656                                     format_unformat_error, line_input);
657         }
658     }
659   else if (unformat (line_input, "esp"))
660     {
661       if (unformat (line_input, "%u", &backend_index))
662         {
663           if (ipsec_select_esp_backend (im, backend_index) < 0)
664             {
665               return clib_error_return (0, "Invalid ESP backend index `%u'",
666                                         backend_index);
667             }
668         }
669       else
670         {
671           return clib_error_return (0, "Invalid backend index `%U'",
672                                     format_unformat_error, line_input);
673         }
674     }
675   else
676     {
677       return clib_error_return (0, "Unknown input `%U'",
678                                 format_unformat_error, line_input);
679     }
680
681   return 0;
682 }
683
684 /* *INDENT-OFF* */
685 VLIB_CLI_COMMAND (ipsec_select_backend_command, static) = {
686     .path = "ipsec select backend",
687     .short_help = "ipsec select backend <ah|esp> <backend index>",
688     .function = ipsec_select_backend_command_fn,
689 };
690
691 /* *INDENT-ON* */
692
693 static clib_error_t *
694 clear_ipsec_counters_command_fn (vlib_main_t * vm,
695                                  unformat_input_t * input,
696                                  vlib_cli_command_t * cmd)
697 {
698   vlib_clear_combined_counters (&ipsec_spd_policy_counters);
699   vlib_clear_combined_counters (&ipsec_sa_counters);
700
701   return (NULL);
702 }
703
704 /* *INDENT-OFF* */
705 VLIB_CLI_COMMAND (clear_ipsec_counters_command, static) = {
706     .path = "clear ipsec counters",
707     .short_help = "clear ipsec counters",
708     .function = clear_ipsec_counters_command_fn,
709 };
710 /* *INDENT-ON* */
711
712 static u32
713 ipsec_tun_mk_local_sa_id (u32 ti)
714 {
715   return (0x80000000 | ti);
716 }
717
718 static u32
719 ipsec_tun_mk_remote_sa_id (u32 ti)
720 {
721   return (0xc0000000 | ti);
722 }
723
724 static clib_error_t *
725 create_ipsec_tunnel_command_fn (vlib_main_t * vm,
726                                 unformat_input_t * input,
727                                 vlib_cli_command_t * cmd)
728 {
729   unformat_input_t _line_input, *line_input = &_line_input;
730   ip46_address_t local_ip = ip46_address_initializer;
731   ip46_address_t remote_ip = ip46_address_initializer;
732   ip_address_t nh = IP_ADDRESS_V4_ALL_0S;
733   ipsec_crypto_alg_t crypto_alg = IPSEC_CRYPTO_ALG_NONE;
734   ipsec_integ_alg_t integ_alg = IPSEC_INTEG_ALG_NONE;
735   ipsec_sa_flags_t flags;
736   u32 local_spi, remote_spi, salt, table_id, fib_index;
737   u32 instance = ~0;
738   int rv;
739   u32 num_m_args = 0;
740   u8 ipv4_set = 0;
741   u8 ipv6_set = 0;
742   u8 is_add = 1;
743   clib_error_t *error = NULL;
744   ipsec_key_t rck = { 0 };
745   ipsec_key_t lck = { 0 };
746   ipsec_key_t lik = { 0 };
747   ipsec_key_t rik = { 0 };
748
749   table_id = 0;
750   flags = IPSEC_SA_FLAG_NONE;
751
752   /* Get a line of input. */
753   if (!unformat_user (input, unformat_line_input, line_input))
754     return 0;
755
756   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
757     {
758       if (unformat
759           (line_input, "local-ip %U", unformat_ip46_address, &local_ip,
760            IP46_TYPE_ANY))
761         {
762           ip46_address_is_ip4 (&local_ip) ? (ipv4_set = 1) : (ipv6_set = 1);
763           num_m_args++;
764         }
765       else
766         if (unformat
767             (line_input, "remote-ip %U", unformat_ip46_address, &remote_ip,
768              IP46_TYPE_ANY))
769         {
770           ip46_address_is_ip4 (&remote_ip) ? (ipv4_set = 1) : (ipv6_set = 1);
771           num_m_args++;
772         }
773       else if (unformat (line_input, "local-spi %u", &local_spi))
774         num_m_args++;
775       else if (unformat (line_input, "remote-spi %u", &remote_spi))
776         num_m_args++;
777       else if (unformat (line_input, "salt 0x%x", &salt))
778         ;
779       else if (unformat (line_input, "udp-encap"))
780         flags |= IPSEC_SA_FLAG_UDP_ENCAP;
781       else if (unformat (line_input, "use-esn"))
782         flags |= IPSEC_SA_FLAG_USE_ESN;
783       else if (unformat (line_input, "use-anti-replay"))
784         flags |= IPSEC_SA_FLAG_USE_ANTI_REPLAY;
785       else if (unformat (line_input, "instance %u", &instance))
786         ;
787       else if (unformat (line_input, "tx-table %u", &table_id))
788         ;
789       else
790         if (unformat
791             (line_input, "local-crypto-key %U", unformat_ipsec_key, &lck))
792         ;
793       else
794         if (unformat
795             (line_input, "remote-crypto-key %U", unformat_ipsec_key, &rck))
796         ;
797       else if (unformat (line_input, "crypto-alg %U",
798                          unformat_ipsec_crypto_alg, &crypto_alg))
799         ;
800       else
801         if (unformat
802             (line_input, "local-integ-key %U", unformat_ipsec_key, &lik))
803         ;
804       else
805         if (unformat
806             (line_input, "remote-integ-key %U", unformat_ipsec_key, &rik))
807         ;
808       else if (unformat (line_input, "integ-alg %U",
809                          unformat_ipsec_integ_alg, &integ_alg))
810         ;
811       else if (unformat (line_input, "del"))
812         is_add = 0;
813       else if (unformat (line_input, "nh &U", unformat_ip_address, &nh))
814         ;
815       else
816         {
817           error = clib_error_return (0, "unknown input `%U'",
818                                      format_unformat_error, line_input);
819           goto done;
820         }
821     }
822
823   if (num_m_args < 4)
824     {
825       error = clib_error_return (0, "mandatory argument(s) missing");
826       goto done;
827     }
828
829   if (ipv4_set && ipv6_set)
830     return clib_error_return (0, "both IPv4 and IPv6 addresses specified");
831
832   fib_index = fib_table_find (fib_ip_proto (ipv6_set), table_id);
833
834   if (~0 == fib_index)
835     {
836       rv = VNET_API_ERROR_NO_SUCH_FIB;
837       goto done;
838     }
839
840   if (is_add)
841     {
842       // remote = input, local = output
843       u32 sw_if_index;
844
845       /* create an ip-ip tunnel, then the two SA, then bind them */
846       rv =
847         ipip_add_tunnel (ipv6_set ? IPIP_TRANSPORT_IP6 : IPIP_TRANSPORT_IP4,
848                          instance, &local_ip, &remote_ip, fib_index,
849                          TUNNEL_ENCAP_DECAP_FLAG_NONE, IP_DSCP_CS0,
850                          TUNNEL_MODE_P2P, &sw_if_index);
851       rv |=
852         ipsec_sa_add_and_lock (ipsec_tun_mk_local_sa_id (sw_if_index),
853                                local_spi, IPSEC_PROTOCOL_ESP, crypto_alg,
854                                &lck, integ_alg, &lik, flags, table_id,
855                                clib_host_to_net_u32 (salt), &local_ip,
856                                &remote_ip, NULL, IPSEC_UDP_PORT_NONE);
857       rv |=
858         ipsec_sa_add_and_lock (ipsec_tun_mk_remote_sa_id (sw_if_index),
859                                remote_spi, IPSEC_PROTOCOL_ESP, crypto_alg,
860                                &rck, integ_alg, &rik,
861                                (flags | IPSEC_SA_FLAG_IS_INBOUND), table_id,
862                                clib_host_to_net_u32 (salt), &remote_ip,
863                                &local_ip, NULL, IPSEC_UDP_PORT_NONE);
864       rv |=
865         ipsec_tun_protect_update_one (sw_if_index, &nh,
866                                       ipsec_tun_mk_local_sa_id (sw_if_index),
867                                       ipsec_tun_mk_remote_sa_id
868                                       (sw_if_index));
869     }
870   else
871     rv = 0;
872
873   switch (rv)
874     {
875     case 0:
876       break;
877     case VNET_API_ERROR_INVALID_VALUE:
878       error = clib_error_return (0,
879                                  "IPSec tunnel interface already exists...");
880       goto done;
881     default:
882       error = clib_error_return (0, "ipsec_register_interface returned %d",
883                                  rv);
884       goto done;
885     }
886
887 done:
888   unformat_free (line_input);
889
890   return error;
891 }
892
893 /* *INDENT-OFF* */
894 VLIB_CLI_COMMAND (create_ipsec_tunnel_command, static) = {
895   .path = "create ipsec tunnel",
896   .short_help = "create ipsec tunnel local-ip <addr> local-spi <spi> "
897       "remote-ip <addr> remote-spi <spi> [instance <inst_num>] [udp-encap] [use-esn] [use-anti-replay] "
898       "[tx-table <table-id>]",
899   .function = create_ipsec_tunnel_command_fn,
900 };
901 /* *INDENT-ON* */
902
903 static clib_error_t *
904 ipsec_tun_protect_cmd (vlib_main_t * vm,
905                        unformat_input_t * input, vlib_cli_command_t * cmd)
906 {
907   unformat_input_t _line_input, *line_input = &_line_input;
908   u32 sw_if_index, is_del, sa_in, sa_out, *sa_ins = NULL;
909   ip_address_t peer = { };
910   vnet_main_t *vnm;
911
912   is_del = 0;
913   sw_if_index = ~0;
914   vnm = vnet_get_main ();
915
916   if (!unformat_user (input, unformat_line_input, line_input))
917     return 0;
918
919   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
920     {
921       if (unformat (line_input, "del"))
922         is_del = 1;
923       else if (unformat (line_input, "add"))
924         is_del = 0;
925       else if (unformat (line_input, "sa-in %d", &sa_in))
926         vec_add1 (sa_ins, sa_in);
927       else if (unformat (line_input, "sa-out %d", &sa_out))
928         ;
929       else if (unformat (line_input, "%U",
930                          unformat_vnet_sw_interface, vnm, &sw_if_index))
931         ;
932       else if (unformat (line_input, "%U", unformat_ip_address, &peer))
933         ;
934       else
935         return (clib_error_return (0, "unknown input '%U'",
936                                    format_unformat_error, line_input));
937     }
938
939   if (!is_del)
940     ipsec_tun_protect_update (sw_if_index, &peer, sa_out, sa_ins);
941
942   unformat_free (line_input);
943   return NULL;
944 }
945
946 /**
947  * Protect tunnel with IPSEC
948  */
949 /* *INDENT-OFF* */
950 VLIB_CLI_COMMAND (ipsec_tun_protect_cmd_node, static) =
951 {
952   .path = "ipsec tunnel protect",
953   .function = ipsec_tun_protect_cmd,
954   .short_help = "ipsec tunnel protect <interface> input-sa <SA> output-sa <SA>",
955     // this is not MP safe
956 };
957 /* *INDENT-ON* */
958
959
960 static clib_error_t *
961 ipsec_tun_protect_show (vlib_main_t * vm,
962                         unformat_input_t * input, vlib_cli_command_t * cmd)
963 {
964   ipsec_tun_protect_walk (ipsec_tun_protect_show_one, vm);
965
966   return NULL;
967 }
968
969 /**
970  * show IPSEC tunnel protection
971  */
972 /* *INDENT-OFF* */
973 VLIB_CLI_COMMAND (ipsec_tun_protect_show_node, static) =
974 {
975   .path = "show ipsec protect",
976   .function = ipsec_tun_protect_show,
977   .short_help =  "show ipsec protect",
978 };
979 /* *INDENT-ON* */
980
981 static clib_error_t *
982 ipsec_tun_protect_hash_show (vlib_main_t * vm,
983                              unformat_input_t * input,
984                              vlib_cli_command_t * cmd)
985 {
986   ipsec_main_t *im = &ipsec_main;
987
988   {
989     ipsec_tun_lkup_result_t value;
990     ipsec4_tunnel_key_t key;
991
992     vlib_cli_output (vm, "IPv4:");
993
994     /* *INDENT-OFF* */
995     hash_foreach(key.as_u64, value.as_u64, im->tun4_protect_by_key,
996     ({
997       vlib_cli_output (vm, " %U", format_ipsec4_tunnel_key, &key);
998       vlib_cli_output (vm, "  tun:%d sa:%d", value.tun_index, value.sa_index);
999     }));
1000     /* *INDENT-ON* */
1001   }
1002
1003   {
1004     ipsec_tun_lkup_result_t value;
1005     ipsec6_tunnel_key_t *key;
1006
1007     vlib_cli_output (vm, "IPv6:");
1008
1009     /* *INDENT-OFF* */
1010     hash_foreach_mem(key, value.as_u64, im->tun6_protect_by_key,
1011     ({
1012       vlib_cli_output (vm, " %U", format_ipsec6_tunnel_key, key);
1013       vlib_cli_output (vm, "  tun:%d sa:%d", value.tun_index, value.sa_index);
1014     }));
1015     /* *INDENT-ON* */
1016   }
1017
1018   return NULL;
1019 }
1020
1021 /**
1022  * show IPSEC tunnel protection hash tables
1023  */
1024 /* *INDENT-OFF* */
1025 VLIB_CLI_COMMAND (ipsec_tun_protect_hash_show_node, static) =
1026 {
1027   .path = "show ipsec protect-hash",
1028   .function = ipsec_tun_protect_hash_show,
1029   .short_help =  "show ipsec protect-hash",
1030 };
1031 /* *INDENT-ON* */
1032
1033 clib_error_t *
1034 ipsec_cli_init (vlib_main_t * vm)
1035 {
1036   return 0;
1037 }
1038
1039 VLIB_INIT_FUNCTION (ipsec_cli_init);
1040
1041
1042 /*
1043  * fd.io coding-style-patch-verification: ON
1044  *
1045  * Local Variables:
1046  * eval: (c-set-style "gnu")
1047  * End:
1048  */