2 * Copyright (c) 2018 Cisco and/or its affiliates.
3 * Licensed under the Apache License, Version 2.0 (the "License");
4 * you may not use this file except in compliance with the License.
5 * You may obtain a copy of the License at:
7 * http://www.apache.org/licenses/LICENSE-2.0
9 * Unless required by applicable law or agreed to in writing, software
10 * distributed under the License is distributed on an "AS IS" BASIS,
11 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12 * See the License for the specific language governing permissions and
13 * limitations under the License.
17 * @brief NAT44 endpoint-dependent inside to outside network translation
20 #include <vlib/vlib.h>
21 #include <vnet/vnet.h>
22 #include <vnet/pg/pg.h>
23 #include <vnet/ip/ip.h>
24 #include <vnet/ethernet/ethernet.h>
25 #include <vnet/fib/ip4_fib.h>
26 #include <vppinfra/error.h>
28 #include <nat/nat_ipfix_logging.h>
29 #include <nat/nat_reass.h>
30 #include <nat/nat_inlines.h>
31 #include <nat/nat_syslog.h>
32 #include <nat/nat_ha.h>
34 static char *nat_in2out_ed_error_strings[] = {
35 #define _(sym,string) string,
36 foreach_nat_in2out_ed_error
46 } nat_in2out_ed_trace_t;
49 format_nat_in2out_ed_trace (u8 * s, va_list * args)
51 CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
52 CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
53 nat_in2out_ed_trace_t *t = va_arg (*args, nat_in2out_ed_trace_t *);
57 t->is_slow_path ? "NAT44_IN2OUT_ED_SLOW_PATH" :
58 "NAT44_IN2OUT_ED_FAST_PATH";
60 s = format (s, "%s: sw_if_index %d, next index %d, session %d", tag,
61 t->sw_if_index, t->next_index, t->session_index);
66 #ifndef CLIB_MARCH_VARIANT
68 nat44_i2o_ed_is_idle_session_cb (clib_bihash_kv_16_8_t * kv, void *arg)
70 snat_main_t *sm = &snat_main;
71 nat44_is_idle_session_ctx_t *ctx = arg;
73 u64 sess_timeout_time;
74 nat_ed_ses_key_t ed_key;
75 clib_bihash_kv_16_8_t ed_kv;
78 snat_session_key_t key;
79 snat_main_per_thread_data_t *tsm = vec_elt_at_index (sm->per_thread_data,
82 s = pool_elt_at_index (tsm->sessions, kv->value);
83 sess_timeout_time = s->last_heard + (f64) nat44_session_get_timeout (sm, s);
84 if (ctx->now >= sess_timeout_time)
86 if (is_fwd_bypass_session (s))
89 ed_key.l_addr = s->out2in.addr;
90 ed_key.r_addr = s->ext_host_addr;
91 ed_key.fib_index = s->out2in.fib_index;
92 if (snat_is_unk_proto_session (s))
94 ed_key.proto = s->in2out.port;
100 ed_key.proto = snat_proto_to_ip_proto (s->in2out.protocol);
101 ed_key.l_port = s->out2in.port;
102 ed_key.r_port = s->ext_host_port;
104 ed_kv.key[0] = ed_key.as_u64[0];
105 ed_kv.key[1] = ed_key.as_u64[1];
106 if (clib_bihash_add_del_16_8 (&tsm->out2in_ed, &ed_kv, 0))
107 nat_elog_warn ("out2in_ed key del failed");
109 if (snat_is_unk_proto_session (s))
112 snat_ipfix_logging_nat44_ses_delete (ctx->thread_index,
113 s->in2out.addr.as_u32,
114 s->out2in.addr.as_u32,
118 s->in2out.fib_index);
120 nat_syslog_nat44_sdel (s->user_index, s->in2out.fib_index,
121 &s->in2out.addr, s->in2out.port,
122 &s->ext_host_nat_addr, s->ext_host_nat_port,
123 &s->out2in.addr, s->out2in.port,
124 &s->ext_host_addr, s->ext_host_port,
125 s->in2out.protocol, is_twice_nat_session (s));
127 nat_ha_sdel (&s->out2in.addr, s->out2in.port, &s->ext_host_addr,
128 s->ext_host_port, s->out2in.protocol, s->out2in.fib_index,
131 if (is_twice_nat_session (s))
133 for (i = 0; i < vec_len (sm->twice_nat_addresses); i++)
135 key.protocol = s->in2out.protocol;
136 key.port = s->ext_host_nat_port;
137 a = sm->twice_nat_addresses + i;
138 if (a->addr.as_u32 == s->ext_host_nat_addr.as_u32)
140 snat_free_outside_address_and_port (sm->twice_nat_addresses,
148 if (snat_is_session_static (s))
151 snat_free_outside_address_and_port (sm->addresses, ctx->thread_index,
154 nat44_delete_session (sm, s, ctx->thread_index);
163 icmp_in2out_ed_slow_path (snat_main_t * sm, vlib_buffer_t * b0,
164 ip4_header_t * ip0, icmp46_header_t * icmp0,
165 u32 sw_if_index0, u32 rx_fib_index0,
166 vlib_node_runtime_t * node, u32 next0, f64 now,
167 u32 thread_index, snat_session_t ** p_s0)
169 next0 = icmp_in2out (sm, b0, ip0, icmp0, sw_if_index0, rx_fib_index0, node,
170 next0, thread_index, p_s0, 0);
171 snat_session_t *s0 = *p_s0;
172 if (PREDICT_TRUE (next0 != NAT_NEXT_DROP && s0))
175 nat44_session_update_counters (s0, now,
176 vlib_buffer_length_in_chain
177 (sm->vlib_main, b0), thread_index);
178 /* Per-user LRU list maintenance */
179 nat44_session_update_lru (sm, s0, thread_index);
185 slow_path_ed (snat_main_t * sm,
188 clib_bihash_kv_16_8_t * kv,
189 snat_session_t ** sessionp,
190 vlib_node_runtime_t * node, u32 next, u32 thread_index, f64 now,
193 snat_session_t *s = 0;
195 snat_session_key_t key0, key1;
196 lb_nat_type_t lb = 0, is_sm = 0;
197 snat_main_per_thread_data_t *tsm = &sm->per_thread_data[thread_index];
198 nat_ed_ses_key_t *key = (nat_ed_ses_key_t *) kv->key;
199 u32 proto = ip_proto_to_snat_proto (key->proto);
200 nat_outside_fib_t *outside_fib;
201 fib_node_index_t fei = FIB_NODE_INDEX_INVALID;
204 .fp_proto = FIB_PROTOCOL_IP4,
207 .ip4.as_u32 = key->r_addr.as_u32,
210 nat44_is_idle_session_ctx_t ctx;
212 if (PREDICT_FALSE (maximum_sessions_exceeded (sm, thread_index)))
214 b->error = node->errors[NAT_IN2OUT_ED_ERROR_MAX_SESSIONS_EXCEEDED];
215 nat_ipfix_logging_max_sessions (thread_index, sm->max_translations);
216 nat_elog_notice ("maximum sessions exceeded");
217 return NAT_NEXT_DROP;
220 key0.addr = key->l_addr;
221 key0.port = key->l_port;
222 key1.protocol = key0.protocol = proto;
223 key0.fib_index = rx_fib_index;
224 key1.fib_index = sm->outside_fib_index;
225 /* First try to match static mapping by local address and port */
226 if (snat_static_mapping_match
227 (sm, key0, &key1, 0, 0, 0, &lb, 0, &identity_nat))
229 /* Try to create dynamic translation */
230 if (snat_alloc_outside_address_and_port (sm->addresses, rx_fib_index,
233 tsm->snat_thread_index))
235 nat_elog_notice ("addresses exhausted");
236 b->error = node->errors[NAT_IN2OUT_ED_ERROR_OUT_OF_PORTS];
237 return NAT_NEXT_DROP;
242 if (PREDICT_FALSE (identity_nat))
251 if (proto == SNAT_PROTOCOL_TCP)
253 if (!tcp_is_init (tcp))
255 b->error = node->errors[NAT_IN2OUT_ED_ERROR_NON_SYN];
256 return NAT_NEXT_DROP;
260 u = nat_user_get_or_create (sm, &key->l_addr, rx_fib_index, thread_index);
263 nat_elog_warn ("create NAT user failed");
265 snat_free_outside_address_and_port (sm->addresses,
266 thread_index, &key1);
267 return NAT_NEXT_DROP;
270 s = nat_ed_session_alloc (sm, u, thread_index, now);
273 nat44_delete_user_with_no_session (sm, u, thread_index);
274 nat_elog_warn ("create NAT session failed");
276 snat_free_outside_address_and_port (sm->addresses,
277 thread_index, &key1);
278 return NAT_NEXT_DROP;
281 user_session_increment (sm, u, is_sm);
283 s->flags |= SNAT_SESSION_FLAG_STATIC_MAPPING;
285 s->flags |= SNAT_SESSION_FLAG_LOAD_BALANCING;
286 s->flags |= SNAT_SESSION_FLAG_ENDPOINT_DEPENDENT;
287 s->ext_host_addr = key->r_addr;
288 s->ext_host_port = key->r_port;
291 s->out2in.protocol = key0.protocol;
293 switch (vec_len (sm->outside_fibs))
296 s->out2in.fib_index = sm->outside_fib_index;
299 s->out2in.fib_index = sm->outside_fibs[0].fib_index;
303 vec_foreach (outside_fib, sm->outside_fibs)
305 fei = fib_table_lookup (outside_fib->fib_index, &pfx);
306 if (FIB_NODE_INDEX_INVALID != fei)
308 if (fib_entry_get_resolving_interface (fei) != ~0)
310 s->out2in.fib_index = outside_fib->fib_index;
319 /* Add to lookup tables */
320 kv->value = s - tsm->sessions;
322 ctx.thread_index = thread_index;
323 if (clib_bihash_add_or_overwrite_stale_16_8 (&tsm->in2out_ed, kv,
324 nat44_i2o_ed_is_idle_session_cb,
326 nat_elog_notice ("in2out-ed key add failed");
328 make_ed_kv (kv, &key1.addr, &key->r_addr, key->proto, s->out2in.fib_index,
329 key1.port, key->r_port);
330 kv->value = s - tsm->sessions;
331 if (clib_bihash_add_or_overwrite_stale_16_8 (&tsm->out2in_ed, kv,
332 nat44_o2i_ed_is_idle_session_cb,
334 nat_elog_notice ("out2in-ed key add failed");
339 snat_ipfix_logging_nat44_ses_create (thread_index,
340 s->in2out.addr.as_u32,
341 s->out2in.addr.as_u32,
344 s->out2in.port, s->in2out.fib_index);
346 nat_syslog_nat44_sadd (s->user_index, s->in2out.fib_index,
347 &s->in2out.addr, s->in2out.port,
348 &s->ext_host_nat_addr, s->ext_host_nat_port,
349 &s->out2in.addr, s->out2in.port,
350 &s->ext_host_addr, s->ext_host_port,
351 s->in2out.protocol, 0);
353 nat_ha_sadd (&s->in2out.addr, s->in2out.port, &s->out2in.addr,
354 s->out2in.port, &s->ext_host_addr, s->ext_host_port,
355 &s->ext_host_nat_addr, s->ext_host_nat_port,
356 s->in2out.protocol, s->in2out.fib_index, s->flags,
362 static_always_inline int
363 nat44_ed_not_translate (snat_main_t * sm, vlib_node_runtime_t * node,
364 u32 sw_if_index, ip4_header_t * ip, u32 proto,
365 u32 rx_fib_index, u32 thread_index)
367 udp_header_t *udp = ip4_next_header (ip);
368 snat_main_per_thread_data_t *tsm = &sm->per_thread_data[thread_index];
369 clib_bihash_kv_16_8_t kv, value;
370 snat_session_key_t key0, key1;
372 make_ed_kv (&kv, &ip->dst_address, &ip->src_address, ip->protocol,
373 sm->outside_fib_index, udp->dst_port, udp->src_port);
375 /* NAT packet aimed at external address if */
376 /* has active sessions */
377 if (clib_bihash_search_16_8 (&tsm->out2in_ed, &kv, &value))
379 key0.addr = ip->dst_address;
380 key0.port = udp->dst_port;
381 key0.protocol = proto;
382 key0.fib_index = sm->outside_fib_index;
383 /* or is static mappings */
384 if (!snat_static_mapping_match (sm, key0, &key1, 1, 0, 0, 0, 0, 0))
390 if (sm->forwarding_enabled)
393 return snat_not_translate_fast (sm, node, sw_if_index, ip, proto,
397 static_always_inline int
398 nat_not_translate_output_feature_fwd (snat_main_t * sm, ip4_header_t * ip,
399 u32 thread_index, f64 now,
400 vlib_main_t * vm, vlib_buffer_t * b)
402 nat_ed_ses_key_t key;
403 clib_bihash_kv_16_8_t kv, value;
405 snat_session_t *s = 0;
406 snat_main_per_thread_data_t *tsm = &sm->per_thread_data[thread_index];
408 if (!sm->forwarding_enabled)
411 if (ip->protocol == IP_PROTOCOL_ICMP)
413 key.as_u64[0] = key.as_u64[1] = 0;
414 if (get_icmp_i2o_ed_key (ip, &key))
417 kv.key[0] = key.as_u64[0];
418 kv.key[1] = key.as_u64[1];
420 else if (ip->protocol == IP_PROTOCOL_UDP || ip->protocol == IP_PROTOCOL_TCP)
422 udp = ip4_next_header (ip);
423 make_ed_kv (&kv, &ip->src_address, &ip->dst_address, ip->protocol, 0,
424 udp->src_port, udp->dst_port);
428 make_ed_kv (&kv, &ip->src_address, &ip->dst_address, ip->protocol, 0, 0,
432 if (!clib_bihash_search_16_8 (&tsm->in2out_ed, &kv, &value))
434 s = pool_elt_at_index (tsm->sessions, value.value);
435 if (is_fwd_bypass_session (s))
437 if (ip->protocol == IP_PROTOCOL_TCP)
439 tcp_header_t *tcp = ip4_next_header (ip);
440 if (nat44_set_tcp_session_state_i2o (sm, s, tcp, thread_index))
444 nat44_session_update_counters (s, now,
445 vlib_buffer_length_in_chain (vm, b),
447 /* Per-user LRU list maintenance */
448 nat44_session_update_lru (sm, s, thread_index);
458 static_always_inline int
459 nat44_ed_not_translate_output_feature (snat_main_t * sm, ip4_header_t * ip,
460 u8 proto, u16 src_port, u16 dst_port,
461 u32 thread_index, u32 rx_sw_if_index,
464 clib_bihash_kv_16_8_t kv, value;
465 snat_main_per_thread_data_t *tsm = &sm->per_thread_data[thread_index];
468 u32 rx_fib_index = ip4_fib_table_get_index_for_sw_if_index (rx_sw_if_index);
469 u32 tx_fib_index = ip4_fib_table_get_index_for_sw_if_index (tx_sw_if_index);
472 make_ed_kv (&kv, &ip->src_address, &ip->dst_address, proto, tx_fib_index,
474 if (!clib_bihash_search_16_8 (&tsm->out2in_ed, &kv, &value))
476 s = pool_elt_at_index (tsm->sessions, value.value);
477 if (nat44_is_ses_closed (s))
479 nat_free_session_data (sm, s, thread_index, 0);
480 nat44_delete_session (sm, s, thread_index);
483 s->flags |= SNAT_SESSION_FLAG_OUTPUT_FEATURE;
488 make_ed_kv (&kv, &ip->dst_address, &ip->src_address, proto, rx_fib_index,
490 if (!clib_bihash_search_16_8 (&tsm->in2out_ed, &kv, &value))
492 s = pool_elt_at_index (tsm->sessions, value.value);
493 if (is_fwd_bypass_session (s))
498 pool_foreach (i, sm->output_feature_interfaces,
500 if ((nat_interface_is_inside (i)) && (rx_sw_if_index == i->sw_if_index))
510 #ifndef CLIB_MARCH_VARIANT
512 icmp_match_in2out_ed (snat_main_t * sm, vlib_node_runtime_t * node,
513 u32 thread_index, vlib_buffer_t * b, ip4_header_t * ip,
514 u8 * p_proto, snat_session_key_t * p_value,
515 u8 * p_dont_translate, void *d, void *e)
517 icmp46_header_t *icmp;
520 nat_ed_ses_key_t key;
521 snat_session_t *s = 0;
522 u8 dont_translate = 0;
523 clib_bihash_kv_16_8_t kv, value;
526 snat_main_per_thread_data_t *tsm = &sm->per_thread_data[thread_index];
528 icmp = (icmp46_header_t *) ip4_next_header (ip);
529 sw_if_index = vnet_buffer (b)->sw_if_index[VLIB_RX];
530 rx_fib_index = ip4_fib_table_get_index_for_sw_if_index (sw_if_index);
532 key.as_u64[0] = key.as_u64[1] = 0;
533 err = get_icmp_i2o_ed_key (ip, &key);
536 b->error = node->errors[err];
537 next = NAT_NEXT_DROP;
540 key.fib_index = rx_fib_index;
542 kv.key[0] = key.as_u64[0];
543 kv.key[1] = key.as_u64[1];
545 if (clib_bihash_search_16_8 (&tsm->in2out_ed, &kv, &value))
547 if (vnet_buffer (b)->sw_if_index[VLIB_TX] != ~0)
549 if (PREDICT_FALSE (nat44_ed_not_translate_output_feature (sm, ip,
568 if (PREDICT_FALSE (nat44_ed_not_translate (sm, node, sw_if_index,
569 ip, SNAT_PROTOCOL_ICMP,
578 if (PREDICT_FALSE (icmp_is_error_message (icmp)))
580 b->error = node->errors[NAT_IN2OUT_ED_ERROR_BAD_ICMP_TYPE];
581 next = NAT_NEXT_DROP;
585 next = slow_path_ed (sm, b, rx_fib_index, &kv, &s, node, next,
586 thread_index, vlib_time_now (sm->vlib_main), 0);
588 if (PREDICT_FALSE (next == NAT_NEXT_DROP))
599 if (PREDICT_FALSE (icmp->type != ICMP4_echo_request &&
600 icmp->type != ICMP4_echo_reply &&
601 !icmp_is_error_message (icmp)))
603 b->error = node->errors[NAT_IN2OUT_ED_ERROR_BAD_ICMP_TYPE];
604 next = NAT_NEXT_DROP;
608 s = pool_elt_at_index (tsm->sessions, value.value);
611 *p_proto = ip_proto_to_snat_proto (key.proto);
614 *p_value = s->out2in;
615 *p_dont_translate = dont_translate;
617 *(snat_session_t **) d = s;
622 static snat_session_t *
623 nat44_ed_in2out_unknown_proto (snat_main_t * sm,
629 vlib_main_t * vm, vlib_node_runtime_t * node)
631 clib_bihash_kv_8_8_t kv, value;
632 clib_bihash_kv_16_8_t s_kv, s_value;
633 snat_static_mapping_t *m;
634 u32 old_addr, new_addr = 0;
637 dlist_elt_t *head, *elt;
638 snat_main_per_thread_data_t *tsm = &sm->per_thread_data[thread_index];
639 u32 elt_index, head_index, ses_index;
641 u32 outside_fib_index = sm->outside_fib_index;
644 nat_outside_fib_t *outside_fib;
645 fib_node_index_t fei = FIB_NODE_INDEX_INVALID;
647 .fp_proto = FIB_PROTOCOL_IP4,
650 .ip4.as_u32 = ip->dst_address.as_u32,
654 switch (vec_len (sm->outside_fibs))
657 outside_fib_index = sm->outside_fib_index;
660 outside_fib_index = sm->outside_fibs[0].fib_index;
664 vec_foreach (outside_fib, sm->outside_fibs)
666 fei = fib_table_lookup (outside_fib->fib_index, &pfx);
667 if (FIB_NODE_INDEX_INVALID != fei)
669 if (fib_entry_get_resolving_interface (fei) != ~0)
671 outside_fib_index = outside_fib->fib_index;
679 old_addr = ip->src_address.as_u32;
681 make_ed_kv (&s_kv, &ip->src_address, &ip->dst_address, ip->protocol,
684 if (!clib_bihash_search_16_8 (&tsm->in2out_ed, &s_kv, &s_value))
686 s = pool_elt_at_index (tsm->sessions, s_value.value);
687 new_addr = ip->src_address.as_u32 = s->out2in.addr.as_u32;
691 if (PREDICT_FALSE (maximum_sessions_exceeded (sm, thread_index)))
693 b->error = node->errors[NAT_IN2OUT_ED_ERROR_MAX_SESSIONS_EXCEEDED];
694 nat_ipfix_logging_max_sessions (thread_index, sm->max_translations);
695 nat_elog_notice ("maximum sessions exceeded");
699 u = nat_user_get_or_create (sm, &ip->src_address, rx_fib_index,
703 nat_elog_warn ("create NAT user failed");
707 make_sm_kv (&kv, &ip->src_address, 0, rx_fib_index, 0);
709 /* Try to find static mapping first */
710 if (!clib_bihash_search_8_8 (&sm->static_mapping_by_local, &kv, &value))
712 m = pool_elt_at_index (sm->static_mappings, value.value);
713 new_addr = ip->src_address.as_u32 = m->external_addr.as_u32;
717 /* Fallback to 3-tuple key */
720 /* Choose same out address as for TCP/UDP session to same destination */
721 head_index = u->sessions_per_user_list_head_index;
722 head = pool_elt_at_index (tsm->list_pool, head_index);
723 elt_index = head->next;
724 if (PREDICT_FALSE (elt_index == ~0))
728 elt = pool_elt_at_index (tsm->list_pool, elt_index);
729 ses_index = elt->value;
732 while (ses_index != ~0)
734 s = pool_elt_at_index (tsm->sessions, ses_index);
735 elt_index = elt->next;
736 elt = pool_elt_at_index (tsm->list_pool, elt_index);
737 ses_index = elt->value;
739 if (s->ext_host_addr.as_u32 == ip->dst_address.as_u32)
741 new_addr = ip->src_address.as_u32 = s->out2in.addr.as_u32;
743 make_ed_kv (&s_kv, &s->out2in.addr, &ip->dst_address,
744 ip->protocol, outside_fib_index, 0, 0);
745 if (clib_bihash_search_16_8
746 (&tsm->out2in_ed, &s_kv, &s_value))
753 for (i = 0; i < vec_len (sm->addresses); i++)
755 make_ed_kv (&s_kv, &sm->addresses[i].addr, &ip->dst_address,
756 ip->protocol, outside_fib_index, 0, 0);
757 if (clib_bihash_search_16_8 (&tsm->out2in_ed, &s_kv, &s_value))
759 new_addr = ip->src_address.as_u32 =
760 sm->addresses[i].addr.as_u32;
768 s = nat_ed_session_alloc (sm, u, thread_index, now);
771 nat44_delete_user_with_no_session (sm, u, thread_index);
772 nat_elog_warn ("create NAT session failed");
776 s->ext_host_addr.as_u32 = ip->dst_address.as_u32;
777 s->flags |= SNAT_SESSION_FLAG_UNKNOWN_PROTO;
778 s->flags |= SNAT_SESSION_FLAG_ENDPOINT_DEPENDENT;
779 s->out2in.addr.as_u32 = new_addr;
780 s->out2in.fib_index = outside_fib_index;
781 s->in2out.addr.as_u32 = old_addr;
782 s->in2out.fib_index = rx_fib_index;
783 s->in2out.port = s->out2in.port = ip->protocol;
785 s->flags |= SNAT_SESSION_FLAG_STATIC_MAPPING;
786 user_session_increment (sm, u, is_sm);
788 /* Add to lookup tables */
789 make_ed_kv (&s_kv, &s->in2out.addr, &ip->dst_address, ip->protocol,
791 s_kv.value = s - tsm->sessions;
792 if (clib_bihash_add_del_16_8 (&tsm->in2out_ed, &s_kv, 1))
793 nat_elog_notice ("in2out key add failed");
795 make_ed_kv (&s_kv, &s->out2in.addr, &ip->dst_address, ip->protocol,
796 outside_fib_index, 0, 0);
797 s_kv.value = s - tsm->sessions;
798 if (clib_bihash_add_del_16_8 (&tsm->out2in_ed, &s_kv, 1))
799 nat_elog_notice ("out2in key add failed");
802 /* Update IP checksum */
804 sum = ip_csum_update (sum, old_addr, new_addr, ip4_header_t, src_address);
805 ip->checksum = ip_csum_fold (sum);
808 nat44_session_update_counters (s, now, vlib_buffer_length_in_chain (vm, b),
810 /* Per-user LRU list maintenance */
811 nat44_session_update_lru (sm, s, thread_index);
814 if (vnet_buffer (b)->sw_if_index[VLIB_TX] == ~0)
815 nat44_ed_hairpinning_unknown_proto (sm, b, ip);
817 if (vnet_buffer (b)->sw_if_index[VLIB_TX] == ~0)
818 vnet_buffer (b)->sw_if_index[VLIB_TX] = outside_fib_index;
824 nat44_ed_in2out_node_fn_inline (vlib_main_t * vm,
825 vlib_node_runtime_t * node,
826 vlib_frame_t * frame, int is_slow_path,
827 int is_output_feature)
829 u32 n_left_from, *from, *to_next, pkts_processed = 0, stats_node_index;
830 nat_next_t next_index;
831 snat_main_t *sm = &snat_main;
832 f64 now = vlib_time_now (vm);
833 u32 thread_index = vm->thread_index;
834 snat_main_per_thread_data_t *tsm = &sm->per_thread_data[thread_index];
835 u32 tcp_packets = 0, udp_packets = 0, icmp_packets = 0, other_packets =
836 0, fragments = 0, def_slow, def_reass;
838 def_slow = is_output_feature ? NAT_NEXT_IN2OUT_ED_OUTPUT_SLOW_PATH :
839 NAT_NEXT_IN2OUT_ED_SLOW_PATH;
841 def_reass = is_output_feature ? NAT_NEXT_IN2OUT_ED_OUTPUT_REASS :
842 NAT_NEXT_IN2OUT_ED_REASS;
844 stats_node_index = is_slow_path ? sm->ed_in2out_slowpath_node_index :
845 sm->ed_in2out_node_index;
847 from = vlib_frame_vector_args (frame);
848 n_left_from = frame->n_vectors;
849 next_index = node->cached_next_index;
851 while (n_left_from > 0)
855 vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
857 while (n_left_from >= 4 && n_left_to_next >= 2)
860 vlib_buffer_t *b0, *b1;
861 u32 next0, sw_if_index0, rx_fib_index0, iph_offset0 = 0, proto0,
862 new_addr0, old_addr0;
863 u32 next1, sw_if_index1, rx_fib_index1, iph_offset1 = 0, proto1,
864 new_addr1, old_addr1;
865 u16 old_port0, new_port0, old_port1, new_port1;
866 ip4_header_t *ip0, *ip1;
867 udp_header_t *udp0, *udp1;
868 tcp_header_t *tcp0, *tcp1;
869 icmp46_header_t *icmp0, *icmp1;
870 snat_session_t *s0 = 0, *s1 = 0;
871 clib_bihash_kv_16_8_t kv0, value0, kv1, value1;
872 ip_csum_t sum0, sum1;
874 /* Prefetch next iteration. */
876 vlib_buffer_t *p2, *p3;
878 p2 = vlib_get_buffer (vm, from[2]);
879 p3 = vlib_get_buffer (vm, from[3]);
881 vlib_prefetch_buffer_header (p2, LOAD);
882 vlib_prefetch_buffer_header (p3, LOAD);
884 CLIB_PREFETCH (p2->data, CLIB_CACHE_LINE_BYTES, STORE);
885 CLIB_PREFETCH (p3->data, CLIB_CACHE_LINE_BYTES, STORE);
888 /* speculatively enqueue b0 and b1 to the current next frame */
889 to_next[0] = bi0 = from[0];
890 to_next[1] = bi1 = from[1];
896 b0 = vlib_get_buffer (vm, bi0);
897 b1 = vlib_get_buffer (vm, bi1);
899 if (is_output_feature)
901 // output feature fast path is enabled on the arc
902 // we need new arc_next feature
903 if (PREDICT_TRUE (!is_slow_path))
905 vnet_feature_next (&nat_buffer_opaque (b0)->arc_next, b0);
906 vnet_feature_next (&nat_buffer_opaque (b1)->arc_next, b1);
909 iph_offset0 = vnet_buffer (b0)->ip.save_rewrite_length;
910 iph_offset1 = vnet_buffer (b1)->ip.save_rewrite_length;
913 next0 = nat_buffer_opaque (b0)->arc_next;
914 next1 = nat_buffer_opaque (b1)->arc_next;
916 ip0 = (ip4_header_t *) ((u8 *) vlib_buffer_get_current (b0) +
919 sw_if_index0 = vnet_buffer (b0)->sw_if_index[VLIB_RX];
921 fib_table_get_index_for_sw_if_index (FIB_PROTOCOL_IP4,
924 if (PREDICT_FALSE (ip0->ttl == 1))
926 vnet_buffer (b0)->sw_if_index[VLIB_TX] = (u32) ~ 0;
927 icmp4_error_set_vnet_buffer (b0, ICMP4_time_exceeded,
928 ICMP4_time_exceeded_ttl_exceeded_in_transit,
930 next0 = NAT_NEXT_ICMP_ERROR;
934 udp0 = ip4_next_header (ip0);
935 tcp0 = (tcp_header_t *) udp0;
936 icmp0 = (icmp46_header_t *) udp0;
937 proto0 = ip_proto_to_snat_proto (ip0->protocol);
941 if (PREDICT_FALSE (proto0 == ~0))
943 s0 = nat44_ed_in2out_unknown_proto (sm, b0, ip0,
945 thread_index, now, vm,
948 next0 = NAT_NEXT_DROP;
953 if (PREDICT_FALSE (proto0 == SNAT_PROTOCOL_ICMP))
955 next0 = icmp_in2out_ed_slow_path
956 (sm, b0, ip0, icmp0, sw_if_index0, rx_fib_index0, node,
957 next0, now, thread_index, &s0);
964 if (PREDICT_FALSE (proto0 == ~0))
970 if (ip4_is_fragment (ip0))
977 if (is_output_feature)
980 (nat_not_translate_output_feature_fwd
981 (sm, ip0, thread_index, now, vm, b0)))
985 if (PREDICT_FALSE (proto0 == SNAT_PROTOCOL_ICMP))
992 make_ed_kv (&kv0, &ip0->src_address, &ip0->dst_address,
993 ip0->protocol, rx_fib_index0, udp0->src_port,
996 if (clib_bihash_search_16_8 (&tsm->in2out_ed, &kv0, &value0))
1000 if (is_output_feature)
1003 (nat44_ed_not_translate_output_feature
1004 (sm, ip0, ip0->protocol, udp0->src_port,
1005 udp0->dst_port, thread_index, sw_if_index0,
1006 vnet_buffer (b0)->sw_if_index[VLIB_TX])))
1011 if (PREDICT_FALSE (nat44_ed_not_translate (sm, node,
1020 slow_path_ed (sm, b0, rx_fib_index0, &kv0, &s0, node,
1021 next0, thread_index, now, tcp0);
1023 if (PREDICT_FALSE (next0 == NAT_NEXT_DROP))
1026 if (PREDICT_FALSE (!s0))
1037 s0 = pool_elt_at_index (tsm->sessions, value0.value);
1040 b0->flags |= VNET_BUFFER_F_IS_NATED;
1042 if (!is_output_feature)
1043 vnet_buffer (b0)->sw_if_index[VLIB_TX] = s0->out2in.fib_index;
1045 old_addr0 = ip0->src_address.as_u32;
1046 new_addr0 = ip0->src_address.as_u32 = s0->out2in.addr.as_u32;
1047 sum0 = ip0->checksum;
1048 sum0 = ip_csum_update (sum0, old_addr0, new_addr0, ip4_header_t,
1050 if (PREDICT_FALSE (is_twice_nat_session (s0)))
1051 sum0 = ip_csum_update (sum0, ip0->dst_address.as_u32,
1052 s0->ext_host_addr.as_u32, ip4_header_t,
1054 ip0->checksum = ip_csum_fold (sum0);
1056 old_port0 = udp0->src_port;
1057 new_port0 = udp0->src_port = s0->out2in.port;
1059 if (PREDICT_TRUE (proto0 == SNAT_PROTOCOL_TCP))
1061 sum0 = tcp0->checksum;
1062 sum0 = ip_csum_update (sum0, old_addr0, new_addr0, ip4_header_t,
1064 sum0 = ip_csum_update (sum0, old_port0, new_port0, ip4_header_t,
1066 if (PREDICT_FALSE (is_twice_nat_session (s0)))
1068 sum0 = ip_csum_update (sum0, ip0->dst_address.as_u32,
1069 s0->ext_host_addr.as_u32,
1070 ip4_header_t, dst_address);
1071 sum0 = ip_csum_update (sum0, tcp0->dst_port,
1072 s0->ext_host_port, ip4_header_t,
1074 tcp0->dst_port = s0->ext_host_port;
1075 ip0->dst_address.as_u32 = s0->ext_host_addr.as_u32;
1077 mss_clamping (sm, tcp0, &sum0);
1078 tcp0->checksum = ip_csum_fold (sum0);
1080 if (nat44_set_tcp_session_state_i2o
1081 (sm, s0, tcp0, thread_index))
1084 else if (udp0->checksum)
1086 sum0 = udp0->checksum;
1087 sum0 = ip_csum_update (sum0, old_addr0, new_addr0, ip4_header_t,
1089 sum0 = ip_csum_update (sum0, old_port0, new_port0, ip4_header_t,
1091 if (PREDICT_FALSE (is_twice_nat_session (s0)))
1093 sum0 = ip_csum_update (sum0, ip0->dst_address.as_u32,
1094 s0->ext_host_addr.as_u32,
1095 ip4_header_t, dst_address);
1096 sum0 = ip_csum_update (sum0, tcp0->dst_port,
1097 s0->ext_host_port, ip4_header_t,
1099 udp0->dst_port = s0->ext_host_port;
1100 ip0->dst_address.as_u32 = s0->ext_host_addr.as_u32;
1102 udp0->checksum = ip_csum_fold (sum0);
1107 if (PREDICT_FALSE (is_twice_nat_session (s0)))
1109 udp0->dst_port = s0->ext_host_port;
1110 ip0->dst_address.as_u32 = s0->ext_host_addr.as_u32;
1116 nat44_session_update_counters (s0, now,
1117 vlib_buffer_length_in_chain (vm,
1120 /* Per-user LRU list maintenance */
1121 nat44_session_update_lru (sm, s0, thread_index);
1124 if (PREDICT_FALSE ((node->flags & VLIB_NODE_FLAG_TRACE)
1125 && (b0->flags & VLIB_BUFFER_IS_TRACED)))
1127 nat_in2out_ed_trace_t *t =
1128 vlib_add_trace (vm, node, b0, sizeof (*t));
1129 t->is_slow_path = is_slow_path;
1130 t->sw_if_index = sw_if_index0;
1131 t->next_index = next0;
1132 t->session_index = ~0;
1134 t->session_index = s0 - tsm->sessions;
1137 pkts_processed += next0 == nat_buffer_opaque (b0)->arc_next;
1139 ip1 = (ip4_header_t *) ((u8 *) vlib_buffer_get_current (b1) +
1142 sw_if_index1 = vnet_buffer (b1)->sw_if_index[VLIB_RX];
1144 fib_table_get_index_for_sw_if_index (FIB_PROTOCOL_IP4,
1147 if (PREDICT_FALSE (ip1->ttl == 1))
1149 vnet_buffer (b1)->sw_if_index[VLIB_TX] = (u32) ~ 0;
1150 icmp4_error_set_vnet_buffer (b1, ICMP4_time_exceeded,
1151 ICMP4_time_exceeded_ttl_exceeded_in_transit,
1153 next1 = NAT_NEXT_ICMP_ERROR;
1157 udp1 = ip4_next_header (ip1);
1158 tcp1 = (tcp_header_t *) udp1;
1159 icmp1 = (icmp46_header_t *) udp1;
1160 proto1 = ip_proto_to_snat_proto (ip1->protocol);
1164 if (PREDICT_FALSE (proto1 == ~0))
1166 s1 = nat44_ed_in2out_unknown_proto (sm, b1, ip1,
1168 thread_index, now, vm,
1171 next1 = NAT_NEXT_DROP;
1176 if (PREDICT_FALSE (proto1 == SNAT_PROTOCOL_ICMP))
1178 next1 = icmp_in2out_ed_slow_path
1179 (sm, b1, ip1, icmp1, sw_if_index1, rx_fib_index1, node,
1180 next1, now, thread_index, &s1);
1187 if (PREDICT_FALSE (proto1 == ~0))
1193 if (ip4_is_fragment (ip1))
1200 if (is_output_feature)
1203 (nat_not_translate_output_feature_fwd
1204 (sm, ip1, thread_index, now, vm, b1)))
1208 if (PREDICT_FALSE (proto1 == SNAT_PROTOCOL_ICMP))
1215 make_ed_kv (&kv1, &ip1->src_address, &ip1->dst_address,
1216 ip1->protocol, rx_fib_index1, udp1->src_port,
1219 if (clib_bihash_search_16_8 (&tsm->in2out_ed, &kv1, &value1))
1223 if (is_output_feature)
1226 (nat44_ed_not_translate_output_feature
1227 (sm, ip1, ip1->protocol, udp1->src_port,
1228 udp1->dst_port, thread_index, sw_if_index1,
1229 vnet_buffer (b1)->sw_if_index[VLIB_TX])))
1234 if (PREDICT_FALSE (nat44_ed_not_translate (sm, node,
1243 slow_path_ed (sm, b1, rx_fib_index1, &kv1, &s1, node,
1244 next1, thread_index, now, tcp1);
1246 if (PREDICT_FALSE (next1 == NAT_NEXT_DROP))
1249 if (PREDICT_FALSE (!s1))
1260 s1 = pool_elt_at_index (tsm->sessions, value1.value);
1263 b1->flags |= VNET_BUFFER_F_IS_NATED;
1265 if (!is_output_feature)
1266 vnet_buffer (b1)->sw_if_index[VLIB_TX] = s1->out2in.fib_index;
1268 old_addr1 = ip1->src_address.as_u32;
1269 new_addr1 = ip1->src_address.as_u32 = s1->out2in.addr.as_u32;
1270 sum1 = ip1->checksum;
1271 sum1 = ip_csum_update (sum1, old_addr1, new_addr1, ip4_header_t,
1273 if (PREDICT_FALSE (is_twice_nat_session (s1)))
1274 sum1 = ip_csum_update (sum1, ip1->dst_address.as_u32,
1275 s1->ext_host_addr.as_u32, ip4_header_t,
1277 ip1->checksum = ip_csum_fold (sum1);
1279 old_port1 = udp1->src_port;
1280 new_port1 = udp1->src_port = s1->out2in.port;
1282 if (PREDICT_TRUE (proto1 == SNAT_PROTOCOL_TCP))
1284 sum1 = tcp1->checksum;
1285 sum1 = ip_csum_update (sum1, old_addr1, new_addr1, ip4_header_t,
1287 sum1 = ip_csum_update (sum1, old_port1, new_port1, ip4_header_t,
1289 if (PREDICT_FALSE (is_twice_nat_session (s1)))
1291 sum1 = ip_csum_update (sum1, ip1->dst_address.as_u32,
1292 s1->ext_host_addr.as_u32,
1293 ip4_header_t, dst_address);
1294 sum1 = ip_csum_update (sum1, tcp1->dst_port,
1295 s1->ext_host_port, ip4_header_t,
1297 tcp1->dst_port = s1->ext_host_port;
1298 ip1->dst_address.as_u32 = s1->ext_host_addr.as_u32;
1300 tcp1->checksum = ip_csum_fold (sum1);
1301 mss_clamping (sm, tcp1, &sum1);
1303 if (nat44_set_tcp_session_state_i2o
1304 (sm, s1, tcp1, thread_index))
1307 else if (udp1->checksum)
1309 sum1 = udp1->checksum;
1310 sum1 = ip_csum_update (sum1, old_addr1, new_addr1, ip4_header_t,
1312 sum1 = ip_csum_update (sum1, old_port1, new_port1, ip4_header_t,
1315 if (PREDICT_FALSE (is_twice_nat_session (s1)))
1317 sum1 = ip_csum_update (sum1, ip1->dst_address.as_u32,
1318 s1->ext_host_addr.as_u32,
1319 ip4_header_t, dst_address);
1320 sum1 = ip_csum_update (sum1, tcp1->dst_port,
1321 s1->ext_host_port, ip4_header_t,
1323 udp1->dst_port = s1->ext_host_port;
1324 ip1->dst_address.as_u32 = s1->ext_host_addr.as_u32;
1326 udp1->checksum = ip_csum_fold (sum1);
1331 if (PREDICT_FALSE (is_twice_nat_session (s1)))
1333 udp1->dst_port = s1->ext_host_port;
1334 ip1->dst_address.as_u32 = s1->ext_host_addr.as_u32;
1340 nat44_session_update_counters (s1, now,
1341 vlib_buffer_length_in_chain (vm, b1),
1343 /* Per-user LRU list maintenance */
1344 nat44_session_update_lru (sm, s1, thread_index);
1347 if (PREDICT_FALSE ((node->flags & VLIB_NODE_FLAG_TRACE)
1348 && (b1->flags & VLIB_BUFFER_IS_TRACED)))
1350 nat_in2out_ed_trace_t *t =
1351 vlib_add_trace (vm, node, b1, sizeof (*t));
1352 t->is_slow_path = is_slow_path;
1353 t->sw_if_index = sw_if_index1;
1354 t->next_index = next1;
1355 t->session_index = ~0;
1357 t->session_index = s1 - tsm->sessions;
1360 pkts_processed += next1 == nat_buffer_opaque (b1)->arc_next;
1363 /* verify speculative enqueues, maybe switch current next frame */
1364 vlib_validate_buffer_enqueue_x2 (vm, node, next_index,
1365 to_next, n_left_to_next,
1366 bi0, bi1, next0, next1);
1369 while (n_left_from > 0 && n_left_to_next > 0)
1373 u32 next0, sw_if_index0, rx_fib_index0, iph_offset0 = 0, proto0,
1374 new_addr0, old_addr0;
1375 u16 old_port0, new_port0;
1379 icmp46_header_t *icmp0;
1380 snat_session_t *s0 = 0;
1381 clib_bihash_kv_16_8_t kv0, value0;
1384 /* speculatively enqueue b0 to the current next frame */
1390 n_left_to_next -= 1;
1392 b0 = vlib_get_buffer (vm, bi0);
1394 if (is_output_feature)
1396 // output feature fast path is enabled on the arc
1397 // we need new arc_next feature
1398 if (PREDICT_TRUE (!is_slow_path))
1399 vnet_feature_next (&nat_buffer_opaque (b0)->arc_next, b0);
1401 iph_offset0 = vnet_buffer (b0)->ip.save_rewrite_length;
1404 next0 = nat_buffer_opaque (b0)->arc_next;
1406 ip0 = (ip4_header_t *) ((u8 *) vlib_buffer_get_current (b0) +
1409 sw_if_index0 = vnet_buffer (b0)->sw_if_index[VLIB_RX];
1411 fib_table_get_index_for_sw_if_index (FIB_PROTOCOL_IP4,
1414 if (PREDICT_FALSE (ip0->ttl == 1))
1416 vnet_buffer (b0)->sw_if_index[VLIB_TX] = (u32) ~ 0;
1417 icmp4_error_set_vnet_buffer (b0, ICMP4_time_exceeded,
1418 ICMP4_time_exceeded_ttl_exceeded_in_transit,
1420 next0 = NAT_NEXT_ICMP_ERROR;
1424 udp0 = ip4_next_header (ip0);
1425 tcp0 = (tcp_header_t *) udp0;
1426 icmp0 = (icmp46_header_t *) udp0;
1427 proto0 = ip_proto_to_snat_proto (ip0->protocol);
1431 if (PREDICT_FALSE (proto0 == ~0))
1433 s0 = nat44_ed_in2out_unknown_proto (sm, b0, ip0,
1435 thread_index, now, vm,
1438 next0 = NAT_NEXT_DROP;
1443 if (PREDICT_FALSE (proto0 == SNAT_PROTOCOL_ICMP))
1445 next0 = icmp_in2out_ed_slow_path
1446 (sm, b0, ip0, icmp0, sw_if_index0, rx_fib_index0, node,
1447 next0, now, thread_index, &s0);
1454 if (PREDICT_FALSE (proto0 == ~0))
1460 if (ip4_is_fragment (ip0))
1467 if (is_output_feature)
1470 (nat_not_translate_output_feature_fwd
1471 (sm, ip0, thread_index, now, vm, b0)))
1475 if (PREDICT_FALSE (proto0 == SNAT_PROTOCOL_ICMP))
1482 make_ed_kv (&kv0, &ip0->src_address, &ip0->dst_address,
1483 ip0->protocol, rx_fib_index0, udp0->src_port,
1486 if (clib_bihash_search_16_8 (&tsm->in2out_ed, &kv0, &value0))
1490 if (is_output_feature)
1493 (nat44_ed_not_translate_output_feature
1494 (sm, ip0, ip0->protocol, udp0->src_port,
1495 udp0->dst_port, thread_index, sw_if_index0,
1496 vnet_buffer (b0)->sw_if_index[VLIB_TX])))
1501 if (PREDICT_FALSE (nat44_ed_not_translate (sm, node,
1510 slow_path_ed (sm, b0, rx_fib_index0, &kv0, &s0, node,
1511 next0, thread_index, now, tcp0);
1513 if (PREDICT_FALSE (next0 == NAT_NEXT_DROP))
1516 if (PREDICT_FALSE (!s0))
1527 s0 = pool_elt_at_index (tsm->sessions, value0.value);
1530 b0->flags |= VNET_BUFFER_F_IS_NATED;
1532 if (!is_output_feature)
1533 vnet_buffer (b0)->sw_if_index[VLIB_TX] = s0->out2in.fib_index;
1535 old_addr0 = ip0->src_address.as_u32;
1536 new_addr0 = ip0->src_address.as_u32 = s0->out2in.addr.as_u32;
1537 sum0 = ip0->checksum;
1538 sum0 = ip_csum_update (sum0, old_addr0, new_addr0, ip4_header_t,
1540 if (PREDICT_FALSE (is_twice_nat_session (s0)))
1541 sum0 = ip_csum_update (sum0, ip0->dst_address.as_u32,
1542 s0->ext_host_addr.as_u32, ip4_header_t,
1544 ip0->checksum = ip_csum_fold (sum0);
1546 old_port0 = udp0->src_port;
1547 new_port0 = udp0->src_port = s0->out2in.port;
1549 if (PREDICT_TRUE (proto0 == SNAT_PROTOCOL_TCP))
1551 sum0 = tcp0->checksum;
1552 sum0 = ip_csum_update (sum0, old_addr0, new_addr0, ip4_header_t,
1554 sum0 = ip_csum_update (sum0, old_port0, new_port0, ip4_header_t,
1556 if (PREDICT_FALSE (is_twice_nat_session (s0)))
1558 sum0 = ip_csum_update (sum0, ip0->dst_address.as_u32,
1559 s0->ext_host_addr.as_u32,
1560 ip4_header_t, dst_address);
1561 sum0 = ip_csum_update (sum0, tcp0->dst_port,
1562 s0->ext_host_port, ip4_header_t,
1564 tcp0->dst_port = s0->ext_host_port;
1565 ip0->dst_address.as_u32 = s0->ext_host_addr.as_u32;
1567 mss_clamping (sm, tcp0, &sum0);
1568 tcp0->checksum = ip_csum_fold (sum0);
1570 if (nat44_set_tcp_session_state_i2o
1571 (sm, s0, tcp0, thread_index))
1574 else if (udp0->checksum)
1576 sum0 = udp0->checksum;
1577 sum0 = ip_csum_update (sum0, old_addr0, new_addr0, ip4_header_t,
1579 sum0 = ip_csum_update (sum0, old_port0, new_port0, ip4_header_t,
1581 if (PREDICT_FALSE (is_twice_nat_session (s0)))
1583 sum0 = ip_csum_update (sum0, ip0->dst_address.as_u32,
1584 s0->ext_host_addr.as_u32,
1585 ip4_header_t, dst_address);
1586 sum0 = ip_csum_update (sum0, tcp0->dst_port,
1587 s0->ext_host_port, ip4_header_t,
1589 udp0->dst_port = s0->ext_host_port;
1590 ip0->dst_address.as_u32 = s0->ext_host_addr.as_u32;
1592 udp0->checksum = ip_csum_fold (sum0);
1597 if (PREDICT_FALSE (is_twice_nat_session (s0)))
1599 udp0->dst_port = s0->ext_host_port;
1600 ip0->dst_address.as_u32 = s0->ext_host_addr.as_u32;
1606 nat44_session_update_counters (s0, now,
1607 vlib_buffer_length_in_chain (vm, b0),
1609 /* Per-user LRU list maintenance */
1610 nat44_session_update_lru (sm, s0, thread_index);
1613 if (PREDICT_FALSE ((node->flags & VLIB_NODE_FLAG_TRACE)
1614 && (b0->flags & VLIB_BUFFER_IS_TRACED)))
1616 nat_in2out_ed_trace_t *t =
1617 vlib_add_trace (vm, node, b0, sizeof (*t));
1618 t->is_slow_path = is_slow_path;
1619 t->sw_if_index = sw_if_index0;
1620 t->next_index = next0;
1621 t->session_index = ~0;
1623 t->session_index = s0 - tsm->sessions;
1626 pkts_processed += next0 == nat_buffer_opaque (b0)->arc_next;
1628 /* verify speculative enqueue, maybe switch current next frame */
1629 vlib_validate_buffer_enqueue_x1 (vm, node, next_index,
1630 to_next, n_left_to_next,
1634 vlib_put_next_frame (vm, node, next_index, n_left_to_next);
1637 vlib_node_increment_counter (vm, stats_node_index,
1638 NAT_IN2OUT_ED_ERROR_IN2OUT_PACKETS,
1640 vlib_node_increment_counter (vm, stats_node_index,
1641 NAT_IN2OUT_ED_ERROR_TCP_PACKETS, tcp_packets);
1642 vlib_node_increment_counter (vm, stats_node_index,
1643 NAT_IN2OUT_ED_ERROR_UDP_PACKETS, udp_packets);
1644 vlib_node_increment_counter (vm, stats_node_index,
1645 NAT_IN2OUT_ED_ERROR_ICMP_PACKETS,
1647 vlib_node_increment_counter (vm, stats_node_index,
1648 NAT_IN2OUT_ED_ERROR_OTHER_PACKETS,
1650 vlib_node_increment_counter (vm, stats_node_index,
1651 NAT_IN2OUT_ED_ERROR_FRAGMENTS, fragments);
1653 return frame->n_vectors;
1657 nat44_ed_in2out_reass_node_fn_inline (vlib_main_t * vm,
1658 vlib_node_runtime_t * node,
1659 vlib_frame_t * frame,
1660 int is_output_feature)
1662 u32 n_left_from, *from, *to_next;
1663 nat_next_t next_index;
1664 u32 pkts_processed = 0, cached_fragments = 0;
1665 snat_main_t *sm = &snat_main;
1666 f64 now = vlib_time_now (vm);
1667 u32 thread_index = vm->thread_index;
1668 snat_main_per_thread_data_t *per_thread_data =
1669 &sm->per_thread_data[thread_index];
1670 u32 *fragments_to_drop = 0;
1671 u32 *fragments_to_loopback = 0;
1673 from = vlib_frame_vector_args (frame);
1674 n_left_from = frame->n_vectors;
1675 next_index = node->cached_next_index;
1677 while (n_left_from > 0)
1681 vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
1683 while (n_left_from > 0 && n_left_to_next > 0)
1685 u32 bi0, sw_if_index0, proto0, rx_fib_index0, new_addr0, old_addr0;
1686 u32 iph_offset0 = 0;
1690 ip4_header_t *ip0 = 0;
1691 nat_reass_ip4_t *reass0;
1694 icmp46_header_t *icmp0;
1695 clib_bihash_kv_16_8_t kv0, value0;
1696 snat_session_t *s0 = 0;
1697 u16 old_port0, new_port0;
1700 /* speculatively enqueue b0 to the current next frame */
1706 n_left_to_next -= 1;
1708 b0 = vlib_get_buffer (vm, bi0);
1710 next0 = nat_buffer_opaque (b0)->arc_next;
1712 sw_if_index0 = vnet_buffer (b0)->sw_if_index[VLIB_RX];
1714 fib_table_get_index_for_sw_if_index (FIB_PROTOCOL_IP4,
1717 if (PREDICT_FALSE (nat_reass_is_drop_frag (0)))
1719 next0 = NAT_NEXT_DROP;
1720 b0->error = node->errors[NAT_IN2OUT_ED_ERROR_DROP_FRAGMENT];
1724 if (is_output_feature)
1725 iph_offset0 = vnet_buffer (b0)->ip.save_rewrite_length;
1727 ip0 = (ip4_header_t *) ((u8 *) vlib_buffer_get_current (b0) +
1730 udp0 = ip4_next_header (ip0);
1731 tcp0 = (tcp_header_t *) udp0;
1732 icmp0 = (icmp46_header_t *) udp0;
1733 proto0 = ip_proto_to_snat_proto (ip0->protocol);
1735 reass0 = nat_ip4_reass_find_or_create (ip0->src_address,
1739 1, &fragments_to_drop);
1741 if (PREDICT_FALSE (!reass0))
1743 next0 = NAT_NEXT_DROP;
1744 b0->error = node->errors[NAT_IN2OUT_ED_ERROR_MAX_REASS];
1745 nat_elog_notice ("maximum reassemblies exceeded");
1749 if (PREDICT_FALSE (ip4_is_first_fragment (ip0)))
1751 if (PREDICT_FALSE (proto0 == SNAT_PROTOCOL_ICMP))
1753 if (is_output_feature)
1756 (nat_not_translate_output_feature_fwd
1757 (sm, ip0, thread_index, now, vm, b0)))
1758 reass0->flags |= NAT_REASS_FLAG_ED_DONT_TRANSLATE;
1762 next0 = icmp_in2out_ed_slow_path
1763 (sm, b0, ip0, icmp0, sw_if_index0, rx_fib_index0, node,
1764 next0, now, thread_index, &s0);
1766 if (PREDICT_TRUE (next0 != NAT_NEXT_DROP))
1769 reass0->sess_index = s0 - per_thread_data->sessions;
1771 reass0->flags |= NAT_REASS_FLAG_ED_DONT_TRANSLATE;
1772 nat_ip4_reass_get_frags (reass0,
1773 &fragments_to_loopback);
1779 make_ed_kv (&kv0, &ip0->src_address, &ip0->dst_address,
1780 ip0->protocol, rx_fib_index0, udp0->src_port,
1783 if (clib_bihash_search_16_8
1784 (&per_thread_data->in2out_ed, &kv0, &value0))
1786 if (is_output_feature)
1789 (nat44_ed_not_translate_output_feature
1790 (sm, ip0, ip0->protocol, udp0->src_port,
1791 udp0->dst_port, thread_index, sw_if_index0,
1792 vnet_buffer (b0)->sw_if_index[VLIB_TX])))
1794 reass0->flags |= NAT_REASS_FLAG_ED_DONT_TRANSLATE;
1795 nat_ip4_reass_get_frags (reass0,
1796 &fragments_to_loopback);
1802 if (PREDICT_FALSE (nat44_ed_not_translate (sm, node,
1808 reass0->flags |= NAT_REASS_FLAG_ED_DONT_TRANSLATE;
1809 nat_ip4_reass_get_frags (reass0,
1810 &fragments_to_loopback);
1815 next0 = slow_path_ed (sm, b0, rx_fib_index0, &kv0,
1816 &s0, node, next0, thread_index, now,
1819 if (PREDICT_FALSE (next0 == NAT_NEXT_DROP))
1822 if (PREDICT_FALSE (!s0))
1824 reass0->flags |= NAT_REASS_FLAG_ED_DONT_TRANSLATE;
1828 reass0->sess_index = s0 - per_thread_data->sessions;
1832 s0 = pool_elt_at_index (per_thread_data->sessions,
1834 reass0->sess_index = value0.value;
1836 nat_ip4_reass_get_frags (reass0, &fragments_to_loopback);
1840 if (reass0->flags & NAT_REASS_FLAG_ED_DONT_TRANSLATE)
1842 if (PREDICT_FALSE (reass0->sess_index == (u32) ~ 0))
1844 if (nat_ip4_reass_add_fragment
1845 (thread_index, reass0, bi0, &fragments_to_drop))
1847 b0->error = node->errors[NAT_IN2OUT_ED_ERROR_MAX_FRAG];
1849 ("maximum fragments per reassembly exceeded");
1850 next0 = NAT_NEXT_DROP;
1856 s0 = pool_elt_at_index (per_thread_data->sessions,
1857 reass0->sess_index);
1860 old_addr0 = ip0->src_address.as_u32;
1861 ip0->src_address = s0->out2in.addr;
1862 new_addr0 = ip0->src_address.as_u32;
1863 if (!is_output_feature)
1864 vnet_buffer (b0)->sw_if_index[VLIB_TX] = s0->out2in.fib_index;
1866 sum0 = ip0->checksum;
1867 sum0 = ip_csum_update (sum0, old_addr0, new_addr0,
1869 src_address /* changed member */ );
1870 if (PREDICT_FALSE (is_twice_nat_session (s0)))
1871 sum0 = ip_csum_update (sum0, ip0->dst_address.as_u32,
1872 s0->ext_host_addr.as_u32, ip4_header_t,
1874 ip0->checksum = ip_csum_fold (sum0);
1876 if (PREDICT_FALSE (ip4_is_first_fragment (ip0)))
1878 old_port0 = udp0->src_port;
1879 new_port0 = udp0->src_port = s0->out2in.port;
1881 if (PREDICT_TRUE (proto0 == SNAT_PROTOCOL_TCP))
1883 sum0 = tcp0->checksum;
1884 sum0 = ip_csum_update (sum0, old_addr0, new_addr0,
1886 dst_address /* changed member */ );
1887 sum0 = ip_csum_update (sum0, old_port0, new_port0,
1888 ip4_header_t /* cheat */ ,
1889 length /* changed member */ );
1890 if (PREDICT_FALSE (is_twice_nat_session (s0)))
1892 sum0 = ip_csum_update (sum0, ip0->dst_address.as_u32,
1893 s0->ext_host_addr.as_u32,
1894 ip4_header_t, dst_address);
1895 sum0 = ip_csum_update (sum0, tcp0->dst_port,
1896 s0->ext_host_port, ip4_header_t,
1898 tcp0->dst_port = s0->ext_host_port;
1899 ip0->dst_address.as_u32 = s0->ext_host_addr.as_u32;
1901 tcp0->checksum = ip_csum_fold (sum0);
1903 else if (udp0->checksum)
1905 sum0 = udp0->checksum;
1907 ip_csum_update (sum0, old_addr0, new_addr0, ip4_header_t,
1910 ip_csum_update (sum0, old_port0, new_port0, ip4_header_t,
1912 if (PREDICT_FALSE (is_twice_nat_session (s0)))
1914 sum0 = ip_csum_update (sum0, ip0->dst_address.as_u32,
1915 s0->ext_host_addr.as_u32,
1916 ip4_header_t, dst_address);
1917 sum0 = ip_csum_update (sum0, tcp0->dst_port,
1918 s0->ext_host_port, ip4_header_t,
1920 udp0->dst_port = s0->ext_host_port;
1921 ip0->dst_address.as_u32 = s0->ext_host_addr.as_u32;
1923 udp0->checksum = ip_csum_fold (sum0);
1927 if (PREDICT_FALSE (is_twice_nat_session (s0)))
1929 udp0->dst_port = s0->ext_host_port;
1930 ip0->dst_address.as_u32 = s0->ext_host_addr.as_u32;
1936 nat44_reass_hairpinning (sm, b0, ip0, s0->out2in.port,
1937 s0->ext_host_port, proto0, 1);
1940 nat44_session_update_counters (s0, now,
1941 vlib_buffer_length_in_chain (vm, b0),
1943 /* Per-user LRU list maintenance */
1944 nat44_session_update_lru (sm, s0, thread_index);
1947 if (PREDICT_FALSE ((node->flags & VLIB_NODE_FLAG_TRACE)
1948 && (b0->flags & VLIB_BUFFER_IS_TRACED)))
1950 nat44_reass_trace_t *t =
1951 vlib_add_trace (vm, node, b0, sizeof (*t));
1952 t->cached = cached0;
1953 t->sw_if_index = sw_if_index0;
1954 t->next_index = next0;
1965 pkts_processed += next0 == nat_buffer_opaque (b0)->arc_next;
1967 /* verify speculative enqueue, maybe switch current next frame */
1968 vlib_validate_buffer_enqueue_x1 (vm, node, next_index,
1969 to_next, n_left_to_next,
1973 if (n_left_from == 0 && vec_len (fragments_to_loopback))
1975 from = vlib_frame_vector_args (frame);
1976 u32 len = vec_len (fragments_to_loopback);
1977 if (len <= VLIB_FRAME_SIZE)
1979 clib_memcpy_fast (from, fragments_to_loopback,
1980 sizeof (u32) * len);
1982 vec_reset_length (fragments_to_loopback);
1986 clib_memcpy_fast (from, fragments_to_loopback +
1987 (len - VLIB_FRAME_SIZE),
1988 sizeof (u32) * VLIB_FRAME_SIZE);
1989 n_left_from = VLIB_FRAME_SIZE;
1990 _vec_len (fragments_to_loopback) = len - VLIB_FRAME_SIZE;
1995 vlib_put_next_frame (vm, node, next_index, n_left_to_next);
1998 vlib_node_increment_counter (vm, sm->ed_in2out_reass_node_index,
1999 NAT_IN2OUT_ED_ERROR_PROCESSED_FRAGMENTS,
2001 vlib_node_increment_counter (vm, sm->ed_in2out_reass_node_index,
2002 NAT_IN2OUT_ED_ERROR_CACHED_FRAGMENTS,
2005 nat_send_all_to_node (vm, fragments_to_drop, node,
2006 &node->errors[NAT_IN2OUT_ED_ERROR_DROP_FRAGMENT],
2009 vec_free (fragments_to_drop);
2010 vec_free (fragments_to_loopback);
2011 return frame->n_vectors;
2014 VLIB_NODE_FN (nat44_ed_in2out_node) (vlib_main_t * vm,
2015 vlib_node_runtime_t * node,
2016 vlib_frame_t * frame)
2018 return nat44_ed_in2out_node_fn_inline (vm, node, frame, 0, 0);
2022 VLIB_REGISTER_NODE (nat44_ed_in2out_node) = {
2023 .name = "nat44-ed-in2out",
2024 .vector_size = sizeof (u32),
2025 .sibling_of = "nat-default",
2026 .format_trace = format_nat_in2out_ed_trace,
2027 .type = VLIB_NODE_TYPE_INTERNAL,
2028 .n_errors = ARRAY_LEN (nat_in2out_ed_error_strings),
2029 .error_strings = nat_in2out_ed_error_strings,
2030 .runtime_data_bytes = sizeof (snat_runtime_t),
2034 VLIB_NODE_FN (nat44_ed_in2out_output_node) (vlib_main_t * vm,
2035 vlib_node_runtime_t * node,
2036 vlib_frame_t * frame)
2038 return nat44_ed_in2out_node_fn_inline (vm, node, frame, 0, 1);
2042 VLIB_REGISTER_NODE (nat44_ed_in2out_output_node) = {
2043 .name = "nat44-ed-in2out-output",
2044 .vector_size = sizeof (u32),
2045 .sibling_of = "nat-default",
2046 .format_trace = format_nat_in2out_ed_trace,
2047 .type = VLIB_NODE_TYPE_INTERNAL,
2048 .n_errors = ARRAY_LEN (nat_in2out_ed_error_strings),
2049 .error_strings = nat_in2out_ed_error_strings,
2050 .runtime_data_bytes = sizeof (snat_runtime_t),
2054 VLIB_NODE_FN (nat44_ed_in2out_slowpath_node) (vlib_main_t * vm,
2055 vlib_node_runtime_t * node,
2056 vlib_frame_t * frame)
2058 return nat44_ed_in2out_node_fn_inline (vm, node, frame, 1, 0);
2062 VLIB_REGISTER_NODE (nat44_ed_in2out_slowpath_node) = {
2063 .name = "nat44-ed-in2out-slowpath",
2064 .vector_size = sizeof (u32),
2065 .sibling_of = "nat-default",
2066 .format_trace = format_nat_in2out_ed_trace,
2067 .type = VLIB_NODE_TYPE_INTERNAL,
2068 .n_errors = ARRAY_LEN (nat_in2out_ed_error_strings),
2069 .error_strings = nat_in2out_ed_error_strings,
2070 .runtime_data_bytes = sizeof (snat_runtime_t),
2074 VLIB_NODE_FN (nat44_ed_in2out_output_slowpath_node) (vlib_main_t * vm,
2075 vlib_node_runtime_t *
2077 vlib_frame_t * frame)
2079 return nat44_ed_in2out_node_fn_inline (vm, node, frame, 1, 1);
2083 VLIB_REGISTER_NODE (nat44_ed_in2out_output_slowpath_node) = {
2084 .name = "nat44-ed-in2out-output-slowpath",
2085 .vector_size = sizeof (u32),
2086 .sibling_of = "nat-default",
2087 .format_trace = format_nat_in2out_ed_trace,
2088 .type = VLIB_NODE_TYPE_INTERNAL,
2089 .n_errors = ARRAY_LEN (nat_in2out_ed_error_strings),
2090 .error_strings = nat_in2out_ed_error_strings,
2091 .runtime_data_bytes = sizeof (snat_runtime_t),
2096 VLIB_NODE_FN (nat44_ed_in2out_reass_node) (vlib_main_t * vm,
2097 vlib_node_runtime_t * node,
2098 vlib_frame_t * frame)
2100 return nat44_ed_in2out_reass_node_fn_inline (vm, node, frame, 0);
2104 VLIB_REGISTER_NODE (nat44_ed_in2out_reass_node) = {
2105 .name = "nat44-ed-in2out-reass",
2106 .vector_size = sizeof (u32),
2107 .sibling_of = "nat-default",
2108 .format_trace = format_nat44_reass_trace,
2109 .type = VLIB_NODE_TYPE_INTERNAL,
2110 .n_errors = ARRAY_LEN (nat_in2out_ed_error_strings),
2111 .error_strings = nat_in2out_ed_error_strings,
2115 VLIB_NODE_FN (nat44_ed_in2out_reass_output_node) (vlib_main_t * vm,
2116 vlib_node_runtime_t * node,
2117 vlib_frame_t * frame)
2119 return nat44_ed_in2out_reass_node_fn_inline (vm, node, frame, 1);
2123 VLIB_REGISTER_NODE (nat44_ed_in2out_reass_output_node) = {
2124 .name = "nat44-ed-in2out-reass-output",
2125 .vector_size = sizeof (u32),
2126 .sibling_of = "nat-default",
2127 .format_trace = format_nat44_reass_trace,
2128 .type = VLIB_NODE_TYPE_INTERNAL,
2129 .n_errors = ARRAY_LEN (nat_in2out_ed_error_strings),
2130 .error_strings = nat_in2out_ed_error_strings,
2135 format_nat_pre_trace (u8 * s, va_list * args)
2137 CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
2138 CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
2139 nat_pre_trace_t *t = va_arg (*args, nat_pre_trace_t *);
2140 return format (s, "in2out next_index %d", t->next_index);
2143 VLIB_NODE_FN (nat_pre_in2out_node) (vlib_main_t * vm,
2144 vlib_node_runtime_t * node,
2145 vlib_frame_t * frame)
2147 return nat_pre_node_fn_inline (vm, node, frame,
2148 NAT_NEXT_IN2OUT_ED_FAST_PATH);
2152 VLIB_REGISTER_NODE (nat_pre_in2out_node) = {
2153 .name = "nat-pre-in2out",
2154 .vector_size = sizeof (u32),
2155 .sibling_of = "nat-default",
2156 .format_trace = format_nat_pre_trace,
2157 .type = VLIB_NODE_TYPE_INTERNAL,
2163 * fd.io coding-style-patch-verification: ON
2166 * eval: (c-set-style "gnu")