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