tcl global directive outside proc body does nothing (ld)
[deliverable/binutils-gdb.git] / ld / testsuite / ld-elf / elf.exp
index 4d4a6316b5ef478a24bc24b5b369d79cd8d7dfee..3ae769e3bf9d133f59f612c4f59431851c420a85 100644 (file)
@@ -1,5 +1,5 @@
 # Expect script for various ELF tests.
-#   Copyright (C) 2002-2017 Free Software Foundation, Inc.
+#   Copyright (C) 2002-2020 Free Software Foundation, Inc.
 #
 # This file is part of the GNU Binutils.
 #
@@ -29,11 +29,21 @@ set old_ldflags $LDFLAGS
 if { [istarget spu*-*-*] } {
     set LDFLAGS "$LDFLAGS --local-store 0:0"
 }
+
+# hpux .comm differs from everyone else
+set hpux ""
+set old_asflags $ASFLAGS
+if [istarget "*-*-hpux*"] {
+    set hpux "--defsym HPUX=1"
+    set ASFLAGS "$ASFLAGS --defsym HPUX=1"
+}
+
 if { [istarget alpha*-*-* ] } {
     # The compress1 test is written expecting 32-bit addresses; force the
     # executable down into the low address space to match.
     # ??? How can we adjust just the one testcase?
     set LDFLAGS "$LDFLAGS -Ttext-segment 0x1000000"
+    set ASFLAGS "$ASFLAGS --defsym NO_SET=1"
 }
 
 if { [istarget "*-*-nacl*"] } {
@@ -52,114 +62,68 @@ if { [is_remote host] } then {
     remote_download host merge.ld
 }
 
-if { ![istarget hppa64*-hpux*] } {
-    run_ld_link_tests {
-       {"Build symbol3.a"
-           "" "" ""
-           {symbol3.s} {} "symbol3.a"}
-       {"Build symbol3w.a"
-           "" "" ""
-           {symbol3w.s} {} "symbol3w.a"}
-    }
+# Note - the output file from the second test (symbol3w.a) is
+# used in the proc is_elf64 test below...
+run_ld_link_tests [list \
+    [list "Build symbol3.a" \
+       "" "" $hpux \
+       {symbol3.s} {} "symbol3.a" ] \
+    [list "Build symbol3w.a" \
+       "" "" "" \
+       {symbol3w.s} {} "symbol3w.a" ] \
+]
+
 
-    if { [check_shared_lib_support] } then {
-       run_ld_link_tests {
-           {"Build pr14170a.o" "" "" "" "pr14170a.s" {} "pr14170.a" }
-       }
-       setup_xfail "tic6x-*-*"
-       run_ld_link_tests {
-           {"Build shared library for pr14170"
-               "-shared" "" "" "pr14170b.s" {} "pr14170.so" }
-       }
-       # bfin does not currently support copy relocs.
-       setup_xfail "bfin-*-*"
-       run_ld_link_tests {
-           {"PR ld/14170"
-               "--no-dynamic-linker tmpdir/pr14170a.o tmpdir/pr14170.so" "" "" "pr14170c.s"
-               { } "pr14170" }
-       }
+if [is_elf64 tmpdir/symbol3w.a] {
+    set ASFLAGS "$ASFLAGS --defsym ALIGN=3"
+    set pr23900_1_exp "pr23900-1-64.rd"
+    set pr25490_2_exp "pr25490-2-64.rd"
+    set pr25490_3_exp "pr25490-3-64.rd"
+    set pr25490_4_exp "pr25490-4-64.rd"
+    set pr25490_5_exp "pr25490-5-64.rd"
+    set pr25490_6_exp "pr25490-6-64.rd"
+} else {
+    set ASFLAGS "$ASFLAGS --defsym ALIGN=2"
+    set pr23900_1_exp "pr23900-1-32.rd"
+    if {    [istarget avr-*-*]
+        || [istarget h8300-*-*]
+        || [istarget ip2k-*-*]
+        || [istarget m68hc11-*]
+        || [istarget "xc16x-*"]
+        || [istarget "z80-*-*"] } {
+       set pr25490_2_exp "pr25490-2-16.rd"
+       set pr25490_3_exp "pr25490-3-16.rd"
+       set pr25490_4_exp "pr25490-4-16.rd"
+       set pr25490_5_exp "pr25490-5-16.rd"
+       set pr25490_6_exp "pr25490-6-16.rd"
+    } else {
+       set pr25490_2_exp "pr25490-2-32.rd"
+       set pr25490_3_exp "pr25490-3-32.rd"
+       set pr25490_4_exp "pr25490-4-32.rd"
+       set pr25490_5_exp "pr25490-5-32.rd"
+       set pr25490_6_exp "pr25490-6-32.rd"
     }
 }
 
-# Only run these tests on targets that support creating shared libraries.
-if { [check_shared_lib_support] } then {
-    # This target requires extra GAS options when building non-PIC code
-    # for linking with shared libraries.
-    set AFLAGS_NONPIC ""
-    if [istarget "mips*-*-*"] {
-       append AFLAGS_NONPIC " -call_nonpic"
-    }
 
-    # Run a test to check linking a shared library with a broken linker
-    # script that accidentally marks dynamic sections as notes.  The
-    # resulting executable is not expected to work, but the linker
-    # should not seg-fault whilst creating the binary.
-    setup_xfail "tic6x-*-*"
-    run_ld_link_tests {
-       {"Build shared library for next test"
-           "-shared" "" "" "note-3.s" {} "note-3.so" }
-       {"Link using broken linker script"
-           "--script note-3.t tmpdir/note-3.so" "" "" ""
-           { { ld "note-3.l" } }
-           "a.out" }
-    }
-    setup_xfail "tic6x-*-*"
-    run_ld_link_tests {
-       {"Build pr17068.so"
-           "-shared" "" ""
-           {pr17068d.s} {} "pr17068.so"}
-       {"Build pr17068a.a"
-           "" "" ""
-           {pr17068a.s pr17068c.s pr17068ez.s} {} "pr17068a.a"}
-       {"Build pr17068b.a"
-           "" "" ""
-           {pr17068b.s pr17068e.s} {} "pr17068b.a"}
-    }
-    # bfin does not currently support copy relocs.
-    setup_xfail "bfin-*-*"
-    run_ld_link_tests {
-       {"pr17068 link --as-needed lib in group"
-           "--as-needed --no-dynamic-linker" "--start-group tmpdir/pr17068a.a tmpdir/pr17068.so tmpdir/pr17068b.a --end-group" ""
-           {start.s pr17068.s} {} "pr17068"}
-    }
-    # xfail on tic6x due to non-PIC/non-PID warnings
-    setup_xfail "tic6x-*-*"
-    # Fails on MIPS because ABI trickery means that a NULL reloc is also emitted.
-    setup_xfail "mips*-*-*"
-    # Fails on bfin because relocations are not created.
-    setup_xfail "bfin-*-*"
-    run_ld_link_tests {
-       {"-Bsymbolic-functions"
-           "-shared -Bsymbolic-functions" "" ""
-           {symbolic-func.s} {{readelf {-r --wide} symbolic-func.r}}
-           "symbolic-func.so"}
-    }
-    # xfail on tic6x due to non-PIC/non-PID warnings
-    setup_xfail "tic6x-*-*"
-    run_ld_link_tests {
-       {"Build pr20995.so"
-           "-shared" "" ""
-           {pr20995b.s} {} "pr20995.so"}
-    }
-    setup_xfail "tic6x-*-*"
-    run_ld_link_tests {
-       {"Build pr20995-2.so"
-           "-shared -z relro" "" ""
-           {pr20995c.s} {{readelf {-l --wide} pr20995-2so.r}} "pr20995-2.so"}
-    }
-    # These targets don't copy dynamic variables into .bss.
-    setup_xfail "alpha-*-*" "bfin-*-*" "ia64-*-*" "xtensa-*-*"
-    run_ld_link_tests [list \
-       [list \
-           "pr20995" \
-           "" "tmpdir/pr20995.so" "$AFLAGS_NONPIC" \
-           {pr20995a.s} {{readelf {-S --wide} pr20995.r}} "pr20995"]]
-    setup_xfail "alpha-*-*" "bfin-*-*" "ia64-*-*" "xtensa-*-*"
-    run_ld_link_tests [list \
-       [list \
-           "pr20995-2" \
-           "" "tmpdir/pr20995-2.so" "$AFLAGS_NONPIC" \
-           {pr20995a.s} {{readelf {-S --wide} pr20995.r}} "pr20995-2"]]
+
+# Targets that use _bfd_generic_link_add_symbols won't pass pr21703 tests
+run_ld_link_tests {
+      {"PR ld/21703"
+       "--allow-multiple-definition tmpdir/pr21703-1.o tmpdir/pr21703-2.o" "" "" \
+       {pr21703-1.s pr21703-2.s} {{readelf {-s} pr21703.sd}} "pr21703" }
+      {"PR ld/21703 -r"
+       "-r --allow-multiple-definition tmpdir/pr21703-3.o tmpdir/pr21703-4.o" "" "" \
+       {pr21703-3.s pr21703-4.s} {{readelf {-s} pr21703-r.sd}} "pr21703.o" }
+} \[is_generic\]
+
+if [is_underscore_target] {
+    set ASFLAGS "$ASFLAGS --defsym UNDERSCORE=1"
+}
+
+set saved_ASFLAGS "$ASFLAGS"
+if { [istarget "i?86-*-*"] || [istarget "x86_64-*-*"] } {
+    set ASFLAGS "$ASFLAGS -mx86-used-note=no"
 }
 
 set test_list [lsort [glob -nocomplain $srcdir/$subdir/*.d]]
@@ -169,43 +133,24 @@ foreach t $test_list {
     run_dump_test [file rootname $t]
 }
 
-# Targets using the generic linker backend don't support generating
-# an import library.
-set xfail_implib ""
-if [is_generic_elf] {
-    set xfail_implib "*-*-*"
-}
+set ASFLAGS "$saved_ASFLAGS"
 
 # Check that the --out-implib option work correctly.
-run_ld_link_tests {
-    {"Generate empty import library"
-       "--out-implib=tmpdir/implib.lib" ""
-       "--defsym NO_GLOBAL=1"
-       {implib.s}
-       {{ld empty-implib.out}}
-       "implib"}
-    {"Generate import library"
-       "--out-implib=tmpdir/implib.lib" ""
-       ""
-       {implib.s}
-       {{readelf {-s tmpdir/implib.lib} implib.rd}}
-       "implib"}
-} $xfail_implib
-
-if { [istarget *-*-linux*]
-     || [istarget *-*-nacl*]
-     || [istarget *-*-gnu*] } {
-    run_ld_link_tests {
-       {"Weak symbols in dynamic objects 1 (support)"
-           "-shared" "" "" {weak-dyn-1a.s}
-           {}
-           "libweakdyn1a.so"}
-       {"Weak symbols in dynamic objects 1 (main test)"
-           "-shared tmpdir/libweakdyn1a.so -Tweak-dyn-1.ld" "" "" {weak-dyn-1b.s}
-           {{readelf {--relocs --wide} weak-dyn-1.rd}}
-           "libweakdyn1b.so"}
-    }
-}
+# Targets that don't use elf.em won't support this.
+run_ld_link_tests [list \
+    [list "Generate empty import library" \
+       "--out-implib=tmpdir/implib.lib" "" \
+       [concat "--defsym NO_GLOBAL=1" $hpux] \
+       {implib.s} \
+       {{ld empty-implib.out}} \
+       "implib" ] \
+    [list "Generate import library" \
+       "--out-implib=tmpdir/implib.lib" "" \
+       $hpux \
+       {implib.s} \
+       {{readelf {-s tmpdir/implib.lib} implib.rd}} \
+       "implib" ] \
+] \[uses_genelf\]
 
 #v850 gas complains about .tbss.var section attributes.
 if { [check_gc_sections_available] && ![istarget "v850-*-*"] } {
@@ -218,18 +163,83 @@ if { [check_gc_sections_available] && ![istarget "v850-*-*"] } {
 if { [istarget *-*-*linux*]
      || [istarget *-*-nacl*]
      || [istarget *-*-gnu*] } {
-    run_ld_link_tests {
-       {"stack exec" "-z execstack" "" "" {stack.s}
-           {{readelf {-Wl} stack-exec.rd}} "stack-exec.exe"}
-       {"stack size" "-z stack-size=0x123400" "" "" {stack.s}
-           {{readelf {-Wl} stack-size.rd}} "stack-size.exe"}
-    }
+    run_ld_link_tests [list \
+       [list "stack exec" \
+           "-z execstack" \
+           "" \
+           "" \
+           {stack.s} \
+           {{readelf {-Wl} stack-exec.rd}} \
+           "stack-exec.exe"] \
+       [list "stack noexec" \
+           "-z noexecstack" \
+           "" \
+           "" \
+           {stack.s} \
+           {{readelf {-Wl} stack-noexec.rd}} \
+           "stack-noexec.exe"] \
+       [list "stack size" \
+           "-z stack-size=0x123400" \
+           "" \
+           "" \
+           {stack.s} \
+           {{readelf {-Wl} stack-size.rd}} \
+           "stack-size.exe"] \
+       [list "PT_GNU_PROPERTY alignment" \
+           "" \
+           "" \
+           "" \
+           {pr23900-1.s} \
+           [list [list "readelf" {-Wl} $pr23900_1_exp]] \
+           "pr23900-1.exe"] \
+       ]
+}
+
+if [check_gc_sections_available] {
+    run_ld_link_tests [list \
+       [list "__patchable_function_entries section 2" \
+           "--gc-sections -e _start" \
+           "" \
+           "" \
+           {pr25490-2.s} \
+           [list [list "readelf" {-SW} $pr25490_2_exp]] \
+           "pr25490-2.exe"] \
+       [list "__patchable_function_entries section 3" \
+           "--gc-sections -e _start" \
+           "" \
+           "" \
+           {pr25490-3.s} \
+           [list [list "readelf" {-SW} $pr25490_3_exp]] \
+           "pr25490-3.exe"] \
+       [list "__patchable_function_entries section 4" \
+           "--gc-sections -e _start" \
+           "" \
+           "" \
+           {pr25490-4.s} \
+           [list [list "readelf" {-SW} $pr25490_4_exp]] \
+           "pr25490-4.exe"] \
+       [list "__patchable_function_entries section 5" \
+           "--gc-sections -e _start" \
+           "" \
+           "" \
+           {pr25490-5.s} \
+           [list [list "readelf" {-SW} $pr25490_5_exp]] \
+           "pr25490-5.exe"] \
+       [list "__patchable_function_entries section 6" \
+           "--gc-sections -e _start" \
+           "" \
+           "" \
+           {pr25490-6.s} \
+           [list [list "readelf" {-SW} $pr25490_6_exp]] \
+           "pr25490-6.exe"] \
+       ]
 }
 
 set LDFLAGS $old_ldflags
+set ASFLAGS $old_asflags
 
 # Check to see if the C compiler works
-if { [which $CC] == 0 } {
+if { ![check_compiler_available] } {
     return
 }
 
@@ -281,15 +291,79 @@ if { [istarget *-*-linux*]
      || [istarget *-*-nacl*]
      || [istarget *-*-gnu*] } {
     run_ld_link_exec_tests $array_tests_pie $xfails
-}
 
-# <http://www.gnu.org/software/hurd/open_issues/binutils.html#static>
-# Be cautious to not XFAIL for *-*-linux-gnu*, *-*-kfreebsd-gnu*, etc.
-switch -regexp $target_triplet {
-    ^\[^-\]*-\[^-\]*-gnu.*$ {
-       set xfails "*-*-*"
+    if { $STATIC_PIE_LDFLAGS != "" } then {
+       run_ld_link_exec_tests [list \
+           [list \
+               "Static PIE preinit array" \
+               "$STATIC_PIE_LDFLAGS" \
+               "" \
+               {preinit.c} \
+               "preinit-static-pie" \
+               "preinit.out" \
+               "-fPIE" \
+           ] \
+           [list \
+               "Static PIE init array" \
+               "$STATIC_PIE_LDFLAGS" \
+               "" \
+               {init.c} \
+               "init-static-pie" \
+               "init.out" \
+               "-fPIE" \
+           ] \
+           [list \
+               "Static PIE fini array" \
+               "$STATIC_PIE_LDFLAGS" \
+               "" \
+               {fini.c} \
+               "fini-static-pie" \
+               "fini.out" \
+               "-fPIE" \
+           ] \
+           [list \
+               "Static PIE init array mixed" \
+               "$STATIC_PIE_LDFLAGS" \
+               "" \
+               {init-mixed.c} \
+               "init-mixed-static-pie" \
+               "init-mixed.out" \
+               "-I.  -fPIE" \
+           ] \
+           [list \
+               "Static PIE PR ld/14525" \
+               "$STATIC_PIE_LDFLAGS" \
+               "" \
+               {pr14525.c} \
+               "pr14525-static-pie" \
+               "pr14525.out" \
+               "-fPIE" \
+           ] \
+       ]
     }
+
+    run_ld_link_exec_tests [list \
+       [list \
+           "Run mbind2a" \
+           "$NOPIE_LDFLAGS -Wl,-z,common-page-size=0x4000" \
+           "" \
+           { mbind2a.s mbind2b.c } \
+           "mbind2a" \
+           "pass.out" \
+           "-O2 -I../bfd" \
+       ] \
+       [list \
+           "Run mbind2b" \
+           "-static -Wl,-z,common-page-size=0x4000" \
+           "" \
+           { mbind2a.s mbind2b.c } \
+           "mbind2b" \
+           "pass.out" \
+           "-O2 -I../bfd" \
+       ] \
+    ]
 }
+
 run_ld_link_exec_tests $array_tests_static $xfails
 
 catch "exec rm -f tmpdir/preinit tmpdir/init tmpdir/fini tmpdir/init-mixed" status
This page took 0.028665 seconds and 4 git commands to generate.