From: Thomas Preud'homme Date: Thu, 1 Nov 2018 17:18:24 +0000 (+0000) Subject: Fix ld action in run_dump_test X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=33ea299c25134ce23805faa6b2b1e7fe6327f6bb;p=binutils-gdb.git Fix ld action in run_dump_test run_dump_test proposes an ld action but when trying to make use of it in a gas test it gave me some Tcl error. It turns out that it references the check_shared_lib_support procedure and ld_elf_shared_opt variable both only available in ld-lib.exp. I've thus moved the procedure in binutils-common.exp and defined the variable needed in the various default.exp of testsuite that seem to be using run_dump_test. Since check_shared_lib_support itself references the ld variable not defined in binutils-common I've defined it from LD in run_dump_test and fixed LD and LDFLAGS to be defined as expected by run_dump_test in the various default.exp of testsuite using run_dump_test. 2018-11-01 Thomas Preud'homme binutils/ * testsuite/config/default.exp: Define LD, LDFLAGS and ld_elf_shared_opt. * testsuite/lib/binutils-common.exp (check_shared_lib_support): Moved from ld-lib.exp. (run_dump_test): Set ld to $LD. gas/ * testsuite/config/default.exp: Define LD, LDFLAGS and ld_elf_shared_opt. ld/ * testsuite/lib/ld-lib.exp (check_shared_lib_support): Moved to binutils-common.exp. --- diff --git a/binutils/ChangeLog b/binutils/ChangeLog index e3bbbc3a84f..8404b670c99 100644 --- a/binutils/ChangeLog +++ b/binutils/ChangeLog @@ -1,3 +1,11 @@ +2018-11-01 Thomas Preud'homme + + * testsuite/config/default.exp: Define LD, LDFLAGS and + ld_elf_shared_opt. + * testsuite/lib/binutils-common.exp (check_shared_lib_support): Moved + from ld-lib.exp. + (run_dump_test): Set ld to $LD. + 2018-10-18 Nick Clifton * doc/binutils.texi (readelf): Document alternatives to the diff --git a/binutils/testsuite/config/default.exp b/binutils/testsuite/config/default.exp index 6c55be66f55..1bfe72e8c85 100644 --- a/binutils/testsuite/config/default.exp +++ b/binutils/testsuite/config/default.exp @@ -28,6 +28,14 @@ if ![info exists ASFLAGS] then { set ASFLAGS "" } +if ![info exists LD] then { + set LD [findfile $base_dir/../ld/ld-new $base_dir/../ld/ld-new [transform ld]] +} +if ![info exists LDFLAGS] then { + set LDFLAGS "" +} +set ld_elf_shared_opt "-z norelro" + if ![info exists NM] then { set NM [findfile $base_dir/nm-new $base_dir/nm-new [transform nm]] } diff --git a/binutils/testsuite/lib/binutils-common.exp b/binutils/testsuite/lib/binutils-common.exp index 08d57ae9638..fcd2c8ee0c7 100644 --- a/binutils/testsuite/lib/binutils-common.exp +++ b/binutils/testsuite/lib/binutils-common.exp @@ -248,6 +248,23 @@ proc is_bad_symtab {} { return 0; } +# Returns true if -shared is supported on the target + +proc check_shared_lib_support { } { + global shared_available_saved + global ld + + if {![info exists shared_available_saved]} { + set ld_output [remote_exec host $ld "-shared"] + if { [ string first "not supported" $ld_output ] >= 0 } { + set shared_available_saved 0 + } else { + set shared_available_saved 1 + } + } + return $shared_available_saved +} + # Compare two files line-by-line. FILE_1 is the actual output and FILE_2 # is the expected output. Ignore blank lines in either file. # @@ -1002,6 +1019,8 @@ proc run_dump_test { name {extra_options {}} } { catch "exec rm -f $objfile" exec_output set ld_extra_opt "" + global ld + set ld "$LD" if { [is_elf_format] && [check_shared_lib_support] } { set ld_extra_opt "$ld_elf_shared_opt" } diff --git a/gas/ChangeLog b/gas/ChangeLog index 86eb344a61e..eef02b863d2 100644 --- a/gas/ChangeLog +++ b/gas/ChangeLog @@ -1,3 +1,8 @@ +2018-11-01 Thomas Preud'homme + + * testsuite/config/default.exp: Define LD, LDFLAGS and + ld_elf_shared_opt. + 2018-10-31 Andre Vieira * testsuite/gas/arm/armv8-a+rdma-warning.d: Remove objdump execution. diff --git a/gas/testsuite/config/default.exp b/gas/testsuite/config/default.exp index 888e90d178a..b76c5baa440 100644 --- a/gas/testsuite/config/default.exp +++ b/gas/testsuite/config/default.exp @@ -26,6 +26,14 @@ if ![info exists ASFLAGS] then { set ASFLAGS "" } +if ![info exists LD] then { + set LD [findfile $base_dir/../../ld/ld-new $base_dir/../../ld/ld-new [transform ld]] +} +if ![info exists LDFLAGS] then { + set LDFLAGS "" +} +set ld_elf_shared_opt "-z norelro" + if ![info exists OBJDUMP] then { set OBJDUMP [findfile $base_dir/../../binutils/objdump \ $base_dir/../../binutils/objdump \ diff --git a/ld/ChangeLog b/ld/ChangeLog index 0453e2e8ee8..7fee0dd690b 100644 --- a/ld/ChangeLog +++ b/ld/ChangeLog @@ -1,3 +1,8 @@ +2018-11-01 Thomas Preud'homme + + * testsuite/lib/ld-lib.exp (check_shared_lib_support): Moved to + binutils-common.exp. + 2018-10-29 Alan Modra * ldlang.c (load_symbols): When -t, print file names for script diff --git a/ld/testsuite/lib/ld-lib.exp b/ld/testsuite/lib/ld-lib.exp index d6453f19958..3fb1e58a0c9 100644 --- a/ld/testsuite/lib/ld-lib.exp +++ b/ld/testsuite/lib/ld-lib.exp @@ -1069,23 +1069,6 @@ proc check_gc_sections_available { } { return $gc_sections_available_saved } -# Returns true if -shared is supported on the target - -proc check_shared_lib_support { } { - global shared_available_saved - global ld - - if {![info exists shared_available_saved]} { - set ld_output [remote_exec host $ld "-shared"] - if { [ string first "not supported" $ld_output ] >= 0 } { - set shared_available_saved 0 - } else { - set shared_available_saved 1 - } - } - return $shared_available_saved -} - # Return true if target uses genelf.em (assuming it is ELF). proc is_generic_elf { } { if { [istarget "d30v-*-*"]