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                    (nat_interface_is_inside (i)
 272                     && nat_interface_is_outside (i)) ? "in out" :
 273                    nat_interface_is_inside (i) ? "in" : "out");
 274   return 0;
 275 }
 276
 277 static clib_error_t *
 278 nat64_show_interfaces_command_fn (vlib_main_t * vm,
 279                                   unformat_input_t *
 280                                   input, vlib_cli_command_t * cmd)
 281 {
 282   nat64_main_t *nm = &nat64_main;
 283
 284   if (nm->is_disabled)
 285     return clib_error_return (0,
 286                               "NAT64 disabled, multi thread not supported");
 287
 288   vlib_cli_output (vm, "NAT64 interfaces:");
 289   nat64_interfaces_walk (nat64_cli_interface_walk, vm);
 290
 291   return 0;
 292 }
 293
 294 static clib_error_t *
 295 nat64_add_del_static_bib_command_fn (vlib_main_t *
 296                                      vm,
 297                                      unformat_input_t
 298                                      * input, vlib_cli_command_t * cmd)
 299 {
 300   nat64_main_t *nm = &nat64_main;
 301   unformat_input_t _line_input, *line_input = &_line_input;
 302   clib_error_t *error = 0;
 303   u8 is_add = 1;
 304   ip6_address_t in_addr;
 305   ip4_address_t out_addr;
 306   u32 in_port = 0;
 307   u32 out_port = 0;
 308   u32 vrf_id = 0, protocol;
 309   snat_protocol_t proto = 0;
 310   u8 p = 0;
 311   int rv;
 312
 313   if (nm->is_disabled)
 314     return clib_error_return (0,
 315                               "NAT64 disabled, multi thread not supported");
 316
 317   if (!unformat_user (input, unformat_line_input, line_input))
 318     return 0;
 319
 320   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
 321     {
 322       if (unformat (line_input, "%U %u", unformat_ip6_address,
 323                     &in_addr, &in_port))
 324         ;
 325       else if (unformat (line_input, "%U %u", unformat_ip4_address,
 326                          &out_addr, &out_port))
 327         ;
 328       else if (unformat (line_input, "vrf %u", &vrf_id))
 329         ;
 330       else if (unformat (line_input, "%U", unformat_snat_protocol, &proto))
 331         ;
 332       else
 333         if (unformat
 334             (line_input, "%U %U %u", unformat_ip6_address, &in_addr,
 335              unformat_ip4_address, &out_addr, &protocol))
 336         p = (u8) protocol;
 337       else if (unformat (line_input, "del"))
 338         is_add = 0;
 339       else
 340         {
 341           error = clib_error_return (0, "unknown input: '%U'",
 342                                      format_unformat_error, line_input);
 343           goto done;
 344         }
 345     }
 346
 347   if (!p)
 348     {
 349       if (!in_port)
 350         {
 351           error =
 352             clib_error_return (0, "inside port and address  must be set");
 353           goto done;
 354         }
 355
 356       if (!out_port)
 357         {
 358           error =
 359             clib_error_return (0, "outside port and address  must be set");
 360           goto done;
 361         }
 362
 363       p = snat_proto_to_ip_proto (proto);
 364     }
 365
 366   rv =
 367     nat64_add_del_static_bib_entry (&in_addr, &out_addr, (u16) in_port,
 368                                     (u16) out_port, p, vrf_id, is_add);
 369
 370   switch (rv)
 371     {
 372     case VNET_API_ERROR_NO_SUCH_ENTRY:
 373       error = clib_error_return (0, "NAT64 BIB entry not exist.");
 374       goto done;
 375     case VNET_API_ERROR_VALUE_EXIST:
 376       error = clib_error_return (0, "NAT64 BIB entry exist.");
 377       goto done;
 378     case VNET_API_ERROR_UNSPECIFIED:
 379       error = clib_error_return (0, "Crerate NAT64 BIB entry failed.");
 380       goto done;
 381     case VNET_API_ERROR_INVALID_VALUE:
 382       error =
 383         clib_error_return (0, "Outside addres %U and port %u already in use.",
 384                            format_ip4_address, &out_addr, out_port);
 385       goto done;
 386     default:
 387       break;
 388     }
 389
 390 done:
 391   unformat_free (line_input);
 392
 393   return error;
 394 }
 395
 396 static int
 397 nat64_cli_bib_walk (nat64_db_bib_entry_t * bibe, void *ctx)
 398 {
 399   vlib_main_t *vm = ctx;
 400   fib_table_t *fib;
 401
 402   fib = fib_table_get (bibe->fib_index, FIB_PROTOCOL_IP6);
 403   if (!fib)
 404     return -1;
 405
 406   switch (bibe->proto)
 407     {
 408     case IP_PROTOCOL_ICMP:
 409     case IP_PROTOCOL_TCP:
 410     case IP_PROTOCOL_UDP:
 411       vlib_cli_output (vm, " %U %u %U %u protocol %U vrf %u %s %u sessions",
 412                        format_ip6_address, &bibe->in_addr,
 413                        clib_net_to_host_u16 (bibe->in_port),
 414                        format_ip4_address, &bibe->out_addr,
 415                        clib_net_to_host_u16 (bibe->out_port),
 416                        format_snat_protocol,
 417                        ip_proto_to_snat_proto (bibe->proto), fib->ft_table_id,
 418                        bibe->is_static ? "static" : "dynamic", bibe->ses_num);
 419       break;
 420     default:
 421       vlib_cli_output (vm, " %U %U protocol %u vrf %u %s %u sessions",
 422                        format_ip6_address, &bibe->in_addr,
 423                        format_ip4_address, &bibe->out_addr,
 424                        bibe->proto, fib->ft_table_id,
 425                        bibe->is_static ? "static" : "dynamic", bibe->ses_num);
 426     }
 427   return 0;
 428 }
 429
 430 static clib_error_t *
 431 nat64_show_bib_command_fn (vlib_main_t * vm,
 432                            unformat_input_t * input, vlib_cli_command_t * cmd)
 433 {
 434   nat64_main_t *nm = &nat64_main;
 435   unformat_input_t _line_input, *line_input = &_line_input;
 436   clib_error_t *error = 0;
 437   u32 proto = ~0;
 438   u8 p = 255;
 439
 440   if (nm->is_disabled)
 441     return clib_error_return (0,
 442                               "NAT64 disabled, multi thread not supported");
 443
 444   if (!unformat_user (input, unformat_line_input, line_input))
 445     return 0;
 446
 447   if (unformat (line_input, "%U", unformat_snat_protocol, &proto))
 448     p = snat_proto_to_ip_proto (proto);
 449   else if (unformat (line_input, "unknown"))
 450     p = 0;
 451   else if (unformat (line_input, "all"))
 452     ;
 453   else
 454     {
 455       error = clib_error_return (0, "unknown input: '%U'",
 456                                  format_unformat_error, line_input);
 457       goto done;
 458     }
 459
 460   if (p == 255)
 461     vlib_cli_output (vm, "NAT64 BIB entries:");
 462   else
 463     vlib_cli_output (vm, "NAT64 %U BIB entries:", format_snat_protocol,
 464                      proto);
 465   nat64_db_bib_walk (&nm->db, p, nat64_cli_bib_walk, vm);
 466
 467 done:
 468   unformat_free (line_input);
 469
 470   return error;
 471 }
 472
 473 static clib_error_t *
 474 nat64_set_timeouts_command_fn (vlib_main_t * vm, unformat_input_t * input,
 475                                vlib_cli_command_t * cmd)
 476 {
 477   nat64_main_t *nm = &nat64_main;
 478   unformat_input_t _line_input, *line_input = &_line_input;
 479   clib_error_t *error = 0;
 480   u32 timeout, tcp_trans, tcp_est, tcp_incoming_syn;
 481
 482   tcp_trans = nat64_get_tcp_trans_timeout ();
 483   tcp_est = nat64_get_tcp_est_timeout ();
 484   tcp_incoming_syn = nat64_get_tcp_incoming_syn_timeout ();
 485
 486   if (nm->is_disabled)
 487     return clib_error_return (0,
 488                               "NAT64 disabled, multi thread not supported");
 489
 490   if (!unformat_user (input, unformat_line_input, line_input))
 491     return 0;
 492
 493   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
 494     {
 495       if (unformat (line_input, "udp %u", &timeout))
 496         {
 497           if (nat64_set_udp_timeout (timeout))
 498             {
 499               error = clib_error_return (0, "Invalid UDP timeout value");
 500               goto done;
 501             }
 502         }
 503       else if (unformat (line_input, "icmp %u", &timeout))
 504         {
 505           if (nat64_set_icmp_timeout (timeout))
 506             {
 507               error = clib_error_return (0, "Invalid ICMP timeout value");
 508               goto done;
 509             }
 510         }
 511       else if (unformat (line_input, "tcp-trans %u", &tcp_trans))
 512         {
 513           if (nat64_set_tcp_timeouts (tcp_trans, tcp_est, tcp_incoming_syn))
 514             {
 515               error =
 516                 clib_error_return (0,
 517                                    "Invalid TCP transitory timeouts value");
 518               goto done;
 519             }
 520         }
 521       else if (unformat (line_input, "tcp-est %u", &tcp_est))
 522         {
 523           if (nat64_set_tcp_timeouts (tcp_trans, tcp_est, tcp_incoming_syn))
 524             {
 525               error =
 526                 clib_error_return (0,
 527                                    "Invalid TCP established timeouts value");
 528               goto done;
 529             }
 530         }
 531       else
 532         if (unformat (line_input, "tcp-incoming-syn %u", &tcp_incoming_syn))
 533         {
 534           if (nat64_set_tcp_timeouts (tcp_trans, tcp_est, tcp_incoming_syn))
 535             {
 536               error =
 537                 clib_error_return (0,
 538                                    "Invalid TCP incoming SYN timeouts value");
 539               goto done;
 540             }
 541         }
 542       else if (unformat (line_input, "reset"))
 543         {
 544           nat64_set_udp_timeout (0);
 545           nat64_set_icmp_timeout (0);
 546           nat64_set_tcp_timeouts (0, 0, 0);
 547         }
 548       else
 549         {
 550           error = clib_error_return (0, "unknown input '%U'",
 551                                      format_unformat_error, line_input);
 552           goto done;
 553         }
 554     }
 555
 556 done:
 557   unformat_free (line_input);
 558
 559   return error;
 560 }
 561
 562 static clib_error_t *
 563 nat64_show_timeouts_command_fn (vlib_main_t * vm, unformat_input_t * input,
 564                                 vlib_cli_command_t * cmd)
 565 {
 566   nat64_main_t *nm = &nat64_main;
 567
 568   if (nm->is_disabled)
 569     return clib_error_return (0,
 570                               "NAT64 disabled, multi thread not supported");
 571
 572   vlib_cli_output (vm, "NAT64 session timeouts:");
 573   vlib_cli_output (vm, " UDP %usec", nat64_get_udp_timeout ());
 574   vlib_cli_output (vm, " ICMP %usec", nat64_get_icmp_timeout ());
 575   vlib_cli_output (vm, " TCP transitory %usec",
 576                    nat64_get_tcp_trans_timeout ());
 577   vlib_cli_output (vm, " TCP established %usec",
 578                    nat64_get_tcp_est_timeout ());
 579   vlib_cli_output (vm, " TCP incoming SYN %usec",
 580                    nat64_get_tcp_incoming_syn_timeout ());
 581
 582   return 0;
 583 }
 584
 585 static int
 586 nat64_cli_st_walk (nat64_db_st_entry_t * ste, void *ctx)
 587 {
 588   vlib_main_t *vm = ctx;
 589   nat64_main_t *nm = &nat64_main;
 590   nat64_db_bib_entry_t *bibe;
 591   fib_table_t *fib;
 592
 593   bibe = nat64_db_bib_entry_by_index (&nm->db, ste->proto, ste->bibe_index);
 594   if (!bibe)
 595     return -1;
 596
 597   fib = fib_table_get (bibe->fib_index, FIB_PROTOCOL_IP6);
 598   if (!fib)
 599     return -1;
 600
 601   u32 vrf_id = fib->ft_table_id;
 602
 603   if (ste->proto == IP_PROTOCOL_ICMP)
 604     vlib_cli_output (vm, " %U %U %u %U %U %u protocol %U vrf %u",
 605                      format_ip6_address, &bibe->in_addr,
 606                      format_ip6_address, &ste->in_r_addr,
 607                      clib_net_to_host_u16 (bibe->in_port),
 608                      format_ip4_address, &bibe->out_addr,
 609                      format_ip4_address, &ste->out_r_addr,
 610                      clib_net_to_host_u16 (bibe->out_port),
 611                      format_snat_protocol,
 612                      ip_proto_to_snat_proto (bibe->proto), vrf_id);
 613   else if (ste->proto == IP_PROTOCOL_TCP || ste->proto == IP_PROTOCOL_UDP)
 614     vlib_cli_output (vm, " %U %u %U %u %U %u %U %u protcol %U vrf %u",
 615                      format_ip6_address, &bibe->in_addr,
 616                      clib_net_to_host_u16 (bibe->in_port),
 617                      format_ip6_address, &ste->in_r_addr,
 618                      clib_net_to_host_u16 (ste->r_port),
 619                      format_ip4_address, &bibe->out_addr,
 620                      clib_net_to_host_u16 (bibe->out_port),
 621                      format_ip4_address, &ste->out_r_addr,
 622                      clib_net_to_host_u16 (ste->r_port),
 623                      format_snat_protocol,
 624                      ip_proto_to_snat_proto (bibe->proto), vrf_id);
 625   else
 626     vlib_cli_output (vm, " %U %U %U %U protocol %u vrf %u",
 627                      format_ip6_address, &bibe->in_addr,
 628                      format_ip6_address, &ste->in_r_addr,
 629                      format_ip4_address, &bibe->out_addr,
 630                      format_ip4_address, &ste->out_r_addr,
 631                      bibe->proto, vrf_id);
 632
 633   return 0;
 634 }
 635
 636 static clib_error_t *
 637 nat64_show_st_command_fn (vlib_main_t * vm,
 638                           unformat_input_t * input, vlib_cli_command_t * cmd)
 639 {
 640   nat64_main_t *nm = &nat64_main;
 641   unformat_input_t _line_input, *line_input = &_line_input;
 642   clib_error_t *error = 0;
 643   u32 proto = ~0;
 644   u8 p = 255;
 645
 646   if (nm->is_disabled)
 647     return clib_error_return (0,
 648                               "NAT64 disabled, multi thread not supported");
 649
 650   if (!unformat_user (input, unformat_line_input, line_input))
 651     return 0;
 652
 653   if (unformat (line_input, "%U", unformat_snat_protocol, &proto))
 654     p = snat_proto_to_ip_proto (proto);
 655   else if (unformat (line_input, "unknown"))
 656     p = 0;
 657   else if (unformat (line_input, "all"))
 658     ;
 659   else
 660     {
 661       error = clib_error_return (0, "unknown input: '%U'",
 662                                  format_unformat_error, line_input);
 663       goto done;
 664     }
 665
 666   if (p == 255)
 667     vlib_cli_output (vm, "NAT64 sessions:");
 668   else
 669     vlib_cli_output (vm, "NAT64 %U sessions:", format_snat_protocol, proto);
 670   nat64_db_st_walk (&nm->db, p, nat64_cli_st_walk, vm);
 671
 672 done:
 673   unformat_free (line_input);
 674
 675   return error;
 676 }
 677
 678 static clib_error_t *
 679 nat64_add_del_prefix_command_fn (vlib_main_t * vm, unformat_input_t * input,
 680                                  vlib_cli_command_t * cmd)
 681 {
 682   nat64_main_t *nm = &nat64_main;
 683   clib_error_t *error = 0;
 684   unformat_input_t _line_input, *line_input = &_line_input;
 685   u8 is_add = 1;
 686   u32 vrf_id = 0;
 687   ip6_address_t prefix;
 688   u32 plen = 0;
 689   int rv;
 690
 691   if (nm->is_disabled)
 692     return clib_error_return (0,
 693                               "NAT64 disabled, multi thread not supported");
 694
 695   if (!unformat_user (input, unformat_line_input, line_input))
 696     return 0;
 697
 698   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
 699     {
 700       if (unformat
 701           (line_input, "%U/%u", unformat_ip6_address, &prefix, &plen))
 702         ;
 703       else if (unformat (line_input, "tenant-vrf %u", &vrf_id))
 704         ;
 705       else if (unformat (line_input, "del"))
 706         is_add = 0;
 707       else
 708         {
 709           error = clib_error_return (0, "unknown input: '%U'",
 710                                      format_unformat_error, line_input);
 711           goto done;
 712         }
 713     }
 714
 715   if (!plen)
 716     {
 717       error = clib_error_return (0, "NAT64 prefix must be set.");
 718       goto done;
 719     }
 720
 721   rv = nat64_add_del_prefix (&prefix, (u8) plen, vrf_id, is_add);
 722
 723   switch (rv)
 724     {
 725     case VNET_API_ERROR_NO_SUCH_ENTRY:
 726       error = clib_error_return (0, "NAT64 prefix not exist.");
 727       goto done;
 728     case VNET_API_ERROR_INVALID_VALUE:
 729       error = clib_error_return (0, "Invalid prefix length.");
 730       goto done;
 731     default:
 732       break;
 733     }
 734
 735 done:
 736   unformat_free (line_input);
 737
 738   return error;
 739 }
 740
 741 static int
 742 nat64_cli_prefix_walk (nat64_prefix_t * p, void *ctx)
 743 {
 744   vlib_main_t *vm = ctx;
 745
 746   vlib_cli_output (vm, " %U/%u tenant-vrf %u",
 747                    format_ip6_address, &p->prefix, p->plen, p->vrf_id);
 748
 749   return 0;
 750 }
 751
 752 static clib_error_t *
 753 nat64_show_prefix_command_fn (vlib_main_t * vm, unformat_input_t * input,
 754                               vlib_cli_command_t * cmd)
 755 {
 756   nat64_main_t *nm = &nat64_main;
 757
 758   if (nm->is_disabled)
 759     return clib_error_return (0,
 760                               "NAT64 disabled, multi thread not supported");
 761
 762   vlib_cli_output (vm, "NAT64 prefix:");
 763   nat64_prefix_walk (nat64_cli_prefix_walk, vm);
 764
 765   return 0;
 766 }
 767
 768 /* *INDENT-OFF* */
 769
 770 /*?
 771  * @cliexpar
 772  * @cliexstart{nat64 add pool address}
 773  * Add/delete NAT64 pool address.
 774  * To add single NAT64 pool address use:
 775  *  vpp# nat64 add pool address 10.1.1.10
 776  * To add NAT64 pool address range use:
 777  *  vpp# nat64 add pool address 10.1.1.2 - 10.1.1.5
 778  * To add NAT64 pool address for specific tenant use:
 779  *  vpp# nat64 add pool address 10.1.1.100 tenant-vrf 100
 780  * @cliexend
 781 ?*/
 782 VLIB_CLI_COMMAND (nat64_add_pool_address_command, static) = {
 783   .path = "nat64 add pool address",
 784   .short_help = "nat64 add pool address <ip4-range-start> [- <ip4-range-end>] "
 785                 "[tenant-vrf <vrf-id>] [del]",
 786   .function = nat64_add_del_pool_addr_command_fn,
 787 };
 788
 789 /*?
 790  * @cliexpar
 791  * @cliexstart{show nat64 pool}
 792  * Show NAT64 pool.
 793  *  vpp# show nat64 pool
 794  *  NAT64 pool:
 795  *   10.1.1.3 tenant VRF: 0
 796  *   10.1.1.10 tenant VRF: 10
 797  * @cliexend
 798 ?*/
 799 VLIB_CLI_COMMAND (show_nat64_pool_command, static) = {
 800   .path = "show nat64 pool",
 801   .short_help = "show nat64 pool",
 802   .function = nat64_show_pool_command_fn,
 803 };
 804
 805 /*?
 806  * @cliexpar
 807  * @cliexstart{set interface nat64}
 808  * Enable/disable NAT64 feature on the interface.
 809  * To enable NAT64 feature with local (IPv6) network interface
 810  * GigabitEthernet0/8/0 and external (IPv4) network interface
 811  * GigabitEthernet0/a/0 use:
 812  *  vpp# set interface nat64 in GigabitEthernet0/8/0 out GigabitEthernet0/a/0
 813  * @cliexend
 814 ?*/
 815 VLIB_CLI_COMMAND (set_interface_nat64_command, static) = {
 816   .path = "set interface nat64",
 817   .short_help = "set interface nat64 in|out <intfc> [del]",
 818   .function = nat64_interface_feature_command_fn,
 819 };
 820
 821 /*?
 822  * @cliexpar
 823  * @cliexstart{show nat64 interfaces}
 824  * Show interfaces with NAT64 feature.
 825  * To show interfaces with NAT64 feature use:
 826  *  vpp# show nat64 interfaces
 827  *  NAT64 interfaces:
 828  *   GigabitEthernet0/8/0 in
 829  *   GigabitEthernet0/a/0 out
 830  * @cliexend
 831 ?*/
 832 VLIB_CLI_COMMAND (show_nat64_interfaces_command, static) = {
 833   .path = "show nat64 interfaces",
 834   .short_help = "show nat64 interfaces",
 835   .function = nat64_show_interfaces_command_fn,
 836 };
 837
 838 /*?
 839  * @cliexpar
 840  * @cliexstart{nat64 add static bib}
 841  * Add/delete NAT64 static BIB entry.
 842  * To create NAT64 satatic BIB entry use:
 843  *  vpp# nat64 add static bib 2001:db8:c000:221:: 1234 10.1.1.3 5678 tcp
 844  *  vpp# nat64 add static bib 2001:db8:c000:221:: 1234 10.1.1.3 5678 udp vrf 10
 845  * @cliexend
 846 ?*/
 847 VLIB_CLI_COMMAND (nat64_add_del_static_bib_command, static) = {
 848   .path = "nat64 add static bib",
 849   .short_help = "nat64 add static bib <ip6-addr> <port> <ip4-addr> <port> "
 850                 "tcp|udp|icmp [vfr <table-id>] [del]",
 851   .function = nat64_add_del_static_bib_command_fn,
 852 };
 853
 854 /*?
 855  * @cliexpar
 856  * @cliexstart{show nat64 bib}
 857  * Show NAT64 BIB entries.
 858  * To show NAT64 TCP BIB entries use:
 859  *  vpp# show nat64 bib tcp
 860  *  NAT64 tcp BIB:
 861  *   fd01:1::2 6303 10.0.0.3 62303 tcp vrf 0 dynamic 1 sessions
 862  *   2001:db8:c000:221:: 1234 10.1.1.3 5678 tcp vrf 0 static 2 sessions
 863  * To show NAT64 UDP BIB entries use:
 864  *  vpp# show nat64 bib udp
 865  *  NAT64 udp BIB:
 866  *   fd01:1::2 6304 10.0.0.3 10546 udp vrf 0 dynamic 10 sessions
 867  *   2001:db8:c000:221:: 1234 10.1.1.3 5678 udp vrf 10 static 0 sessions
 868  * To show NAT64 ICMP BIB entries use:
 869  *  vpp# show nat64 bib icmp
 870  *  NAT64 icmp BIB:
 871  *   fd01:1::2 6305 10.0.0.3 63209 icmp vrf 10 dynamic 1 sessions
 872  * @cliexend
 873 ?*/
 874 VLIB_CLI_COMMAND (show_nat64_bib_command, static) = {
 875   .path = "show nat64 bib",
 876   .short_help = "show nat64 bib all|tcp|udp|icmp|unknown",
 877   .function = nat64_show_bib_command_fn,
 878 };
 879
 880 /*?
 881  * @cliexpar
 882  * @cliexstart{set nat64 timeouts}
 883  * Set NAT64 session timeouts (in seconds).
 884  * To set NAT64 session timeoutes use use:
 885  *  vpp# set nat64 timeouts udp 200 icmp 30 tcp-trans 250 tcp-est 7450
 886  * To reset NAT64 session timeoutes to default values use:
 887  *  vpp# set nat64 timeouts reset
 888  * @cliexend
 889 ?*/
 890 VLIB_CLI_COMMAND (set_nat64_timeouts_command, static) = {
 891   .path = "set nat64 timeouts",
 892   .short_help = "set nat64 timeouts udp <sec> icmp <sec> tcp-trans <sec> "
 893                 "tcp-est <sec> tcp-incoming-syn <sec> | reset",
 894   .function = nat64_set_timeouts_command_fn,
 895 };
 896
 897 /*?
 898  * @cliexpar
 899  * @cliexstart{show nat64 timeoutss}
 900  * Show NAT64 session timeouts:
 901  *  vpp# show nat64 timeouts
 902  *  NAT64 session timeouts:
 903  *   UDP 300sec
 904  *   ICMP 60sec
 905  *   TCP transitory 240sec
 906  *   TCP established 7440sec
 907  *   TCP incoming SYN 6sec
 908  * @cliexend
 909 ?*/
 910 VLIB_CLI_COMMAND (show_nat64_timeouts_command, static) = {
 911   .path = "show nat64 timeouts",
 912   .short_help = "show nat64 timeouts",
 913   .function = nat64_show_timeouts_command_fn,
 914 };
 915
 916 /*?
 917  * @cliexpar
 918  * @cliexstart{show nat64 session table}
 919  * Show NAT64 session table.
 920  * To show NAT64 TCP session table use:
 921  *  vpp# show nat64 session table tcp
 922  *  NAT64 tcp session table:
 923  *   fd01:1::2 6303 64:ff9b::ac10:202 20 10.0.0.3 62303 172.16.2.2 20 tcp vrf 0
 924  *   fd01:3::2 6303 64:ff9b::ac10:202 20 10.0.10.3 21300 172.16.2.2 20 tcp vrf 10
 925  * To show NAT64 UDP session table use:
 926  * #vpp show nat64 session table udp
 927  * NAT64 udp session table:
 928  *  fd01:1::2 6304 64:ff9b::ac10:202 20 10.0.0.3 10546 172.16.2.2 20 udp vrf 0
 929  *  fd01:3::2 6304 64:ff9b::ac10:202 20 10.0.10.3 58627 172.16.2.2 20 udp vrf 10
 930  *  fd01:1::2 1235 64:ff9b::a00:3 4023 10.0.0.3 24488 10.0.0.3 4023 udp vrf 0
 931  *  fd01:1::3 23 64:ff9b::a00:3 24488 10.0.0.3 4023 10.0.0.3 24488 udp vrf 0
 932  * To show NAT64 ICMP session table use:
 933  * #vpp show nat64 session table icmp
 934  * NAT64 icmp session table:
 935  *  fd01:1::2 64:ff9b::ac10:202 6305 10.0.0.3 172.16.2.2 63209 icmp vrf 0
 936  * @cliexend
 937 ?*/
 938 VLIB_CLI_COMMAND (show_nat64_st_command, static) = {
 939   .path = "show nat64 session table",
 940   .short_help = "show nat64 session table all|tcp|udp|icmp|unknown",
 941   .function = nat64_show_st_command_fn,
 942 };
 943
 944 /*?
 945  * @cliexpar
 946  * @cliexstart{nat64 add prefix}
 947  * Set NAT64 prefix for generating IPv6 representations of IPv4 addresses.
 948  * To set NAT64 global prefix use:
 949  *  vpp# nat64 add prefix 2001:db8::/32
 950  * To set NAT64 prefix for specific tenant use:
 951  *  vpp# nat64 add prefix 2001:db8:122:300::/56 tenant-vrf 10
 952  * @cliexend
 953 ?*/
 954 VLIB_CLI_COMMAND (nat64_add_del_prefix_command, static) = {
 955   .path = "nat64 add prefix",
 956   .short_help = "nat64 add prefix <ip6-prefix>/<plen> [tenant-vrf <vrf-id>] "
 957                 "[del]",
 958   .function = nat64_add_del_prefix_command_fn,
 959 };
 960
 961 /*?
 962  * @cliexpar
 963  * @cliexstart{show nat64 prefix}
 964  * Show NAT64 prefix.
 965  * To show NAT64 prefix use:
 966  *  vpp# show nat64 prefix
 967  *  NAT64 prefix:
 968  *   2001:db8::/32 tenant-vrf 0
 969  *   2001:db8:122:300::/56 tenant-vrf 10
 970  * @cliexend
 971 ?*/
 972 VLIB_CLI_COMMAND (show_nat64_prefix_command, static) = {
 973   .path = "show nat64 prefix",
 974   .short_help = "show nat64 prefix",
 975   .function = nat64_show_prefix_command_fn,
 976 };
 977
 978 /* *INDENT-ON* */
 979
 980 /*
 981  * fd.io coding-style-patch-verification: ON
 982  *
 983  * Local Variables:
 984  * eval: (c-set-style "gnu")
 985  * End:
 986  */