Commit | Line | Data |
---|---|---|
252b5132 RH |
1 | # Test PHDRS in a linker script. |
2 | # By Ian Lance Taylor, Cygnus Support. | |
a2b64bed NC |
3 | # Copyright 2001 |
4 | # Free Software Foundation, Inc. | |
5 | # | |
6 | # This file is free software; you can redistribute it and/or modify | |
7 | # it under the terms of the GNU General Public License as published by | |
8 | # the Free Software Foundation; either version 2 of the License, or | |
9 | # (at your option) any later version. | |
7f9adacd | 10 | # |
a2b64bed NC |
11 | # This program is distributed in the hope that it will be useful, |
12 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 | # GNU General Public License for more details. | |
7f9adacd | 15 | # |
a2b64bed NC |
16 | # You should have received a copy of the GNU General Public License |
17 | # along with this program; if not, write to the Free Software | |
18 | # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | |
252b5132 RH |
19 | |
20 | # PHDRS is only meaningful for ELF. | |
21 | if { ![istarget *-*-sysv4*] \ | |
22 | && ![istarget *-*-unixware*] \ | |
23 | && ![istarget *-*-elf*] \ | |
24 | && ![istarget *-*-eabi*] \ | |
25 | && ![istarget *-*-linux*] \ | |
26 | && ![istarget *-*-irix5*] \ | |
27 | && ![istarget *-*-irix6*] \ | |
28 | && ![istarget *-*-solaris2*] } { | |
29 | return | |
30 | } | |
31 | ||
99c262f8 ILT |
32 | if { [istarget *-*-linux*aout*] \ |
33 | || [istarget *-*-linux*oldld*] } { | |
252b5132 RH |
34 | return |
35 | } | |
36 | ||
37 | # This is a very simplistic test. | |
38 | ||
39 | set testname "PHDRS" | |
40 | ||
41 | if ![ld_assemble $as $srcdir/$subdir/phdrs.s tmpdir/phdrs.o] { | |
42 | unresolved $testname | |
43 | return | |
44 | } | |
45 | ||
46 | set phdrs_regexp \ | |
7f9adacd | 47 | ".*Program Header:.*PHDR *off *0x00*34 *vaddr *0x00*800034 *paddr *0x00*800034.*filesz *0x0\[0-9a-f\]* *memsz *0x0\[0-9a-f\]* flags r--.*LOAD *off *0x00* *vaddr *0x00*800000 *paddr *0x00*800000.*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-.*" |
252b5132 RH |
48 | |
49 | # On a 64 bit ELF format, we need different numbers. | |
dc149a6d | 50 | if { [istarget alpha*-*-*] || [istarget "ia64*-*-*"] |
7f9adacd | 51 | || [istarget "hppa*64*-*-*"] || [istarget "x86_64*-*-*"] |
ad9f78d1 AM |
52 | || [istarget "s390x*-*-*"] || [istarget "sparc64*-*-*"] |
53 | || [istarget "powerpc64*-*-*"] || [istarget "*-*-*elf64*"] } then { | |
252b5132 | 54 | set phdrs_regexp \ |
7f9adacd | 55 | ".*Program Header:.*PHDR *off *0x00*40 *vaddr *0x00*800040 *paddr *0x00*800040.*filesz *0x0\[0-9a-f\]* *memsz *0x0\[0-9a-f\]* flags r--.*LOAD *off *0x00* *vaddr *0x00*800000 *paddr *0x00*800000.*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-.*" |
252b5132 RH |
56 | } |
57 | ||
58 | if ![ld_simple_link $ld tmpdir/phdrs "-T $srcdir/$subdir/phdrs.t tmpdir/phdrs.o"] { | |
59 | fail $testname | |
60 | } else { | |
61 | if {[which $objdump] == 0} { | |
62 | unresolved $testname | |
63 | return | |
64 | } | |
65 | ||
66 | verbose -log "$objdump --private tmpdir/phdrs" | |
67 | catch "exec $objdump --private tmpdir/phdrs" exec_output | |
68 | set exec_output [prune_warnings $exec_output] | |
69 | verbose -log $exec_output | |
70 | ||
71 | if [regexp $phdrs_regexp $exec_output] { | |
72 | pass $testname | |
73 | } else { | |
74 | fail $testname | |
75 | } | |
76 | } |