1 /*	$NetBSD: t_lwproc.c,v 1.5 2011/01/02 12:58:17 pooka Exp $	*/
2 
3 /*
4  * Copyright (c) 2010 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND
17  * CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
18  * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
19  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20  * IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS BE LIABLE FOR ANY
21  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
23  * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
24  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
25  * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
26  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
27  * IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  */
29 
30 #include <sys/types.h>
31 #include <sys/wait.h>
32 
33 #include <rump/rump.h>
34 #include <rump/rump_syscalls.h>
35 
36 #include <atf-c.h>
37 #include <err.h>
38 #include <errno.h>
39 #include <fcntl.h>
40 #include <stdio.h>
41 #include <stdlib.h>
42 #include <string.h>
43 #include <unistd.h>
44 #include <util.h>
45 
46 #include "../../h_macros.h"
47 
48 ATF_TC(makelwp);
49 ATF_TC_HEAD(makelwp, tc)
50 {
51 
52 	atf_tc_set_md_var(tc, "descr", "tests that lwps can be attached to "
53 	    "processes");
54 }
55 
56 ATF_TC_BODY(makelwp, tc)
57 {
58 	struct lwp *l;
59 	pid_t pid;
60 
61 	rump_init();
62 	RZ(rump_pub_lwproc_newlwp(0));
63 	ATF_REQUIRE_EQ(rump_pub_lwproc_newlwp(37), ESRCH);
64 	l = rump_pub_lwproc_curlwp();
65 
66 	RZ(rump_pub_lwproc_rfork(RUMP_RFCFDG));
67 	ATF_REQUIRE(rump_pub_lwproc_curlwp() != l);
68 	l = rump_pub_lwproc_curlwp();
69 
70 	RZ(rump_pub_lwproc_newlwp(rump_sys_getpid()));
71 	ATF_REQUIRE(rump_pub_lwproc_curlwp() != l);
72 
73 	pid = rump_sys_getpid();
74 	ATF_REQUIRE(pid != -1 && pid != 0);
75 }
76 
77 ATF_TC(proccreds);
78 ATF_TC_HEAD(proccreds, tc)
79 {
80 
81 	atf_tc_set_md_var(tc, "descr", "check that procs have different creds");
82 }
83 
84 ATF_TC_BODY(proccreds, tc)
85 {
86 	struct lwp *l1, *l2;
87 
88 	rump_init();
89 	RZ(rump_pub_lwproc_rfork(RUMP_RFCFDG));
90 	l1 = rump_pub_lwproc_curlwp();
91 
92 	RZ(rump_pub_lwproc_rfork(RUMP_RFCFDG));
93 	l2 = rump_pub_lwproc_curlwp();
94 
95 	RL(rump_sys_setuid(22));
96 	ATF_REQUIRE_EQ(rump_sys_getuid(), 22);
97 
98 	rump_pub_lwproc_switch(l1);
99 	ATF_REQUIRE_EQ(rump_sys_getuid(), 0); /* from parent, proc0 */
100 	RL(rump_sys_setuid(11));
101 	ATF_REQUIRE_EQ(rump_sys_getuid(), 11);
102 
103 	rump_pub_lwproc_switch(l2);
104 	ATF_REQUIRE_EQ(rump_sys_getuid(), 22);
105 	rump_pub_lwproc_newlwp(rump_sys_getpid());
106 	ATF_REQUIRE_EQ(rump_sys_getuid(), 22);
107 }
108 
109 
110 ATF_TC(inherit);
111 ATF_TC_HEAD(inherit, tc)
112 {
113 
114 	atf_tc_set_md_var(tc, "descr", "new processes inherit creds from "
115 	    "parents");
116 }
117 
118 ATF_TC_BODY(inherit, tc)
119 {
120 
121 	rump_init();
122 
123 	RZ(rump_pub_lwproc_rfork(RUMP_RFCFDG));
124 	RL(rump_sys_setuid(66));
125 	ATF_REQUIRE_EQ(rump_sys_getuid(), 66);
126 
127 	RZ(rump_pub_lwproc_rfork(RUMP_RFCFDG));
128 	ATF_REQUIRE_EQ(rump_sys_getuid(), 66);
129 
130 	/* release lwp and proc */
131 	rump_pub_lwproc_releaselwp();
132 	ATF_REQUIRE_EQ(rump_sys_getuid(), 0);
133 }
134 
135 ATF_TC(lwps);
136 ATF_TC_HEAD(lwps, tc)
137 {
138 
139 	atf_tc_set_md_var(tc, "descr", "proc can hold many lwps and is "
140 	    "automatically g/c'd when the last one exits");
141 }
142 
143 #define LOOPS 128
144 ATF_TC_BODY(lwps, tc)
145 {
146 	struct lwp *l[LOOPS];
147 	pid_t mypid;
148 	struct lwp *l_orig;
149 	int i;
150 
151 	rump_init();
152 
153 	RZ(rump_pub_lwproc_rfork(RUMP_RFCFDG));
154 	mypid = rump_sys_getpid();
155 	RL(rump_sys_setuid(375));
156 
157 	l_orig = rump_pub_lwproc_curlwp();
158 	for (i = 0; i < LOOPS; i++) {
159 		mypid = rump_sys_getpid();
160 		ATF_REQUIRE(mypid != -1 && mypid != 0);
161 		RZ(rump_pub_lwproc_newlwp(mypid));
162 		l[i] = rump_pub_lwproc_curlwp();
163 		ATF_REQUIRE_EQ(rump_sys_getuid(), 375);
164 	}
165 
166 	rump_pub_lwproc_switch(l_orig);
167 	rump_pub_lwproc_releaselwp();
168 	for (i = 0; i < LOOPS; i++) {
169 		rump_pub_lwproc_switch(l[i]);
170 		ATF_REQUIRE_EQ(rump_sys_getpid(), mypid);
171 		ATF_REQUIRE_EQ(rump_sys_getuid(), 375);
172 		rump_pub_lwproc_releaselwp();
173 		ATF_REQUIRE_EQ(rump_sys_getpid(), 1);
174 		ATF_REQUIRE_EQ(rump_sys_getuid(), 0);
175 	}
176 
177 	ATF_REQUIRE_EQ(rump_pub_lwproc_newlwp(mypid), ESRCH);
178 }
179 
180 ATF_TC(nolwprelease);
181 ATF_TC_HEAD(nolwprelease, tc)
182 {
183 
184 	atf_tc_set_md_var(tc, "descr", "check that lwp context is required "
185 	    "for lwproc_releaselwp()");
186 }
187 
188 ATF_TC_BODY(nolwprelease, tc)
189 {
190 	int status;
191 
192 	switch (fork()) {
193 	case 0:
194 		rump_init();
195 		rump_pub_lwproc_releaselwp();
196 		atf_tc_fail("survived");
197 		break;
198 	case -1:
199 		atf_tc_fail_errno("fork");
200 		break;
201 	default:
202 		wait(&status);
203 		ATF_REQUIRE(WIFSIGNALED(status));
204 		ATF_REQUIRE_EQ(WTERMSIG(status), SIGABRT);
205 
206 	}
207 }
208 
209 ATF_TC(nolwp);
210 ATF_TC_HEAD(nolwp, tc)
211 {
212 
213 	atf_tc_set_md_var(tc, "descr", "check that curlwp for an implicit "
214 	    "context is NULL");
215 }
216 
217 ATF_TC_BODY(nolwp, tc)
218 {
219 
220 	rump_init();
221 	ATF_REQUIRE_EQ(rump_pub_lwproc_curlwp(), NULL);
222 }
223 
224 ATF_TC(nullswitch);
225 ATF_TC_HEAD(nullswitch, tc)
226 {
227 
228 	atf_tc_set_md_var(tc, "descr", "check that switching to NULL marks "
229 	    "current lwp as not running");
230 }
231 
232 ATF_TC_BODY(nullswitch, tc)
233 {
234 	struct lwp *l;
235 
236 	rump_init();
237 	RZ(rump_pub_lwproc_newlwp(0));
238 	l = rump_pub_lwproc_curlwp();
239 	rump_pub_lwproc_switch(NULL);
240 	/* if remains LP_RUNNING, next call will panic */
241 	rump_pub_lwproc_switch(l);
242 }
243 
244 ATF_TC(rfork);
245 ATF_TC_HEAD(rfork, tc)
246 {
247 
248 	atf_tc_set_md_var(tc, "descr", "check that fork shares fd's");
249 }
250 
251 ATF_TC_BODY(rfork, tc)
252 {
253 	struct stat sb;
254 	struct lwp *l, *l2;
255 	int fd;
256 
257 	RZ(rump_init());
258 
259 	ATF_REQUIRE_EQ(rump_pub_lwproc_rfork(RUMP_RFFDG|RUMP_RFCFDG), EINVAL);
260 
261 	RZ(rump_pub_lwproc_rfork(0));
262 	l = rump_pub_lwproc_curlwp();
263 
264 	RL(fd = rump_sys_open("/file", O_RDWR | O_CREAT, 0777));
265 
266 	/* ok, first check rfork(RUMP_RFCFDG) does *not* preserve fd's */
267 	RZ(rump_pub_lwproc_rfork(RUMP_RFCFDG));
268 	ATF_REQUIRE_ERRNO(EBADF, rump_sys_write(fd, &fd, sizeof(fd)) == -1);
269 
270 	/* then check that rfork(0) does */
271 	rump_pub_lwproc_switch(l);
272 	RZ(rump_pub_lwproc_rfork(0));
273 	ATF_REQUIRE_EQ(rump_sys_write(fd, &fd, sizeof(fd)), sizeof(fd));
274 	RL(rump_sys_fstat(fd, &sb));
275 	l2 = rump_pub_lwproc_curlwp();
276 
277 	/*
278 	 * check that the shared fd table is really shared by
279 	 * closing fd in parent
280 	 */
281 	rump_pub_lwproc_switch(l);
282 	RL(rump_sys_close(fd));
283 	rump_pub_lwproc_switch(l2);
284 	ATF_REQUIRE_ERRNO(EBADF, rump_sys_fstat(fd, &sb) == -1);
285 
286 	/* redo, this time copying the fd table instead of sharing it */
287 	rump_pub_lwproc_releaselwp();
288 	rump_pub_lwproc_switch(l);
289 	RL(fd = rump_sys_open("/file", O_RDWR, 0777));
290 	RZ(rump_pub_lwproc_rfork(RUMP_RFFDG));
291 	ATF_REQUIRE_EQ(rump_sys_write(fd, &fd, sizeof(fd)), sizeof(fd));
292 	RL(rump_sys_fstat(fd, &sb));
293 	l2 = rump_pub_lwproc_curlwp();
294 
295 	/* check that the fd table is copied */
296 	rump_pub_lwproc_switch(l);
297 	RL(rump_sys_close(fd));
298 	rump_pub_lwproc_switch(l2);
299 	RL(rump_sys_fstat(fd, &sb));
300 	ATF_REQUIRE_EQ(sb.st_size, sizeof(fd));
301 }
302 
303 ATF_TP_ADD_TCS(tp)
304 {
305 
306 	ATF_TP_ADD_TC(tp, makelwp);
307 	ATF_TP_ADD_TC(tp, proccreds);
308 	ATF_TP_ADD_TC(tp, inherit);
309 	ATF_TP_ADD_TC(tp, lwps);
310 	ATF_TP_ADD_TC(tp, nolwprelease);
311 	ATF_TP_ADD_TC(tp, nolwp);
312 	ATF_TP_ADD_TC(tp, nullswitch);
313 	ATF_TP_ADD_TC(tp, rfork);
314 
315 	return atf_no_error();
316 }
317