2 * Copyright (c) 2017 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.
15 #include <nat/dslite/dslite.h>
18 dslite_add_del_pool_addr_command_fn (vlib_main_t * vm,
19 unformat_input_t * input,
20 vlib_cli_command_t * cmd)
22 dslite_main_t *dm = &dslite_main;
23 unformat_input_t _line_input, *line_input = &_line_input;
24 ip4_address_t start_addr, end_addr, this_addr;
25 u32 start_host_order, end_host_order;
28 clib_error_t *error = 0;
30 /* Get a line of input. */
31 if (!unformat_user (input, unformat_line_input, line_input))
34 while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
36 if (unformat (line_input, "%U - %U",
37 unformat_ip4_address, &start_addr,
38 unformat_ip4_address, &end_addr))
40 else if (unformat (line_input, "%U", unformat_ip4_address, &start_addr))
41 end_addr = start_addr;
42 else if (unformat (line_input, "del"))
46 error = clib_error_return (0, "unknown input '%U'",
47 format_unformat_error, line_input);
52 start_host_order = clib_host_to_net_u32 (start_addr.as_u32);
53 end_host_order = clib_host_to_net_u32 (end_addr.as_u32);
55 if (end_host_order < start_host_order)
57 error = clib_error_return (0, "end address less than start address");
61 count = (end_host_order - start_host_order) + 1;
62 this_addr = start_addr;
64 rv = nat_add_del_ip4_pool_addrs (&dm->pool, this_addr, count, is_add, 0);
68 case VNET_API_ERROR_NO_SUCH_ENTRY:
70 clib_error_return (0, "DS-Lite pool address %U not exist.",
71 format_ip4_address, &this_addr);
73 case VNET_API_ERROR_VALUE_EXIST:
75 clib_error_return (0, "DS-Lite pool address %U exist.",
76 format_ip4_address, &this_addr);
81 unformat_free (line_input);
87 dslite_show_pool_command_fn (vlib_main_t * vm,
88 unformat_input_t * input,
89 vlib_cli_command_t * cmd)
91 dslite_main_t *dm = &dslite_main;
92 nat_ip4_pool_addr_t *a;
94 vlib_cli_output (vm, "DS-Lite pool:");
97 vec_foreach (a, dm->pool.pool_addr)
99 vlib_cli_output (vm, "%U", format_ip4_address, &a->addr);
105 static clib_error_t *
106 dslite_set_aftr_tunnel_addr_command_fn (vlib_main_t * vm,
107 unformat_input_t * input,
108 vlib_cli_command_t * cmd)
110 dslite_main_t *dm = &dslite_main;
111 unformat_input_t _line_input, *line_input = &_line_input;
112 ip6_address_t ip6_addr;
114 clib_error_t *error = 0;
116 /* Get a line of input. */
117 if (!unformat_user (input, unformat_line_input, line_input))
120 while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
122 if (unformat (line_input, "%U", unformat_ip6_address, &ip6_addr))
126 error = clib_error_return (0, "unknown input '%U'",
127 format_unformat_error, line_input);
132 rv = dslite_set_aftr_ip6_addr (dm, &ip6_addr);
136 clib_error_return (0,
137 "Set DS-Lite AFTR tunnel endpoint address failed.");
140 unformat_free (line_input);
145 static clib_error_t *
146 dslite_show_aftr_ip6_addr_command_fn (vlib_main_t * vm,
147 unformat_input_t * input,
148 vlib_cli_command_t * cmd)
150 dslite_main_t *dm = &dslite_main;
152 vlib_cli_output (vm, "%U", format_ip6_address, &dm->aftr_ip6_addr);
156 static clib_error_t *
157 dslite_set_b4_tunnel_addr_command_fn (vlib_main_t * vm,
158 unformat_input_t * input,
159 vlib_cli_command_t * cmd)
161 dslite_main_t *dm = &dslite_main;
162 unformat_input_t _line_input, *line_input = &_line_input;
163 ip6_address_t ip6_addr;
165 clib_error_t *error = 0;
167 /* Get a line of input. */
168 if (!unformat_user (input, unformat_line_input, line_input))
171 while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
173 if (unformat (line_input, "%U", unformat_ip6_address, &ip6_addr))
177 error = clib_error_return (0, "unknown input '%U'",
178 format_unformat_error, line_input);
183 rv = dslite_set_b4_ip6_addr (dm, &ip6_addr);
187 clib_error_return (0, "Set DS-Lite B4 tunnel endpoint address failed.");
190 unformat_free (line_input);
195 static clib_error_t *
196 dslite_show_b4_ip6_addr_command_fn (vlib_main_t * vm,
197 unformat_input_t * input,
198 vlib_cli_command_t * cmd)
200 dslite_main_t *dm = &dslite_main;
202 vlib_cli_output (vm, "%U", format_ip6_address, &dm->b4_ip6_addr);
207 format_nat_protocol (u8 * s, va_list * args)
209 u32 i = va_arg (*args, u32);
214 #define _(N, j, n, str) case NAT_PROTOCOL_##N: t = (u8 *) str; break;
218 s = format (s, "unknown");
221 s = format (s, "%s", t);
226 format_dslite_session (u8 * s, va_list * args)
228 dslite_session_t *session = va_arg (*args, dslite_session_t *);
229 u32 indent = format_get_indent (s);
231 s = format (s, "%Uin %U:%u out %U:%u protocol %U\n",
232 format_white_space, indent + 2,
233 format_ip4_address, &session->in2out.addr,
234 clib_net_to_host_u16 (session->in2out.port),
235 format_ip4_address, &session->out2in.addr,
236 clib_net_to_host_u16 (session->out2in.port),
237 format_nat_protocol, session->in2out.proto);
238 s = format (s, "%Utotal pkts %d, total bytes %lld\n",
239 format_white_space, indent + 4,
240 session->total_pkts, session->total_bytes);
245 format_dslite_b4 (u8 * s, va_list * args)
247 dslite_per_thread_data_t *td = va_arg (*args, dslite_per_thread_data_t *);
248 dslite_b4_t *b4 = va_arg (*args, dslite_b4_t *);
249 dlist_elt_t *head, *elt;
250 u32 elt_index, head_index;
252 dslite_session_t *session;
255 format (s, "B4 %U %d sessions\n", format_ip6_address, &b4->addr,
258 if (b4->nsessions == 0)
261 head_index = b4->sessions_per_b4_list_head_index;
262 head = pool_elt_at_index (td->list_pool, head_index);
263 elt_index = head->next;
264 elt = pool_elt_at_index (td->list_pool, elt_index);
265 session_index = elt->value;
266 while (session_index != ~0)
268 session = pool_elt_at_index (td->sessions, session_index);
269 s = format (s, "%U", format_dslite_session, session);
270 elt_index = elt->next;
271 elt = pool_elt_at_index (td->list_pool, elt_index);
272 session_index = elt->value;
278 static clib_error_t *
279 dslite_show_sessions_command_fn (vlib_main_t * vm,
280 unformat_input_t * input,
281 vlib_cli_command_t * cmd)
283 dslite_main_t *dm = &dslite_main;
284 dslite_per_thread_data_t *td;
288 vec_foreach (td, dm->per_thread_data)
290 pool_foreach (b4, td->b4s,
292 vlib_cli_output (vm, "%U", format_dslite_b4, td, b4);
304 * @cliexstart{dslite add pool address}
305 * Add/delete DS-Lite pool address for AFTR element.
306 * To add DS-Lite pool address use:
307 * vpp# dslite add pool address 10.1.1.3
308 * To add DS-Lite pool address range use:
309 * vpp# dslite add pool address 10.1.1.5 - 10.1.1.7
312 VLIB_CLI_COMMAND (dslite_add_pool_address_command, static) = {
313 .path = "dslite add pool address",
314 .short_help = "dslite add pool address <ip4-range-start> [- <ip4-range-end>] "
316 .function = dslite_add_del_pool_addr_command_fn,
321 * @cliexstart{show dslite pool}
322 * Show DS-lite pool addresses.
323 * vpp# show dslite pool
331 VLIB_CLI_COMMAND (show_dslite_pool_command, static) = {
332 .path = "show dslite pool",
333 .short_help = "show dslite pool",
334 .function = dslite_show_pool_command_fn,
339 * @cliexstart{dslite set aftr-tunnel-endpoint-address}
340 * Set IPv6 tunnel endpoint address of the AFTR element.
341 * To set AFTR tunnel endpoint address use:
342 * vpp# dslite set aftr-tunnel-endpoint-address 2001:db8:85a3::8a2e:370:1
345 VLIB_CLI_COMMAND (dslite_set_aftr_tunnel_addr, static) = {
346 .path = "dslite set aftr-tunnel-endpoint-address",
347 .short_help = "dslite set aftr-tunnel-endpoint-address <ip6>",
348 .function = dslite_set_aftr_tunnel_addr_command_fn,
353 * @cliexstart{show dslite aftr-tunnel-endpoint-address}
354 * Show IPv6 tunnel endpoint address of the AFTR element.
355 * vpp# show dslite aftr-tunnel-endpoint-address
356 * 2001:db8:85a3::8a2e:370:1
359 VLIB_CLI_COMMAND (dslite_show_aftr_ip6_addr, static) = {
360 .path = "show dslite aftr-tunnel-endpoint-address",
361 .short_help = "show dslite aftr-tunnel-endpoint-address",
362 .function = dslite_show_aftr_ip6_addr_command_fn,
367 * @cliexstart{dslite set b4-tunnel-endpoint-address}
368 * Set IPv6 tunnel endpoint address of the B4 element.
369 * To set B4 tunnel endpoint address use:
370 * vpp# dslite set b4-tunnel-endpoint-address 2001:db8:62aa::375e:f4c1:1
373 VLIB_CLI_COMMAND (dslite_set_b4_tunnel_addr, static) = {
374 .path = "dslite set b4-tunnel-endpoint-address",
375 .short_help = "dslite set b4-tunnel-endpoint-address <ip6>",
376 .function = dslite_set_b4_tunnel_addr_command_fn,
381 * @cliexstart{show dslite b4-tunnel-endpoint-address}
382 * Show IPv6 tunnel endpoint address of the B4 element.
383 * vpp# show dslite b4-tunnel-endpoint-address
384 * 2001:db8:62aa::375e:f4c1:1
387 VLIB_CLI_COMMAND (dslite_show_b4_ip6_addr, static) = {
388 .path = "show dslite b4-tunnel-endpoint-address",
389 .short_help = "show dslite b4-tunnel-endpoint-address",
390 .function = dslite_show_b4_ip6_addr_command_fn,
395 * @cliexstart{show dslite sessions}
396 * Show DS-Lite sessions.
397 * vpp# show dslite sessions
398 * B4 fd01:2::2 1 sessions
399 * in 192.168.1.1:20000 out 10.0.0.3:16253 protocol udp
400 * total pkts 2, total bytes 136
401 * B4 fd01:2::3 2 sessions
402 * in 192.168.1.1:20001 out 10.0.0.3:18995 protocol tcp
403 * total pkts 2, total bytes 160
404 * in 192.168.1.1:4000 out 10.0.0.3:53893 protocol icmp
405 * total pkts 2, total bytes 136
408 VLIB_CLI_COMMAND (dslite_show_sessions, static) = {
409 .path = "show dslite sessions",
410 .short_help = "show dslite sessions",
411 .function = dslite_show_sessions_command_fn,
417 * fd.io coding-style-patch-verification: ON
420 * eval: (c-set-style "gnu")