1 /* $NetBSD: regress_listener.c,v 1.2 2013/04/11 16:56:42 christos Exp $ */ 2 /* 3 * Copyright (c) 2009-2012 Niels Provos and Nick Mathewson 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 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. 15 * 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. 26 */ 27 28 #ifdef WIN32 29 #include <winsock2.h> 30 #include <windows.h> 31 #endif 32 33 #include <sys/types.h> 34 35 #ifndef WIN32 36 #include <sys/socket.h> 37 #include <netinet/in.h> 38 # ifdef _XOPEN_SOURCE_EXTENDED 39 # include <arpa/inet.h> 40 # endif 41 #include <unistd.h> 42 #endif 43 44 #include <string.h> 45 46 #include "event2/listener.h" 47 #include "event2/event.h" 48 #include "event2/util.h" 49 50 #include "regress.h" 51 #include "tinytest.h" 52 #include "tinytest_macros.h" 53 #include "util-internal.h" 54 55 static void 56 acceptcb(struct evconnlistener *listener, evutil_socket_t fd, 57 struct sockaddr *addr, int socklen, void *arg) 58 { 59 int *ptr = arg; 60 --*ptr; 61 TT_BLATHER(("Got one for %p", ptr)); 62 evutil_closesocket(fd); 63 64 if (! *ptr) 65 evconnlistener_disable(listener); 66 } 67 68 static void 69 regress_pick_a_port(void *arg) 70 { 71 struct basic_test_data *data = arg; 72 struct event_base *base = data->base; 73 struct evconnlistener *listener1 = NULL, *listener2 = NULL; 74 struct sockaddr_in sin; 75 int count1 = 2, count2 = 1; 76 struct sockaddr_storage ss1, ss2; 77 struct sockaddr_in *sin1, *sin2; 78 ev_socklen_t slen1 = sizeof(ss1), slen2 = sizeof(ss2); 79 unsigned int flags = 80 LEV_OPT_CLOSE_ON_FREE|LEV_OPT_REUSEABLE|LEV_OPT_CLOSE_ON_EXEC; 81 82 evutil_socket_t fd1 = -1, fd2 = -1, fd3 = -1; 83 84 if (data->setup_data && strstr((char*)data->setup_data, "ts")) { 85 flags |= LEV_OPT_THREADSAFE; 86 } 87 88 memset(&sin, 0, sizeof(sin)); 89 sin.sin_family = AF_INET; 90 sin.sin_addr.s_addr = htonl(0x7f000001); /* 127.0.0.1 */ 91 sin.sin_port = 0; /* "You pick!" */ 92 93 listener1 = evconnlistener_new_bind(base, acceptcb, &count1, 94 flags, -1, (struct sockaddr *)&sin, sizeof(sin)); 95 tt_assert(listener1); 96 listener2 = evconnlistener_new_bind(base, acceptcb, &count2, 97 flags, -1, (struct sockaddr *)&sin, sizeof(sin)); 98 tt_assert(listener2); 99 100 tt_int_op(evconnlistener_get_fd(listener1), >=, 0); 101 tt_int_op(evconnlistener_get_fd(listener2), >=, 0); 102 tt_assert(getsockname(evconnlistener_get_fd(listener1), 103 (struct sockaddr*)&ss1, &slen1) == 0); 104 tt_assert(getsockname(evconnlistener_get_fd(listener2), 105 (struct sockaddr*)&ss2, &slen2) == 0); 106 tt_int_op(ss1.ss_family, ==, AF_INET); 107 tt_int_op(ss2.ss_family, ==, AF_INET); 108 109 sin1 = (struct sockaddr_in*)&ss1; 110 sin2 = (struct sockaddr_in*)&ss2; 111 tt_int_op(ntohl(sin1->sin_addr.s_addr), ==, 0x7f000001); 112 tt_int_op(ntohl(sin2->sin_addr.s_addr), ==, 0x7f000001); 113 tt_int_op(sin1->sin_port, !=, sin2->sin_port); 114 115 tt_ptr_op(evconnlistener_get_base(listener1), ==, base); 116 tt_ptr_op(evconnlistener_get_base(listener2), ==, base); 117 118 fd1 = fd2 = fd3 = -1; 119 evutil_socket_connect(&fd1, (struct sockaddr*)&ss1, slen1); 120 evutil_socket_connect(&fd2, (struct sockaddr*)&ss1, slen1); 121 evutil_socket_connect(&fd3, (struct sockaddr*)&ss2, slen2); 122 123 #ifdef WIN32 124 Sleep(100); /* XXXX this is a stupid stopgap. */ 125 #endif 126 event_base_dispatch(base); 127 128 tt_int_op(count1, ==, 0); 129 tt_int_op(count2, ==, 0); 130 131 end: 132 if (fd1>=0) 133 EVUTIL_CLOSESOCKET(fd1); 134 if (fd2>=0) 135 EVUTIL_CLOSESOCKET(fd2); 136 if (fd3>=0) 137 EVUTIL_CLOSESOCKET(fd3); 138 if (listener1) 139 evconnlistener_free(listener1); 140 if (listener2) 141 evconnlistener_free(listener2); 142 } 143 144 static void 145 errorcb(struct evconnlistener *lis, void *data_) 146 { 147 int *data = data_; 148 *data = 1000; 149 evconnlistener_disable(lis); 150 } 151 152 static void 153 regress_listener_error(void *arg) 154 { 155 struct basic_test_data *data = arg; 156 struct event_base *base = data->base; 157 struct evconnlistener *listener = NULL; 158 int count = 1; 159 unsigned int flags = LEV_OPT_CLOSE_ON_FREE|LEV_OPT_REUSEABLE; 160 161 if (data->setup_data && strstr((char*)data->setup_data, "ts")) { 162 flags |= LEV_OPT_THREADSAFE; 163 } 164 165 /* send, so that pair[0] will look 'readable'*/ 166 tt_int_op(send(data->pair[1], "hello", 5, 0), >, 0); 167 168 /* Start a listener with a bogus socket. */ 169 listener = evconnlistener_new(base, acceptcb, &count, 170 flags, 0, 171 data->pair[0]); 172 tt_assert(listener); 173 174 evconnlistener_set_error_cb(listener, errorcb); 175 176 tt_assert(listener); 177 178 event_base_dispatch(base); 179 tt_int_op(count,==,1000); /* set by error cb */ 180 181 end: 182 if (listener) 183 evconnlistener_free(listener); 184 } 185 186 struct testcase_t listener_testcases[] = { 187 188 { "randport", regress_pick_a_port, TT_FORK|TT_NEED_BASE, 189 &basic_setup, NULL}, 190 191 { "randport_ts", regress_pick_a_port, TT_FORK|TT_NEED_BASE, 192 &basic_setup, __UNCONST("ts") }, 193 194 { "error", regress_listener_error, 195 TT_FORK|TT_NEED_BASE|TT_NEED_SOCKETPAIR, 196 &basic_setup, NULL}, 197 198 { "error_ts", regress_listener_error, 199 TT_FORK|TT_NEED_BASE|TT_NEED_SOCKETPAIR, 200 &basic_setup, __UNCONST("ts") }, 201 202 END_OF_TESTCASES, 203 }; 204 205 struct testcase_t listener_iocp_testcases[] = { 206 { "randport", regress_pick_a_port, 207 TT_FORK|TT_NEED_BASE|TT_ENABLE_IOCP, 208 &basic_setup, NULL}, 209 210 { "error", regress_listener_error, 211 TT_FORK|TT_NEED_BASE|TT_NEED_SOCKETPAIR|TT_ENABLE_IOCP, 212 &basic_setup, NULL}, 213 214 END_OF_TESTCASES, 215 }; 216