File: kill_child.test

package info (click to toggle)
strace 6.1-0.1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 64,424 kB
  • sloc: ansic: 160,349; sh: 9,223; makefile: 3,817; cpp: 944; awk: 353; perl: 267; exp: 62; sed: 9
file content (31 lines) | stat: -rwxr-xr-x 816 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
#!/bin/sh
#
# Check whether repeated killing of just forked processes crashes strace.
#
# Copyright (c) 2019-2022 The strace developers.
# All rights reserved.
#
# SPDX-License-Identifier: GPL-2.0-or-later

. "${srcdir=.}/init.sh"

run_prog_skip_if_failed date +%s > /dev/null
s0="$(date +%s)"

run_prog
args="-f -qq -e signal=none -e trace=sched_yield,/kill $args"

# Run strace until the known corner case is observed.
while :; do
	run_strace $args

	# Printing of "<... SYSCALL resumed>" in strace.c:print_event_exit
	# used to segfault when the syscall number had not been obtained
	# on syscall entering.
	grep -q '^[1-9][0-9]* <\.\.\. ??? resumed>) \+= ?$' "$LOG" && exit 0

	s1="$(date +%s)"
	if [ "$(($s1-$s0))" -gt "$(($TIMEOUT_DURATION/2))" ]; then
		skip_ 'Unable to reproduce <... ??? resumed>'
	fi
done