3 * nat.c - skeleton vpp-api-test plug-in
5 * Copyright (c) <current-year> <your-organization>
6 * Licensed under the Apache License, Version 2.0 (the "License");
7 * you may not use this file except in compliance with the License.
8 * You may obtain a copy of the License at:
10 * http://www.apache.org/licenses/LICENSE-2.0
12 * Unless required by applicable law or agreed to in writing, software
13 * distributed under the License is distributed on an "AS IS" BASIS,
14 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
15 * See the License for the specific language governing permissions and
16 * limitations under the License.
19 #include <vlibapi/api.h>
20 #include <vlibmemory/api.h>
22 #include <vppinfra/error.h>
23 #include <vnet/ip/ip.h>
26 #define __plugin_msg_base snat_test_main.msg_id_base
27 #include <vlibapi/vat_helper_macros.h>
29 uword unformat_sw_if_index (unformat_input_t * input, va_list * args);
31 /* Declare message IDs */
32 #include <nat/nat_msg_enum.h>
34 /* define message structures */
36 #include <nat/nat_all_api_h.h>
39 /* declare message handlers for each api */
41 #define vl_endianfun /* define message structures */
42 #include <nat/nat_all_api_h.h>
45 /* instantiate all the print functions we know about */
46 #define vl_print(handle, ...)
48 #include <nat/nat_all_api_h.h>
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>
57 /* API message ID base */
62 snat_test_main_t snat_test_main;
64 #define foreach_standard_reply_retval_handler \
65 _(snat_add_address_range_reply) \
66 _(snat_interface_add_del_feature_reply) \
67 _(snat_add_static_mapping_reply) \
68 _(snat_set_workers_reply) \
69 _(snat_add_del_interface_addr_reply) \
70 _(snat_ipfix_enable_disable_reply) \
71 _(snat_add_det_map_reply) \
72 _(snat_det_set_timeouts_reply) \
73 _(snat_det_close_session_out_reply) \
74 _(snat_det_close_session_in_reply)
77 static void vl_api_##n##_t_handler \
78 (vl_api_##n##_t * mp) \
80 vat_main_t * vam = snat_test_main.vat_main; \
81 i32 retval = ntohl(mp->retval); \
82 if (vam->async_mode) { \
83 vam->async_errors += (retval < 0); \
85 vam->retval = retval; \
86 vam->result_ready = 1; \
89 foreach_standard_reply_retval_handler;
93 * Table of message reply handlers, must include boilerplate handlers
96 #define foreach_vpe_api_reply_msg \
97 _(SNAT_ADD_ADDRESS_RANGE_REPLY, snat_add_address_range_reply) \
98 _(SNAT_INTERFACE_ADD_DEL_FEATURE_REPLY, \
99 snat_interface_add_del_feature_reply) \
100 _(SNAT_ADD_STATIC_MAPPING_REPLY, snat_add_static_mapping_reply) \
101 _(SNAT_CONTROL_PING_REPLY, snat_control_ping_reply) \
102 _(SNAT_STATIC_MAPPING_DETAILS, snat_static_mapping_details) \
103 _(SNAT_SHOW_CONFIG_REPLY, snat_show_config_reply) \
104 _(SNAT_ADDRESS_DETAILS, snat_address_details) \
105 _(SNAT_INTERFACE_DETAILS, snat_interface_details) \
106 _(SNAT_SET_WORKERS_REPLY, snat_set_workers_reply) \
107 _(SNAT_WORKER_DETAILS, snat_worker_details) \
108 _(SNAT_ADD_DEL_INTERFACE_ADDR_REPLY, \
109 snat_add_del_interface_addr_reply) \
110 _(SNAT_INTERFACE_ADDR_DETAILS, snat_interface_addr_details) \
111 _(SNAT_IPFIX_ENABLE_DISABLE_REPLY, \
112 snat_ipfix_enable_disable_reply) \
113 _(SNAT_USER_DETAILS, snat_user_details) \
114 _(SNAT_USER_SESSION_DETAILS, snat_user_session_details) \
115 _(SNAT_ADD_DET_MAP_REPLY, snat_add_det_map_reply) \
116 _(SNAT_DET_FORWARD_REPLY, snat_det_forward_reply) \
117 _(SNAT_DET_REVERSE_REPLY, snat_det_reverse_reply) \
118 _(SNAT_DET_MAP_DETAILS, snat_det_map_details) \
119 _(SNAT_DET_SET_TIMEOUTS_REPLY, snat_det_set_timeouts_reply) \
120 _(SNAT_DET_GET_TIMEOUTS_REPLY, snat_det_get_timeouts_reply) \
121 _(SNAT_DET_CLOSE_SESSION_OUT_REPLY, \
122 snat_det_close_session_out_reply) \
123 _(SNAT_DET_CLOSE_SESSION_IN_REPLY, \
124 snat_det_close_session_in_reply) \
125 _(SNAT_DET_SESSION_DETAILS, snat_det_session_details)
127 static int api_snat_add_address_range (vat_main_t * vam)
129 unformat_input_t * i = vam->input;
130 ip4_address_t start_addr, end_addr;
131 u32 start_host_order, end_host_order;
132 vl_api_snat_add_address_range_t * mp;
137 while (unformat_check_input (i) != UNFORMAT_END_OF_INPUT)
139 if (unformat (i, "%U - %U",
140 unformat_ip4_address, &start_addr,
141 unformat_ip4_address, &end_addr))
143 else if (unformat (i, "%U", unformat_ip4_address, &start_addr))
144 end_addr = start_addr;
145 else if (unformat (i, "del"))
149 clib_warning("unknown input '%U'", format_unformat_error, i);
154 start_host_order = clib_host_to_net_u32 (start_addr.as_u32);
155 end_host_order = clib_host_to_net_u32 (end_addr.as_u32);
157 if (end_host_order < start_host_order)
159 errmsg ("end address less than start address\n");
163 count = (end_host_order - start_host_order) + 1;
167 errmsg ("%U - %U, %d addresses...\n",
168 format_ip4_address, &start_addr,
169 format_ip4_address, &end_addr,
173 M(SNAT_ADD_ADDRESS_RANGE, mp);
175 memcpy (mp->first_ip_address, &start_addr, 4);
176 memcpy (mp->last_ip_address, &end_addr, 4);
185 static int api_snat_interface_add_del_feature (vat_main_t * vam)
187 unformat_input_t * i = vam->input;
188 vl_api_snat_interface_add_del_feature_t * mp;
190 u8 sw_if_index_set = 0;
195 while (unformat_check_input (i) != UNFORMAT_END_OF_INPUT)
197 if (unformat (i, "%U", unformat_sw_if_index, vam, &sw_if_index))
199 else if (unformat (i, "sw_if_index %d", &sw_if_index))
201 else if (unformat (i, "out"))
203 else if (unformat (i, "in"))
205 else if (unformat (i, "del"))
209 clib_warning("unknown input '%U'", format_unformat_error, i);
214 if (sw_if_index_set == 0)
216 errmsg ("interface / sw_if_index required\n");
220 M(SNAT_INTERFACE_ADD_DEL_FEATURE, mp);
221 mp->sw_if_index = ntohl(sw_if_index);
223 mp->is_inside = is_inside;
230 static int api_snat_add_static_mapping(vat_main_t * vam)
232 unformat_input_t * i = vam->input;
233 vl_api_snat_add_static_mapping_t * mp;
234 u8 external_addr_set = 0;
235 u8 local_addr_set = 0;
238 ip4_address_t local_addr, external_addr;
239 u32 local_port = 0, external_port = 0, vrf_id = ~0;
240 u32 sw_if_index = ~0;
241 u8 sw_if_index_set = 0;
246 while (unformat_check_input (i) != UNFORMAT_END_OF_INPUT)
248 if (unformat (i, "local_addr %U", unformat_ip4_address, &local_addr))
250 else if (unformat (i, "external_addr %U", unformat_ip4_address,
252 external_addr_set = 1;
253 else if (unformat (i, "local_port %u", &local_port))
255 else if (unformat (i, "external_port %u", &external_port))
257 else if (unformat (i, "external_if %U", unformat_sw_if_index, vam,
260 else if (unformat (i, "external_sw_if_index %d", &sw_if_index))
262 else if (unformat (i, "vrf %u", &vrf_id))
264 else if (unformat (i, "protocol %u", &proto))
266 else if (unformat (i, "del"))
270 clib_warning("unknown input '%U'", format_unformat_error, i);
275 if (!addr_only && !proto_set)
277 errmsg ("protocol required\n");
283 errmsg ("local addr required\n");
286 if (!external_addr_set && !sw_if_index_set)
288 errmsg ("external addr or interface required\n");
292 M(SNAT_ADD_STATIC_MAPPING, mp);
295 mp->addr_only = addr_only;
296 mp->local_port = ntohs ((u16) local_port);
297 mp->external_port = ntohs ((u16) external_port);
298 mp->external_sw_if_index = ntohl (sw_if_index);
299 mp->vrf_id = ntohl (vrf_id);
300 mp->protocol = (u8) proto;
301 memcpy (mp->local_ip_address, &local_addr, 4);
302 memcpy (mp->external_ip_address, &external_addr, 4);
309 static void vl_api_snat_control_ping_reply_t_handler
310 (vl_api_snat_control_ping_reply_t * mp)
312 vat_main_t *vam = &vat_main;
313 i32 retval = ntohl (mp->retval);
316 vam->async_errors += (retval < 0);
320 vam->retval = retval;
321 vam->result_ready = 1;
325 static void vl_api_snat_static_mapping_details_t_handler
326 (vl_api_snat_static_mapping_details_t *mp)
328 snat_test_main_t * sm = &snat_test_main;
329 vat_main_t *vam = sm->vat_main;
331 if (mp->addr_only && mp->external_sw_if_index != ~0)
332 fformat (vam->ofp, "%15U%6s%15d%6s%11d%6d\n",
333 format_ip4_address, &mp->local_ip_address, "",
334 ntohl (mp->external_sw_if_index), "",
337 else if (mp->addr_only && mp->external_sw_if_index == ~0)
338 fformat (vam->ofp, "%15U%6s%15U%6s%11d%6d\n",
339 format_ip4_address, &mp->local_ip_address, "",
340 format_ip4_address, &mp->external_ip_address, "",
343 else if (!mp->addr_only && mp->external_sw_if_index != ~0)
344 fformat (vam->ofp, "%15U%6d%15d%6d%11d%6d\n",
345 format_ip4_address, &mp->local_ip_address,
346 ntohs (mp->local_port),
347 ntohl (mp->external_sw_if_index),
348 ntohs (mp->external_port),
352 fformat (vam->ofp, "%15U%6d%15U%6d%11d%6d\n",
353 format_ip4_address, &mp->local_ip_address,
354 ntohs (mp->local_port),
355 format_ip4_address, &mp->external_ip_address,
356 ntohs (mp->external_port),
362 static int api_snat_static_mapping_dump(vat_main_t * vam)
364 vl_api_snat_static_mapping_dump_t * mp;
365 vl_api_snat_control_ping_t *mp_ping;
368 if (vam->json_output)
370 clib_warning ("JSON output not supported for snat_static_mapping_dump");
374 fformat (vam->ofp, "%21s%21s\n", "local", "external");
375 fformat (vam->ofp, "%15s%6s%15s%6s%11s%6s\n", "address", "port",
376 "address/if_idx", "port", "vrf", "proto");
378 M(SNAT_STATIC_MAPPING_DUMP, mp);
381 /* Use a control ping for synchronization */
382 M(SNAT_CONTROL_PING, mp_ping);
389 static void vl_api_snat_show_config_reply_t_handler
390 (vl_api_snat_show_config_reply_t *mp)
392 snat_test_main_t * sm = &snat_test_main;
393 vat_main_t *vam = sm->vat_main;
394 i32 retval = ntohl (mp->retval);
398 fformat (vam->ofp, "translation hash buckets %d\n",
399 ntohl (mp->translation_buckets));
400 fformat (vam->ofp, "translation hash memory %d\n",
401 ntohl (mp->translation_memory_size));
402 fformat (vam->ofp, "user hash buckets %d\n", ntohl (mp->user_buckets));
403 fformat (vam->ofp, "user hash memory %d\n", ntohl (mp->user_memory_size));
404 fformat (vam->ofp, "max translations per user %d\n",
405 ntohl (mp->max_translations_per_user));
406 fformat (vam->ofp, "outside VRF id %d\n", ntohl (mp->outside_vrf_id));
407 fformat (vam->ofp, "inside VRF id %d\n", ntohl (mp->inside_vrf_id));
408 if (mp->static_mapping_only)
410 fformat (vam->ofp, "static mapping only");
411 if (mp->static_mapping_connection_tracking)
412 fformat (vam->ofp, " connection tracking");
413 fformat (vam->ofp, "\n");
416 vam->retval = retval;
417 vam->result_ready = 1;
420 static int api_snat_show_config(vat_main_t * vam)
422 vl_api_snat_show_config_t * mp;
425 if (vam->json_output)
427 clib_warning ("JSON output not supported for snat_show_config");
431 M(SNAT_SHOW_CONFIG, mp);
437 static void vl_api_snat_address_details_t_handler
438 (vl_api_snat_address_details_t *mp)
440 snat_test_main_t * sm = &snat_test_main;
441 vat_main_t *vam = sm->vat_main;
443 fformat (vam->ofp, "%U\n", format_ip4_address, &mp->ip_address);
446 static int api_snat_address_dump(vat_main_t * vam)
448 vl_api_snat_address_dump_t * mp;
449 vl_api_snat_control_ping_t *mp_ping;
452 if (vam->json_output)
454 clib_warning ("JSON output not supported for snat_address_dump");
458 M(SNAT_ADDRESS_DUMP, mp);
461 /* Use a control ping for synchronization */
462 M(SNAT_CONTROL_PING, mp_ping);
469 static void vl_api_snat_interface_details_t_handler
470 (vl_api_snat_interface_details_t *mp)
472 snat_test_main_t * sm = &snat_test_main;
473 vat_main_t *vam = sm->vat_main;
475 fformat (vam->ofp, "sw_if_index %d %s\n", ntohl (mp->sw_if_index),
476 mp->is_inside ? "in" : "out");
479 static int api_snat_interface_dump(vat_main_t * vam)
481 vl_api_snat_interface_dump_t * mp;
482 vl_api_snat_control_ping_t *mp_ping;
485 if (vam->json_output)
487 clib_warning ("JSON output not supported for snat_address_dump");
491 M(SNAT_INTERFACE_DUMP, mp);
494 /* Use a control ping for synchronization */
495 M(SNAT_CONTROL_PING, mp_ping);
502 static int api_snat_set_workers (vat_main_t * vam)
504 unformat_input_t * i = vam->input;
505 vl_api_snat_set_workers_t * mp;
509 while (unformat_check_input (i) != UNFORMAT_END_OF_INPUT)
511 if (unformat (i, "%U", unformat_bitmap_list, &bitmap))
515 clib_warning("unknown input '%U'", format_unformat_error, i);
520 M(SNAT_SET_WORKERS, mp);
521 mp->worker_mask = clib_host_to_net_u64 (bitmap[0]);
528 static void vl_api_snat_worker_details_t_handler
529 (vl_api_snat_worker_details_t *mp)
531 snat_test_main_t * sm = &snat_test_main;
532 vat_main_t *vam = sm->vat_main;
534 fformat (vam->ofp, "worker_index %d (%s at lcore %u)\n",
535 ntohl (mp->worker_index), mp->name, ntohl (mp->lcore_id));
538 static int api_snat_worker_dump(vat_main_t * vam)
540 vl_api_snat_worker_dump_t * mp;
541 vl_api_snat_control_ping_t *mp_ping;
544 if (vam->json_output)
546 clib_warning ("JSON output not supported for snat_address_dump");
550 M(SNAT_WORKER_DUMP, mp);
553 /* Use a control ping for synchronization */
554 M(SNAT_CONTROL_PING, mp_ping);
561 static int api_snat_add_del_interface_addr (vat_main_t * vam)
563 unformat_input_t * i = vam->input;
564 vl_api_snat_add_del_interface_addr_t * mp;
566 u8 sw_if_index_set = 0;
570 while (unformat_check_input (i) != UNFORMAT_END_OF_INPUT)
572 if (unformat (i, "%U", unformat_sw_if_index, vam, &sw_if_index))
574 else if (unformat (i, "sw_if_index %d", &sw_if_index))
576 else if (unformat (i, "del"))
580 clib_warning("unknown input '%U'", format_unformat_error, i);
585 if (sw_if_index_set == 0)
587 errmsg ("interface / sw_if_index required\n");
591 M(SNAT_ADD_DEL_INTERFACE_ADDR, mp);
592 mp->sw_if_index = ntohl(sw_if_index);
600 static void vl_api_snat_interface_addr_details_t_handler
601 (vl_api_snat_interface_addr_details_t *mp)
603 snat_test_main_t * sm = &snat_test_main;
604 vat_main_t *vam = sm->vat_main;
606 fformat (vam->ofp, "sw_if_index %d\n", ntohl (mp->sw_if_index));
609 static int api_snat_interface_addr_dump(vat_main_t * vam)
611 vl_api_snat_interface_addr_dump_t * mp;
612 vl_api_snat_control_ping_t *mp_ping;
615 if (vam->json_output)
617 clib_warning ("JSON output not supported for snat_address_dump");
621 M(SNAT_INTERFACE_ADDR_DUMP, mp);
624 /* Use a control ping for synchronization */
625 M(SNAT_CONTROL_PING, mp_ping);
632 static int api_snat_ipfix_enable_disable (vat_main_t * vam)
634 unformat_input_t * i = vam->input;
635 vl_api_snat_ipfix_enable_disable_t * mp;
641 while (unformat_check_input (i) != UNFORMAT_END_OF_INPUT)
643 if (unformat (i, "domain %d", &domain_id))
645 else if (unformat (i, "src_port %d", &src_port))
647 else if (unformat (i, "disable"))
651 clib_warning("unknown input '%U'", format_unformat_error, i);
656 M(SNAT_IPFIX_ENABLE_DISABLE, mp);
657 mp->domain_id = htonl(domain_id);
658 mp->src_port = htons((u16) src_port);
666 static void vl_api_snat_user_session_details_t_handler
667 (vl_api_snat_user_session_details_t *mp)
669 snat_test_main_t * sm = &snat_test_main;
670 vat_main_t *vam = sm->vat_main;
672 fformat(vam->ofp, "%s session %U:%d to %U:%d protocol id %d "
673 "total packets %d total bytes %d\n",
674 mp->is_static ? "static" : "dynamic",
675 format_ip4_address, mp->inside_ip_address, ntohl(mp->inside_port),
676 format_ip4_address, mp->outside_ip_address, ntohl(mp->outside_port),
677 ntohl(mp->protocol), ntohl(mp->total_pkts), ntohl(mp->total_bytes));
680 static int api_snat_user_session_dump(vat_main_t * vam)
682 unformat_input_t* i = vam->input;
683 vl_api_snat_user_session_dump_t * mp;
684 vl_api_snat_control_ping_t *mp_ping;
689 if (vam->json_output)
691 clib_warning ("JSON output not supported for snat_address_dump");
695 if (unformat (i, "ip_address %U vrf_id %d",
696 unformat_ip4_address, &addr, &vrf_id))
700 clib_warning("unknown input '%U'", format_unformat_error, i);
704 M(SNAT_USER_SESSION_DUMP, mp);
707 /* Use a control ping for synchronization */
708 M(SNAT_CONTROL_PING, mp_ping);
709 memset(mp->ip_address, 0, 16);
710 clib_memcpy(mp->ip_address, &addr, 4);
711 mp->vrf_id = htonl(vrf_id);
719 static void vl_api_snat_user_details_t_handler
720 (vl_api_snat_user_details_t *mp)
722 snat_test_main_t * sm = &snat_test_main;
723 vat_main_t *vam = sm->vat_main;
725 fformat(vam->ofp, "user with ip %U with vrf_id %d "
726 "with %d sessions and %d static sessions\n",
727 format_ip4_address, mp->ip_address, ntohl(mp->vrf_id),
728 ntohl(mp->nsessions), ntohl(mp->nstaticsessions));
731 static int api_snat_user_dump(vat_main_t * vam)
733 vl_api_snat_user_dump_t * mp;
734 vl_api_snat_control_ping_t *mp_ping;
737 if (vam->json_output)
739 clib_warning ("JSON output not supported for snat_address_dump");
743 M(SNAT_USER_DUMP, mp);
746 /* Use a control ping for synchronization */
747 M(SNAT_CONTROL_PING, mp_ping);
754 static int api_snat_add_det_map (vat_main_t * vam)
756 unformat_input_t * i = vam->input;
757 vl_api_snat_add_det_map_t * mp;
758 ip4_address_t in_addr, out_addr;
759 u32 in_plen, out_plen;
763 if (unformat (i, "in %U/%d out %U/%d",
764 unformat_ip4_address, &in_addr, &in_plen,
765 unformat_ip4_address, &out_addr, &out_plen))
767 else if (unformat (i, "del"))
771 clib_warning("unknown input '%U'", format_unformat_error, i);
775 M(SNAT_ADD_DET_MAP, mp);
776 clib_memcpy(mp->in_addr, &in_addr, 4);
777 mp->in_plen = in_plen;
778 clib_memcpy(mp->out_addr, &out_addr, 4);
779 mp->out_plen = out_plen;
787 static void vl_api_snat_det_forward_reply_t_handler
788 (vl_api_snat_det_forward_reply_t *mp)
790 snat_test_main_t * sm = &snat_test_main;
791 vat_main_t *vam = sm->vat_main;
792 i32 retval = ntohl(mp->retval);
796 fformat (vam->ofp, "outside address %U", format_ip4_address, &mp->out_addr);
797 fformat (vam->ofp, " outside port range start %d", ntohs(mp->out_port_lo));
798 fformat (vam->ofp, " outside port range end %d\n", ntohs(mp->out_port_hi));
801 vam->retval = retval;
802 vam->result_ready = 1;
805 static int api_snat_det_forward (vat_main_t * vam)
807 unformat_input_t * i = vam->input;
808 vl_api_snat_det_forward_t * mp;
809 ip4_address_t in_addr;
812 if (unformat (i, "%U", unformat_ip4_address, &in_addr))
816 clib_warning("unknown input '%U'", format_unformat_error, i);
820 M(SNAT_DET_FORWARD, mp);
821 clib_memcpy(mp->in_addr, &in_addr, 4);
828 static void vl_api_snat_det_reverse_reply_t_handler
829 (vl_api_snat_det_reverse_reply_t *mp)
831 snat_test_main_t * sm = &snat_test_main;
832 vat_main_t *vam = sm->vat_main;
833 i32 retval = ntohl(mp->retval);
837 fformat (vam->ofp, "inside address %U\n", format_ip4_address, &mp->in_addr);
840 vam->retval = retval;
841 vam->result_ready = 1;
844 static int api_snat_det_reverse (vat_main_t * vam)
846 unformat_input_t * i = vam->input;
847 vl_api_snat_det_reverse_t * mp;
848 ip4_address_t out_addr;
852 if (unformat (i, "%U %d", unformat_ip4_address, &out_addr, &out_port))
856 clib_warning("unknown input '%U'", format_unformat_error, i);
860 M(SNAT_DET_REVERSE, mp);
861 clib_memcpy(mp->out_addr, &out_addr, 4);
862 mp->out_port = htons((u16)out_port);
869 static void vl_api_snat_det_map_details_t_handler
870 (vl_api_snat_det_map_details_t *mp)
872 snat_test_main_t * sm = &snat_test_main;
873 vat_main_t *vam = sm->vat_main;
875 fformat (vam->ofp, "Deterministic S-NAT mapping in %U/%d out %U/%d "
876 "ports per host %d sharing ratio %d "
877 "number of sessions %d",
878 format_ip4_address, mp->in_addr, mp->in_plen,
879 format_ip4_address, mp->out_addr, mp->out_plen,
880 ntohs(mp->ports_per_host), ntohl(mp->sharing_ratio),
884 static int api_snat_det_map_dump(vat_main_t * vam)
886 vl_api_snat_det_map_dump_t * mp;
887 vl_api_snat_control_ping_t *mp_ping;
890 if (vam->json_output)
892 clib_warning ("JSON output not supported for snat_det_map_dump");
896 M(SNAT_DET_MAP_DUMP, mp);
899 /* Use a control ping for synchronization */
900 M(SNAT_CONTROL_PING, mp_ping);
907 static int api_snat_det_set_timeouts (vat_main_t * vam)
909 unformat_input_t * i = vam->input;
910 vl_api_snat_det_set_timeouts_t * mp;
911 u32 udp = SNAT_UDP_TIMEOUT;
912 u32 tcp_established = SNAT_TCP_ESTABLISHED_TIMEOUT;
913 u32 tcp_transitory = SNAT_TCP_TRANSITORY_TIMEOUT;
914 u32 icmp = SNAT_ICMP_TIMEOUT;
917 if (unformat (i, "udp %d", &udp))
919 else if (unformat (i, "tcp_established %d", &tcp_established))
921 else if (unformat (i, "tcp_transitory %d", &tcp_transitory))
923 else if (unformat (i, "icmp %d", &icmp))
927 clib_warning("unknown input '%U'", format_unformat_error, i);
931 M(SNAT_DET_SET_TIMEOUTS, mp);
932 mp->udp = htonl(udp);
933 mp->tcp_established = htonl(tcp_established);
934 mp->tcp_transitory = htonl(tcp_transitory);
935 mp->icmp = htonl(icmp);
942 static void vl_api_snat_det_get_timeouts_reply_t_handler
943 (vl_api_snat_det_get_timeouts_reply_t *mp)
945 snat_test_main_t * sm = &snat_test_main;
946 vat_main_t *vam = sm->vat_main;
947 i32 retval = ntohl (mp->retval);
951 fformat (vam->ofp, "udp timeout: %dsec\n", ntohl (mp->udp));
952 fformat (vam->ofp, "tcp-established timeout: %dsec",
953 ntohl (mp->tcp_established));
954 fformat (vam->ofp, "tcp-transitory timeout: %dsec",
955 ntohl (mp->tcp_transitory));
956 fformat (vam->ofp, "icmp timeout: %dsec", ntohl (mp->icmp));
958 vam->retval = retval;
959 vam->result_ready = 1;
962 static int api_snat_det_get_timeouts(vat_main_t * vam)
964 vl_api_snat_det_get_timeouts_t * mp;
967 if (vam->json_output)
969 clib_warning ("JSON output not supported for snat_show_config");
973 M(SNAT_DET_GET_TIMEOUTS, mp);
979 static int api_snat_det_close_session_out (vat_main_t * vam)
981 unformat_input_t * i = vam->input;
982 vl_api_snat_det_close_session_out_t * mp;
983 ip4_address_t out_addr, ext_addr;
984 u32 out_port, ext_port;
987 if (unformat (i, "%U:%d %U:%d",
988 unformat_ip4_address, &out_addr, &out_port,
989 unformat_ip4_address, &ext_addr, &ext_port))
993 clib_warning("unknown input '%U'", format_unformat_error, i);
997 M(SNAT_DET_CLOSE_SESSION_OUT, mp);
998 clib_memcpy(mp->out_addr, &out_addr, 4);
999 mp->out_port = ntohs((u16)out_port);
1000 clib_memcpy(mp->ext_addr, &ext_addr, 4);
1001 mp->ext_port = ntohs((u16)ext_port);
1008 static int api_snat_det_close_session_in (vat_main_t * vam)
1010 unformat_input_t * i = vam->input;
1011 vl_api_snat_det_close_session_in_t * mp;
1012 ip4_address_t in_addr, ext_addr;
1013 u32 in_port, ext_port;
1016 if (unformat (i, "%U:%d %U:%d",
1017 unformat_ip4_address, &in_addr, &in_port,
1018 unformat_ip4_address, &ext_addr, &ext_port))
1022 clib_warning("unknown input '%U'", format_unformat_error, i);
1026 M(SNAT_DET_CLOSE_SESSION_IN, mp);
1027 clib_memcpy(mp->in_addr, &in_addr, 4);
1028 mp->in_port = ntohs((u16)in_port);
1029 clib_memcpy(mp->ext_addr, &ext_addr, 4);
1030 mp->ext_port = ntohs((u16)ext_port);
1037 static void vl_api_snat_det_session_details_t_handler
1038 (vl_api_snat_det_session_details_t *mp)
1040 snat_test_main_t * sm = &snat_test_main;
1041 vat_main_t *vam = sm->vat_main;
1043 fformat(vam->ofp, "deterministic session, external host address %U, "
1044 "external host port %d, outer port %d, inside port %d",
1045 format_ip4_address, mp->ext_addr, mp->ext_port,
1046 mp->out_port, mp->in_port);
1049 static int api_snat_det_session_dump(vat_main_t * vam)
1051 unformat_input_t* i = vam->input;
1052 vl_api_snat_det_session_dump_t * mp;
1053 vl_api_snat_control_ping_t *mp_ping;
1054 ip4_address_t user_addr;
1057 if (vam->json_output)
1059 clib_warning ("JSON output not supported for snat_det_session_dump");
1063 if (unformat (i, "user_addr %U", unformat_ip4_address, &user_addr))
1067 clib_warning ("unknown input '%U'", format_unformat_error, i);
1071 M(SNAT_DET_SESSION_DUMP, mp);
1072 clib_memcpy (&mp->user_addr, &user_addr, 4);
1075 /* Use a control ping for synchronization */
1076 M(SNAT_CONTROL_PING, mp_ping);
1084 * List of messages that the api test plugin sends,
1085 * and that the data plane plugin processes
1087 #define foreach_vpe_api_msg \
1088 _(snat_add_address_range, "<start-addr> [- <end-addr] [del]") \
1089 _(snat_interface_add_del_feature, \
1090 "<intfc> | sw_if_index <id> [in] [out] [del]") \
1091 _(snat_add_static_mapping, "local_addr <ip> (external_addr <ip>" \
1092 " | external_if <intfc> | external_sw_if_ndex <id>) " \
1093 "[local_port <n>] [external_port <n>] [vrf <table-id>] [del] " \
1095 _(snat_set_workers, "<wokrers_bitmap>") \
1096 _(snat_static_mapping_dump, "") \
1097 _(snat_show_config, "") \
1098 _(snat_address_dump, "") \
1099 _(snat_interface_dump, "") \
1100 _(snat_worker_dump, "") \
1101 _(snat_add_del_interface_addr, \
1102 "<intfc> | sw_if_index <id> [del]") \
1103 _(snat_interface_addr_dump, "") \
1104 _(snat_ipfix_enable_disable, "[domain <id>] [src_port <n>] " \
1106 _(snat_user_dump, "") \
1107 _(snat_user_session_dump, "ip_address <ip> vrf_id <table-id>") \
1108 _(snat_add_det_map, "in <in_addr>/<in_plen> out " \
1109 "<out_addr>/<out_plen> [del]") \
1110 _(snat_det_forward, "<in_addr>") \
1111 _(snat_det_reverse, "<out_addr> <out_port>") \
1112 _(snat_det_map_dump, "") \
1113 _(snat_det_set_timeouts, "[udp <sec> | tcp_established <sec> | " \
1114 "tcp_transitory <sec> | icmp <sec>]") \
1115 _(snat_det_get_timeouts, "") \
1116 _(snat_det_close_session_out, "<out_addr>:<out_port> " \
1117 "<ext_addr>:<ext_port>") \
1118 _(snat_det_close_session_in, "<in_addr>:<in_port> " \
1119 "<out_addr>:<out_port>") \
1120 _(snat_det_session_dump, "ip_address <user_addr>")
1123 snat_vat_api_hookup (vat_main_t *vam)
1125 snat_test_main_t * sm __attribute__((unused)) = &snat_test_main;
1126 /* Hook up handlers for replies from the data plane plug-in */
1128 vl_msg_api_set_handlers((VL_API_##N + sm->msg_id_base), \
1130 vl_api_##n##_t_handler, \
1132 vl_api_##n##_t_endian, \
1133 vl_api_##n##_t_print, \
1134 sizeof(vl_api_##n##_t), 1);
1135 foreach_vpe_api_reply_msg;
1138 /* API messages we can send */
1140 hash_set_mem (vam->function_by_name, #n, api_##n);
1141 foreach_vpe_api_msg;
1145 #define _(n,h) hash_set_mem (vam->help_by_name, #n, h);
1146 foreach_vpe_api_msg;
1150 clib_error_t * vat_plugin_register (vat_main_t *vam)
1152 snat_test_main_t * sm = &snat_test_main;
1157 /* Ask the vpp engine for the first assigned message-id */
1158 name = format (0, "snat_%08x%c", api_version, 0);
1159 sm->msg_id_base = vl_client_get_first_plugin_msg_id ((char *) name);
1161 if (sm->msg_id_base != (u16) ~0)
1162 snat_vat_api_hookup (vam);