1#!/bin/sh
2
3#
4# Copyright (c) 2013 EMC Corp.
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 AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19# ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22# OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23# HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24# LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26# SUCH DAMAGE.
27#
28
29# wait4(2) / ptrace(2) regression test.
30
31. ../default.cfg
32
33here=`pwd`
34cd /tmp
35sed '1,/^EOF/d' < $here/$0 > ptrace.c
36mycc -o ptrace -Wall -Wextra -g ptrace.c || exit 1
37rm -f ptrace.c
38cd $here
39
40/tmp/ptrace
41
42rm -f /tmp/ptrace
43exit
44
45EOF
46#include <sys/types.h>
47#include <err.h>
48#include <errno.h>
49#include <signal.h>
50#include <stdio.h>
51#include <unistd.h>
52#include <strings.h>
53#include <sys/ptrace.h>
54#include <sys/wait.h>
55#include <sys/time.h>
56#include <sys/resource.h>
57
58void
59test(void)
60{
61	pid_t pid, rpid;
62	struct rusage ru;
63	int status;
64
65	if ((pid = fork()) == 0) {
66		usleep(2000);
67		_exit(64);
68	}
69	if (pid == -1)
70		err(1, "fork()");
71	if (ptrace(PT_ATTACH, pid, NULL, 0) == -1)
72		err(1, "ptrace(%d) attach", pid);
73	if (wait(NULL) == -1)
74		err(1, "wait");
75	bzero(&ru, sizeof(ru));
76	usleep(2000);
77	if ((rpid = wait4(-1, &status, WNOHANG, &ru)) == -1) {
78		if (errno == ECHILD)
79			warn("FAIL");
80		else
81			err(1, "wait4");
82	}
83	if (rpid == 0) {
84//		fprintf(stderr, "No rusage info.\n");
85		if (ptrace(PT_DETACH, pid, NULL, 0) == -1)
86			err(1, "ptrace(%d) detach", pid);
87		if (wait(&status) == -1)
88			err(1, "wait");
89	} else {
90		fprintf(stderr, "FAIL Got unexpected rusage.\n");
91		if (ru.ru_utime.tv_sec != 0)
92			fprintf(stderr, "FAIL tv_sec\n");
93	}
94	if (status != 0x4000)
95		fprintf(stderr, "FAIL Child exit status 0x%x\n", status);
96
97	_exit(0);
98}
99
100int
101main(void)
102{
103	test();
104
105	return (0);
106}
107