266 lines
		
	
	
		
			7.1 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			266 lines
		
	
	
		
			7.1 KiB
		
	
	
	
		
			C
		
	
	
	
| /*
 | |
|  * Check decoding of waitid syscall.
 | |
|  *
 | |
|  * Copyright (c) 2015-2016 Dmitry V. Levin <ldv@altlinux.org>
 | |
|  * Copyright (c) 2016-2017 The strace developers.
 | |
|  * All rights reserved.
 | |
|  *
 | |
|  * Redistribution and use in source and binary forms, with or without
 | |
|  * modification, are permitted provided that the following conditions
 | |
|  * are met:
 | |
|  * 1. Redistributions of source code must retain the above copyright
 | |
|  *    notice, this list of conditions and the following disclaimer.
 | |
|  * 2. Redistributions in binary form must reproduce the above copyright
 | |
|  *    notice, this list of conditions and the following disclaimer in the
 | |
|  *    documentation and/or other materials provided with the distribution.
 | |
|  * 3. The name of the author may not be used to endorse or promote products
 | |
|  *    derived from this software without specific prior written permission.
 | |
|  *
 | |
|  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 | |
|  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 | |
|  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 | |
|  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 | |
|  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 | |
|  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 | |
|  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 | |
|  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 | |
|  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 | |
|  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 | |
|  */
 | |
| 
 | |
| #include "tests.h"
 | |
| #include <assert.h>
 | |
| #include <signal.h>
 | |
| #include <stdio.h>
 | |
| #include <string.h>
 | |
| #include <unistd.h>
 | |
| #include <sys/wait.h>
 | |
| #include <sys/resource.h>
 | |
| #include <asm/unistd.h>
 | |
| 
 | |
| static const char *
 | |
| sprint_rusage(const struct rusage *const ru)
 | |
| {
 | |
| 	static char buf[1024];
 | |
| 	snprintf(buf, sizeof(buf),
 | |
| 		 "{ru_utime={tv_sec=%lld, tv_usec=%llu}"
 | |
| 		 ", ru_stime={tv_sec=%lld, tv_usec=%llu}"
 | |
| #if VERBOSE
 | |
| 		 ", ru_maxrss=%llu"
 | |
| 		 ", ru_ixrss=%llu"
 | |
| 		 ", ru_idrss=%llu"
 | |
| 		 ", ru_isrss=%llu"
 | |
| 		 ", ru_minflt=%llu"
 | |
| 		 ", ru_majflt=%llu"
 | |
| 		 ", ru_nswap=%llu"
 | |
| 		 ", ru_inblock=%llu"
 | |
| 		 ", ru_oublock=%llu"
 | |
| 		 ", ru_msgsnd=%llu"
 | |
| 		 ", ru_msgrcv=%llu"
 | |
| 		 ", ru_nsignals=%llu"
 | |
| 		 ", ru_nvcsw=%llu"
 | |
| 		 ", ru_nivcsw=%llu}"
 | |
| #else
 | |
| 		 ", ...}"
 | |
| #endif
 | |
| 		 , (long long) ru->ru_utime.tv_sec
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_utime.tv_usec)
 | |
| 		 , (long long) ru->ru_stime.tv_sec
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_stime.tv_usec)
 | |
| #if VERBOSE
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_maxrss)
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_ixrss)
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_idrss)
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_isrss)
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_minflt)
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_majflt)
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_nswap)
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_inblock)
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_oublock)
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_msgsnd)
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_msgrcv)
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_nsignals)
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_nvcsw)
 | |
| 		 , zero_extend_signed_to_ull(ru->ru_nivcsw)
 | |
| #endif
 | |
| 		 );
 | |
| 	return buf;
 | |
| }
 | |
| 
 | |
| #define CASE(x) case x: return #x
 | |
| 
 | |
| static const char *
 | |
| si_code_2_name(const int code)
 | |
