xref: /freebsd/contrib/netbsd-tests/lib/libc/sys/t_msgsnd.c (revision 0b3105a37d7adcadcb720112fed4dc4e8040be99)
1 /* $NetBSD: t_msgsnd.c,v 1.2 2011/11/05 08:47:54 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 Foundation
8  * by Jukka Ruohonen.
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 #include <sys/cdefs.h>
32 __RCSID("$NetBSD: t_msgsnd.c,v 1.2 2011/11/05 08:47:54 jruoho Exp $");
33 
34 #include <sys/msg.h>
35 #include <sys/stat.h>
36 #include <sys/sysctl.h>
37 #include <sys/wait.h>
38 
39 #include <atf-c.h>
40 #include <errno.h>
41 #include <pwd.h>
42 #include <signal.h>
43 #include <stdio.h>
44 #include <stdlib.h>
45 #include <string.h>
46 #include <sysexits.h>
47 #include <time.h>
48 #include <unistd.h>
49 
50 #ifdef __FreeBSD__
51 #include <limits.h>
52 #endif
53 
54 #define MSG_KEY		1234
55 #define MSG_MTYPE_1	0x41
56 #define	MSG_MTYPE_2	0x42
57 #define MSG_MTYPE_3	0x43
58 
59 struct msg {
60 	long		 mtype;
61 	char		 buf[3];
62 };
63 
64 static void		clean(void);
65 
66 static void
67 clean(void)
68 {
69 	int id;
70 
71 	if ((id = msgget(MSG_KEY, 0)) != -1)
72 		(void)msgctl(id, IPC_RMID, 0);
73 }
74 
75 ATF_TC_WITH_CLEANUP(msgsnd_block);
76 ATF_TC_HEAD(msgsnd_block, tc)
77 {
78 	atf_tc_set_md_var(tc, "descr", "Test that msgsnd(2) blocks");
79 	atf_tc_set_md_var(tc, "timeout", "10");
80 }
81 
82 ATF_TC_BODY(msgsnd_block, tc)
83 {
84 	struct msg msg = { MSG_MTYPE_1, { 'a', 'b', 'c' } };
85 	int id, sta;
86 	pid_t pid;
87 
88 	id = msgget(MSG_KEY, IPC_CREAT | 0600);
89 	ATF_REQUIRE(id != -1);
90 
91 	pid = fork();
92 	ATF_REQUIRE(pid >= 0);
93 
94 	if (pid == 0) {
95 
96 		/*
97 		 * Enqueue messages until some limit (e.g. the maximum
98 		 * number of messages in the queue or the maximum number
99 		 * of bytes in the queue) is reached. After this the call
100 		 * should block when the IPC_NOWAIT is not set.
101 		 */
102 		for (;;) {
103 
104 			if (msgsnd(id, &msg, sizeof(struct msg), 0) < 0)
105 				_exit(EXIT_FAILURE);
106 		}
107 	}
108 
109 	(void)sleep(2);
110 	(void)kill(pid, SIGKILL);
111 	(void)wait(&sta);
112 
113 	if (WIFEXITED(sta) != 0 || WIFSIGNALED(sta) == 0)
114 		atf_tc_fail("msgsnd(2) did not block");
115 
116 	ATF_REQUIRE(msgctl(id, IPC_RMID, 0) == 0);
117 }
118 
119 ATF_TC_CLEANUP(msgsnd_block, tc)
120 {
121 	clean();
122 }
123 
124 ATF_TC_WITH_CLEANUP(msgsnd_count);
125 ATF_TC_HEAD(msgsnd_count, tc)
126 {
127 	atf_tc_set_md_var(tc, "descr",
128 	    "Test that msgsnd(2) increments the amount of "
129 	    "message in the queue, as given by msgctl(2)");
130 	atf_tc_set_md_var(tc, "timeout", "10");
131 }
132 
133 ATF_TC_BODY(msgsnd_count, tc)
134 {
135 	struct msg msg = { MSG_MTYPE_1, { 'a', 'b', 'c' } };
136 	struct msqid_ds ds;
137 	size_t i = 0;
138 	int id, rv;
139 
140 	id = msgget(MSG_KEY, IPC_CREAT | 0600);
141 	ATF_REQUIRE(id != -1);
142 
143 	for (;;) {
144 
145 		errno = 0;
146 		rv = msgsnd(id, &msg, sizeof(struct msg), IPC_NOWAIT);
147 
148 		if (rv == 0) {
149 			i++;
150 			continue;
151 		}
152 
153 		if (rv == -1 && errno == EAGAIN)
154 			break;
155 
156 		atf_tc_fail("failed to enqueue a message");
157 	}
158 
159 	(void)memset(&ds, 0, sizeof(struct msqid_ds));
160 	(void)msgctl(id, IPC_STAT, &ds);
161 
162 	if (ds.msg_qnum != i)
163 		atf_tc_fail("incorrect message count");
164 
165 	ATF_REQUIRE(msgctl(id, IPC_RMID, 0) == 0);
166 }
167 
168 ATF_TC_CLEANUP(msgsnd_count, tc)
169 {
170 	clean();
171 }
172 
173 ATF_TC_WITH_CLEANUP(msgsnd_err);
174 ATF_TC_HEAD(msgsnd_err, tc)
175 {
176 	atf_tc_set_md_var(tc, "descr", "Test errors from msgsnd(2)");
177 }
178 
179 ATF_TC_BODY(msgsnd_err, tc)
180 {
181 	struct msg msg = { MSG_MTYPE_1, { 'a', 'b', 'c' } };
182 	int id;
183 
184 	id = msgget(MSG_KEY, IPC_CREAT | 0600);
185 	ATF_REQUIRE(id != -1);
186 
187 	errno = 0;
188 
189 	ATF_REQUIRE_ERRNO(EFAULT, msgsnd(id, (void *)-1,
190 		sizeof(struct msg), IPC_NOWAIT) == -1);
191 
192 	errno = 0;
193 
194 	ATF_REQUIRE_ERRNO(EINVAL, msgsnd(-1, &msg,
195 		sizeof(struct msg), IPC_NOWAIT) == -1);
196 
197 	errno = 0;
198 
199 	ATF_REQUIRE_ERRNO(EINVAL, msgsnd(-1, &msg,
200 		SSIZE_MAX, IPC_NOWAIT) == -1);
201 
202 	errno = 0;
203 	msg.mtype = 0;
204 
205 	ATF_REQUIRE_ERRNO(EINVAL, msgsnd(id, &msg,
206 		sizeof(struct msg), IPC_NOWAIT) == -1);
207 
208 	ATF_REQUIRE(msgctl(id, IPC_RMID, 0) == 0);
209 }
210 
211 ATF_TC_CLEANUP(msgsnd_err, tc)
212 {
213 	clean();
214 }
215 
216 ATF_TC_WITH_CLEANUP(msgsnd_nonblock);
217 ATF_TC_HEAD(msgsnd_nonblock, tc)
218 {
219 	atf_tc_set_md_var(tc, "descr", "Test msgsnd(2) with IPC_NOWAIT");
220 	atf_tc_set_md_var(tc, "timeout", "10");
221 }
222 
223 ATF_TC_BODY(msgsnd_nonblock, tc)
224 {
225 	struct msg msg = { MSG_MTYPE_1, { 'a', 'b', 'c' } };
226 	int id, rv, sta;
227 	pid_t pid;
228 
229 	id = msgget(MSG_KEY, IPC_CREAT | 0600);
230 	ATF_REQUIRE(id != -1);
231 
232 	pid = fork();
233 	ATF_REQUIRE(pid >= 0);
234 
235 	if (pid == 0) {
236 
237 		for (;;) {
238 
239 			errno = 0;
240 			rv = msgsnd(id, &msg, sizeof(struct msg), IPC_NOWAIT);
241 
242 			if (rv == -1 && errno == EAGAIN)
243 				_exit(EXIT_SUCCESS);
244 		}
245 	}
246 
247 	(void)sleep(2);
248 	(void)kill(pid, SIGKILL);
249 	(void)wait(&sta);
250 
251 	if (WIFEXITED(sta) == 0 || WIFSIGNALED(sta) != 0)
252 		atf_tc_fail("msgsnd(2) blocked with IPC_NOWAIT");
253 
254 	ATF_REQUIRE(msgctl(id, IPC_RMID, 0) == 0);
255 }
256 
257 ATF_TC_CLEANUP(msgsnd_nonblock, tc)
258 {
259 	clean();
260 }
261 
262 ATF_TC_WITH_CLEANUP(msgsnd_perm);
263 ATF_TC_HEAD(msgsnd_perm, tc)
264 {
265 	atf_tc_set_md_var(tc, "descr", "Test permissions with msgsnd(2)");
266 	atf_tc_set_md_var(tc, "require.user", "root");
267 }
268 
269 ATF_TC_BODY(msgsnd_perm, tc)
270 {
271 	struct msg msg = { MSG_MTYPE_1, { 'a', 'b', 'c' } };
272 	struct passwd *pw;
273 	int id, sta;
274 	pid_t pid;
275 	uid_t uid;
276 
277 	pw = getpwnam("nobody");
278 	id = msgget(MSG_KEY, IPC_CREAT | 0600);
279 
280 	ATF_REQUIRE(id != -1);
281 	ATF_REQUIRE(pw != NULL);
282 
283 	uid = pw->pw_uid;
284 	ATF_REQUIRE(uid != 0);
285 
286 	pid = fork();
287 	ATF_REQUIRE(pid >= 0);
288 
289 	if (pid == 0) {
290 
291 		/*
292 		 * Try to enqueue a message to the queue
293 		 * created by root as RW for owner only.
294 		 */
295 		if (setuid(uid) != 0)
296 			_exit(EX_OSERR);
297 
298 		id = msgget(MSG_KEY, 0);
299 
300 		if (id == -1)
301 			_exit(EX_OSERR);
302 
303 		errno = 0;
304 
305 		if (msgsnd(id, &msg, sizeof(struct msg), IPC_NOWAIT) == 0)
306 			_exit(EXIT_FAILURE);
307 
308 		if (errno != EACCES)
309 			_exit(EXIT_FAILURE);
310 
311 		_exit(EXIT_SUCCESS);
312 	}
313 
314 	(void)wait(&sta);
315 
316 	if (WIFEXITED(sta) == 0 || WEXITSTATUS(sta) != EXIT_SUCCESS) {
317 
318 		if (errno == EX_OSERR)
319 			atf_tc_fail("system call failed");
320 
321 		atf_tc_fail("UID %u enqueued message to root's queue", uid);
322 	}
323 
324 	ATF_REQUIRE(msgctl(id, IPC_RMID, 0) == 0);
325 }
326 
327 ATF_TC_CLEANUP(msgsnd_perm, tc)
328 {
329 	clean();
330 }
331 
332 ATF_TP_ADD_TCS(tp)
333 {
334 
335 	ATF_TP_ADD_TC(tp, msgsnd_block);
336 	ATF_TP_ADD_TC(tp, msgsnd_count);
337 	ATF_TP_ADD_TC(tp, msgsnd_err);
338 	ATF_TP_ADD_TC(tp, msgsnd_nonblock);
339 	ATF_TP_ADD_TC(tp, msgsnd_perm);
340 
341 	return atf_no_error();
342 }
343