1 /*-
2  * Copyright (c) 2004 Robert N. M. Watson
3  * All rights reserved.
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  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD$
27  */
28 
29 #include <sys/types.h>
30 #include <sys/module.h>
31 #include <sys/socket.h>
32 
33 #include <netinet/in.h>
34 
35 #include <err.h>
36 #include <errno.h>
37 #include <fcntl.h>
38 #include <stdio.h>
39 #include <stdlib.h>
40 #include <string.h>
41 #include <unistd.h>
42 
43 #define	ACCF_NAME	"dataready"
44 
45 /*
46  * A number of small tests to confirm that attaching ACCF_DATA accept filters
47  * to inet4 ports works as expected.  We test:
48  *
49  * - That no accept filter is attached on a newly created socket.
50  * - That bind() has no affect on the accept filter state.
51  * - That we can't attach an accept filter to a socket that isn't in the
52  *   listen state.
53  * - That after we fail to attach the filter, querying the kernel shows no
54  *   filter attached.
55  * - That we can attach an accept filter to a socket that is in the listen
56  *   state.
57  * - That once an accept filter is attached, we can query to make sure it is
58  *   attached.
59  * - That once an accept filter is attached, we can remove it and query to
60  *   make sure it is removed.
61  */
62 int
63 main(void)
64 {
65 	struct accept_filter_arg afa;
66 	struct sockaddr_in sin;
67 	struct linger linger;
68 	socklen_t len;
69 	int lso, so, i, ret;
70 
71 	/* XXX: PLAIN_TEST_REQUIRE_MODULE "backport" for stable/9 */
72 	const char *_mod_name = "accf_data";
73 
74 	if (modfind(_mod_name) == -1) {
75 		printf("1..0 # SKIP - module %s could not be resolved: %s\n",
76 		    _mod_name, strerror(errno));
77 		_exit(0);
78 	}
79 	/* XXX: PLAIN_TEST_REQUIRE_MODULE for stable/9 */
80 
81 	printf("1..12\n");
82 
83 	/*
84 	 * Step 0. Open socket().
85 	 */
86 	lso = socket(PF_INET, SOCK_STREAM, 0);
87 	if (lso == -1)
88 		errx(-1, "not ok 1 - socket: %s", strerror(errno));
89 	printf("ok 1 - socket\n");
90 
91 	/*
92 	 * Step 1. After socket().  Should return EINVAL, since no accept
93 	 * filter should be attached.
94 	 */
95 	bzero(&afa, sizeof(afa));
96 	len = sizeof(afa);
97 	ret = getsockopt(lso, SOL_SOCKET, SO_ACCEPTFILTER, &afa, &len);
98 	if (ret != -1)
99 		errx(-1, "not ok 2 - getsockopt() after socket() succeeded");
100 	if (errno != EINVAL)
101 		errx(-1, "not ok 2 - getsockopt() after socket() failed with "
102 		    "%d (%s)", errno, strerror(errno));
103 	printf("ok 2 - getsockopt\n");
104 
105 	/*
106 	 * Step 2. Bind().  Ideally this will succeed.
107 	 */
108 	setsockopt(lso, SOL_SOCKET, SO_REUSEADDR, &lso, sizeof(lso));
109 	bzero(&sin, sizeof(sin));
110 	sin.sin_len = sizeof(sin);
111 	sin.sin_family = AF_INET;
112 	sin.sin_port = htons(8080);
113 	sin.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
114 	if (bind(lso, (struct sockaddr *)&sin, sizeof(sin)) < 0)
115 		errx(-1, "not ok 3 - bind %s", strerror(errno));
116 	printf("ok 3 - bind\n");
117 
118 	/*
119 	 * Step 3: After bind().  getsockopt() should return EINVAL, since no
120 	 *  accept filter should be attached.
121 	 */
122 	len = sizeof(afa);
123 	ret = getsockopt(lso, SOL_SOCKET, SO_ACCEPTFILTER, &afa, &len);
124 	if (ret != -1)
125 		errx(-1, "not ok 4 - getsockopt() after bind() succeeded");
126 	if (errno != EINVAL)
127 		errx(-1, "not ok 4 -  getsockopt() after bind() failed with %d (%s)",
128 		    errno, strerror(errno));
129 	printf("ok 4 - getsockopt\n");
130 
131 	/*
132 	 * Step 4: Setsockopt() before listen().  Should fail, since it's not
133 	 * yet a listen() socket.
134 	 */
135 	bzero(&afa, sizeof(afa));
136 	strncpy(afa.af_name, ACCF_NAME, sizeof(afa.af_name));
137 	ret = setsockopt(lso, SOL_SOCKET, SO_ACCEPTFILTER, &afa, sizeof(afa));
138 	if (ret == 0)
139 		errx(-1, "not ok 5 - setsockopt() before listen() succeeded");
140 	printf("ok 5 - setsockopt\n");
141 
142 	/*
143 	 * Step 5: Getsockopt() after pre-listen() setsockopt().  Should
144 	 * fail with EINVAL, since setsockopt() should have failed.
145 	 */
146 	len = sizeof(afa);
147 	ret = getsockopt(lso, SOL_SOCKET, SO_ACCEPTFILTER, &afa, &len);
148 	if (ret == 0)
149 		errx(-1, "not ok 6 - getsockopt() after pre-listen() setsockopt() "
150 		    "succeeded");
151 	if (errno != EINVAL)
152 		errx(-1, "not ok 6 - pre-listen() getsockopt() failed with %d (%s)",
153 		    errno, strerror(errno));
154 	printf("ok 6 - getsockopt\n");
155 
156 	/*
157 	 * Step 6: listen().
158 	 */
159 	if (listen(lso, -1) < 0)
160 		errx(-1, "not ok 7 - listen: %s", strerror(errno));
161 	printf("ok 7 - listen\n");
162 
163 	/*
164 	 * Step 7: Getsockopt() after listen().  Should fail with EINVAL,
165 	 * since we have not installed accept filter yet.
166 	 */
167 	len = sizeof(afa);
168 	ret = getsockopt(lso, SOL_SOCKET, SO_ACCEPTFILTER, &afa, &len);
169 	if (ret == 0)
170 		errx(-1, "not ok 8 - getsockopt() after listen() but before "
171 		    "setsockopt() succeeded");
172 	if (errno != EINVAL)
173 		errx(-1, "not ok 8 - getsockopt() after listen() but before "
174 		    "setsockopt() failed with %d (%s)", errno, strerror(errno));
175 	printf("ok 8 - getsockopt\n");
176 
177 	/*
178 	 * Step 8: After listen().  This call to setsockopt() should succeed.
179 	 */
180 	bzero(&afa, sizeof(afa));
181 	strncpy(afa.af_name, ACCF_NAME, sizeof(afa.af_name));
182 	ret = setsockopt(lso, SOL_SOCKET, SO_ACCEPTFILTER, &afa, sizeof(afa));
183 	if (ret != 0)
184 		errx(-1, "not ok 9 - setsockopt() after listen() failed with %d "
185 		    "(%s)", errno, strerror(errno));
186 	printf("ok 9 - setsockopt\n");
187 
188 	/*
189 	 * Step 9: After setsockopt().  Should succeed and identify
190 	 * ACCF_NAME.
191 	 */
192 	bzero(&afa, sizeof(afa));
193 	len = sizeof(afa);
194 	ret = getsockopt(lso, SOL_SOCKET, SO_ACCEPTFILTER, &afa, &len);
195 	if (ret != 0)
196 		errx(-1, "not ok 10 - getsockopt() after listen() setsockopt() "
197 		    "failed with %d (%s)", errno, strerror(errno));
198 	if (len != sizeof(afa))
199 		errx(-1, "not ok 10 - getsockopt() after setsockopet()  after "
200 		    "listen() returned wrong size (got %d expected %zd)", len,
201 		    sizeof(afa));
202 	if (strcmp(afa.af_name, ACCF_NAME) != 0)
203 		errx(-1, "not ok 10 - getsockopt() after setsockopt() after "
204 		    "listen() mismatch (got %s expected %s)", afa.af_name,
205 		    ACCF_NAME);
206 	printf("ok 10 - getsockopt\n");
207 
208 	/*
209 	 * Step 10: Set listening socket to non blocking mode.  Open
210 	 * connection to our listening socket and try to accept.  Should
211 	 * no succeed.  Write a byte of data and try again.  Should accept.
212 	 */
213 	i = fcntl(lso, F_GETFL);
214 	if (i < 0)
215 		errx(-1, "not ok 11 - ioctl(F_GETFL): %s", strerror(errno));
216 	i |= O_NONBLOCK;
217 	if (fcntl(lso, F_SETFL, i) != 0)
218 		errx(-1, "not ok 11 - ioctl(F_SETFL): %s", strerror(errno));
219 	so = socket(PF_INET, SOCK_STREAM, 0);
220 	if (so == -1)
221 		errx(-1, "not ok 11 - socket: %s", strerror(errno));
222 	if (connect(so, (struct sockaddr *)&sin, sizeof(sin)) < 0)
223 		errx(-1, "not ok 11 - connect %s", strerror(errno));
224 	if (accept(lso, NULL, 0) != -1 && errno != EWOULDBLOCK)
225 		errx(-1, "not ok 11 - accept #1 %s", strerror(errno));
226 	if (write(so, "0", 1) != 1)
227 		errx(-1, "not ok 11 - write %s", strerror(errno));
228 	/*
229 	 * XXXGL: ugly, but we need to make sure that our write reaches
230 	 * remote side of the socket.
231 	 */
232 	usleep(10000);
233 	if (accept(lso, NULL, 0) < 1)
234 		errx(-1, "not ok 11 - accept #2 %s", strerror(errno));
235 	if (close(so) != 0)
236 		errx(-1, "not ok 11 - close(): %s", strerror(errno));
237 	printf("ok 11 - accept\n");
238 
239 	/*
240 	 * Step 12: reset connection before accept filter allows it.
241 	 * In this case the connection must make it to the listen
242 	 * queue, but with ECONNABORTED code.
243 	 */
244 	so = socket(PF_INET, SOCK_STREAM, 0);
245 	if (so == -1)
246 		errx(-1, "not ok 12 - socket: %s", strerror(errno));
247 	if (connect(so, (struct sockaddr *)&sin, sizeof(sin)) < 0)
248 		errx(-1, "not ok 12 - connect %s", strerror(errno));
249 	linger.l_onoff = 1;
250 	linger.l_linger = 0;
251 	ret = setsockopt(so, SOL_SOCKET, SO_LINGER, &linger, sizeof(linger));
252 	if (ret != 0)
253 		errx(-1, "not ok 12 - setsockopt(SO_LINGER) failed with %d "
254 		    "(%s)", errno, strerror(errno));
255 	if (close(so) != 0)
256 		errx(-1, "not ok 12 - close(): %s", strerror(errno));
257 	if (accept(lso, NULL, 0) != -1 && errno != ECONNABORTED)
258 		errx(-1, "not ok 12 - accept #3 %s", strerror(errno));
259 	printf("ok 12 - accept\n");
260 
261 #if 1
262 	/*
263 	 * XXXGL: this doesn't belong to the test itself, but is known
264 	 * to examine rarely examined paths in the kernel.  Intentionally
265 	 * leave a socket on the incomplete queue, before the program
266 	 * exits.
267 	 */
268 	so = socket(PF_INET, SOCK_STREAM, 0);
269 	if (so == -1)
270 		errx(-1, "not ok 13 - socket: %s", strerror(errno));
271 	if (connect(so, (struct sockaddr *)&sin, sizeof(sin)) < 0)
272 		errx(-1, "not ok 13 - connect %s", strerror(errno));
273 #endif
274 
275 	/*
276 	 * Step 12: Remove accept filter.  After removing the accept filter
277 	 * getsockopt() should fail with EINVAL.
278 	 */
279 	ret = setsockopt(lso, SOL_SOCKET, SO_ACCEPTFILTER, NULL, 0);
280 	if (ret != 0)
281 		errx(-1, "not ok 13 - setsockopt() after listen() "
282 		    "failed with %d (%s)", errno, strerror(errno));
283 	bzero(&afa, sizeof(afa));
284 	len = sizeof(afa);
285 	ret = getsockopt(lso, SOL_SOCKET, SO_ACCEPTFILTER, &afa, &len);
286 	if (ret == 0)
287 		errx(-1, "not ok 13 - getsockopt() after removing "
288 		    "the accept filter returns valid accept filter %s",
289 		    afa.af_name);
290 	if (errno != EINVAL)
291 		errx(-1, "not ok 13 - getsockopt() after removing the accept"
292 		    "filter failed with %d (%s)", errno, strerror(errno));
293 	if (close(lso) != 0)
294 		errx(-1, "not ok 13 - close() of listening socket: %s",
295 		    strerror(errno));
296 	printf("ok 13 - setsockopt\n");
297 
298 	return (0);
299 }
300