1 # Copyright 2013-2021 Free Software Foundation, Inc.
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.
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.
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/>. */
16 # Test adding and removing a symbol file dynamically:
17 # 1) Run to gdb_add_symbol_file in $srcfile.
18 # 2) Set a pending breakpoint at bar in $srcfile3.
19 # 3) Load the library's symbols using 'add-symbol-file'.
20 # 4) 'info files' must display ${lib_basename}.
21 # 5) Continue to bar in $srcfile3.
22 # 6) Set a breakpoint at foo in $srcfile3.
23 # 7) Continue to foo in $srcfile3.
24 # 8) Set a breakpoint at gdb_remove_symbol_file.
25 # 9) Continue to gdb_remove_symbol_file in $srcfile.
26 # 10) Remove the library's symbols using 'remove-symbol-file'.
27 # 11) 'info files' must not display ${lib_basename}, anymore.
28 # 12) Check that the breakpoints at foo and bar are pending.
29 # 13) Check that the execution can continue without error.
30 # 14) Regression test for a stale breakpoints bug.
32 if {![is_elf_target]} {
36 if [skip_shlib_tests] {
40 set target_size TARGET_UNKNOWN
41 if {[is_lp64_target]} {
42 set target_size TARGET_LP64
43 } elseif {[is_ilp32_target]} {
44 set target_size TARGET_ILP32
49 set main_basename sym-file-main
50 set loader_basename sym-file-loader
51 set lib_basename sym-file-lib
53 standard_testfile $main_basename.c $loader_basename.c $lib_basename.c
55 set libsrc "${srcdir}/${subdir}/${srcfile3}"
56 set lib_so [standard_output_file ${lib_basename}.so]
57 set lib_syms [shlib_symbol_file ${lib_so}]
58 set lib_dlopen [shlib_target_file ${lib_basename}.so]
60 set exec_opts [list debug "additional_flags= -I$srcdir/../../include/ -D$target_size\
61 -DSHLIB_NAME\\=\"$lib_dlopen\""]
63 if [get_compiler_info] {
67 if {[gdb_compile_shlib $libsrc $lib_so {debug}] != ""} {
68 untested "failed to compile shared library"
72 if {[prepare_for_testing "failed to prepare" $binfile "$srcfile $srcfile2" $exec_opts]} {
76 gdb_load_shlib ${lib_so}
78 if ![runto_main] then {
82 # 1) Run to gdb_add_symbol_file in $srcfile for adding the library's
84 gdb_breakpoint gdb_add_symbol_file
85 gdb_continue_to_breakpoint gdb_add_symbol_file
87 # 2) Set a pending breakpoint at bar in $srcfile3.
88 set result [gdb_breakpoint bar allow-pending]
93 # 3) Add the library's symbols using 'add-symbol-file'.
94 set result [gdb_test "add-symbol-file ${lib_syms} addr" \
95 "Reading symbols from .*${lib_syms}\\.\\.\\." \
96 "add-symbol-file ${lib_basename}.so addr" \
97 "add symbol table from file \".*${lib_basename}\\.so\"\
100 if {$result != 0} then {
104 # 4) 'info files' must display $srcfile3.
105 gdb_test "info files" \
106 "^(?=(.*${lib_basename})).*" \
107 "info files must display ${lib_basename}"
109 # 5) Continue to bar in $srcfile3 to ensure that the breakpoint
110 # was bound correctly after adding $shilb_name.
111 set lnum_bar [gdb_get_line_number "break at bar" $srcfile3]
112 gdb_continue_to_breakpoint bar ".*${lib_basename}\\.c:$lnum_bar.*"
114 # 6) Set a breakpoint at foo in $srcfile3.
115 set result [gdb_breakpoint foo]
120 # 7) Continue to foo in $srcfile3 to ensure that the breakpoint
121 # was bound correctly.
122 set lnum_foo [gdb_get_line_number "break at foo" $srcfile3]
123 gdb_continue_to_breakpoint foo ".*${lib_basename}\\.c:$lnum_foo.*"
125 # 8) Set a breakpoint at gdb_remove_symbol_file in $srcfile for
126 # removing the library's symbols.
127 set result [gdb_breakpoint gdb_remove_symbol_file]
132 # 9) Continue to gdb_remove_symbol_file in $srcfile.
133 gdb_continue_to_breakpoint gdb_remove_symbol_file
135 # 10) Remove the library's symbols using 'remove-symbol-file'.
136 set result [gdb_test "remove-symbol-file -a addr" \
138 "remove-symbol-file -a addr" \
139 "Remove symbol table from file \".*${lib_basename}\\.so\"\\?\
142 if {$result != 0} then {
146 # 11) 'info files' must not display ${lib_basename}, anymore.
147 gdb_test "info files" \
148 "^(?!(.*${lib_basename})).*" \
149 "info files must not display ${lib_basename}"
151 # 12) Check that the breakpoints at foo and bar are pending after
152 # removing the library's symbols.
153 gdb_test "info breakpoints 3" \
155 "breakpoint at foo is pending"
157 gdb_test "info breakpoints 4" \
159 "breakpoint at bar is pending"
161 # 13) Check that the execution can continue without error.
162 set lnum_reload [gdb_get_line_number "reload lib here"]
163 gdb_breakpoint $lnum_reload
164 gdb_continue_to_breakpoint reload ".*${srcfile}:$lnum_reload.*"
166 # 14) Regression test for a stale breakpoints bug. Check whether
167 # unloading symbols manually without the program actually unloading
168 # the library, when breakpoints are inserted doesn't leave stale
169 # breakpoints behind.
170 with_test_prefix "stale bkpts" {
171 # Force breakpoints always inserted.
172 gdb_test_no_output "set breakpoint always-inserted on"
174 # Get past the library reload.
175 gdb_continue_to_breakpoint gdb_add_symbol_file
177 # Load the library's symbols.
178 gdb_test "add-symbol-file ${lib_syms} addr" \
179 "Reading symbols from .*${lib_syms}\\.\\.\\." \
180 "add-symbol-file ${lib_basename}.so addr" \
181 "add symbol table from file \".*${lib_syms}\"\
185 # Set a breakpoint at baz, in the library.
188 gdb_test "info breakpoints 7" ".*y.*0x.*in baz.*" \
189 "breakpoint at baz is resolved"
191 # Unload symbols manually without the program actually unloading
193 gdb_test "remove-symbol-file -a addr" \
195 "remove-symbol-file -a addr" \
196 "Remove symbol table from file \".*${lib_basename}\\.so\"\\?\
200 gdb_test "info breakpoints 7" ".*PENDING.*" \
201 "breakpoint at baz is pending"
203 # Check that execution can continue without error. If GDB leaves
204 # breakpoints behind, we'll get back a spurious SIGTRAP.
205 set lnum_end [gdb_get_line_number "end here"]
206 gdb_breakpoint $lnum_end
207 gdb_continue_to_breakpoint "end here" ".*end here.*"