2 # Free Software Foundation, Inc.
4 # This program is free software; you can redistribute it and/or modify
5 # it under the terms of the GNU General Public License as published by
6 # the Free Software Foundation; either version 3 of the License, or
7 # (at your option) any later version.
9 # This program is distributed in the hope that it will be useful,
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 # GNU General Public License for more details.
14 # You should have received a copy of the GNU General Public License
15 # along with this program. If not, see <http://www.gnu.org/licenses/>.
17 if [target_info exists gdb,nosignals] {
18 verbose "Skipping sigall-reverse.exp because of nosignals."
22 if ![target_info exists gdb,can_reverse] {
35 gdb_reinitialize_dir $srcdir/$subdir
37 set testfile sigall-reverse
38 set srcfile ${testfile}.c
39 set binfile ${objdir}/${subdir}/${testfile}
40 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
45 # Make the first signal SIGABRT because it is always supported.
49 proc test_one_sig {nextsig} {
54 set this_sig_supported $sig_supported
55 gdb_test "handle SIG$thissig stop print" \
56 "SIG$thissig\[ \t\]*Yes\[ \t\]*Yes\[ \t\]*Yes.*"
57 gdb_test "b handle_$thissig" "Breakpoint \[0-9\]+ .*"
58 gdb_test "b gen_$nextsig" "Breakpoint \[0-9\]+ .*"
60 set need_another_continue 1
62 if $this_sig_supported then {
63 if { $thissig == "IO" } {
64 setup_xfail "i*86-pc-linuxoldld-gnu" "i*86-pc-linuxaout-gnu"
66 set testmsg "get signal $thissig"
67 gdb_test_multiple "continue" $testmsg {
68 -re "Program received signal SIG$thissig.*handle_$thissig.*$gdb_prompt $" {
69 fail "$testmsg (wrong location)"
71 -re "Program received signal SIG$thissig.*$gdb_prompt $" {
74 -re "Breakpoint.* handle_$thissig.*$gdb_prompt $" {
76 set need_another_continue 0
80 if [ istarget "alpha-dec-osf3*" ] then {
81 # OSF/1-3.x is unable to continue with a job control stop signal.
82 # The inferior remains stopped without an event of interest
83 # and GDB waits forever for the inferior to stop on an event
84 # of interest. Work around the kernel bug.
85 if { $thissig == "TSTP" || $thissig == "TTIN" || $thissig == "TTOU" } {
86 setup_xfail "alpha-dec-osf3*"
87 fail "cannot continue from signal $thissig"
88 set need_another_continue 0
92 if $need_another_continue then {
93 if { $thissig == "URG" } {
94 setup_xfail "i*86-pc-linuxoldld-gnu" "i*86-pc-linuxaout-gnu"
96 # Either Lynx or GDB screws up on SIGPRIO
97 if { $thissig == "PRIO" } {
98 setup_xfail "*-*-*lynx*"
100 set testmsg "send signal $thissig"
101 gdb_test_multiple "continue" $testmsg {
102 -re "Breakpoint.*handle_$thissig.*$gdb_prompt $" {
105 -re "Breakpoint.*gen_$nextsig.*kill.*$gdb_prompt $" {
106 fail "missed breakpoint at handle_$thissig"
112 if { $missed_handler == "0" } then {
113 set testmsg "advance to $nextsig"
114 gdb_test_multiple "signal 0" $testmsg {
115 -re "Breakpoint.*gen_$nextsig.*kill.*$gdb_prompt $" {
119 -re "Breakpoint.*gen_$nextsig.*handle.*$gdb_prompt $" {
128 proc test_one_sig_reverse {prevsig} {
131 gdb_test "reverse-continue" "Breakpoint .* handle_$prevsig.*" \
132 "reverse to handler of $prevsig"
135 set testmsg "reverse to gen_$prevsig"
136 gdb_test_multiple "reverse-continue" $testmsg {
137 -re "Breakpoint.*handle_.*$gdb_prompt " {
138 pass "$testmsg (un-handled)"
140 -re "Program received signal SIG$prevsig.*$gdb_prompt " {
141 pass "reverse to signal event, $prevsig"
143 set nested_testmsg "reverse signal delivered"
144 gdb_test_multiple "frame" $nested_testmsg {
145 -re ".*handle_$prevsig.*$gdb_prompt " {
146 fail "$nested_testmsg (wrong location)"
148 -re ".*$gdb_prompt " {
154 send_gdb "reverse-continue\n"
157 -re "Breakpoint.*kill.*$gdb_prompt " {
158 if { $saw_signal } then {
159 pass "$testmsg (handled)"
161 xfail "$testmsg (handled)"
164 -re "No more reverse-execution history.*kill.*$gdb_prompt " {
165 if { $saw_signal } then {
166 pass "$testmsg (handled)"
168 xfail "$testmsg (handled)"
178 if [target_info exists gdb,use_precord] {
179 # Activate process record/replay
180 gdb_test "record" "" "Turn on process record"
181 # FIXME: command ought to acknowledge, so we can test if it succeeded.
255 # The last signal (SIGTERM) gets handled slightly differently because
256 # we are not setting up for another test.
257 gdb_test "handle SIGTERM stop print" \
258 "SIGTERM\[ \t\]*Yes\[ \t\]*Yes\[ \t\]*Yes.*"
259 gdb_test "b handle_TERM" "Breakpoint \[0-9\]+ .*"
260 gdb_test "continue" \
261 "Continuing.*Program received signal SIGTERM.*" \
263 gdb_test "continue" "Breakpoint.*handle_TERM.*" "send signal TERM"
265 set testmsg "continue to sigall exit"
266 gdb_test_multiple "continue" $testmsg {
267 -re ".*Do you want to stop the program.*$" {
276 test_one_sig_reverse TERM
277 test_one_sig_reverse 63
278 test_one_sig_reverse 62
279 test_one_sig_reverse 61
280 test_one_sig_reverse 60
281 test_one_sig_reverse 59
282 test_one_sig_reverse 58
283 test_one_sig_reverse 57
284 test_one_sig_reverse 56
285 test_one_sig_reverse 55
286 test_one_sig_reverse 54
287 test_one_sig_reverse 53
288 test_one_sig_reverse 52
289 test_one_sig_reverse 51
290 test_one_sig_reverse 50
291 test_one_sig_reverse 49
292 test_one_sig_reverse 48
293 test_one_sig_reverse 47
294 test_one_sig_reverse 46
295 test_one_sig_reverse 45
296 test_one_sig_reverse 44
297 test_one_sig_reverse 43
298 test_one_sig_reverse 42
299 test_one_sig_reverse 41
300 test_one_sig_reverse 40
301 test_one_sig_reverse 39
302 test_one_sig_reverse 38
303 test_one_sig_reverse 37
304 test_one_sig_reverse 36
305 test_one_sig_reverse 35
306 test_one_sig_reverse 34
307 test_one_sig_reverse 33
308 test_one_sig_reverse PRIO
309 test_one_sig_reverse SAK
310 test_one_sig_reverse SOUND
311 test_one_sig_reverse MSG
312 test_one_sig_reverse RETRACT
313 test_one_sig_reverse GRANT
314 test_one_sig_reverse DANGER
315 test_one_sig_reverse LWP
316 test_one_sig_reverse WAITING
317 test_one_sig_reverse PHONE
318 test_one_sig_reverse WIND
319 test_one_sig_reverse POLL
320 test_one_sig_reverse PWR
321 test_one_sig_reverse USR2
322 test_one_sig_reverse USR1
323 test_one_sig_reverse LOST
324 test_one_sig_reverse WINCH
325 test_one_sig_reverse PROF
326 test_one_sig_reverse VTALRM
327 test_one_sig_reverse XFSZ
328 test_one_sig_reverse XCPU
329 test_one_sig_reverse IO
330 test_one_sig_reverse TTOU
331 test_one_sig_reverse TTIN
332 test_one_sig_reverse CHLD
333 test_one_sig_reverse CONT
334 test_one_sig_reverse TSTP
335 test_one_sig_reverse URG
336 test_one_sig_reverse ALRM
337 test_one_sig_reverse PIPE
338 test_one_sig_reverse SYS
339 test_one_sig_reverse SEGV
340 test_one_sig_reverse BUS
341 test_one_sig_reverse FPE
342 test_one_sig_reverse EMT
343 test_one_sig_reverse ILL
344 test_one_sig_reverse QUIT
345 test_one_sig_reverse HUP
346 test_one_sig_reverse ABRT
348 # Make the first signal SIGABRT because it is always supported.