2 * Copyright (c) 2003-2007 Niels Provos <provos@citi.umich.edu>
3 * Copyright (c) 2007-2012 Niels Provos and Nick Mathewson
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. The name of the author may not be used to endorse or promote products
14 * derived from this software without specific prior written permission.
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 #include "util-internal.h"
36 #if defined(__APPLE__) && defined(__ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__)
37 #if (__ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__ >= 1060 && \
38 __ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__ < 1070)
39 #define FORK_BREAKS_GCOV
44 #include "event2/event-config.h"
46 #ifdef EVENT____func__
47 #define __func__ EVENT____func__
51 #include <sys/types.h>
53 #ifdef EVENT__HAVE_SYS_TIME_H
56 #include <sys/queue.h>
61 #include <sys/types.h>
62 #ifdef EVENT__HAVE_SYS_STAT_H
67 #include <sys/socket.h>
79 #include "event2/util.h"
80 #include "event2/event.h"
81 #include "event2/event_compat.h"
82 #include "event2/dns.h"
83 #include "event2/dns_compat.h"
84 #include "event2/thread.h"
86 #include "event2/event-config.h"
89 #include "tinytest_macros.h"
90 #include "../iocp-internal.h"
91 #include "../event-internal.h"
93 struct evutil_weakrand_state test_weakrand_state;
96 timeval_msec_diff(const struct timeval *start, const struct timeval *end)
98 long ms = end->tv_sec - start->tv_sec;
100 ms += ((end->tv_usec - start->tv_usec)+500) / 1000;
104 /* ============================================================ */
105 /* Code to wrap up old legacy test cases that used setup() and cleanup().
107 * Not all of the tests designated "legacy" are ones that used setup() and
108 * cleanup(), of course. A test is legacy it it uses setup()/cleanup(), OR
109 * if it wants to find its event base/socketpair in global variables (ugh),
110 * OR if it wants to communicate success/failure through test_ok.
113 /* This is set to true if we're inside a legacy test wrapper. It lets the
114 setup() and cleanup() functions in regress.c know they're not needed.
116 int in_legacy_test_wrapper = 0;
118 static void dnslogcb(int w, const char *m)
120 TT_BLATHER(("%s", m));
123 /* creates a temporary file with the data in it. If *filename_out gets set,
124 * the caller should try to unlink it. */
126 regress_make_tmpfile(const void *data, size_t datalen, char **filename_out)
129 char tmpfilename[32];
131 *filename_out = NULL;
132 strcpy(tmpfilename, "/tmp/eventtmp.XXXXXX");
133 #ifdef EVENT__HAVE_UMASK
136 fd = mkstemp(tmpfilename);
139 if (write(fd, data, datalen) != (int)datalen) {
143 lseek(fd, 0, SEEK_SET);
144 /* remove it from the file system */
148 /* XXXX actually delete the file later */
149 char tmpfilepath[MAX_PATH];
150 char tmpfilename[MAX_PATH];
154 r = GetTempPathA(MAX_PATH, tmpfilepath);
155 if (r > MAX_PATH || r == 0)
157 for (; tries > 0; --tries) {
158 r = GetTempFileNameA(tmpfilepath, "LIBEVENT", 0, tmpfilename);
161 h = CreateFileA(tmpfilename, GENERIC_READ|GENERIC_WRITE,
162 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
163 if (h != INVALID_HANDLE_VALUE)
169 *filename_out = strdup(tmpfilename);
170 WriteFile(h, data, (DWORD)datalen, &written, NULL);
171 /* Closing the fd returned by this function will indeed close h. */
172 return _open_osfhandle((intptr_t)h,_O_RDONLY);
181 #ifdef FORK_BREAKS_GCOV
182 vproc_transaction_begin(0);
189 ignore_log_cb(int s, const char *msg)
194 basic_test_setup(const struct testcase_t *testcase)
196 struct event_base *base = NULL;
197 evutil_socket_t spair[2] = { -1, -1 };
198 struct basic_test_data *data = NULL;
201 if (testcase->flags & TT_ENABLE_IOCP_FLAG)
202 return (void*)TT_SKIP;
205 if (testcase->flags & TT_NEED_THREADS) {
206 if (!(testcase->flags & TT_FORK))
208 #if defined(EVTHREAD_USE_PTHREADS_IMPLEMENTED)
209 if (evthread_use_pthreads())
211 #elif defined(EVTHREAD_USE_WINDOWS_THREADS_IMPLEMENTED)
212 if (evthread_use_windows_threads())
215 return (void*)TT_SKIP;
219 if (testcase->flags & TT_NEED_SOCKETPAIR) {
220 if (evutil_socketpair(AF_UNIX, SOCK_STREAM, 0, spair) == -1) {
221 fprintf(stderr, "%s: socketpair\n", __func__);
225 if (evutil_make_socket_nonblocking(spair[0]) == -1) {
226 fprintf(stderr, "fcntl(O_NONBLOCK)");
230 if (evutil_make_socket_nonblocking(spair[1]) == -1) {
231 fprintf(stderr, "fcntl(O_NONBLOCK)");
235 if (testcase->flags & TT_NEED_BASE) {
236 if (testcase->flags & TT_LEGACY)
239 base = event_base_new();
243 if (testcase->flags & TT_ENABLE_IOCP_FLAG) {
244 if (event_base_start_iocp_(base, 0)<0) {
245 event_base_free(base);
246 return (void*)TT_SKIP;
250 if (testcase->flags & TT_NEED_DNS) {
251 evdns_set_log_fn(dnslogcb);
253 return NULL; /* fast failure */ /*XXX asserts. */
256 if (testcase->flags & TT_NO_LOGS)
257 event_set_log_callback(ignore_log_cb);
259 data = calloc(1, sizeof(*data));
263 data->pair[0] = spair[0];
264 data->pair[1] = spair[1];
265 data->setup_data = testcase->setup_data;
270 basic_test_cleanup(const struct testcase_t *testcase, void *ptr)
272 struct basic_test_data *data = ptr;
274 if (testcase->flags & TT_NO_LOGS)
275 event_set_log_callback(NULL);
277 if (testcase->flags & TT_NEED_SOCKETPAIR) {
278 if (data->pair[0] != -1)
279 evutil_closesocket(data->pair[0]);
280 if (data->pair[1] != -1)
281 evutil_closesocket(data->pair[1]);
284 if (testcase->flags & TT_NEED_DNS) {
288 if (testcase->flags & TT_NEED_BASE) {
290 event_base_assert_ok_(data->base);
291 event_base_free(data->base);
295 if (testcase->flags & TT_FORK)
296 libevent_global_shutdown();
303 const struct testcase_setup_t basic_setup = {
304 basic_test_setup, basic_test_cleanup
307 /* The "data" for a legacy test is just a pointer to the void fn(void)
308 function implementing the test case. We need to set up some globals,
309 though, since that's where legacy tests expect to find a socketpair
310 (sometimes) and a global event_base (sometimes).
313 legacy_test_setup(const struct testcase_t *testcase)
315 struct basic_test_data *data = basic_test_setup(testcase);
316 if (data == (void*)TT_SKIP || data == NULL)
318 global_base = data->base;
319 pair[0] = data->pair[0];
320 pair[1] = data->pair[1];
321 data->legacy_test_fn = testcase->setup_data;
325 /* This function is the implementation of every legacy test case. It
326 sets test_ok to 0, invokes the test function, and tells tinytest that
327 the test failed if the test didn't set test_ok to 1.
330 run_legacy_test_fn(void *ptr)
332 struct basic_test_data *data = ptr;
333 test_ok = called = 0;
335 in_legacy_test_wrapper = 1;
336 data->legacy_test_fn(); /* This part actually calls the test */
337 in_legacy_test_wrapper = 0;
340 tt_abort_msg("Legacy unit test failed");
346 /* This function doesn't have to clean up ptr (which is just a pointer
347 to the test function), but it may need to close the socketpair or
351 legacy_test_cleanup(const struct testcase_t *testcase, void *ptr)
353 int r = basic_test_cleanup(testcase, ptr);
354 pair[0] = pair[1] = -1;
359 const struct testcase_setup_t legacy_setup = {
360 legacy_test_setup, legacy_test_cleanup
363 /* ============================================================ */
365 #if (!defined(EVENT__HAVE_PTHREADS) && !defined(_WIN32)) || defined(EVENT__DISABLE_THREAD_SUPPORT)
366 struct testcase_t thread_testcases[] = {
367 { "basic", NULL, TT_SKIP, NULL, NULL },
372 struct testgroup_t testgroups[] = {
373 { "main/", main_testcases },
374 { "heap/", minheap_testcases },
375 { "et/", edgetriggered_testcases },
376 { "finalize/", finalize_testcases },
377 { "evbuffer/", evbuffer_testcases },
378 { "signal/", signal_testcases },
379 { "util/", util_testcases },
380 { "bufferevent/", bufferevent_testcases },
381 { "http/", http_testcases },
382 { "dns/", dns_testcases },
383 { "evtag/", evtag_testcases },
384 { "rpc/", rpc_testcases },
385 { "thread/", thread_testcases },
386 { "listener/", listener_testcases },
388 { "iocp/", iocp_testcases },
389 { "iocp/bufferevent/", bufferevent_iocp_testcases },
390 { "iocp/listener/", listener_iocp_testcases },
392 #ifdef EVENT__HAVE_OPENSSL
393 { "ssl/", ssl_testcases },
398 const char *alltests[] = { "+..", NULL };
399 const char *livenettests[] = {
400 "+util/getaddrinfo_live",
402 "+dns/resolve_reverse",
405 const char *finetimetests[] = {
406 "+util/monotonic_res_precise",
407 "+util/monotonic_res_fallback",
408 "+thread/deferred_cb_skew",
409 "+http/connection_retry",
412 struct testlist_alias_t testaliases[] = {
414 { "live_net", livenettests },
415 { "fine_timing", finetimetests },
419 int libevent_tests_running_in_debug_mode = 0;
422 main(int argc, const char **argv)
425 WORD wVersionRequested;
428 wVersionRequested = MAKEWORD(2, 2);
430 (void) WSAStartup(wVersionRequested, &wsaData);
434 if (signal(SIGPIPE, SIG_IGN) == SIG_ERR)
439 tinytest_skip(testgroups, "http/connection_retry");
442 #ifndef EVENT__DISABLE_THREAD_SUPPORT
443 if (!getenv("EVENT_NO_DEBUG_LOCKS"))
444 evthread_enable_lock_debugging();
447 if (getenv("EVENT_DEBUG_MODE")) {
448 event_enable_debug_mode();
449 libevent_tests_running_in_debug_mode = 1;
451 if (getenv("EVENT_DEBUG_LOGGING_ALL")) {
452 event_enable_debug_logging(EVENT_DBG_ALL);
455 tinytest_set_aliases(testaliases);
457 evutil_weakrand_seed_(&test_weakrand_state, 0);
459 if (tinytest_main(argc,argv,testgroups))
462 libevent_global_shutdown();