1 /* Test of poll() function.
2 Copyright (C) 2008 Free Software Foundation, Inc.
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 3, or (at your option)
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software Foundation,
16 Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */
18 /* Written by Paolo Bonzini. */
24 #include <sys/socket.h>
25 #include <netinet/in.h>
26 #include <arpa/inet.h>
31 #include <sys/ioctl.h>
35 #if (defined _WIN32 || defined __WIN32__) && ! defined __CYGWIN__
41 #define pipe(x) _pipe(x, 256, O_BINARY)
46 #ifdef HAVE_SYS_WAIT_H
51 #define SO_REUSEPORT SO_REUSEADDR
54 #define TEST_PORT 12345
57 /* Minimal testing infrastructure. */
62 failed (const char *reason)
66 printf ("failed (%s)\n", reason);
70 test (void (*fn) (void), const char *msg)
73 printf ("%s... ", msg);
84 /* Funny socket code. */
90 struct sockaddr_in ia;
92 s = socket (AF_INET, SOCK_STREAM, 0);
94 memset (&ia, 0, sizeof (ia));
95 ia.sin_family = AF_INET;
96 inet_pton (AF_INET, "127.0.0.1", &ia.sin_addr);
97 ia.sin_port = htons (TEST_PORT);
98 if (bind (s, (struct sockaddr *) &ia, sizeof (ia)) < 0)
105 setsockopt (s, SOL_SOCKET, SO_REUSEPORT, &x, sizeof (x));
107 if (listen (s, 1) < 0)
117 connect_to_socket (int blocking)
120 struct sockaddr_in ia;
122 s = socket (AF_INET, SOCK_STREAM, 0);
124 memset (&ia, 0, sizeof (ia));
125 ia.sin_family = AF_INET;
126 inet_pton (AF_INET, "127.0.0.1", &ia.sin_addr);
127 ia.sin_port = htons (TEST_PORT);
132 unsigned long iMode = 1;
133 ioctl (s, FIONBIO, (char *) &iMode);
135 #elif defined F_GETFL
136 int oldflags = fcntl (s, F_GETFL, NULL);
138 if (!(oldflags & O_NONBLOCK))
139 fcntl (s, F_SETFL, oldflags | O_NONBLOCK);
143 if (connect (s, (struct sockaddr *) &ia, sizeof (ia)) < 0
144 && (blocking || errno != EINPROGRESS))
154 /* A slightly more convenient interface to poll(2). */
157 poll1 (int fd, int ev, int time)
165 r = poll (&pfd, 1, time);
169 if (pfd.revents & ~(POLLHUP | POLLERR | POLLNVAL | ev))
170 failed ("invalid flag combination (unrequested events)");
176 poll1_nowait (int fd, int ev)
178 return poll1 (fd, ev, 0);
182 poll1_wait (int fd, int ev)
184 return poll1 (fd, ev, -1);
188 /* Test poll(2) for TTYs. */
194 if (poll1_nowait (0, POLLIN | POLLRDNORM) != 0)
196 if (poll1_nowait (0, POLLOUT) == 0)
197 failed ("cannot write");
199 if (poll1_wait (0, POLLIN | POLLRDNORM) == 0)
200 failed ("return with infinite timeout");
203 if (poll1_nowait (0, POLLIN | POLLRDNORM) != 0)
204 failed ("can read after getc");
209 /* Test poll(2) for unconnected nonblocking sockets. */
212 test_connect_first (void)
214 int s = open_server_socket ();
215 struct sockaddr_in ia;
220 if (poll1_nowait (s, POLLIN | POLLRDNORM | POLLRDBAND) != 0)
221 failed ("can read, socket not connected");
223 c1 = connect_to_socket (false);
225 if (poll1_wait (s, POLLIN | POLLRDNORM | POLLRDBAND) != (POLLIN | POLLRDNORM))
226 failed ("expecting POLLIN | POLLRDNORM on passive socket");
227 if (poll1_nowait (s, POLLIN | POLLRDBAND) != POLLIN)
228 failed ("expecting POLLIN on passive socket");
229 if (poll1_nowait (s, POLLRDNORM | POLLRDBAND) != POLLRDNORM)
230 failed ("expecting POLLRDNORM on passive socket");
232 addrlen = sizeof (ia);
233 c2 = accept (s, (struct sockaddr *) &ia, &addrlen);
240 /* Test poll(2) for unconnected blocking sockets. */
243 test_accept_first (void)
246 int s = open_server_socket ();
247 struct sockaddr_in ia;
258 addrlen = sizeof (ia);
259 c = accept (s, (struct sockaddr *) &ia, &addrlen);
263 shutdown (c, SHUT_RD);
270 c = connect_to_socket (true);
271 if (poll1_nowait (c, POLLOUT | POLLWRNORM | POLLRDBAND)
272 != (POLLOUT | POLLWRNORM))
273 failed ("cannot write after blocking connect");
276 if (poll1_wait (c, POLLIN) != POLLIN)
277 failed ("cannot read data left in the socket by closed process");
280 if ((poll1_wait (c, POLLIN | POLLOUT) & (POLLHUP | POLLERR)) == 0)
281 failed ("expecting POLLHUP after shutdown");
288 /* Common code for pipes and connected sockets. */
291 test_pair (int rd, int wd)
294 if (poll1_wait (wd, POLLIN | POLLRDNORM | POLLOUT | POLLWRNORM | POLLRDBAND)
295 != (POLLOUT | POLLWRNORM))
296 failed ("expecting POLLOUT | POLLWRNORM before writing");
297 if (poll1_nowait (wd, POLLIN | POLLRDNORM | POLLOUT | POLLRDBAND) != POLLOUT)
298 failed ("expecting POLLOUT before writing");
299 if (poll1_nowait (wd, POLLIN | POLLRDNORM | POLLWRNORM | POLLRDBAND)
301 failed ("expecting POLLWRNORM before writing");
303 write (wd, "foo", 3);
304 if (poll1_wait (rd, POLLIN | POLLRDNORM) != (POLLIN | POLLRDNORM))
305 failed ("expecting POLLIN | POLLRDNORM after writing");
306 if (poll1_nowait (rd, POLLIN) != POLLIN)
307 failed ("expecting POLLIN after writing");
308 if (poll1_nowait (rd, POLLRDNORM) != POLLRDNORM)
309 failed ("expecting POLLRDNORM after writing");
315 /* Test poll(2) on connected sockets. */
318 test_socket_pair (void)
320 struct sockaddr_in ia;
322 socklen_t addrlen = sizeof (ia);
323 int s = open_server_socket ();
324 int c1 = connect_to_socket (false);
325 int c2 = accept (s, (struct sockaddr *) &ia, &addrlen);
331 write (c2, "foo", 3);
332 if ((poll1_nowait (c2, POLLIN | POLLOUT) & (POLLHUP | POLLERR)) == 0)
333 failed ("expecting POLLHUP after shutdown");
339 /* Test poll(2) on pipes. */
347 test_pair (fd[0], fd[1]);
349 if ((poll1_wait (fd[1], POLLIN | POLLOUT) & (POLLHUP | POLLERR)) == 0)
350 failed ("expecting POLLHUP after shutdown");
363 gl_sockets_startup (SOCKETS_1_1);
366 printf ("Please press Enter\n");
367 test (test_tty, "TTY");
370 result = test (test_connect_first, "Unconnected socket test");
371 result += test (test_socket_pair, "Connected sockets test");
372 result += test (test_accept_first, "General socket test with fork");
373 result += test (test_pipe, "Pipe test");