forked from Imagelibrary/binutils-gdb
2282f01fb5
- New in this series version:
- gdb.threads/step-over-thread-exit.exp has a couple new testing axes:
- non-stop vs all-stop.
- in non-stop have the testcase explicitly stop all threads in
non-stop mode, vs not doing that.
- bail out of gdb.threads/step-over-thread-exit.exp early on FAIL, to
avoid cascading timeouts.
Add new gdb.threads/step-over-thread-exit.exp and
gdb.threads/step-over-thread-exit-while-stop-all-threads.exp
testcases, exercising stepping over thread exit syscall. These make
use of lib/my-syscalls.S to define the exit syscall.
Co-authored-by: Pedro Alves <pedro@palves.net>
Bug: https://sourceware.org/bugzilla/show_bug.cgi?id=27338
Change-Id: Ie8b2c5747db99b7023463a897a8390d9e814a9c9
70 lines
2.3 KiB
Plaintext
70 lines
2.3 KiB
Plaintext
# Copyright 2021-2022 Free Software Foundation, Inc.
|
|
|
|
# This program is free software; you can redistribute it and/or modify
|
|
# it under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation; either version 3 of the License, or
|
|
# (at your option) any later version.
|
|
#
|
|
# This program is distributed in the hope that it will be useful,
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
# Test stepping over a breakpoint installed on an instruction that
|
|
# exits the thread, while another thread is repeatedly hitting a
|
|
# breakpoint, causing GDB to stop all threads.
|
|
|
|
standard_testfile .c
|
|
|
|
set syscalls_src $srcdir/lib/my-syscalls.S
|
|
|
|
if { [build_executable "failed to prepare" $testfile \
|
|
[list $srcfile $syscalls_src] {debug pthreads}] == -1 } {
|
|
return
|
|
}
|
|
|
|
proc test {displaced-stepping target-non-stop} {
|
|
save_vars ::GDBFLAGS {
|
|
append ::GDBFLAGS " -ex \"maintenance set target-non-stop ${target-non-stop}\""
|
|
clean_restart $::binfile
|
|
}
|
|
|
|
gdb_test_no_output "set displaced-stepping ${displaced-stepping}"
|
|
|
|
if { ![runto_main] } {
|
|
return
|
|
}
|
|
|
|
# The "stepper over exit" threads will step over an instruction
|
|
# that causes them to exit.
|
|
gdb_test "break my_exit_syscall if 0"
|
|
|
|
# The "breakpoint hitter" thread will repeatedly hit this
|
|
# breakpoint, causing GDB to stop all threads.
|
|
gdb_test "break break_here"
|
|
|
|
# To avoid flooding the log with thread created/exited messages.
|
|
gdb_test_no_output "set print thread-events off"
|
|
|
|
# Make sure the target reports the breakpoint stops.
|
|
gdb_test_no_output "set breakpoint condition-evaluation host"
|
|
|
|
for { set i 0 } { $i < 30 } { incr i } {
|
|
with_test_prefix "iter $i" {
|
|
if { [gdb_test "continue" "hit Breakpoint $::decimal, break_here .*"] != 0 } {
|
|
# Exit if there's a failure to avoid lengthy timeouts.
|
|
break
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
foreach_with_prefix displaced-stepping {off auto} {
|
|
foreach_with_prefix target-non-stop {off on} {
|
|
test ${displaced-stepping} ${target-non-stop}
|
|
}
|
|
}
|