src/plugins/nat/nat_api.c

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