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"
83 VCL_TEST_TYPE_EXIT_CLIENT,
93 typedef struct __attribute__ ((packed))
100 uint32_t num_test_sessions;
101 uint32_t num_test_sessions_perq;
102 uint32_t num_test_qsessions;
104 uint32_t address_ip6;
105 uint32_t transport_udp;
109 uint64_t total_bytes;
122 struct timespec start;
123 struct timespec stop;
126 typedef struct vcl_test_session
129 uint8_t is_alloc : 1;
131 uint8_t noblk_connect : 1;
133 int (*read) (struct vcl_test_session *ts, void *buf, uint32_t buflen);
134 int (*write) (struct vcl_test_session *ts, void *buf, uint32_t buflen);
140 vcl_test_stats_t stats;
141 vcl_test_stats_t old_stats;
143 vppcom_endpt_t endpt;
145 vppcom_data_segment_t ds[2];
147 } vcl_test_session_t;
149 static __thread int __wrk_index = 0;
152 vcl_test_worker_index (void)
159 int (*init) (vcl_test_cfg_t *cfg);
160 int (*open) (vcl_test_session_t *ts, vppcom_endpt_t *endpt);
161 int (*listen) (vcl_test_session_t *ts, vppcom_endpt_t *endpt);
162 int (*accept) (int listen_fd, vcl_test_session_t *ts);
163 int (*close) (vcl_test_session_t *ts);
164 } vcl_test_proto_vft_t;
168 vcl_test_session_t *qsessions;
169 uint32_t n_qsessions;
175 const vcl_test_proto_vft_t *protos[VPPCOM_PROTO_SRTP + 1];
176 uint32_t ckpair_index;
181 extern vcl_test_main_t vcl_test_main;
183 #define VCL_TEST_REGISTER_PROTO(proto, vft) \
184 static void __attribute__ ((constructor)) vcl_test_init_##proto (void) \
186 vcl_test_main.protos[proto] = &vft; \
190 vcl_test_stats_accumulate (vcl_test_stats_t * accum, vcl_test_stats_t * incr)
192 accum->rx_xacts += incr->rx_xacts;
193 accum->rx_bytes += incr->rx_bytes;
194 accum->rx_eagain += incr->rx_eagain;
195 accum->rx_incomp += incr->rx_incomp;
196 accum->tx_xacts += incr->tx_xacts;
197 accum->tx_bytes += incr->tx_bytes;
198 accum->tx_eagain += incr->tx_eagain;
199 accum->tx_incomp += incr->tx_incomp;
203 vcl_test_cfg_init (vcl_test_cfg_t * cfg)
205 cfg->magic = VCL_TEST_CFG_CTRL_MAGIC;
206 cfg->test = VCL_TEST_TYPE_UNI;
207 cfg->ctrl_handle = ~0;
208 cfg->num_test_sessions = 1;
209 cfg->num_test_sessions_perq = 1;
211 cfg->rxbuf_size = VCL_TEST_CFG_RXBUF_SIZE_DEF;
212 cfg->num_writes = VCL_TEST_CFG_NUM_WRITES_DEF;
213 cfg->txbuf_size = VCL_TEST_CFG_TXBUF_SIZE_DEF;
214 cfg->total_bytes = cfg->num_writes * cfg->txbuf_size;
218 vcl_test_cfg_verify (vcl_test_cfg_t * cfg, vcl_test_cfg_t * valid_cfg)
220 /* Note: txbuf & rxbuf on server are the same buffer,
221 * so txbuf_size is not included in this check.
223 return ((cfg->magic == valid_cfg->magic)
224 && (cfg->test == valid_cfg->test)
225 && (cfg->verbose == valid_cfg->verbose)
226 && (cfg->rxbuf_size == valid_cfg->rxbuf_size)
227 && (cfg->num_writes == valid_cfg->num_writes)
228 && (cfg->total_bytes == valid_cfg->total_bytes));
232 vcl_test_buf_alloc (vcl_test_cfg_t * cfg, uint8_t is_rxbuf, uint8_t ** buf,
235 uint32_t alloc_size = is_rxbuf ? cfg->rxbuf_size : cfg->txbuf_size;
236 uint8_t *lb = realloc (*buf, (size_t) alloc_size);
241 cfg->rxbuf_size = *bufsize = alloc_size;
243 cfg->txbuf_size = *bufsize = alloc_size;
249 vtwrn ("realloc failed. using buffer size %d instead of %u",
250 *bufsize, alloc_size);
255 vcl_test_session_buf_alloc (vcl_test_session_t *ts)
257 ts->rxbuf_size = ts->cfg.rxbuf_size;
258 ts->txbuf_size = ts->cfg.txbuf_size;
259 vcl_test_buf_alloc (&ts->cfg, 0 /* is_rxbuf */, (uint8_t **) &ts->txbuf,
261 vcl_test_buf_alloc (&ts->cfg, 1 /* is_rxbuf */, (uint8_t **) &ts->rxbuf,
266 vcl_test_session_buf_free (vcl_test_session_t *ts)
275 vcl_test_type_str (vcl_test_t t)
279 case VCL_TEST_TYPE_NONE:
282 case VCL_TEST_TYPE_ECHO:
285 case VCL_TEST_TYPE_UNI:
288 case VCL_TEST_TYPE_BI:
291 case VCL_TEST_TYPE_EXIT:
300 vcl_test_cfg_dump (vcl_test_cfg_t * cfg, uint8_t is_client)
304 printf (" test config (%p):\n"
305 VCL_TEST_SEPARATOR_STRING
308 "%-5s test: %s (%d)\n"
309 " ctrl handle: %d (0x%x)\n"
310 "%-5s num test sockets: %u (0x%08x)\n"
311 "%-5s verbose: %s (%d)\n"
312 "%-5s rxbuf size: %lu (0x%08lx)\n"
313 "%-5s txbuf size: %lu (0x%08lx)\n"
314 "%-5s num writes: %lu (0x%08lx)\n"
315 " client tx bytes: %lu (0x%08lx)\n"
316 VCL_TEST_SEPARATOR_STRING,
317 (void *) cfg, cfg->magic, cfg->seq_num,
318 is_client && (cfg->test == VCL_TEST_TYPE_UNI) ?
319 "'" VCL_TEST_TOKEN_RUN_UNI "'" :
320 is_client && (cfg->test == VCL_TEST_TYPE_BI) ?
321 "'" VCL_TEST_TOKEN_RUN_BI "'" : spc,
322 vcl_test_type_str (cfg->test), cfg->test,
323 cfg->ctrl_handle, cfg->ctrl_handle,
324 is_client ? "'" VCL_TEST_TOKEN_NUM_TEST_SESS "'" : spc,
325 cfg->num_test_sessions, cfg->num_test_sessions,
326 is_client ? "'" VCL_TEST_TOKEN_VERBOSE "'" : spc,
327 cfg->verbose ? "on" : "off", cfg->verbose,
328 is_client ? "'" VCL_TEST_TOKEN_RXBUF_SIZE "'" : spc,
329 cfg->rxbuf_size, cfg->rxbuf_size,
330 is_client ? "'" VCL_TEST_TOKEN_TXBUF_SIZE "'" : spc,
331 cfg->txbuf_size, cfg->txbuf_size,
332 is_client ? "'" VCL_TEST_TOKEN_NUM_WRITES "'" : spc,
333 cfg->num_writes, cfg->num_writes,
334 cfg->total_bytes, cfg->total_bytes);
338 vcl_test_stats_dump (char *header, vcl_test_stats_t * stats,
339 uint8_t show_rx, uint8_t show_tx, uint8_t verbose)
341 struct timespec diff;
342 double duration, rate;
343 uint64_t total_bytes;
345 if ((stats->stop.tv_nsec - stats->start.tv_nsec) < 0)
347 diff.tv_sec = stats->stop.tv_sec - stats->start.tv_sec - 1;
348 diff.tv_nsec = stats->stop.tv_nsec - stats->start.tv_nsec + 1e9;
352 diff.tv_sec = stats->stop.tv_sec - stats->start.tv_sec;
353 diff.tv_nsec = stats->stop.tv_nsec - stats->start.tv_nsec;
355 duration = (double) diff.tv_sec + (1e-9 * diff.tv_nsec);
357 total_bytes = stats->tx_bytes + stats->rx_bytes;
358 rate = (double) total_bytes *8 / duration / 1e9;
359 printf ("\n%s: Streamed %lu bytes\n"
360 " in %lf seconds (%lf Gbps %s-duplex)!\n",
361 header, total_bytes, duration, rate,
362 (show_rx && show_tx) ? "full" : "half");
366 printf (VCL_TEST_SEPARATOR_STRING
367 " tx stats (0x%p):\n"
368 VCL_TEST_SEPARATOR_STRING
369 " writes: %lu (0x%08lx)\n"
370 " tx bytes: %lu (0x%08lx)\n"
371 " tx eagain: %u (0x%08x)\n"
372 " tx incomplete: %u (0x%08x)\n",
373 (void *) stats, stats->tx_xacts, stats->tx_xacts,
374 stats->tx_bytes, stats->tx_bytes,
375 stats->tx_eagain, stats->tx_eagain,
376 stats->tx_incomp, stats->tx_incomp);
380 printf (VCL_TEST_SEPARATOR_STRING
381 " rx stats (0x%p):\n"
382 VCL_TEST_SEPARATOR_STRING
383 " reads: %lu (0x%08lx)\n"
384 " rx bytes: %lu (0x%08lx)\n"
385 " rx eagain: %u (0x%08x)\n"
386 " rx incomplete: %u (0x%08x)\n",
387 (void *) stats, stats->rx_xacts, stats->rx_xacts,
388 stats->rx_bytes, stats->rx_bytes,
389 stats->rx_eagain, stats->rx_eagain,
390 stats->rx_incomp, stats->rx_incomp);
393 printf (" start.tv_sec: %ld\n"
394 " start.tv_nsec: %ld\n"
395 " stop.tv_sec: %ld\n"
396 " stop.tv_nsec: %ld\n",
397 stats->start.tv_sec, stats->start.tv_nsec,
398 stats->stop.tv_sec, stats->stop.tv_nsec);
400 printf (VCL_TEST_SEPARATOR_STRING);
404 vcl_test_time_diff (struct timespec *old, struct timespec *new)
407 if ((new->tv_nsec - old->tv_nsec) < 0)
409 sec = new->tv_sec - old->tv_sec - 1;
410 nsec = new->tv_nsec - old->tv_nsec + 1e9;
414 sec = new->tv_sec - old->tv_sec;
415 nsec = new->tv_nsec - old->tv_nsec;
417 return (double) sec + (1e-9 * nsec);
421 vcl_test_stats_dump_inc (vcl_test_session_t *ts, int is_rx)
423 vcl_test_stats_t *old, *new;
424 double duration, rate;
425 uint64_t total_bytes;
428 old = &ts->old_stats;
430 duration = vcl_test_time_diff (&old->stop, &new->stop);
434 total_bytes = new->rx_bytes - old->rx_bytes;
435 dir_str = "Received";
439 total_bytes = new->tx_bytes - old->tx_bytes;
443 rate = (double) total_bytes * 8 / duration / 1e9;
444 printf ("%d: %s %lu Mbytes in %.2lf seconds %.2lf Gbps\n", ts->fd, dir_str,
445 (uint64_t) (total_bytes / 1e6), duration, rate);
449 vcl_comp_tspec (struct timespec *a, struct timespec *b)
451 if (a->tv_sec < b->tv_sec)
453 else if (a->tv_sec > b->tv_sec)
455 else if (a->tv_nsec < b->tv_nsec)
457 else if (a->tv_nsec > b->tv_nsec)
464 vcl_test_read (vcl_test_session_t *ts, void *buf, uint32_t nbytes)
466 vcl_test_stats_t *stats = &ts->stats;
467 int rv, rx_bytes = 0;
472 rv = vppcom_session_read (ts->fd, buf, nbytes);
476 if (errno == EAGAIN || errno == EWOULDBLOCK)
482 vterr ("vppcom_session_read()", -errno);
492 stats->rx_bytes += rx_bytes;
498 vcl_test_read_ds (vcl_test_session_t *ts)
500 vcl_test_stats_t *stats = &ts->stats;
506 rx_bytes = vppcom_session_read_segments (ts->fd, ts->ds, 2, ~0);
513 if ((rx_bytes == 0) ||
515 && ((errno == EAGAIN) || (errno == EWOULDBLOCK))))
518 while ((rx_bytes == 0) ||
519 ((rx_bytes < 0) && ((errno == EAGAIN) || (errno == EWOULDBLOCK))));
523 vterr ("vppcom_session_read()", -errno);
526 stats->rx_bytes += rx_bytes;
532 vcl_test_write (vcl_test_session_t *ts, void *buf, uint32_t nbytes)
534 int tx_bytes = 0, nbytes_left = nbytes, rv;
535 vcl_test_stats_t *stats = &ts->stats;
540 rv = vppcom_session_write (ts->fd, buf, nbytes_left);
544 if ((errno == EAGAIN || errno == EWOULDBLOCK))
550 nbytes_left = nbytes_left - rv;
552 if (rv < nbytes_left)
555 while (tx_bytes != nbytes);
559 vterr ("vpcom_session_write", -errno);
562 stats->tx_bytes += tx_bytes;
572 printf ("CLIENT: Test configuration commands:"
573 INDENT VCL_TEST_TOKEN_HELP
574 "\t\t\tDisplay help."
575 INDENT VCL_TEST_TOKEN_EXIT
576 "\t\t\tExit test client & server."
577 INDENT VCL_TEST_TOKEN_SHOW_CFG
578 "\t\t\tShow the current test cfg."
579 INDENT VCL_TEST_TOKEN_RUN_UNI
580 "\t\t\tRun the Uni-directional test."
581 INDENT VCL_TEST_TOKEN_RUN_BI
582 "\t\t\tRun the Bi-directional test."
583 INDENT VCL_TEST_TOKEN_VERBOSE
584 "\t\t\tToggle verbose setting."
585 INDENT VCL_TEST_TOKEN_RXBUF_SIZE
586 "<rxbuf size>\tRx buffer size (bytes)."
587 INDENT VCL_TEST_TOKEN_TXBUF_SIZE
588 "<txbuf size>\tTx buffer size (bytes)."
589 INDENT VCL_TEST_TOKEN_NUM_WRITES
590 "<# of writes>\tNumber of txbuf writes to server." "\n");
593 #endif /* __vcl_test_h__ */
596 * fd.io coding-style-patch-verification: ON
599 * eval: (c-set-style "gnu")