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