2 * Copyright (c) 2017-2021 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:
7 * http://www.apache.org/licenses/LICENSE-2.0
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.
16 #ifndef __vcl_test_h__
17 #define __vcl_test_h__
24 #include <vcl/vppcom.h>
26 #define vtfail(_fn, _rv) \
29 perror ("ERROR when calling " _fn); \
30 fprintf (stderr, "\nERROR: " _fn " failed (errno = %d)!\n", -_rv); \
34 #define vterr(_fn, _rv) \
37 fprintf (stderr, "\nERROR: " _fn " failed (errno = %d)!\n", -_rv); \
40 #define vtwrn(_fmt, _args...) \
41 fprintf (stderr, "\nERROR: " _fmt "\n", ##_args) \
43 #define vtinf(_fmt, _args...) \
44 fprintf (stdout, "vt<w%u>: " _fmt "\n", __wrk_index, ##_args)
46 #define vt_atomic_add(_ptr, _val) \
47 __atomic_fetch_add (_ptr, _val, __ATOMIC_RELEASE)
49 #define VCL_TEST_TOKEN_HELP "#H"
50 #define VCL_TEST_TOKEN_EXIT "#X"
51 #define VCL_TEST_TOKEN_VERBOSE "#V"
52 #define VCL_TEST_TOKEN_TXBUF_SIZE "#T:"
53 #define VCL_TEST_TOKEN_NUM_TEST_SESS "#I:"
54 #define VCL_TEST_TOKEN_NUM_WRITES "#N:"
55 #define VCL_TEST_TOKEN_RXBUF_SIZE "#R:"
56 #define VCL_TEST_TOKEN_SHOW_CFG "#C"
57 #define VCL_TEST_TOKEN_RUN_UNI "#U"
58 #define VCL_TEST_TOKEN_RUN_BI "#B"
60 #define VCL_TEST_SERVER_PORT 22000
61 #define VCL_TEST_LOCALHOST_IPADDR "127.0.0.1"
63 #define VCL_TEST_CFG_CTRL_MAGIC 0xfeedface
64 #define VCL_TEST_CFG_NUM_WRITES_DEF 1000000
65 #define VCL_TEST_CFG_TXBUF_SIZE_DEF 8192
66 #define VCL_TEST_CFG_RXBUF_SIZE_DEF (64*VCL_TEST_CFG_TXBUF_SIZE_DEF)
67 #define VCL_TEST_CFG_BUF_SIZE_MIN 128
68 #define VCL_TEST_CFG_MAX_TEST_SESS 512
69 #define VCL_TEST_CFG_MAX_EPOLL_EVENTS 16
71 #define VCL_TEST_CTRL_LISTENER (~0 - 1)
72 #define VCL_TEST_DATA_LISTENER (~0)
73 #define VCL_TEST_DELAY_DISCONNECT 1
74 #define VCL_TEST_SEPARATOR_STRING \
75 " -----------------------------\n"
92 typedef struct __attribute__ ((packed))
99 uint32_t num_test_sessions;
100 uint32_t num_test_sessions_perq;
101 uint32_t num_test_qsessions;
103 uint32_t address_ip6;
104 uint32_t transport_udp;
108 uint64_t total_bytes;
121 struct timespec start;
122 struct timespec stop;
125 typedef struct vcl_test_session
131 int (*read) (struct vcl_test_session *ts, void *buf, uint32_t buflen);
132 int (*write) (struct vcl_test_session *ts, void *buf, uint32_t buflen);
138 vcl_test_stats_t stats;
139 vcl_test_stats_t old_stats;
141 vppcom_endpt_t endpt;
143 vppcom_data_segment_t ds[2];
144 } vcl_test_session_t;
146 static __thread int __wrk_index = 0;
149 vcl_test_worker_index (void)
156 int (*init) (vcl_test_cfg_t *cfg);
157 int (*open) (vcl_test_session_t *ts, vppcom_endpt_t *endpt);
158 int (*listen) (vcl_test_session_t *ts, vppcom_endpt_t *endpt);
159 int (*accept) (int listen_fd, vcl_test_session_t *ts);
160 int (*close) (vcl_test_session_t *ts);
161 } vcl_test_proto_vft_t;
165 vcl_test_session_t *qsessions;
166 uint32_t n_qsessions;
172 const vcl_test_proto_vft_t *protos[VPPCOM_PROTO_DTLS + 1];
173 uint32_t ckpair_index;
178 extern vcl_test_main_t vcl_test_main;
180 #define VCL_TEST_REGISTER_PROTO(proto, vft) \
181 static void __attribute__ ((constructor)) vcl_test_init_##proto (void) \
183 vcl_test_main.protos[proto] = &vft; \
187 vcl_test_stats_accumulate (vcl_test_stats_t * accum, vcl_test_stats_t * incr)
189 accum->rx_xacts += incr->rx_xacts;
190 accum->rx_bytes += incr->rx_bytes;
191 accum->rx_eagain += incr->rx_eagain;
192 accum->rx_incomp += incr->rx_incomp;
193 accum->tx_xacts += incr->tx_xacts;
194 accum->tx_bytes += incr->tx_bytes;
195 accum->tx_eagain += incr->tx_eagain;
196 accum->tx_incomp += incr->tx_incomp;
200 vcl_test_cfg_init (vcl_test_cfg_t * cfg)
202 cfg->magic = VCL_TEST_CFG_CTRL_MAGIC;
203 cfg->test = VCL_TEST_TYPE_NONE;
204 cfg->ctrl_handle = ~0;
205 cfg->num_test_sessions = 1;
206 cfg->num_test_sessions_perq = 1;
208 cfg->rxbuf_size = VCL_TEST_CFG_RXBUF_SIZE_DEF;
209 cfg->num_writes = VCL_TEST_CFG_NUM_WRITES_DEF;
210 cfg->txbuf_size = VCL_TEST_CFG_TXBUF_SIZE_DEF;
211 cfg->total_bytes = cfg->num_writes * cfg->txbuf_size;
215 vcl_test_cfg_verify (vcl_test_cfg_t * cfg, vcl_test_cfg_t * valid_cfg)
217 /* Note: txbuf & rxbuf on server are the same buffer,
218 * so txbuf_size is not included in this check.
220 return ((cfg->magic == valid_cfg->magic)
221 && (cfg->test == valid_cfg->test)
222 && (cfg->verbose == valid_cfg->verbose)
223 && (cfg->rxbuf_size == valid_cfg->rxbuf_size)
224 && (cfg->num_writes == valid_cfg->num_writes)
225 && (cfg->total_bytes == valid_cfg->total_bytes));
229 vcl_test_buf_alloc (vcl_test_cfg_t * cfg, uint8_t is_rxbuf, uint8_t ** buf,
232 uint32_t alloc_size = is_rxbuf ? cfg->rxbuf_size : cfg->txbuf_size;
233 uint8_t *lb = realloc (*buf, (size_t) alloc_size);
238 cfg->rxbuf_size = *bufsize = alloc_size;
240 cfg->txbuf_size = *bufsize = alloc_size;
246 vtwrn ("realloc failed. using buffer size %d instead of %u",
247 *bufsize, alloc_size);
252 vcl_test_session_buf_alloc (vcl_test_session_t *ts)
254 ts->rxbuf_size = ts->cfg.rxbuf_size;
255 ts->txbuf_size = ts->cfg.txbuf_size;
256 vcl_test_buf_alloc (&ts->cfg, 0 /* is_rxbuf */, (uint8_t **) &ts->txbuf,
258 vcl_test_buf_alloc (&ts->cfg, 1 /* is_rxbuf */, (uint8_t **) &ts->rxbuf,
263 vcl_test_session_buf_free (vcl_test_session_t *ts)
272 vcl_test_type_str (vcl_test_t t)
276 case VCL_TEST_TYPE_NONE:
279 case VCL_TEST_TYPE_ECHO:
282 case VCL_TEST_TYPE_UNI:
285 case VCL_TEST_TYPE_BI:
288 case VCL_TEST_TYPE_EXIT:
297 vcl_test_cfg_dump (vcl_test_cfg_t * cfg, uint8_t is_client)
301 printf (" test config (%p):\n"
302 VCL_TEST_SEPARATOR_STRING
305 "%-5s test: %s (%d)\n"
306 " ctrl handle: %d (0x%x)\n"
307 "%-5s num test sockets: %u (0x%08x)\n"
308 "%-5s verbose: %s (%d)\n"
309 "%-5s rxbuf size: %lu (0x%08lx)\n"
310 "%-5s txbuf size: %lu (0x%08lx)\n"
311 "%-5s num writes: %lu (0x%08lx)\n"
312 " client tx bytes: %lu (0x%08lx)\n"
313 VCL_TEST_SEPARATOR_STRING,
314 (void *) cfg, cfg->magic, cfg->seq_num,
315 is_client && (cfg->test == VCL_TEST_TYPE_UNI) ?
316 "'" VCL_TEST_TOKEN_RUN_UNI "'" :
317 is_client && (cfg->test == VCL_TEST_TYPE_BI) ?
318 "'" VCL_TEST_TOKEN_RUN_BI "'" : spc,
319 vcl_test_type_str (cfg->test), cfg->test,
320 cfg->ctrl_handle, cfg->ctrl_handle,
321 is_client ? "'" VCL_TEST_TOKEN_NUM_TEST_SESS "'" : spc,
322 cfg->num_test_sessions, cfg->num_test_sessions,
323 is_client ? "'" VCL_TEST_TOKEN_VERBOSE "'" : spc,
324 cfg->verbose ? "on" : "off", cfg->verbose,
325 is_client ? "'" VCL_TEST_TOKEN_RXBUF_SIZE "'" : spc,
326 cfg->rxbuf_size, cfg->rxbuf_size,
327 is_client ? "'" VCL_TEST_TOKEN_TXBUF_SIZE "'" : spc,
328 cfg->txbuf_size, cfg->txbuf_size,
329 is_client ? "'" VCL_TEST_TOKEN_NUM_WRITES "'" : spc,
330 cfg->num_writes, cfg->num_writes,
331 cfg->total_bytes, cfg->total_bytes);
335 vcl_test_stats_dump (char *header, vcl_test_stats_t * stats,
336 uint8_t show_rx, uint8_t show_tx, uint8_t verbose)
338 struct timespec diff;
339 double duration, rate;
340 uint64_t total_bytes;
342 if ((stats->stop.tv_nsec - stats->start.tv_nsec) < 0)
344 diff.tv_sec = stats->stop.tv_sec - stats->start.tv_sec - 1;
345 diff.tv_nsec = stats->stop.tv_nsec - stats->start.tv_nsec + 1e9;
349 diff.tv_sec = stats->stop.tv_sec - stats->start.tv_sec;
350 diff.tv_nsec = stats->stop.tv_nsec - stats->start.tv_nsec;
352 duration = (double) diff.tv_sec + (1e-9 * diff.tv_nsec);
354 total_bytes = stats->tx_bytes + stats->rx_bytes;
355 rate = (double) total_bytes *8 / duration / 1e9;
356 printf ("\n%s: Streamed %lu bytes\n"
357 " in %lf seconds (%lf Gbps %s-duplex)!\n",
358 header, total_bytes, duration, rate,
359 (show_rx && show_tx) ? "full" : "half");
363 printf (VCL_TEST_SEPARATOR_STRING
364 " tx stats (0x%p):\n"
365 VCL_TEST_SEPARATOR_STRING
366 " writes: %lu (0x%08lx)\n"
367 " tx bytes: %lu (0x%08lx)\n"
368 " tx eagain: %u (0x%08x)\n"
369 " tx incomplete: %u (0x%08x)\n",
370 (void *) stats, stats->tx_xacts, stats->tx_xacts,
371 stats->tx_bytes, stats->tx_bytes,
372 stats->tx_eagain, stats->tx_eagain,
373 stats->tx_incomp, stats->tx_incomp);
377 printf (VCL_TEST_SEPARATOR_STRING
378 " rx stats (0x%p):\n"
379 VCL_TEST_SEPARATOR_STRING
380 " reads: %lu (0x%08lx)\n"
381 " rx bytes: %lu (0x%08lx)\n"
382 " rx eagain: %u (0x%08x)\n"
383 " rx incomplete: %u (0x%08x)\n",
384 (void *) stats, stats->rx_xacts, stats->rx_xacts,
385 stats->rx_bytes, stats->rx_bytes,
386 stats->rx_eagain, stats->rx_eagain,
387 stats->rx_incomp, stats->rx_incomp);
390 printf (" start.tv_sec: %ld\n"
391 " start.tv_nsec: %ld\n"
392 " stop.tv_sec: %ld\n"
393 " stop.tv_nsec: %ld\n",
394 stats->start.tv_sec, stats->start.tv_nsec,
395 stats->stop.tv_sec, stats->stop.tv_nsec);
397 printf (VCL_TEST_SEPARATOR_STRING);
401 vcl_test_time_diff (struct timespec *old, struct timespec *new)
404 if ((new->tv_nsec - old->tv_nsec) < 0)
406 sec = new->tv_sec - old->tv_sec - 1;
407 nsec = new->tv_nsec - old->tv_nsec + 1e9;
411 sec = new->tv_sec - old->tv_sec;
412 nsec = new->tv_nsec - old->tv_nsec;
414 return (double) sec + (1e-9 * nsec);
418 vcl_test_stats_dump_inc (vcl_test_session_t *ts, int is_rx)
420 vcl_test_stats_t *old, *new;
421 double duration, rate;
422 uint64_t total_bytes;
425 old = &ts->old_stats;
427 duration = vcl_test_time_diff (&old->stop, &new->stop);
431 total_bytes = new->rx_bytes - old->rx_bytes;
432 dir_str = "Received";
436 total_bytes = new->tx_bytes - old->tx_bytes;
440 rate = (double) total_bytes * 8 / duration / 1e9;
441 printf ("%d: %s %lu Mbytes in %.2lf seconds %.2lf Gbps\n", ts->fd, dir_str,
442 (uint64_t) (total_bytes / 1e6), duration, rate);
446 vcl_comp_tspec (struct timespec *a, struct timespec *b)
448 if (a->tv_sec < b->tv_sec)
450 else if (a->tv_sec > b->tv_sec)
452 else if (a->tv_nsec < b->tv_nsec)
454 else if (a->tv_nsec > b->tv_nsec)
461 vcl_test_read (vcl_test_session_t *ts, void *buf, uint32_t nbytes)
463 vcl_test_stats_t *stats = &ts->stats;
464 int rv, rx_bytes = 0;
469 rv = vppcom_session_read (ts->fd, buf, nbytes);
473 if (errno == EAGAIN || errno == EWOULDBLOCK)
479 vterr ("vppcom_session_read()", -errno);
489 stats->rx_bytes += rx_bytes;
495 vcl_test_read_ds (vcl_test_session_t *ts)
497 vcl_test_stats_t *stats = &ts->stats;
503 rx_bytes = vppcom_session_read_segments (ts->fd, ts->ds, 2, ~0);
510 if ((rx_bytes == 0) ||
512 && ((errno == EAGAIN) || (errno == EWOULDBLOCK))))
515 while ((rx_bytes == 0) ||
516 ((rx_bytes < 0) && ((errno == EAGAIN) || (errno == EWOULDBLOCK))));
520 vterr ("vppcom_session_read()", -errno);
523 stats->rx_bytes += rx_bytes;
529 vcl_test_write (vcl_test_session_t *ts, void *buf, uint32_t nbytes)
531 int tx_bytes = 0, nbytes_left = nbytes, rv;
532 vcl_test_stats_t *stats = &ts->stats;
537 rv = vppcom_session_write (ts->fd, buf, nbytes_left);
541 if ((errno == EAGAIN || errno == EWOULDBLOCK))
547 nbytes_left = nbytes_left - rv;
549 if (rv < nbytes_left)
552 while (tx_bytes != nbytes);
556 vterr ("vpcom_session_write", -errno);
559 stats->tx_bytes += tx_bytes;
569 printf ("CLIENT: Test configuration commands:"
570 INDENT VCL_TEST_TOKEN_HELP
571 "\t\t\tDisplay help."
572 INDENT VCL_TEST_TOKEN_EXIT
573 "\t\t\tExit test client & server."
574 INDENT VCL_TEST_TOKEN_SHOW_CFG
575 "\t\t\tShow the current test cfg."
576 INDENT VCL_TEST_TOKEN_RUN_UNI
577 "\t\t\tRun the Uni-directional test."
578 INDENT VCL_TEST_TOKEN_RUN_BI
579 "\t\t\tRun the Bi-directional test."
580 INDENT VCL_TEST_TOKEN_VERBOSE
581 "\t\t\tToggle verbose setting."
582 INDENT VCL_TEST_TOKEN_RXBUF_SIZE
583 "<rxbuf size>\tRx buffer size (bytes)."
584 INDENT VCL_TEST_TOKEN_TXBUF_SIZE
585 "<txbuf size>\tTx buffer size (bytes)."
586 INDENT VCL_TEST_TOKEN_NUM_WRITES
587 "<# of writes>\tNumber of txbuf writes to server." "\n");
590 #endif /* __vcl_test_h__ */
593 * fd.io coding-style-patch-verification: ON
596 * eval: (c-set-style "gnu")