Implement SO_NOSIGPIPE
[dragonfly.git] / tools / regression / sockets / sigpipe / sigpipe.c
1 /*-
2  * Copyright (c) 2005 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/socket.h>
31
32 #include <netinet/in.h>
33
34 #include <err.h>
35 #include <errno.h>
36 #include <signal.h>
37 #include <stdio.h>
38 #include <stdlib.h>
39 #include <string.h>
40 #include <unistd.h>
41
42 /*
43  * This regression test is intended to verify whether or not SIGPIPE is
44  * properly generated in several simple test cases, as well as testing
45  * whether SO_NOSIGPIPE disables SIGPIPE, if available on the system.
46  * SIGPIPE is generated if a write or send is attempted on a socket that has
47  * been shutdown for write.  This test runs several test cases with UNIX
48  * domain sockets and TCP sockets to confirm that either EPIPE or SIGPIPE is
49  * properly returned.
50  *
51  * For the purposes of testing TCP, an unused port number must be specified.
52  */
53 static void
54 usage(void)
55 {
56
57         errx(-1, "usage: sigpipe tcpport");
58 }
59
60 /*
61  * Signal catcher.  Set a global flag that can be tested by the caller.
62  */
63 static int signaled;
64 static int
65 got_signal(void)
66 {
67
68         return (signaled);
69 }
70
71 static void
72 signal_handler(int signum)
73 {
74
75         signaled = 1;
76 }
77
78 static void
79 signal_setup(const char *testname)
80 {
81
82         signaled = 0;
83         if (signal(SIGPIPE, signal_handler) == SIG_ERR)
84                 err(-1, "%s: signal(SIGPIPE)", testname);
85 }
86
87 static void
88 test_send(const char *testname, int sock)
89 {
90         ssize_t len;
91         char ch;
92
93         ch = 0;
94         len = send(sock, &ch, sizeof(ch), 0);
95         if (len < 0) {
96                 if (errno == EPIPE)
97                         return;
98                 err(-1, "%s: send", testname);
99         }
100         errx(-1, "%s: send: returned %d", testname, len);
101 }
102
103 static void
104 test_write(const char *testname, int sock)
105 {
106         ssize_t len;
107         char ch;
108
109         ch = 0;
110         len = write(sock, &ch, sizeof(ch));
111         if (len < 0) {
112                 if (errno == EPIPE)
113                         return;
114                 err(-1, "%s: write", testname);
115         }
116         errx(-1, "%s: write: returned %d", testname, len);
117 }
118
119 static void
120 test_send_wantsignal(const char *testname, int sock1, int sock2)
121 {
122
123         if (shutdown(sock2, SHUT_WR) < 0)
124                 err(-1, "%s: shutdown", testname);
125         signal_setup(testname);
126         test_send(testname, sock2);
127         if (!got_signal())
128                 errx(-1, "%s: send: didn't receive SIGPIPE", testname);
129         close(sock1);
130         close(sock2);
131 }
132
133 #ifdef SO_NOSIGPIPE
134 static void
135 test_send_dontsignal(const char *testname, int sock1, int sock2)
136 {
137         int i;
138
139         i = 1;
140         if (setsockopt(sock2, SOL_SOCKET, SO_NOSIGPIPE, &i, sizeof(i)) < 0)
141                 err(-1, "%s: setsockopt(SOL_SOCKET, SO_NOSIGPIPE)", testname);
142         if (shutdown(sock2, SHUT_WR) < 0)
143                 err(-1, "%s: shutdown", testname);
144         signal_setup(testname);
145         test_send(testname, sock2);
146         if (got_signal())
147                 errx(-1, "%s: send: got SIGPIPE", testname);
148         close(sock1);
149         close(sock2);
150 }
151 #endif
152
153 static void
154 test_write_wantsignal(const char *testname, int sock1, int sock2)
155 {
156
157         if (shutdown(sock2, SHUT_WR) < 0)
158                 err(-1, "%s: shutdown", testname);
159         signal_setup(testname);
160         test_write(testname, sock2);
161         if (!got_signal())
162                 errx(-1, "%s: write: didn't receive SIGPIPE", testname);
163         close(sock1);
164         close(sock2);
165 }
166
167 #ifdef SO_NOSIGPIPE
168 static void
169 test_write_dontsignal(const char *testname, int sock1, int sock2)
170 {
171         int i;
172
173         i = 1;
174         if (setsockopt(sock2, SOL_SOCKET, SO_NOSIGPIPE, &i, sizeof(i)) < 0)
175                 err(-1, "%s: setsockopt(SOL_SOCKET, SO_NOSIGPIPE)", testname);
176         if (shutdown(sock2, SHUT_WR) < 0)
177                 err(-1, "%s: shutdown", testname);
178         signal_setup(testname);
179         test_write(testname, sock2);
180         if (got_signal())
181                 errx(-1, "%s: write: got SIGPIPE", testname);
182         close(sock1);
183         close(sock2);
184 }
185 #endif
186
187 static int listen_sock;
188 static void
189 tcp_setup(u_short port)
190 {
191         struct sockaddr_in sin;
192
193         listen_sock = socket(PF_INET, SOCK_STREAM, 0);
194         if (listen_sock < 0)
195                 err(-1, "tcp_setup: listen");
196
197         bzero(&sin, sizeof(sin));
198         sin.sin_len = sizeof(sin);
199         sin.sin_family = AF_INET;
200         sin.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
201         sin.sin_port = htons(port);
202
203         if (bind(listen_sock, (struct sockaddr *)&sin, sizeof(sin)) < 0)
204                 err(-1, "tcp_setup: bind");
205
206         if (listen(listen_sock, -1) < 0)
207                 err(-1, "tcp_setup: listen");
208 }
209
210 static void
211 tcp_teardown(void)
212 {
213
214         close(listen_sock);
215 }
216
217 static void
218 tcp_pair(u_short port, int sock[2])
219 {
220         int accept_sock, connect_sock;
221         struct sockaddr_in sin;
222         socklen_t len;
223
224         connect_sock = socket(PF_INET, SOCK_STREAM, 0);
225         if (connect_sock < 0)
226                 err(-1, "tcp_pair: socket");
227
228         bzero(&sin, sizeof(sin));
229         sin.sin_len = sizeof(sin);
230         sin.sin_family = AF_INET;
231         sin.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
232         sin.sin_port = htons(port);
233
234         if (connect(connect_sock, (struct sockaddr *)&sin, sizeof(sin)) < 0)
235                 err(-1, "tcp_pair: connect");
236
237         sleep(1);                               /* Time for TCP to settle. */
238
239         len = sizeof(sin);
240         accept_sock = accept(listen_sock, (struct sockaddr *)&sin, &len);
241         if (accept_sock < 0)
242                 err(-1, "tcp_pair: accept");
243
244         sleep(1);                               /* Time for TCP to settle. */
245
246         sock[0] = accept_sock;
247         sock[1] = connect_sock;
248 }
249
250 int
251 main(int argc, char *argv[])
252 {
253         char *dummy;
254         int sock[2];
255         long port;
256
257         if (argc != 2)
258                 usage();
259
260         port = strtol(argv[1], &dummy, 10);
261         if (port < 0 || port > 65535 || *dummy != '\0')
262                 usage();
263
264 #ifndef SO_NOSIGPIPE
265         warnx("sigpipe: SO_NOSIGPIPE not defined, skipping some tests");
266 #endif
267
268         /*
269          * UNIX domain socketpair().
270          */
271         if (socketpair(PF_LOCAL, SOCK_STREAM, 0, sock) < 0)
272                 err(-1, "socketpair(PF_LOCAL, SOCK_STREAM)");
273         test_send_wantsignal("test_send_wantsignal(PF_LOCAL)", sock[0],
274             sock[1]);
275
276 #ifdef SO_NOSIGPIPE
277         if (socketpair(PF_LOCAL, SOCK_STREAM, 0, sock) < 0)
278                 err(-1, "socketpair(PF_LOCAL, SOCK_STREAM)");
279         test_send_dontsignal("test_send_dontsignal(PF_LOCAL)", sock[0],
280             sock[1]);
281 #endif
282
283         if (socketpair(PF_LOCAL, SOCK_STREAM, 0, sock) < 0)
284                 err(-1, "socketpair(PF_LOCAL, SOCK_STREAM)");
285         test_write_wantsignal("test_write_wantsignal(PF_LOCAL)", sock[0],
286             sock[1]);
287
288 #ifdef SO_NOSIGPIPE
289         if (socketpair(PF_LOCAL, SOCK_STREAM, 0, sock) < 0)
290                 err(-1, "socketpair(PF_LOCAL, SOCK_STREAM)");
291         test_write_dontsignal("test_write_dontsignal(PF_LOCAL)", sock[0],
292             sock[1]);
293 #endif
294
295         /*
296          * TCP.
297          */
298         tcp_setup(port);
299         tcp_pair(port, sock);
300         test_send_wantsignal("test_send_wantsignal(PF_INET)", sock[0],
301             sock[1]);
302
303 #ifdef SO_NOSIGPIPE
304         tcp_pair(port, sock);
305         test_send_dontsignal("test_send_dontsignal(PF_INET)", sock[0],
306             sock[1]);
307 #endif
308
309         tcp_pair(port, sock);
310         test_write_wantsignal("test_write_wantsignal(PF_INET)", sock[0],
311             sock[1]);
312
313 #ifdef SO_NOSIGPIPE
314         tcp_pair(port, sock);
315         test_write_dontsignal("test_write_dontsignal(PF_INET)", sock[0],
316             sock[1]);
317 #endif
318         tcp_teardown();
319
320         fprintf(stderr, "PASS\n");
321         return (0);
322 }