darling-libkqueue/test/main.c
mheily ddd7f1b4b3 More win32 test changes
git-svn-id: svn://svn.code.sf.net/p/libkqueue/code/trunk@602 fb4e3144-bc1c-4b72-a658-5bcd248dd7f7
2012-11-27 04:49:44 +00:00

317 lines
7.4 KiB
C

/*
* Copyright (c) 2009 Mark Heily <mark@heily.com>
*
* Permission to use, copy, modify, and distribute this software for any
* purpose with or without fee is hereby granted, provided that the above
* copyright notice and this permission notice appear in all copies.
*
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/
#include "common.h"
/* Maximum number of threads that can be created */
#define MAX_THREADS 100
void
test_kqueue_descriptor_is_pollable(void)
{
int kq, rv;
struct kevent kev;
fd_set fds;
struct timeval tv;
if ((kq = kqueue()) < 0)
die("kqueue()");
test_no_kevents(kq);
kevent_add(kq, &kev, 2, EVFILT_TIMER, EV_ADD | EV_ONESHOT, 0, 1000, NULL);
test_no_kevents(kq);
FD_ZERO(&fds);
FD_SET(kq, &fds);
tv.tv_sec = 5;
tv.tv_usec = 0;
rv = select(1, &fds, NULL, NULL, &tv);
if (rv < 0)
die("select() error");
if (rv == 0)
die("select() no events");
if (!FD_ISSET(kq, &fds)) {
die("descriptor is not ready for reading");
}
close(kq);
}
/*
* Test the method for detecting when one end of a socketpair
* has been closed. This technique is used in kqueue_validate()
*/
static void
test_peer_close_detection(void *unused)
{
#ifdef _WIN32
return;
//FIXME
#else
int sockfd[2];
char buf[1];
struct pollfd pfd;
if (socketpair(AF_UNIX, SOCK_STREAM, 0, sockfd) < 0)
die("socketpair");
pfd.fd = sockfd[0];
pfd.events = POLLIN | POLLHUP;
pfd.revents = 0;
if (poll(&pfd, 1, 0) > 0)
die("unexpected data");
if (close(sockfd[1]) < 0)
die("close");
if (poll(&pfd, 1, 0) > 0) {
if (recv(sockfd[0], buf, sizeof(buf), MSG_PEEK | MSG_DONTWAIT) != 0)
die("failed to detect peer shutdown");
}
#endif
}
void
test_kqueue(void *unused)
{
int kqfd;
if ((kqfd = kqueue()) < 0)
die("kqueue()");
test_no_kevents(kqfd);
if (close(kqfd) < 0)
die("close()");
}
void
test_kevent(void *unused)
{
struct kevent kev;
memset(&kev, 0, sizeof(kev));
/* Provide an invalid kqueue descriptor */
if (kevent(-1, &kev, 1, NULL, 0, NULL) == 0)
die("invalid kq parameter");
}
void
test_ev_receipt(void *unused)
{
int kq;
struct kevent kev;
if ((kq = kqueue()) < 0)
die("kqueue()");
#if HAVE_EV_RECEIPT
EV_SET(&kev, SIGUSR2, EVFILT_SIGNAL, EV_ADD | EV_RECEIPT, 0, 0, NULL);
if (kevent(kq, &kev, 1, &kev, 1, NULL) < 0)
die("kevent");
/* TODO: check the receipt */
close(kq);
#else
memset(&kev, 0, sizeof(kev));
puts("Skipped -- EV_RECEIPT is not available");
#endif
}
void
run_iteration(struct test_context *ctx)
{
struct unit_test *test;
for (test = &ctx->tests[0]; test->ut_name != NULL; test++) {
if (ctx->concurrency > 1 && test->ut_concurrent == 0)
continue;
if (test->ut_enabled)
test->ut_func(ctx);
}
free(ctx);
}
void
test_harness(struct unit_test tests[], int iterations, int concurrency)
{
int i, j, n, kqfd;
pthread_t tid[MAX_THREADS];
struct test_context *ctx;
int rv;
if (concurrency >= MAX_THREADS)
errx(1, "Too many threads");
printf("Running %d iterations using %d worker threads\n",
iterations, concurrency);
testing_begin();
ctx = calloc(1, sizeof(*ctx));
test(peer_close_detection, ctx);
test(kqueue, ctx);
test(kevent, ctx);
if ((kqfd = kqueue()) < 0)
die("kqueue()");
test(ev_receipt, ctx);
/* TODO: this fails now, but would be good later
test(kqueue_descriptor_is_pollable);
*/
free(ctx);
n = 0;
for (i = 0; i < iterations; i++) {
for (j = 0; j < concurrency; j++) {
/* Create a unique context object for each thread */
ctx = calloc(1, sizeof(*ctx));
if (ctx == NULL)
abort();
ctx->iteration = n++;
ctx->kqfd = kqfd;
memcpy(&ctx->tests, tests, sizeof(ctx->tests)); //FIXME: invalid read
ctx->iterations = iterations;
ctx->concurrency = concurrency;
#ifdef _WIN32
/* TODO: run in a separate thread */
run_iteration(ctx);
rv = 0;
#else
rv = pthread_create(&tid[j], NULL, (void * (*)(void *)) run_iteration, ctx);
#endif
if (rv != 0)
err(1, "pthread_create");
}
#ifdef _WIN32
// TODO: join threads
#else
for (j = 0; j < concurrency; j++) {
pthread_join(tid[j], NULL);
}
#endif
}
testing_end();
close(kqfd);
}
void
usage(void)
{
printf("usage:\n"
" -h This message\n"
" -n Number of iterations (default: 1)\n"
" -c Number of threads running concurrently (default: 1)\n"
"\n\n"
);
exit(1);
}
int
main(int argc, char **argv)
{
struct unit_test tests[] = {
{ "socket", 1, 0, test_evfilt_read },
#ifndef _WIN32
// XXX-FIXME -- BROKEN ON LINUX WHEN RUN IN A SEPARATE THREAD
{ "signal", 0, 0, test_evfilt_signal },
#endif
#if FIXME
{ "proc", 1, 0, test_evfilt_proc },
#endif
{ "timer", 1, 0, test_evfilt_timer },
{ "timer_concurrent", 1, 1, test_evfilt_timer_concurrent },
#ifndef _WIN32
{ "vnode", 1, 0, test_evfilt_vnode },
#endif
#if HAVE_EVFILT_USER
{ "user", 1, 0, test_evfilt_user },
#endif
{ NULL, 0, 0, NULL },
};
struct unit_test *test;
int c, i, concurrency, iterations;
char *arg;
int match;
#ifdef MAKE_STATIC
libkqueue_init();
#endif
#ifdef _WIN32
/* Initialize the Winsock library */
WSADATA wsaData;
if (WSAStartup(MAKEWORD(2,2), &wsaData) != 0)
err(1, "WSAStartup failed");
#endif
/* Windows does not provide a POSIX-compatible getopt */
#ifndef _WIN32
iterations = 1;
concurrency = 1;
while ((c = getopt (argc, argv, "hc:n:")) != -1) {
switch (c) {
case 'c':
concurrency = atoi(optarg);
break;
case 'h':
usage();
break;
case 'n':
iterations = atoi(optarg);
break;
default:
usage();
}
}
/* If specific tests are requested, disable all tests by default */
if (optind < argc) {
for (test = &tests[0]; test->ut_name != NULL; test++) {
test->ut_enabled = 0;
}
}
for (i = optind; i < argc; i++) {
match = 0;
arg = argv[i];
for (test = &tests[0]; test->ut_name != NULL; test++) {
if (strcmp(arg, test->ut_name) == 0) {
test->ut_enabled = 1;
match = 1;
break;
}
}
if (!match) {
printf("ERROR: invalid option: %s\n", arg);
exit(1);
} else {
printf("enabled test: %s\n", arg);
}
}
#endif
test_harness(tests, iterations, concurrency);
return (0);
}