OLD | NEW |
1 # Copyright 2009-2012 Free Software Foundation, Inc. | 1 # Copyright 2009-2012 Free Software Foundation, Inc. |
2 | 2 |
3 # This program is free software; you can redistribute it and/or modify | 3 # This program is free software; you can redistribute it and/or modify |
4 # it under the terms of the GNU General Public License as published by | 4 # it under the terms of the GNU General Public License as published by |
5 # the Free Software Foundation; either version 3 of the License, or | 5 # the Free Software Foundation; either version 3 of the License, or |
6 # (at your option) any later version. | 6 # (at your option) any later version. |
7 # | 7 # |
8 # This program is distributed in the hope that it will be useful, | 8 # This program is distributed in the hope that it will be useful, |
9 # but WITHOUT ANY WARRANTY; without even the implied warranty of | 9 # but WITHOUT ANY WARRANTY; without even the implied warranty of |
10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | 10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
11 # GNU General Public License for more details. | 11 # GNU General Public License for more details. |
12 # | 12 # |
13 # You should have received a copy of the GNU General Public License | 13 # You should have received a copy of the GNU General Public License |
14 # along with this program. If not, see <http://www.gnu.org/licenses/>. | 14 # along with this program. If not, see <http://www.gnu.org/licenses/>. |
15 | 15 |
16 # Test that when a thread other than the main thread execs, we follow | 16 # Test that when a thread other than the main thread execs, we follow |
17 # through to the new incarnation of the main thread. This differs | 17 # through to the new incarnation of the main thread. This differs |
18 # from non-ldr-exc-1.exp in that we have more than two threads in the | 18 # from non-ldr-exc-1.exp in that we have more than two threads in the |
19 # program when the exec happens. | 19 # program when the exec happens. |
20 | 20 |
21 # No exec event support in the remote protocol. | 21 # No exec event support in the remote protocol. |
22 if { [is_remote target] } then { | 22 if { [is_remote target] } then { |
23 continue | 23 continue |
24 } | 24 } |
25 | 25 |
26 set testfile "non-ldr-exc-4" | 26 standard_testfile |
27 set srcfile ${testfile}.c | |
28 set executable ${testfile} | 27 set executable ${testfile} |
29 set binfile ${objdir}/${subdir}/${executable} | |
30 | 28 |
31 if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executab
le {debug}] != "" } { | 29 if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executab
le {debug}] != "" } { |
32 return -1 | 30 return -1 |
33 } | 31 } |
34 | 32 |
35 proc do_test { lock_sched } { | 33 proc do_test { lock_sched } { with_test_prefix "lock-sched$lock_sched" { |
36 global pf_prefix | |
37 global executable | 34 global executable |
38 | 35 |
39 set save_pf_prefix $pf_prefix | |
40 lappend pf_prefix "lock-sched$lock_sched:" | |
41 | |
42 clean_restart ${executable} | 36 clean_restart ${executable} |
43 | 37 |
44 if ![runto_main] { | 38 if ![runto_main] { |
45 set pf_prefix $save_pf_prefix | |
46 return -1 | 39 return -1 |
47 } | 40 } |
48 | 41 |
49 gdb_breakpoint [gdb_get_line_number "break-here"] | 42 gdb_breakpoint [gdb_get_line_number "break-here"] |
50 gdb_continue_to_breakpoint "break-here" ".* break-here .*" | 43 gdb_continue_to_breakpoint "break-here" ".* break-here .*" |
51 | 44 |
52 # Also test with sched-lock to make sure we can follow the | 45 # Also test with sched-lock to make sure we can follow the |
53 # non-leader thread execing even though the main thread wasn't | 46 # non-leader thread execing even though the main thread wasn't |
54 # resumed before the exec. | 47 # resumed before the exec. |
55 if { $lock_sched } { | 48 if { $lock_sched } { |
56 gdb_test_no_output "set scheduler-locking on" | 49 gdb_test_no_output "set scheduler-locking on" |
57 } | 50 } |
58 | 51 |
59 gdb_test "continue" \ | 52 gdb_test "continue" \ |
60 ".*is executing new program.*Breakpoint 1, main.* at .*" \ | 53 ".*is executing new program.*Breakpoint 1, main.* at .*" \ |
61 "continue over exec" | 54 "continue over exec" |
62 | 55 }} |
63 set pf_prefix $save_pf_prefix | |
64 } | |
65 | 56 |
66 do_test 0 | 57 do_test 0 |
67 do_test 1 | 58 do_test 1 |
OLD | NEW |