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.
16 #include <nat/dslite.h>
19 dslite_add_del_pool_addr_command_fn (vlib_main_t * vm,
20 unformat_input_t * input,
21 vlib_cli_command_t * cmd)
23 dslite_main_t *dm = &dslite_main;
24 unformat_input_t _line_input, *line_input = &_line_input;
25 ip4_address_t start_addr, end_addr, this_addr;
26 u32 start_host_order, end_host_order;
29 clib_error_t *error = 0;
31 /* Get a line of input. */
32 if (!unformat_user (input, unformat_line_input, line_input))
35 while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
37 if (unformat (line_input, "%U - %U",
38 unformat_ip4_address, &start_addr,
39 unformat_ip4_address, &end_addr))
41 else if (unformat (line_input, "%U", unformat_ip4_address, &start_addr))
42 end_addr = start_addr;
43 else if (unformat (line_input, "del"))
47 error = clib_error_return (0, "unknown input '%U'",
48 format_unformat_error, line_input);
53 start_host_order = clib_host_to_net_u32 (start_addr.as_u32);
54 end_host_order = clib_host_to_net_u32 (end_addr.as_u32);
56 if (end_host_order < start_host_order)
58 error = clib_error_return (0, "end address less than start address");
62 count = (end_host_order - start_host_order) + 1;
63 this_addr = start_addr;
65 for (i = 0; i < count; i++)
67 rv = dslite_add_del_pool_addr (dm, &this_addr, is_add);
71 case VNET_API_ERROR_NO_SUCH_ENTRY:
73 clib_error_return (0, "DS-Lite pool address %U not exist.",
74 format_ip4_address, &this_addr);
76 case VNET_API_ERROR_VALUE_EXIST:
78 clib_error_return (0, "DS-Lite pool address %U exist.",
79 format_ip4_address, &this_addr);
85 increment_v4_address (&this_addr);
89 unformat_free (line_input);
95 dslite_show_pool_command_fn (vlib_main_t * vm,
96 unformat_input_t * input,
97 vlib_cli_command_t * cmd)
99 dslite_main_t *dm = &dslite_main;
102 vlib_cli_output (vm, "DS-Lite pool:");
105 vec_foreach (ap, dm->addr_pool)
107 vlib_cli_output (vm, "%U", format_ip4_address, &ap->addr);
113 static clib_error_t *
114 dslite_set_aftr_tunnel_addr_command_fn (vlib_main_t * vm,
115 unformat_input_t * input,
116 vlib_cli_command_t * cmd)
118 dslite_main_t *dm = &dslite_main;
119 unformat_input_t _line_input, *line_input = &_line_input;
120 ip6_address_t ip6_addr;
122 clib_error_t *error = 0;
124 /* Get a line of input. */
125 if (!unformat_user (input, unformat_line_input, line_input))
128 while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
130 if (unformat (line_input, "%U", unformat_ip6_address, &ip6_addr))
134 error = clib_error_return (0, "unknown input '%U'",
135 format_unformat_error, line_input);
140 rv = dslite_set_aftr_ip6_addr (dm, &ip6_addr);
144 clib_error_return (0,
145 "Set DS-Lite AFTR tunnel endpoint address failed.");
148 unformat_free (line_input);
153 static clib_error_t *
154 dslite_show_aftr_ip6_addr_command_fn (vlib_main_t * vm,
155 unformat_input_t * input,
156 vlib_cli_command_t * cmd)
158 dslite_main_t *dm = &dslite_main;
160 vlib_cli_output (vm, "%U", format_ip6_address, &dm->aftr_ip6_addr);
164 static clib_error_t *
165 dslite_set_b4_tunnel_addr_command_fn (vlib_main_t * vm,
166 unformat_input_t * input,
167 vlib_cli_command_t * cmd)
169 dslite_main_t *dm = &dslite_main;
170 unformat_input_t _line_input, *line_input = &_line_input;
171 ip6_address_t ip6_addr;
173 clib_error_t *error = 0;
175 /* Get a line of input. */
176 if (!unformat_user (input, unformat_line_input, line_input))
179 while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
181 if (unformat (line_input, "%U", unformat_ip6_address, &ip6_addr))
185 error = clib_error_return (0, "unknown input '%U'",
186 format_unformat_error, line_input);
191 rv = dslite_set_b4_ip6_addr (dm, &ip6_addr);
195 clib_error_return (0, "Set DS-Lite B4 tunnel endpoint address failed.");
198 unformat_free (line_input);
203 static clib_error_t *
204 dslite_show_b4_ip6_addr_command_fn (vlib_main_t * vm,
205 unformat_input_t * input,
206 vlib_cli_command_t * cmd)
208 dslite_main_t *dm = &dslite_main;
210 vlib_cli_output (vm, "%U", format_ip6_address, &dm->b4_ip6_addr);
215 format_dslite_session (u8 * s, va_list * args)
217 dslite_session_t *session = va_arg (*args, dslite_session_t *);
218 u32 indent = format_get_indent (s);
220 s = format (s, "%Uin %U:%u out %U:%u protocol %U\n",
221 format_white_space, indent + 2,
222 format_ip4_address, &session->in2out.addr,
223 clib_net_to_host_u16 (session->in2out.port),
224 format_ip4_address, &session->out2in.addr,
225 clib_net_to_host_u16 (session->out2in.port),
226 format_snat_protocol, session->in2out.proto);
227 s = format (s, "%Utotal pkts %d, total bytes %lld\n",
228 format_white_space, indent + 4,
229 session->total_pkts, session->total_bytes);
234 format_dslite_b4 (u8 * s, va_list * args)
236 dslite_per_thread_data_t *td = va_arg (*args, dslite_per_thread_data_t *);
237 dslite_b4_t *b4 = va_arg (*args, dslite_b4_t *);
238 dlist_elt_t *head, *elt;
239 u32 elt_index, head_index;
241 dslite_session_t *session;
244 format (s, "B4 %U %d sessions\n", format_ip6_address, &b4->addr,
247 if (b4->nsessions == 0)
250 head_index = b4->sessions_per_b4_list_head_index;
251 head = pool_elt_at_index (td->list_pool, head_index);
252 elt_index = head->next;
253 elt = pool_elt_at_index (td->list_pool, elt_index);
254 session_index = elt->value;
255 while (session_index != ~0)
257 session = pool_elt_at_index (td->sessions, session_index);
258 s = format (s, "%U", format_dslite_session, session);
259 elt_index = elt->next;
260 elt = pool_elt_at_index (td->list_pool, elt_index);
261 session_index = elt->value;
267 static clib_error_t *
268 dslite_show_sessions_command_fn (vlib_main_t * vm,
269 unformat_input_t * input,
270 vlib_cli_command_t * cmd)
272 dslite_main_t *dm = &dslite_main;
273 dslite_per_thread_data_t *td;
277 vec_foreach (td, dm->per_thread_data)
279 pool_foreach (b4, td->b4s,
281 vlib_cli_output (vm, "%U", format_dslite_b4, td, b4);
293 * @cliexstart{dslite add pool address}
294 * Add/delete DS-Lite pool address for AFTR element.
295 * To add DS-Lite pool address use:
296 * vpp# dslite add pool address 10.1.1.3
297 * To add DS-Lite pool address range use:
298 * vpp# dslite add pool address 10.1.1.5 - 10.1.1.7
301 VLIB_CLI_COMMAND (dslite_add_pool_address_command, static) = {
302 .path = "dslite add pool address",
303 .short_help = "dslite add pool address <ip4-range-start> [- <ip4-range-end>] "
305 .function = dslite_add_del_pool_addr_command_fn,
310 * @cliexstart{show dslite pool}
311 * Show DS-lite pool addresses.
312 * vpp# show dslite pool
320 VLIB_CLI_COMMAND (show_dslite_pool_command, static) = {
321 .path = "show dslite pool",
322 .short_help = "show dslite pool",
323 .function = dslite_show_pool_command_fn,
328 * @cliexstart{dslite set aftr-tunnel-endpoint-address}
329 * Set IPv6 tunnel endpoint address of the AFTR element.
330 * To set AFTR tunnel endpoint address use:
331 * vpp# dslite set aftr-tunnel-endpoint-address 2001:db8:85a3::8a2e:370:1
334 VLIB_CLI_COMMAND (dslite_set_aftr_tunnel_addr, static) = {
335 .path = "dslite set aftr-tunnel-endpoint-address",
336 .short_help = "dslite set aftr-tunnel-endpoint-address <ip6>",
337 .function = dslite_set_aftr_tunnel_addr_command_fn,
342 * @cliexstart{show dslite aftr-tunnel-endpoint-address}
343 * Show IPv6 tunnel endpoint address of the AFTR element.
344 * vpp# show dslite aftr-tunnel-endpoint-address
345 * 2001:db8:85a3::8a2e:370:1
348 VLIB_CLI_COMMAND (dslite_show_aftr_ip6_addr, static) = {
349 .path = "show dslite aftr-tunnel-endpoint-address",
350 .short_help = "show dslite aftr-tunnel-endpoint-address",
351 .function = dslite_show_aftr_ip6_addr_command_fn,
356 * @cliexstart{dslite set b4-tunnel-endpoint-address}
357 * Set IPv6 tunnel endpoint address of the B4 element.
358 * To set B4 tunnel endpoint address use:
359 * vpp# dslite set b4-tunnel-endpoint-address 2001:db8:62aa::375e:f4c1:1
362 VLIB_CLI_COMMAND (dslite_set_b4_tunnel_addr, static) = {
363 .path = "dslite set b4-tunnel-endpoint-address",
364 .short_help = "dslite set b4-tunnel-endpoint-address <ip6>",
365 .function = dslite_set_b4_tunnel_addr_command_fn,
370 * @cliexstart{show dslite b4-tunnel-endpoint-address}
371 * Show IPv6 tunnel endpoint address of the B4 element.
372 * vpp# show dslite b4-tunnel-endpoint-address
373 * 2001:db8:62aa::375e:f4c1:1
376 VLIB_CLI_COMMAND (dslite_show_b4_ip6_addr, static) = {
377 .path = "show dslite b4-tunnel-endpoint-address",
378 .short_help = "show dslite b4-tunnel-endpoint-address",
379 .function = dslite_show_b4_ip6_addr_command_fn,
384 * @cliexstart{show dslite sessions}
385 * Show DS-Lite sessions.
386 * vpp# show dslite sessions
387 * B4 fd01:2::2 1 sessions
388 * in 192.168.1.1:20000 out 10.0.0.3:16253 protocol udp
389 * total pkts 2, total bytes 136
390 * B4 fd01:2::3 2 sessions
391 * in 192.168.1.1:20001 out 10.0.0.3:18995 protocol tcp
392 * total pkts 2, total bytes 160
393 * in 192.168.1.1:4000 out 10.0.0.3:53893 protocol icmp
394 * total pkts 2, total bytes 136
397 VLIB_CLI_COMMAND (dslite_show_sessions, static) = {
398 .path = "show dslite sessions",
399 .short_help = "show dslite sessions",
400 .function = dslite_show_sessions_command_fn,
406 * fd.io coding-style-patch-verification: ON
409 * eval: (c-set-style "gnu")