Commit | Line | Data |
---|---|---|
782c0ebf | 1 | # Expect script for various ELF tests. |
6f2750fe | 2 | # Copyright (C) 2002-2016 Free Software Foundation, Inc. |
b7b0b729 | 3 | # |
f96b4a7b NC |
4 | # This file is part of the GNU Binutils. |
5 | # | |
6 | # This program is free software; you can redistribute it and/or modify | |
b7b0b729 | 7 | # it under the terms of the GNU General Public License as published by |
f96b4a7b | 8 | # the Free Software Foundation; either version 3 of the License, or |
b7b0b729 HPN |
9 | # (at your option) any later version. |
10 | # | |
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. | |
15 | # | |
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 | |
f96b4a7b NC |
18 | # Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, |
19 | # MA 02110-1301, USA. | |
b7b0b729 | 20 | # |
b7b0b729 HPN |
21 | |
22 | # Exclude non-ELF targets. | |
23 | ||
43f9d75b | 24 | if ![is_elf_format] { |
b7b0b729 HPN |
25 | return |
26 | } | |
27 | ||
e4970690 | 28 | set old_ldflags $LDFLAGS |
9f264ea9 AM |
29 | if { [istarget spu*-*-*] } { |
30 | set LDFLAGS "$LDFLAGS --local-store 0:0" | |
31 | } | |
991cda6c RH |
32 | if { [istarget alpha*-*-* ] } { |
33 | # The compress1 test is written expecting 32-bit addresses; force the | |
34 | # executable down into the low address space to match. | |
35 | # ??? How can we adjust just the one testcase? | |
36 | set LDFLAGS "$LDFLAGS -Ttext-segment 0x1000000" | |
37 | } | |
9f264ea9 | 38 | |
7cf492ee RM |
39 | if { [istarget "*-*-nacl*"] } { |
40 | # The eh[1-4] cases are written to expect ELFCLASS64 layout on x86-64. | |
41 | # But the target default is ELFCLASS32. So the cases explicitly use | |
42 | # -melf_x86_64 to select that, but NaCl needs a different emulation name. | |
43 | set options_regsub(ld) {-melf_x86_64 -melf_x86_64_nacl} | |
44 | } | |
45 | ||
5cc51864 L |
46 | if { [istarget "*-*-solaris*"] } { |
47 | # Same for Solaris | |
48 | set options_regsub(ld) {-melf_x86_64 -melf_x86_64_sol2} | |
49 | } | |
50 | ||
7f6a71ff JM |
51 | if { [is_remote host] } then { |
52 | remote_download host merge.ld | |
53 | } | |
54 | ||
5daeae9b AM |
55 | if { ![istarget hppa64*-hpux*] } { |
56 | run_ld_link_tests { | |
57 | {"Build symbol3.a" | |
897aea50 | 58 | "" "" "" |
5daeae9b AM |
59 | {symbol3.s} {} "symbol3.a"} |
60 | {"Build symbol3w.a" | |
897aea50 | 61 | "" "" "" |
5daeae9b AM |
62 | {symbol3w.s} {} "symbol3w.a"} |
63 | } | |
e54e67a9 AM |
64 | |
65 | if { [check_shared_lib_support] } then { | |
66 | run_ld_link_tests { | |
897aea50 | 67 | {"Build pr14170a.o" "" "" "" "pr14170a.s" {} "pr14170.a" } |
e54e67a9 AM |
68 | } |
69 | setup_xfail "tic6x-*-*" | |
70 | run_ld_link_tests { | |
71 | {"Build shared library for pr14170" | |
897aea50 | 72 | "-shared" "" "" "pr14170b.s" {} "pr14170.so" } |
1b857aee NC |
73 | } |
74 | # bfin does not currently support copy relocs. | |
75 | setup_xfail "bfin-*-*" | |
76 | run_ld_link_tests { | |
e54e67a9 | 77 | {"PR ld/14170" |
1a9ccd70 | 78 | "--no-dynamic-linker tmpdir/pr14170a.o tmpdir/pr14170.so" "" "" "pr14170c.s" |
e54e67a9 AM |
79 | { } "pr14170" } |
80 | } | |
81 | } | |
83c5d36f L |
82 | } |
83 | ||
a496fbc8 | 84 | # Only run these tests on targets that support creating shared libraries. |
1d5316ab | 85 | if { [check_shared_lib_support] } then { |
d215621e AM |
86 | # Run a test to check linking a shared library with a broken linker |
87 | # script that accidentally marks dynamic sections as notes. The | |
88 | # resulting executable is not expected to work, but the linker | |
89 | # should not seg-fault whilst creating the binary. | |
e54e67a9 AM |
90 | setup_xfail "tic6x-*-*" |
91 | run_ld_link_tests { | |
92 | {"Build shared library for next test" | |
897aea50 | 93 | "-shared" "" "" "note-3.s" {} "note-3.so" } |
e54e67a9 | 94 | {"Link using broken linker script" |
897aea50 | 95 | "--script note-3.t tmpdir/note-3.so" "" "" "" |
e54e67a9 AM |
96 | { { ld "note-3.l" } } |
97 | "a.out" } | |
98 | } | |
d215621e AM |
99 | setup_xfail "tic6x-*-*" |
100 | run_ld_link_tests { | |
101 | {"Build pr17068.so" | |
102 | "-shared" "" "" | |
103 | {pr17068d.s} {} "pr17068.so"} | |
104 | {"Build pr17068a.a" | |
105 | "" "" "" | |
106 | {pr17068a.s pr17068c.s pr17068ez.s} {} "pr17068a.a"} | |
107 | {"Build pr17068b.a" | |
108 | "" "" "" | |
109 | {pr17068b.s pr17068e.s} {} "pr17068b.a"} | |
1b857aee NC |
110 | } |
111 | # bfin does not currently support copy relocs. | |
112 | setup_xfail "bfin-*-*" | |
113 | run_ld_link_tests { | |
d215621e | 114 | {"pr17068 link --as-needed lib in group" |
1a9ccd70 | 115 | "--as-needed --no-dynamic-linker" "--start-group tmpdir/pr17068a.a tmpdir/pr17068.so tmpdir/pr17068b.a --end-group" "" |
d215621e AM |
116 | {start.s pr17068.s} {} "pr17068"} |
117 | } | |
a496fbc8 AM |
118 | # xfail on tic6x due to non-PIC/non-PID warnings |
119 | setup_xfail "tic6x-*-*" | |
84054199 NC |
120 | # Fails on MIPS because ABI trickery means that a NULL reloc is also emitted. |
121 | setup_xfail "mips*-*-*" | |
1b857aee NC |
122 | # Fails on bfin because relocations are not created. |
123 | setup_xfail "bfin-*-*" | |
a496fbc8 AM |
124 | run_ld_link_tests { |
125 | {"-Bsymbolic-functions" | |
126 | "-shared -Bsymbolic-functions" "" "" | |
127 | {symbolic-func.s} {{readelf {-r --wide} symbolic-func.r}} | |
128 | "symbolic-func.so"} | |
129 | } | |
5474d94f AM |
130 | # xfail on tic6x due to non-PIC/non-PID warnings |
131 | setup_xfail "tic6x-*-*" | |
132 | run_ld_link_tests { | |
133 | {"Build pr20995.so" | |
134 | "-shared" "" "" | |
135 | {pr20995b.s} {} "pr20995.so"} | |
136 | } | |
137 | # These targets don't copy dynamic variables into .bss. | |
138 | setup_xfail "alpha-*-*" "bfin-*-*" "ia64-*-*" "xtensa-*-*" | |
139 | run_ld_link_tests { | |
140 | {"pr20995" | |
141 | "" "tmpdir/pr20995.so" "" | |
142 | {pr20995a.s} {{readelf {-S --wide} pr20995.r}} "pr20995"} | |
143 | } | |
894891db NC |
144 | } |
145 | ||
782c0ebf AM |
146 | set test_list [lsort [glob -nocomplain $srcdir/$subdir/*.d]] |
147 | foreach t $test_list { | |
148 | # We need to strip the ".d", but can leave the dirname. | |
149 | verbose [file rootname $t] | |
150 | run_dump_test [file rootname $t] | |
151 | } | |
24edc24d | 152 | |
5df1bc57 AM |
153 | # Targets using the generic linker backend don't support generating |
154 | # an import library. | |
155 | set xfail_implib "" | |
b62b1f71 | 156 | if [is_generic_elf] { |
5df1bc57 AM |
157 | set xfail_implib "*-*-*" |
158 | } | |
159 | ||
76359541 TP |
160 | # Check that the --out-implib option work correctly. |
161 | run_ld_link_tests { | |
162 | {"Generate empty import library" | |
5df1bc57 AM |
163 | "--out-implib=tmpdir/implib.lib" "" |
164 | "--defsym NO_GLOBAL=1" | |
165 | {implib.s} | |
166 | {{ld empty-implib.out}} | |
167 | "implib"} | |
76359541 | 168 | {"Generate import library" |
5df1bc57 AM |
169 | "--out-implib=tmpdir/implib.lib" "" |
170 | "" | |
171 | {implib.s} | |
172 | {{readelf {-s tmpdir/implib.lib} implib.rd}} | |
173 | "implib"} | |
174 | } $xfail_implib | |
76359541 | 175 | |
5940a93c | 176 | if { [istarget *-*-linux*] |
5a68afcf | 177 | || [istarget *-*-nacl*] |
5940a93c | 178 | || [istarget *-*-gnu*] } { |
a26587ba RS |
179 | run_ld_link_tests { |
180 | {"Weak symbols in dynamic objects 1 (support)" | |
897aea50 | 181 | "-shared" "" "" {weak-dyn-1a.s} |
a26587ba RS |
182 | {} |
183 | "libweakdyn1a.so"} | |
184 | {"Weak symbols in dynamic objects 1 (main test)" | |
897aea50 | 185 | "-shared tmpdir/libweakdyn1a.so -Tweak-dyn-1.ld" "" "" {weak-dyn-1b.s} |
a26587ba RS |
186 | {{readelf {--relocs --wide} weak-dyn-1.rd}} |
187 | "libweakdyn1b.so"} | |
188 | } | |
189 | } | |
190 | ||
78336cd6 AM |
191 | #v850 gas complains about .tbss.var section attributes. |
192 | if { [check_gc_sections_available] && ![istarget "v850-*-*"] } { | |
430a16a5 NC |
193 | run_ld_link_tests { |
194 | {"--gc-sections on tls variable" | |
897aea50 | 195 | "--gc-section" "" "" {tls_gc.s} {} "tls_gc"} |
430a16a5 NC |
196 | } |
197 | } | |
198 | ||
6b00ac5a | 199 | if { [istarget *-*-*linux*] |
b3adb10f | 200 | || [istarget *-*-nacl*] |
9cc420b6 | 201 | || [istarget *-*-gnu*] } { |
04c3a755 | 202 | run_ld_link_tests { |
897aea50 | 203 | {"stack exec" "-z execstack" "" "" {stack.s} |
04c3a755 | 204 | {{readelf {-Wl} stack-exec.rd}} "stack-exec.exe"} |
897aea50 | 205 | {"stack size" "-z stack-size=0x123400" "" "" {stack.s} |
04c3a755 NS |
206 | {{readelf {-Wl} stack-size.rd}} "stack-size.exe"} |
207 | } | |
208 | } | |
209 | ||
e4970690 AM |
210 | set LDFLAGS $old_ldflags |
211 | ||
24edc24d L |
212 | # The following tests require running the executable generated by ld. |
213 | if ![isnative] { | |
214 | return | |
215 | } | |
216 | ||
a130722b L |
217 | if [check_gc_sections_available] { |
218 | run_cc_link_tests { | |
219 | {"PR ld/13195" "-Wl,--gc-sections" "" | |
220 | {pr13195.c} {} "pr13195"} | |
221 | } | |
54e8959c L |
222 | } |
223 | ||
24edc24d L |
224 | set array_tests { |
225 | {"preinit array" "" "" {preinit.c} "preinit" "preinit.out"} | |
24edc24d | 226 | {"init array" "" "" {init.c} "init" "init.out"} |
24edc24d | 227 | {"fini array" "" "" {fini.c} "fini" "fini.out"} |
02ecc8e9 | 228 | {"init array mixed" "" "" {init-mixed.c} "init-mixed" "init-mixed.out" "-I."} |
310fd250 L |
229 | } |
230 | set array_tests_pie { | |
231 | {"PIE preinit array" "-pie" "" {preinit.c} "preinit" "preinit.out" "-fPIE" } | |
232 | {"PIE init array" "-pie" "" {init.c} "init" "init.out" "-fPIE"} | |
233 | {"PIE fini array" "-pie" "" {fini.c} "fini" "fini.out" "-fPIE"} | |
234 | {"PIE init array mixed" "-pie" "" {init-mixed.c} "init-mixed" "init-mixed.out" "-I. -fPIE"} | |
11cba4ac | 235 | {"PIE PR ld/14525" "-pie" "" {pr14525.c} "pr14525" "pr14525.out" "-fPIE"} |
5940a93c TS |
236 | } |
237 | set array_tests_static { | |
238 | {"static preinit array" "-static" "" {preinit.c} "preinit" "preinit.out"} | |
239 | {"static init array" "-static" "" {init.c} "init" "init.out"} | |
24edc24d | 240 | {"static fini array" "-static" "" {fini.c} "fini" "fini.out"} |
310fd250 | 241 | {"static init array mixed" "-static" "" {init-mixed.c} "init-mixed" "init-mixed.out" "-I."} |
24edc24d L |
242 | } |
243 | ||
c8c140d9 | 244 | # NetBSD ELF systems do not currently support the .*_array sections. |
982c6f26 AM |
245 | set xfails "*-*-netbsdelf*" |
246 | run_ld_link_exec_tests $array_tests $xfails | |
310fd250 | 247 | |
3fee20ef | 248 | if { [istarget *-*-linux*] |
5a68afcf | 249 | || [istarget *-*-nacl*] |
3fee20ef | 250 | || [istarget *-*-gnu*] } { |
982c6f26 | 251 | run_ld_link_exec_tests $array_tests_pie $xfails |
310fd250 L |
252 | } |
253 | ||
982c6f26 | 254 | # <http://www.gnu.org/software/hurd/open_issues/binutils.html#static> |
5940a93c TS |
255 | # Be cautious to not XFAIL for *-*-linux-gnu*, *-*-kfreebsd-gnu*, etc. |
256 | switch -regexp $target_triplet { | |
257 | ^\[^-\]*-\[^-\]*-gnu.*$ { | |
982c6f26 | 258 | set xfails "*-*-*" |
5940a93c TS |
259 | } |
260 | } | |
982c6f26 | 261 | run_ld_link_exec_tests $array_tests_static $xfails |
9ab80182 | 262 | |
02ecc8e9 | 263 | catch "exec rm -f tmpdir/preinit tmpdir/init tmpdir/fini tmpdir/init-mixed" status |