Commit | Line | Data |
---|---|---|
3666a048 | 1 | # Copyright (C) 2011-2021 Free Software Foundation, Inc. |
cc72b2a2 KP |
2 | # |
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 | |
5 | # the Free Software Foundation; either version 3 of the License, or | |
6 | # (at your option) any later version. | |
7 | # | |
8 | # This program is distributed in the hope that it will be useful, | |
9 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | |
10 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
11 | # GNU General Public License for more details. | |
12 | # | |
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/>. | |
15 | ||
16 | # This file is part of the GDB testsuite. It tests the mechanism | |
17 | # exposing values to Python. | |
18 | ||
cc72b2a2 | 19 | if {[skip_shlib_tests]} { |
5b362f04 | 20 | untested "skipping shared library tests" |
cc72b2a2 KP |
21 | return 0 |
22 | } | |
23 | ||
24 | load_lib gdb-python.exp | |
25 | ||
26 | set libfile "py-events-shlib" | |
27 | set libsrc $srcdir/$subdir/$libfile.c | |
b4a58790 | 28 | set lib_sl [standard_output_file $libfile-nodebug.so] |
cc72b2a2 KP |
29 | set lib_opts "" |
30 | ||
b4a58790 | 31 | standard_testfile |
cc72b2a2 KP |
32 | set exec_opts [list debug shlib=$lib_sl] |
33 | ||
4c93b1db | 34 | if [get_compiler_info] { |
cc72b2a2 KP |
35 | return -1 |
36 | } | |
37 | ||
38 | if { [gdb_compile_shlib $libsrc $lib_sl $lib_opts] != "" | |
39 | || [gdb_compile $srcdir/$subdir/$srcfile $binfile executable $exec_opts] != ""} { | |
84c93cd5 | 40 | untested "failed to compile" |
cc72b2a2 KP |
41 | return -1 |
42 | } | |
43 | ||
44 | # Start with a fresh gdb. | |
45 | clean_restart ${testfile} | |
46 | ||
f751cc97 JB |
47 | if { [skip_python_tests] } { continue } |
48 | ||
cc72b2a2 KP |
49 | # |
50 | # Test FinishBreakpoint in normal conditions | |
51 | # | |
52 | ||
53 | clean_restart ${testfile} | |
d9019901 | 54 | gdb_load_shlib ${lib_sl} |
cc72b2a2 KP |
55 | |
56 | if ![runto_main] then { | |
bc6c7af4 | 57 | fail "cannot run to main." |
cc72b2a2 KP |
58 | return 0 |
59 | } | |
60 | ||
7c343b48 YQ |
61 | set python_file [gdb_remote_download host \ |
62 | ${srcdir}/${subdir}/${testfile}.py] | |
63 | ||
cc72b2a2 KP |
64 | gdb_test_no_output "set confirm off" "disable confirmation" |
65 | gdb_test "source $python_file" "Python script imported.*" \ | |
66 | "import python scripts" | |
67 | gdb_breakpoint "increase_1" | |
68 | gdb_test "continue" "Breakpoint .*at.*" "continue to the function to finish" | |
69 | ||
70 | # set FinishBreakpoint | |
71 | ||
72 | gdb_test "python finishbp_default = gdb.FinishBreakpoint ()" \ | |
73 | "Temporary breakpoint.*" "set FinishBreakpoint with default frame value" | |
74 | gdb_test "python finishbp = MyFinishBreakpoint (gdb.parse_and_eval ('a'), gdb.newest_frame ())" \ | |
75 | "Temporary breakpoint.*" "set FinishBreakpoint" | |
9325cb04 | 76 | gdb_test "python print (finishbp.return_value)" "None.*" \ |
cc72b2a2 KP |
77 | "check return_value at init" |
78 | ||
79 | # check normal bp hit | |
80 | ||
81 | gdb_test "continue" "MyFinishBreakpoint stop with.*return_value is: -5.*#0.*increase.*" \ | |
82 | "check MyFinishBreakpoint hit" | |
9325cb04 | 83 | gdb_test "python print (finishbp.return_value)" "-5.*" "check return_value" |
cc72b2a2 | 84 | |
9325cb04 PK |
85 | gdb_test "python print (finishbp_default.hit_count)" "1.*" "check finishBP on default frame has been hit" |
86 | gdb_test "python print (finishbp.is_valid())" "False.*"\ | |
cc72b2a2 KP |
87 | "ensure that finish bp is invalid afer normal hit" |
88 | ||
89 | # check FinishBreakpoint in main no allowed | |
90 | ||
91 | gdb_test "finish" "main.*" "return to main()" | |
92 | gdb_test "python MyFinishBreakpoint (None, gdb.selected_frame ())" \ | |
93 | "ValueError: \"FinishBreakpoint\" not meaningful in the outermost frame..*" \ | |
94 | "check FinishBP not allowed in main" | |
95 | ||
96 | # | |
97 | # Test FinishBreakpoint with no debug symbol | |
98 | # | |
99 | ||
100 | clean_restart ${testfile} | |
d9019901 | 101 | gdb_load_shlib ${lib_sl} |
cc72b2a2 KP |
102 | |
103 | gdb_test "source $python_file" "Python script imported.*" \ | |
104 | "import python scripts" | |
105 | set cond_line [gdb_get_line_number "Condition Break."] | |
106 | ||
107 | if ![runto_main] then { | |
bc6c7af4 | 108 | fail "cannot run to main." |
cc72b2a2 KP |
109 | return 0 |
110 | } | |
111 | ||
112 | gdb_test "print do_nothing" "no debug info.*" "ensure that shared lib has no debug info" | |
113 | gdb_breakpoint "do_nothing" {temporary} | |
c0f378ec EBM |
114 | gdb_test "continue" "Temporary breakpoint .*in \\.?do_nothing.*" \ |
115 | "continue to do_nothing" | |
cc72b2a2 KP |
116 | |
117 | gdb_test "python finishBP = SimpleFinishBreakpoint(gdb.newest_frame())" \ | |
118 | "SimpleFinishBreakpoint init" \ | |
119 | "set finish breakpoint" | |
120 | gdb_test "continue" "SimpleFinishBreakpoint stop.*" "check FinishBreakpoint hit" | |
9325cb04 | 121 | gdb_test "python print (finishBP.return_value)" "None" "check return value without debug symbol" |
cc72b2a2 KP |
122 | |
123 | # | |
124 | # Test FinishBreakpoint in function returned by longjmp | |
125 | # | |
126 | ||
127 | clean_restart ${testfile} | |
d9019901 | 128 | gdb_load_shlib ${lib_sl} |
cc72b2a2 KP |
129 | |
130 | gdb_test "source $python_file" "Python script imported.*" \ | |
131 | "import python scripts" | |
132 | ||
133 | if ![runto call_longjmp_1] then { | |
134 | perror "couldn't run to breakpoint call_longjmp" | |
135 | continue | |
136 | } | |
137 | ||
138 | gdb_test "python finishbp = SimpleFinishBreakpoint(gdb.newest_frame())" \ | |
139 | "SimpleFinishBreakpoint init" \ | |
140 | "set finish breakpoint" | |
141 | gdb_test "break [gdb_get_line_number "after longjmp."]" "Breakpoint.* at .*" \ | |
142 | "set BP after the jump" | |
143 | gdb_test "continue" "SimpleFinishBreakpoint out of scope.*" \ | |
144 | "check FinishBP out of scope notification" | |
9325cb04 | 145 | gdb_test "python print (finishbp.is_valid())" "False.*"\ |
cc72b2a2 KP |
146 | "ensure that finish bp is invalid afer out of scope notification" |
147 | ||
148 | # | |
149 | # Test FinishBreakpoint in BP condition evaluation | |
150 | # (finish in dummy frame) | |
151 | # | |
152 | ||
153 | clean_restart ${testfile} | |
d9019901 | 154 | gdb_load_shlib ${lib_sl} |
cc72b2a2 KP |
155 | |
156 | gdb_test "source $python_file" "Python script imported.*" \ | |
157 | "import python scripts" | |
158 | ||
159 | ||
160 | if ![runto_main] then { | |
bc6c7af4 | 161 | fail "cannot run to main." |
cc72b2a2 KP |
162 | return 0 |
163 | } | |
164 | ||
165 | gdb_test "break ${cond_line} if test_1(i,8)" "Breakpoint .* at .*" \ | |
166 | "set a conditional BP" | |
167 | gdb_test "python TestBreakpoint()" "TestBreakpoint init" \ | |
168 | "set FinishBP in a breakpoint condition" | |
169 | gdb_test "continue" \ | |
170 | "\"FinishBreakpoint\" cannot be set on a dummy frame.*" \ | |
171 | "don't allow FinishBreakpoint on dummy frames" | |
172 | gdb_test "print i" "8" "check stopped location" | |
173 | ||
174 | # | |
175 | # Test FinishBreakpoint in BP condition evaluation | |
176 | # (finish in normal frame) | |
177 | # | |
178 | ||
179 | clean_restart ${testfile} | |
d9019901 | 180 | gdb_load_shlib ${lib_sl} |
cc72b2a2 KP |
181 | |
182 | gdb_test "source $python_file" "Python script imported.*" \ | |
183 | "import python scripts" | |
184 | ||
185 | if ![runto_main] then { | |
bc6c7af4 | 186 | fail "cannot run to main." |
cc72b2a2 KP |
187 | return 0 |
188 | } | |
189 | ||
190 | gdb_test "break ${cond_line} if test(i,8)" \ | |
191 | "Breakpoint .* at .*" "set conditional BP" | |
192 | gdb_test "python TestBreakpoint()" "TestBreakpoint init" "set BP in condition" | |
193 | ||
194 | gdb_test "continue" \ | |
195 | "test don't stop: 1.*test don't stop: 2.*test stop.*Error in testing breakpoint condition.*The program being debugged stopped while in a function called from GDB.*" \ | |
196 | "stop in condition function" | |
197 | ||
198 | gdb_test "continue" "Continuing.*" "finish condition evaluation" | |
199 | gdb_test "continue" "Breakpoint.*" "stop at conditional breakpoint" | |
200 | gdb_test "print i" "8" "check stopped location" | |
201 | ||
202 | # | |
203 | # Test FinishBreakpoint in explicit inferior function call | |
204 | # | |
205 | ||
206 | clean_restart ${testfile} | |
d9019901 | 207 | gdb_load_shlib ${lib_sl} |
cc72b2a2 KP |
208 | |
209 | gdb_test "source $python_file" "Python script imported.*" \ | |
210 | "import python scripts" | |
211 | ||
212 | if ![runto_main] then { | |
bc6c7af4 | 213 | fail "cannot run to main." |
cc72b2a2 KP |
214 | return 0 |
215 | } | |
216 | ||
217 | # return address in dummy frame | |
218 | ||
219 | gdb_test "python TestExplicitBreakpoint('increase_1')" "Breakpoint.*at.*" \ | |
220 | "prepare TestExplicitBreakpoint" | |
221 | gdb_test "print increase_1(&i)" \ | |
222 | "\"FinishBreakpoint\" cannot be set on a dummy frame.*" \ | |
223 | "don't allow FinishBreakpoint on dummy frames" | |
224 | ||
225 | # return address in normal frame | |
226 | ||
227 | delete_breakpoints | |
228 | gdb_test "python TestExplicitBreakpoint(\"increase_1\")" "Breakpoint.*at.*" \ | |
229 | "prepare TestExplicitBreakpoint" | |
230 | gdb_test "print increase(&i)" \ | |
231 | "SimpleFinishBreakpoint init.*SimpleFinishBreakpoint stop.*The program being debugged stopped while in a function called from GDB.*" \ | |
232 | "FinishBP stop at during explicit function call" | |
233 | ||
234 | ||
235 | # | |
236 | # Test FinishBreakpoint when inferior exits | |
237 | # | |
238 | ||
239 | if ![runto "test_exec_exit"] then { | |
bc6c7af4 | 240 | fail "cannot run to test_exec_exit." |
cc72b2a2 KP |
241 | return 0 |
242 | } | |
243 | ||
3bc96cfb | 244 | gdb_test_no_output "set var self_exec = 0" "switch to exit() test" |
cc72b2a2 KP |
245 | gdb_test "python SimpleFinishBreakpoint(gdb.newest_frame())" "SimpleFinishBreakpoint init" "set FinishBP after the exit()" |
246 | gdb_test "continue" "SimpleFinishBreakpoint out of scope.*" "catch out of scope after exit" | |
247 | ||
248 | # | |
249 | # Test FinishBreakpoint when inferior execs | |
250 | # | |
251 | ||
252 | if ![runto "test_exec_exit"] then { | |
bc6c7af4 | 253 | fail "cannot run to test_exec_exit." |
cc72b2a2 KP |
254 | return 0 |
255 | } | |
256 | ||
cc72b2a2 | 257 | gdb_test "python SimpleFinishBreakpoint(gdb.newest_frame())" "SimpleFinishBreakpoint init" "set FinishBP after the exec" |
d1e36019 | 258 | gdb_test "catch exec" "Catchpoint.*\(exec\).*" |
3bc96cfb | 259 | gdb_test "continue" "SimpleFinishBreakpoint out of scope.*" "catch out of scope after exec" |