session: first approximation implementation of tls
[vpp.git] / src / vnet / session-apps / echo_client.c
1 /*
2  * echo_client.c - vpp built-in echo client code
3  *
4  * Copyright (c) 2017 by Cisco and/or its affiliates.
5  * Licensed under the Apache License, Version 2.0 (the "License");
6  * you may not use this file except in compliance with the License.
7  * You may obtain a copy of the License at:
8  *
9  *     http://www.apache.org/licenses/LICENSE-2.0
10  *
11  * Unless required by applicable law or agreed to in writing, software
12  * distributed under the License is distributed on an "AS IS" BASIS,
13  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14  * See the License for the specific language governing permissions and
15  * limitations under the License.
16  */
17
18 #include <vnet/vnet.h>
19 #include <vlibapi/api.h>
20 #include <vlibmemory/api.h>
21 #include <vnet/session-apps/echo_client.h>
22
23 echo_client_main_t echo_client_main;
24
25 #define ECHO_CLIENT_DBG (0)
26
27 static void
28 signal_evt_to_cli_i (int *code)
29 {
30   echo_client_main_t *ecm = &echo_client_main;
31   ASSERT (vlib_get_thread_index () == 0);
32   vlib_process_signal_event (ecm->vlib_main, ecm->cli_node_index, *code, 0);
33 }
34
35 static void
36 signal_evt_to_cli (int code)
37 {
38   if (vlib_get_thread_index () != 0)
39     vl_api_rpc_call_main_thread (signal_evt_to_cli_i, (u8 *) & code,
40                                  sizeof (code));
41   else
42     signal_evt_to_cli_i (&code);
43 }
44
45 static void
46 send_data_chunk (echo_client_main_t * ecm, session_t * s)
47 {
48   u8 *test_data = ecm->connect_test_data;
49   int test_buf_offset;
50   u32 bytes_this_chunk;
51   session_fifo_event_t evt;
52   svm_fifo_t *txf;
53   int rv;
54
55   ASSERT (vec_len (test_data) > 0);
56
57   test_buf_offset = s->bytes_sent % vec_len (test_data);
58   bytes_this_chunk = vec_len (test_data) - test_buf_offset;
59
60   bytes_this_chunk = bytes_this_chunk < s->bytes_to_send
61     ? bytes_this_chunk : s->bytes_to_send;
62
63   txf = s->server_tx_fifo;
64   rv = svm_fifo_enqueue_nowait (txf, bytes_this_chunk,
65                                 test_data + test_buf_offset);
66
67   /* If we managed to enqueue data... */
68   if (rv > 0)
69     {
70       /* Account for it... */
71       s->bytes_to_send -= rv;
72       s->bytes_sent += rv;
73
74       if (ECHO_CLIENT_DBG)
75         {
76           /* *INDENT-OFF* */
77           ELOG_TYPE_DECLARE (e) =
78             {
79               .format = "tx-enq: xfer %d bytes, sent %u remain %u",
80               .format_args = "i4i4i4",
81             };
82           /* *INDENT-ON* */
83           struct
84           {
85             u32 data[3];
86           } *ed;
87           ed = ELOG_DATA (&vlib_global_main.elog_main, e);
88           ed->data[0] = rv;
89           ed->data[1] = s->bytes_sent;
90           ed->data[2] = s->bytes_to_send;
91         }
92
93       /* Poke the session layer */
94       if (svm_fifo_set_event (txf))
95         {
96           /* Fabricate TX event, send to vpp */
97           evt.fifo = txf;
98           evt.event_type = FIFO_EVENT_APP_TX;
99
100           if (svm_queue_add
101               (ecm->vpp_event_queue[txf->master_thread_index], (u8 *) & evt,
102                0 /* do wait for mutex */ ))
103             clib_warning ("could not enqueue event");
104         }
105     }
106 }
107
108 static void
109 receive_data_chunk (echo_client_main_t * ecm, session_t * s)
110 {
111   svm_fifo_t *rx_fifo = s->server_rx_fifo;
112   u32 my_thread_index = vlib_get_thread_index ();
113   int n_read, i;
114
115   if (ecm->test_bytes)
116     {
117       n_read = svm_fifo_dequeue_nowait (rx_fifo,
118                                         vec_len (ecm->rx_buf
119                                                  [my_thread_index]),
120                                         ecm->rx_buf[my_thread_index]);
121     }
122   else
123     {
124       n_read = svm_fifo_max_dequeue (rx_fifo);
125       svm_fifo_dequeue_drop (rx_fifo, n_read);
126     }
127
128   if (n_read > 0)
129     {
130       if (ECHO_CLIENT_DBG)
131         {
132           /* *INDENT-OFF* */
133           ELOG_TYPE_DECLARE (e) =
134             {
135               .format = "rx-deq: %d bytes",
136               .format_args = "i4",
137             };
138           /* *INDENT-ON* */
139           struct
140           {
141             u32 data[1];
142           } *ed;
143           ed = ELOG_DATA (&vlib_global_main.elog_main, e);
144           ed->data[0] = n_read;
145         }
146
147       if (ecm->test_bytes)
148         {
149           for (i = 0; i < n_read; i++)
150             {
151               if (ecm->rx_buf[my_thread_index][i]
152                   != ((s->bytes_received + i) & 0xff))
153                 {
154                   clib_warning ("read %d error at byte %lld, 0x%x not 0x%x",
155                                 n_read, s->bytes_received + i,
156                                 ecm->rx_buf[my_thread_index][i],
157                                 ((s->bytes_received + i) & 0xff));
158                   ecm->test_failed = 1;
159                 }
160             }
161         }
162       s->bytes_to_receive -= n_read;
163       s->bytes_received += n_read;
164     }
165 }
166
167 static uword
168 echo_client_node_fn (vlib_main_t * vm, vlib_node_runtime_t * node,
169                      vlib_frame_t * frame)
170 {
171   echo_client_main_t *ecm = &echo_client_main;
172   int my_thread_index = vlib_get_thread_index ();
173   session_t *sp;
174   int i;
175   int delete_session;
176   u32 *connection_indices;
177   u32 *connections_this_batch;
178   u32 nconnections_this_batch;
179
180   connection_indices = ecm->connection_index_by_thread[my_thread_index];
181   connections_this_batch =
182     ecm->connections_this_batch_by_thread[my_thread_index];
183
184   if ((ecm->run_test == 0) ||
185       ((vec_len (connection_indices) == 0)
186        && vec_len (connections_this_batch) == 0))
187     return 0;
188
189   /* Grab another pile of connections */
190   if (PREDICT_FALSE (vec_len (connections_this_batch) == 0))
191     {
192       nconnections_this_batch =
193         clib_min (ecm->connections_per_batch, vec_len (connection_indices));
194
195       ASSERT (nconnections_this_batch > 0);
196       vec_validate (connections_this_batch, nconnections_this_batch - 1);
197       clib_memcpy (connections_this_batch,
198                    connection_indices + vec_len (connection_indices)
199                    - nconnections_this_batch,
200                    nconnections_this_batch * sizeof (u32));
201       _vec_len (connection_indices) -= nconnections_this_batch;
202     }
203
204   if (PREDICT_FALSE (ecm->prev_conns != ecm->connections_per_batch
205                      && ecm->prev_conns == vec_len (connections_this_batch)))
206     {
207       ecm->repeats++;
208       ecm->prev_conns = vec_len (connections_this_batch);
209       if (ecm->repeats == 500000)
210         {
211           clib_warning ("stuck clients");
212         }
213     }
214   else
215     {
216       ecm->prev_conns = vec_len (connections_this_batch);
217       ecm->repeats = 0;
218     }
219
220   for (i = 0; i < vec_len (connections_this_batch); i++)
221     {
222       delete_session = 1;
223
224       sp = pool_elt_at_index (ecm->sessions, connections_this_batch[i]);
225
226       if (sp->bytes_to_send > 0)
227         {
228           send_data_chunk (ecm, sp);
229           delete_session = 0;
230         }
231       if (sp->bytes_to_receive > 0)
232         {
233           receive_data_chunk (ecm, sp);
234           delete_session = 0;
235         }
236       if (PREDICT_FALSE (delete_session == 1))
237         {
238           u32 index, thread_index;
239           stream_session_t *s;
240
241           __sync_fetch_and_add (&ecm->tx_total, sp->bytes_sent);
242           __sync_fetch_and_add (&ecm->rx_total, sp->bytes_received);
243
244           session_parse_handle (sp->vpp_session_handle,
245                                 &index, &thread_index);
246           s = session_get_if_valid (index, thread_index);
247
248           if (s)
249             {
250               vnet_disconnect_args_t _a, *a = &_a;
251               a->handle = session_handle (s);
252               a->app_index = ecm->app_index;
253               vnet_disconnect_session (a);
254
255               vec_delete (connections_this_batch, 1, i);
256               i--;
257               __sync_fetch_and_add (&ecm->ready_connections, -1);
258             }
259           else
260             {
261               clib_warning ("session AWOL?");
262               vec_delete (connections_this_batch, 1, i);
263             }
264
265           /* Kick the debug CLI process */
266           if (ecm->ready_connections == 0)
267             {
268               signal_evt_to_cli (2);
269             }
270         }
271     }
272
273   ecm->connection_index_by_thread[my_thread_index] = connection_indices;
274   ecm->connections_this_batch_by_thread[my_thread_index] =
275     connections_this_batch;
276   return 0;
277 }
278
279 /* *INDENT-OFF* */
280 VLIB_REGISTER_NODE (echo_clients_node) =
281 {
282   .function = echo_client_node_fn,
283   .name = "echo-clients",
284   .type = VLIB_NODE_TYPE_INPUT,
285   .state = VLIB_NODE_STATE_DISABLED,
286 };
287 /* *INDENT-ON* */
288
289 static int
290 create_api_loopback (echo_client_main_t * ecm)
291 {
292   api_main_t *am = &api_main;
293   vl_shmem_hdr_t *shmem_hdr;
294
295   shmem_hdr = am->shmem_hdr;
296   ecm->vl_input_queue = shmem_hdr->vl_input_queue;
297   ecm->my_client_index = vl_api_memclnt_create_internal ("echo_client",
298                                                          ecm->vl_input_queue);
299   return 0;
300 }
301
302 static int
303 echo_clients_init (vlib_main_t * vm)
304 {
305   echo_client_main_t *ecm = &echo_client_main;
306   vlib_thread_main_t *vtm = vlib_get_thread_main ();
307   u32 num_threads;
308   int i;
309
310   if (create_api_loopback (ecm))
311     return -1;
312
313   num_threads = 1 /* main thread */  + vtm->n_threads;
314
315   /* Init test data. Bigecmuffer */
316   vec_validate (ecm->connect_test_data, 1024 * 1024 - 1);
317   for (i = 0; i < vec_len (ecm->connect_test_data); i++)
318     ecm->connect_test_data[i] = i & 0xff;
319
320   vec_validate (ecm->rx_buf, num_threads - 1);
321   for (i = 0; i < num_threads; i++)
322     vec_validate (ecm->rx_buf[i], vec_len (ecm->connect_test_data) - 1);
323
324   ecm->is_init = 1;
325
326   vec_validate (ecm->connection_index_by_thread, vtm->n_vlib_mains);
327   vec_validate (ecm->connections_this_batch_by_thread, vtm->n_vlib_mains);
328   vec_validate (ecm->vpp_event_queue, vtm->n_vlib_mains);
329
330   return 0;
331 }
332
333 static int
334 echo_clients_session_connected_callback (u32 app_index, u32 api_context,
335                                          stream_session_t * s, u8 is_fail)
336 {
337   echo_client_main_t *ecm = &echo_client_main;
338   session_t *session;
339   u32 session_index;
340   u8 thread_index = vlib_get_thread_index ();
341
342   if (is_fail)
343     {
344       clib_warning ("connection %d failed!", api_context);
345       signal_evt_to_cli (-1);
346       return 0;
347     }
348
349   ASSERT (s->thread_index == thread_index);
350
351   if (!ecm->vpp_event_queue[thread_index])
352     ecm->vpp_event_queue[thread_index] =
353       session_manager_get_vpp_event_queue (thread_index);
354
355   /*
356    * Setup session
357    */
358   clib_spinlock_lock_if_init (&ecm->sessions_lock);
359   pool_get (ecm->sessions, session);
360   clib_spinlock_unlock_if_init (&ecm->sessions_lock);
361
362   memset (session, 0, sizeof (*session));
363   session_index = session - ecm->sessions;
364   session->bytes_to_send = ecm->bytes_to_send;
365   session->bytes_to_receive = ecm->no_return ? 0ULL : ecm->bytes_to_send;
366   session->server_rx_fifo = s->server_rx_fifo;
367   session->server_rx_fifo->client_session_index = session_index;
368   session->server_tx_fifo = s->server_tx_fifo;
369   session->server_tx_fifo->client_session_index = session_index;
370   session->vpp_session_handle = session_handle (s);
371
372   vec_add1 (ecm->connection_index_by_thread[thread_index], session_index);
373   __sync_fetch_and_add (&ecm->ready_connections, 1);
374   if (ecm->ready_connections == ecm->expected_connections)
375     {
376       ecm->run_test = 1;
377       /* Signal the CLI process that the action is starting... */
378       signal_evt_to_cli (1);
379     }
380
381   return 0;
382 }
383
384 static void
385 echo_clients_session_reset_callback (stream_session_t * s)
386 {
387   if (s->session_state == SESSION_STATE_READY)
388     clib_warning ("Reset active connection %U", format_stream_session, s, 2);
389   stream_session_cleanup (s);
390   return;
391 }
392
393 static int
394 echo_clients_session_create_callback (stream_session_t * s)
395 {
396   return 0;
397 }
398
399 static void
400 echo_clients_session_disconnect_callback (stream_session_t * s)
401 {
402   echo_client_main_t *ecm = &echo_client_main;
403   vnet_disconnect_args_t _a, *a = &_a;
404   a->handle = session_handle (s);
405   a->app_index = ecm->app_index;
406   vnet_disconnect_session (a);
407   return;
408 }
409
410 static int
411 echo_clients_rx_callback (stream_session_t * s)
412 {
413   return 0;
414 }
415
416 int
417 echo_client_add_segment_callback (u32 client_index, const ssvm_private_t * sp)
418 {
419   /* New heaps may be added */
420   return 0;
421 }
422
423 /* *INDENT-OFF* */
424 static session_cb_vft_t echo_clients = {
425   .session_reset_callback = echo_clients_session_reset_callback,
426   .session_connected_callback = echo_clients_session_connected_callback,
427   .session_accept_callback = echo_clients_session_create_callback,
428   .session_disconnect_callback = echo_clients_session_disconnect_callback,
429   .builtin_app_rx_callback = echo_clients_rx_callback,
430   .add_segment_callback = echo_client_add_segment_callback
431 };
432 /* *INDENT-ON* */
433
434 static clib_error_t *
435 echo_clients_attach (u8 * appns_id, u64 appns_flags, u64 appns_secret)
436 {
437   u32 prealloc_fifos, segment_size = 256 << 20;
438   echo_client_main_t *ecm = &echo_client_main;
439   vnet_app_attach_args_t _a, *a = &_a;
440   u64 options[16];
441   clib_error_t *error = 0;
442
443   memset (a, 0, sizeof (*a));
444   memset (options, 0, sizeof (options));
445
446   a->api_client_index = ecm->my_client_index;
447   a->session_cb_vft = &echo_clients;
448
449   prealloc_fifos = ecm->prealloc_fifos ? ecm->expected_connections : 1;
450
451   if (ecm->private_segment_size)
452     segment_size = ecm->private_segment_size;
453
454   options[APP_OPTIONS_ACCEPT_COOKIE] = 0x12345678;
455   options[APP_OPTIONS_SEGMENT_SIZE] = segment_size;
456   options[APP_OPTIONS_ADD_SEGMENT_SIZE] = segment_size;
457   options[APP_OPTIONS_RX_FIFO_SIZE] = ecm->fifo_size;
458   options[APP_OPTIONS_TX_FIFO_SIZE] = ecm->fifo_size;
459   options[APP_OPTIONS_PRIVATE_SEGMENT_COUNT] = ecm->private_segment_count;
460   options[APP_OPTIONS_PREALLOC_FIFO_PAIRS] = prealloc_fifos;
461
462   options[APP_OPTIONS_FLAGS] = APP_OPTIONS_FLAGS_IS_BUILTIN;
463   if (appns_id)
464     {
465       options[APP_OPTIONS_FLAGS] |= appns_flags;
466       options[APP_OPTIONS_NAMESPACE_SECRET] = appns_secret;
467     }
468   a->options = options;
469   a->namespace_id = appns_id;
470
471   if ((error = vnet_application_attach (a)))
472     return error;
473
474   ecm->app_index = a->app_index;
475   return 0;
476 }
477
478 static int
479 echo_clients_detach ()
480 {
481   echo_client_main_t *ecm = &echo_client_main;
482   vnet_app_detach_args_t _da, *da = &_da;
483   int rv;
484
485   da->app_index = ecm->app_index;
486   rv = vnet_application_detach (da);
487   ecm->test_client_attached = 0;
488   ecm->app_index = ~0;
489   return rv;
490 }
491
492 static void *
493 echo_client_thread_fn (void *arg)
494 {
495   return 0;
496 }
497
498 /** Start a transmit thread */
499 int
500 echo_clients_start_tx_pthread (echo_client_main_t * ecm)
501 {
502   if (ecm->client_thread_handle == 0)
503     {
504       int rv = pthread_create (&ecm->client_thread_handle,
505                                NULL /*attr */ ,
506                                echo_client_thread_fn, 0);
507       if (rv)
508         {
509           ecm->client_thread_handle = 0;
510           return -1;
511         }
512     }
513   return 0;
514 }
515
516 clib_error_t *
517 echo_clients_connect (vlib_main_t * vm, u32 n_clients)
518 {
519   echo_client_main_t *ecm = &echo_client_main;
520   vnet_connect_args_t _a, *a = &_a;
521   clib_error_t *error = 0;
522   int i;
523   for (i = 0; i < n_clients; i++)
524     {
525       memset (a, 0, sizeof (*a));
526
527       a->uri = (char *) ecm->connect_uri;
528       a->api_context = i;
529       a->app_index = ecm->app_index;
530       a->mp = 0;
531
532       if ((error = vnet_connect_uri (a)))
533         return error;
534
535       /* Crude pacing for call setups  */
536       if ((i % 4) == 0)
537         vlib_process_suspend (vm, 10e-6);
538       ASSERT (i + 1 >= ecm->ready_connections);
539       while (i + 1 - ecm->ready_connections > 1000)
540         {
541           vlib_process_suspend (vm, 100e-6);
542         }
543     }
544   return 0;
545 }
546
547 #define ec_cli_output(_fmt, _args...)                   \
548   if (!ecm->no_output)                                          \
549     vlib_cli_output(vm, _fmt, ##_args)
550
551 static clib_error_t *
552 echo_clients_command_fn (vlib_main_t * vm,
553                          unformat_input_t * input, vlib_cli_command_t * cmd)
554 {
555   echo_client_main_t *ecm = &echo_client_main;
556   vlib_thread_main_t *thread_main = vlib_get_thread_main ();
557   u64 tmp, total_bytes, appns_flags = 0, appns_secret = 0;
558   f64 test_timeout = 20.0, syn_timeout = 20.0, delta;
559   char *default_uri = "tcp://6.0.1.1/1234";
560   uword *event_data = 0, event_type;
561   f64 time_before_connects;
562   u32 n_clients = 1;
563   int preallocate_sessions = 0;
564   char *transfer_type;
565   clib_error_t *error = 0;
566   u8 *appns_id = 0;
567   int i;
568
569   ecm->bytes_to_send = 8192;
570   ecm->no_return = 0;
571   ecm->fifo_size = 64 << 10;
572   ecm->connections_per_batch = 1000;
573   ecm->private_segment_count = 0;
574   ecm->private_segment_size = 0;
575   ecm->no_output = 0;
576   ecm->test_bytes = 0;
577   ecm->test_failed = 0;
578   ecm->vlib_main = vm;
579   if (thread_main->n_vlib_mains > 1)
580     clib_spinlock_init (&ecm->sessions_lock);
581   vec_free (ecm->connect_uri);
582
583   while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
584     {
585       if (unformat (input, "uri %s", &ecm->connect_uri))
586         ;
587       else if (unformat (input, "nclients %d", &n_clients))
588         ;
589       else if (unformat (input, "mbytes %lld", &tmp))
590         ecm->bytes_to_send = tmp << 20;
591       else if (unformat (input, "gbytes %lld", &tmp))
592         ecm->bytes_to_send = tmp << 30;
593       else if (unformat (input, "bytes %lld", &ecm->bytes_to_send))
594         ;
595       else if (unformat (input, "test-timeout %f", &test_timeout))
596         ;
597       else if (unformat (input, "syn-timeout %f", &syn_timeout))
598         ;
599       else if (unformat (input, "no-return"))
600         ecm->no_return = 1;
601       else if (unformat (input, "fifo-size %d", &ecm->fifo_size))
602         ecm->fifo_size <<= 10;
603       else if (unformat (input, "private-segment-count %d",
604                          &ecm->private_segment_count))
605         ;
606       else if (unformat (input, "private-segment-size %U",
607                          unformat_memory_size, &tmp))
608         {
609           if (tmp >= 0x100000000ULL)
610             return clib_error_return
611               (0, "private segment size %lld (%llu) too large", tmp, tmp);
612           ecm->private_segment_size = tmp;
613         }
614       else if (unformat (input, "preallocate-fifos"))
615         ecm->prealloc_fifos = 1;
616       else if (unformat (input, "preallocate-sessions"))
617         preallocate_sessions = 1;
618       else
619         if (unformat (input, "client-batch %d", &ecm->connections_per_batch))
620         ;
621       else if (unformat (input, "appns %_%v%_", &appns_id))
622         ;
623       else if (unformat (input, "all-scope"))
624         appns_flags |= (APP_OPTIONS_FLAGS_USE_GLOBAL_SCOPE
625                         | APP_OPTIONS_FLAGS_USE_LOCAL_SCOPE);
626       else if (unformat (input, "local-scope"))
627         appns_flags = APP_OPTIONS_FLAGS_USE_LOCAL_SCOPE;
628       else if (unformat (input, "global-scope"))
629         appns_flags = APP_OPTIONS_FLAGS_USE_GLOBAL_SCOPE;
630       else if (unformat (input, "secret %lu", &appns_secret))
631         ;
632       else if (unformat (input, "no-output"))
633         ecm->no_output = 1;
634       else if (unformat (input, "test-bytes"))
635         ecm->test_bytes = 1;
636       else
637         return clib_error_return (0, "failed: unknown input `%U'",
638                                   format_unformat_error, input);
639     }
640
641   /* Store cli process node index for signalling */
642   ecm->cli_node_index =
643     vlib_get_current_process (vm)->node_runtime.node_index;
644
645   if (ecm->is_init == 0)
646     {
647       if (echo_clients_init (vm))
648         return clib_error_return (0, "failed init");
649     }
650
651
652   ecm->ready_connections = 0;
653   ecm->expected_connections = n_clients;
654   ecm->rx_total = 0;
655   ecm->tx_total = 0;
656
657   if (!ecm->connect_uri)
658     {
659       clib_warning ("No uri provided. Using default: %s", default_uri);
660       ecm->connect_uri = format (0, "%s%c", default_uri, 0);
661     }
662
663 #if ECHO_CLIENT_PTHREAD
664   echo_clients_start_tx_pthread ();
665 #endif
666
667   vlib_worker_thread_barrier_sync (vm);
668   vnet_session_enable_disable (vm, 1 /* turn on session and transports */ );
669   vlib_worker_thread_barrier_release (vm);
670
671   if (ecm->test_client_attached == 0)
672     {
673       if ((error = echo_clients_attach (appns_id, appns_flags, appns_secret)))
674         {
675           vec_free (appns_id);
676           clib_error_report (error);
677           return error;
678         }
679       vec_free (appns_id);
680     }
681   ecm->test_client_attached = 1;
682
683   /* Turn on the builtin client input nodes */
684   for (i = 0; i < thread_main->n_vlib_mains; i++)
685     vlib_node_set_state (vlib_mains[i], echo_clients_node.index,
686                          VLIB_NODE_STATE_POLLING);
687
688   if (preallocate_sessions)
689     {
690       session_t *sp __attribute__ ((unused));
691       for (i = 0; i < n_clients; i++)
692         pool_get (ecm->sessions, sp);
693       for (i = 0; i < n_clients; i++)
694         pool_put_index (ecm->sessions, i);
695     }
696
697   /* Fire off connect requests */
698   time_before_connects = vlib_time_now (vm);
699   if ((error = echo_clients_connect (vm, n_clients)))
700     return error;
701
702   /* Park until the sessions come up, or ten seconds elapse... */
703   vlib_process_wait_for_event_or_clock (vm, syn_timeout);
704   event_type = vlib_process_get_events (vm, &event_data);
705   switch (event_type)
706     {
707     case ~0:
708       ec_cli_output ("Timeout with only %d sessions active...",
709                      ecm->ready_connections);
710       error = clib_error_return (0, "failed: syn timeout with %d sessions",
711                                  ecm->ready_connections);
712       goto cleanup;
713
714     case 1:
715       delta = vlib_time_now (vm) - time_before_connects;
716       if (delta != 0.0)
717         ec_cli_output ("%d three-way handshakes in %.2f seconds %.2f/s",
718                        n_clients, delta, ((f64) n_clients) / delta);
719
720       ecm->test_start_time = vlib_time_now (ecm->vlib_main);
721       ec_cli_output ("Test started at %.6f", ecm->test_start_time);
722       break;
723
724     default:
725       ec_cli_output ("unexpected event(1): %d", event_type);
726       error = clib_error_return (0, "failed: unexpected event(1): %d",
727                                  event_type);
728       goto cleanup;
729     }
730
731   /* Now wait for the sessions to finish... */
732   vlib_process_wait_for_event_or_clock (vm, test_timeout);
733   event_type = vlib_process_get_events (vm, &event_data);
734   switch (event_type)
735     {
736     case ~0:
737       ec_cli_output ("Timeout with %d sessions still active...",
738                      ecm->ready_connections);
739       error = clib_error_return (0, "failed: timeout with %d sessions",
740                                  ecm->ready_connections);
741       goto cleanup;
742
743     case 2:
744       ecm->test_end_time = vlib_time_now (vm);
745       ec_cli_output ("Test finished at %.6f", ecm->test_end_time);
746       break;
747
748     default:
749       ec_cli_output ("unexpected event(2): %d", event_type);
750       error = clib_error_return (0, "failed: unexpected event(2): %d",
751                                  event_type);
752       goto cleanup;
753     }
754
755   delta = ecm->test_end_time - ecm->test_start_time;
756   if (delta != 0.0)
757     {
758       total_bytes = (ecm->no_return ? ecm->tx_total : ecm->rx_total);
759       transfer_type = ecm->no_return ? "half-duplex" : "full-duplex";
760       ec_cli_output ("%lld bytes (%lld mbytes, %lld gbytes) in %.2f seconds",
761                      total_bytes, total_bytes / (1ULL << 20),
762                      total_bytes / (1ULL << 30), delta);
763       ec_cli_output ("%.2f bytes/second %s", ((f64) total_bytes) / (delta),
764                      transfer_type);
765       ec_cli_output ("%.4f gbit/second %s",
766                      (((f64) total_bytes * 8.0) / delta / 1e9),
767                      transfer_type);
768     }
769   else
770     {
771       ec_cli_output ("zero delta-t?");
772       error = clib_error_return (0, "failed: zero delta-t");
773       goto cleanup;
774     }
775
776   if (ecm->test_bytes && ecm->test_failed)
777     error = clib_error_return (0, "failed: test bytes");
778
779 cleanup:
780   ecm->run_test = 0;
781   for (i = 0; i < vec_len (ecm->connection_index_by_thread); i++)
782     {
783       vec_reset_length (ecm->connection_index_by_thread[i]);
784       vec_reset_length (ecm->connections_this_batch_by_thread[i]);
785     }
786
787   pool_free (ecm->sessions);
788
789   /* Detach the application, so we can use different fifo sizes next time */
790   if (ecm->test_client_attached)
791     {
792       if (echo_clients_detach ())
793         {
794           error = clib_error_return (0, "failed: app detach");
795           ec_cli_output ("WARNING: app detach failed...");
796         }
797     }
798   if (error)
799     ec_cli_output ("test failed");
800   vec_free (ecm->connect_uri);
801   return error;
802 }
803
804 /* *INDENT-OFF* */
805 VLIB_CLI_COMMAND (echo_clients_command, static) =
806 {
807   .path = "test echo clients",
808   .short_help = "test echo clients [nclients %d][[m|g]bytes <bytes>]"
809       "[test-timeout <time>][syn-timeout <time>][no-return][fifo-size <size>]"
810       "[private-segment-count <count>][private-segment-size <bytes>[m|g]]"
811       "[preallocate-fifos][preallocate-sessions][client-batch <batch-size>]"
812       "[uri <tcp://ip/port>][test-bytes][no-output]",
813   .function = echo_clients_command_fn,
814   .is_mp_safe = 1,
815 };
816 /* *INDENT-ON* */
817
818 clib_error_t *
819 echo_clients_main_init (vlib_main_t * vm)
820 {
821   echo_client_main_t *ecm = &echo_client_main;
822   ecm->is_init = 0;
823   return 0;
824 }
825
826 VLIB_INIT_FUNCTION (echo_clients_main_init);
827
828 /*
829  * fd.io coding-style-patch-verification: ON
830  *
831  * Local Variables:
832  * eval: (c-set-style "gnu")
833  * End:
834  */