| {
 | |
| 	switch (code) {
 | |
| #ifdef CLD_EXITED
 | |
| 	CASE(CLD_EXITED);
 | |
| #endif
 | |
| #ifdef CLD_KILLED
 | |
| 	CASE(CLD_KILLED);
 | |
| #endif
 | |
| #ifdef CLD_DUMPED
 | |
| 	CASE(CLD_DUMPED);
 | |
| #endif
 | |
| #ifdef CLD_TRAPPED
 | |
| 	CASE(CLD_TRAPPED);
 | |
| #endif
 | |
| #ifdef CLD_STOPPED
 | |
| 	CASE(CLD_STOPPED);
 | |
| #endif
 | |
| #ifdef CLD_CONTINUED
 | |
| 	CASE(CLD_CONTINUED);
 | |
| #endif
 | |
| 	default:
 | |
| 		perror_msg_and_fail("unknown si_code %d", code);
 | |
| 	}
 | |
| }
 | |
| 
 | |
| static const char *
 | |
| sprint_siginfo(const siginfo_t *const si, const char *const status_text)
 | |
| {
 | |
| 	static char buf[1024];
 | |
| 	snprintf(buf, sizeof(buf),
 | |
| 		 "{si_signo=SIGCHLD"
 | |
| 		 ", si_code=%s"
 | |
| 		 ", si_pid=%u"
 | |
| 		 ", si_uid=%u"
 | |
| 		 ", si_status=%s"
 | |
| 		 ", si_utime=%llu"
 | |
| 		 ", si_stime=%llu}",
 | |
| 		 si_code_2_name(si->si_code),
 | |
| 		 si->si_pid,
 | |
| 		 si->si_uid,
 | |
| 		 status_text,
 | |
| 		 zero_extend_signed_to_ull(si->si_utime),
 | |
| 		 zero_extend_signed_to_ull(si->si_stime));
 | |
| 	return buf;
 | |
| }
 | |
| 
 | |
| static unsigned long
 | |
| poison(unsigned int v)
 | |
| {
 | |
| 	return (unsigned long) 0xfacefeed00000000ULL | v;
 | |
| }
 | |
| 
 | |
| static long
 | |
| do_waitid(const unsigned int idtype,
 | |
| 	  const unsigned int id,
 | |
| 	  const siginfo_t *const infop,
 | |
| 	  const unsigned int options,
 | |
| 	  const struct rusage *const rusage)
 | |
| {
 | |
| 	sigset_t mask = {};
 | |
| 	sigaddset(&mask, SIGCHLD);
 | |
| 
 | |
| 	assert(sigprocmask(SIG_BLOCK, &mask, NULL) == 0);
 | |
| 	long rc = syscall(__NR_waitid, poison(idtype), poison(id),
 | |
| 			  infop, poison(options), rusage);
 | |
| 	assert(sigprocmask(SIG_UNBLOCK, &mask, NULL) == 0);
 | |
| 	return rc;
 | |
| }
 | |
| 
 | |
| int
 | |
| main(void)
 | |
