src/plugins/hs_apps/sapi/vpp_echo.c

   1 /*
   2  * Copyright (c) 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
  16 #include <stdio.h>
  17 #include <signal.h>
  18
  19 #include <vlibmemory/api.h>
  20 #include <svm/fifo_segment.h>
  21
  22 #include <hs_apps/sapi/vpp_echo_common.h>
  23
  24 echo_main_t echo_main;
  25
  26 static void
  27 echo_session_prealloc (echo_main_t * em)
  28 {
  29   /* We need to prealloc to avoid vec resize in threads */
  30   echo_session_t *session;
  31   int i;
  32   for (i = 0; i < em->n_sessions; i++)
  33     {
  34       pool_get (em->sessions, session);
  35       clib_memset (session, 0, sizeof (*session));
  36       session->session_index = session - em->sessions;
  37       session->listener_index = SESSION_INVALID_INDEX;
  38       session->session_state = ECHO_SESSION_STATE_INITIAL;
  39     }
  40 }
  41
  42 static void
  43 echo_assert_test_suceeded (echo_main_t * em)
  44 {
  45   if (em->rx_results_diff)
  46     CHECK_DIFF (ECHO_FAIL_TEST_ASSERT_RX_TOTAL, em->stats.rx_expected,
  47                 em->stats.rx_total, "Invalid amount of data received");
  48   else
  49     CHECK_SAME (ECHO_FAIL_TEST_ASSERT_RX_TOTAL, em->stats.rx_expected,
  50                 em->stats.rx_total, "Invalid amount of data received");
  51
  52   if (em->tx_results_diff)
  53     CHECK_DIFF (ECHO_FAIL_TEST_ASSERT_TX_TOTAL, em->stats.tx_expected,
  54                 em->stats.tx_total, "Invalid amount of data sent");
  55   else
  56     CHECK_SAME (ECHO_FAIL_TEST_ASSERT_TX_TOTAL, em->stats.tx_expected,
  57                 em->stats.tx_total, "Invalid amount of data sent");
  58
  59   clib_spinlock_lock (&em->sid_vpp_handles_lock);
  60   CHECK_SAME (ECHO_FAIL_TEST_ASSERT_ALL_SESSIONS_CLOSED,
  61               0, hash_elts (em->session_index_by_vpp_handles),
  62               "Some sessions are still open");
  63   clib_spinlock_unlock (&em->sid_vpp_handles_lock);
  64 }
  65
  66 always_inline void
  67 echo_session_dequeue_notify (echo_session_t * s)
  68 {
  69   int rv;
  70   if (!svm_fifo_set_event (s->rx_fifo))
  71     return;
  72   if ((rv =
  73        app_send_io_evt_to_vpp (s->vpp_evt_q, s->rx_fifo->master_session_index,
  74                                SESSION_IO_EVT_RX, SVM_Q_WAIT)))
  75     ECHO_FAIL (ECHO_FAIL_SEND_IO_EVT, "app_send_io_evt_to_vpp errored %d",
  76                rv);
  77   svm_fifo_clear_deq_ntf (s->rx_fifo);
  78 }
  79
  80 static void
  81 stop_signal (int signum)
  82 {
  83   echo_main_t *em = &echo_main;
  84   em->time_to_stop = 1;
  85 }
  86
  87 int
  88 connect_to_vpp (char *name)
  89 {
  90   echo_main_t *em = &echo_main;
  91   api_main_t *am = &api_main;
  92
  93   if (em->use_sock_api)
  94     {
  95       if (vl_socket_client_connect ((char *) em->socket_name, name,
  96                                     0 /* default rx, tx buffer */ ))
  97         {
  98           ECHO_FAIL (ECHO_FAIL_SOCKET_CONNECT, "socket connect failed");
  99           return -1;
 100         }
 101
 102       if (vl_socket_client_init_shm (0, 1 /* want_pthread */ ))
 103         {
 104           ECHO_FAIL (ECHO_FAIL_INIT_SHM_API, "init shm api failed");
 105           return -1;
 106         }
 107     }
 108   else
 109     {
 110       if (vl_client_connect_to_vlib ("/vpe-api", name, 32) < 0)
 111         {
 112           ECHO_FAIL (ECHO_FAIL_SHMEM_CONNECT, "shmem connect failed");
 113           return -1;
 114         }
 115     }
 116   em->vl_input_queue = am->shmem_hdr->vl_input_queue;
 117   em->my_client_index = am->my_client_index;
 118   return 0;
 119 }
 120
 121 static void
 122 print_global_json_stats (echo_main_t * em)
 123 {
 124   u8 *start_evt =
 125     format (0, "%U", echo_format_timing_event, em->timing.start_event);
 126   u8 *end_evt =
 127     format (0, "%U", echo_format_timing_event, em->timing.end_event);
 128   u8 start_evt_missing = !(em->timing.events_sent & em->timing.start_event);
 129   u8 end_evt_missing = (em->rx_results_diff || em->tx_results_diff) ? 0 :
 130     !(em->timing.events_sent & em->timing.end_event);
 131   f64 deltat = start_evt_missing || end_evt_missing ? 0 :
 132     em->timing.end_time - em->timing.start_time;
 133
 134   if (start_evt_missing)
 135     ECHO_FAIL (ECHO_FAIL_MISSING_START_EVENT,
 136                "Expected event %v to happen, but it did not!", start_evt);
 137
 138   if (end_evt_missing)
 139     ECHO_FAIL (ECHO_FAIL_MISSING_END_EVENT,
 140                "Expected event %v to happen, but it did not!", end_evt);
 141
 142   fformat (stdout, "vpp_echo JSON stats:\n{\n");
 143   fformat (stdout, "  \"role\": \"%s\",\n",
 144            em->i_am_master ? "server" : "client");
 145   fformat (stdout, "  \"time\": \"%.9f\",\n", deltat);
 146   fformat (stdout, "  \"start_evt\": \"%v\",\n", start_evt);
 147   fformat (stdout, "  \"start_evt_missing\": \"%s\",\n",
 148            start_evt_missing ? "True" : "False");
 149   fformat (stdout, "  \"end_evt\": \"%v\",\n", end_evt);
 150   fformat (stdout, "  \"end_evt_missing\": \"%s\",\n",
 151            end_evt_missing ? "True" : "False");
 152   fformat (stdout, "  \"rx_data\": %lld,\n", em->stats.rx_total);
 153   fformat (stdout, "  \"tx_rx\": %lld,\n", em->stats.tx_total);
 154   fformat (stdout, "  \"closing\": {\n");
 155   fformat (stdout, "    \"reset\": { \"q\": %d, \"s\": %d },\n",
 156            em->stats.reset_count.q, em->stats.reset_count.s);
 157   fformat (stdout, "    \"close\": { \"q\": %d, \"s\": %d },\n",
 158            em->stats.close_count.q, em->stats.close_count.s);
 159   fformat (stdout, "    \"active\": { \"q\": %d, \"s\": %d },\n",
 160            em->stats.active_count.q, em->stats.active_count.s);
 161   fformat (stdout, "    \"clean\": { \"q\": %d, \"s\": %d }\n",
 162            em->stats.clean_count.q, em->stats.clean_count.s);
 163   fformat (stdout, "  }\n");
 164   fformat (stdout, "  \"results\": {\n");
 165   fformat (stdout, "    \"has_failed\": \"%d\"\n", em->has_failed);
 166   fformat (stdout, "    \"fail_descr\": \"%v\"\n", em->fail_descr);
 167   fformat (stdout, "  }\n");
 168   fformat (stdout, "}\n");
 169   fflush (stdout);
 170   vec_free (start_evt);
 171   vec_free (end_evt);
 172 }
 173
 174 static void
 175 print_global_stats (echo_main_t * em)
 176 {
 177   u8 *start_evt =
 178     format (0, "%U", echo_format_timing_event, em->timing.start_event);
 179   u8 *end_evt =
 180     format (0, "%U", echo_format_timing_event, em->timing.end_event);
 181   u8 start_evt_missing = !(em->timing.events_sent & em->timing.start_event);
 182   u8 end_evt_missing = (em->rx_results_diff || em->tx_results_diff) ? 0 :
 183     !(em->timing.events_sent & em->timing.end_event);
 184   f64 deltat = start_evt_missing || end_evt_missing ? 0 :
 185     em->timing.end_time - em->timing.start_time;
 186
 187   if (start_evt_missing)
 188     ECHO_FAIL (ECHO_FAIL_MISSING_START_EVENT,
 189                "Expected event %v to happen, but it did not!", start_evt);
 190
 191   if (end_evt_missing)
 192     ECHO_FAIL (ECHO_FAIL_MISSING_END_EVENT,
 193                "Expected event %v to happen, but it did not!", end_evt);
 194
 195   fformat (stdout, "Timing %v:%v\n", start_evt, end_evt);
 196   if (start_evt_missing)
 197     fformat (stdout, "Missing Start Timing Event (%v)!\n", start_evt);
 198   if (end_evt_missing)
 199     fformat (stdout, "Missing End Timing Event (%v)!\n", end_evt);
 200   fformat (stdout, "-------- TX --------\n");
 201   fformat (stdout, "%lld bytes (%lld mbytes, %lld gbytes) in %.6f seconds\n",
 202            em->stats.tx_total, em->stats.tx_total / (1ULL << 20),
 203            em->stats.tx_total / (1ULL << 30), deltat);
 204   if (deltat)
 205     fformat (stdout, "%.4f Gbit/second\n",
 206              (em->stats.tx_total * 8.0) / deltat / 1e9);
 207   fformat (stdout, "-------- RX --------\n");
 208   fformat (stdout, "%lld bytes (%lld mbytes, %lld gbytes) in %.6f seconds\n",
 209            em->stats.rx_total, em->stats.rx_total / (1ULL << 20),
 210            em->stats.rx_total / (1ULL << 30), deltat);
 211   if (deltat)
 212     fformat (stdout, "%.4f Gbit/second\n",
 213              (em->stats.rx_total * 8.0) / deltat / 1e9);
 214   fformat (stdout, "--------------------\n");
 215   fformat (stdout, "Received close on %d streams (and %d Quic conn)\n",
 216            em->stats.close_count.s, em->stats.close_count.q);
 217   fformat (stdout, "Received reset on %d streams (and %d Quic conn)\n",
 218            em->stats.reset_count.s, em->stats.reset_count.q);
 219   fformat (stdout, "Sent close on     %d streams (and %d Quic conn)\n",
 220            em->stats.active_count.s, em->stats.active_count.q);
 221   fformat (stdout, "Discarded         %d streams (and %d Quic conn)\n",
 222            em->stats.clean_count.s, em->stats.clean_count.q);
 223   if (em->has_failed)
 224     fformat (stdout, "\nFailure Return Status: %d\n%v", em->has_failed,
 225              em->fail_descr);
 226   vec_free (start_evt);
 227   vec_free (end_evt);
 228 }
 229
 230 void
 231 echo_update_count_on_session_close (echo_main_t * em, echo_session_t * s)
 232 {
 233
 234   ECHO_LOG (1, "[%lu/%lu] -> %U -> [%lu/%lu]",
 235             s->bytes_received, s->bytes_received + s->bytes_to_receive,
 236             echo_format_session, s, s->bytes_sent,
 237             s->bytes_sent + s->bytes_to_send);
 238   clib_atomic_fetch_add (&em->stats.tx_total, s->bytes_sent);
 239   clib_atomic_fetch_add (&em->stats.rx_total, s->bytes_received);
 240
 241   if (PREDICT_FALSE (em->stats.rx_total == em->stats.rx_expected))
 242     echo_notify_event (em, ECHO_EVT_LAST_BYTE);
 243 }
 244
 245 static void
 246 echo_free_sessions (echo_main_t * em)
 247 {
 248   /* Free marked sessions */
 249   echo_session_t *s;
 250   u32 *session_indexes = 0, *session_index;
 251
 252   /* *INDENT-OFF* */
 253   pool_foreach (s, em->sessions,
 254   ({
 255     if (s->session_state == ECHO_SESSION_STATE_CLOSED)
 256       vec_add1 (session_indexes, s->session_index);}
 257   ));
 258   /* *INDENT-ON* */
 259   vec_foreach (session_index, session_indexes)
 260   {
 261     /* Free session */
 262     s = pool_elt_at_index (em->sessions, *session_index);
 263     echo_session_handle_add_del (em, s->vpp_session_handle,
 264                                  SESSION_INVALID_INDEX);
 265     clib_memset (s, 0xfe, sizeof (*s));
 266     pool_put (em->sessions, s);
 267   }
 268 }
 269
 270 static void
 271 test_recv_bytes (echo_main_t * em, echo_session_t * s, u8 * rx_buf,
 272                  u32 n_read)
 273 {
 274   u32 i;
 275   u8 expected;
 276   for (i = 0; i < n_read; i++)
 277     {
 278       expected = (s->bytes_received + i) & 0xff;
 279       if (rx_buf[i] == expected || em->max_test_msg > 0)
 280         continue;
 281       ECHO_LOG (0, "Session 0x%lx byte %lld was 0x%x expected 0x%x",
 282                 s->vpp_session_handle, s->bytes_received + i, rx_buf[i],
 283                 expected);
 284       em->max_test_msg--;
 285       if (em->max_test_msg == 0)
 286         ECHO_LOG (0, "Too many errors, hiding next ones");
 287       if (em->test_return_packets == RETURN_PACKETS_ASSERT)
 288         ECHO_FAIL (ECHO_FAIL_TEST_BYTES_ERR, "test-bytes errored");
 289     }
 290 }
 291
 292 static int
 293 recv_data_chunk (echo_main_t * em, echo_session_t * s, u8 * rx_buf)
 294 {
 295   int n_read;
 296   n_read = app_recv ((app_session_t *) s, rx_buf, vec_len (rx_buf));
 297   if (n_read <= 0)
 298     return 0;
 299   if (svm_fifo_needs_deq_ntf (s->rx_fifo, n_read))
 300     echo_session_dequeue_notify (s);
 301
 302   if (em->test_return_packets)
 303     test_recv_bytes (em, s, rx_buf, n_read);
 304
 305   s->bytes_received += n_read;
 306   s->bytes_to_receive -= n_read;
 307   return n_read;
 308 }
 309
 310 static int
 311 send_data_chunk (echo_session_t * s, u8 * tx_buf, int offset, int len)
 312 {
 313   int n_sent;
 314   int bytes_this_chunk = clib_min (s->bytes_to_send, len - offset);
 315   if (!bytes_this_chunk)
 316     return 0;
 317   n_sent = app_send ((app_session_t *) s, tx_buf + offset,
 318                      bytes_this_chunk, SVM_Q_WAIT);
 319   if (n_sent < 0)
 320     return 0;
 321   s->bytes_to_send -= n_sent;
 322   s->bytes_sent += n_sent;
 323   return n_sent;
 324 }
 325
 326 static int
 327 mirror_data_chunk (echo_main_t * em, echo_session_t * s, u8 * tx_buf, u64 len)
 328 {
 329   u64 n_sent = 0;
 330   while (n_sent < len && !em->time_to_stop)
 331     n_sent += send_data_chunk (s, tx_buf, n_sent, len);
 332   return n_sent;
 333 }
 334
 335 static inline void
 336 echo_check_closed_listener (echo_main_t * em, echo_session_t * s)
 337 {
 338   echo_session_t *ls;
 339   /* if parent has died, terminate gracefully */
 340   if (s->listener_index == SESSION_INVALID_INDEX)
 341     {
 342       ECHO_LOG (2, "%U: listener_index == SESSION_INVALID_INDEX",
 343                 echo_format_session, s);
 344       return;
 345     }
 346   ls = pool_elt_at_index (em->sessions, s->listener_index);
 347   if (ls->session_state < ECHO_SESSION_STATE_CLOSING)
 348     {
 349       ECHO_LOG (3, "%U: ls->session_state (%d) < "
 350                 "ECHO_SESSION_STATE_CLOSING (%d)",
 351                 echo_format_session, ls, ls->session_state,
 352                 ECHO_SESSION_STATE_CLOSING);
 353       return;
 354     }
 355
 356   ECHO_LOG (2, "%U died, close child %U", echo_format_session, ls,
 357             echo_format_session, s);
 358   echo_update_count_on_session_close (em, s);
 359   em->proto_cb_vft->cleanup_cb (s, 1 /* parent_died */ );
 360 }
 361
 362 /*
 363  * Rx/Tx polling thread per connection
 364  */
 365 static void
 366 echo_handle_data (echo_main_t * em, echo_session_t * s, u8 * rx_buf)
 367 {
 368   int n_read, n_sent = 0;
 369
 370   n_read = recv_data_chunk (em, s, rx_buf);
 371   if ((em->data_source == ECHO_TEST_DATA_SOURCE) && s->bytes_to_send)
 372     n_sent = send_data_chunk (s, em->connect_test_data,
 373                               s->bytes_sent % em->tx_buf_size,
 374                               em->tx_buf_size);
 375   else if (em->data_source == ECHO_RX_DATA_SOURCE)
 376     n_sent = mirror_data_chunk (em, s, rx_buf, n_read);
 377   if (!s->bytes_to_send && !s->bytes_to_receive)
 378     {
 379       /* Session is done, need to close */
 380       if (s->session_state == ECHO_SESSION_STATE_AWAIT_DATA)
 381         s->session_state = ECHO_SESSION_STATE_CLOSING;
 382       else
 383         {
 384           s->session_state = ECHO_SESSION_STATE_AWAIT_CLOSING;
 385           if (em->send_stream_disconnects == ECHO_CLOSE_F_ACTIVE)
 386             {
 387               echo_send_rpc (em, echo_send_disconnect_session,
 388                              (void *) s->vpp_session_handle, 0);
 389               clib_atomic_fetch_add (&em->stats.active_count.s, 1);
 390             }
 391           else if (em->send_stream_disconnects == ECHO_CLOSE_F_NONE)
 392             {
 393               s->session_state = ECHO_SESSION_STATE_CLOSING;
 394               clib_atomic_fetch_add (&em->stats.clean_count.s, 1);
 395             }
 396         }
 397       ECHO_LOG (2, "%U: %U", echo_format_session, s,
 398                 echo_format_session_state, s->session_state);
 399       return;
 400     }
 401
 402   /* Check for idle clients */
 403   if (em->log_lvl > 1)
 404     {
 405       if (n_sent || n_read)
 406         s->idle_cycles = 0;
 407       else if (s->idle_cycles++ == 1e7)
 408         {
 409           s->idle_cycles = 0;
 410           ECHO_LOG (1, "Idle client TX:%dB RX:%dB", s->bytes_to_send,
 411                     s->bytes_to_receive);
 412           ECHO_LOG (1, "Idle FIFOs TX:%dB RX:%dB",
 413                     svm_fifo_max_dequeue (s->tx_fifo),
 414                     svm_fifo_max_dequeue (s->rx_fifo));
 415           ECHO_LOG (1, "Session 0x%lx state %U", s->vpp_session_handle,
 416                     echo_format_session_state, s->session_state);
 417         }
 418     }
 419 }
 420
 421 static void *
 422 echo_data_thread_fn (void *arg)
 423 {
 424   clib_mem_set_thread_index (); /* First thing to do in client thread */
 425   echo_main_t *em = &echo_main;
 426   u32 N = em->n_clients;
 427   u32 n = (N + em->n_rx_threads - 1) / em->n_rx_threads;
 428   u32 idx = (u64) arg;
 429   if (n * idx >= N)
 430     {
 431       ECHO_LOG (1, "Thread %u exiting, no sessions to care for", idx);
 432       pthread_exit (0);
 433     }
 434   u32 thread_n_sessions = clib_min (n, N - n * idx);
 435
 436   u32 i = 0;
 437   u32 n_closed_sessions = 0;
 438   u32 session_index;
 439   u8 *rx_buf = 0;
 440   echo_session_t *s;
 441   vec_validate (rx_buf, em->rx_buf_size);
 442
 443   for (i = 0; !em->time_to_stop; i = (i + 1) % thread_n_sessions)
 444     {
 445       n_closed_sessions = i == 0 ? 0 : n_closed_sessions;
 446       session_index = em->data_thread_args[n * idx + i];
 447       if (session_index == SESSION_INVALID_INDEX)
 448         continue;
 449       s = pool_elt_at_index (em->sessions, session_index);
 450       switch (s->session_state)
 451         {
 452         case ECHO_SESSION_STATE_READY:
 453         case ECHO_SESSION_STATE_AWAIT_DATA:
 454           echo_handle_data (em, s, rx_buf);
 455           echo_check_closed_listener (em, s);
 456           break;
 457         case ECHO_SESSION_STATE_AWAIT_CLOSING:
 458           ECHO_LOG (3, "%U: %U", echo_format_session, s,
 459                     echo_format_session_state, s->session_state);
 460           echo_check_closed_listener (em, s);
 461           break;
 462         case ECHO_SESSION_STATE_CLOSING:
 463           ECHO_LOG (2, "%U: %U", echo_format_session, s,
 464                     echo_format_session_state, s->session_state);
 465           echo_update_count_on_session_close (em, s);
 466           em->proto_cb_vft->cleanup_cb (s, 0 /* parent_died */ );
 467           break;
 468         case ECHO_SESSION_STATE_CLOSED:
 469           ECHO_LOG (2, "%U: %U", echo_format_session, s,
 470                     echo_format_session_state, s->session_state);
 471           n_closed_sessions++;
 472           break;
 473         }
 474       if (n_closed_sessions == thread_n_sessions)
 475         break;
 476     }
 477   ECHO_LOG (1, "Mission accomplished!");
 478   pthread_exit (0);
 479 }
 480
 481 static void
 482 session_unlisten_handler (session_unlisten_msg_t * mp)
 483 {
 484   echo_session_t *listen_session;
 485   echo_main_t *em = &echo_main;
 486   listen_session = pool_elt_at_index (em->sessions, em->listen_session_index);
 487   em->proto_cb_vft->cleanup_cb (listen_session, 0 /* parent_died */ );
 488   listen_session->session_state = ECHO_SESSION_STATE_CLOSED;
 489   em->state = STATE_DISCONNECTED;
 490 }
 491
 492 static void
 493 session_bound_handler (session_bound_msg_t * mp)
 494 {
 495   echo_main_t *em = &echo_main;
 496   echo_session_t *listen_session;
 497   if (mp->retval)
 498     {
 499       ECHO_FAIL (ECHO_FAIL_BIND, "bind failed: %U", format_api_error,
 500                  clib_net_to_host_u32 (mp->retval));
 501       return;
 502     }
 503   ECHO_LOG (0, "listening on %U:%u", format_ip46_address, mp->lcl_ip,
 504             mp->lcl_is_ip4 ? IP46_TYPE_IP4 : IP46_TYPE_IP6,
 505             clib_net_to_host_u16 (mp->lcl_port));
 506
 507   /* Allocate local session and set it up */
 508   listen_session = echo_session_new (em);
 509   listen_session->session_type = ECHO_SESSION_TYPE_LISTEN;
 510   listen_session->vpp_session_handle = mp->handle;
 511   echo_session_handle_add_del (em, mp->handle, listen_session->session_index);
 512   em->state = STATE_LISTEN;
 513   em->listen_session_index = listen_session->session_index;
 514   if (em->proto_cb_vft->bound_uri_cb)
 515     em->proto_cb_vft->bound_uri_cb (mp, listen_session);
 516 }
 517
 518 static void
 519 session_accepted_handler (session_accepted_msg_t * mp)
 520 {
 521   app_session_evt_t _app_evt, *app_evt = &_app_evt;
 522   session_accepted_reply_msg_t *rmp;
 523   svm_fifo_t *rx_fifo, *tx_fifo;
 524   echo_main_t *em = &echo_main;
 525   echo_session_t *session, *ls;
 526
 527   if (!(ls = echo_get_session_from_handle (em, mp->listener_handle)))
 528     {
 529       ECHO_FAIL (ECHO_FAIL_SESSION_ACCEPTED_BAD_LISTENER,
 530                  "Unknown listener handle 0x%lx", mp->listener_handle);
 531       return;
 532     }
 533   if (wait_for_segment_allocation (mp->segment_handle))
 534     {
 535       ECHO_FAIL (ECHO_FAIL_ACCEPTED_WAIT_FOR_SEG_ALLOC,
 536                  "accepted wait_for_segment_allocation errored");
 537       return;
 538     }
 539
 540   /* Allocate local session and set it up */
 541   session = echo_session_new (em);
 542   session->vpp_session_handle = mp->handle;
 543
 544   rx_fifo = uword_to_pointer (mp->server_rx_fifo, svm_fifo_t *);
 545   rx_fifo->client_session_index = session->session_index;
 546   tx_fifo = uword_to_pointer (mp->server_tx_fifo, svm_fifo_t *);
 547   tx_fifo->client_session_index = session->session_index;
 548
 549   session->rx_fifo = rx_fifo;
 550   session->tx_fifo = tx_fifo;
 551
 552   /* session->transport needed by app_send_dgram */
 553   clib_memcpy_fast (&session->transport.rmt_ip, &mp->rmt.ip,
 554                     sizeof (ip46_address_t));
 555   session->transport.is_ip4 = mp->rmt.is_ip4;
 556   session->transport.rmt_port = mp->rmt.port;
 557   clib_memcpy_fast (&session->transport.lcl_ip, &em->uri_elts.ip,
 558                     sizeof (ip46_address_t));
 559   session->transport.lcl_port = em->uri_elts.port;
 560
 561   session->vpp_session_handle = mp->handle;
 562   session->start = clib_time_now (&em->clib_time);
 563   session->vpp_evt_q = uword_to_pointer (mp->vpp_event_queue_address,
 564                                          svm_msg_q_t *);
 565   session->listener_index = ls->session_index;
 566
 567   /* Add it to lookup table */
 568   ECHO_LOG (1, "Accepted session 0x%lx S[%u] -> 0x%lx S[%u]",
 569             mp->handle, session->session_index,
 570             mp->listener_handle, session->listener_index);
 571   echo_session_handle_add_del (em, mp->handle, session->session_index);
 572
 573   app_alloc_ctrl_evt_to_vpp (session->vpp_evt_q, app_evt,
 574                              SESSION_CTRL_EVT_ACCEPTED_REPLY);
 575   rmp = (session_accepted_reply_msg_t *) app_evt->evt->data;
 576   rmp->handle = mp->handle;
 577   rmp->context = mp->context;
 578   app_send_ctrl_evt_to_vpp (session->vpp_evt_q, app_evt);
 579   em->proto_cb_vft->accepted_cb (mp, session);
 580 }
 581
 582 static void
 583 session_connected_handler (session_connected_msg_t * mp)
 584 {
 585   echo_main_t *em = &echo_main;
 586   echo_session_t *session;
 587   u32 listener_index = htonl (mp->context);
 588   svm_fifo_t *rx_fifo, *tx_fifo;
 589
 590   if (mp->retval)
 591     {
 592       if (em->proto_cb_vft->connected_cb)
 593         em->
 594           proto_cb_vft->connected_cb ((session_connected_bundled_msg_t *) mp,
 595                                       listener_index, 1 /* is_failed */ );
 596       return;
 597     }
 598
 599   session = echo_session_new (em);
 600   if (wait_for_segment_allocation (mp->segment_handle))
 601     {
 602       ECHO_FAIL (ECHO_FAIL_CONNECTED_WAIT_FOR_SEG_ALLOC,
 603                  "connected wait_for_segment_allocation errored");
 604       return;
 605     }
 606
 607   rx_fifo = uword_to_pointer (mp->server_rx_fifo, svm_fifo_t *);
 608   rx_fifo->client_session_index = session->session_index;
 609   tx_fifo = uword_to_pointer (mp->server_tx_fifo, svm_fifo_t *);
 610   tx_fifo->client_session_index = session->session_index;
 611
 612   session->rx_fifo = rx_fifo;
 613   session->tx_fifo = tx_fifo;
 614   session->vpp_session_handle = mp->handle;
 615   session->start = clib_time_now (&em->clib_time);
 616   session->vpp_evt_q = uword_to_pointer (mp->vpp_event_queue_address,
 617                                          svm_msg_q_t *);
 618   session->listener_index = listener_index;
 619   /* session->transport needed by app_send_dgram */
 620   clib_memcpy_fast (&session->transport.lcl_ip, &mp->lcl.ip,
 621                     sizeof (ip46_address_t));
 622   session->transport.is_ip4 = mp->lcl.is_ip4;
 623   session->transport.lcl_port = mp->lcl.port;
 624   clib_memcpy_fast (&session->transport.rmt_ip, &em->uri_elts.ip,
 625                     sizeof (ip46_address_t));
 626   session->transport.rmt_port = em->uri_elts.port;
 627
 628   echo_session_handle_add_del (em, mp->handle, session->session_index);
 629   em->proto_cb_vft->connected_cb ((session_connected_bundled_msg_t *) mp,
 630                                   session->session_index, 0 /* is_failed */ );
 631 }
 632
 633 /*
 634  *
 635  *  End of ECHO callback definitions
 636  *
 637  */
 638
 639 static void
 640 session_disconnected_handler (session_disconnected_msg_t * mp)
 641 {
 642   app_session_evt_t _app_evt, *app_evt = &_app_evt;
 643   session_disconnected_reply_msg_t *rmp;
 644   echo_main_t *em = &echo_main;
 645   echo_session_t *s;
 646   if (!(s = echo_get_session_from_handle (em, mp->handle)))
 647     {
 648       ECHO_LOG (0, "Invalid vpp_session_handle: 0x%lx", mp->handle);
 649       return;
 650     }
 651   if (s->session_state == ECHO_SESSION_STATE_CLOSED)
 652     {
 653       ECHO_LOG (1, "%U: already in ECHO_SESSION_STATE_CLOSED",
 654                 echo_format_session, s);
 655     }
 656   else
 657     {
 658       ECHO_LOG (1, "%U: passive close", echo_format_session, s);
 659       em->proto_cb_vft->disconnected_cb (mp, s);
 660     }
 661   app_alloc_ctrl_evt_to_vpp (s->vpp_evt_q, app_evt,
 662                              SESSION_CTRL_EVT_DISCONNECTED_REPLY);
 663   rmp = (session_disconnected_reply_msg_t *) app_evt->evt->data;
 664   rmp->retval = 0;
 665   rmp->handle = mp->handle;
 666   rmp->context = mp->context;
 667   app_send_ctrl_evt_to_vpp (s->vpp_evt_q, app_evt);
 668 }
 669
 670 static void
 671 session_reset_handler (session_reset_msg_t * mp)
 672 {
 673   app_session_evt_t _app_evt, *app_evt = &_app_evt;
 674   echo_main_t *em = &echo_main;
 675   session_reset_reply_msg_t *rmp;
 676   echo_session_t *s = 0;
 677   if (!(s = echo_get_session_from_handle (em, mp->handle)))
 678     {
 679       ECHO_LOG (0, "Invalid vpp_session_handle: 0x%lx", mp->handle);
 680       return;
 681     }
 682   ECHO_LOG (1, "%U: session reset", echo_format_session, s);
 683   em->proto_cb_vft->reset_cb (mp, s);
 684
 685   app_alloc_ctrl_evt_to_vpp (s->vpp_evt_q, app_evt,
 686                              SESSION_CTRL_EVT_RESET_REPLY);
 687   rmp = (session_reset_reply_msg_t *) app_evt->evt->data;
 688   rmp->retval = 0;
 689   rmp->handle = mp->handle;
 690   app_send_ctrl_evt_to_vpp (s->vpp_evt_q, app_evt);
 691 }
 692
 693 static void
 694 handle_mq_event (session_event_t * e)
 695 {
 696   switch (e->event_type)
 697     {
 698     case SESSION_CTRL_EVT_BOUND:
 699       return session_bound_handler ((session_bound_msg_t *) e->data);
 700     case SESSION_CTRL_EVT_ACCEPTED:
 701       return session_accepted_handler ((session_accepted_msg_t *) e->data);
 702     case SESSION_CTRL_EVT_CONNECTED:
 703       return session_connected_handler ((session_connected_msg_t *) e->data);
 704     case SESSION_CTRL_EVT_DISCONNECTED:
 705       return session_disconnected_handler ((session_disconnected_msg_t *)
 706                                            e->data);
 707     case SESSION_CTRL_EVT_RESET:
 708       return session_reset_handler ((session_reset_msg_t *) e->data);
 709     case SESSION_CTRL_EVT_UNLISTEN_REPLY:
 710       return session_unlisten_handler ((session_unlisten_msg_t *) e->data);
 711     case SESSION_IO_EVT_RX:
 712       break;
 713     default:
 714       ECHO_LOG (0, "unhandled event %u", e->event_type);
 715     }
 716 }
 717
 718 static void
 719 echo_process_rpcs (echo_main_t * em)
 720 {
 721   echo_rpc_msg_t *rpc;
 722   svm_msg_q_msg_t msg;
 723   svm_msg_q_t *mq = em->rpc_msq_queue;
 724
 725   while (em->state < STATE_DATA_DONE && !em->time_to_stop)
 726     {
 727       svm_msg_q_lock (mq);
 728       if (svm_msg_q_is_empty (mq) && svm_msg_q_timedwait (mq, 1))
 729         {
 730           svm_msg_q_unlock (mq);
 731           continue;
 732         }
 733       svm_msg_q_sub_w_lock (mq, &msg);
 734       rpc = svm_msg_q_msg_data (mq, &msg);
 735       svm_msg_q_unlock (mq);
 736       ((echo_rpc_t) rpc->fp) (rpc->arg, rpc->opaque);
 737       svm_msg_q_free_msg (mq, &msg);
 738     }
 739 }
 740
 741 static inline int
 742 echo_mq_dequeue_batch (svm_msg_q_t * mq, svm_msg_q_msg_t * msg_vec,
 743                        u32 n_max_msg)
 744 {
 745   svm_msg_q_msg_t *msg;
 746   u32 n_msgs;
 747   int i;
 748
 749   n_msgs = clib_min (svm_msg_q_size (mq), n_max_msg);
 750   for (i = 0; i < n_msgs; i++)
 751     {
 752       vec_add2 (msg_vec, msg, 1);
 753       svm_msg_q_sub_w_lock (mq, msg);
 754     }
 755   return n_msgs;
 756 }
 757
 758 static void *
 759 echo_mq_thread_fn (void *arg)
 760 {
 761   clib_mem_set_thread_index (); /* First thing to do in client thread */
 762   svm_msg_q_msg_t *msg_vec = 0;
 763   echo_main_t *em = &echo_main;
 764   session_event_t *e;
 765   svm_msg_q_msg_t *msg;
 766   svm_msg_q_t *mq;
 767   int i;
 768
 769   vec_validate (msg_vec, em->evt_q_size);
 770   vec_reset_length (msg_vec);
 771   wait_for_state_change (em, STATE_ATTACHED, 0);
 772   mq = em->app_mq;
 773   if (em->state < STATE_ATTACHED || !mq)
 774     {
 775       ECHO_FAIL (ECHO_FAIL_APP_ATTACH, "Application failed to attach");
 776       pthread_exit (0);
 777     }
 778
 779   while (em->state < STATE_DETACHED && !em->time_to_stop)
 780     {
 781       svm_msg_q_lock (mq);
 782       if (svm_msg_q_is_empty (mq) && svm_msg_q_timedwait (mq, 1))
 783         {
 784           svm_msg_q_unlock (mq);
 785           continue;
 786         }
 787       echo_mq_dequeue_batch (mq, msg_vec, ~0);
 788       svm_msg_q_unlock (mq);
 789
 790       for (i = 0; i < vec_len (msg_vec); i++)
 791         {
 792           msg = vec_elt_at_index (msg_vec, i);
 793           e = svm_msg_q_msg_data (mq, msg);
 794           handle_mq_event (e);
 795           svm_msg_q_free_msg (mq, msg); /* No lock, single thread dequeuing */
 796         }
 797       vec_reset_length (msg_vec);
 798     }
 799   vec_free (msg_vec);
 800   pthread_exit (0);
 801 }
 802
 803 static void
 804 clients_run (echo_main_t * em)
 805 {
 806   u64 i;
 807   echo_notify_event (em, ECHO_EVT_FIRST_QCONNECT);
 808   for (i = 0; i < em->n_connects; i++)
 809     echo_send_connect (SESSION_INVALID_HANDLE, SESSION_INVALID_INDEX);
 810   wait_for_state_change (em, STATE_READY, 0);
 811   ECHO_LOG (1, "App is ready");
 812   echo_process_rpcs (em);
 813 }
 814
 815 static void
 816 server_run (echo_main_t * em)
 817 {
 818   echo_session_t *ls;
 819   echo_send_listen (em);
 820   wait_for_state_change (em, STATE_READY, 0);
 821   ECHO_LOG (1, "App is ready");
 822   echo_process_rpcs (em);
 823   /* Cleanup */
 824   ECHO_LOG (1, "Unbind listen port");
 825   ls = pool_elt_at_index (em->sessions, em->listen_session_index);
 826   echo_send_unbind (em, ls);
 827   if (wait_for_state_change (em, STATE_DISCONNECTED, TIMEOUT))
 828     {
 829       ECHO_FAIL (ECHO_FAIL_SERVER_DISCONNECT_TIMEOUT,
 830                  "Timeout waiting for state disconnected");
 831       return;
 832     }
 833 }
 834
 835 static void
 836 print_usage_and_exit (void)
 837 {
 838   echo_main_t *em = &echo_main;
 839   int i;
 840   fprintf (stderr,
 841            "Usage: vpp_echo [socket-name SOCKET] [client|server] [uri URI] [OPTIONS]\n"
 842            "Generates traffic and assert correct teardown of the QUIC hoststack\n"
 843            "\n"
 844            "  socket-name PATH    Specify the binary socket path to connect to VPP\n"
 845            "  use-svm-api         Use SVM API to connect to VPP\n"
 846            "  test-bytes[:assert] Check data correctness when receiving (assert fails on first error)\n"
 847            "  fifo-size N         Use N Kb fifos\n"
 848            "  mq-size N           Use N event slots for vpp_echo <-> vpp events\n"
 849            "  rx-buf N[Kb|Mb|GB]  Use N[Kb|Mb|GB] RX buffer\n"
 850            "  tx-buf N[Kb|Mb|GB]  Use N[Kb|Mb|GB] TX test buffer\n"
 851            "  appns NAMESPACE     Use the namespace NAMESPACE\n"
 852            "  all-scope           all-scope option\n"
 853            "  local-scope         local-scope option\n"
 854            "  global-scope        global-scope option\n"
 855            "  secret SECRET       set namespace secret\n"
 856            "  chroot prefix PATH  Use PATH as memory root path\n"
 857            "  sclose=[Y|N|W]      When a stream is done,    pass[N] send[Y] or wait[W] for close\n"
 858            "\n"
 859            "  time START:END      Time between evts START & END, events being :\n"
 860            "                       start - Start of the app\n"
 861            "                       qconnect    - first Connection connect sent\n"
 862            "                       qconnected  - last Connection connected\n"
 863            "                       sconnect    - first Stream connect sent\n"
 864            "                       sconnected  - last Stream got connected\n"
 865            "                       lastbyte    - Last expected byte received\n"
 866            "                       exit        - Exiting of the app\n"
 867            "  rx-results-diff     Rx results different to pass test\n"
 868            "  tx-results-diff     Tx results different to pass test\n"
 869            "  json                Output global stats in json\n"
 870            "  log=N               Set the log level to [0: no output, 1:errors, 2:log]\n"
 871            "\n"
 872            "  nclients N          Open N clients sending data\n"
 873            "  nthreads N          Use N busy loop threads for data [in addition to main & msg queue]\n"
 874            "  TX=1337[Kb|Mb|GB]   Send 1337 [K|M|G]bytes, use TX=RX to reflect the data\n"
 875            "  RX=1337[Kb|Mb|GB]   Expect 1337 [K|M|G]bytes\n" "\n");
 876   for (i = 0; i < TRANSPORT_N_PROTO; i++)
 877     {
 878       echo_proto_cb_vft_t *vft = em->available_proto_cb_vft[i];
 879       if (vft && vft->print_usage_cb)
 880         vft->print_usage_cb ();
 881     }
 882   fprintf (stderr, "\nDefault configuration is :\n"
 883            " server nclients 1/1 RX=64Kb TX=RX\n"
 884            " client nclients 1/1 RX=64Kb TX=64Kb\n");
 885   exit (ECHO_FAIL_USAGE);
 886 }
 887
 888 static int
 889 echo_process_each_proto_opts (unformat_input_t * a)
 890 {
 891   echo_main_t *em = &echo_main;
 892   int i, rv;
 893   for (i = 0; i < TRANSPORT_N_PROTO; i++)
 894     {
 895       echo_proto_cb_vft_t *vft = em->available_proto_cb_vft[i];
 896       if (vft && vft->process_opts_cb)
 897         if ((rv = vft->process_opts_cb (a)))
 898           return rv;
 899     }
 900   return 0;
 901 }
 902
 903 static void
 904 echo_set_each_proto_defaults_before_opts (echo_main_t * em)
 905 {
 906   int i;
 907   for (i = 0; i < TRANSPORT_N_PROTO; i++)
 908     {
 909       echo_proto_cb_vft_t *vft = em->available_proto_cb_vft[i];
 910       if (vft && vft->set_defaults_before_opts_cb)
 911         vft->set_defaults_before_opts_cb ();
 912     }
 913 }
 914
 915 void
 916 echo_process_opts (int argc, char **argv)
 917 {
 918   echo_main_t *em = &echo_main;
 919   unformat_input_t _argv, *a = &_argv;
 920   u32 tmp;
 921   u8 *chroot_prefix;
 922   u8 *uri = 0;
 923   u8 default_f_active;
 924
 925   unformat_init_command_line (a, argv);
 926   while (unformat_check_input (a) != UNFORMAT_END_OF_INPUT)
 927     {
 928       if (echo_process_each_proto_opts (a))
 929         ;
 930       else if (unformat (a, "chroot prefix %s", &chroot_prefix))
 931         vl_set_memory_root_path ((char *) chroot_prefix);
 932       else if (unformat (a, "uri %s", &uri))
 933         em->uri = format (0, "%s%c", uri, 0);
 934       else if (unformat (a, "server"))
 935         em->i_am_master = 1;
 936       else if (unformat (a, "client"))
 937         em->i_am_master = 0;
 938       else if (unformat (a, "test-bytes:assert"))
 939         em->test_return_packets = RETURN_PACKETS_ASSERT;
 940       else if (unformat (a, "test-bytes"))
 941         em->test_return_packets = RETURN_PACKETS_LOG_WRONG;
 942       else if (unformat (a, "socket-name %s", &em->socket_name))
 943         ;
 944       else if (unformat (a, "use-svm-api"))
 945         em->use_sock_api = 0;
 946       else if (unformat (a, "fifo-size %d", &tmp))
 947         em->fifo_size = tmp << 10;
 948       else if (unformat (a, "prealloc-fifos %u", &em->prealloc_fifo_pairs))
 949         ;
 950       else
 951         if (unformat (a, "rx-buf %U", unformat_data_size, &em->rx_buf_size))
 952         ;
 953       else
 954         if (unformat (a, "tx-buf %U", unformat_data_size, &em->tx_buf_size))
 955         ;
 956       else if (unformat (a, "mq-size %d", &em->evt_q_size))
 957         ;
 958       else if (unformat (a, "nclients %d", &em->n_clients))
 959         {
 960           em->n_sessions = em->n_clients + 1;
 961           em->n_connects = em->n_clients;
 962         }
 963       else if (unformat (a, "nthreads %d", &em->n_rx_threads))
 964         ;
 965       else
 966         if (unformat
 967             (a, "crypto %U", echo_unformat_crypto_engine,
 968              &em->crypto_ctx_engine))
 969         ;
 970       else if (unformat (a, "appns %_%v%_", &em->appns_id))
 971         ;
 972       else if (unformat (a, "all-scope"))
 973         em->appns_flags |= (APP_OPTIONS_FLAGS_USE_GLOBAL_SCOPE
 974                             | APP_OPTIONS_FLAGS_USE_LOCAL_SCOPE);
 975       else if (unformat (a, "local-scope"))
 976         em->appns_flags = APP_OPTIONS_FLAGS_USE_LOCAL_SCOPE;
 977       else if (unformat (a, "global-scope"))
 978         em->appns_flags = APP_OPTIONS_FLAGS_USE_GLOBAL_SCOPE;
 979       else if (unformat (a, "secret %lu", &em->appns_secret))
 980         ;
 981       else if (unformat (a, "TX=RX"))
 982         em->data_source = ECHO_RX_DATA_SOURCE;
 983       else if (unformat (a, "TX=%U", unformat_data_size, &em->bytes_to_send))
 984         ;
 985       else if (unformat (a, "RX=%U", unformat_data_size,
 986                          &em->bytes_to_receive))
 987         ;
 988       else if (unformat (a, "rx-results-diff"))
 989         em->rx_results_diff = 1;
 990       else if (unformat (a, "tx-results-diff"))
 991         em->tx_results_diff = 1;
 992       else if (unformat (a, "json"))
 993         em->output_json = 1;
 994       else if (unformat (a, "wait-for-gdb"))
 995         em->wait_for_gdb = 1;
 996       else if (unformat (a, "log=%d", &em->log_lvl))
 997         ;
 998       else if (unformat (a, "sclose=%U",
 999                          echo_unformat_close, &em->send_stream_disconnects))
1000         ;
1001       else if (unformat (a, "time %U:%U",
1002                          echo_unformat_timing_event, &em->timing.start_event,
1003                          echo_unformat_timing_event, &em->timing.end_event))
1004         ;
1005       else
1006         print_usage_and_exit ();
1007     }
1008
1009   /* setting default for unset values
1010    *
1011    * bytes_to_send / bytes_to_receive & data_source  */
1012   if (em->bytes_to_receive == (u64) ~ 0)
1013     em->bytes_to_receive = 64 << 10;    /* default */
1014   if (em->bytes_to_send == (u64) ~ 0)
1015     em->bytes_to_send = 64 << 10;       /* default */
1016   else if (em->bytes_to_send == 0)
1017     em->data_source = ECHO_NO_DATA_SOURCE;
1018   else
1019     em->data_source = ECHO_TEST_DATA_SOURCE;
1020
1021   if (em->data_source == ECHO_INVALID_DATA_SOURCE)
1022     em->data_source =
1023       em->i_am_master ? ECHO_RX_DATA_SOURCE : ECHO_TEST_DATA_SOURCE;
1024   if (em->data_source == ECHO_RX_DATA_SOURCE)
1025     em->bytes_to_send = em->bytes_to_receive;
1026
1027   /* disconnect flags  */
1028   if (em->i_am_master)
1029     default_f_active =
1030       em->bytes_to_send == 0 ? ECHO_CLOSE_F_ACTIVE : ECHO_CLOSE_F_PASSIVE;
1031   else
1032     default_f_active =
1033       em->bytes_to_receive == 0 ? ECHO_CLOSE_F_PASSIVE : ECHO_CLOSE_F_ACTIVE;
1034   if (em->send_stream_disconnects == ECHO_CLOSE_F_INVALID)
1035     em->send_stream_disconnects = default_f_active;
1036
1037   if (em->wait_for_gdb)
1038     {
1039       volatile u64 nop = 0;
1040
1041       clib_warning ("Waiting for gdb...");
1042       while (em->wait_for_gdb)
1043         nop++;
1044       clib_warning ("Resuming execution (%llu)!", nop);
1045     }
1046 }
1047
1048 void
1049 echo_process_uri (echo_main_t * em)
1050 {
1051   unformat_input_t _input, *input = &_input;
1052   u32 port;
1053   unformat_init_string (input, (char *) em->uri, strlen ((char *) em->uri));
1054   if (unformat
1055       (input, "%U://%U/%d", unformat_transport_proto,
1056        &em->uri_elts.transport_proto, unformat_ip4_address,
1057        &em->uri_elts.ip.ip4, &port))
1058     em->uri_elts.is_ip4 = 1;
1059   else
1060     if (unformat
1061         (input, "%U://%U/%d", unformat_transport_proto,
1062          &em->uri_elts.transport_proto, unformat_ip6_address,
1063          &em->uri_elts.ip.ip6, &port))
1064     em->uri_elts.is_ip4 = 0;
1065   else
1066     ECHO_FAIL (ECHO_FAIL_INVALID_URI, "Unable to process uri");
1067   em->uri_elts.port = clib_host_to_net_u16 (port);
1068   unformat_free (input);
1069 }
1070
1071 static void __clib_constructor
1072 vpp_echo_init ()
1073 {
1074   /* init memory before proto register themselves */
1075   echo_main_t *em = &echo_main;
1076   clib_mem_init_thread_safe (0, 256 << 20);
1077   clib_memset (em, 0, sizeof (*em));
1078 }
1079
1080 int
1081 main (int argc, char **argv)
1082 {
1083   echo_main_t *em = &echo_main;
1084   fifo_segment_main_t *sm = &em->segment_main;
1085   char *app_name;
1086   u64 i;
1087   svm_msg_q_cfg_t _cfg, *cfg = &_cfg;
1088   u32 rpc_queue_size = 64 << 10;
1089
1090   em->session_index_by_vpp_handles = hash_create (0, sizeof (uword));
1091   clib_spinlock_init (&em->sid_vpp_handles_lock);
1092   em->shared_segment_handles = hash_create (0, sizeof (uword));
1093   clib_spinlock_init (&em->segment_handles_lock);
1094   em->socket_name = format (0, "%s%c", API_SOCKET_FILE, 0);
1095   em->use_sock_api = 1;
1096   em->fifo_size = 64 << 10;
1097   em->prealloc_fifo_pairs = 16;
1098   em->n_clients = 1;
1099   em->n_connects = 1;
1100   em->n_sessions = 2;
1101   em->max_test_msg = 50;
1102   em->time_to_stop = 0;
1103   em->i_am_master = 1;
1104   em->n_rx_threads = 4;
1105   em->evt_q_size = 256;
1106   em->test_return_packets = RETURN_PACKETS_NOTEST;
1107   em->timing.start_event = ECHO_EVT_FIRST_QCONNECT;
1108   em->timing.end_event = ECHO_EVT_LAST_BYTE;
1109   em->bytes_to_receive = ~0;    /* defaulted when we know if server/client */
1110   em->bytes_to_send = ~0;       /* defaulted when we know if server/client */
1111   em->rx_buf_size = 1 << 20;
1112   em->tx_buf_size = 1 << 20;
1113   em->data_source = ECHO_INVALID_DATA_SOURCE;
1114   em->uri = format (0, "%s%c", "tcp://0.0.0.0/1234", 0);
1115   em->crypto_ctx_engine = CRYPTO_ENGINE_NONE;
1116   echo_set_each_proto_defaults_before_opts (em);
1117   echo_process_opts (argc, argv);
1118   echo_process_uri (em);
1119   em->proto_cb_vft = em->available_proto_cb_vft[em->uri_elts.transport_proto];
1120   if (!em->proto_cb_vft)
1121     {
1122       ECHO_FAIL (ECHO_FAIL_PROTOCOL_NOT_SUPPORTED,
1123                  "Protocol %U is not supported",
1124                  format_transport_proto, em->uri_elts.transport_proto);
1125       goto exit_on_error;
1126     }
1127   if (em->proto_cb_vft->set_defaults_after_opts_cb)
1128     em->proto_cb_vft->set_defaults_after_opts_cb ();
1129
1130   em->stats.rx_expected = em->bytes_to_receive * em->n_clients;
1131   em->stats.tx_expected = em->bytes_to_send * em->n_clients;
1132
1133   vec_validate (em->data_thread_handles, em->n_rx_threads);
1134   vec_validate (em->data_thread_args, em->n_clients);
1135   for (i = 0; i < em->n_clients; i++)
1136     em->data_thread_args[i] = SESSION_INVALID_INDEX;
1137   clib_time_init (&em->clib_time);
1138   init_error_string_table ();
1139   fifo_segment_main_init (sm, HIGH_SEGMENT_BASEVA, 20);
1140   vec_validate (em->connect_test_data, em->tx_buf_size);
1141   for (i = 0; i < em->tx_buf_size; i++)
1142     em->connect_test_data[i] = i & 0xff;
1143
1144   /* *INDENT-OFF* */
1145   svm_msg_q_ring_cfg_t rc[1] = {
1146     {rpc_queue_size, sizeof (echo_rpc_msg_t), 0},
1147   };
1148   /* *INDENT-ON* */
1149   cfg->consumer_pid = getpid ();
1150   cfg->n_rings = 1;
1151   cfg->q_nitems = rpc_queue_size;
1152   cfg->ring_cfgs = rc;
1153   em->rpc_msq_queue = svm_msg_q_alloc (cfg);
1154
1155   signal (SIGINT, stop_signal);
1156   signal (SIGQUIT, stop_signal);
1157   signal (SIGTERM, stop_signal);
1158   echo_api_hookup (em);
1159
1160   app_name = em->i_am_master ? "echo_server" : "echo_client";
1161   if (connect_to_vpp (app_name))
1162     {
1163       svm_region_exit ();
1164       ECHO_FAIL (ECHO_FAIL_CONNECT_TO_VPP, "Couldn't connect to vpp");
1165       goto exit_on_error;
1166     }
1167
1168   echo_session_prealloc (em);
1169   echo_notify_event (em, ECHO_EVT_START);
1170
1171   echo_send_attach (em);
1172   if (wait_for_state_change (em, STATE_ATTACHED_NO_CERT, TIMEOUT))
1173     {
1174       ECHO_FAIL (ECHO_FAIL_ATTACH_TO_VPP,
1175                  "Couldn't attach to vpp, did you run <session enable> ?");
1176       goto exit_on_error;
1177     }
1178
1179   if (em->crypto_ctx_engine == CRYPTO_ENGINE_NONE)
1180     /* when no crypto engine specified, dont expect crypto ctx */
1181     em->state = STATE_ATTACHED;
1182   else
1183     {
1184       ECHO_LOG (1, "Adding crypto context %U", echo_format_crypto_engine,
1185                 em->crypto_ctx_engine);
1186       echo_send_add_crypto_ctx (em);
1187       if (wait_for_state_change (em, STATE_ATTACHED, TIMEOUT))
1188         {
1189           ECHO_FAIL (ECHO_FAIL_APP_ATTACH,
1190                      "Couldn't add crypto context to vpp\n");
1191           exit (1);
1192         }
1193     }
1194
1195   if (pthread_create (&em->mq_thread_handle,
1196                       NULL /*attr */ , echo_mq_thread_fn, 0))
1197     {
1198       ECHO_FAIL (ECHO_FAIL_PTHREAD_CREATE, "pthread create errored");
1199       goto exit_on_error;
1200     }
1201
1202   for (i = 0; i < em->n_rx_threads; i++)
1203     if (pthread_create (&em->data_thread_handles[i],
1204                         NULL /*attr */ , echo_data_thread_fn, (void *) i))
1205       {
1206         ECHO_FAIL (ECHO_FAIL_PTHREAD_CREATE,
1207                    "pthread create errored (index %d)", i);
1208         goto exit_on_error;
1209       }
1210   if (em->i_am_master)
1211     server_run (em);
1212   else
1213     clients_run (em);
1214   echo_notify_event (em, ECHO_EVT_EXIT);
1215   echo_free_sessions (em);
1216   echo_send_detach (em);
1217   if (wait_for_state_change (em, STATE_DETACHED, TIMEOUT))
1218     {
1219       ECHO_FAIL (ECHO_FAIL_DETACH, "Couldn't detach from vpp");
1220       goto exit_on_error;
1221     }
1222   int *rv;
1223   pthread_join (em->mq_thread_handle, (void **) &rv);
1224   if (rv)
1225     {
1226       ECHO_FAIL (ECHO_FAIL_MQ_PTHREAD, "mq pthread errored %d", rv);
1227       goto exit_on_error;
1228     }
1229   if (em->use_sock_api)
1230     vl_socket_client_disconnect ();
1231   else
1232     vl_client_disconnect_from_vlib ();
1233   echo_assert_test_suceeded (em);
1234 exit_on_error:
1235   ECHO_LOG (0, "Test complete !\n");
1236   if (em->output_json)
1237     print_global_json_stats (em);
1238   else
1239     print_global_stats (em);
1240   vec_free (em->fail_descr);
1241   exit (em->has_failed);
1242 }
1243
1244 /*
1245  * fd.io coding-style-patch-verification: ON
1246  *
1247  * Local Variables:
1248  * eval: (c-set-style "gnu")
1249  * End:
1250  */