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 NAT formatting
21 #include <nat/nat_inlines.h>
24 unformat_nat_protocol (unformat_input_t * input, va_list * args)
26 u32 *r = va_arg (*args, u32 *);
29 #define _(N, i, n, s) else if (unformat (input, s)) *r = NAT_PROTOCOL_##N;
38 format_nat_protocol (u8 * s, va_list * args)
40 u32 i = va_arg (*args, u32);
45 #define _(N, j, n, str) case NAT_PROTOCOL_##N: t = (u8 *) str; break;
49 s = format (s, "unknown");
52 s = format (s, "%s", t);
57 format_nat_addr_and_port_alloc_alg (u8 * s, va_list * args)
59 u32 i = va_arg (*args, u32);
64 #define _(v, N, s) case NAT_ADDR_AND_PORT_ALLOC_ALG_##N: t = (u8 *) s; break;
65 foreach_nat_addr_and_port_alloc_alg
68 s = format (s, "unknown");
71 s = format (s, "%s", t);
76 format_snat_key (u8 * s, va_list * args)
78 u64 key = va_arg (*args, u64);
82 nat_protocol_t protocol;
85 split_nat_key (key, &addr, &port, &fib_index, &protocol);
87 s = format (s, "%U proto %U port %d fib %d",
88 format_ip4_address, &addr,
89 format_nat_protocol, protocol,
90 clib_net_to_host_u16 (port), fib_index);
95 format_snat_session_state (u8 * s, va_list * args)
97 u32 i = va_arg (*args, u32);
102 #define _(v, N, str) case SNAT_SESSION_##N: t = (u8 *) str; break;
103 foreach_snat_session_state
106 t = format (t, "unknown");
108 s = format (s, "%s", t);
113 format_snat_session (u8 * s, va_list * args)
115 snat_main_per_thread_data_t *tsm =
116 va_arg (*args, snat_main_per_thread_data_t *);
117 snat_session_t *sess = va_arg (*args, snat_session_t *);
119 if (snat_is_unk_proto_session (sess))
121 s = format (s, " i2o %U proto %u fib %u\n",
122 format_ip4_address, &sess->in2out.addr,
123 sess->in2out.port, sess->in2out.fib_index);
125 format (s, " o2i %U proto %u fib %u\n", format_ip4_address,
126 &sess->out2in.addr, sess->out2in.port, sess->out2in.fib_index);
130 s = format (s, " i2o %U proto %U port %d fib %d\n",
131 format_ip4_address, &sess->in2out.addr,
132 format_nat_protocol, sess->nat_proto,
133 clib_net_to_host_u16 (sess->in2out.port),
134 sess->in2out.fib_index);
135 s = format (s, " o2i %U proto %U port %d fib %d\n",
136 format_ip4_address, &sess->out2in.addr, format_nat_protocol,
137 sess->nat_proto, clib_net_to_host_u16 (sess->out2in.port),
138 sess->out2in.fib_index);
140 if (is_ed_session (sess) || is_fwd_bypass_session (sess))
142 if (is_twice_nat_session (sess))
144 s = format (s, " external host o2i %U:%d i2o %U:%d\n",
145 format_ip4_address, &sess->ext_host_addr,
146 clib_net_to_host_u16 (sess->ext_host_port),
147 format_ip4_address, &sess->ext_host_nat_addr,
148 clib_net_to_host_u16 (sess->ext_host_nat_port));
152 if (sess->ext_host_addr.as_u32)
153 s = format (s, " external host %U:%u\n",
154 format_ip4_address, &sess->ext_host_addr,
155 clib_net_to_host_u16 (sess->ext_host_port));
157 s = format (s, " i2o flow: %U\n", format_nat_6t_flow, &sess->i2o);
158 s = format (s, " o2i flow: %U\n", format_nat_6t_flow, &sess->o2i);
160 s = format (s, " index %llu\n", sess - tsm->sessions);
161 s = format (s, " last heard %.2f\n", sess->last_heard);
162 s = format (s, " total pkts %d, total bytes %lld\n",
163 sess->total_pkts, sess->total_bytes);
164 if (snat_is_session_static (sess))
165 s = format (s, " static translation\n");
167 s = format (s, " dynamic translation\n");
168 if (is_fwd_bypass_session (sess))
169 s = format (s, " forwarding-bypass\n");
170 if (is_lb_session (sess))
171 s = format (s, " load-balancing\n");
172 if (is_twice_nat_session (sess))
173 s = format (s, " twice-nat\n");
179 format_snat_user (u8 * s, va_list * args)
181 snat_main_per_thread_data_t *tsm =
182 va_arg (*args, snat_main_per_thread_data_t *);
183 snat_user_t *u = va_arg (*args, snat_user_t *);
184 int verbose = va_arg (*args, int);
185 dlist_elt_t *head, *elt;
186 u32 elt_index, head_index;
188 snat_session_t *sess;
190 s = format (s, "%U: %d dynamic translations, %d static translations\n",
191 format_ip4_address, &u->addr, u->nsessions, u->nstaticsessions);
196 if (u->nsessions || u->nstaticsessions)
198 head_index = u->sessions_per_user_list_head_index;
199 head = pool_elt_at_index (tsm->list_pool, head_index);
201 elt_index = head->next;
202 elt = pool_elt_at_index (tsm->list_pool, elt_index);
203 session_index = elt->value;
205 while (session_index != ~0)
207 sess = pool_elt_at_index (tsm->sessions, session_index);
209 s = format (s, " %U\n", format_snat_session, tsm, sess);
211 elt_index = elt->next;
212 elt = pool_elt_at_index (tsm->list_pool, elt_index);
213 session_index = elt->value;
221 format_snat_static_mapping (u8 * s, va_list * args)
223 snat_static_mapping_t *m = va_arg (*args, snat_static_mapping_t *);
224 nat44_lb_addr_port_t *local;
226 if (is_identity_static_mapping (m))
228 if (is_addr_only_static_mapping (m))
229 s = format (s, "identity mapping %U",
230 format_ip4_address, &m->local_addr);
232 s = format (s, "identity mapping %U %U:%d",
233 format_nat_protocol, m->proto,
234 format_ip4_address, &m->local_addr,
235 clib_net_to_host_u16 (m->local_port));
238 pool_foreach (local, m->locals)
240 s = format (s, " vrf %d", local->vrf_id);
247 if (is_addr_only_static_mapping (m))
248 s = format (s, "local %U external %U vrf %d %s %s",
249 format_ip4_address, &m->local_addr,
250 format_ip4_address, &m->external_addr,
252 m->twice_nat == TWICE_NAT ? "twice-nat" :
253 m->twice_nat == TWICE_NAT_SELF ? "self-twice-nat" : "",
254 is_out2in_only_static_mapping (m) ? "out2in-only" : "");
257 if (is_lb_static_mapping (m))
259 s = format (s, "%U external %U:%d %s %s",
260 format_nat_protocol, m->proto,
261 format_ip4_address, &m->external_addr,
262 clib_net_to_host_u16 (m->external_port),
263 m->twice_nat == TWICE_NAT ? "twice-nat" :
264 m->twice_nat == TWICE_NAT_SELF ? "self-twice-nat" : "",
265 is_out2in_only_static_mapping (m) ? "out2in-only" : "");
268 pool_foreach (local, m->locals)
270 s = format (s, "\n local %U:%d vrf %d probability %d\%",
271 format_ip4_address, &local->addr,
272 clib_net_to_host_u16 (local->port),
273 local->vrf_id, local->probability);
279 s = format (s, "%U local %U:%d external %U:%d vrf %d %s %s",
280 format_nat_protocol, m->proto,
281 format_ip4_address, &m->local_addr,
282 clib_net_to_host_u16 (m->local_port),
283 format_ip4_address, &m->external_addr,
284 clib_net_to_host_u16 (m->external_port),
286 m->twice_nat == TWICE_NAT ? "twice-nat" :
287 m->twice_nat == TWICE_NAT_SELF ? "self-twice-nat" : "",
288 is_out2in_only_static_mapping (m) ? "out2in-only" : "");
294 format_snat_static_map_to_resolve (u8 * s, va_list * args)
296 snat_static_map_resolve_t *m = va_arg (*args, snat_static_map_resolve_t *);
297 vnet_main_t *vnm = vnet_get_main ();
300 s = format (s, "local %U external %U vrf %d",
301 format_ip4_address, &m->l_addr,
302 format_vnet_sw_if_index_name, vnm, m->sw_if_index, m->vrf_id);
304 s = format (s, "%U local %U:%d external %U:%d vrf %d",
305 format_nat_protocol, m->proto,
306 format_ip4_address, &m->l_addr,
307 clib_net_to_host_u16 (m->l_port),
308 format_vnet_sw_if_index_name, vnm, m->sw_if_index,
309 clib_net_to_host_u16 (m->e_port), m->vrf_id);
315 * fd.io coding-style-patch-verification: ON
318 * eval: (c-set-style "gnu")