]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - gdb/testsuite/gdb.reverse/sigall-reverse.exp
2009-12-22 Hui Zhu <teawater@gmail.com>
[thirdparty/binutils-gdb.git] / gdb / testsuite / gdb.reverse / sigall-reverse.exp
CommitLineData
b43b923a
MS
1# Copyright 2009
2# Free Software Foundation, Inc.
3
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.
8#
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.
13#
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/>.
16
17if [target_info exists gdb,nosignals] {
18 verbose "Skipping sigall-reverse.exp because of nosignals."
19 return
20}
21
22if ![target_info exists gdb,can_reverse] {
23 return
24}
25
26if $tracelevel then {
27 strace $tracelevel
28}
29
30set prms_id 0
31set bug_id 0
32
33gdb_exit
34gdb_start
35gdb_reinitialize_dir $srcdir/$subdir
36
37set testfile sigall-reverse
38set srcfile ${testfile}.c
39set binfile ${objdir}/${subdir}/${testfile}
40if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
41 untested sigall.exp
42 return -1
43}
44
45# Make the first signal SIGABRT because it is always supported.
46set sig_supported 1
47set thissig "ABRT"
48
49proc test_one_sig {nextsig} {
50 global sig_supported
51 global gdb_prompt
52 global thissig
53
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\]+ .*"
59
60 set need_another_continue 1
61 set missed_handler 0
62 if $this_sig_supported then {
63 if { $thissig == "IO" } {
64 setup_xfail "i*86-pc-linuxoldld-gnu" "i*86-pc-linuxaout-gnu"
65 }
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)"
70 }
71 -re "Program received signal SIG$thissig.*$gdb_prompt $" {
72 pass $testmsg
73 }
74 -re "Breakpoint.* handle_$thissig.*$gdb_prompt $" {
75 xfail $testmsg
76 set need_another_continue 0
77 }
78 }
79 }
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
89 }
90 }
91
92 if $need_another_continue then {
93 if { $thissig == "URG" } {
94 setup_xfail "i*86-pc-linuxoldld-gnu" "i*86-pc-linuxaout-gnu"
95 }
96 # Either Lynx or GDB screws up on SIGPRIO
97 if { $thissig == "PRIO" } {
98 setup_xfail "*-*-*lynx*"
99 }
100 set testmsg "send signal $thissig"
101 gdb_test_multiple "continue" $testmsg {
102 -re "Breakpoint.*handle_$thissig.*$gdb_prompt $" {
103 pass $testmsg
104 }
105 -re "Breakpoint.*gen_$nextsig.*kill.*$gdb_prompt $" {
106 fail "missed breakpoint at handle_$thissig"
107 set missed_handler 1
108 }
109 }
110 }
111
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 $" {
116 pass $testmsg
117 set sig_supported 1
118 }
119 -re "Breakpoint.*gen_$nextsig.*handle.*$gdb_prompt $" {
120 pass $testmsg
121 set sig_supported 0
122 }
123 }
124 }
125 set thissig $nextsig
126}
127
128proc test_one_sig_reverse {prevsig} {
129 global gdb_prompt
130
131 gdb_test "reverse-continue" "Breakpoint .* handle_$prevsig.*" \
132 "reverse to handler of $prevsig"
133
134 set saw_signal 0
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)"
139 }
140 -re "Program received signal SIG$prevsig.*$gdb_prompt " {
141 pass "reverse to signal event, $prevsig"
142
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)"
147 }
148 -re ".*$gdb_prompt " {
149 pass $nested_testmsg
150 }
151 }
152
153 set saw_signal 1
154 send_gdb "reverse-continue\n"
155 exp_continue
156 }
157 -re "Breakpoint.*kill.*$gdb_prompt " {
158 if { $saw_signal } then {
159 pass "$testmsg (handled)"
160 } else {
161 xfail "$testmsg (handled)"
162 }
163 }
164 -re "No more reverse-execution history.*kill.*$gdb_prompt " {
165 if { $saw_signal } then {
166 pass "$testmsg (handled)"
167 } else {
168 xfail "$testmsg (handled)"
169 }
170 }
171 }
172}
173
174gdb_load $binfile
175
176runto gen_ABRT
177
178if [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.
182}
183
184test_one_sig HUP
185test_one_sig QUIT
186test_one_sig ILL
187test_one_sig EMT
188test_one_sig FPE
189test_one_sig BUS
190test_one_sig SEGV
191test_one_sig SYS
192test_one_sig PIPE
193test_one_sig ALRM
194test_one_sig URG
195test_one_sig TSTP
196test_one_sig CONT
197test_one_sig CHLD
198test_one_sig TTIN
199test_one_sig TTOU
200test_one_sig IO
201test_one_sig XCPU
202test_one_sig XFSZ
203test_one_sig VTALRM
204test_one_sig PROF
205test_one_sig WINCH
206test_one_sig LOST
207test_one_sig USR1
208test_one_sig USR2
209test_one_sig PWR
210test_one_sig POLL
211test_one_sig WIND
212test_one_sig PHONE
213test_one_sig WAITING
214test_one_sig LWP
215test_one_sig DANGER
216test_one_sig GRANT
217test_one_sig RETRACT
218test_one_sig MSG
219test_one_sig SOUND
220test_one_sig SAK
221test_one_sig PRIO
222test_one_sig 33
223test_one_sig 34
224test_one_sig 35
225test_one_sig 36
226test_one_sig 37
227test_one_sig 38
228test_one_sig 39
229test_one_sig 40
230test_one_sig 41
231test_one_sig 42
232test_one_sig 43
233test_one_sig 44
234test_one_sig 45
235test_one_sig 46
236test_one_sig 47
237test_one_sig 48
238test_one_sig 49
239test_one_sig 50
240test_one_sig 51
241test_one_sig 52
242test_one_sig 53
243test_one_sig 54
244test_one_sig 55
245test_one_sig 56
246test_one_sig 57
247test_one_sig 58
248test_one_sig 59
249test_one_sig 60
250test_one_sig 61
251test_one_sig 62
252test_one_sig 63
253test_one_sig TERM
254
255# The last signal (SIGTERM) gets handled slightly differently because
256# we are not setting up for another test.
257gdb_test "handle SIGTERM stop print" \
258 "SIGTERM\[ \t\]*Yes\[ \t\]*Yes\[ \t\]*Yes.*"
259gdb_test "b handle_TERM" "Breakpoint \[0-9\]+ .*"
260gdb_test "continue" \
261 "Continuing.*Program received signal SIGTERM.*" \
262 "get signal TERM"
263gdb_test "continue" "Breakpoint.*handle_TERM.*" "send signal TERM"
264
e6a386cd 265gdb_test "continue" "\[process \[0-9\]+ .*" "continue to sigal exit" \
4cf866a3
MS
266 "The next instruction is syscall exit_group.* program...y. or n. " \
267 "yes"
b43b923a
MS
268
269test_one_sig_reverse TERM
270test_one_sig_reverse 63
271test_one_sig_reverse 62
272test_one_sig_reverse 61
273test_one_sig_reverse 60
274test_one_sig_reverse 59
275test_one_sig_reverse 58
276test_one_sig_reverse 57
277test_one_sig_reverse 56
278test_one_sig_reverse 55
279test_one_sig_reverse 54
280test_one_sig_reverse 53
281test_one_sig_reverse 52
282test_one_sig_reverse 51
283test_one_sig_reverse 50
284test_one_sig_reverse 49
285test_one_sig_reverse 48
286test_one_sig_reverse 47
287test_one_sig_reverse 46
288test_one_sig_reverse 45
289test_one_sig_reverse 44
290test_one_sig_reverse 43
291test_one_sig_reverse 42
292test_one_sig_reverse 41
293test_one_sig_reverse 40
294test_one_sig_reverse 39
295test_one_sig_reverse 38
296test_one_sig_reverse 37
297test_one_sig_reverse 36
298test_one_sig_reverse 35
299test_one_sig_reverse 34
300test_one_sig_reverse 33
301test_one_sig_reverse PRIO
302test_one_sig_reverse SAK
303test_one_sig_reverse SOUND
304test_one_sig_reverse MSG
305test_one_sig_reverse RETRACT
306test_one_sig_reverse GRANT
307test_one_sig_reverse DANGER
308test_one_sig_reverse LWP
309test_one_sig_reverse WAITING
310test_one_sig_reverse PHONE
311test_one_sig_reverse WIND
312test_one_sig_reverse POLL
313test_one_sig_reverse PWR
314test_one_sig_reverse USR2
315test_one_sig_reverse USR1
316test_one_sig_reverse LOST
317test_one_sig_reverse WINCH
318test_one_sig_reverse PROF
319test_one_sig_reverse VTALRM
320test_one_sig_reverse XFSZ
321test_one_sig_reverse XCPU
322test_one_sig_reverse IO
323test_one_sig_reverse TTOU
324test_one_sig_reverse TTIN
325test_one_sig_reverse CHLD
326test_one_sig_reverse CONT
327test_one_sig_reverse TSTP
328test_one_sig_reverse URG
329test_one_sig_reverse ALRM
330test_one_sig_reverse PIPE
331test_one_sig_reverse SYS
332test_one_sig_reverse SEGV
333test_one_sig_reverse BUS
334test_one_sig_reverse FPE
335test_one_sig_reverse EMT
336test_one_sig_reverse ILL
337test_one_sig_reverse QUIT
338test_one_sig_reverse HUP
339test_one_sig_reverse ABRT
340
341# Make the first signal SIGABRT because it is always supported.
342set sig_supported 1
343set thissig "ABRT"
344
345test_one_sig HUP
346test_one_sig QUIT
347test_one_sig ILL
348test_one_sig EMT
349test_one_sig FPE
350test_one_sig BUS
351test_one_sig SEGV
352test_one_sig SYS
353test_one_sig PIPE
354test_one_sig ALRM
355test_one_sig URG
356test_one_sig TSTP
357test_one_sig CONT
358test_one_sig CHLD
359test_one_sig TTIN
360test_one_sig TTOU
361test_one_sig IO
362test_one_sig XCPU
363test_one_sig XFSZ
364test_one_sig VTALRM
365test_one_sig PROF
366test_one_sig WINCH
367test_one_sig LOST
368test_one_sig USR1
369test_one_sig USR2
370test_one_sig PWR
371test_one_sig POLL
372test_one_sig WIND
373test_one_sig PHONE
374test_one_sig WAITING
375test_one_sig LWP
376test_one_sig DANGER
377test_one_sig GRANT
378test_one_sig RETRACT
379test_one_sig MSG
380test_one_sig SOUND
381test_one_sig SAK
382test_one_sig PRIO
383test_one_sig 33
384test_one_sig 34
385test_one_sig 35
386test_one_sig 36
387test_one_sig 37
388test_one_sig 38
389test_one_sig 39
390test_one_sig 40
391test_one_sig 41
392test_one_sig 42
393test_one_sig 43
394test_one_sig 44
395test_one_sig 45
396test_one_sig 46
397test_one_sig 47
398test_one_sig 48
399test_one_sig 49
400test_one_sig 50
401test_one_sig 51
402test_one_sig 52
403test_one_sig 53
404test_one_sig 54
405test_one_sig 55
406test_one_sig 56
407test_one_sig 57
408test_one_sig 58
409test_one_sig 59
410test_one_sig 60
411test_one_sig 61
412test_one_sig 62
413test_one_sig 63
414test_one_sig TERM