1# Copyright 2010-2020 Free Software Foundation, Inc. 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 16if {[skip_shlib_tests]} { 17 return 0 18} 19 20if [get_compiler_info] { 21 return -1 22} 23 24standard_testfile .cc infcall-dlopen-lib.cc 25set libfile [standard_output_file ${testfile}.so] 26set lib_dlopen [shlib_target_file ${testfile}.so] 27 28# Use completely arbitrary file for $libfile source. 29if { [gdb_compile_shlib ${srcdir}/${subdir}/${srcfile2} ${libfile} {debug c++}] != "" 30 || [prepare_for_testing "failed to prepare" ${testfile} ${srcfile} {debug c++ shlib_load}] } { 31 return -1 32} 33 34gdb_load_shlib $libfile 35 36if { ![runto_main] } { 37 return -1 38} 39 40for {set i 0} {$i < 10} {incr i} { 41 gdb_test "p openlib (\"${lib_dlopen}\")" " = 1" "test $i" 42 # Try to exploit the GDB trashed memory. 43 gdb_test "b openlib" {Breakpoint [0-9]+ at .*} "test $i stub 1" 44 gdb_test_no_output {delete $bpnum} "test $i stub 2" 45} 46