NAT64: Fix CLI typo (VPP-961)
[vpp.git] / src / plugins / nat / nat64_cli.c
1 /*
2  * Copyright (c) 2017 Cisco and/or its affiliates.
3  * Licensed under the Apache License, Version 2.0 (the "License");
4  * you may not use this file except in compliance with the License.
5  * You may obtain a copy of the License at:
6  *
7  *     http://www.apache.org/licenses/LICENSE-2.0
8  *
9  * Unless required by applicable law or agreed to in writing, software
10  * distributed under the License is distributed on an "AS IS" BASIS,
11  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12  * See the License for the specific language governing permissions and
13  * limitations under the License.
14  */
15 /**
16  * @file
17  * @brief NAT64 CLI
18  */
19
20 #include <nat/nat64.h>
21 #include <nat/nat.h>
22 #include <vnet/fib/fib_table.h>
23
24 static clib_error_t *
25 nat64_add_del_pool_addr_command_fn (vlib_main_t * vm,
26                                     unformat_input_t * input,
27                                     vlib_cli_command_t * cmd)
28 {
29   nat64_main_t *nm = &nat64_main;
30   unformat_input_t _line_input, *line_input = &_line_input;
31   ip4_address_t start_addr, end_addr, this_addr;
32   u32 start_host_order, end_host_order;
33   int i, count, rv;
34   u32 vrf_id = ~0;
35   u8 is_add = 1;
36   clib_error_t *error = 0;
37
38   if (nm->is_disabled)
39     return clib_error_return (0,
40                               "NAT64 disabled, multi thread not supported");
41
42   /* Get a line of input. */
43   if (!unformat_user (input, unformat_line_input, line_input))
44     return 0;
45
46   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
47     {
48       if (unformat (line_input, "%U - %U",
49                     unformat_ip4_address, &start_addr,
50                     unformat_ip4_address, &end_addr))
51         ;
52       else if (unformat (line_input, "tenant-vrf %u", &vrf_id))
53         ;
54       else if (unformat (line_input, "%U", unformat_ip4_address, &start_addr))
55         end_addr = start_addr;
56       else if (unformat (line_input, "del"))
57         is_add = 0;
58       else
59         {
60           error = clib_error_return (0, "unknown input '%U'",
61                                      format_unformat_error, line_input);
62           goto done;
63         }
64     }
65
66   start_host_order = clib_host_to_net_u32 (start_addr.as_u32);
67   end_host_order = clib_host_to_net_u32 (end_addr.as_u32);
68
69   if (end_host_order < start_host_order)
70     {
71       error = clib_error_return (0, "end address less than start address");
72       goto done;
73     }
74
75   count = (end_host_order - start_host_order) + 1;
76   this_addr = start_addr;
77
78   for (i = 0; i < count; i++)
79     {
80       rv = nat64_add_del_pool_addr (&this_addr, vrf_id, is_add);
81
82       switch (rv)
83         {
84         case VNET_API_ERROR_NO_SUCH_ENTRY:
85           error =
86             clib_error_return (0, "NAT64 pool address %U not exist.",
87                                format_ip4_address, &this_addr);
88           goto done;
89         case VNET_API_ERROR_VALUE_EXIST:
90           error =
91             clib_error_return (0, "NAT64 pool address %U exist.",
92                                format_ip4_address, &this_addr);
93           goto done;
94         default:
95           break;
96
97         }
98       increment_v4_address (&this_addr);
99     }
100
101 done:
102   unformat_free (line_input);
103
104   return error;
105 }
106
107 static int
108 nat64_cli_pool_walk (snat_address_t * ap, void *ctx)
109 {
110   vlib_main_t *vm = ctx;
111
112   if (ap->fib_index != ~0)
113     {
114       fib_table_t *fib;
115       fib = fib_table_get (ap->fib_index, FIB_PROTOCOL_IP6);
116       if (!fib)
117         return -1;
118       vlib_cli_output (vm, " %U tenant VRF: %u", format_ip4_address,
119                        &ap->addr, fib->ft_table_id);
120     }
121   else
122     vlib_cli_output (vm, " %U", format_ip4_address, &ap->addr);
123
124   return 0;
125 }
126
127 static clib_error_t *
128 nat64_show_pool_command_fn (vlib_main_t * vm,
129                             unformat_input_t * input,
130                             vlib_cli_command_t * cmd)
131 {
132   nat64_main_t *nm = &nat64_main;
133
134   if (nm->is_disabled)
135     return clib_error_return (0,
136                               "NAT64 disabled, multi thread not supported");
137
138   vlib_cli_output (vm, "NAT64 pool:");
139   nat64_pool_addr_walk (nat64_cli_pool_walk, vm);
140
141   return 0;
142 }
143
144 static clib_error_t *
145 nat64_interface_feature_command_fn (vlib_main_t * vm,
146                                     unformat_input_t *
147                                     input, vlib_cli_command_t * cmd)
148 {
149   nat64_main_t *nm = &nat64_main;
150   unformat_input_t _line_input, *line_input = &_line_input;
151   vnet_main_t *vnm = vnet_get_main ();
152   clib_error_t *error = 0;
153   u32 sw_if_index;
154   u32 *inside_sw_if_indices = 0;
155   u32 *outside_sw_if_indices = 0;
156   u8 is_add = 1;
157   int i, rv;
158
159   if (nm->is_disabled)
160     return clib_error_return (0,
161                               "NAT64 disabled, multi thread not supported");
162
163   /* Get a line of input. */
164   if (!unformat_user (input, unformat_line_input, line_input))
165     return 0;
166
167   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
168     {
169       if (unformat (line_input, "in %U", unformat_vnet_sw_interface,
170                     vnm, &sw_if_index))
171         vec_add1 (inside_sw_if_indices, sw_if_index);
172       else if (unformat (line_input, "out %U", unformat_vnet_sw_interface,
173                          vnm, &sw_if_index))
174         vec_add1 (outside_sw_if_indices, sw_if_index);
175       else if (unformat (line_input, "del"))
176         is_add = 0;
177       else
178         {
179           error = clib_error_return (0, "unknown input '%U'",
180                                      format_unformat_error, line_input);
181           goto done;
182         }
183     }
184
185   if (vec_len (inside_sw_if_indices))
186     {
187       for (i = 0; i < vec_len (inside_sw_if_indices); i++)
188         {
189           sw_if_index = inside_sw_if_indices[i];
190           rv = nat64_add_del_interface (sw_if_index, 1, is_add);
191           switch (rv)
192             {
193             case VNET_API_ERROR_NO_SUCH_ENTRY:
194               error =
195                 clib_error_return (0, "%U NAT64 feature not enabled.",
196                                    format_vnet_sw_interface_name, vnm,
197                                    vnet_get_sw_interface (vnm, sw_if_index));
198               goto done;
199             case VNET_API_ERROR_VALUE_EXIST:
200               error =
201                 clib_error_return (0, "%U NAT64 feature already enabled.",
202                                    format_vnet_sw_interface_name, vnm,
203                                    vnet_get_sw_interface (vnm, sw_if_index));
204               goto done;
205             case VNET_API_ERROR_INVALID_VALUE:
206             case VNET_API_ERROR_INVALID_VALUE_2:
207               error =
208                 clib_error_return (0,
209                                    "%U NAT64 feature enable/disable failed.",
210                                    format_vnet_sw_interface_name, vnm,
211                                    vnet_get_sw_interface (vnm, sw_if_index));
212               goto done;
213             default:
214               break;
215
216             }
217         }
218     }
219
220   if (vec_len (outside_sw_if_indices))
221     {
222       for (i = 0; i < vec_len (outside_sw_if_indices); i++)
223         {
224           sw_if_index = outside_sw_if_indices[i];
225           rv = nat64_add_del_interface (sw_if_index, 0, is_add);
226           switch (rv)
227             {
228             case VNET_API_ERROR_NO_SUCH_ENTRY:
229               error =
230                 clib_error_return (0, "%U NAT64 feature not enabled.",
231                                    format_vnet_sw_interface_name, vnm,
232                                    vnet_get_sw_interface (vnm, sw_if_index));
233               goto done;
234             case VNET_API_ERROR_VALUE_EXIST:
235               error =
236                 clib_error_return (0, "%U NAT64 feature already enabled.",
237                                    format_vnet_sw_interface_name, vnm,
238                                    vnet_get_sw_interface (vnm, sw_if_index));
239               goto done;
240             case VNET_API_ERROR_INVALID_VALUE:
241             case VNET_API_ERROR_INVALID_VALUE_2:
242               error =
243                 clib_error_return (0,
244                                    "%U NAT64 feature enable/disable failed.",
245                                    format_vnet_sw_interface_name, vnm,
246                                    vnet_get_sw_interface (vnm, sw_if_index));
247               goto done;
248             default:
249               break;
250
251             }
252         }
253     }
254
255 done:
256   unformat_free (line_input);
257   vec_free (inside_sw_if_indices);
258   vec_free (outside_sw_if_indices);
259
260   return error;
261 }
262
263 static int
264 nat64_cli_interface_walk (snat_interface_t * i, void *ctx)
265 {
266   vlib_main_t *vm = ctx;
267   vnet_main_t *vnm = vnet_get_main ();
268
269   vlib_cli_output (vm, " %U %s", format_vnet_sw_interface_name, vnm,
270                    vnet_get_sw_interface (vnm, i->sw_if_index),
271                    i->is_inside ? "in" : "out");
272   return 0;
273 }
274
275 static clib_error_t *
276 nat64_show_interfaces_command_fn (vlib_main_t * vm,
277                                   unformat_input_t *
278                                   input, vlib_cli_command_t * cmd)
279 {
280   nat64_main_t *nm = &nat64_main;
281
282   if (nm->is_disabled)
283     return clib_error_return (0,
284                               "NAT64 disabled, multi thread not supported");
285
286   vlib_cli_output (vm, "NAT64 interfaces:");
287   nat64_interfaces_walk (nat64_cli_interface_walk, vm);
288
289   return 0;
290 }
291
292 static clib_error_t *
293 nat64_add_del_static_bib_command_fn (vlib_main_t *
294                                      vm,
295                                      unformat_input_t
296                                      * input, vlib_cli_command_t * cmd)
297 {
298   nat64_main_t *nm = &nat64_main;
299   unformat_input_t _line_input, *line_input = &_line_input;
300   clib_error_t *error = 0;
301   u8 is_add = 1;
302   ip6_address_t in_addr;
303   ip4_address_t out_addr;
304   u16 in_port = 0;
305   u16 out_port = 0;
306   u32 vrf_id = 0, protocol;
307   snat_protocol_t proto = 0;
308   u8 p = 0;
309   int rv;
310
311   if (nm->is_disabled)
312     return clib_error_return (0,
313                               "NAT64 disabled, multi thread not supported");
314
315   if (!unformat_user (input, unformat_line_input, line_input))
316     return 0;
317
318   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
319     {
320       if (unformat (line_input, "%U %u", unformat_ip6_address,
321                     &in_addr, &in_port))
322         ;
323       else if (unformat (line_input, "%U %u", unformat_ip4_address,
324                          &out_addr, &out_port))
325         ;
326       else if (unformat (line_input, "vrf %u", &vrf_id))
327         ;
328       else if (unformat (line_input, "%U", unformat_snat_protocol, &proto))
329         ;
330       else
331         if (unformat
332             (line_input, "%U %U %u", unformat_ip6_address, &in_addr,
333              unformat_ip4_address, &out_addr, &protocol))
334         p = (u8) protocol;
335       else if (unformat (line_input, "del"))
336         is_add = 0;
337       else
338         {
339           error = clib_error_return (0, "unknown input: '%U'",
340                                      format_unformat_error, line_input);
341           goto done;
342         }
343     }
344
345   if (!p)
346     {
347       if (!in_port)
348         {
349           error =
350             clib_error_return (0, "inside port and address  must be set");
351           goto done;
352         }
353
354       if (!out_port)
355         {
356           error =
357             clib_error_return (0, "outside port and address  must be set");
358           goto done;
359         }
360
361       p = snat_proto_to_ip_proto (proto);
362     }
363
364   rv =
365     nat64_add_del_static_bib_entry (&in_addr, &out_addr, in_port, out_port, p,
366                                     vrf_id, is_add);
367
368   switch (rv)
369     {
370     case VNET_API_ERROR_NO_SUCH_ENTRY:
371       error = clib_error_return (0, "NAT64 BIB entry not exist.");
372       goto done;
373     case VNET_API_ERROR_VALUE_EXIST:
374       error = clib_error_return (0, "NAT64 BIB entry exist.");
375       goto done;
376     case VNET_API_ERROR_UNSPECIFIED:
377       error = clib_error_return (0, "Crerate NAT64 BIB entry failed.");
378       goto done;
379     case VNET_API_ERROR_INVALID_VALUE:
380       error =
381         clib_error_return (0, "Outside addres %U and port %u already in use.",
382                            format_ip4_address, &out_addr, out_port);
383       goto done;
384     default:
385       break;
386     }
387
388 done:
389   unformat_free (line_input);
390
391   return error;
392 }
393
394 static int
395 nat64_cli_bib_walk (nat64_db_bib_entry_t * bibe, void *ctx)
396 {
397   vlib_main_t *vm = ctx;
398   fib_table_t *fib;
399
400   fib = fib_table_get (bibe->fib_index, FIB_PROTOCOL_IP6);
401   if (!fib)
402     return -1;
403
404   switch (bibe->proto)
405     {
406     case IP_PROTOCOL_ICMP:
407     case IP_PROTOCOL_TCP:
408     case IP_PROTOCOL_UDP:
409       vlib_cli_output (vm, " %U %u %U %u protocol %U vrf %u %s %u sessions",
410                        format_ip6_address, &bibe->in_addr,
411                        clib_net_to_host_u16 (bibe->in_port),
412                        format_ip4_address, &bibe->out_addr,
413                        clib_net_to_host_u16 (bibe->out_port),
414                        format_snat_protocol,
415                        ip_proto_to_snat_proto (bibe->proto), fib->ft_table_id,
416                        bibe->is_static ? "static" : "dynamic", bibe->ses_num);
417       break;
418     default:
419       vlib_cli_output (vm, " %U %U protocol %u vrf %u %s %u sessions",
420                        format_ip6_address, &bibe->in_addr,
421                        format_ip4_address, &bibe->out_addr,
422                        bibe->proto, fib->ft_table_id,
423                        bibe->is_static ? "static" : "dynamic", bibe->ses_num);
424     }
425   return 0;
426 }
427
428 static clib_error_t *
429 nat64_show_bib_command_fn (vlib_main_t * vm,
430                            unformat_input_t * input, vlib_cli_command_t * cmd)
431 {
432   nat64_main_t *nm = &nat64_main;
433   unformat_input_t _line_input, *line_input = &_line_input;
434   clib_error_t *error = 0;
435   u32 proto = ~0;
436   u8 p = 255;
437
438   if (nm->is_disabled)
439     return clib_error_return (0,
440                               "NAT64 disabled, multi thread not supported");
441
442   if (!unformat_user (input, unformat_line_input, line_input))
443     return 0;
444
445   if (unformat (line_input, "%U", unformat_snat_protocol, &proto))
446     p = snat_proto_to_ip_proto (proto);
447   else if (unformat (line_input, "unknown"))
448     p = 0;
449   else if (unformat (line_input, "all"))
450     ;
451   else
452     {
453       error = clib_error_return (0, "unknown input: '%U'",
454                                  format_unformat_error, line_input);
455       goto done;
456     }
457
458   if (p == 255)
459     vlib_cli_output (vm, "NAT64 BIB entries:");
460   else
461     vlib_cli_output (vm, "NAT64 %U BIB entries:", format_snat_protocol,
462                      proto);
463   nat64_db_bib_walk (&nm->db, p, nat64_cli_bib_walk, vm);
464
465 done:
466   unformat_free (line_input);
467
468   return error;
469 }
470
471 static clib_error_t *
472 nat64_set_timeouts_command_fn (vlib_main_t * vm, unformat_input_t * input,
473                                vlib_cli_command_t * cmd)
474 {
475   nat64_main_t *nm = &nat64_main;
476   unformat_input_t _line_input, *line_input = &_line_input;
477   clib_error_t *error = 0;
478   u32 timeout, tcp_trans, tcp_est, tcp_incoming_syn;
479
480   tcp_trans = nat64_get_tcp_trans_timeout ();
481   tcp_est = nat64_get_tcp_est_timeout ();
482   tcp_incoming_syn = nat64_get_tcp_incoming_syn_timeout ();
483
484   if (nm->is_disabled)
485     return clib_error_return (0,
486                               "NAT64 disabled, multi thread not supported");
487
488   if (!unformat_user (input, unformat_line_input, line_input))
489     return 0;
490
491   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
492     {
493       if (unformat (line_input, "udp %u", &timeout))
494         {
495           if (nat64_set_udp_timeout (timeout))
496             {
497               error = clib_error_return (0, "Invalid UDP timeout value");
498               goto done;
499             }
500         }
501       else if (unformat (line_input, "icmp %u", &timeout))
502         {
503           if (nat64_set_icmp_timeout (timeout))
504             {
505               error = clib_error_return (0, "Invalid ICMP timeout value");
506               goto done;
507             }
508         }
509       else if (unformat (line_input, "tcp-trans %u", &tcp_trans))
510         {
511           if (nat64_set_tcp_timeouts (tcp_trans, tcp_est, tcp_incoming_syn))
512             {
513               error =
514                 clib_error_return (0, "Invalid TCP transitory tiemout value");
515               goto done;
516             }
517         }
518       else if (unformat (line_input, "tcp-est %u", &tcp_est))
519         {
520           if (nat64_set_tcp_timeouts (tcp_trans, tcp_est, tcp_incoming_syn))
521             {
522               error =
523                 clib_error_return (0,
524                                    "Invalid TCP established tiemout value");
525               goto done;
526             }
527         }
528       else
529         if (unformat (line_input, "tcp-incoming-syn %u", &tcp_incoming_syn))
530         {
531           if (nat64_set_tcp_timeouts (tcp_trans, tcp_est, tcp_incoming_syn))
532             {
533               error =
534                 clib_error_return (0,
535                                    "Invalid TCP incoming SYN tiemout value");
536               goto done;
537             }
538         }
539       else if (unformat (line_input, "reset"))
540         {
541           nat64_set_udp_timeout (0);
542           nat64_set_icmp_timeout (0);
543           nat64_set_tcp_timeouts (0, 0, 0);
544         }
545       else
546         {
547           error = clib_error_return (0, "unknown input '%U'",
548                                      format_unformat_error, line_input);
549           goto done;
550         }
551     }
552
553 done:
554   unformat_free (line_input);
555
556   return error;
557 }
558
559 static clib_error_t *
560 nat64_show_timeouts_command_fn (vlib_main_t * vm, unformat_input_t * input,
561                                 vlib_cli_command_t * cmd)
562 {
563   nat64_main_t *nm = &nat64_main;
564
565   if (nm->is_disabled)
566     return clib_error_return (0,
567                               "NAT64 disabled, multi thread not supported");
568
569   vlib_cli_output (vm, "NAT64 session timeouts:");
570   vlib_cli_output (vm, " UDP %usec", nat64_get_udp_timeout ());
571   vlib_cli_output (vm, " ICMP %usec", nat64_get_icmp_timeout ());
572   vlib_cli_output (vm, " TCP transitory %usec",
573                    nat64_get_tcp_trans_timeout ());
574   vlib_cli_output (vm, " TCP established %usec",
575                    nat64_get_tcp_est_timeout ());
576   vlib_cli_output (vm, " TCP incoming SYN %usec",
577                    nat64_get_tcp_incoming_syn_timeout ());
578
579   return 0;
580 }
581
582 static int
583 nat64_cli_st_walk (nat64_db_st_entry_t * ste, void *ctx)
584 {
585   vlib_main_t *vm = ctx;
586   nat64_main_t *nm = &nat64_main;
587   nat64_db_bib_entry_t *bibe;
588   fib_table_t *fib;
589
590   bibe = nat64_db_bib_entry_by_index (&nm->db, ste->proto, ste->bibe_index);
591   if (!bibe)
592     return -1;
593
594   fib = fib_table_get (bibe->fib_index, FIB_PROTOCOL_IP6);
595   if (!fib)
596     return -1;
597
598   u32 vrf_id = fib->ft_table_id;
599
600   if (ste->proto == IP_PROTOCOL_ICMP)
601     vlib_cli_output (vm, " %U %U %u %U %U %u protocol %U vrf %u",
602                      format_ip6_address, &bibe->in_addr,
603                      format_ip6_address, &ste->in_r_addr,
604                      clib_net_to_host_u16 (bibe->in_port),
605                      format_ip4_address, &bibe->out_addr,
606                      format_ip4_address, &ste->out_r_addr,
607                      clib_net_to_host_u16 (bibe->out_port),
608                      format_snat_protocol,
609                      ip_proto_to_snat_proto (bibe->proto), vrf_id);
610   else if (ste->proto == IP_PROTOCOL_TCP || ste->proto == IP_PROTOCOL_UDP)
611     vlib_cli_output (vm, " %U %u %U %u %U %u %U %u protcol %U vrf %u",
612                      format_ip6_address, &bibe->in_addr,
613                      clib_net_to_host_u16 (bibe->in_port),
614                      format_ip6_address, &ste->in_r_addr,
615                      clib_net_to_host_u16 (ste->r_port),
616                      format_ip4_address, &bibe->out_addr,
617                      clib_net_to_host_u16 (bibe->out_port),
618                      format_ip4_address, &ste->out_r_addr,
619                      clib_net_to_host_u16 (ste->r_port),
620                      format_snat_protocol,
621                      ip_proto_to_snat_proto (bibe->proto), vrf_id);
622   else
623     vlib_cli_output (vm, " %U %U %U %U protocol %u vrf %u",
624                      format_ip6_address, &bibe->in_addr,
625                      format_ip6_address, &ste->in_r_addr,
626                      format_ip4_address, &bibe->out_addr,
627                      format_ip4_address, &ste->out_r_addr,
628                      bibe->proto, vrf_id);
629
630   return 0;
631 }
632
633 static clib_error_t *
634 nat64_show_st_command_fn (vlib_main_t * vm,
635                           unformat_input_t * input, vlib_cli_command_t * cmd)
636 {
637   nat64_main_t *nm = &nat64_main;
638   unformat_input_t _line_input, *line_input = &_line_input;
639   clib_error_t *error = 0;
640   u32 proto = ~0;
641   u8 p = 255;
642
643   if (nm->is_disabled)
644     return clib_error_return (0,
645                               "NAT64 disabled, multi thread not supported");
646
647   if (!unformat_user (input, unformat_line_input, line_input))
648     return 0;
649
650   if (unformat (line_input, "%U", unformat_snat_protocol, &proto))
651     p = snat_proto_to_ip_proto (proto);
652   else if (unformat (line_input, "unknown"))
653     p = 0;
654   else if (unformat (line_input, "all"))
655     ;
656   else
657     {
658       error = clib_error_return (0, "unknown input: '%U'",
659                                  format_unformat_error, line_input);
660       goto done;
661     }
662
663   if (p == 255)
664     vlib_cli_output (vm, "NAT64 sessions:");
665   else
666     vlib_cli_output (vm, "NAT64 %U sessions:", format_snat_protocol, proto);
667   nat64_db_st_walk (&nm->db, p, nat64_cli_st_walk, vm);
668
669 done:
670   unformat_free (line_input);
671
672   return error;
673 }
674
675 static clib_error_t *
676 nat64_add_del_prefix_command_fn (vlib_main_t * vm, unformat_input_t * input,
677                                  vlib_cli_command_t * cmd)
678 {
679   nat64_main_t *nm = &nat64_main;
680   clib_error_t *error = 0;
681   unformat_input_t _line_input, *line_input = &_line_input;
682   u8 is_add = 1;
683   u32 vrf_id = 0;
684   ip6_address_t prefix;
685   u32 plen = 0;
686   int rv;
687
688   if (nm->is_disabled)
689     return clib_error_return (0,
690                               "NAT64 disabled, multi thread not supported");
691
692   if (!unformat_user (input, unformat_line_input, line_input))
693     return 0;
694
695   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
696     {
697       if (unformat
698           (line_input, "%U/%u", unformat_ip6_address, &prefix, &plen))
699         ;
700       else if (unformat (line_input, "tenant-vrf %u", &vrf_id))
701         ;
702       else if (unformat (line_input, "del"))
703         is_add = 0;
704       else
705         {
706           error = clib_error_return (0, "unknown input: '%U'",
707                                      format_unformat_error, line_input);
708           goto done;
709         }
710     }
711
712   if (!plen)
713     {
714       error = clib_error_return (0, "NAT64 prefix must be set.");
715       goto done;
716     }
717
718   rv = nat64_add_del_prefix (&prefix, (u8) plen, vrf_id, is_add);
719
720   switch (rv)
721     {
722     case VNET_API_ERROR_NO_SUCH_ENTRY:
723       error = clib_error_return (0, "NAT64 prefix not exist.");
724       goto done;
725     case VNET_API_ERROR_INVALID_VALUE:
726       error = clib_error_return (0, "Invalid prefix length.");
727       goto done;
728     default:
729       break;
730     }
731
732 done:
733   unformat_free (line_input);
734
735   return error;
736 }
737
738 static int
739 nat64_cli_prefix_walk (nat64_prefix_t * p, void *ctx)
740 {
741   vlib_main_t *vm = ctx;
742
743   vlib_cli_output (vm, " %U/%u tenant-vrf %u",
744                    format_ip6_address, &p->prefix, p->plen, p->vrf_id);
745
746   return 0;
747 }
748
749 static clib_error_t *
750 nat64_show_prefix_command_fn (vlib_main_t * vm, unformat_input_t * input,
751                               vlib_cli_command_t * cmd)
752 {
753   nat64_main_t *nm = &nat64_main;
754
755   if (nm->is_disabled)
756     return clib_error_return (0,
757                               "NAT64 disabled, multi thread not supported");
758
759   vlib_cli_output (vm, "NAT64 prefix:");
760   nat64_prefix_walk (nat64_cli_prefix_walk, vm);
761
762   return 0;
763 }
764
765 /* *INDENT-OFF* */
766
767 /*?
768  * @cliexpar
769  * @cliexstart{nat64 add pool address}
770  * Add/delete NAT64 pool address.
771  * To add single NAT64 pool address use:
772  *  vpp# nat64 add pool address 10.1.1.10
773  * To add NAT64 pool address range use:
774  *  vpp# nat64 add pool address 10.1.1.2 - 10.1.1.5
775  * To add NAT64 pool address for specific tenant use:
776  *  vpp# nat64 add pool address 10.1.1.100 tenant-vrf 100
777  * @cliexend
778 ?*/
779 VLIB_CLI_COMMAND (nat64_add_pool_address_command, static) = {
780   .path = "nat64 add pool address",
781   .short_help = "nat64 add pool address <ip4-range-start> [- <ip4-range-end>] "
782                 "[tenant-vrf <vrf-id>] [del]",
783   .function = nat64_add_del_pool_addr_command_fn,
784 };
785
786 /*?
787  * @cliexpar
788  * @cliexstart{show nat64 pool}
789  * Show NAT64 pool.
790  *  vpp# show nat64 pool
791  *  NAT64 pool:
792  *   10.1.1.3 tenant VRF: 0
793  *   10.1.1.10 tenant VRF: 10
794  * @cliexend
795 ?*/
796 VLIB_CLI_COMMAND (show_nat64_pool_command, static) = {
797   .path = "show nat64 pool",
798   .short_help = "show nat64 pool",
799   .function = nat64_show_pool_command_fn,
800 };
801
802 /*?
803  * @cliexpar
804  * @cliexstart{set interface nat64}
805  * Enable/disable NAT64 feature on the interface.
806  * To enable NAT64 feature with local (IPv6) network interface
807  * GigabitEthernet0/8/0 and external (IPv4) network interface
808  * GigabitEthernet0/a/0 use:
809  *  vpp# set interface nat64 in GigabitEthernet0/8/0 out GigabitEthernet0/a/0
810  * @cliexend
811 ?*/
812 VLIB_CLI_COMMAND (set_interface_nat64_command, static) = {
813   .path = "set interface nat64",
814   .short_help = "set interface nat64 in|out <intfc> [del]",
815   .function = nat64_interface_feature_command_fn,
816 };
817
818 /*?
819  * @cliexpar
820  * @cliexstart{show nat64 interfaces}
821  * Show interfaces with NAT64 feature.
822  * To show interfaces with NAT64 feature use:
823  *  vpp# show nat64 interfaces
824  *  NAT64 interfaces:
825  *   GigabitEthernet0/8/0 in
826  *   GigabitEthernet0/a/0 out
827  * @cliexend
828 ?*/
829 VLIB_CLI_COMMAND (show_nat64_interfaces_command, static) = {
830   .path = "show nat64 interfaces",
831   .short_help = "show nat64 interfaces",
832   .function = nat64_show_interfaces_command_fn,
833 };
834
835 /*?
836  * @cliexpar
837  * @cliexstart{nat64 add static bib}
838  * Add/delete NAT64 static BIB entry.
839  * To create NAT64 satatic BIB entry use:
840  *  vpp# nat64 add static bib 2001:db8:c000:221:: 1234 10.1.1.3 5678 tcp
841  *  vpp# nat64 add static bib 2001:db8:c000:221:: 1234 10.1.1.3 5678 udp vrf 10
842  * @cliexend
843 ?*/
844 VLIB_CLI_COMMAND (nat64_add_del_static_bib_command, static) = {
845   .path = "nat64 add static bib",
846   .short_help = "nat64 add static bib <ip6-addr> <port> <ip4-addr> <port> "
847                 "tcp|udp|icmp [vfr <table-id>] [del]",
848   .function = nat64_add_del_static_bib_command_fn,
849 };
850
851 /*?
852  * @cliexpar
853  * @cliexstart{show nat64 bib}
854  * Show NAT64 BIB entries.
855  * To show NAT64 TCP BIB entries use:
856  *  vpp# show nat64 bib tcp
857  *  NAT64 tcp BIB:
858  *   fd01:1::2 6303 10.0.0.3 62303 tcp vrf 0 dynamic 1 sessions
859  *   2001:db8:c000:221:: 1234 10.1.1.3 5678 tcp vrf 0 static 2 sessions
860  * To show NAT64 UDP BIB entries use:
861  *  vpp# show nat64 bib udp
862  *  NAT64 udp BIB:
863  *   fd01:1::2 6304 10.0.0.3 10546 udp vrf 0 dynamic 10 sessions
864  *   2001:db8:c000:221:: 1234 10.1.1.3 5678 udp vrf 10 static 0 sessions
865  * To show NAT64 ICMP BIB entries use:
866  *  vpp# show nat64 bib icmp
867  *  NAT64 icmp BIB:
868  *   fd01:1::2 6305 10.0.0.3 63209 icmp vrf 10 dynamic 1 sessions
869  * @cliexend
870 ?*/
871 VLIB_CLI_COMMAND (show_nat64_bib_command, static) = {
872   .path = "show nat64 bib",
873   .short_help = "show nat64 bib all|tcp|udp|icmp|unknown",
874   .function = nat64_show_bib_command_fn,
875 };
876
877 /*?
878  * @cliexpar
879  * @cliexstart{set nat64 timeouts}
880  * Set NAT64 session timeouts (in seconds).
881  * To set NAT64 session timeoutes use use:
882  *  vpp# set nat64 timeouts udp 200 icmp 30 tcp-trans 250 tcp-est 7450
883  * To reset NAT64 session timeoutes to default values use:
884  *  vpp# set nat64 timeouts reset
885  * @cliexend
886 ?*/
887 VLIB_CLI_COMMAND (set_nat64_timeouts_command, static) = {
888   .path = "set nat64 timeouts",
889   .short_help = "set nat64 timeouts udp <sec> icmp <sec> tcp-trans <sec> "
890                 "tcp-est <sec> tcp-incoming-syn <sec> | reset",
891   .function = nat64_set_timeouts_command_fn,
892 };
893
894 /*?
895  * @cliexpar
896  * @cliexstart{show nat64 tiemouts}
897  * Show NAT64 session timeouts:
898  *  vpp# show nat64 timeouts
899  *  NAT64 session timeouts:
900  *   UDP 300sec
901  *   ICMP 60sec
902  *   TCP transitory 240sec
903  *   TCP established 7440sec
904  *   TCP incoming SYN 6sec
905  * @cliexend
906 ?*/
907 VLIB_CLI_COMMAND (show_nat64_timeouts_command, static) = {
908   .path = "show nat64 timeouts",
909   .short_help = "show nat64 temeouts",
910   .function = nat64_show_timeouts_command_fn,
911 };
912
913 /*?
914  * @cliexpar
915  * @cliexstart{show nat64 session table}
916  * Show NAT64 session table.
917  * To show NAT64 TCP session table use:
918  *  vpp# show nat64 session table tcp
919  *  NAT64 tcp session table:
920  *   fd01:1::2 6303 64:ff9b::ac10:202 20 10.0.0.3 62303 172.16.2.2 20 tcp vrf 0
921  *   fd01:3::2 6303 64:ff9b::ac10:202 20 10.0.10.3 21300 172.16.2.2 20 tcp vrf 10
922  * To show NAT64 UDP session table use:
923  * #vpp show nat64 session table udp
924  * NAT64 udp session table:
925  *  fd01:1::2 6304 64:ff9b::ac10:202 20 10.0.0.3 10546 172.16.2.2 20 udp vrf 0
926  *  fd01:3::2 6304 64:ff9b::ac10:202 20 10.0.10.3 58627 172.16.2.2 20 udp vrf 10
927  *  fd01:1::2 1235 64:ff9b::a00:3 4023 10.0.0.3 24488 10.0.0.3 4023 udp vrf 0
928  *  fd01:1::3 23 64:ff9b::a00:3 24488 10.0.0.3 4023 10.0.0.3 24488 udp vrf 0
929  * To show NAT64 ICMP session table use:
930  * #vpp show nat64 session table icmp
931  * NAT64 icmp session table:
932  *  fd01:1::2 64:ff9b::ac10:202 6305 10.0.0.3 172.16.2.2 63209 icmp vrf 0
933  * @cliexend
934 ?*/
935 VLIB_CLI_COMMAND (show_nat64_st_command, static) = {
936   .path = "show nat64 session table",
937   .short_help = "show nat64 session table all|tcp|udp|icmp|unknown",
938   .function = nat64_show_st_command_fn,
939 };
940
941 /*?
942  * @cliexpar
943  * @cliexstart{nat64 add prefix}
944  * Set NAT64 prefix for generating IPv6 representations of IPv4 addresses.
945  * To set NAT64 global prefix use:
946  *  vpp# nat64 add prefix 2001:db8::/32
947  * To set NAT64 prefix for specific tenant use:
948  *  vpp# nat64 add prefix 2001:db8:122:300::/56 tenant-vrf 10
949  * @cliexend
950 ?*/
951 VLIB_CLI_COMMAND (nat64_add_del_prefix_command, static) = {
952   .path = "nat64 add prefix",
953   .short_help = "nat64 add prefix <ip6-prefix>/<plen> [tenant-vrf <vrf-id>] "
954                 "[del]",
955   .function = nat64_add_del_prefix_command_fn,
956 };
957
958 /*?
959  * @cliexpar
960  * @cliexstart{show nat64 prefix}
961  * Show NAT64 prefix.
962  * To show NAT64 prefix use:
963  *  vpp# show nat64 prefix
964  *  NAT64 prefix:
965  *   2001:db8::/32 tenant-vrf 0
966  *   2001:db8:122:300::/56 tenant-vrf 10
967  * @cliexend
968 ?*/
969 VLIB_CLI_COMMAND (show_nat64_prefix_command, static) = {
970   .path = "show nat64 prefix",
971   .short_help = "show nat64 prefix",
972   .function = nat64_show_prefix_command_fn,
973 };
974
975 /* *INDENT-ON* */
976
977 /*
978  * fd.io coding-style-patch-verification: ON
979  *
980  * Local Variables:
981  * eval: (c-set-style "gnu")
982  * End:
983  */