+1999-01-03 Ken Raeburn <raeburn@cygnus.com>
+
+ * config/default.exp (get_link_files, get_target_emul): New procs;
+ run shell commands to extract information from configure.host and
+ configure.tgt in the source tree.
+ (top level): Use them to get information needed to run tests, if
+ not otherwise provided.
+
+ * ld-shared/elf-offset.ld: New file. Builds a shared library, but
+ gives non-zero addresses for memory region.
+ * ld-shared/shared.exp: Run the non-PIC non-AIX test again using
+ the new linker script.
+
+Tue Dec 8 22:56:05 1998 Geoff Keating <geoffk@ozemail.com.au>
+
+ * ld-srec/srec.exp: Delete xfails for PPC Linux targets,
+ newer glibc lets link succeed.
+
Sun Dec 6 12:59:37 1998 H.J. Lu <hjl@gnu.org>
* ld-elfvers/vers1.c: Add missing return types and values.
# Basic expect script for LD Regression Tests
-# Copyright (C) 1993,1994 Free Software Foundation
+# Copyright (C) 1993, 1994, 1995, 1997 Free Software Foundation
#
# This file is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
-# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#
# Written by Jeffrey Wheat (cassidy@cygnus.com)
#
if ![info exists ld] then {
- set ld [findfile $objdir/ld.new $objdir/ld.new [transform ld]]
+ set ld [findfile $base_dir/ld-new $base_dir/ld-new [transform ld]]
}
if ![info exists as] then {
- set as [findfile $base_dir/../gas/as.new $base_dir/../gas/as.new [transform as]]
+ set as [findfile $base_dir/../gas/as-new $base_dir/../gas/as-new [transform as]]
}
if ![info exists nm] then {
- set nm [findfile $base_dir/../binutils/nm.new $base_dir/../binutils/nm.new [transform nm]]
+ set nm [findfile $base_dir/../binutils/nm-new $base_dir/../binutils/nm-new [transform nm]]
}
if ![info exists objdump] then {
set objdump [findfile $base_dir/../binutils/objdump]
}
-if ![file isdirectory tmpdir] {catch "exec mkdir tmpdir" status}
+if ![info exists objcopy] then {
+ set objcopy [findfile $base_dir/../binutils/objcopy]
+}
+
+if ![info exists ar] then {
+ set ar [findfile $base_dir/../binutils/ar]
+}
+
+if ![info exists strip] then {
+ set strip [findfile $base_dir/../binutils/strip-new $base_dir/../binutils/strip-new [transform strip]]
+}
+
+if {![file isdirectory tmpdir]} then {
+ catch "exec mkdir tmpdir" status
+}
+
+# Make a symlink from tmpdir/as to the assembler in the build tree, so
+# that we can use a -B option to gcc to force it to use the newly
+# built assembler.
+if {![file isdirectory tmpdir/gas]} then {
+ catch "exec mkdir tmpdir/gas" status
+ catch "exec ln -s ../../../gas/as-new tmpdir/gas/as" status
+}
+set gcc_gas_flag "-B[pwd]/tmpdir/gas/"
# load the utility procedures
-load_lib ld.exp
+load_lib ld-lib.exp
+
+proc get_link_files {varname} {
+ global $varname
+ global target_triplet
+ global srcdir
+ global CC
+ if ![info exists $varname] {
+ set status [catch "exec sh -c \"host=$target_triplet && CC=$CC && . $srcdir/../configure.host && eval echo \\$$varname\"" result]
+ if $status { error "Error getting native link files: $result" }
+ set $varname $result
+ }
+}
+
+proc get_target_emul {} {
+ global target_triplet
+ global srcdir
+ set status [catch "exec sh -c \"targ=$target_triplet && . $srcdir/../configure.tgt && echo \\\$targ_emul\"" result]
+ if $status { error "Error getting emulation name: $result" }
+ return $result
+}
+
+if [isnative] {
+ foreach x {HOSTING_CRT0 HOSTING_LIBS} {
+ get_link_files $x
+ }
+} else {
+ foreach x {HOSTING_CRT0 HOSTING_LIBS} { set $x "" }
+}
+if ![info exists HOSTING_EMU] { set HOSTING_EMU "-m [get_target_emul]" }
#
# ld_version -- extract and print the version number of ld compiler (GCC)
--- /dev/null
+PHDRS {
+ code PT_LOAD FLAGS(5);
+ data PT_LOAD FLAGS(6);
+ dynamic PT_DYNAMIC FLAGS(6);
+}
+
+MEMORY {
+ RAM : ORIGIN = 0x10000, LENGTH = 0x7fffff
+}
+
+SECTIONS {
+ .text : { *(.text) *(.stub) *(.gnu.warning) *(.gnu.linkonce.t*) } > RAM :code
+ .plt : { *(.plt) } > RAM :code
+ .rodata : { *(.rodata) } > RAM :code
+ .rdata : { *(.rdata) } > RAM :code
+ .data ALIGN(0x1000) : { *(.data) *(.gnu.linkonce.d*) } > RAM :data
+ .got : { *(.got) *(.got.plt) } > RAM :data
+ .bss : { *(.bss) *(.dynbss) *(COMMON) } > RAM :data
+ .dynamic : { *(.dynamic ) } > RAM :dynamic :data
+ .dynsym : { *(.dynsym) } > RAM :dynamic :data
+ .dynstr : { *(.dynstr) } > RAM :dynamic :data
+ .rela.text : { *(.rela.text) } > RAM :dynamic :data
+ .rela.plt : { *(.rela.plt) } > RAM :dynamic :data
+ .rela.data : { *(.rela.data) } > RAM :dynamic :data
+ .rel.text : { *(.rel.text) } > RAM :dynamic :data
+ .rel.plt : { *(.rel.plt) } > RAM :dynamic :data
+ .rel.data : { *(.rel.data) } > RAM :dynamic :data
+ .hash : { *(.hash) } > RAM :dynamic :data
+ .interp : { *(.interp) } > RAM :dynamic :data
+ .gnu.version_r : { *(.gnu.version_r) } > RAM :dynamic :data
+ .gnu.version_d : { *(.gnu.version_d) }> RAM :dynamic :data
+ .gnu.version : { *(.gnu.version) } > RAM :dynamic :data
+}
# Expect script for ld-shared tests
-# Copyright (C) 1994, 1995, 1996, 1997 Free Software Foundation
+# Copyright (C) 1994, 1995, 1996, 1997, 1998 Free Software Foundation
#
# This file is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
&& ![istarget i586-*-linux*] \
&& ![istarget m68k-*-linux*] \
&& ![istarget mips*-*-irix5*] \
+ && ![istarget powerpc-*-elf*] \
+ && ![istarget powerpc-*-linux*] \
+ && ![istarget powerpc-*-sysv4*] \
&& ![istarget sparc*-*-elf] \
&& ![istarget sparc*-*-solaris2*] \
&& ![istarget sparc*-*-sunos4*] \
}
# The test procedure.
-proc shared_test { progname testname main sh1 sh2 dat } {
+proc shared_test { progname testname main sh1 sh2 dat args } {
global ld
global srcdir
global subdir
global host_triplet
global tmpdir
+ if [llength $args] { set shldflags [lindex $args 0] } else { set shldflags "" }
+
# Build the shared library.
# On AIX, we need to use an export file.
set shared -shared
if { [istarget rs6000*-*-aix*] || [istarget powerpc*-*-aix*] } {
set shared "-bM:SRE -bE:$tmpdir/xcoff.exp"
}
- if {![ld_simple_link $ld $tmpdir/$progname.so "$shared $tmpdir/$sh1 $tmpdir/$sh2"]} {
+ if {![ld_simple_link $ld $tmpdir/$progname.so "$shared $shldflags $tmpdir/$sh1 $tmpdir/$sh2"]} {
fail "$testname"
return
}
# SunOS non PIC shared libraries don't permit some cases of
# overriding.
setup_xfail "*-*-sunos4*"
- # On Linux/m68k this fails because non-pic references to symbols
- # in the same section may be resolved by the assembler if they
- # are pc-relative.
- setup_xfail "m68k-*-linux*"
shared_test shnp "shared (non PIC)" mainnp.o sh1np.o sh2np.o shared
+
+ # Test ELF shared library relocations with a non-zero load
+ # address for the library. Near as I can tell, the R_*_RELATIVE
+ # relocations for various targets are broken in the case where
+ # the load address is not zero (which is the default).
+ setup_xfail "*-*-sunos4*"
+ shared_test shnp "shared (non PIC, load offset)" \
+ mainnp.o sh1np.o sh2np.o shared "$srcdir/$subdir/elf-offset.ld"
} }
# Now compile the code using -fpic.
# SunOS non PIC shared libraries don't permit some cases of
# overriding.
setup_xfail "*-*-sunos4*"
- # On Linux/m68k this fails because non-pic references to symbols
- # in the same section may be resolved by the assembler if they
- # are pc-relative.
- setup_xfail "m68k-*-linux*"
shared_test shmpnp "shared (PIC main, non PIC so)" mainp.o sh1np.o sh2np.o shared
}
} else {
projects / binutils-gdb.git / commitdiff