diff options
author | Tom de Vries <tdevries@suse.de> | 2022-11-15 15:24:54 +0100 |
---|---|---|
committer | Tom de Vries <tdevries@suse.de> | 2022-11-15 15:24:54 +0100 |
commit | e27e0e5d4147af715d479fda7583d74cf6a17266 (patch) | |
tree | 9029fc990cef667c40773cd0a72593d85806d479 | |
parent | a1dfb76d919d45276963f2be35e8a235937d9d8f (diff) | |
download | gdb-e27e0e5d4147af715d479fda7583d74cf6a17266.zip gdb-e27e0e5d4147af715d479fda7583d74cf6a17266.tar.gz gdb-e27e0e5d4147af715d479fda7583d74cf6a17266.tar.bz2 |
[gdb/testsuite] Fix gdb.base/info-shared.exp for remote target
With test-case gdb.base/info-shared.exp and target board
remote-gdbserver-on-localhost (using REMOTE_TARGET_USERNAME) we run into some
failures.
Fix these by adding the missing gdb_load_shlib.
Tested on x86_64-linux.
Co-Authored-by: Ivan Tetyushkin <ivan.tetyushkin@syntacore.com>
-rw-r--r-- | gdb/testsuite/gdb.base/info-shared.exp | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/gdb/testsuite/gdb.base/info-shared.exp b/gdb/testsuite/gdb.base/info-shared.exp index 290ae57..8d3484b 100644 --- a/gdb/testsuite/gdb.base/info-shared.exp +++ b/gdb/testsuite/gdb.base/info-shared.exp @@ -22,12 +22,10 @@ standard_testfile set lib1name $testfile-solib1 set srcfile_lib1 $srcdir/$subdir/$lib1name.c set binfile_lib1 [standard_output_file $lib1name.so] -set define1 -DSHLIB1_NAME=\"$binfile_lib1\" set lib2name $testfile-solib2 set srcfile_lib2 $srcdir/$subdir/$lib2name.c set binfile_lib2 [standard_output_file $lib2name.so] -set define2 -DSHLIB2_NAME=\"$binfile_lib2\" if { [gdb_compile_shlib $srcfile_lib1 $binfile_lib1 {}] != "" } { untested "failed to compile shared library 1" @@ -39,12 +37,21 @@ if { [gdb_compile_shlib $srcfile_lib2 $binfile_lib2 {}] != "" } { return -1 } +set binfile_lib1_target [gdb_download_shlib $binfile_lib1] +set binfile_lib2_target [gdb_download_shlib $binfile_lib2] + +set define2 -DSHLIB2_NAME=\"$binfile_lib2_target\" +set define1 -DSHLIB1_NAME=\"$binfile_lib1_target\" + set cflags "$define1 $define2" if { [prepare_for_testing "failed to prepare" $testfile $srcfile \ [list additional_flags=$cflags shlib_load]] } { return -1 } +gdb_locate_shlib $binfile_lib1 +gdb_locate_shlib $binfile_lib2 + # Run "info sharedlibrary" and check for the presence or absence of # our libraries. proc check_info_shared { test expect1 expect2 } { |