ld relro
[platform/upstream/binutils.git] / ld / testsuite / ld-bootstrap / bootstrap.exp
index d84897d..ccb07d5 100644 (file)
@@ -1,6 +1,5 @@
 # Expect script for LD Bootstrap Tests
-#   Copyright 1993, 1994, 1995, 1996, 1997, 1998, 2000, 2001, 2002, 2004,
-#   2006, 2007  Free Software Foundation, Inc.
+#   Copyright (C) 1993-2014 Free Software Foundation, Inc.
 #
 # This file is part of the GNU Binutils.
 #
@@ -30,13 +29,32 @@ if ![isnative] {
     return
 }
 
+# Determine if plugin support is present.
+remote_exec host "$nm --help" "" "/dev/null" "plugin-support"
+set tmp [file_contents "plugin-support"]
+regexp ".*\(--plugin\).*\n" $tmp foo plugins
+if [info exists plugins] then {
+    set plugins "yes"
+} else {
+    set plugins "no"
+}
+
+# LD can have plugin support even if BFD does not.
+if [check_plugin_api_available] {
+    set plugins "yes"
+}
+
 # Bootstrap ld.  First link the object files together using -r, in
 # order to test -r.  Then link the result into an executable, ld1, to
 # really test -r.  Use ld1 to link a fresh ld, ld2.  Use ld2 to link a
 # new ld, ld3.  ld2 and ld3 should be identical.
+set test_flags {"" "strip" "--static" "--traditional-format"
+               "--no-keep-memory" "--relax"}
+if { [istarget "powerpc-*-*"] } {
+    lappend test_flags "--ppc476-workaround"
+}
 
-foreach flags {"" "strip" "--static" "--traditional-format"
-              "--no-keep-memory" "--relax"} {
+foreach flags $test_flags {
     set do_strip "no"
     if {"$flags" == "strip"} { 
        set testname "bootstrap with $flags"
@@ -54,9 +72,25 @@ foreach flags {"" "strip" "--static" "--traditional-format"
        set partial_flags ""
     }
 
+    if { $partial_flags == "--ppc476-workaround" } {
+       append partial_flags " -T $srcdir/$subdir/ppc476.t"
+    }
+
     # This test can only be run if we have the ld build directory,
     # since we need the object files.
-    if {$ld != "$objdir/ld-new"} {
+    set ldexe $ld
+    set ldparm [string first " " $ld]
+    if { $ldparm > 0 } then {
+       set ldexe [string range $ld 0 $ldparm]
+    }
+    if {$ldexe != "$objdir/ld-new"} {
+       untested $testname
+       continue
+    }
+
+    # Plugin support requires linking with a dynamic library which
+    # means that these tests will fail.
+    if { $flags == "--static" && $plugins == "yes" } then {
        untested $testname
        continue
     }
@@ -91,6 +125,13 @@ foreach flags {"" "strip" "--static" "--traditional-format"
        }
     }
 
+    # Plugin support requires linking with libdl.
+    if { $plugins == "yes" } {
+       if { ![istarget "*-*-freebsd*"]} {
+           set extralibs "$extralibs -ldl"
+       }
+    }
+
     # On Irix 5, linking with --static only works if all the files are
     # compiled using -non_shared.
     if {"$flags" == "--static"} {
@@ -128,7 +169,7 @@ foreach flags {"" "strip" "--static" "--traditional-format"
            # On ia64, tmpdir/ld2 != tmpdir/ld3 is normal since they are
            # generated by different linkers, tmpdir/ld1 and tmpdir/ld2.
            # So we rebuild tmpdir/ld2 with tmpdir/ld3.
-           if ![ld_link tmpdir/ld3 tmpdir/ld2 "$flags $OFILES $BFDLIB $LIBIBERTY"] {
+           if ![ld_link tmpdir/ld3 tmpdir/ld2 "$flags $OFILES $BFDLIB $LIBIBERTY $extralibs"] {
                fail $testname
                continue
            }
@@ -138,15 +179,13 @@ foreach flags {"" "strip" "--static" "--traditional-format"
            # On Linux/mips, tmpdir/ld2 != tmpdir/ld3 is normal since
            # they are generated by different linkers, tmpdir/ld1 and
            # tmpdir/ld2. So we rebuild tmpdir/ld2 with tmpdir/ld3.
-           if ![ld_link tmpdir/ld3 tmpdir/ld2 "$flags $OFILES $BFDLIB $LIBIBERTY"] {
+           if ![ld_link tmpdir/ld3 tmpdir/ld2 "$flags $OFILES $BFDLIB $LIBIBERTY $extralibs"] {
                fail $testname
                continue
            }
        }
     }
 
-    send_log "compare (tail of) tmpdir/ld2 tmpdir/ld3\n"
-    verbose  "compare (tail of) tmpdir/ld2 tmpdir/ld3"
     if {[istarget "*-*-pe"]
        || [istarget "*-*-wince"]
        || [istarget "*-*-cygwin*"]
@@ -155,19 +194,19 @@ foreach flags {"" "strip" "--static" "--traditional-format"
        || [istarget "*-*-interix*"]
        || [istarget "*-*-beospe*"]
        || [istarget "*-*-netbsdpe*"]} {
-        # Trim off the date present in PE binaries by only looking
-        #   at the ends of the files
-        # Although this works, a way to set the date would be better.
-        # Removing or zeroing the date stamp in the binary produced by
-        # the linker is not possible as it is required by the target OS.
-        exec tail +140 tmpdir/ld2 >tmpdir/ld2tail
-        exec tail +140 tmpdir/ld3 >tmpdir/ld3tail
-        catch "exec cmp tmpdir/ld2tail tmpdir/ld3tail" exec_output
-        exec rm tmpdir/ld2tail tmpdir/ld3tail
+       # Trim off the date present in PE binaries by only looking
+       #   at the ends of the files
+       # Although this works, a way to set the date would be better.
+       # Removing or zeroing the date stamp in the binary produced by
+       # the linker is not possible as it is required by the target OS.
+       set do_compare [string map {16 220 f1 tmpdir/ld2 f2 tmpdir/ld3 tmp-foo1 tmpdir/ld2tail tmp-foo2 tmpdir/ld3tail} $DO_COMPARE]
+       send_log "$do_compare\n"
+       verbose  "$do_compare"
+       catch "exec sh -c [list $do_compare]" exec_output
     } else {
-        send_log "cmp tmpdir/ld2 tmpdir/ld3\n"
-        verbose  "cmp tmpdir/ld2 tmpdir/ld3"
-        catch "exec cmp tmpdir/ld2 tmpdir/ld3" exec_output
+       send_log "cmp tmpdir/ld2 tmpdir/ld3\n"
+       verbose  "cmp tmpdir/ld2 tmpdir/ld3"
+       catch "exec cmp tmpdir/ld2 tmpdir/ld3" exec_output
     }
     set exec_output [prune_warnings $exec_output]
 
@@ -182,4 +221,4 @@ foreach flags {"" "strip" "--static" "--traditional-format"
 }
 
 catch "exec rm -f tmpdir/ld-partial.o tmpdir/ld1 tmpdir/ld2 tmpdir/ld3" status
-catch "exec rm -f tmpdir/ld1tail tmpdir/ld2tail tmpdir/ld3tail" status
+catch "exec rm -f tmpdir/ld2tail tmpdir/ld3tail" status