src/plugins/nat/nat_api.c

   1 /*
   2  * Copyright (c) 2017 Cisco and/or its affiliates.
   3  *
   4  * Licensed under the Apache License, Version 2.0 (the "License");
   5  * you may not use this file except in compliance with the License.
   6  * You may obtain a copy of the License at:
   7  *
   8  *     http://www.apache.org/licenses/LICENSE-2.0
   9  *
  10  * Unless required by applicable law or agreed to in writing, software
  11  * distributed under the License is distributed on an "AS IS" BASIS,
  12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  13  * See the License for the specific language governing permissions and
  14  * limitations under the License.
  15  */
  16 /**
  17  * @file
  18  * @brief NAT plugin API implementation
  19  */
  20
  21 #include <nat/nat.h>
  22 #include <nat/nat_det.h>
  23 #include <nat/nat64.h>
  24 #include <nat/dslite.h>
  25 #include <nat/nat_reass.h>
  26 #include <vlibapi/api.h>
  27 #include <vlibmemory/api.h>
  28
  29 #include <nat/nat_msg_enum.h>
  30 #include <vnet/fib/fib_table.h>
  31
  32 #define vl_api_nat44_lb_addr_port_t_endian vl_noop_handler
  33 #define vl_api_nat44_add_del_lb_static_mapping_t_endian vl_noop_handler
  34 #define vl_api_nat44_nat44_lb_static_mapping_details_t_endian vl_noop_handler
  35
  36 /* define message structures */
  37 #define vl_typedefs
  38 #include <nat/nat_all_api_h.h>
  39 #undef vl_typedefs
  40
  41 /* define generated endian-swappers */
  42 #define vl_endianfun
  43 #include <nat/nat_all_api_h.h>
  44 #undef vl_endianfun
  45
  46 #define vl_print(handle, ...) vlib_cli_output (handle, __VA_ARGS__)
  47
  48 #define REPLY_MSG_ID_BASE sm->msg_id_base
  49 #include <vlibapi/api_helper_macros.h>
  50
  51 /* Get the API version number */
  52 #define vl_api_version(n,v) static u32 api_version=(v);
  53 #include <nat/nat_all_api_h.h>
  54 #undef vl_api_version
  55
  56 /* Macro to finish up custom dump fns */
  57 #define FINISH                                  \
  58     vec_add1 (s, 0);                            \
  59     vl_print (handle, (char *)s);               \
  60     vec_free (s);                               \
  61     return handle;
  62
  63
  64 /******************************/
  65 /*** Common NAT plugin APIs ***/
  66 /******************************/
  67
  68 static void
  69 vl_api_nat_control_ping_t_handler (vl_api_nat_control_ping_t * mp)
  70 {
  71   vl_api_nat_control_ping_reply_t *rmp;
  72   snat_main_t *sm = &snat_main;
  73   int rv = 0;
  74
  75   /* *INDENT-OFF* */
  76   REPLY_MACRO2 (VL_API_NAT_CONTROL_PING_REPLY,
  77   ({
  78     rmp->vpe_pid = ntohl (getpid ());
  79   }));
  80   /* *INDENT-ON* */
  81 }
  82
  83 static void *
  84 vl_api_nat_control_ping_t_print (vl_api_nat_control_ping_t * mp, void *handle)
  85 {
  86   u8 *s;
  87
  88   s = format (0, "SCRIPT: nat_control_ping ");
  89
  90   FINISH;
  91 }
  92
  93 static void
  94 vl_api_nat_show_config_t_handler (vl_api_nat_show_config_t * mp)
  95 {
  96   vl_api_nat_show_config_reply_t *rmp;
  97   snat_main_t *sm = &snat_main;
  98   int rv = 0;
  99
 100   /* *INDENT-OFF* */
 101   REPLY_MACRO2 (VL_API_NAT_SHOW_CONFIG_REPLY,
 102   ({
 103     rmp->translation_buckets = htonl (sm->translation_buckets);
 104     rmp->translation_memory_size = htonl (sm->translation_memory_size);
 105     rmp->user_buckets = htonl (sm->user_buckets);
 106     rmp->user_memory_size = htonl (sm->user_memory_size);
 107     rmp->max_translations_per_user = htonl (sm->max_translations_per_user);
 108     rmp->outside_vrf_id = htonl (sm->outside_vrf_id);
 109     rmp->inside_vrf_id = htonl (sm->inside_vrf_id);
 110     rmp->static_mapping_only = sm->static_mapping_only;
 111     rmp->static_mapping_connection_tracking =
 112       sm->static_mapping_connection_tracking;
 113     rmp->deterministic = sm->deterministic;
 114   }));
 115   /* *INDENT-ON* */
 116 }
 117
 118 static void *
 119 vl_api_nat_show_config_t_print (vl_api_nat_show_config_t * mp, void *handle)
 120 {
 121   u8 *s;
 122
 123   s = format (0, "SCRIPT: nat_show_config ");
 124
 125   FINISH;
 126 }
 127
 128 static void
 129 vl_api_nat_set_workers_t_handler (vl_api_nat_set_workers_t * mp)
 130 {
 131   snat_main_t *sm = &snat_main;
 132   vl_api_nat_set_workers_reply_t *rmp;
 133   int rv = 0;
 134   uword *bitmap = 0;
 135   u64 mask = clib_net_to_host_u64 (mp->worker_mask);
 136
 137   if (sm->num_workers < 2)
 138     {
 139       rv = VNET_API_ERROR_FEATURE_DISABLED;
 140       goto send_reply;
 141     }
 142
 143   bitmap = clib_bitmap_set_multiple (bitmap, 0, mask, BITS (mask));
 144   rv = snat_set_workers (bitmap);
 145   clib_bitmap_free (bitmap);
 146
 147 send_reply:
 148   REPLY_MACRO (VL_API_NAT_SET_WORKERS_REPLY);
 149 }
 150
 151 static void *
 152 vl_api_nat_set_workers_t_print (vl_api_nat_set_workers_t * mp, void *handle)
 153 {
 154   u8 *s;
 155   uword *bitmap = 0;
 156   u8 first = 1;
 157   int i;
 158   u64 mask = clib_net_to_host_u64 (mp->worker_mask);
 159
 160   s = format (0, "SCRIPT: nat_set_workers ");
 161   bitmap = clib_bitmap_set_multiple (bitmap, 0, mask, BITS (mask));
 162   /* *INDENT-OFF* */
 163   clib_bitmap_foreach (i, bitmap,
 164     ({
 165       if (first)
 166         s = format (s, "%d", i);
 167       else
 168         s = format (s, ",%d", i);
 169       first = 0;
 170     }));
 171   /* *INDENT-ON* */
 172   clib_bitmap_free (bitmap);
 173   FINISH;
 174 }
 175
 176 static void
 177 send_nat_worker_details (u32 worker_index, vl_api_registration_t * reg,
 178                          u32 context)
 179 {
 180   vl_api_nat_worker_details_t *rmp;
 181   snat_main_t *sm = &snat_main;
 182   vlib_worker_thread_t *w =
 183     vlib_worker_threads + worker_index + sm->first_worker_index;
 184
 185   rmp = vl_msg_api_alloc (sizeof (*rmp));
 186   memset (rmp, 0, sizeof (*rmp));
 187   rmp->_vl_msg_id = ntohs (VL_API_NAT_WORKER_DETAILS + sm->msg_id_base);
 188   rmp->context = context;
 189   rmp->worker_index = htonl (worker_index);
 190   rmp->lcore_id = htonl (w->lcore_id);
 191   strncpy ((char *) rmp->name, (char *) w->name, ARRAY_LEN (rmp->name) - 1);
 192
 193   vl_api_send_msg (reg, (u8 *) rmp);
 194 }
 195
 196 static void
 197 vl_api_nat_worker_dump_t_handler (vl_api_nat_worker_dump_t * mp)
 198 {
 199   vl_api_registration_t *reg;
 200   snat_main_t *sm = &snat_main;
 201   u32 *worker_index;
 202
 203   reg = vl_api_client_index_to_registration (mp->client_index);
 204   if (!reg)
 205     return;
 206
 207   /* *INDENT-OFF* */
 208   vec_foreach (worker_index, sm->workers)
 209     send_nat_worker_details(*worker_index, reg, mp->context);
 210   /* *INDENT-ON* */
 211 }
 212
 213 static void *
 214 vl_api_nat_worker_dump_t_print (vl_api_nat_worker_dump_t * mp, void *handle)
 215 {
 216   u8 *s;
 217
 218   s = format (0, "SCRIPT: nat_worker_dump ");
 219
 220   FINISH;
 221 }
 222
 223 static void
 224 vl_api_nat_ipfix_enable_disable_t_handler (vl_api_nat_ipfix_enable_disable_t *
 225                                            mp)
 226 {
 227   snat_main_t *sm = &snat_main;
 228   vl_api_nat_ipfix_enable_disable_reply_t *rmp;
 229   int rv = 0;
 230
 231   rv = snat_ipfix_logging_enable_disable (mp->enable,
 232                                           clib_host_to_net_u32
 233                                           (mp->domain_id),
 234                                           clib_host_to_net_u16
 235                                           (mp->src_port));
 236
 237   REPLY_MACRO (VL_API_NAT_IPFIX_ENABLE_DISABLE_REPLY);
 238 }
 239
 240 static void *
 241 vl_api_nat_ipfix_enable_disable_t_print (vl_api_nat_ipfix_enable_disable_t *
 242                                          mp, void *handle)
 243 {
 244   u8 *s;
 245
 246   s = format (0, "SCRIPT: nat_ipfix_enable_disable ");
 247   if (mp->domain_id)
 248     s = format (s, "domain %d ", clib_net_to_host_u32 (mp->domain_id));
 249   if (mp->src_port)
 250     s = format (s, "src_port %d ", clib_net_to_host_u16 (mp->src_port));
 251   if (!mp->enable)
 252     s = format (s, "disable ");
 253
 254   FINISH;
 255 }
 256
 257 static void
 258 vl_api_nat_set_reass_t_handler (vl_api_nat_set_reass_t * mp)
 259 {
 260   snat_main_t *sm = &snat_main;
 261   vl_api_nat_set_reass_reply_t *rmp;
 262   int rv = 0;
 263
 264   rv =
 265     nat_reass_set (ntohl (mp->timeout), ntohs (mp->max_reass), mp->max_frag,
 266                    mp->drop_frag, mp->is_ip6);
 267
 268   REPLY_MACRO (VL_API_NAT_SET_REASS_REPLY);
 269 }
 270
 271 static void *
 272 vl_api_nat_set_reass_t_print (vl_api_nat_set_reass_t * mp, void *handle)
 273 {
 274   u8 *s;
 275
 276   s = format (0, "SCRIPT: nat_set_reass ");
 277   s = format (s, "timeout %d max_reass %d max_frag %d drop_frag %d is_ip6 %d",
 278               clib_host_to_net_u32 (mp->timeout),
 279               clib_host_to_net_u16 (mp->max_reass),
 280               mp->max_frag, mp->drop_frag, mp->is_ip6);
 281
 282   FINISH;
 283 }
 284
 285 static void
 286 vl_api_nat_get_reass_t_handler (vl_api_nat_get_reass_t * mp)
 287 {
 288   snat_main_t *sm = &snat_main;
 289   vl_api_nat_get_reass_reply_t *rmp;
 290   int rv = 0;
 291
 292   /* *INDENT-OFF* */
 293   REPLY_MACRO2 (VL_API_NAT_GET_REASS_REPLY,
 294   ({
 295     rmp->ip4_timeout = htonl (nat_reass_get_timeout(0));
 296     rmp->ip4_max_reass = htons (nat_reass_get_max_reass(0));
 297     rmp->ip4_max_frag = nat_reass_get_max_frag(0);
 298     rmp->ip4_drop_frag = nat_reass_is_drop_frag(0);
 299     rmp->ip6_timeout = htonl (nat_reass_get_timeout(1));
 300     rmp->ip6_max_reass = htons (nat_reass_get_max_reass(1));
 301     rmp->ip6_max_frag = nat_reass_get_max_frag(1);
 302     rmp->ip6_drop_frag = nat_reass_is_drop_frag(1);
 303   }))
 304   /* *INDENT-ON* */
 305 }
 306
 307 static void *
 308 vl_api_nat_get_reass_t_print (vl_api_nat_get_reass_t * mp, void *handle)
 309 {
 310   u8 *s;
 311
 312   s = format (0, "SCRIPT: nat_get_reass");
 313
 314   FINISH;
 315 }
 316
 317 typedef struct nat_api_walk_ctx_t_
 318 {
 319   vl_api_registration_t *reg;
 320   u32 context;
 321 } nat_api_walk_ctx_t;
 322
 323 static int
 324 nat_ip4_reass_walk_api (nat_reass_ip4_t * reass, void *arg)
 325 {
 326   vl_api_nat_reass_details_t *rmp;
 327   snat_main_t *sm = &snat_main;
 328   nat_api_walk_ctx_t *ctx = arg;
 329
 330   rmp = vl_msg_api_alloc (sizeof (*rmp));
 331   memset (rmp, 0, sizeof (*rmp));
 332   rmp->_vl_msg_id = ntohs (VL_API_NAT_REASS_DETAILS + sm->msg_id_base);
 333   rmp->context = ctx->context;
 334   clib_memcpy (rmp->src_addr, &(reass->key.src), 4);
 335   clib_memcpy (rmp->dst_addr, &(reass->key.dst), 4);
 336   rmp->proto = reass->key.proto;
 337   rmp->frag_id = ntohl (reass->key.frag_id);
 338   rmp->frag_n = reass->frag_n;
 339   rmp->is_ip4 = 1;
 340
 341   vl_api_send_msg (ctx->reg, (u8 *) rmp);
 342
 343   return 0;
 344 }
 345
 346 static int
 347 nat_ip6_reass_walk_api (nat_reass_ip6_t * reass, void *arg)
 348 {
 349   vl_api_nat_reass_details_t *rmp;
 350   snat_main_t *sm = &snat_main;
 351   nat_api_walk_ctx_t *ctx = arg;
 352
 353   rmp = vl_msg_api_alloc (sizeof (*rmp));
 354   memset (rmp, 0, sizeof (*rmp));
 355   rmp->_vl_msg_id = ntohs (VL_API_NAT_REASS_DETAILS + sm->msg_id_base);
 356   rmp->context = ctx->context;
 357   clib_memcpy (rmp->src_addr, &(reass->key.src), 16);
 358   clib_memcpy (rmp->dst_addr, &(reass->key.dst), 16);
 359   rmp->proto = reass->key.proto;
 360   rmp->frag_id = ntohl (reass->key.frag_id);
 361   rmp->frag_n = reass->frag_n;
 362   rmp->is_ip4 = 0;
 363
 364   vl_api_send_msg (ctx->reg, (u8 *) rmp);
 365
 366   return 0;
 367 }
 368
 369 static void
 370 vl_api_nat_reass_dump_t_handler (vl_api_nat_reass_dump_t * mp)
 371 {
 372   vl_api_registration_t *reg;
 373
 374   reg = vl_api_client_index_to_registration (mp->client_index);
 375   if (!reg)
 376     return;
 377
 378   nat_api_walk_ctx_t ctx = {
 379     .reg = reg,
 380     .context = mp->context,
 381   };
 382
 383   nat_ip4_reass_walk (nat_ip4_reass_walk_api, &ctx);
 384   nat_ip6_reass_walk (nat_ip6_reass_walk_api, &ctx);
 385 }
 386
 387 static void *
 388 vl_api_nat_reass_dump_t_print (vl_api_nat_reass_dump_t * mp, void *handle)
 389 {
 390   u8 *s;
 391
 392   s = format (0, "SCRIPT: nat_reass_dump");
 393
 394   FINISH;
 395 }
 396
 397 /*************/
 398 /*** NAT44 ***/
 399 /*************/
 400 static void
 401   vl_api_nat44_add_del_address_range_t_handler
 402   (vl_api_nat44_add_del_address_range_t * mp)
 403 {
 404   snat_main_t *sm = &snat_main;
 405   vl_api_nat44_add_del_address_range_reply_t *rmp;
 406   ip4_address_t this_addr;
 407   u32 start_host_order, end_host_order;
 408   u32 vrf_id;
 409   int i, count;
 410   int rv = 0;
 411   u32 *tmp;
 412
 413   if (sm->static_mapping_only)
 414     {
 415       rv = VNET_API_ERROR_FEATURE_DISABLED;
 416       goto send_reply;
 417     }
 418
 419   tmp = (u32 *) mp->first_ip_address;
 420   start_host_order = clib_host_to_net_u32 (tmp[0]);
 421   tmp = (u32 *) mp->last_ip_address;
 422   end_host_order = clib_host_to_net_u32 (tmp[0]);
 423
 424   count = (end_host_order - start_host_order) + 1;
 425
 426   vrf_id = clib_host_to_net_u32 (mp->vrf_id);
 427
 428   if (count > 1024)
 429     clib_warning ("%U - %U, %d addresses...",
 430                   format_ip4_address, mp->first_ip_address,
 431                   format_ip4_address, mp->last_ip_address, count);
 432
 433   memcpy (&this_addr.as_u8, mp->first_ip_address, 4);
 434
 435   for (i = 0; i < count; i++)
 436     {
 437       if (mp->is_add)
 438         snat_add_address (sm, &this_addr, vrf_id, mp->twice_nat);
 439       else
 440         rv = snat_del_address (sm, this_addr, 0, mp->twice_nat);
 441
 442       if (rv)
 443         goto send_reply;
 444
 445       if (sm->out2in_dpo)
 446         nat44_add_del_address_dpo (this_addr, mp->is_add);
 447
 448       increment_v4_address (&this_addr);
 449     }
 450
 451 send_reply:
 452   REPLY_MACRO (VL_API_NAT44_ADD_DEL_ADDRESS_RANGE_REPLY);
 453 }
 454
 455 static void *vl_api_nat44_add_del_address_range_t_print
 456   (vl_api_nat44_add_del_address_range_t * mp, void *handle)
 457 {
 458   u8 *s;
 459
 460   s = format (0, "SCRIPT: nat44_add_address_range ");
 461   s = format (s, "%U ", format_ip4_address, mp->first_ip_address);
 462   if (memcmp (mp->first_ip_address, mp->last_ip_address, 4))
 463     {
 464       s = format (s, " - %U ", format_ip4_address, mp->last_ip_address);
 465     }
 466   s = format (s, "twice_nat %d ", mp->twice_nat);
 467   FINISH;
 468 }
 469
 470 static void
 471 send_nat44_address_details (snat_address_t * a,
 472                             vl_api_registration_t * reg, u32 context,
 473                             u8 twice_nat)
 474 {
 475   vl_api_nat44_address_details_t *rmp;
 476   snat_main_t *sm = &snat_main;
 477
 478   rmp = vl_msg_api_alloc (sizeof (*rmp));
 479   memset (rmp, 0, sizeof (*rmp));
 480   rmp->_vl_msg_id = ntohs (VL_API_NAT44_ADDRESS_DETAILS + sm->msg_id_base);
 481   clib_memcpy (rmp->ip_address, &(a->addr), 4);
 482   if (a->fib_index != ~0)
 483     {
 484       fib_table_t *fib = fib_table_get (a->fib_index, FIB_PROTOCOL_IP4);
 485       rmp->vrf_id = ntohl (fib->ft_table_id);
 486     }
 487   else
 488     rmp->vrf_id = ~0;
 489   rmp->twice_nat = twice_nat;
 490   rmp->context = context;
 491
 492   vl_api_send_msg (reg, (u8 *) rmp);
 493 }
 494
 495 static void
 496 vl_api_nat44_address_dump_t_handler (vl_api_nat44_address_dump_t * mp)
 497 {
 498   vl_api_registration_t *reg;
 499   snat_main_t *sm = &snat_main;
 500   snat_address_t *a;
 501
 502   reg = vl_api_client_index_to_registration (mp->client_index);
 503   if (!reg)
 504     return;
 505
 506   /* *INDENT-OFF* */
 507   vec_foreach (a, sm->addresses)
 508     send_nat44_address_details (a, reg, mp->context, 0);
 509   vec_foreach (a, sm->twice_nat_addresses)
 510     send_nat44_address_details (a, reg, mp->context, 1);
 511   /* *INDENT-ON* */
 512 }
 513
 514 static void *
 515 vl_api_nat44_address_dump_t_print (vl_api_nat44_address_dump_t * mp,
 516                                    void *handle)
 517 {
 518   u8 *s;
 519
 520   s = format (0, "SCRIPT: nat44_address_dump ");
 521
 522   FINISH;
 523 }
 524
 525 static void
 526   vl_api_nat44_interface_add_del_feature_t_handler
 527   (vl_api_nat44_interface_add_del_feature_t * mp)
 528 {
 529   snat_main_t *sm = &snat_main;
 530   vl_api_nat44_interface_add_del_feature_reply_t *rmp;
 531   u8 is_del = mp->is_add == 0;
 532   u32 sw_if_index = ntohl (mp->sw_if_index);
 533   int rv = 0;
 534
 535   VALIDATE_SW_IF_INDEX (mp);
 536
 537   rv = snat_interface_add_del (sw_if_index, mp->is_inside, is_del);
 538
 539   BAD_SW_IF_INDEX_LABEL;
 540
 541   REPLY_MACRO (VL_API_NAT44_INTERFACE_ADD_DEL_FEATURE_REPLY);
 542 }
 543
 544 static void *vl_api_nat44_interface_add_del_feature_t_print
 545   (vl_api_nat44_interface_add_del_feature_t * mp, void *handle)
 546 {
 547   u8 *s;
 548
 549   s = format (0, "SCRIPT: nat44_interface_add_del_feature ");
 550   s = format (s, "sw_if_index %d %s %s",
 551               clib_host_to_net_u32 (mp->sw_if_index),
 552               mp->is_inside ? "in" : "out", mp->is_add ? "" : "del");
 553
 554   FINISH;
 555 }
 556
 557 static void
 558 send_nat44_interface_details (snat_interface_t * i,
 559                               vl_api_registration_t * reg, u32 context)
 560 {
 561   vl_api_nat44_interface_details_t *rmp;
 562   snat_main_t *sm = &snat_main;
 563
 564   rmp = vl_msg_api_alloc (sizeof (*rmp));
 565   memset (rmp, 0, sizeof (*rmp));
 566   rmp->_vl_msg_id = ntohs (VL_API_NAT44_INTERFACE_DETAILS + sm->msg_id_base);
 567   rmp->sw_if_index = ntohl (i->sw_if_index);
 568   rmp->is_inside = (nat_interface_is_inside (i)
 569                     && nat_interface_is_outside (i)) ? 2 :
 570     nat_interface_is_inside (i);
 571   rmp->context = context;
 572
 573   vl_api_send_msg (reg, (u8 *) rmp);
 574 }
 575
 576 static void
 577 vl_api_nat44_interface_dump_t_handler (vl_api_nat44_interface_dump_t * mp)
 578 {
 579   vl_api_registration_t *reg;
 580   snat_main_t *sm = &snat_main;
 581   snat_interface_t *i;
 582
 583   reg = vl_api_client_index_to_registration (mp->client_index);
 584   if (!reg)
 585     return;
 586
 587   /* *INDENT-OFF* */
 588   pool_foreach (i, sm->interfaces,
 589   ({
 590     send_nat44_interface_details(i, reg, mp->context);
 591   }));
 592   /* *INDENT-ON* */
 593 }
 594
 595 static void *
 596 vl_api_nat44_interface_dump_t_print (vl_api_nat44_interface_dump_t * mp,
 597                                      void *handle)
 598 {
 599   u8 *s;
 600
 601   s = format (0, "SCRIPT: nat44_interface_dump ");
 602
 603   FINISH;
 604 }
 605
 606 static void
 607   vl_api_nat44_interface_add_del_output_feature_t_handler
 608   (vl_api_nat44_interface_add_del_output_feature_t * mp)
 609 {
 610   snat_main_t *sm = &snat_main;
 611   vl_api_nat44_interface_add_del_output_feature_reply_t *rmp;
 612   u8 is_del = mp->is_add == 0;
 613   u32 sw_if_index = ntohl (mp->sw_if_index);
 614   int rv = 0;
 615
 616   VALIDATE_SW_IF_INDEX (mp);
 617
 618   rv = snat_interface_add_del_output_feature (sw_if_index, mp->is_inside,
 619                                               is_del);
 620
 621   BAD_SW_IF_INDEX_LABEL;
 622
 623   REPLY_MACRO (VL_API_NAT44_INTERFACE_ADD_DEL_OUTPUT_FEATURE_REPLY);
 624 }
 625
 626 static void *vl_api_nat44_interface_add_del_output_feature_t_print
 627   (vl_api_nat44_interface_add_del_output_feature_t * mp, void *handle)
 628 {
 629   u8 *s;
 630
 631   s = format (0, "SCRIPT: nat44_interface_add_del_output_feature ");
 632   s = format (s, "sw_if_index %d %s %s",
 633               clib_host_to_net_u32 (mp->sw_if_index),
 634               mp->is_inside ? "in" : "out", mp->is_add ? "" : "del");
 635
 636   FINISH;
 637 }
 638
 639 static void
 640 send_nat44_interface_output_feature_details (snat_interface_t * i,
 641                                              vl_api_registration_t * reg,
 642                                              u32 context)
 643 {
 644   vl_api_nat44_interface_output_feature_details_t *rmp;
 645   snat_main_t *sm = &snat_main;
 646
 647   rmp = vl_msg_api_alloc (sizeof (*rmp));
 648   memset (rmp, 0, sizeof (*rmp));
 649   rmp->_vl_msg_id =
 650     ntohs (VL_API_NAT44_INTERFACE_OUTPUT_FEATURE_DETAILS + sm->msg_id_base);
 651   rmp->sw_if_index = ntohl (i->sw_if_index);
 652   rmp->context = context;
 653   rmp->is_inside = nat_interface_is_inside (i);
 654
 655   vl_api_send_msg (reg, (u8 *) rmp);
 656 }
 657
 658 static void
 659   vl_api_nat44_interface_output_feature_dump_t_handler
 660   (vl_api_nat44_interface_output_feature_dump_t * mp)
 661 {
 662   vl_api_registration_t *reg;
 663   snat_main_t *sm = &snat_main;
 664   snat_interface_t *i;
 665
 666   reg = vl_api_client_index_to_registration (mp->client_index);
 667   if (!reg)
 668     return;
 669
 670   /* *INDENT-OFF* */
 671   pool_foreach (i, sm->output_feature_interfaces,
 672   ({
 673     send_nat44_interface_output_feature_details(i, reg, mp->context);
 674   }));
 675   /* *INDENT-ON* */
 676 }
 677
 678 static void *vl_api_nat44_interface_output_feature_dump_t_print
 679   (vl_api_nat44_interface_output_feature_dump_t * mp, void *handle)
 680 {
 681   u8 *s;
 682
 683   s = format (0, "SCRIPT: nat44_interface_output_feature_dump ");
 684
 685   FINISH;
 686 }
 687
 688 static void
 689   vl_api_nat44_add_del_static_mapping_t_handler
 690   (vl_api_nat44_add_del_static_mapping_t * mp)
 691 {
 692   snat_main_t *sm = &snat_main;
 693   vl_api_nat44_add_del_static_mapping_reply_t *rmp;
 694   ip4_address_t local_addr, external_addr;
 695   u16 local_port = 0, external_port = 0;
 696   u32 vrf_id, external_sw_if_index;
 697   int rv = 0;
 698   snat_protocol_t proto;
 699
 700   memcpy (&local_addr.as_u8, mp->local_ip_address, 4);
 701   memcpy (&external_addr.as_u8, mp->external_ip_address, 4);
 702   if (mp->addr_only == 0)
 703     {
 704       local_port = clib_net_to_host_u16 (mp->local_port);
 705       external_port = clib_net_to_host_u16 (mp->external_port);
 706     }
 707   vrf_id = clib_net_to_host_u32 (mp->vrf_id);
 708   external_sw_if_index = clib_net_to_host_u32 (mp->external_sw_if_index);
 709   proto = ip_proto_to_snat_proto (mp->protocol);
 710
 711   rv = snat_add_static_mapping (local_addr, external_addr, local_port,
 712                                 external_port, vrf_id, mp->addr_only,
 713                                 external_sw_if_index, proto, mp->is_add,
 714                                 mp->twice_nat);
 715
 716   REPLY_MACRO (VL_API_NAT44_ADD_DEL_STATIC_MAPPING_REPLY);
 717 }
 718
 719 static void *vl_api_nat44_add_del_static_mapping_t_print
 720   (vl_api_nat44_add_del_static_mapping_t * mp, void *handle)
 721 {
 722   u8 *s;
 723
 724   s = format (0, "SCRIPT: nat44_add_del_static_mapping ");
 725   s = format (s, "protocol %d local_addr %U external_addr %U ",
 726               mp->protocol,
 727               format_ip4_address, mp->local_ip_address,
 728               format_ip4_address, mp->external_ip_address);
 729
 730   if (mp->addr_only == 0)
 731     s = format (s, "local_port %d external_port %d ",
 732                 clib_net_to_host_u16 (mp->local_port),
 733                 clib_net_to_host_u16 (mp->external_port));
 734
 735   s = format (s, "twice_nat %d ", mp->twice_nat);
 736
 737   if (mp->vrf_id != ~0)
 738     s = format (s, "vrf %d", clib_net_to_host_u32 (mp->vrf_id));
 739
 740   if (mp->external_sw_if_index != ~0)
 741     s = format (s, "external_sw_if_index %d",
 742                 clib_net_to_host_u32 (mp->external_sw_if_index));
 743   FINISH;
 744 }
 745
 746 static void
 747 send_nat44_static_mapping_details (snat_static_mapping_t * m,
 748                                    vl_api_registration_t * reg, u32 context)
 749 {
 750   vl_api_nat44_static_mapping_details_t *rmp;
 751   snat_main_t *sm = &snat_main;
 752
 753   rmp = vl_msg_api_alloc (sizeof (*rmp));
 754   memset (rmp, 0, sizeof (*rmp));
 755   rmp->_vl_msg_id =
 756     ntohs (VL_API_NAT44_STATIC_MAPPING_DETAILS + sm->msg_id_base);
 757   rmp->addr_only = m->addr_only;
 758   clib_memcpy (rmp->local_ip_address, &(m->local_addr), 4);
 759   clib_memcpy (rmp->external_ip_address, &(m->external_addr), 4);
 760   rmp->local_port = htons (m->local_port);
 761   rmp->external_port = htons (m->external_port);
 762   rmp->external_sw_if_index = ~0;
 763   rmp->vrf_id = htonl (m->vrf_id);
 764   rmp->protocol = snat_proto_to_ip_proto (m->proto);
 765   rmp->context = context;
 766   rmp->twice_nat = m->twice_nat;
 767
 768   vl_api_send_msg (reg, (u8 *) rmp);
 769 }
 770
 771 static void
 772 send_nat44_static_map_resolve_details (snat_static_map_resolve_t * m,
 773                                        vl_api_registration_t * reg,
 774                                        u32 context)
 775 {
 776   vl_api_nat44_static_mapping_details_t *rmp;
 777   snat_main_t *sm = &snat_main;
 778
 779   rmp = vl_msg_api_alloc (sizeof (*rmp));
 780   memset (rmp, 0, sizeof (*rmp));
 781   rmp->_vl_msg_id =
 782     ntohs (VL_API_NAT44_STATIC_MAPPING_DETAILS + sm->msg_id_base);
 783   rmp->addr_only = m->addr_only;
 784   clib_memcpy (rmp->local_ip_address, &(m->l_addr), 4);
 785   rmp->local_port = htons (m->l_port);
 786   rmp->external_port = htons (m->e_port);
 787   rmp->external_sw_if_index = htonl (m->sw_if_index);
 788   rmp->vrf_id = htonl (m->vrf_id);
 789   rmp->protocol = snat_proto_to_ip_proto (m->proto);
 790   rmp->context = context;
 791   rmp->twice_nat = m->twice_nat;
 792
 793   vl_api_send_msg (reg, (u8 *) rmp);
 794 }
 795
 796 static void
 797 vl_api_nat44_static_mapping_dump_t_handler (vl_api_nat44_static_mapping_dump_t
 798                                             * mp)
 799 {
 800   vl_api_registration_t *reg;
 801   snat_main_t *sm = &snat_main;
 802   snat_static_mapping_t *m;
 803   snat_static_map_resolve_t *rp;
 804   int j;
 805
 806   reg = vl_api_client_index_to_registration (mp->client_index);
 807   if (!reg)
 808     return;
 809
 810   /* *INDENT-OFF* */
 811   pool_foreach (m, sm->static_mappings,
 812   ({
 813       if (!vec_len(m->locals) && (m->local_addr.as_u32 != m->external_addr.as_u32))
 814         send_nat44_static_mapping_details (m, reg, mp->context);
 815   }));
 816   /* *INDENT-ON* */
 817
 818   for (j = 0; j < vec_len (sm->to_resolve); j++)
 819     {
 820       rp = sm->to_resolve + j;
 821       if (rp->l_addr.as_u32 != 0)
 822         send_nat44_static_map_resolve_details (rp, reg, mp->context);
 823     }
 824 }
 825
 826 static void *
 827 vl_api_nat44_static_mapping_dump_t_print (vl_api_nat44_static_mapping_dump_t *
 828                                           mp, void *handle)
 829 {
 830   u8 *s;
 831
 832   s = format (0, "SCRIPT: nat44_static_mapping_dump ");
 833
 834   FINISH;
 835 }
 836
 837 static void
 838   vl_api_nat44_add_del_identity_mapping_t_handler
 839   (vl_api_nat44_add_del_identity_mapping_t * mp)
 840 {
 841   snat_main_t *sm = &snat_main;
 842   vl_api_nat44_add_del_identity_mapping_reply_t *rmp;
 843   ip4_address_t addr;
 844   u16 port = 0;
 845   u32 vrf_id, sw_if_index;
 846   int rv = 0;
 847   snat_protocol_t proto = ~0;
 848
 849   if (mp->addr_only == 0)
 850     {
 851       port = clib_net_to_host_u16 (mp->port);
 852       proto = ip_proto_to_snat_proto (mp->protocol);
 853     }
 854   vrf_id = clib_net_to_host_u32 (mp->vrf_id);
 855   sw_if_index = clib_net_to_host_u32 (mp->sw_if_index);
 856   if (sw_if_index != ~0)
 857     addr.as_u32 = 0;
 858   else
 859     memcpy (&addr.as_u8, mp->ip_address, 4);
 860
 861
 862   rv =
 863     snat_add_static_mapping (addr, addr, port, port, vrf_id, mp->addr_only,
 864                              sw_if_index, proto, mp->is_add, 0);
 865
 866   REPLY_MACRO (VL_API_NAT44_ADD_DEL_IDENTITY_MAPPING_REPLY);
 867 }
 868
 869 static void *vl_api_nat44_add_del_identity_mapping_t_print
 870   (vl_api_nat44_add_del_identity_mapping_t * mp, void *handle)
 871 {
 872   u8 *s;
 873
 874   s = format (0, "SCRIPT: nat44_add_del_identity_mapping ");
 875   if (mp->sw_if_index != ~0)
 876     s = format (s, "sw_if_index %d", clib_net_to_host_u32 (mp->sw_if_index));
 877   else
 878     s = format (s, "addr %U", format_ip4_address, mp->ip_address);
 879
 880   if (mp->addr_only == 0)
 881     s =
 882       format (s, "protocol %d port %d", mp->protocol,
 883               clib_net_to_host_u16 (mp->port));
 884
 885   if (mp->vrf_id != ~0)
 886     s = format (s, "vrf %d", clib_net_to_host_u32 (mp->vrf_id));
 887
 888   FINISH;
 889 }
 890
 891 static void
 892 send_nat44_identity_mapping_details (snat_static_mapping_t * m,
 893                                      vl_api_registration_t * reg, u32 context)
 894 {
 895   vl_api_nat44_identity_mapping_details_t *rmp;
 896   snat_main_t *sm = &snat_main;
 897
 898   rmp = vl_msg_api_alloc (sizeof (*rmp));
 899   memset (rmp, 0, sizeof (*rmp));
 900   rmp->_vl_msg_id =
 901     ntohs (VL_API_NAT44_IDENTITY_MAPPING_DETAILS + sm->msg_id_base);
 902   rmp->addr_only = m->addr_only;
 903   clib_memcpy (rmp->ip_address, &(m->local_addr), 4);
 904   rmp->port = htons (m->local_port);
 905   rmp->sw_if_index = ~0;
 906   rmp->vrf_id = htonl (m->vrf_id);
 907   rmp->protocol = snat_proto_to_ip_proto (m->proto);
 908   rmp->context = context;
 909
 910   vl_api_send_msg (reg, (u8 *) rmp);
 911 }
 912
 913 static void
 914 send_nat44_identity_map_resolve_details (snat_static_map_resolve_t * m,
 915                                          vl_api_registration_t * reg,
 916                                          u32 context)
 917 {
 918   vl_api_nat44_identity_mapping_details_t *rmp;
 919   snat_main_t *sm = &snat_main;
 920
 921   rmp = vl_msg_api_alloc (sizeof (*rmp));
 922   memset (rmp, 0, sizeof (*rmp));
 923   rmp->_vl_msg_id =
 924     ntohs (VL_API_NAT44_IDENTITY_MAPPING_DETAILS + sm->msg_id_base);
 925   rmp->addr_only = m->addr_only;
 926   rmp->port = htons (m->l_port);
 927   rmp->sw_if_index = htonl (m->sw_if_index);
 928   rmp->vrf_id = htonl (m->vrf_id);
 929   rmp->protocol = snat_proto_to_ip_proto (m->proto);
 930   rmp->context = context;
 931
 932   vl_api_send_msg (reg, (u8 *) rmp);
 933 }
 934
 935 static void
 936   vl_api_nat44_identity_mapping_dump_t_handler
 937   (vl_api_nat44_identity_mapping_dump_t * mp)
 938 {
 939   vl_api_registration_t *reg;
 940   snat_main_t *sm = &snat_main;
 941   snat_static_mapping_t *m;
 942   snat_static_map_resolve_t *rp;
 943   int j;
 944
 945   reg = vl_api_client_index_to_registration (mp->client_index);
 946   if (!reg)
 947     return;
 948
 949   /* *INDENT-OFF* */
 950   pool_foreach (m, sm->static_mappings,
 951   ({
 952       if (!vec_len(m->locals) && (m->local_addr.as_u32 == m->external_addr.as_u32))
 953         send_nat44_identity_mapping_details (m, reg, mp->context);
 954   }));
 955   /* *INDENT-ON* */
 956
 957   for (j = 0; j < vec_len (sm->to_resolve); j++)
 958     {
 959       rp = sm->to_resolve + j;
 960       if (rp->l_addr.as_u32 == 0)
 961         send_nat44_identity_map_resolve_details (rp, reg, mp->context);
 962     }
 963 }
 964
 965 static void *vl_api_nat44_identity_mapping_dump_t_print
 966   (vl_api_nat44_identity_mapping_dump_t * mp, void *handle)
 967 {
 968   u8 *s;
 969
 970   s = format (0, "SCRIPT: nat44_identity_mapping_dump ");
 971
 972   FINISH;
 973 }
 974
 975 static void
 976   vl_api_nat44_add_del_interface_addr_t_handler
 977   (vl_api_nat44_add_del_interface_addr_t * mp)
 978 {
 979   snat_main_t *sm = &snat_main;
 980   vl_api_nat44_add_del_interface_addr_reply_t *rmp;
 981   u8 is_del = mp->is_add == 0;
 982   u32 sw_if_index = ntohl (mp->sw_if_index);
 983   int rv = 0;
 984
 985   VALIDATE_SW_IF_INDEX (mp);
 986
 987   rv = snat_add_interface_address (sm, sw_if_index, is_del, mp->twice_nat);
 988
 989   BAD_SW_IF_INDEX_LABEL;
 990
 991   REPLY_MACRO (VL_API_NAT44_ADD_DEL_INTERFACE_ADDR_REPLY);
 992 }
 993
 994 static void *vl_api_nat44_add_del_interface_addr_t_print
 995   (vl_api_nat44_add_del_interface_addr_t * mp, void *handle)
 996 {
 997   u8 *s;
 998
 999   s = format (0, "SCRIPT: nat44_add_del_interface_addr ");
1000   s = format (s, "sw_if_index %d twice_nat %d %s",
1001               clib_host_to_net_u32 (mp->sw_if_index),
1002               mp->twice_nat, mp->is_add ? "" : "del");
1003
1004   FINISH;
1005 }
1006
1007 static void
1008 send_nat44_interface_addr_details (u32 sw_if_index,
1009                                    vl_api_registration_t * reg, u32 context,
1010                                    u8 twice_nat)
1011 {
1012   vl_api_nat44_interface_addr_details_t *rmp;
1013   snat_main_t *sm = &snat_main;
1014
1015   rmp = vl_msg_api_alloc (sizeof (*rmp));
1016   memset (rmp, 0, sizeof (*rmp));
1017   rmp->_vl_msg_id =
1018     ntohs (VL_API_NAT44_INTERFACE_ADDR_DETAILS + sm->msg_id_base);
1019   rmp->sw_if_index = ntohl (sw_if_index);
1020   rmp->twice_nat = twice_nat;
1021   rmp->context = context;
1022
1023   vl_api_send_msg (reg, (u8 *) rmp);
1024 }
1025
1026 static void
1027 vl_api_nat44_interface_addr_dump_t_handler (vl_api_nat44_interface_addr_dump_t
1028                                             * mp)
1029 {
1030   vl_api_registration_t *reg;
1031   snat_main_t *sm = &snat_main;
1032   u32 *i;
1033
1034   reg = vl_api_client_index_to_registration (mp->client_index);
1035   if (!reg)
1036     return;
1037
1038   /* *INDENT-OFF* */
1039   vec_foreach (i, sm->auto_add_sw_if_indices)
1040     send_nat44_interface_addr_details(*i, reg, mp->context, 0);
1041   vec_foreach (i, sm->auto_add_sw_if_indices_twice_nat)
1042     send_nat44_interface_addr_details(*i, reg, mp->context, 1);
1043   /* *INDENT-ON* */
1044 }
1045
1046 static void *
1047 vl_api_nat44_interface_addr_dump_t_print (vl_api_nat44_interface_addr_dump_t *
1048                                           mp, void *handle)
1049 {
1050   u8 *s;
1051
1052   s = format (0, "SCRIPT: nat44_interface_addr_dump ");
1053
1054   FINISH;
1055 }
1056
1057 static void
1058 send_nat44_user_details (snat_user_t * u, vl_api_registration_t * reg,
1059                          u32 context)
1060 {
1061   vl_api_nat44_user_details_t *rmp;
1062   snat_main_t *sm = &snat_main;
1063   fib_table_t *fib = fib_table_get (u->fib_index, FIB_PROTOCOL_IP4);
1064
1065   rmp = vl_msg_api_alloc (sizeof (*rmp));
1066   memset (rmp, 0, sizeof (*rmp));
1067   rmp->_vl_msg_id = ntohs (VL_API_NAT44_USER_DETAILS + sm->msg_id_base);
1068
1069   rmp->vrf_id = ntohl (fib->ft_table_id);
1070
1071   clib_memcpy (rmp->ip_address, &(u->addr), 4);
1072   rmp->nsessions = ntohl (u->nsessions);
1073   rmp->nstaticsessions = ntohl (u->nstaticsessions);
1074   rmp->context = context;
1075
1076   vl_api_send_msg (reg, (u8 *) rmp);
1077 }
1078
1079 static void
1080 vl_api_nat44_user_dump_t_handler (vl_api_nat44_user_dump_t * mp)
1081 {
1082   vl_api_registration_t *reg;
1083   snat_main_t *sm = &snat_main;
1084   snat_main_per_thread_data_t *tsm;
1085   snat_user_t *u;
1086
1087   reg = vl_api_client_index_to_registration (mp->client_index);
1088   if (!reg)
1089     return;
1090
1091   /* *INDENT-OFF* */
1092   vec_foreach (tsm, sm->per_thread_data)
1093     vec_foreach (u, tsm->users)
1094       send_nat44_user_details (u, reg, mp->context);
1095   /* *INDENT-ON* */
1096 }
1097
1098 static void *
1099 vl_api_nat44_user_dump_t_print (vl_api_nat44_user_dump_t * mp, void *handle)
1100 {
1101   u8 *s;
1102
1103   s = format (0, "SCRIPT: nat44_user_dump ");
1104
1105   FINISH;
1106 }
1107
1108 static void
1109 send_nat44_user_session_details (snat_session_t * s,
1110                                  vl_api_registration_t * reg, u32 context)
1111 {
1112   vl_api_nat44_user_session_details_t *rmp;
1113   snat_main_t *sm = &snat_main;
1114
1115   rmp = vl_msg_api_alloc (sizeof (*rmp));
1116   memset (rmp, 0, sizeof (*rmp));
1117   rmp->_vl_msg_id =
1118     ntohs (VL_API_NAT44_USER_SESSION_DETAILS + sm->msg_id_base);
1119   clib_memcpy (rmp->outside_ip_address, (&s->out2in.addr), 4);
1120   clib_memcpy (rmp->inside_ip_address, (&s->in2out.addr), 4);
1121   rmp->is_static = s->flags & SNAT_SESSION_FLAG_STATIC_MAPPING ? 1 : 0;
1122   rmp->last_heard = clib_host_to_net_u64 ((u64) s->last_heard);
1123   rmp->total_bytes = clib_host_to_net_u64 (s->total_bytes);
1124   rmp->total_pkts = ntohl (s->total_pkts);
1125   rmp->context = context;
1126   if (snat_is_unk_proto_session (s))
1127     {
1128       rmp->outside_port = 0;
1129       rmp->inside_port = 0;
1130       rmp->protocol = ntohs (s->in2out.port);
1131     }
1132   else
1133     {
1134       rmp->outside_port = s->out2in.port;
1135       rmp->inside_port = s->in2out.port;
1136       rmp->protocol = ntohs (snat_proto_to_ip_proto (s->in2out.protocol));
1137     }
1138
1139   vl_api_send_msg (reg, (u8 *) rmp);
1140 }
1141
1142 static void
1143 vl_api_nat44_user_session_dump_t_handler (vl_api_nat44_user_session_dump_t *
1144                                           mp)
1145 {
1146   vl_api_registration_t *reg;
1147   snat_main_t *sm = &snat_main;
1148   snat_main_per_thread_data_t *tsm;
1149   snat_session_t *s;
1150   clib_bihash_kv_8_8_t key, value;
1151   snat_user_key_t ukey;
1152   snat_user_t *u;
1153   u32 session_index, head_index, elt_index;
1154   dlist_elt_t *head, *elt;
1155   ip4_header_t ip;
1156
1157   reg = vl_api_client_index_to_registration (mp->client_index);
1158   if (!reg)
1159     return;
1160
1161   clib_memcpy (&ukey.addr, mp->ip_address, 4);
1162   ip.src_address.as_u32 = ukey.addr.as_u32;
1163   ukey.fib_index = fib_table_find (FIB_PROTOCOL_IP4, ntohl (mp->vrf_id));
1164   key.key = ukey.as_u64;
1165   if (sm->num_workers)
1166     tsm =
1167       vec_elt_at_index (sm->per_thread_data,
1168                         sm->worker_in2out_cb (&ip, ukey.fib_index));
1169   else
1170     tsm = vec_elt_at_index (sm->per_thread_data, sm->num_workers);
1171   if (clib_bihash_search_8_8 (&tsm->user_hash, &key, &value))
1172     return;
1173   u = pool_elt_at_index (tsm->users, value.value);
1174   if (!u->nsessions && !u->nstaticsessions)
1175     return;
1176
1177   head_index = u->sessions_per_user_list_head_index;
1178   head = pool_elt_at_index (tsm->list_pool, head_index);
1179   elt_index = head->next;
1180   elt = pool_elt_at_index (tsm->list_pool, elt_index);
1181   session_index = elt->value;
1182   while (session_index != ~0)
1183     {
1184       s = pool_elt_at_index (tsm->sessions, session_index);
1185
1186       send_nat44_user_session_details (s, reg, mp->context);
1187
1188       elt_index = elt->next;
1189       elt = pool_elt_at_index (tsm->list_pool, elt_index);
1190       session_index = elt->value;
1191     }
1192 }
1193
1194 static void *
1195 vl_api_nat44_user_session_dump_t_print (vl_api_nat44_user_session_dump_t * mp,
1196                                         void *handle)
1197 {
1198   u8 *s;
1199
1200   s = format (0, "SCRIPT: nat44_user_session_dump ");
1201   s = format (s, "ip_address %U vrf_id %d\n",
1202               format_ip4_address, mp->ip_address,
1203               clib_net_to_host_u32 (mp->vrf_id));
1204
1205   FINISH;
1206 }
1207
1208 static nat44_lb_addr_port_t *
1209 unformat_nat44_lb_addr_port (vl_api_nat44_lb_addr_port_t * addr_port_pairs,
1210                              u8 addr_port_pair_num)
1211 {
1212   u8 i;
1213   nat44_lb_addr_port_t *lb_addr_port_pairs = 0, lb_addr_port;
1214   vl_api_nat44_lb_addr_port_t *ap;
1215
1216   for (i = 0; i < addr_port_pair_num; i++)
1217     {
1218       ap = &addr_port_pairs[i];
1219       memset (&lb_addr_port, 0, sizeof (lb_addr_port));
1220       clib_memcpy (&lb_addr_port.addr, ap->addr, 4);
1221       lb_addr_port.port = clib_net_to_host_u16 (ap->port);
1222       lb_addr_port.probability = ap->probability;
1223       vec_add1 (lb_addr_port_pairs, lb_addr_port);
1224     }
1225
1226   return lb_addr_port_pairs;
1227 }
1228
1229 static void
1230   vl_api_nat44_add_del_lb_static_mapping_t_handler
1231   (vl_api_nat44_add_del_lb_static_mapping_t * mp)
1232 {
1233   snat_main_t *sm = &snat_main;
1234   vl_api_nat44_add_del_lb_static_mapping_reply_t *rmp;
1235   int rv = 0;
1236   nat44_lb_addr_port_t *locals = 0;
1237   ip4_address_t e_addr;
1238   snat_protocol_t proto;
1239
1240   locals = unformat_nat44_lb_addr_port (mp->locals, mp->local_num);
1241   clib_memcpy (&e_addr, mp->external_addr, 4);
1242   proto = ip_proto_to_snat_proto (mp->protocol);
1243
1244   rv =
1245     nat44_add_del_lb_static_mapping (e_addr,
1246                                      clib_net_to_host_u16 (mp->external_port),
1247                                      proto, clib_net_to_host_u32 (mp->vrf_id),
1248                                      locals, mp->is_add, mp->twice_nat,
1249                                      mp->out2in_only);
1250
1251   vec_free (locals);
1252
1253   REPLY_MACRO (VL_API_NAT44_ADD_DEL_LB_STATIC_MAPPING_REPLY);
1254 }
1255
1256 static void *vl_api_nat44_add_del_lb_static_mapping_t_print
1257   (vl_api_nat44_add_del_lb_static_mapping_t * mp, void *handle)
1258 {
1259   u8 *s;
1260
1261   s = format (0, "SCRIPT: nat44_add_del_lb_static_mapping ");
1262   s = format (s, "is_add %d twice_nat %d out2in_only ",
1263               mp->is_add, mp->twice_nat, mp->out2in_only);
1264
1265   FINISH;
1266 }
1267
1268 static void
1269 send_nat44_lb_static_mapping_details (snat_static_mapping_t * m,
1270                                       vl_api_registration_t * reg,
1271                                       u32 context)
1272 {
1273   vl_api_nat44_lb_static_mapping_details_t *rmp;
1274   snat_main_t *sm = &snat_main;
1275   nat44_lb_addr_port_t *ap;
1276   vl_api_nat44_lb_addr_port_t *locals;
1277
1278   rmp =
1279     vl_msg_api_alloc (sizeof (*rmp) +
1280                       (vec_len (m->locals) * sizeof (nat44_lb_addr_port_t)));
1281   memset (rmp, 0, sizeof (*rmp));
1282   rmp->_vl_msg_id =
1283     ntohs (VL_API_NAT44_LB_STATIC_MAPPING_DETAILS + sm->msg_id_base);
1284
1285   clib_memcpy (rmp->external_addr, &(m->external_addr), 4);
1286   rmp->external_port = ntohs (m->external_port);
1287   rmp->protocol = snat_proto_to_ip_proto (m->proto);
1288   rmp->vrf_id = ntohl (m->vrf_id);
1289   rmp->context = context;
1290   rmp->twice_nat = m->twice_nat;
1291   rmp->out2in_only = m->out2in_only;
1292
1293   locals = (vl_api_nat44_lb_addr_port_t *) rmp->locals;
1294   vec_foreach (ap, m->locals)
1295   {
1296     clib_memcpy (locals->addr, &(ap->addr), 4);
1297     locals->port = htons (ap->port);
1298     locals->probability = ap->probability;
1299     locals++;
1300     rmp->local_num++;
1301   }
1302
1303   vl_api_send_msg (reg, (u8 *) rmp);
1304 }
1305
1306 static void
1307   vl_api_nat44_lb_static_mapping_dump_t_handler
1308   (vl_api_nat44_lb_static_mapping_dump_t * mp)
1309 {
1310   vl_api_registration_t *reg;
1311   snat_main_t *sm = &snat_main;
1312   snat_static_mapping_t *m;
1313
1314   reg = vl_api_client_index_to_registration (mp->client_index);
1315   if (!reg)
1316     return;
1317
1318   /* *INDENT-OFF* */
1319   pool_foreach (m, sm->static_mappings,
1320   ({
1321       if (vec_len(m->locals))
1322         send_nat44_lb_static_mapping_details (m, reg, mp->context);
1323   }));
1324   /* *INDENT-ON* */
1325 }
1326
1327 static void *vl_api_nat44_lb_static_mapping_dump_t_print
1328   (vl_api_nat44_lb_static_mapping_dump_t * mp, void *handle)
1329 {
1330   u8 *s;
1331
1332   s = format (0, "SCRIPT: nat44_lb_static_mapping_dump ");
1333
1334   FINISH;
1335 }
1336
1337 static void
1338 vl_api_nat44_del_session_t_handler (vl_api_nat44_del_session_t * mp)
1339 {
1340   snat_main_t *sm = &snat_main;
1341   vl_api_nat44_del_session_reply_t *rmp;
1342   ip4_address_t addr;
1343   u16 port;
1344   u32 vrf_id;
1345   int rv = 0;
1346   snat_protocol_t proto;
1347
1348   memcpy (&addr.as_u8, mp->address, 4);
1349   port = clib_net_to_host_u16 (mp->port);
1350   vrf_id = clib_net_to_host_u32 (mp->vrf_id);
1351   proto = ip_proto_to_snat_proto (mp->protocol);
1352
1353   rv = nat44_del_session (sm, &addr, port, proto, vrf_id, mp->is_in);
1354
1355   REPLY_MACRO (VL_API_NAT44_DEL_SESSION_REPLY);
1356 }
1357
1358 static void *
1359 vl_api_nat44_del_session_t_print (vl_api_nat44_del_session_t * mp,
1360                                   void *handle)
1361 {
1362   u8 *s;
1363
1364   s = format (0, "SCRIPT: nat44_add_del_static_mapping ");
1365   s = format (s, "addr %U port %d protocol %d vrf_id %d is_in %d",
1366               format_ip4_address, mp->address,
1367               clib_net_to_host_u16 (mp->port),
1368               mp->protocol, clib_net_to_host_u32 (mp->vrf_id), mp->is_in);
1369
1370   FINISH;
1371 }
1372
1373 static void
1374   vl_api_nat44_forwarding_enable_disable_t_handler
1375   (vl_api_nat44_forwarding_enable_disable_t * mp)
1376 {
1377   snat_main_t *sm = &snat_main;
1378   vl_api_nat44_forwarding_enable_disable_reply_t *rmp;
1379   int rv = 0;
1380
1381   sm->forwarding_enabled = mp->enable != 0;
1382
1383   REPLY_MACRO (VL_API_NAT44_FORWARDING_ENABLE_DISABLE_REPLY);
1384 }
1385
1386 static void *vl_api_nat44_forwarding_enable_disable_t_print
1387   (vl_api_nat44_forwarding_enable_disable_t * mp, void *handle)
1388 {
1389   u8 *s;
1390
1391   s = format (0, "SCRIPT: nat44_forwarding_enable_disable ");
1392   s = format (s, "enable %d", mp->enable != 0);
1393
1394   FINISH;
1395 }
1396
1397 static void
1398   vl_api_nat44_forwarding_is_enabled_t_handler
1399   (vl_api_nat44_forwarding_is_enabled_t * mp)
1400 {
1401   vl_api_registration_t *reg;
1402   snat_main_t *sm = &snat_main;
1403   vl_api_nat44_forwarding_is_enabled_reply_t *rmp;
1404
1405   reg = vl_api_client_index_to_registration (mp->client_index);
1406   if (!reg)
1407     return;
1408
1409   rmp = vl_msg_api_alloc (sizeof (*rmp));
1410   memset (rmp, 0, sizeof (*rmp));
1411   rmp->_vl_msg_id =
1412     ntohs (VL_API_NAT44_FORWARDING_IS_ENABLED_REPLY + sm->msg_id_base);
1413   rmp->context = mp->context;
1414
1415   rmp->enabled = sm->forwarding_enabled;
1416
1417   vl_api_send_msg (reg, (u8 *) rmp);
1418 }
1419
1420 static void *vl_api_nat44_forwarding_is_enabled_t_print
1421   (vl_api_nat44_forwarding_is_enabled_t * mp, void *handle)
1422 {
1423   u8 *s;
1424
1425   s = format (0, "SCRIPT: nat44_forwarding_is_enabled ");
1426
1427   FINISH;
1428 }
1429
1430 /*******************************/
1431 /*** Deterministic NAT (CGN) ***/
1432 /*******************************/
1433
1434 static void
1435 vl_api_nat_det_add_del_map_t_handler (vl_api_nat_det_add_del_map_t * mp)
1436 {
1437   snat_main_t *sm = &snat_main;
1438   vl_api_nat_det_add_del_map_reply_t *rmp;
1439   int rv = 0;
1440   ip4_address_t in_addr, out_addr;
1441
1442   if (!mp->is_nat44)
1443     {
1444       rv = VNET_API_ERROR_UNIMPLEMENTED;
1445       goto send_reply;
1446     }
1447
1448   clib_memcpy (&in_addr, mp->in_addr, 4);
1449   clib_memcpy (&out_addr, mp->out_addr, 4);
1450   rv = snat_det_add_map (sm, &in_addr, mp->in_plen, &out_addr,
1451                          mp->out_plen, mp->is_add);
1452
1453 send_reply:
1454   REPLY_MACRO (VL_API_NAT_DET_ADD_DEL_MAP_REPLY);
1455 }
1456
1457 static void *
1458 vl_api_nat_det_add_del_map_t_print (vl_api_nat_det_add_del_map_t * mp,
1459                                     void *handle)
1460 {
1461   u8 *s;
1462
1463   s = format (0, "SCRIPT: nat_det_add_del_map ");
1464   s = format (s, "inside address %U/%d outside address %U/%d\n",
1465               format_ip4_address, mp->in_addr, mp->in_plen,
1466               format_ip4_address, mp->out_addr, mp->out_plen);
1467
1468   FINISH;
1469 }
1470
1471 static void
1472 vl_api_nat_det_forward_t_handler (vl_api_nat_det_forward_t * mp)
1473 {
1474   snat_main_t *sm = &snat_main;
1475   vl_api_nat_det_forward_reply_t *rmp;
1476   int rv = 0;
1477   u16 lo_port = 0, hi_port = 0;
1478   snat_det_map_t *dm;
1479   ip4_address_t in_addr, out_addr;
1480
1481   if (!mp->is_nat44)
1482     {
1483       out_addr.as_u32 = 0;
1484       rv = VNET_API_ERROR_UNIMPLEMENTED;
1485       goto send_reply;
1486     }
1487
1488   out_addr.as_u32 = 0;
1489   clib_memcpy (&in_addr, mp->in_addr, 4);
1490   dm = snat_det_map_by_user (sm, &in_addr);
1491   if (!dm)
1492     {
1493       rv = VNET_API_ERROR_NO_SUCH_ENTRY;
1494       goto send_reply;
1495     }
1496
1497   snat_det_forward (dm, &in_addr, &out_addr, &lo_port);
1498   hi_port = lo_port + dm->ports_per_host - 1;
1499
1500 send_reply:
1501   /* *INDENT-OFF* */
1502   REPLY_MACRO2 (VL_API_NAT_DET_FORWARD_REPLY,
1503   ({
1504     rmp->out_port_lo = ntohs (lo_port);
1505     rmp->out_port_hi = ntohs (hi_port);
1506     clib_memcpy (rmp->out_addr, &out_addr, 4);
1507   }))
1508   /* *INDENT-ON* */
1509 }
1510
1511 static void *
1512 vl_api_nat_det_forward_t_print (vl_api_nat_det_forward_t * mp, void *handle)
1513 {
1514   u8 *s;
1515
1516   s = format (0, "SCRIPT: nat_det_forward");
1517   s = format (s, "inside ip address %U\n", format_ip4_address, mp->in_addr);
1518
1519   FINISH;
1520 }
1521
1522 static void
1523 vl_api_nat_det_reverse_t_handler (vl_api_nat_det_reverse_t * mp)
1524 {
1525   snat_main_t *sm = &snat_main;
1526   vl_api_nat_det_reverse_reply_t *rmp;
1527   int rv = 0;
1528   ip4_address_t out_addr, in_addr;
1529   snat_det_map_t *dm;
1530
1531   in_addr.as_u32 = 0;
1532   clib_memcpy (&out_addr, mp->out_addr, 4);
1533   dm = snat_det_map_by_out (sm, &out_addr);
1534   if (!dm)
1535     {
1536       rv = VNET_API_ERROR_NO_SUCH_ENTRY;
1537       goto send_reply;
1538     }
1539
1540   snat_det_reverse (dm, &out_addr, htons (mp->out_port), &in_addr);
1541
1542 send_reply:
1543   /* *INDENT-OFF* */
1544   REPLY_MACRO2 (VL_API_NAT_DET_REVERSE_REPLY,
1545   ({
1546     rmp->is_nat44 = 1;
1547     memset (rmp->in_addr, 0, 16);
1548     clib_memcpy (rmp->in_addr, &in_addr, 4);
1549   }))
1550   /* *INDENT-ON* */
1551 }
1552
1553 static void *
1554 vl_api_nat_det_reverse_t_print (vl_api_nat_det_reverse_t * mp, void *handle)
1555 {
1556   u8 *s;
1557
1558   s = format (0, "SCRIPT: nat_det_reverse");
1559   s = format (s, "outside ip address %U outside port %d",
1560               format_ip4_address, mp->out_addr, ntohs (mp->out_port));
1561
1562   FINISH;
1563 }
1564
1565 static void
1566 sent_nat_det_map_details (snat_det_map_t * m, vl_api_registration_t * reg,
1567                           u32 context)
1568 {
1569   vl_api_nat_det_map_details_t *rmp;
1570   snat_main_t *sm = &snat_main;
1571
1572   rmp = vl_msg_api_alloc (sizeof (*rmp));
1573   memset (rmp, 0, sizeof (*rmp));
1574   rmp->_vl_msg_id = ntohs (VL_API_NAT_DET_MAP_DETAILS + sm->msg_id_base);
1575   rmp->is_nat44 = 1;
1576   clib_memcpy (rmp->in_addr, &m->in_addr, 4);
1577   rmp->in_plen = m->in_plen;
1578   clib_memcpy (rmp->out_addr, &m->out_addr, 4);
1579   rmp->out_plen = m->out_plen;
1580   rmp->sharing_ratio = htonl (m->sharing_ratio);
1581   rmp->ports_per_host = htons (m->ports_per_host);
1582   rmp->ses_num = htonl (m->ses_num);
1583   rmp->context = context;
1584
1585   vl_api_send_msg (reg, (u8 *) rmp);
1586 }
1587
1588 static void
1589 vl_api_nat_det_map_dump_t_handler (vl_api_nat_det_map_dump_t * mp)
1590 {
1591   vl_api_registration_t *reg;
1592   snat_main_t *sm = &snat_main;
1593   snat_det_map_t *m;
1594
1595   reg = vl_api_client_index_to_registration (mp->client_index);
1596   if (!reg)
1597     return;
1598
1599   /* *INDENT-OFF* */
1600   vec_foreach(m, sm->det_maps)
1601     sent_nat_det_map_details(m, reg, mp->context);
1602   /* *INDENT-ON* */
1603 }
1604
1605 static void *
1606 vl_api_nat_det_map_dump_t_print (vl_api_nat_det_map_dump_t * mp, void *handle)
1607 {
1608   u8 *s;
1609
1610   s = format (0, "SCRIPT: nat_det_map_dump ");
1611
1612   FINISH;
1613 }
1614
1615 static void
1616 vl_api_nat_det_set_timeouts_t_handler (vl_api_nat_det_set_timeouts_t * mp)
1617 {
1618   snat_main_t *sm = &snat_main;
1619   vl_api_nat_det_set_timeouts_reply_t *rmp;
1620   int rv = 0;
1621
1622   sm->udp_timeout = ntohl (mp->udp);
1623   sm->tcp_established_timeout = ntohl (mp->tcp_established);
1624   sm->tcp_transitory_timeout = ntohl (mp->tcp_transitory);
1625   sm->icmp_timeout = ntohl (mp->icmp);
1626
1627   REPLY_MACRO (VL_API_NAT_DET_SET_TIMEOUTS_REPLY);
1628 }
1629
1630 static void *
1631 vl_api_nat_det_set_timeouts_t_print (vl_api_nat_det_set_timeouts_t * mp,
1632                                      void *handle)
1633 {
1634   u8 *s;
1635
1636   s = format (0, "SCRIPT: nat_det_set_timeouts ");
1637   s = format (s, "udp %d tcp_established %d tcp_transitory %d icmp %d\n",
1638               ntohl (mp->udp),
1639               ntohl (mp->tcp_established),
1640               ntohl (mp->tcp_transitory), ntohl (mp->icmp));
1641
1642   FINISH;
1643 }
1644
1645 static void
1646 vl_api_nat_det_get_timeouts_t_handler (vl_api_nat_det_get_timeouts_t * mp)
1647 {
1648   snat_main_t *sm = &snat_main;
1649   vl_api_nat_det_get_timeouts_reply_t *rmp;
1650   int rv = 0;
1651
1652   /* *INDENT-OFF* */
1653   REPLY_MACRO2 (VL_API_NAT_DET_GET_TIMEOUTS_REPLY,
1654   ({
1655     rmp->udp = htonl (sm->udp_timeout);
1656     rmp->tcp_established = htonl (sm->tcp_established_timeout);
1657     rmp->tcp_transitory = htonl (sm->tcp_transitory_timeout);
1658     rmp->icmp = htonl (sm->icmp_timeout);
1659   }))
1660   /* *INDENT-ON* */
1661 }
1662
1663 static void *
1664 vl_api_nat_det_get_timeouts_t_print (vl_api_nat_det_get_timeouts_t * mp,
1665                                      void *handle)
1666 {
1667   u8 *s;
1668
1669   s = format (0, "SCRIPT: nat_det_get_timeouts");
1670
1671   FINISH;
1672 }
1673
1674 static void
1675 vl_api_nat_det_close_session_out_t_handler (vl_api_nat_det_close_session_out_t
1676                                             * mp)
1677 {
1678   snat_main_t *sm = &snat_main;
1679   vl_api_nat_det_close_session_out_reply_t *rmp;
1680   ip4_address_t out_addr, ext_addr, in_addr;
1681   snat_det_out_key_t key;
1682   snat_det_map_t *dm;
1683   snat_det_session_t *ses;
1684   int rv = 0;
1685
1686   clib_memcpy (&out_addr, mp->out_addr, 4);
1687   clib_memcpy (&ext_addr, mp->ext_addr, 4);
1688
1689   dm = snat_det_map_by_out (sm, &out_addr);
1690   if (!dm)
1691     {
1692       rv = VNET_API_ERROR_NO_SUCH_ENTRY;
1693       goto send_reply;
1694     }
1695   snat_det_reverse (dm, &ext_addr, ntohs (mp->out_port), &in_addr);
1696   key.ext_host_addr = ext_addr;
1697   key.ext_host_port = mp->ext_port;
1698   key.out_port = mp->out_port;
1699   ses = snat_det_get_ses_by_out (dm, &in_addr, key.as_u64);
1700   if (!ses)
1701     {
1702       rv = VNET_API_ERROR_NO_SUCH_ENTRY;
1703       goto send_reply;
1704     }
1705   snat_det_ses_close (dm, ses);
1706
1707 send_reply:
1708   REPLY_MACRO (VL_API_NAT_DET_CLOSE_SESSION_OUT_REPLY);
1709 }
1710
1711 static void *
1712 vl_api_nat_det_close_session_out_t_print (vl_api_nat_det_close_session_out_t *
1713                                           mp, void *handle)
1714 {
1715   u8 *s;
1716
1717   s = format (0, "SCRIPT: nat_det_close_session_out ");
1718   s = format (s, "out_addr %U out_port %d "
1719               "ext_addr %U ext_port %d\n",
1720               format_ip4_address, mp->out_addr, ntohs (mp->out_port),
1721               format_ip4_address, mp->ext_addr, ntohs (mp->ext_port));
1722
1723   FINISH;
1724 }
1725
1726 static void
1727 vl_api_nat_det_close_session_in_t_handler (vl_api_nat_det_close_session_in_t *
1728                                            mp)
1729 {
1730   snat_main_t *sm = &snat_main;
1731   vl_api_nat_det_close_session_in_reply_t *rmp;
1732   ip4_address_t in_addr, ext_addr;
1733   snat_det_out_key_t key;
1734   snat_det_map_t *dm;
1735   snat_det_session_t *ses;
1736   int rv = 0;
1737
1738   if (!mp->is_nat44)
1739     {
1740       rv = VNET_API_ERROR_UNIMPLEMENTED;
1741       goto send_reply;
1742     }
1743
1744   clib_memcpy (&in_addr, mp->in_addr, 4);
1745   clib_memcpy (&ext_addr, mp->ext_addr, 4);
1746
1747   dm = snat_det_map_by_user (sm, &in_addr);
1748   if (!dm)
1749     {
1750       rv = VNET_API_ERROR_NO_SUCH_ENTRY;
1751       goto send_reply;
1752     }
1753   key.ext_host_addr = ext_addr;
1754   key.ext_host_port = mp->ext_port;
1755   ses = snat_det_find_ses_by_in (dm, &in_addr, mp->in_port, key);
1756   if (!ses)
1757     {
1758       rv = VNET_API_ERROR_NO_SUCH_ENTRY;
1759       goto send_reply;
1760     }
1761   snat_det_ses_close (dm, ses);
1762
1763 send_reply:
1764   REPLY_MACRO (VL_API_NAT_DET_CLOSE_SESSION_OUT_REPLY);
1765 }
1766
1767 static void *
1768 vl_api_nat_det_close_session_in_t_print (vl_api_nat_det_close_session_in_t *
1769                                          mp, void *handle)
1770 {
1771   u8 *s;
1772   s = format (0, "SCRIPT: nat_det_close_session_in ");
1773   s = format (s, "in_addr %U in_port %d ext_addr %U ext_port %d\n",
1774               format_ip4_address, mp->in_addr, ntohs (mp->in_port),
1775               format_ip4_address, mp->ext_addr, ntohs (mp->ext_port));
1776
1777   FINISH;
1778 }
1779
1780 static void
1781 send_nat_det_session_details (snat_det_session_t * s,
1782                               vl_api_registration_t * reg, u32 context)
1783 {
1784   vl_api_nat_det_session_details_t *rmp;
1785   snat_main_t *sm = &snat_main;
1786
1787   rmp = vl_msg_api_alloc (sizeof (*rmp));
1788   memset (rmp, 0, sizeof (*rmp));
1789   rmp->_vl_msg_id = ntohs (VL_API_NAT_DET_SESSION_DETAILS + sm->msg_id_base);
1790   rmp->in_port = s->in_port;
1791   clib_memcpy (rmp->ext_addr, &s->out.ext_host_addr, 4);
1792   rmp->ext_port = s->out.ext_host_port;
1793   rmp->out_port = s->out.out_port;
1794   rmp->state = s->state;
1795   rmp->expire = ntohl (s->expire);
1796   rmp->context = context;
1797
1798   vl_api_send_msg (reg, (u8 *) rmp);
1799 }
1800
1801 static void
1802 vl_api_nat_det_session_dump_t_handler (vl_api_nat_det_session_dump_t * mp)
1803 {
1804   vl_api_registration_t *reg;
1805   snat_main_t *sm = &snat_main;
1806   ip4_address_t user_addr;
1807   snat_det_map_t *dm;
1808   snat_det_session_t *s, empty_ses;
1809   u16 i;
1810
1811   reg = vl_api_client_index_to_registration (mp->client_index);
1812   if (!reg)
1813     return;
1814   if (!mp->is_nat44)
1815     return;
1816
1817   memset (&empty_ses, 0, sizeof (empty_ses));
1818   clib_memcpy (&user_addr, mp->user_addr, 4);
1819   dm = snat_det_map_by_user (sm, &user_addr);
1820   if (!dm)
1821     return;
1822
1823   s = dm->sessions + snat_det_user_ses_offset (&user_addr, dm->in_plen);
1824   for (i = 0; i < SNAT_DET_SES_PER_USER; i++)
1825     {
1826       if (s->out.as_u64)
1827         send_nat_det_session_details (s, reg, mp->context);
1828       s++;
1829     }
1830 }
1831
1832 static void *
1833 vl_api_nat_det_session_dump_t_print (vl_api_nat_det_session_dump_t * mp,
1834                                      void *handle)
1835 {
1836   u8 *s;
1837
1838   s = format (0, "SCRIPT: nat_det_session_dump ");
1839   s = format (s, "user_addr %U\n", format_ip4_address, mp->user_addr);
1840
1841   FINISH;
1842 }
1843
1844 /*************/
1845 /*** NAT64 ***/
1846 /*************/
1847
1848 static void
1849   vl_api_nat64_add_del_pool_addr_range_t_handler
1850   (vl_api_nat64_add_del_pool_addr_range_t * mp)
1851 {
1852   vl_api_nat64_add_del_pool_addr_range_reply_t *rmp;
1853   snat_main_t *sm = &snat_main;
1854   int rv = 0;
1855   ip4_address_t this_addr;
1856   u32 start_host_order, end_host_order;
1857   u32 vrf_id;
1858   int i, count;
1859   u32 *tmp;
1860
1861   tmp = (u32 *) mp->start_addr;
1862   start_host_order = clib_host_to_net_u32 (tmp[0]);
1863   tmp = (u32 *) mp->end_addr;
1864   end_host_order = clib_host_to_net_u32 (tmp[0]);
1865
1866   count = (end_host_order - start_host_order) + 1;
1867
1868   vrf_id = clib_host_to_net_u32 (mp->vrf_id);
1869
1870   memcpy (&this_addr.as_u8, mp->start_addr, 4);
1871
1872   for (i = 0; i < count; i++)
1873     {
1874       if ((rv = nat64_add_del_pool_addr (&this_addr, vrf_id, mp->is_add)))
1875         goto send_reply;
1876
1877       increment_v4_address (&this_addr);
1878     }
1879
1880 send_reply:
1881   REPLY_MACRO (VL_API_NAT64_ADD_DEL_POOL_ADDR_RANGE_REPLY);
1882 }
1883
1884 static void *vl_api_nat64_add_del_pool_addr_range_t_print
1885   (vl_api_nat64_add_del_pool_addr_range_t * mp, void *handle)
1886 {
1887   u8 *s;
1888
1889   s = format (0, "SCRIPT: nat64_add_del_pool_addr_range ");
1890   s = format (s, "%U - %U vrf_id %u %s\n",
1891               format_ip4_address, mp->start_addr,
1892               format_ip4_address, mp->end_addr,
1893               ntohl (mp->vrf_id), mp->is_add ? "" : "del");
1894
1895   FINISH;
1896 }
1897
1898 typedef struct nat64_api_walk_ctx_t_
1899 {
1900   vl_api_registration_t *reg;
1901   u32 context;
1902   nat64_db_t *db;
1903 } nat64_api_walk_ctx_t;
1904
1905 static int
1906 nat64_api_pool_walk (snat_address_t * a, void *arg)
1907 {
1908   vl_api_nat64_pool_addr_details_t *rmp;
1909   snat_main_t *sm = &snat_main;
1910   nat64_api_walk_ctx_t *ctx = arg;
1911
1912   rmp = vl_msg_api_alloc (sizeof (*rmp));
1913   memset (rmp, 0, sizeof (*rmp));
1914   rmp->_vl_msg_id = ntohs (VL_API_NAT64_POOL_ADDR_DETAILS + sm->msg_id_base);
1915   clib_memcpy (rmp->address, &(a->addr), 4);
1916   if (a->fib_index != ~0)
1917     {
1918       fib_table_t *fib = fib_table_get (a->fib_index, FIB_PROTOCOL_IP6);
1919       if (!fib)
1920         return -1;
1921       rmp->vrf_id = ntohl (fib->ft_table_id);
1922     }
1923   else
1924     rmp->vrf_id = ~0;
1925   rmp->context = ctx->context;
1926
1927   vl_api_send_msg (ctx->reg, (u8 *) rmp);
1928
1929   return 0;
1930 }
1931
1932 static void
1933 vl_api_nat64_pool_addr_dump_t_handler (vl_api_nat64_pool_addr_dump_t * mp)
1934 {
1935   vl_api_registration_t *reg;
1936
1937   reg = vl_api_client_index_to_registration (mp->client_index);
1938   if (!reg)
1939     return;
1940
1941   nat64_api_walk_ctx_t ctx = {
1942     .reg = reg,
1943     .context = mp->context,
1944   };
1945
1946   nat64_pool_addr_walk (nat64_api_pool_walk, &ctx);
1947 }
1948
1949 static void *
1950 vl_api_nat64_pool_addr_dump_t_print (vl_api_nat64_pool_addr_dump_t * mp,
1951                                      void *handle)
1952 {
1953   u8 *s;
1954
1955   s = format (0, "SCRIPT: nat64_pool_addr_dump\n");
1956
1957   FINISH;
1958 }
1959
1960 static void
1961 vl_api_nat64_add_del_interface_t_handler (vl_api_nat64_add_del_interface_t *
1962                                           mp)
1963 {
1964   snat_main_t *sm = &snat_main;
1965   vl_api_nat64_add_del_interface_reply_t *rmp;
1966   int rv = 0;
1967
1968   VALIDATE_SW_IF_INDEX (mp);
1969
1970   rv =
1971     nat64_add_del_interface (ntohl (mp->sw_if_index), mp->is_inside,
1972                              mp->is_add);
1973
1974   BAD_SW_IF_INDEX_LABEL;
1975
1976   REPLY_MACRO (VL_API_NAT64_ADD_DEL_INTERFACE_REPLY);
1977 }
1978
1979 static void *
1980 vl_api_nat64_add_del_interface_t_print (vl_api_nat64_add_del_interface_t * mp,
1981                                         void *handle)
1982 {
1983   u8 *s;
1984
1985   s = format (0, "SCRIPT: nat64_add_del_interface ");
1986   s = format (s, "sw_if_index %d %s %s",
1987               clib_host_to_net_u32 (mp->sw_if_index),
1988               mp->is_inside ? "in" : "out", mp->is_add ? "" : "del");
1989
1990   FINISH;
1991 }
1992
1993 static int
1994 nat64_api_interface_walk (snat_interface_t * i, void *arg)
1995 {
1996   vl_api_nat64_interface_details_t *rmp;
1997   snat_main_t *sm = &snat_main;
1998   nat64_api_walk_ctx_t *ctx = arg;
1999
2000   rmp = vl_msg_api_alloc (sizeof (*rmp));
2001   memset (rmp, 0, sizeof (*rmp));
2002   rmp->_vl_msg_id = ntohs (VL_API_NAT64_INTERFACE_DETAILS + sm->msg_id_base);
2003   rmp->sw_if_index = ntohl (i->sw_if_index);
2004   rmp->is_inside = (nat_interface_is_inside (i)
2005                     && nat_interface_is_outside (i)) ? 2 :
2006     nat_interface_is_inside (i);
2007   rmp->context = ctx->context;
2008
2009   vl_api_send_msg (ctx->reg, (u8 *) rmp);
2010
2011   return 0;
2012 }
2013
2014 static void
2015 vl_api_nat64_interface_dump_t_handler (vl_api_nat64_interface_dump_t * mp)
2016 {
2017   vl_api_registration_t *reg;
2018
2019   reg = vl_api_client_index_to_registration (mp->client_index);
2020   if (!reg)
2021     return;
2022
2023   nat64_api_walk_ctx_t ctx = {
2024     .reg = reg,
2025     .context = mp->context,
2026   };
2027
2028   nat64_interfaces_walk (nat64_api_interface_walk, &ctx);
2029 }
2030
2031 static void *
2032 vl_api_nat64_interface_dump_t_print (vl_api_nat64_interface_dump_t * mp,
2033                                      void *handle)
2034 {
2035   u8 *s;
2036
2037   s = format (0, "SCRIPT: snat_interface_dump ");
2038
2039   FINISH;
2040 }
2041
2042 static void
2043   vl_api_nat64_add_del_static_bib_t_handler
2044   (vl_api_nat64_add_del_static_bib_t * mp)
2045 {
2046   snat_main_t *sm = &snat_main;
2047   vl_api_nat64_add_del_static_bib_reply_t *rmp;
2048   ip6_address_t in_addr;
2049   ip4_address_t out_addr;
2050   int rv = 0;
2051
2052   memcpy (&in_addr.as_u8, mp->i_addr, 16);
2053   memcpy (&out_addr.as_u8, mp->o_addr, 4);
2054
2055   rv =
2056     nat64_add_del_static_bib_entry (&in_addr, &out_addr,
2057                                     clib_net_to_host_u16 (mp->i_port),
2058                                     clib_net_to_host_u16 (mp->o_port),
2059                                     mp->proto,
2060                                     clib_net_to_host_u32 (mp->vrf_id),
2061                                     mp->is_add);
2062
2063   REPLY_MACRO (VL_API_NAT64_ADD_DEL_STATIC_BIB_REPLY);
2064 }
2065
2066 static void *vl_api_nat64_add_del_static_bib_t_print
2067   (vl_api_nat64_add_del_static_bib_t * mp, void *handle)
2068 {
2069   u8 *s;
2070
2071   s = format (0, "SCRIPT: nat64_add_del_static_bib ");
2072   s = format (s, "protocol %d i_addr %U o_addr %U ",
2073               mp->proto,
2074               format_ip6_address, mp->i_addr, format_ip4_address, mp->o_addr);
2075
2076   if (mp->vrf_id != ~0)
2077     s = format (s, "vrf %d", clib_net_to_host_u32 (mp->vrf_id));
2078
2079   FINISH;
2080 }
2081
2082 static int
2083 nat64_api_bib_walk (nat64_db_bib_entry_t * bibe, void *arg)
2084 {
2085   vl_api_nat64_bib_details_t *rmp;
2086   snat_main_t *sm = &snat_main;
2087   nat64_api_walk_ctx_t *ctx = arg;
2088   fib_table_t *fib;
2089
2090   fib = fib_table_get (bibe->fib_index, FIB_PROTOCOL_IP6);
2091   if (!fib)
2092     return -1;
2093
2094   rmp = vl_msg_api_alloc (sizeof (*rmp));
2095   memset (rmp, 0, sizeof (*rmp));
2096   rmp->_vl_msg_id = ntohs (VL_API_NAT64_BIB_DETAILS + sm->msg_id_base);
2097   rmp->context = ctx->context;
2098   clib_memcpy (rmp->i_addr, &(bibe->in_addr), 16);
2099   clib_memcpy (rmp->o_addr, &(bibe->out_addr), 4);
2100   rmp->i_port = bibe->in_port;
2101   rmp->o_port = bibe->out_port;
2102   rmp->vrf_id = ntohl (fib->ft_table_id);
2103   rmp->proto = bibe->proto;
2104   rmp->is_static = bibe->is_static;
2105   rmp->ses_num = ntohl (bibe->ses_num);
2106
2107   vl_api_send_msg (ctx->reg, (u8 *) rmp);
2108
2109   return 0;
2110 }
2111
2112 static void
2113 vl_api_nat64_bib_dump_t_handler (vl_api_nat64_bib_dump_t * mp)
2114 {
2115   vl_api_registration_t *reg;
2116   nat64_main_t *nm = &nat64_main;
2117   nat64_db_t *db;
2118
2119   reg = vl_api_client_index_to_registration (mp->client_index);
2120   if (!reg)
2121     return;
2122
2123   nat64_api_walk_ctx_t ctx = {
2124     .reg = reg,
2125     .context = mp->context,
2126   };
2127
2128   /* *INDENT-OFF* */
2129   vec_foreach (db, nm->db)
2130     nat64_db_bib_walk (db, mp->proto, nat64_api_bib_walk, &ctx);
2131   /* *INDENT-ON* */
2132 }
2133
2134 static void *
2135 vl_api_nat64_bib_dump_t_print (vl_api_nat64_bib_dump_t * mp, void *handle)
2136 {
2137   u8 *s;
2138
2139   s = format (0, "SCRIPT: snat_bib_dump protocol %d", mp->proto);
2140
2141   FINISH;
2142 }
2143
2144 static void
2145 vl_api_nat64_set_timeouts_t_handler (vl_api_nat64_set_timeouts_t * mp)
2146 {
2147   snat_main_t *sm = &snat_main;
2148   vl_api_nat64_set_timeouts_reply_t *rmp;
2149   int rv = 0;
2150
2151   rv = nat64_set_icmp_timeout (ntohl (mp->icmp));
2152   if (rv)
2153     goto send_reply;
2154   rv = nat64_set_udp_timeout (ntohl (mp->udp));
2155   if (rv)
2156     goto send_reply;
2157   rv =
2158     nat64_set_tcp_timeouts (ntohl (mp->tcp_trans), ntohl (mp->tcp_est),
2159                             ntohl (mp->tcp_incoming_syn));
2160
2161 send_reply:
2162   REPLY_MACRO (VL_API_NAT64_SET_TIMEOUTS_REPLY);
2163 }
2164
2165 static void *vl_api_nat64_set_timeouts_t_print
2166   (vl_api_nat64_set_timeouts_t * mp, void *handle)
2167 {
2168   u8 *s;
2169
2170   s = format (0, "SCRIPT: nat64_set_timeouts ");
2171   s =
2172     format (s,
2173             "udp %d icmp %d, tcp_trans %d, tcp_est %d, tcp_incoming_syn %d\n",
2174             ntohl (mp->udp), ntohl (mp->icmp), ntohl (mp->tcp_trans),
2175             ntohl (mp->tcp_est), ntohl (mp->tcp_incoming_syn));
2176
2177   FINISH;
2178 }
2179
2180 static void
2181 vl_api_nat64_get_timeouts_t_handler (vl_api_nat64_get_timeouts_t * mp)
2182 {
2183   snat_main_t *sm = &snat_main;
2184   vl_api_nat64_get_timeouts_reply_t *rmp;
2185   int rv = 0;
2186
2187   /* *INDENT-OFF* */
2188   REPLY_MACRO2 (VL_API_NAT64_GET_TIMEOUTS_REPLY,
2189   ({
2190     rmp->udp = htonl (nat64_get_udp_timeout());
2191     rmp->icmp = htonl (nat64_get_icmp_timeout());
2192     rmp->tcp_trans = htonl (nat64_get_tcp_trans_timeout());
2193     rmp->tcp_est = htonl (nat64_get_tcp_est_timeout());
2194     rmp->tcp_incoming_syn = htonl (nat64_get_tcp_incoming_syn_timeout());
2195   }))
2196   /* *INDENT-ON* */
2197 }
2198
2199 static void *vl_api_nat64_get_timeouts_t_print
2200   (vl_api_nat64_get_timeouts_t * mp, void *handle)
2201 {
2202   u8 *s;
2203
2204   s = format (0, "SCRIPT: nat64_get_timeouts");
2205
2206   FINISH;
2207 }
2208
2209 static int
2210 nat64_api_st_walk (nat64_db_st_entry_t * ste, void *arg)
2211 {
2212   vl_api_nat64_st_details_t *rmp;
2213   snat_main_t *sm = &snat_main;
2214   nat64_api_walk_ctx_t *ctx = arg;
2215   nat64_db_bib_entry_t *bibe;
2216   fib_table_t *fib;
2217
2218   bibe = nat64_db_bib_entry_by_index (ctx->db, ste->proto, ste->bibe_index);
2219   if (!bibe)
2220     return -1;
2221
2222   fib = fib_table_get (bibe->fib_index, FIB_PROTOCOL_IP6);
2223   if (!fib)
2224     return -1;
2225
2226   rmp = vl_msg_api_alloc (sizeof (*rmp));
2227   memset (rmp, 0, sizeof (*rmp));
2228   rmp->_vl_msg_id = ntohs (VL_API_NAT64_ST_DETAILS + sm->msg_id_base);
2229   rmp->context = ctx->context;
2230   clib_memcpy (rmp->il_addr, &(bibe->in_addr), 16);
2231   clib_memcpy (rmp->ol_addr, &(bibe->out_addr), 4);
2232   rmp->il_port = bibe->in_port;
2233   rmp->ol_port = bibe->out_port;
2234   clib_memcpy (rmp->ir_addr, &(ste->in_r_addr), 16);
2235   clib_memcpy (rmp->or_addr, &(ste->out_r_addr), 4);
2236   rmp->il_port = ste->r_port;
2237   rmp->vrf_id = ntohl (fib->ft_table_id);
2238   rmp->proto = ste->proto;
2239
2240   vl_api_send_msg (ctx->reg, (u8 *) rmp);
2241
2242   return 0;
2243 }
2244
2245 static void
2246 vl_api_nat64_st_dump_t_handler (vl_api_nat64_st_dump_t * mp)
2247 {
2248   vl_api_registration_t *reg;
2249   nat64_main_t *nm = &nat64_main;
2250   nat64_db_t *db;
2251
2252   reg = vl_api_client_index_to_registration (mp->client_index);
2253   if (!reg)
2254     return;
2255
2256   nat64_api_walk_ctx_t ctx = {
2257     .reg = reg,
2258     .context = mp->context,
2259   };
2260
2261   /* *INDENT-OFF* */
2262   vec_foreach (db, nm->db)
2263     {
2264       ctx.db = db;
2265       nat64_db_st_walk (db, mp->proto, nat64_api_st_walk, &ctx);
2266     }
2267   /* *INDENT-ON* */
2268 }
2269
2270 static void *
2271 vl_api_nat64_st_dump_t_print (vl_api_nat64_st_dump_t * mp, void *handle)
2272 {
2273   u8 *s;
2274
2275   s = format (0, "SCRIPT: snat_st_dump protocol %d", mp->proto);
2276
2277   FINISH;
2278 }
2279
2280 static void
2281 vl_api_nat64_add_del_prefix_t_handler (vl_api_nat64_add_del_prefix_t * mp)
2282 {
2283   vl_api_nat64_add_del_prefix_reply_t *rmp;
2284   snat_main_t *sm = &snat_main;
2285   ip6_address_t prefix;
2286   int rv = 0;
2287
2288   memcpy (&prefix.as_u8, mp->prefix, 16);
2289
2290   rv =
2291     nat64_add_del_prefix (&prefix, mp->prefix_len,
2292                           clib_net_to_host_u32 (mp->vrf_id), mp->is_add);
2293   REPLY_MACRO (VL_API_NAT64_ADD_DEL_PREFIX_REPLY);
2294 }
2295
2296 static void *
2297 vl_api_nat64_add_del_prefix_t_print (vl_api_nat64_add_del_prefix_t * mp,
2298                                      void *handle)
2299 {
2300   u8 *s;
2301
2302   s = format (0, "SCRIPT: nat64_add_del_prefix %U/%u vrf_id %u %s\n",
2303               format_ip6_address, mp->prefix, mp->prefix_len,
2304               ntohl (mp->vrf_id), mp->is_add ? "" : "del");
2305
2306   FINISH;
2307 }
2308
2309 static int
2310 nat64_api_prefix_walk (nat64_prefix_t * p, void *arg)
2311 {
2312   vl_api_nat64_prefix_details_t *rmp;
2313   snat_main_t *sm = &snat_main;
2314   nat64_api_walk_ctx_t *ctx = arg;
2315
2316   rmp = vl_msg_api_alloc (sizeof (*rmp));
2317   memset (rmp, 0, sizeof (*rmp));
2318   rmp->_vl_msg_id = ntohs (VL_API_NAT64_PREFIX_DETAILS + sm->msg_id_base);
2319   clib_memcpy (rmp->prefix, &(p->prefix), 16);
2320   rmp->prefix_len = p->plen;
2321   rmp->vrf_id = ntohl (p->vrf_id);
2322   rmp->context = ctx->context;
2323
2324   vl_api_send_msg (ctx->reg, (u8 *) rmp);
2325
2326   return 0;
2327 }
2328
2329 static void
2330 vl_api_nat64_prefix_dump_t_handler (vl_api_nat64_prefix_dump_t * mp)
2331 {
2332   vl_api_registration_t *reg;
2333
2334   reg = vl_api_client_index_to_registration (mp->client_index);
2335   if (!reg)
2336     return;
2337
2338   nat64_api_walk_ctx_t ctx = {
2339     .reg = reg,
2340     .context = mp->context,
2341   };
2342
2343   nat64_prefix_walk (nat64_api_prefix_walk, &ctx);
2344 }
2345
2346 static void *
2347 vl_api_nat64_prefix_dump_t_print (vl_api_nat64_prefix_dump_t * mp,
2348                                   void *handle)
2349 {
2350   u8 *s;
2351
2352   s = format (0, "SCRIPT: nat64_prefix_dump\n");
2353
2354   FINISH;
2355 }
2356
2357 static void
2358   vl_api_nat64_add_del_interface_addr_t_handler
2359   (vl_api_nat64_add_del_interface_addr_t * mp)
2360 {
2361   snat_main_t *sm = &snat_main;
2362   vl_api_nat64_add_del_interface_addr_reply_t *rmp;
2363   u32 sw_if_index = ntohl (mp->sw_if_index);
2364   int rv = 0;
2365
2366   VALIDATE_SW_IF_INDEX (mp);
2367
2368   rv = nat64_add_interface_address (sw_if_index, mp->is_add);
2369
2370   BAD_SW_IF_INDEX_LABEL;
2371
2372   REPLY_MACRO (VL_API_NAT64_ADD_DEL_INTERFACE_ADDR_REPLY);
2373 }
2374
2375 static void *vl_api_nat64_add_del_interface_addr_t_print
2376   (vl_api_nat64_add_del_interface_addr_t * mp, void *handle)
2377 {
2378   u8 *s;
2379
2380   s = format (0, "SCRIPT: nat64_add_del_interface_addr ");
2381   s = format (s, "sw_if_index %d %s",
2382               clib_host_to_net_u32 (mp->sw_if_index),
2383               mp->is_add ? "" : "del");
2384
2385   FINISH;
2386 }
2387
2388 /***************/
2389 /*** DS-Lite ***/
2390 /***************/
2391
2392 static void
2393 vl_api_dslite_set_aftr_addr_t_handler (vl_api_dslite_set_aftr_addr_t * mp)
2394 {
2395   vl_api_dslite_set_aftr_addr_reply_t *rmp;
2396   snat_main_t *sm = &snat_main;
2397   dslite_main_t *dm = &dslite_main;
2398   int rv = 0;
2399   ip6_address_t ip6_addr;
2400   ip4_address_t ip4_addr;
2401
2402   memcpy (&ip6_addr.as_u8, mp->ip6_addr, 16);
2403   memcpy (&ip4_addr.as_u8, mp->ip4_addr, 4);
2404
2405   rv = dslite_set_aftr_ip6_addr (dm, &ip6_addr);
2406   if (rv == 0)
2407     rv = dslite_set_aftr_ip4_addr (dm, &ip4_addr);
2408
2409   REPLY_MACRO (VL_API_DSLITE_SET_AFTR_ADDR_REPLY);
2410 }
2411
2412 static void *
2413 vl_api_dslite_set_aftr_addr_t_print (vl_api_dslite_set_aftr_addr_t * mp,
2414                                      void *handle)
2415 {
2416   u8 *s;
2417
2418   s = format (0, "SCRIPT: dslite_set_aftr_addr ");
2419   s = format (s, "ip6_addr %U ip4_addr %U\n",
2420               format_ip6_address, mp->ip6_addr,
2421               format_ip4_address, mp->ip4_addr);
2422
2423   FINISH;
2424 }
2425
2426 static void
2427 vl_api_dslite_get_aftr_addr_t_handler (vl_api_dslite_get_aftr_addr_t * mp)
2428 {
2429   snat_main_t *sm = &snat_main;
2430   vl_api_dslite_get_aftr_addr_reply_t *rmp;
2431   dslite_main_t *dm = &dslite_main;
2432   int rv = 0;
2433
2434   /* *INDENT-OFF* */
2435   REPLY_MACRO2 (VL_API_DSLITE_GET_AFTR_ADDR_REPLY,
2436   ({
2437     memcpy (rmp->ip4_addr, &dm->aftr_ip4_addr.as_u8, 4);
2438     memcpy (rmp->ip6_addr, &dm->aftr_ip6_addr.as_u8, 16);
2439   }))
2440   /* *INDENT-ON* */
2441 }
2442
2443 static void *
2444 vl_api_dslite_get_aftr_addr_t_print (vl_api_dslite_get_aftr_addr_t * mp,
2445                                      void *handle)
2446 {
2447   u8 *s;
2448
2449   s = format (0, "SCRIPT: dslite_get_aftr_addr");
2450
2451   FINISH;
2452 }
2453
2454 static void
2455 vl_api_dslite_set_b4_addr_t_handler (vl_api_dslite_set_b4_addr_t * mp)
2456 {
2457   vl_api_dslite_set_b4_addr_reply_t *rmp;
2458   snat_main_t *sm = &snat_main;
2459   dslite_main_t *dm = &dslite_main;
2460   int rv = 0;
2461   ip6_address_t ip6_addr;
2462   ip4_address_t ip4_addr;
2463
2464   memcpy (&ip6_addr.as_u8, mp->ip6_addr, 16);
2465   memcpy (&ip4_addr.as_u8, mp->ip4_addr, 4);
2466
2467   rv = dslite_set_b4_ip6_addr (dm, &ip6_addr);
2468   if (rv == 0)
2469     rv = dslite_set_b4_ip4_addr (dm, &ip4_addr);
2470
2471   REPLY_MACRO (VL_API_DSLITE_SET_B4_ADDR_REPLY);
2472 }
2473
2474 static void *
2475 vl_api_dslite_set_b4_addr_t_print (vl_api_dslite_set_b4_addr_t * mp,
2476                                    void *handle)
2477 {
2478   u8 *s;
2479
2480   s = format (0, "SCRIPT: dslite_set_b4_addr ");
2481   s = format (s, "ip6_addr %U ip4_addr %U\n",
2482               format_ip6_address, mp->ip6_addr,
2483               format_ip6_address, mp->ip4_addr);
2484
2485   FINISH;
2486 }
2487
2488 static void
2489 vl_api_dslite_get_b4_addr_t_handler (vl_api_dslite_get_b4_addr_t * mp)
2490 {
2491   snat_main_t *sm = &snat_main;
2492   vl_api_dslite_get_b4_addr_reply_t *rmp;
2493   dslite_main_t *dm = &dslite_main;
2494   int rv = 0;
2495
2496   /* *INDENT-OFF* */
2497   REPLY_MACRO2 (VL_API_DSLITE_GET_AFTR_ADDR_REPLY,
2498   ({
2499     memcpy (rmp->ip4_addr, &dm->b4_ip4_addr.as_u8, 4);
2500     memcpy (rmp->ip6_addr, &dm->b4_ip6_addr.as_u8, 16);
2501   }))
2502   /* *INDENT-ON* */
2503 }
2504
2505 static void *
2506 vl_api_dslite_get_b4_addr_t_print (vl_api_dslite_get_b4_addr_t * mp,
2507                                    void *handle)
2508 {
2509   u8 *s;
2510
2511   s = format (0, "SCRIPT: dslite_get_b4_addr");
2512
2513   FINISH;
2514 }
2515
2516 static void
2517   vl_api_dslite_add_del_pool_addr_range_t_handler
2518   (vl_api_dslite_add_del_pool_addr_range_t * mp)
2519 {
2520   vl_api_dslite_add_del_pool_addr_range_reply_t *rmp;
2521   snat_main_t *sm = &snat_main;
2522   dslite_main_t *dm = &dslite_main;
2523   int rv = 0;
2524   ip4_address_t this_addr;
2525   u32 start_host_order, end_host_order;
2526   int i, count;
2527   u32 *tmp;
2528
2529   tmp = (u32 *) mp->start_addr;
2530   start_host_order = clib_host_to_net_u32 (tmp[0]);
2531   tmp = (u32 *) mp->end_addr;
2532   end_host_order = clib_host_to_net_u32 (tmp[0]);
2533
2534   count = (end_host_order - start_host_order) + 1;
2535   memcpy (&this_addr.as_u8, mp->start_addr, 4);
2536
2537   for (i = 0; i < count; i++)
2538     {
2539       if ((rv = dslite_add_del_pool_addr (dm, &this_addr, mp->is_add)))
2540         goto send_reply;
2541
2542       increment_v4_address (&this_addr);
2543     }
2544
2545 send_reply:
2546   REPLY_MACRO (VL_API_DSLITE_ADD_DEL_POOL_ADDR_RANGE_REPLY);
2547 }
2548
2549 static void *vl_api_dslite_add_del_pool_addr_range_t_print
2550   (vl_api_dslite_add_del_pool_addr_range_t * mp, void *handle)
2551 {
2552   u8 *s;
2553
2554   s = format (0, "SCRIPT: dslite_add_del_pool_addr_range ");
2555   s = format (s, "%U - %U\n",
2556               format_ip4_address, mp->start_addr,
2557               format_ip4_address, mp->end_addr);
2558
2559   FINISH;
2560 }
2561
2562
2563 /* List of message types that this plugin understands */
2564 #define foreach_snat_plugin_api_msg                                     \
2565 _(NAT_CONTROL_PING, nat_control_ping)                                   \
2566 _(NAT_SHOW_CONFIG, nat_show_config)                                     \
2567 _(NAT_SET_WORKERS, nat_set_workers)                                     \
2568 _(NAT_WORKER_DUMP, nat_worker_dump)                                     \
2569 _(NAT_IPFIX_ENABLE_DISABLE, nat_ipfix_enable_disable)                   \
2570 _(NAT_SET_REASS, nat_set_reass)                                         \
2571 _(NAT_GET_REASS, nat_get_reass)                                         \
2572 _(NAT_REASS_DUMP, nat_reass_dump)                                       \
2573 _(NAT44_ADD_DEL_ADDRESS_RANGE, nat44_add_del_address_range)             \
2574 _(NAT44_INTERFACE_ADD_DEL_FEATURE, nat44_interface_add_del_feature)     \
2575 _(NAT44_ADD_DEL_STATIC_MAPPING, nat44_add_del_static_mapping)           \
2576 _(NAT44_ADD_DEL_IDENTITY_MAPPING, nat44_add_del_identity_mapping)       \
2577 _(NAT44_STATIC_MAPPING_DUMP, nat44_static_mapping_dump)                 \
2578 _(NAT44_IDENTITY_MAPPING_DUMP, nat44_identity_mapping_dump)             \
2579 _(NAT44_ADDRESS_DUMP, nat44_address_dump)                               \
2580 _(NAT44_INTERFACE_DUMP, nat44_interface_dump)                           \
2581 _(NAT44_ADD_DEL_INTERFACE_ADDR, nat44_add_del_interface_addr)           \
2582 _(NAT44_INTERFACE_ADDR_DUMP, nat44_interface_addr_dump)                 \
2583 _(NAT44_USER_DUMP, nat44_user_dump)                                     \
2584 _(NAT44_USER_SESSION_DUMP, nat44_user_session_dump)                     \
2585 _(NAT44_INTERFACE_ADD_DEL_OUTPUT_FEATURE,                               \
2586   nat44_interface_add_del_output_feature)                               \
2587 _(NAT44_INTERFACE_OUTPUT_FEATURE_DUMP,                                  \
2588   nat44_interface_output_feature_dump)                                  \
2589 _(NAT44_ADD_DEL_LB_STATIC_MAPPING, nat44_add_del_lb_static_mapping)     \
2590 _(NAT44_LB_STATIC_MAPPING_DUMP, nat44_lb_static_mapping_dump)           \
2591 _(NAT44_DEL_SESSION, nat44_del_session)                                 \
2592 _(NAT44_FORWARDING_ENABLE_DISABLE, nat44_forwarding_enable_disable)     \
2593 _(NAT44_FORWARDING_IS_ENABLED, nat44_forwarding_is_enabled)             \
2594 _(NAT_DET_ADD_DEL_MAP, nat_det_add_del_map)                             \
2595 _(NAT_DET_FORWARD, nat_det_forward)                                     \
2596 _(NAT_DET_REVERSE, nat_det_reverse)                                     \
2597 _(NAT_DET_MAP_DUMP, nat_det_map_dump)                                   \
2598 _(NAT_DET_SET_TIMEOUTS, nat_det_set_timeouts)                           \
2599 _(NAT_DET_GET_TIMEOUTS, nat_det_get_timeouts)                           \
2600 _(NAT_DET_CLOSE_SESSION_OUT, nat_det_close_session_out)                 \
2601 _(NAT_DET_CLOSE_SESSION_IN, nat_det_close_session_in)                   \
2602 _(NAT_DET_SESSION_DUMP, nat_det_session_dump)                           \
2603 _(NAT64_ADD_DEL_POOL_ADDR_RANGE, nat64_add_del_pool_addr_range)         \
2604 _(NAT64_POOL_ADDR_DUMP, nat64_pool_addr_dump)                           \
2605 _(NAT64_ADD_DEL_INTERFACE, nat64_add_del_interface)                     \
2606 _(NAT64_INTERFACE_DUMP, nat64_interface_dump)                           \
2607 _(NAT64_ADD_DEL_STATIC_BIB, nat64_add_del_static_bib)                   \
2608 _(NAT64_BIB_DUMP, nat64_bib_dump)                                       \
2609 _(NAT64_SET_TIMEOUTS, nat64_set_timeouts)                               \
2610 _(NAT64_GET_TIMEOUTS, nat64_get_timeouts)                               \
2611 _(NAT64_ST_DUMP, nat64_st_dump)                                         \
2612 _(NAT64_ADD_DEL_PREFIX, nat64_add_del_prefix)                           \
2613 _(NAT64_PREFIX_DUMP, nat64_prefix_dump)                                 \
2614 _(NAT64_ADD_DEL_INTERFACE_ADDR, nat64_add_del_interface_addr)           \
2615 _(DSLITE_ADD_DEL_POOL_ADDR_RANGE, dslite_add_del_pool_addr_range)       \
2616 _(DSLITE_SET_AFTR_ADDR, dslite_set_aftr_addr)                           \
2617 _(DSLITE_GET_AFTR_ADDR, dslite_get_aftr_addr)                           \
2618 _(DSLITE_SET_B4_ADDR, dslite_set_b4_addr)                               \
2619 _(DSLITE_GET_B4_ADDR, dslite_get_b4_addr)
2620
2621 /* Set up the API message handling tables */
2622 static clib_error_t *
2623 snat_plugin_api_hookup (vlib_main_t * vm)
2624 {
2625   snat_main_t *sm __attribute__ ((unused)) = &snat_main;
2626 #define _(N,n)                                                  \
2627     vl_msg_api_set_handlers((VL_API_##N + sm->msg_id_base),     \
2628                            #n,                                  \
2629                            vl_api_##n##_t_handler,              \
2630                            vl_noop_handler,                     \
2631                            vl_api_##n##_t_endian,               \
2632                            vl_api_##n##_t_print,                \
2633                            sizeof(vl_api_##n##_t), 1);
2634   foreach_snat_plugin_api_msg;
2635 #undef _
2636
2637   return 0;
2638 }
2639
2640 #define vl_msg_name_crc_list
2641 #include <nat/nat_all_api_h.h>
2642 #undef vl_msg_name_crc_list
2643
2644 static void
2645 setup_message_id_table (snat_main_t * sm, api_main_t * am)
2646 {
2647 #define _(id,n,crc) \
2648   vl_msg_api_add_msg_name_crc (am, #n "_" #crc, id + sm->msg_id_base);
2649   foreach_vl_msg_name_crc_nat;
2650 #undef _
2651 }
2652
2653 static void
2654 plugin_custom_dump_configure (snat_main_t * sm)
2655 {
2656 #define _(n,f) sm->api_main->msg_print_handlers \
2657   [VL_API_##n + sm->msg_id_base]                \
2658     = (void *) vl_api_##f##_t_print;
2659   foreach_snat_plugin_api_msg;
2660 #undef _
2661 }
2662
2663 clib_error_t *
2664 snat_api_init (vlib_main_t * vm, snat_main_t * sm)
2665 {
2666   u8 *name;
2667   clib_error_t *error = 0;
2668
2669   name = format (0, "nat_%08x%c", api_version, 0);
2670
2671   /* Ask for a correctly-sized block of API message decode slots */
2672   sm->msg_id_base =
2673     vl_msg_api_get_msg_ids ((char *) name, VL_MSG_FIRST_AVAILABLE);
2674
2675   error = snat_plugin_api_hookup (vm);
2676
2677   /* Add our API messages to the global name_crc hash table */
2678   setup_message_id_table (sm, sm->api_main);
2679
2680   plugin_custom_dump_configure (sm);
2681
2682   vec_free (name);
2683
2684   return error;
2685 }
2686
2687 /*
2688  * fd.io coding-style-patch-verification: ON
2689  *
2690  * Local Variables:
2691  * eval: (c-set-style "gnu")
2692  * End:
2693  */