2013-06-18 16:50:18 +00:00
#!/bin/sh
# Ensure that strace can detach from sleeping processes.
. "${srcdir=.}/init.sh"
check_prog sleep
check_prog grep
set -e
2013-06-18 22:31:58 +00:00
rm -f $LOG
./set_ptracer_any sleep $((2*$TIMEOUT_DURATION)) > $LOG &
2013-06-18 16:50:18 +00:00
2013-06-18 22:31:58 +00:00
while ! [ -s $LOG ]; do
2013-06-18 16:50:18 +00:00
kill -0 $! 2> /dev/null ||
fail_ 'set_ptracer_any sleep failed'
2013-06-18 20:51:49 +00:00
$SLEEP_A_BIT
2013-06-18 16:50:18 +00:00
done
tracee_pid=$!
cleanup()
{
set +e
kill $tracee_pid
wait $tracee_pid 2> /dev/null
2014-08-11 01:31:23 -04:00
return 0
2013-06-18 16:50:18 +00:00
}
2013-06-18 22:31:58 +00:00
rm -f $LOG
2013-06-18 16:50:18 +00:00
$STRACE -p $tracee_pid 2> $LOG &
while ! grep -F "Process $tracee_pid attached" $LOG > /dev/null; do
kill -0 $! 2> /dev/null ||
{ cat $LOG; cleanup; fail_ 'strace -p does not work'; }
2013-06-18 20:51:49 +00:00
$SLEEP_A_BIT
2013-06-18 16:50:18 +00:00
done
kill -INT $!
wait $!
grep -F "Process $tracee_pid detached" $LOG > /dev/null ||
{ cat $LOG; cleanup; fail_ 'strace -p failed to detach'; }
2013-06-19 14:57:05 +00:00
if [ -f /proc/self/status ]; then
$SLEEP_A_BIT
test -d /proc/$tracee_pid ||
{ cat $LOG; cleanup; fail_ 'tracee died after detach'; }
grep '^State:.*S (sleeping)' < /proc/$tracee_pid/status > /dev/null || {
cat $LOG
grep '^State:' < /proc/$tracee_pid/status
cleanup
fail_ 'tracee is not sleeping after detach'
2013-06-19 16:37:24 +02:00
}
2013-06-19 14:57:05 +00:00
fi
2013-06-19 16:37:24 +02:00
2013-06-18 16:50:18 +00:00
cleanup
exit 0