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
acceptcb(struct evconnlistener * listener,evutil_socket_t fd,struct sockaddr * addr,int socklen,void * arg)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
regress_pick_a_port(void * arg)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
errorcb(struct evconnlistener * lis,void * data_)145 errorcb(struct evconnlistener *lis, void *data_)
146 {
147 int *data = data_;
148 *data = 1000;
149 evconnlistener_disable(lis);
150 }
151
152 static void
regress_listener_error(void * arg)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