2 * Copyright (c) 2017-2019 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 <vnet/session/application.h>
16 #include <vnet/session/session.h>
19 format_session_fifos (u8 * s, va_list * args)
21 session_t *ss = va_arg (*args, session_t *);
22 int verbose = va_arg (*args, int);
23 session_event_t _e, *e = &_e;
26 if (!ss->rx_fifo || !ss->tx_fifo)
29 s = format (s, " Rx fifo: %U", format_svm_fifo, ss->rx_fifo, verbose);
30 if (verbose > 2 && ss->rx_fifo->has_event)
32 found = session_node_lookup_fifo_event (ss->rx_fifo, e);
33 s = format (s, " session node event: %s\n",
34 found ? "found" : "not found");
36 s = format (s, " Tx fifo: %U", format_svm_fifo, ss->tx_fifo, verbose);
37 if (verbose > 2 && ss->tx_fifo->has_event)
39 found = session_node_lookup_fifo_event (ss->tx_fifo, e);
40 s = format (s, " session node event: %s\n",
41 found ? "found" : "not found");
47 * Format stream session as per the following format
50 * "Connection", "Rx fifo", "Tx fifo", "Session Index"
55 format_session (u8 * s, va_list * args)
57 session_t *ss = va_arg (*args, session_t *);
58 int verbose = va_arg (*args, int);
59 u32 tp = session_get_transport_proto (ss);
62 if (ss->session_state >= SESSION_STATE_TRANSPORT_DELETED)
64 s = format (s, "[%u:%u] CLOSED", ss->thread_index, ss->session_index);
70 u8 post_accept = ss->session_state >= SESSION_STATE_ACCEPTING;
72 || session_transport_service_type (ss) == TRANSPORT_SERVICE_CL;
75 rxf = hasf ? svm_fifo_max_dequeue (ss->rx_fifo) : 0;
76 txf = hasf ? svm_fifo_max_dequeue (ss->tx_fifo) : 0;
77 str = format (0, "%-10u%-10u", rxf, txf);
80 if (ss->session_state >= SESSION_STATE_ACCEPTING
81 || ss->session_state == SESSION_STATE_CREATED)
83 s = format (s, "%U", format_transport_connection, tp,
84 ss->connection_index, ss->thread_index, verbose);
86 s = format (s, "%v", str);
88 s = format (s, "%U", format_session_fifos, ss, verbose);
90 else if (ss->session_state == SESSION_STATE_LISTENING)
92 s = format (s, "%U%v", format_transport_listen_connection,
93 tp, ss->connection_index, ss->thread_index, verbose, str);
95 s = format (s, "\n%U", format_session_fifos, ss, verbose);
97 else if (ss->session_state == SESSION_STATE_CONNECTING)
99 s = format (s, "%-40U%v", format_transport_half_open_connection,
100 tp, ss->connection_index, ss->thread_index, str);
104 clib_warning ("Session in state: %d!", ss->session_state);
112 unformat_stream_session_id (unformat_input_t * input, va_list * args)
114 u8 *proto = va_arg (*args, u8 *);
115 u32 *fib_index = va_arg (*args, u32 *);
116 ip46_address_t *lcl = va_arg (*args, ip46_address_t *);
117 ip46_address_t *rmt = va_arg (*args, ip46_address_t *);
118 u16 *lcl_port = va_arg (*args, u16 *);
119 u16 *rmt_port = va_arg (*args, u16 *);
120 u8 *is_ip4 = va_arg (*args, u8 *);
124 clib_memset (lcl, 0, sizeof (*lcl));
125 clib_memset (rmt, 0, sizeof (*rmt));
127 if (unformat (input, "tcp"))
129 *proto = TRANSPORT_PROTO_TCP;
131 else if (unformat (input, "udp"))
133 *proto = TRANSPORT_PROTO_UDP;
138 if (unformat (input, "vrf %u", &vrf))
141 if (unformat (input, "%U:%d->%U:%d", unformat_ip4_address, &lcl->ip4,
142 lcl_port, unformat_ip4_address, &rmt->ip4, rmt_port))
147 else if (unformat (input, "%U:%d->%U:%d", unformat_ip6_address, &lcl->ip6,
148 lcl_port, unformat_ip6_address, &rmt->ip6, rmt_port))
156 fib_protocol_t fib_proto;
157 fib_proto = *is_ip4 ? FIB_PROTOCOL_IP4 : FIB_PROTOCOL_IP6;
158 *fib_index = fib_table_find (fib_proto, vrf);
165 unformat_session (unformat_input_t * input, va_list * args)
167 session_t **result = va_arg (*args, session_t **);
168 u32 lcl_port = 0, rmt_port = 0, fib_index = 0;
169 ip46_address_t lcl, rmt;
174 if (!unformat (input, "%U", unformat_stream_session_id, &proto, &fib_index,
175 &lcl, &rmt, &lcl_port, &rmt_port, &is_ip4))
179 s = session_lookup_safe4 (fib_index, &lcl.ip4, &rmt.ip4,
180 clib_host_to_net_u16 (lcl_port),
181 clib_host_to_net_u16 (rmt_port), proto);
183 s = session_lookup_safe6 (fib_index, &lcl.ip6, &rmt.ip6,
184 clib_host_to_net_u16 (lcl_port),
185 clib_host_to_net_u16 (rmt_port), proto);
189 session_pool_remove_peeker (s->thread_index);
196 unformat_transport_connection (unformat_input_t * input, va_list * args)
198 transport_connection_t **result = va_arg (*args, transport_connection_t **);
199 u32 suggested_proto = va_arg (*args, u32);
200 transport_connection_t *tc;
202 ip46_address_t lcl, rmt;
203 u32 lcl_port = 0, rmt_port = 0, fib_index = 0;
206 if (!unformat (input, "%U", unformat_stream_session_id, &fib_index, &proto,
207 &lcl, &rmt, &lcl_port, &rmt_port, &is_ip4))
210 proto = (proto == (u8) ~ 0) ? suggested_proto : proto;
211 if (proto == (u8) ~ 0)
214 tc = session_lookup_connection4 (fib_index, &lcl.ip4, &rmt.ip4,
215 clib_host_to_net_u16 (lcl_port),
216 clib_host_to_net_u16 (rmt_port), proto);
218 tc = session_lookup_connection6 (fib_index, &lcl.ip6, &rmt.ip6,
219 clib_host_to_net_u16 (lcl_port),
220 clib_host_to_net_u16 (rmt_port), proto);
230 static clib_error_t *
231 show_session_command_fn (vlib_main_t * vm, unformat_input_t * input,
232 vlib_cli_command_t * cmd)
234 u8 one_session = 0, do_listeners = 0, sst, do_elog = 0;
235 session_main_t *smm = &session_main;
236 u32 transport_proto = ~0, track_index;
238 transport_connection_t *tc;
239 app_worker_t *app_wrk;
243 if (!smm->is_enabled)
245 return clib_error_return (0, "session layer is not enabled");
248 while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
250 if (unformat (input, "verbose %d", &verbose))
252 else if (unformat (input, "verbose"))
254 else if (unformat (input, "listeners %U", unformat_transport_proto,
257 else if (unformat (input, "%U", unformat_session, &s))
261 else if (unformat (input, "elog"))
264 return clib_error_return (0, "unknown input `%U'",
265 format_unformat_error, input);
270 u8 *str = format (0, "%U", format_session, s, 3);
271 if (do_elog && s->session_state != SESSION_STATE_LISTENING)
273 elog_main_t *em = &vm->elog_main;
276 tc = session_get_transport (s);
277 track_index = transport_elog_track_index (tc);
278 dt = (em->init_time.cpu - vm->clib_time.init_cpu_time)
279 * vm->clib_time.seconds_per_clock;
280 if (track_index != ~0)
281 str = format (str, " session elog:\n%U", format_elog_track, em,
284 vlib_cli_output (vm, "%v", str);
291 sst = session_type_from_proto_and_ip (transport_proto, 1);
292 vlib_cli_output (vm, "%-50s%-24s", "Listener", "App");
294 pool_foreach (s, smm->wrk[0].sessions, ({
295 if (s->session_state != SESSION_STATE_LISTENING
296 || s->session_type != sst)
298 app_wrk = app_worker_get (s->app_wrk_index);
299 app_name = application_name_from_index (app_wrk->app_index);
300 vlib_cli_output (vm, "%U%-25v%", format_session, s, 0,
307 for (i = 0; i < vec_len (smm->wrk); i++)
309 u32 once_per_pool = 1, n_closed = 0;
311 pool = smm->wrk[i].sessions;
312 if (!pool_elts (pool))
314 vlib_cli_output (vm, "Thread %d: no sessions", i);
320 vlib_cli_output (vm, "Thread %d: %d sessions", i, pool_elts (pool));
324 if (once_per_pool && verbose == 1)
326 vlib_cli_output (vm, "%s%-50s%-15s%-10s%-10s", i ? "\n" : "",
327 "Connection", "State", "Rx-f", "Tx-f");
332 pool_foreach (s, pool, ({
333 if (s->session_state >= SESSION_STATE_TRANSPORT_DELETED)
338 vlib_cli_output (vm, "%U", format_session, s, verbose);
343 vlib_cli_output (vm, "Thread %d: active sessions %u", i,
344 pool_elts (pool) - n_closed);
346 vlib_cli_output (vm, "Thread %d: active sessions %u closed %u", i,
347 pool_elts (pool) - n_closed, n_closed);
354 VLIB_CLI_COMMAND (vlib_cli_show_session_command) =
356 .path = "show session",
357 .short_help = "show session [verbose [n]] [listeners <proto>] "
358 "[<session-id> [elog]]",
359 .function = show_session_command_fn,
364 clear_session (session_t * s)
366 app_worker_t *server_wrk = app_worker_get (s->app_wrk_index);
367 app_worker_close_notify (server_wrk, s);
371 static clib_error_t *
372 clear_session_command_fn (vlib_main_t * vm, unformat_input_t * input,
373 vlib_cli_command_t * cmd)
375 session_main_t *smm = &session_main;
376 u32 thread_index = 0, clear_all = 0;
377 session_worker_t *wrk;
378 u32 session_index = ~0;
381 if (!smm->is_enabled)
383 return clib_error_return (0, "session layer is not enabled");
386 while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
388 if (unformat (input, "thread %d", &thread_index))
390 else if (unformat (input, "session %d", &session_index))
392 else if (unformat (input, "all"))
395 return clib_error_return (0, "unknown input `%U'",
396 format_unformat_error, input);
399 if (!clear_all && session_index == ~0)
400 return clib_error_return (0, "session <nn> required, but not set.");
402 if (session_index != ~0)
404 session = session_get_if_valid (session_index, thread_index);
406 return clib_error_return (0, "no session %d on thread %d",
407 session_index, thread_index);
408 clear_session (session);
414 vec_foreach (wrk, smm->wrk)
416 pool_foreach(session, wrk->sessions, ({
417 clear_session (session);
427 VLIB_CLI_COMMAND (clear_session_command, static) =
429 .path = "clear session",
430 .short_help = "clear session thread <thread> session <index>",
431 .function = clear_session_command_fn,
435 static clib_error_t *
436 show_session_fifo_trace_command_fn (vlib_main_t * vm,
437 unformat_input_t * input,
438 vlib_cli_command_t * cmd)
441 u8 is_rx = 0, *str = 0;
443 while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
445 if (unformat (input, "%U", unformat_session, &s))
447 else if (unformat (input, "rx"))
449 else if (unformat (input, "tx"))
452 return clib_error_return (0, "unknown input `%U'",
453 format_unformat_error, input);
458 vlib_cli_output (vm, "fifo tracing not enabled");
464 vlib_cli_output (vm, "could not find session");
469 svm_fifo_dump_trace (str, s->rx_fifo) :
470 svm_fifo_dump_trace (str, s->tx_fifo);
472 vlib_cli_output (vm, "%v", str);
477 VLIB_CLI_COMMAND (show_session_fifo_trace_command, static) =
479 .path = "show session fifo trace",
480 .short_help = "show session fifo trace <session>",
481 .function = show_session_fifo_trace_command_fn,
485 static clib_error_t *
486 session_replay_fifo_command_fn (vlib_main_t * vm, unformat_input_t * input,
487 vlib_cli_command_t * cmd)
490 u8 is_rx = 0, *str = 0;
492 while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
494 if (unformat (input, "%U", unformat_session, &s))
496 else if (unformat (input, "rx"))
499 return clib_error_return (0, "unknown input `%U'",
500 format_unformat_error, input);
505 vlib_cli_output (vm, "fifo tracing not enabled");
511 vlib_cli_output (vm, "could not find session");
516 svm_fifo_replay (str, s->rx_fifo, 0, 1) :
517 svm_fifo_replay (str, s->tx_fifo, 0, 1);
519 vlib_cli_output (vm, "%v", str);
524 VLIB_CLI_COMMAND (session_replay_fifo_trace_command, static) =
526 .path = "session replay fifo",
527 .short_help = "session replay fifo <session>",
528 .function = session_replay_fifo_command_fn,
532 static clib_error_t *
533 session_enable_disable_fn (vlib_main_t * vm, unformat_input_t * input,
534 vlib_cli_command_t * cmd)
536 unformat_input_t _line_input, *line_input = &_line_input;
540 if (!unformat_user (input, unformat_line_input, line_input))
541 return clib_error_return (0, "expected enable | disable");
543 while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
545 if (unformat (line_input, "enable"))
547 else if (unformat (line_input, "disable"))
551 error = clib_error_return (0, "unknown input `%U'",
552 format_unformat_error, line_input);
553 unformat_free (line_input);
558 unformat_free (line_input);
559 return vnet_session_enable_disable (vm, is_en);
563 VLIB_CLI_COMMAND (session_enable_disable_command, static) =
566 .short_help = "session [enable|disable]",
567 .function = session_enable_disable_fn,
572 * fd.io coding-style-patch-verification: ON
575 * eval: (c-set-style "gnu")