Home | History | Annotate | Line # | Download | only in sys
t_select.c revision 1.3
      1 /*	$NetBSD: t_select.c,v 1.3 2012/03/18 07:00:52 jruoho Exp $ */
      2 
      3 /*-
      4  * Copyright (c) 2011 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundatiom
      8  * by Christos Zoulas.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 #include <assert.h>
     33 #include <sys/types.h>
     34 #include <sys/select.h>
     35 #include <sys/wait.h>
     36 #include <err.h>
     37 #include <stdio.h>
     38 #include <string.h>
     39 #include <signal.h>
     40 #include <stdlib.h>
     41 #include <unistd.h>
     42 #include <errno.h>
     43 #include <fcntl.h>
     44 
     45 #include <atf-c.h>
     46 
     47 static sig_atomic_t keep_going = 1;
     48 
     49 static void
     50 sig_handler(int signum)
     51 {
     52 	keep_going = 0;
     53 }
     54 
     55 static void
     56 sigchld(int signum)
     57 {
     58 }
     59 
     60 static char
     61 xtoa(uint8_t n)
     62 {
     63 	static const char xarray[] = "0123456789abcdef";
     64 	assert(n < sizeof(xarray));
     65 	return xarray[n];
     66 }
     67 
     68 static const char *
     69 prmask(const sigset_t *m, char *buf, size_t len)
     70 {
     71 	size_t j = 2;
     72 	assert(len >= 3 + sizeof(*m));
     73 	buf[0] = '0';
     74 	buf[1] = 'x';
     75 #define N(p, a)	(((p) >> ((a) * 4)) & 0xf)
     76 	for (size_t i = __arraycount(m->__bits); i > 0; i--) {
     77 		uint32_t p = m->__bits[i - 1];
     78 		for (size_t k = sizeof(p); k > 0; k--)
     79 			buf[j++] = xtoa(N(p, k - 1));
     80 	}
     81 	buf[j] = '\0';
     82 	return buf;
     83 }
     84 
     85 static void
     86 child(const struct timespec *ts)
     87 {
     88 	struct sigaction sa;
     89 	sigset_t set, oset, nset;
     90 	char obuf[sizeof(oset) + 3], nbuf[sizeof(nset) + 3];
     91 	int fd;
     92 
     93 	memset(&sa, 0, sizeof(sa));
     94 	sa.sa_handler = sig_handler;
     95 	if ((fd = open("/dev/null", O_RDONLY)) == -1)
     96 		err(1, "open");
     97 
     98 	if (sigaction(SIGTERM, &sa, NULL) == -1)
     99 		err(1, "sigaction");
    100 
    101 	sigfillset(&set);
    102 	if (sigprocmask(SIG_BLOCK, &set, NULL) == -1)
    103 		err(1, "sigprocmask");
    104 
    105 	if (sigprocmask(SIG_BLOCK, NULL, &oset) == -1)
    106 		err(1, "sigprocmask");
    107 
    108 	sigemptyset(&set);
    109 
    110 	for (;;) {
    111 		fd_set rset;
    112 		FD_ZERO(&rset);
    113 		FD_SET(fd, &rset);
    114 		if (pselect(1, &rset, NULL, NULL, ts, &set) == -1) {
    115 			if(errno == EINTR) {
    116 				if (!keep_going)
    117 					break;
    118 			}
    119 		}
    120 		if (ts)
    121 			break;
    122 	}
    123 	if (sigprocmask(SIG_BLOCK, NULL, &nset) == -1)
    124 		err(1, "sigprocmask");
    125 	if (memcmp(&oset, &nset, sizeof(oset)) != 0)
    126 		atf_tc_fail("pselect() masks don't match "
    127 		    "after timeout %s != %s",
    128 		    prmask(&nset, nbuf, sizeof(nbuf)),
    129 		    prmask(&oset, obuf, sizeof(obuf)));
    130 }
    131 
    132 ATF_TC(pselect_sigmask);
    133 ATF_TC_HEAD(pselect_sigmask, tc)
    134 {
    135 	atf_tc_set_md_var(tc, "descr", "Checks pselect's temporary mask "
    136 	    "setting when a signal is received (PR lib/43625)");
    137 }
    138 
    139 ATF_TC_BODY(pselect_sigmask, tc)
    140 {
    141 	pid_t pid;
    142 	int status;
    143 
    144 	signal(SIGCHLD, sigchld);
    145 
    146 	switch (pid = fork()) {
    147 	case 0:
    148 		child(NULL);
    149 	case -1:
    150 		err(1, "fork");
    151 	default:
    152 		sleep(1);
    153 		if (kill(pid, SIGTERM) == -1)
    154 			err(1, "kill");
    155 		sleep(1);
    156 		switch (waitpid(pid, &status, WNOHANG)) {
    157 		case -1:
    158 			err(1, "wait");
    159 		case 0:
    160 			if (kill(pid, SIGKILL) == -1)
    161 				err(1, "kill");
    162 			atf_tc_fail("pselect() did not receive signal");
    163 			break;
    164 		default:
    165 			break;
    166 		}
    167 	}
    168 }
    169 
    170 ATF_TC(pselect_timeout);
    171 ATF_TC_HEAD(pselect_timeout, tc)
    172 {
    173 
    174 	atf_tc_set_md_var(tc, "descr", "Checks pselect's temporary mask "
    175 	    "setting when a timeout occurs");
    176 }
    177 
    178 ATF_TC_BODY(pselect_timeout, tc)
    179 {
    180 	pid_t pid;
    181 	int status;
    182 	static const struct timespec zero = { 0, 0 };
    183 
    184 	signal(SIGCHLD, sigchld);
    185 
    186 	switch (pid = fork()) {
    187 	case 0:
    188 		child(&zero);
    189 		break;
    190 	case -1:
    191 		err(1, "fork");
    192 	default:
    193 		sleep(1);
    194 		switch (waitpid(pid, &status, WNOHANG)) {
    195 		case -1:
    196 			err(1, "wait");
    197 		case 0:
    198 			if (kill(pid, SIGKILL) == -1)
    199 				err(1, "kill");
    200 			atf_tc_fail("pselect() did not receive signal");
    201 			break;
    202 		default:
    203 			break;
    204 		}
    205 	}
    206 }
    207 
    208 ATF_TP_ADD_TCS(tp)
    209 {
    210 
    211 	ATF_TP_ADD_TC(tp, pselect_sigmask);
    212 	ATF_TP_ADD_TC(tp, pselect_timeout);
    213 
    214 	return atf_no_error();
    215 }
    216