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