| {
 | |
| 	tprintf("%s", "");
 | |
| 
 | |
| 	int fds[2];
 | |
| 	if (pipe(fds))
 | |
| 		perror_msg_and_fail("pipe");
 | |
| 
 | |
| 	pid_t pid;
 | |
| 	pid = fork();
 | |
| 	if (pid < 0)
 | |
| 		perror_msg_and_fail("fork");
 | |
| 
 | |
| 	if (!pid) {
 | |
| 		char c;
 | |
| 		(void) close(1);
 | |
| 		assert(read(0, &c, sizeof(c)) == 1);
 | |
| 		return 42;
 | |
| 	}
 | |
| 
 | |
| 	(void) close(0);
 | |
| 
 | |
| 	if (do_waitid(P_PID, pid, 0, WNOHANG|WEXITED, 0))
 | |
| 		perror_msg_and_fail("waitid #1");
 | |
| 	tprintf("waitid(P_PID, %d, NULL, WNOHANG|WEXITED, NULL) = 0\n", pid);
 | |
| 
 | |
| 	TAIL_ALLOC_OBJECT_CONST_PTR(siginfo_t, sinfo);
 | |
| 	memset(sinfo, 0, sizeof(*sinfo));
 | |
| 	TAIL_ALLOC_OBJECT_CONST_PTR(struct rusage, rusage);
 | |
| 	if (do_waitid(P_PID, pid, sinfo, WNOHANG|WEXITED|WSTOPPED, rusage))
 | |
| 		perror_msg_and_fail("waitid #2");
 | |
| 	tprintf("waitid(P_PID, %d, {}, WNOHANG|WEXITED|WSTOPPED, %s) = 0\n",
 | |
| 		pid, sprint_rusage(rusage));
 | |
| 
 | |
| 	assert(write(1, "", 1) == 1);
 | |
| 	(void) close(1);
 | |
| 
 | |
| 	if (do_waitid(P_PID, pid, sinfo, WEXITED, rusage))
 | |
| 		perror_msg_and_fail("waitid #3");
 | |
| 	tprintf("waitid(P_PID, %d, %s, WEXITED, %s) = 0\n",
 | |
| 		pid, sprint_siginfo(sinfo, "42"), sprint_rusage(rusage));
 | |
| 
 | |
| 	pid = fork();
 | |
| 	if (pid < 0)
 | |
| 		perror_msg_and_fail("fork");
 | |
| 
 | |
| 	if (!pid) {
 | |
| 		(void) raise(SIGUSR1);
 | |
| 		return 1;
 | |
| 	}
 | |
| 
 | |
| 	if (do_waitid(P_PID, pid, sinfo, WEXITED, rusage))
 | |
| 		perror_msg_and_fail("waitid #4");
 | |
| 	tprintf("waitid(P_PID, %d, %s, WEXITED, %s) = 0\n",
 | |
| 		pid, sprint_siginfo(sinfo, "SIGUSR1"), sprint_rusage(rusage));
 | |
| 
 | |
| 	if (pipe(fds))
 | |
| 		perror_msg_and_fail("pipe");
 | |
| 	pid = fork();
 | |
| 	if (pid < 0)
 | |
| 		perror_msg_and_fail("fork");
 | |
| 
 | |
| 	if (!pid) {
 | |
| 		(void) close(1);
 | |
| 		raise(SIGSTOP);
 | |
| 		char c;
 | |
| 		assert(read(0, &c, sizeof(c)) == 1);
 | |
| 		return 0;
 | |
| 	}
 | |
| 
 | |
| 	(void) close(0);
 | |
| 
 | |
| 	if (do_waitid(P_PID, pid, sinfo, WSTOPPED, rusage))
 | |
| 		perror_msg_and_fail("waitid #5");
 | |
| 	tprintf("waitid(P_PID, %d, %s, WSTOPPED, %s) = 0\n",
 | |
| 		pid, sprint_siginfo(sinfo, "SIGSTOP"), sprint_rusage(rusage));
 | |
| 
 | |
| 	if (kill(pid, SIGCONT))
 | |
| 		perror_msg_and_fail("kill(SIGCONT)");
 | |
| 
 | |
| #if defined WCONTINUED
 | |
| 	if (do_waitid(P_PID, pid, sinfo, WCONTINUED, rusage))
 | |
| 		perror_msg_and_fail("waitid #6");
 | |
| 	tprintf("waitid(P_PID, %d, %s, WCONTINUED, %s) = 0\n",
 | |
| 		pid, sprint_siginfo(sinfo, "SIGCONT"), sprint_rusage(rusage));
 | |
| #endif /* WCONTINUED */
 | |
| 
 | |
| 	assert(write(1, "", 1) == 1);
 | |
| 	(void) close(1);
 | |
| 
 | |
| 	if (do_waitid(P_PID, pid, sinfo, WEXITED, rusage))
 | |
| 		perror_msg_and_fail("waitid #7");
 | |
| 	tprintf("waitid(P_PID, %d, %s, WEXITED, %s) = 0\n",
 | |
| 		pid, sprint_siginfo(sinfo, "0"), sprint_rusage(rusage));
 | |
| 
 | |
| 	long rc = do_waitid(P_ALL, -1, sinfo, WEXITED|WSTOPPED, rusage);
 | |
| 	tprintf("waitid(P_ALL, -1, %p, WEXITED|WSTOPPED, %p)"
 | |
| 		" = %ld %s (%m)\n", sinfo, rusage, rc, errno2name());
 | |
| 
 | |
| 	tprintf("%s\n", "+++ exited with 0 +++");
 | |
| 	return 0;
 | |
| }
 |