1/*	$NetBSD: t_listen.c,v 1.5 2017/01/13 20:41:50 christos Exp $	*/
2/*
3 * Copyright (c) 2007 The NetBSD Foundation, Inc.
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 *    notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 *    notice, this list of conditions and the following disclaimer in the
13 *    documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND
16 * CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
17 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
18 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19 * IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS BE LIABLE FOR ANY
20 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
22 * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
24 * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
25 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
26 * IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 */
28
29#include <sys/socket.h>
30#include <atf-c.h>
31#include <err.h>
32#include <errno.h>
33#include <fcntl.h>
34#include <string.h>
35#include <unistd.h>
36
37#include <arpa/inet.h>
38#include <netinet/in.h>
39
40static const char *path = "listen";
41
42ATF_TC_WITH_CLEANUP(listen_err);
43ATF_TC_HEAD(listen_err, tc)
44{
45	atf_tc_set_md_var(tc, "descr",
46	    "Checks errors from listen(2) (PR standards/46150)");
47}
48
49ATF_TC_BODY(listen_err, tc)
50{
51	static const size_t siz = sizeof(struct sockaddr_in);
52	struct sockaddr_in sina, sinb;
53	int fda, fdb, fdc;
54
55	(void)memset(&sina, 0, sizeof(struct sockaddr_in));
56	(void)memset(&sinb, 0, sizeof(struct sockaddr_in));
57
58	sina.sin_family = AF_INET;
59	sina.sin_port = htons(31522);
60	sina.sin_addr.s_addr = inet_addr("127.0.0.1");
61
62	sinb.sin_family = AF_INET;
63	sinb.sin_port = htons(31522);
64	sinb.sin_addr.s_addr = inet_addr("127.0.0.1");
65
66	fda = socket(AF_INET, SOCK_STREAM, 0);
67	fdb = socket(AF_INET, SOCK_STREAM, 0);
68	fdc = open("listen", O_RDWR | O_CREAT, 0600);
69
70	ATF_REQUIRE(fda >= 0 && fdb >= 0 && fdc >= 0);
71	ATF_REQUIRE_ERRNO(ENOTSOCK, listen(fdc, 1) == -1);
72
73	(void)close(fdc);
74	(void)unlink(path);
75
76	ATF_REQUIRE(bind(fda, (struct sockaddr *)&sina, siz) == 0);
77	ATF_REQUIRE(listen(fda, 1) == 0);
78
79	/*
80	 * According to IEEE Std 1003.1-2008: if the socket is
81	 * already connected, the call should fail with EINVAL.
82	 */
83	ATF_REQUIRE(connect(fdb, (struct sockaddr *)&sinb, siz) == 0);
84	ATF_REQUIRE_ERRNO(EINVAL, listen(fdb, 1) == -1);
85
86	(void)close(fda);
87	(void)close(fdb);
88
89	ATF_REQUIRE_ERRNO(EBADF, connect(fdb,
90		(struct sockaddr *)&sinb, siz) == -1);
91}
92
93ATF_TC_CLEANUP(listen_err, tc)
94{
95	(void)unlink(path);
96}
97
98ATF_TC(listen_low_port);
99ATF_TC_HEAD(listen_low_port, tc)
100{
101	atf_tc_set_md_var(tc, "descr", "Does low-port allocation work?");
102	atf_tc_set_md_var(tc, "require.user", "root");
103}
104
105ATF_TC_BODY(listen_low_port, tc)
106{
107	int sd, val;
108
109	sd = socket(AF_INET, SOCK_STREAM, 0);
110	ATF_REQUIRE_MSG(sd != -1, "socket failed: %s", strerror(errno));
111
112	val = IP_PORTRANGE_LOW;
113	if (setsockopt(sd, IPPROTO_IP, IP_PORTRANGE, &val,
114	    sizeof(val)) == -1)
115		atf_tc_fail("setsockopt failed: %s", strerror(errno));
116
117	if (listen(sd, 5) == -1) {
118		int serrno = errno;
119		atf_tc_fail("listen failed: %s%s",
120		    strerror(serrno),
121		    serrno != EACCES ? "" :
122		    " (see http://mail-index.netbsd.org/"
123		    "source-changes/2007/12/16/0011.html)");
124	}
125
126	close(sd);
127}
128
129ATF_TP_ADD_TCS(tp)
130{
131
132	ATF_TP_ADD_TC(tp, listen_err);
133	ATF_TP_ADD_TC(tp, listen_low_port);
134
135	return 0;
136}
137