diff options
| author | Ian Lance Taylor <ian@airs.com> | 1996-08-07 22:20:39 +0000 |
|---|---|---|
| committer | Ian Lance Taylor <ian@airs.com> | 1996-08-07 22:20:39 +0000 |
| commit | 9c3f0306acbfaa3bc8e11f3a81845a44493898f3 (patch) | |
| tree | c42bb9d5c36a86e7036bef2372493806c5330020 /ld/testsuite | |
| parent | d10df990c7ee8b947bffda8f7e73a5a1da490e55 (diff) | |
| download | gdb-9c3f0306acbfaa3bc8e11f3a81845a44493898f3.zip gdb-9c3f0306acbfaa3bc8e11f3a81845a44493898f3.tar.gz gdb-9c3f0306acbfaa3bc8e11f3a81845a44493898f3.tar.bz2 | |
* ld-scripts/phdrs.exp: New test.
* ld-scripts/phdrs.s, ld-scripts/phdrs.t: New files.
Diffstat (limited to 'ld/testsuite')
| -rw-r--r-- | ld/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | ld/testsuite/ld-scripts/.Sanitize | 3 | ||||
| -rw-r--r-- | ld/testsuite/ld-scripts/phdrs.exp | 50 | ||||
| -rw-r--r-- | ld/testsuite/ld-scripts/phdrs.s | 8 |
4 files changed, 66 insertions, 0 deletions
diff --git a/ld/testsuite/ChangeLog b/ld/testsuite/ChangeLog index be64bc3..42a5443 100644 --- a/ld/testsuite/ChangeLog +++ b/ld/testsuite/ChangeLog @@ -1,3 +1,8 @@ +Wed Aug 7 18:00:58 1996 Ian Lance Taylor <ian@cygnus.com> + + * ld-scripts/phdrs.exp: New test. + * ld-scripts/phdrs.s, ld-scripts/phdrs.t: New files. + Sun Aug 4 21:58:12 1996 Ian Lance Taylor <ian@cygnus.com> * ld-scripts/crossref.exp: On a29k targets, use --defsym to define diff --git a/ld/testsuite/ld-scripts/.Sanitize b/ld/testsuite/ld-scripts/.Sanitize index 2305cf8..a420092 100644 --- a/ld/testsuite/ld-scripts/.Sanitize +++ b/ld/testsuite/ld-scripts/.Sanitize @@ -32,6 +32,9 @@ crossref.exp defined.exp defined.s defined.t +phdrs.exp +phdrs.s +phdrs.t script.exp script.s script.t diff --git a/ld/testsuite/ld-scripts/phdrs.exp b/ld/testsuite/ld-scripts/phdrs.exp new file mode 100644 index 0000000..3271252 --- /dev/null +++ b/ld/testsuite/ld-scripts/phdrs.exp @@ -0,0 +1,50 @@ +# Test PHDRS in a linker script. +# By Ian Lance Taylor, Cygnus Support. + +# PHDRS is only meaningful for ELF. +if { ![istarget *-*-sysv4*] \ + && ![istarget *-*-unixware*] \ + && ![istarget *-*-elf*] \ + && ![istarget *-*-linux*] \ + && ![istarget *-*-irix5*] \ + && ![istarget *-*-irix6*] \ + && ![istarget *-*-solaris2*] } { + return +} + +if { [istarget *-*-linuxaout*] \ + || [istarget *-*-linuxoldld*] } { + return +} + +# This is a very simplistic test. + +set testname "PHDRS" + +if ![ld_assemble $as $srcdir/$subdir/phdrs.s tmpdir/phdrs.o] { + unresolved $testname + return +} + +set phdrs_regexp \ +".*Program Header:.*PHDR *off *0x00*34 *vaddr *0x00*80034 *paddr *0x00*80034.*filesz *0x0\[0-9a-f\]* *memsz *0x0\[0-9a-f\]* flags r--.*LOAD *off *0x00* *vaddr *0x00*80000 *paddr *0x00*80000.*filesz *0x00*\[0-9a-f\]* *memsz *0x0\[0-9a-f\]* *flags r-x.*LOAD *off *0x0\[0-9a-f\]* *vaddr *0x00*80*\[0-9a-f\]* *paddr *0x00*80*\[0-9a-f\]*.*filesz *0x0\[0-9a-f\]* *memsz *0x0\[0-9a-f\]* *flags *rw-.*" + +if ![ld_simple_link $ld tmpdir/phdrs "-T $srcdir/$subdir/phdrs.t tmpdir/phdrs.o"] { + fail $testname +} else { + if {[which $objdump] == 0} { + unresolved $testname + return + } + + verbose -log "$objdump --private tmpdir/phdrs" + catch "exec $objdump --private tmpdir/phdrs" exec_output + set exec_output [prune_system_crud $host_triplet $exec_output] + verbose -log $exec_output + + if [regexp $phdrs_regexp $exec_output] { + pass $testname + } else { + fail $testname + } +} diff --git a/ld/testsuite/ld-scripts/phdrs.s b/ld/testsuite/ld-scripts/phdrs.s new file mode 100644 index 0000000..ec1f0d1 --- /dev/null +++ b/ld/testsuite/ld-scripts/phdrs.s @@ -0,0 +1,8 @@ + .text + + .long 1 + + .data + + .long 2 + |