src/vnet/session/session_cli.c

   1 /*
   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:
   6  *
   7  *     http://www.apache.org/licenses/LICENSE-2.0
   8  *
   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.
  14  */
  15 #include <vnet/session/application.h>
  16 #include <vnet/session/session.h>
  17
  18 u8 *
  19 format_session_fifos (u8 * s, va_list * args)
  20 {
  21   session_t *ss = va_arg (*args, session_t *);
  22   int verbose = va_arg (*args, int);
  23   session_event_t _e, *e = &_e;
  24   u8 found;
  25
  26   if (!ss->rx_fifo || !ss->tx_fifo)
  27     return s;
  28
  29   s = format (s, " Rx fifo: %U", format_svm_fifo, ss->rx_fifo, verbose);
  30   if (verbose > 2 && ss->rx_fifo->has_event)
  31     {
  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");
  35     }
  36   s = format (s, " Tx fifo: %U", format_svm_fifo, ss->tx_fifo, verbose);
  37   if (verbose > 2 && ss->tx_fifo->has_event)
  38     {
  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");
  42     }
  43   return s;
  44 }
  45
  46 const char *session_state_str[] = {
  47 #define _(sym, str) str,
  48   foreach_session_state
  49 #undef _
  50 };
  51
  52 u8 *
  53 format_session_state (u8 * s, va_list * args)
  54 {
  55   session_t *ss = va_arg (*args, session_t *);
  56
  57   if (ss->session_state < SESSION_N_STATES)
  58     s = format (s, "%s", session_state_str[ss->session_state]);
  59   else
  60     s = format (s, "UNKNOWN STATE (%d)", ss->session_state);
  61
  62   return s;
  63 }
  64
  65 const char *session_flags_str[] = {
  66 #define _(sym, str) str,
  67   foreach_session_flag
  68 #undef _
  69 };
  70
  71 u8 *
  72 format_session_flags (u8 * s, va_list * args)
  73 {
  74   session_t *ss = va_arg (*args, session_t *);
  75   int i, last = -1;
  76
  77   for (i = 0; i < SESSION_N_FLAGS; i++)
  78     if (ss->flags & (1 << i))
  79       last = i;
  80
  81   for (i = 0; i < last; i++)
  82     {
  83       if (ss->flags & (1 << i))
  84         s = format (s, "%s, ", session_flags_str[i]);
  85     }
  86   if (last >= 0)
  87     s = format (s, "%s", session_flags_str[last]);
  88
  89   return s;
  90 }
  91
  92 /**
  93  * Format stream session as per the following format
  94  *
  95  * verbose:
  96  *   "Connection", "Rx fifo", "Tx fifo", "Session Index"
  97  * non-verbose:
  98  *   "Connection"
  99  */
 100 u8 *
 101 format_session (u8 * s, va_list * args)
 102 {
 103   session_t *ss = va_arg (*args, session_t *);
 104   int verbose = va_arg (*args, int);
 105   u32 tp = session_get_transport_proto (ss);
 106   u8 *str = 0;
 107
 108   if (ss->session_state >= SESSION_STATE_TRANSPORT_DELETED)
 109     {
 110       s = format (s, "[%u:%u] CLOSED", ss->thread_index, ss->session_index);
 111       return s;
 112     }
 113
 114   if (verbose == 1)
 115     {
 116       u8 post_accept = ss->session_state >= SESSION_STATE_ACCEPTING;
 117       u8 hasf = post_accept
 118         || session_transport_service_type (ss) == TRANSPORT_SERVICE_CL;
 119       u32 rxf, txf;
 120
 121       rxf = hasf ? svm_fifo_max_dequeue (ss->rx_fifo) : 0;
 122       txf = hasf ? svm_fifo_max_dequeue (ss->tx_fifo) : 0;
 123       str = format (0, "%-10u%-10u", rxf, txf);
 124     }
 125
 126   if (ss->session_state >= SESSION_STATE_ACCEPTING
 127       || ss->session_state == SESSION_STATE_CREATED)
 128     {
 129       s = format (s, "%U", format_transport_connection, tp,
 130                   ss->connection_index, ss->thread_index, verbose);
 131       if (verbose == 1)
 132         s = format (s, "%v", str);
 133       if (verbose > 1)
 134         {
 135           s = format (s, "%U", format_session_fifos, ss, verbose);
 136           s = format (s, " session: state: %U opaque: 0x%x flags: %U\n",
 137                       format_session_state, ss, ss->opaque,
 138                       format_session_flags, ss);
 139         }
 140     }
 141   else if (ss->session_state == SESSION_STATE_LISTENING)
 142     {
 143       s = format (s, "%U%v", format_transport_listen_connection,
 144                   tp, ss->connection_index, ss->thread_index, verbose, str);
 145       if (verbose > 1)
 146         s = format (s, "\n%U", format_session_fifos, ss, verbose);
 147     }
 148   else if (ss->session_state == SESSION_STATE_CONNECTING)
 149     {
 150       s = format (s, "%-40U%v", format_transport_half_open_connection,
 151                   tp, ss->connection_index, ss->thread_index, str);
 152     }
 153   else
 154     {
 155       clib_warning ("Session in state: %d!", ss->session_state);
 156     }
 157   vec_free (str);
 158
 159   return s;
 160 }
 161
 162 uword
 163 unformat_stream_session_id (unformat_input_t * input, va_list * args)
 164 {
 165   u8 *proto = va_arg (*args, u8 *);
 166   u32 *fib_index = va_arg (*args, u32 *);
 167   ip46_address_t *lcl = va_arg (*args, ip46_address_t *);
 168   ip46_address_t *rmt = va_arg (*args, ip46_address_t *);
 169   u16 *lcl_port = va_arg (*args, u16 *);
 170   u16 *rmt_port = va_arg (*args, u16 *);
 171   u8 *is_ip4 = va_arg (*args, u8 *);
 172   u8 tuple_is_set = 0;
 173   u32 vrf = ~0;
 174
 175   clib_memset (lcl, 0, sizeof (*lcl));
 176   clib_memset (rmt, 0, sizeof (*rmt));
 177
 178   if (unformat (input, "tcp"))
 179     {
 180       *proto = TRANSPORT_PROTO_TCP;
 181     }
 182   else if (unformat (input, "udp"))
 183     {
 184       *proto = TRANSPORT_PROTO_UDP;
 185     }
 186   else
 187     return 0;
 188
 189   if (unformat (input, "vrf %u", &vrf))
 190     ;
 191
 192   if (unformat (input, "%U:%d->%U:%d", unformat_ip4_address, &lcl->ip4,
 193                 lcl_port, unformat_ip4_address, &rmt->ip4, rmt_port))
 194     {
 195       *is_ip4 = 1;
 196       tuple_is_set = 1;
 197     }
 198   else if (unformat (input, "%U:%d->%U:%d", unformat_ip6_address, &lcl->ip6,
 199                      lcl_port, unformat_ip6_address, &rmt->ip6, rmt_port))
 200     {
 201       *is_ip4 = 0;
 202       tuple_is_set = 1;
 203     }
 204
 205   if (vrf != ~0)
 206     {
 207       fib_protocol_t fib_proto;
 208       fib_proto = *is_ip4 ? FIB_PROTOCOL_IP4 : FIB_PROTOCOL_IP6;
 209       *fib_index = fib_table_find (fib_proto, vrf);
 210     }
 211
 212   return tuple_is_set;
 213 }
 214
 215 uword
 216 unformat_session_state (unformat_input_t * input, va_list * args)
 217 {
 218   session_state_t *state = va_arg (*args, session_state_t *);
 219   u8 *state_vec = 0;
 220   int rv = 0;
 221
 222 #define _(sym, str)                                     \
 223   if (unformat (input, str))                            \
 224     {                                                   \
 225       *state = SESSION_STATE_ ## sym;                   \
 226       rv = 1;                                           \
 227       goto done;                                        \
 228     }
 229   foreach_session_state
 230 #undef _
 231 done:
 232   vec_free (state_vec);
 233   return rv;
 234 }
 235
 236 uword
 237 unformat_session (unformat_input_t * input, va_list * args)
 238 {
 239   session_t **result = va_arg (*args, session_t **);
 240   u32 lcl_port = 0, rmt_port = 0, fib_index = 0;
 241   ip46_address_t lcl, rmt;
 242   session_t *s;
 243   u8 proto = ~0;
 244   u8 is_ip4 = 0;
 245
 246   if (!unformat (input, "%U", unformat_stream_session_id, &proto, &fib_index,
 247                  &lcl, &rmt, &lcl_port, &rmt_port, &is_ip4))
 248     return 0;
 249
 250   if (is_ip4)
 251     s = session_lookup_safe4 (fib_index, &lcl.ip4, &rmt.ip4,
 252                               clib_host_to_net_u16 (lcl_port),
 253                               clib_host_to_net_u16 (rmt_port), proto);
 254   else
 255     s = session_lookup_safe6 (fib_index, &lcl.ip6, &rmt.ip6,
 256                               clib_host_to_net_u16 (lcl_port),
 257                               clib_host_to_net_u16 (rmt_port), proto);
 258   if (s)
 259     {
 260       *result = s;
 261       session_pool_remove_peeker (s->thread_index);
 262       return 1;
 263     }
 264   return 0;
 265 }
 266
 267 uword
 268 unformat_transport_connection (unformat_input_t * input, va_list * args)
 269 {
 270   transport_connection_t **result = va_arg (*args, transport_connection_t **);
 271   u32 suggested_proto = va_arg (*args, u32);
 272   transport_connection_t *tc;
 273   u8 proto = ~0;
 274   ip46_address_t lcl, rmt;
 275   u32 lcl_port = 0, rmt_port = 0, fib_index = 0;
 276   u8 is_ip4 = 0;
 277
 278   if (!unformat (input, "%U", unformat_stream_session_id, &fib_index, &proto,
 279                  &lcl, &rmt, &lcl_port, &rmt_port, &is_ip4))
 280     return 0;
 281
 282   proto = (proto == (u8) ~ 0) ? suggested_proto : proto;
 283   if (proto == (u8) ~ 0)
 284     return 0;
 285   if (is_ip4)
 286     tc = session_lookup_connection4 (fib_index, &lcl.ip4, &rmt.ip4,
 287                                      clib_host_to_net_u16 (lcl_port),
 288                                      clib_host_to_net_u16 (rmt_port), proto);
 289   else
 290     tc = session_lookup_connection6 (fib_index, &lcl.ip6, &rmt.ip6,
 291                                      clib_host_to_net_u16 (lcl_port),
 292                                      clib_host_to_net_u16 (rmt_port), proto);
 293
 294   if (tc)
 295     {
 296       *result = tc;
 297       return 1;
 298     }
 299   return 0;
 300 }
 301
 302 static void
 303 session_cli_show_all_sessions (vlib_main_t * vm, int verbose)
 304 {
 305   session_main_t *smm = &session_main;
 306   u32 n_closed, thread_index;
 307   session_t *pool, *s;
 308
 309   for (thread_index = 0; thread_index < vec_len (smm->wrk); thread_index++)
 310     {
 311       pool = smm->wrk[thread_index].sessions;
 312
 313       if (!pool_elts (pool))
 314         {
 315           vlib_cli_output (vm, "Thread %d: no sessions", thread_index);
 316           continue;
 317         }
 318
 319       if (!verbose)
 320         {
 321           vlib_cli_output (vm, "Thread %d: %d sessions", thread_index,
 322                            pool_elts (pool));
 323           continue;
 324         }
 325
 326       if (pool_elts (pool) > 50)
 327         {
 328           vlib_cli_output (vm, "Thread %u: %d sessions. Verbose output "
 329                            "suppressed. For more details use filters.",
 330                            thread_index, pool_elts (pool));
 331           continue;
 332         }
 333
 334       if (verbose == 1)
 335         vlib_cli_output (vm, "%s%-50s%-15s%-10s%-10s",
 336                          thread_index ? "\n" : "",
 337                          "Connection", "State", "Rx-f", "Tx-f");
 338
 339       n_closed = 0;
 340
 341       /* *INDENT-OFF* */
 342       pool_foreach(s, pool, ({
 343         if (s->session_state >= SESSION_STATE_TRANSPORT_DELETED)
 344           {
 345             n_closed += 1;
 346             continue;
 347           }
 348         vlib_cli_output (vm, "%U", format_session, s, verbose);
 349       }));
 350       /* *INDENT-ON* */
 351
 352       if (!n_closed)
 353         vlib_cli_output (vm, "Thread %d: active sessions %u", thread_index,
 354                          pool_elts (pool) - n_closed);
 355       else
 356         vlib_cli_output (vm, "Thread %d: active sessions %u closed %u",
 357                          thread_index, pool_elts (pool) - n_closed, n_closed);
 358     }
 359 }
 360
 361 static int
 362 session_cli_filter_check (session_t * s, session_state_t * states,
 363                           transport_proto_t tp)
 364 {
 365   if (states)
 366     {
 367       session_state_t *state;
 368       vec_foreach (state, states) if (s->session_state == *state)
 369         goto check_transport;
 370       return 0;
 371     }
 372
 373 check_transport:
 374
 375   if (tp != TRANSPORT_N_PROTO && session_get_transport_proto (s) != tp)
 376     return 0;
 377
 378   return 1;
 379 }
 380
 381 static void
 382 session_cli_show_session_filter (vlib_main_t * vm, u32 thread_index,
 383                                  u32 start, u32 end, session_state_t * states,
 384                                  transport_proto_t tp, int verbose)
 385 {
 386   u8 output_suppressed = 0;
 387   session_worker_t *wrk;
 388   session_t *pool, *s;
 389   u32 count = 0, max_index;
 390   int i;
 391
 392   wrk = session_main_get_worker_if_valid (thread_index);
 393   if (!wrk)
 394     {
 395       vlib_cli_output (vm, "invalid thread index %u", thread_index);
 396       return;
 397     }
 398
 399   pool = wrk->sessions;
 400
 401   if (tp == TRANSPORT_N_PROTO && states == 0 && !verbose
 402       && (start == 0 && end == ~0))
 403     {
 404       vlib_cli_output (vm, "Thread %d: %u sessions", thread_index,
 405                        pool_elts (pool));
 406       return;
 407     }
 408
 409   max_index = pool_len (pool) ? pool_len (pool) - 1 : 0;
 410   for (i = start; i <= clib_min (end, max_index); i++)
 411     {
 412       if (pool_is_free_index (pool, i))
 413         continue;
 414
 415       s = pool_elt_at_index (pool, i);
 416
 417       if (session_cli_filter_check (s, states, tp))
 418         {
 419           count += 1;
 420           if (verbose)
 421             {
 422               if (count > 50 || (verbose > 1 && count > 10))
 423                 {
 424                   output_suppressed = 1;
 425                   continue;
 426                 }
 427               if (s->session_state < SESSION_STATE_TRANSPORT_DELETED)
 428                 vlib_cli_output (vm, "%U", format_session, s, verbose);
 429             }
 430         }
 431     }
 432
 433   if (!output_suppressed)
 434     vlib_cli_output (vm, "Thread %d: %u sessions matched filter",
 435                      thread_index, count);
 436   else
 437     vlib_cli_output (vm, "Thread %d: %u sessions matched filter. Not all"
 438                      " shown. Use finer grained filter.", thread_index,
 439                      count);
 440 }
 441
 442 void
 443 session_cli_show_events_thread (vlib_main_t * vm, u32 thread_index)
 444 {
 445   session_worker_t *wrk;
 446
 447   wrk = session_main_get_worker_if_valid (thread_index);
 448   if (!wrk)
 449     {
 450       vlib_cli_output (vm, "invalid thread index %u", thread_index);
 451       return;
 452     }
 453
 454   vlib_cli_output (vm, "Thread %d:\n", thread_index);
 455   vlib_cli_output (vm, " evt elements alloc: %u",
 456                    pool_elts (wrk->event_elts));
 457   vlib_cli_output (vm, " ctrl evt elt data alloc: %d",
 458                    pool_elts (wrk->ctrl_evts_data));
 459 }
 460
 461 static void
 462 session_cli_show_events (vlib_main_t * vm, u32 thread_index)
 463 {
 464   session_main_t *smm = &session_main;
 465   if (!thread_index)
 466     {
 467       session_cli_show_events_thread (vm, thread_index);
 468       return;
 469     }
 470
 471   for (thread_index = 0; thread_index < vec_len (smm->wrk); thread_index++)
 472     session_cli_show_events_thread (vm, thread_index);
 473 }
 474
 475 static void
 476 session_cli_print_transport_protos (vlib_main_t * vm)
 477 {
 478 #define _(sym, str, sstr) vlib_cli_output (vm, str);
 479   foreach_transport_proto
 480 #undef _
 481 }
 482
 483 static void
 484 session_cli_print_session_states (vlib_main_t * vm)
 485 {
 486 #define _(sym, str) vlib_cli_output (vm, str);
 487   foreach_session_state
 488 #undef _
 489 }
 490
 491 static clib_error_t *
 492 show_session_command_fn (vlib_main_t * vm, unformat_input_t * input,
 493                          vlib_cli_command_t * cmd)
 494 {
 495   u8 one_session = 0, do_listeners = 0, sst, do_elog = 0, do_filter = 0;
 496   u32 track_index, thread_index = 0, start = 0, end = ~0, session_index;
 497   unformat_input_t _line_input, *line_input = &_line_input;
 498   transport_proto_t transport_proto = TRANSPORT_N_PROTO;
 499   session_state_t state = SESSION_N_STATES, *states = 0;
 500   session_main_t *smm = &session_main;
 501   clib_error_t *error = 0;
 502   app_worker_t *app_wrk;
 503   u32 transport_index;
 504   const u8 *app_name;
 505   u8 do_events = 0;
 506   int verbose = 0;
 507   session_t *s;
 508
 509   session_cli_return_if_not_enabled ();
 510
 511   if (!unformat_user (input, unformat_line_input, line_input))
 512     {
 513       session_cli_show_all_sessions (vm, 0);
 514       return 0;
 515     }
 516
 517   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
 518     {
 519       if (unformat (line_input, "verbose %d", &verbose))
 520         ;
 521       else if (unformat (line_input, "verbose"))
 522         verbose = 1;
 523       else if (unformat (line_input, "listeners %U", unformat_transport_proto,
 524                          &transport_proto))
 525         do_listeners = 1;
 526       else if (unformat (line_input, "%U", unformat_session, &s))
 527         {
 528           one_session = 1;
 529         }
 530       else if (unformat (line_input, "thread %u index %u", &thread_index,
 531                          &session_index))
 532         {
 533           s = session_get_if_valid (session_index, thread_index);
 534           if (!s)
 535             {
 536               vlib_cli_output (vm, "session is not allocated");
 537               goto done;
 538             }
 539           one_session = 1;
 540         }
 541       else if (unformat (line_input, "thread %u", &thread_index))
 542         {
 543           do_filter = 1;
 544         }
 545       else
 546         if (unformat (line_input, "state %U", unformat_session_state, &state))
 547         {
 548           vec_add1 (states, state);
 549           do_filter = 1;
 550         }
 551       else if (unformat (line_input, "proto %U index %u",
 552                          unformat_transport_proto, &transport_proto,
 553                          &transport_index))
 554         {
 555           transport_connection_t *tc;
 556           tc = transport_get_connection (transport_proto, transport_index,
 557                                          thread_index);
 558           if (!tc)
 559             {
 560               vlib_cli_output (vm, "transport connection %u thread %u is not"
 561                                " allocated", transport_index, thread_index);
 562               goto done;
 563             }
 564           s = session_get_if_valid (tc->s_index, thread_index);
 565           if (!s)
 566             {
 567               vlib_cli_output (vm, "session for transport connection %u "
 568                                "thread %u does not exist", transport_index,
 569                                thread_index);
 570               goto done;
 571             }
 572           one_session = 1;
 573         }
 574       else if (unformat (line_input, "proto %U", unformat_transport_proto,
 575                          &transport_proto))
 576         do_filter = 1;
 577       else if (unformat (line_input, "range %u %u", &start, &end))
 578         do_filter = 1;
 579       else if (unformat (line_input, "range %u", &start))
 580         {
 581           end = start + 50;
 582           do_filter = 1;
 583         }
 584       else if (unformat (line_input, "elog"))
 585         do_elog = 1;
 586       else if (unformat (line_input, "protos"))
 587         {
 588           session_cli_print_transport_protos (vm);
 589           goto done;
 590         }
 591       else if (unformat (line_input, "states"))
 592         {
 593           session_cli_print_session_states (vm);
 594           goto done;
 595         }
 596       else if (unformat (line_input, "events"))
 597         do_events = 1;
 598       else
 599         {
 600           error = clib_error_return (0, "unknown input `%U'",
 601                                      format_unformat_error, line_input);
 602           goto done;
 603         }
 604     }
 605
 606   if (one_session)
 607     {
 608       u8 *str = format (0, "%U", format_session, s, 3);
 609       if (do_elog && s->session_state != SESSION_STATE_LISTENING)
 610         {
 611           elog_main_t *em = &vm->elog_main;
 612           transport_connection_t *tc;
 613           f64 dt;
 614
 615           tc = session_get_transport (s);
 616           track_index = transport_elog_track_index (tc);
 617           dt = (em->init_time.cpu - vm->clib_time.init_cpu_time)
 618             * vm->clib_time.seconds_per_clock;
 619           if (track_index != ~0)
 620             str = format (str, " session elog:\n%U", format_elog_track, em,
 621                           dt, track_index);
 622         }
 623       vlib_cli_output (vm, "%v", str);
 624       vec_free (str);
 625       goto done;
 626     }
 627
 628   if (do_listeners)
 629     {
 630       sst = session_type_from_proto_and_ip (transport_proto, 1);
 631       vlib_cli_output (vm, "%-50s%-24s", "Listener", "App");
 632       /* *INDENT-OFF* */
 633       pool_foreach (s, smm->wrk[0].sessions, ({
 634         if (s->session_state != SESSION_STATE_LISTENING
 635             || s->session_type != sst)
 636           continue;
 637         app_wrk = app_worker_get (s->app_wrk_index);
 638         app_name = application_name_from_index (app_wrk->app_index);
 639         vlib_cli_output (vm, "%U%-25v%", format_session, s, 0,
 640                          app_name);
 641       }));
 642       /* *INDENT-ON* */
 643       goto done;
 644     }
 645
 646   if (do_events)
 647     {
 648       session_cli_show_events (vm, thread_index);
 649       goto done;
 650     }
 651
 652   if (do_filter)
 653     {
 654       if (end < start)
 655         {
 656           error = clib_error_return (0, "invalid range start: %u end: %u",
 657                                      start, end);
 658           goto done;
 659         }
 660       session_cli_show_session_filter (vm, thread_index, start, end, states,
 661                                        transport_proto, verbose);
 662       goto done;
 663     }
 664
 665   session_cli_show_all_sessions (vm, verbose);
 666
 667 done:
 668   unformat_free (line_input);
 669   vec_free (states);
 670   return error;
 671 }
 672
 673 /* *INDENT-OFF* */
 674 VLIB_CLI_COMMAND (vlib_cli_show_session_command) =
 675 {
 676   .path = "show session",
 677   .short_help = "show session [verbose [n]] [listeners <proto>] "
 678                 "[<session-id> [elog]] [thread <n> [index <n>] "
 679                 "[proto <proto>] [state <state>] [range <min> [<max>]] "
 680                 "[protos] [states] ",
 681   .function = show_session_command_fn,
 682 };
 683 /* *INDENT-ON* */
 684
 685 static int
 686 clear_session (session_t * s)
 687 {
 688   app_worker_t *server_wrk = app_worker_get (s->app_wrk_index);
 689   app_worker_close_notify (server_wrk, s);
 690   return 0;
 691 }
 692
 693 static clib_error_t *
 694 clear_session_command_fn (vlib_main_t * vm, unformat_input_t * input,
 695                           vlib_cli_command_t * cmd)
 696 {
 697   session_main_t *smm = &session_main;
 698   u32 thread_index = 0, clear_all = 0;
 699   session_worker_t *wrk;
 700   u32 session_index = ~0;
 701   session_t *session;
 702
 703   if (!smm->is_enabled)
 704     {
 705       return clib_error_return (0, "session layer is not enabled");
 706     }
 707
 708   while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
 709     {
 710       if (unformat (input, "thread %d", &thread_index))
 711         ;
 712       else if (unformat (input, "session %d", &session_index))
 713         ;
 714       else if (unformat (input, "all"))
 715         clear_all = 1;
 716       else
 717         return clib_error_return (0, "unknown input `%U'",
 718                                   format_unformat_error, input);
 719     }
 720
 721   if (!clear_all && session_index == ~0)
 722     return clib_error_return (0, "session <nn> required, but not set.");
 723
 724   if (session_index != ~0)
 725     {
 726       session = session_get_if_valid (session_index, thread_index);
 727       if (!session)
 728         return clib_error_return (0, "no session %d on thread %d",
 729                                   session_index, thread_index);
 730       clear_session (session);
 731     }
 732
 733   if (clear_all)
 734     {
 735       /* *INDENT-OFF* */
 736       vec_foreach (wrk, smm->wrk)
 737         {
 738           pool_foreach(session, wrk->sessions, ({
 739             clear_session (session);
 740           }));
 741         };
 742       /* *INDENT-ON* */
 743     }
 744
 745   return 0;
 746 }
 747
 748 /* *INDENT-OFF* */
 749 VLIB_CLI_COMMAND (clear_session_command, static) =
 750 {
 751   .path = "clear session",
 752   .short_help = "clear session thread <thread> session <index>",
 753   .function = clear_session_command_fn,
 754 };
 755 /* *INDENT-ON* */
 756
 757 static clib_error_t *
 758 show_session_fifo_trace_command_fn (vlib_main_t * vm,
 759                                     unformat_input_t * input,
 760                                     vlib_cli_command_t * cmd)
 761 {
 762   session_t *s = 0;
 763   u8 is_rx = 0, *str = 0;
 764
 765   while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
 766     {
 767       if (unformat (input, "%U", unformat_session, &s))
 768         ;
 769       else if (unformat (input, "rx"))
 770         is_rx = 1;
 771       else if (unformat (input, "tx"))
 772         is_rx = 0;
 773       else
 774         return clib_error_return (0, "unknown input `%U'",
 775                                   format_unformat_error, input);
 776     }
 777
 778   if (!SVM_FIFO_TRACE)
 779     {
 780       vlib_cli_output (vm, "fifo tracing not enabled");
 781       return 0;
 782     }
 783
 784   if (!s)
 785     {
 786       vlib_cli_output (vm, "could not find session");
 787       return 0;
 788     }
 789
 790   str = is_rx ?
 791     svm_fifo_dump_trace (str, s->rx_fifo) :
 792     svm_fifo_dump_trace (str, s->tx_fifo);
 793
 794   vlib_cli_output (vm, "%v", str);
 795   return 0;
 796 }
 797
 798 /* *INDENT-OFF* */
 799 VLIB_CLI_COMMAND (show_session_fifo_trace_command, static) =
 800 {
 801   .path = "show session fifo trace",
 802   .short_help = "show session fifo trace <session>",
 803   .function = show_session_fifo_trace_command_fn,
 804 };
 805 /* *INDENT-ON* */
 806
 807 static clib_error_t *
 808 session_replay_fifo_command_fn (vlib_main_t * vm, unformat_input_t * input,
 809                                 vlib_cli_command_t * cmd)
 810 {
 811   session_t *s = 0;
 812   u8 is_rx = 0, *str = 0;
 813
 814   while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
 815     {
 816       if (unformat (input, "%U", unformat_session, &s))
 817         ;
 818       else if (unformat (input, "rx"))
 819         is_rx = 1;
 820       else
 821         return clib_error_return (0, "unknown input `%U'",
 822                                   format_unformat_error, input);
 823     }
 824
 825   if (!SVM_FIFO_TRACE)
 826     {
 827       vlib_cli_output (vm, "fifo tracing not enabled");
 828       return 0;
 829     }
 830
 831   if (!s)
 832     {
 833       vlib_cli_output (vm, "could not find session");
 834       return 0;
 835     }
 836
 837   str = is_rx ?
 838     svm_fifo_replay (str, s->rx_fifo, 0, 1) :
 839     svm_fifo_replay (str, s->tx_fifo, 0, 1);
 840
 841   vlib_cli_output (vm, "%v", str);
 842   return 0;
 843 }
 844
 845 /* *INDENT-OFF* */
 846 VLIB_CLI_COMMAND (session_replay_fifo_trace_command, static) =
 847 {
 848   .path = "session replay fifo",
 849   .short_help = "session replay fifo <session>",
 850   .function = session_replay_fifo_command_fn,
 851 };
 852 /* *INDENT-ON* */
 853
 854 static clib_error_t *
 855 session_enable_disable_fn (vlib_main_t * vm, unformat_input_t * input,
 856                            vlib_cli_command_t * cmd)
 857 {
 858   unformat_input_t _line_input, *line_input = &_line_input;
 859   u8 is_en = 1;
 860   clib_error_t *error;
 861
 862   if (!unformat_user (input, unformat_line_input, line_input))
 863     return clib_error_return (0, "expected enable | disable");
 864
 865   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
 866     {
 867       if (unformat (line_input, "enable"))
 868         is_en = 1;
 869       else if (unformat (line_input, "disable"))
 870         is_en = 0;
 871       else
 872         {
 873           error = clib_error_return (0, "unknown input `%U'",
 874                                      format_unformat_error, line_input);
 875           unformat_free (line_input);
 876           return error;
 877         }
 878     }
 879
 880   unformat_free (line_input);
 881   return vnet_session_enable_disable (vm, is_en);
 882 }
 883
 884 /* *INDENT-OFF* */
 885 VLIB_CLI_COMMAND (session_enable_disable_command, static) =
 886 {
 887   .path = "session",
 888   .short_help = "session [enable|disable]",
 889   .function = session_enable_disable_fn,
 890 };
 891 /* *INDENT-ON* */
 892
 893 /*
 894  * fd.io coding-style-patch-verification: ON
 895  *
 896  * Local Variables:
 897  * eval: (c-set-style "gnu")
 898  * End:
 899  */