1 # Expect script for various ELF tests.
2 # Copyright (C) 2002-2023 Free Software Foundation, Inc.
4 # This file is part of the GNU Binutils.
6 # This program 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 3 of the License, or
9 # (at your option) any later version.
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.
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., 51 Franklin Street - Fifth Floor, Boston,
22 # Exclude non-ELF targets.
28 # Return true if target is riscv little endian.
29 # xfail the riscv little endain targets for the compressed1d1 test;
30 # The riscv big endian targets and others should pass.
31 proc riscv_little_endian { } {
32 if { [istarget "riscv32-*-*"]
33 || [istarget "riscv64-*-*"]
34 || [istarget "riscv32le-*-*"]
35 || [istarget "riscv64le-*-*"] } {
41 set old_ldflags $LDFLAGS
42 if { [istarget spu*-*-*] } {
43 set LDFLAGS "$LDFLAGS --local-store 0:0"
46 # hpux .comm differs from everyone else
48 set old_asflags $ASFLAGS
49 if [istarget "*-*-hpux*"] {
50 set hpux "--defsym HPUX=1"
51 set ASFLAGS "$ASFLAGS --defsym HPUX=1"
54 if { [istarget alpha*-*-* ] } {
55 # The compress1 test is written expecting 32-bit addresses; force the
56 # executable down into the low address space to match.
57 # ??? How can we adjust just the one testcase?
58 set LDFLAGS "$LDFLAGS -Ttext-segment 0x1000000"
59 set ASFLAGS "$ASFLAGS --defsym NO_SET=1"
62 if [istarget "tic6x-*-*"] {
63 append ASFLAGS " -mpic -mpid=near"
66 if { [istarget "*-*-solaris*"] } {
68 set options_regsub(ld) {-melf_x86_64 -melf_x86_64_sol2}
71 if { [is_remote host] } then {
72 remote_download host merge.ld
75 # Note - the output file from the second test (symbol3w.a) is
76 # used in the proc is_elf64 test below...
77 run_ld_link_tests [list \
78 [list "Build symbol3.a" \
80 {symbol3.s} {} "symbol3.a" ] \
81 [list "Build symbol3w.a" \
83 {symbol3w.s} {} "symbol3w.a" ] \
87 if [is_elf64 tmpdir/symbol3w.a] {
88 set ASFLAGS "$ASFLAGS --defsym ALIGN=3"
89 set pr23900_1_exp "pr23900-1-64.rd"
90 set pr25490_2_exp "pr25490-2-64.rd"
91 set pr25490_3_exp "pr25490-3-64.rd"
92 set pr25490_4_exp "pr25490-4-64.rd"
93 set pr25490_5_exp "pr25490-5-64.rd"
94 set pr25490_6_exp "pr25490-6-64.rd"
96 set ASFLAGS "$ASFLAGS --defsym ALIGN=2"
97 set pr23900_1_exp "pr23900-1-32.rd"
98 if { [istarget avr-*-*]
99 || [istarget h8300-*-*]
100 || [istarget ip2k-*-*]
101 || [istarget m68hc11-*]
102 || [istarget "z80-*-*"] } {
103 set pr25490_2_exp "pr25490-2-16.rd"
104 set pr25490_3_exp "pr25490-3-16.rd"
105 set pr25490_4_exp "pr25490-4-16.rd"
106 set pr25490_5_exp "pr25490-5-16.rd"
107 set pr25490_6_exp "pr25490-6-16.rd"
109 set pr25490_2_exp "pr25490-2-32.rd"
110 set pr25490_3_exp "pr25490-3-32.rd"
111 set pr25490_4_exp "pr25490-4-32.rd"
112 set pr25490_5_exp "pr25490-5-32.rd"
113 set pr25490_6_exp "pr25490-6-32.rd"
119 # Targets that use _bfd_generic_link_add_symbols won't pass pr21703 tests
122 "--allow-multiple-definition tmpdir/pr21703-1.o tmpdir/pr21703-2.o" "" "" \
123 {pr21703-1.s pr21703-2.s} {{readelf {-s} pr21703.sd}} "pr21703" }
125 "-r --allow-multiple-definition tmpdir/pr21703-3.o tmpdir/pr21703-4.o" "" "" \
126 {pr21703-3.s pr21703-4.s} {{readelf {-s} pr21703-r.sd}} "pr21703.o" }
129 if [is_underscore_target] {
130 set ASFLAGS "$ASFLAGS --defsym UNDERSCORE=1"
133 set saved_ASFLAGS "$ASFLAGS"
134 if { [istarget "i?86-*-*"] || [istarget "x86_64-*-*"] } {
135 set ASFLAGS "$ASFLAGS -mx86-used-note=no"
138 # Build libraries required for SHF_GNU_RETAIN tests.
139 if { [check_gc_sections_available] && [supports_gnu_osabi] } {
140 run_ld_link_tests [list \
141 [list "Build libretain5.a" "" "" "" \
142 {retain5lib.s} {} "libretain5.a"] \
143 [list "Build libretain6.a" "" "" "" \
144 {retain6lib.s} {} "libretain6.a"] \
148 set test_list [lsort [glob -nocomplain $srcdir/$subdir/*.d]]
149 foreach t $test_list {
150 # We need to strip the ".d", but can leave the dirname.
151 verbose [file rootname $t]
152 run_dump_test [file rootname $t]
155 set ASFLAGS "$saved_ASFLAGS"
157 # Check that the --out-implib option work correctly.
158 # Targets that don't use elf.em won't support this.
159 run_ld_link_tests [list \
160 [list "Generate empty import library" \
161 "--out-implib=tmpdir/implib.lib" "" \
162 [concat "--defsym NO_GLOBAL=1" $hpux] \
164 {{ld empty-implib.out}} \
166 [list "Generate import library" \
167 "--out-implib=tmpdir/implib.lib" "" \
170 {{readelf {-s tmpdir/implib.lib} implib.rd}} \
174 #v850 gas complains about .tbss.var section attributes.
175 if { [check_gc_sections_available] && ![istarget "v850-*-*"] } {
177 {"--gc-sections on tls variable"
178 "--gc-section" "" "" {tls_gc.s} {} "tls_gc"}
182 proc target_defaults_to_execstack {} {
185 # If the linker has been configured with --enable-default-execstack=no then
186 # this proc should always return 0.
187 if { [file exists $base_dir/config.status] } {
188 set status [remote_exec host grep "enable-default-execstack=no" $base_dir/config.status]
189 if { [lindex $status 0] == 0 } {
192 verbose -log "$base_dir/config.status does not contain enable-default-execstack=no"
195 verbose -log "there is no file $base_dir/config.status"
198 if { [istarget "aarch64*-*-*"]
199 || [istarget "arc*-*-*"]
200 || [istarget "cris*-*-*"]
201 || [istarget "ia64*-*-*"]
202 || [istarget "kvx*-*-*"]
203 || [istarget "loongarch*-*-*"]
204 || [istarget "nios2*-*-*"]
205 || [istarget "powerpc64*-*-*"]
206 || [istarget "pru*-*-*"]
207 || [istarget "riscv*-*-*"]
208 || [istarget "tilegx*-*-*"]
209 || [istarget "tilepro*-*-*"] } {
215 if { [istarget *-*-*linux*]
216 || [istarget *-*-nacl*]
217 || [istarget *-*-gnu*] } {
218 run_ld_link_tests [list \
224 {{readelf {-Wl} stack-exec.rd}} \
226 [list "stack noexec" \
231 {{readelf {-Wl} stack-noexec.rd}} \
232 "stack-noexec.exe"] \
234 "-z stack-size=0x123400 -z noexecstack" \
238 {{readelf {-Wl} stack-size.rd}} \
240 [list "PT_GNU_PROPERTY alignment" \
245 [list [list "readelf" {-Wl} $pr23900_1_exp]] \
249 # Test the linker's generation of execstack and executable segment warnings.
250 # Since these are normally pruned from the linker's output we temporarily
251 # disable tha action here.
252 rename prune_warnings_extra old_prune_warnings_extra
253 proc prune_warnings_extra { text } {
257 set curr_ldflags $LDFLAGS
258 if { [istarget powerpc*-*-*] && ![istarget powerpc64*-*-*] } {
259 # Don't generate an executable .plt section
260 set LDFLAGS "$LDFLAGS --secure-plt"
263 # Since the warnings can be disabled by configure, ensure consistency
264 # of the first test by forcing the flags.
265 run_ld_link_tests [list \
266 [list "PR ld/29072 (warn about an executable .note.GNU-stack)" \
267 "-e 0 --warn-execstack --warn-rwx-segments" \
271 {{ld pr29072.a.warn}} \
273 [list "PR 29072 (warn about -z execstack)" \
274 "-z execstack --warn-execstack" \
278 {{ld pr29072.c.warn}} \
280 [list "PR ld/29072 (suppress warnings about executable stack)" \
281 "-e 0 --no-warn-execstack" \
287 [list "Ensure that a warning issued when creating a segment with RWX permissions" \
288 "-e 0 -Tnobits-1.t --warn-rwx-segments" \
292 {{ld rwx-segments-1.l}} \
293 "rwx-segments-1.exe"] \
294 [list "Ensure that a warning issued when creating a TLS segment with execute permission" \
295 "-e 0 -T rwx-segments-2.t --warn-rwx-segments" \
299 {{ld rwx-segments-2.l}} \
300 "rwx-segments-2.exe"] \
301 [list "Ensure that the RWX warning can be suppressed" \
302 "-e 0 -Tnobits-1.t --no-warn-rwx-segments" \
307 "rwx-segments-3.exe"] \
310 set LDFLAGS $curr_ldflags
312 if { [target_defaults_to_execstack] } {
313 run_ld_link_tests [list \
314 [list "PR ld/29072 (warn about absent .note.GNU-stack)" \
315 "-e 0 -z stack-size=0x123400 --warn-execstack" \
319 {{ld pr29072.b.warn}} \
323 run_ld_link_tests [list \
324 [list "PR ld/29072 (ignore absent .note.GNU-stack)" \
325 "-e 0 -z stack-size=0x123400" \
334 # Restore the normal pruning behaviour.
335 rename prune_warnings_extra ""
336 rename old_prune_warnings_extra prune_warnings_extra
339 if [check_gc_sections_available] {
340 run_ld_link_tests [list \
341 [list "__patchable_function_entries section 2" \
342 "--gc-sections -e _start" \
346 [list [list "readelf" {-SW} $pr25490_2_exp]] \
348 [list "__patchable_function_entries section 3" \
349 "--gc-sections -e _start" \
353 [list [list "readelf" {-SW} $pr25490_3_exp]] \
355 [list "__patchable_function_entries section 4" \
356 "--gc-sections -e _start" \
360 [list [list "readelf" {-SW} $pr25490_4_exp]] \
362 [list "__patchable_function_entries section 5" \
363 "--gc-sections -e _start" \
367 [list [list "readelf" {-SW} $pr25490_5_exp]] \
369 [list "__patchable_function_entries section 6" \
370 "--gc-sections -e _start" \
374 [list [list "readelf" {-SW} $pr25490_6_exp]] \
379 set LDFLAGS $old_ldflags
380 set ASFLAGS $old_asflags
382 # Check to see if the C compiler works
383 if { ![check_compiler_available] } {
387 if [check_gc_sections_available] {
389 {"PR ld/13195" "-Wl,--gc-sections" ""
390 {pr13195.c} {} "pr13195"}
395 {"preinit array" "" ""
396 {preinit.c} "preinit" "preinit.out"}
398 {init.c} "init" "init.out"}
400 {fini.c} "fini" "fini.out"}
401 {"init array mixed" "" ""
402 {init-mixed.c} "init-mixed" "init-mixed.out" "-I."}
404 set array_tests_pie {
405 {"PIE preinit array" "-pie" ""
406 {preinit.c} "preinit" "preinit.out" "-fPIE"}
407 {"PIE init array" "-pie" ""
408 {init.c} "init" "init.out" "-fPIE"}
409 {"PIE fini array" "-pie" ""
410 {fini.c} "fini" "fini.out" "-fPIE"}
411 {"PIE init array mixed" "-pie" ""
412 {init-mixed.c} "init-mixed" "init-mixed.out" "-I. -fPIE"}
413 {"PIE PR ld/14525" "-pie" ""
414 {pr14525.c} "pr14525" "pr14525.out" "-fPIE"}
416 set array_tests_static {
417 {"static preinit array" "-static" ""
418 {preinit.c} "preinit" "preinit.out"}
419 {"static init array" "-static" ""
420 {init.c} "init" "init.out"}
421 {"static fini array" "-static" ""
422 {fini.c} "fini" "fini.out"}
423 {"static init array mixed" "-static" ""
424 {init-mixed.c} "init-mixed" "init-mixed.out" "-I."}
427 # NetBSD ELF systems do not currently support the .*_array sections.
428 set xfails "*-*-netbsd*"
429 run_ld_link_exec_tests $array_tests $xfails
431 if { [istarget *-*-linux*]
432 || [istarget *-*-nacl*]
433 || [istarget *-*-gnu*] } {
434 run_ld_link_exec_tests $array_tests_pie $xfails
436 if { $STATIC_PIE_LDFLAGS != "" } then {
437 run_ld_link_exec_tests [list \
439 "Static PIE preinit array" \
440 "$STATIC_PIE_LDFLAGS" \
443 "preinit-static-pie" \
448 "Static PIE init array" \
449 "$STATIC_PIE_LDFLAGS" \
457 "Static PIE fini array" \
458 "$STATIC_PIE_LDFLAGS" \
466 "Static PIE init array mixed" \
467 "$STATIC_PIE_LDFLAGS" \
470 "init-mixed-static-pie" \
475 "Static PIE PR ld/14525" \
476 "$STATIC_PIE_LDFLAGS" \
479 "pr14525-static-pie" \
486 run_ld_link_exec_tests [list \
489 "$NOPIE_LDFLAGS -Wl,-z,common-page-size=0x4000 -Wl,-z,noexecstack" \
491 { mbind2a.s mbind2b.c } \
498 "-static -Wl,-z,common-page-size=0x4000 -Wl,-z,noexecstack" \
500 { mbind2a.s mbind2b.c } \
508 run_ld_link_exec_tests $array_tests_static $xfails
510 run_cc_link_tests [list \
513 "-Wl,-z,unique-symbol" \
514 "-fno-function-sections" \
515 {pr26391a.c pr26391b.c pr26391c.c pr26391d.c} \
516 {{nm "" pr26391.nd}} \
521 "-Wl,-z,unique-symbol" \
522 "-ffunction-sections" \
523 {pr26391a.c pr26391b.c pr26391c.c pr26391d.c} \
524 {{nm "" pr26391.nd}} \
529 "-Wl,-z,unique-symbol,--emit-relocs" \
530 "-fno-function-sections" \
531 {pr26391a.c pr26391b.c pr26391c.c pr26391d.c} \
532 {{nm "" pr26391.nd}} \
537 "-Wl,-z,unique-symbol,--emit-relocs" \
538 "-ffunction-sections" \
539 {pr26391a.c pr26391b.c pr26391c.c pr26391d.c} \
540 {{nm "" pr26391.nd}} \
544 "Build pr26391-5.o" \
545 "-Wl,-z,unique-symbol -r -nostdlib -nostartfiles" \
546 "-fno-function-sections" \
547 {pr26391a.c pr26391b.c pr26391c.c pr26391d.c} \
549 [list "nm" "$dep_plug_opt" "pr26391.nd"] \
550 [list "nm" "$dep_plug_opt" "pr26391.fd"] \
555 "Build pr26391-6.o" \
556 "-Wl,-z,unique-symbol -r -nostdlib -nostartfiles" \
557 "-ffunction-sections" \
558 {pr26391a.c pr26391b.c pr26391c.c pr26391d.c} \
559 {{nm "" pr26391.nd}} \
564 run_ld_link_exec_tests [list \
567 "-Wl,-z,unique-symbol" \
569 {pr26391a.c pr26391b.c pr26391c.c pr26391d.c} \
572 "-fno-function-sections" \
576 "-Wl,-z,unique-symbol" \
578 {pr26391a.c pr26391b.c pr26391c.c pr26391d.c} \
581 "-ffunction-sections" \
585 "-Wl,-z,unique-symbol,--emit-relocs" \
587 {pr26391a.c pr26391b.c pr26391c.c pr26391d.c} \
590 "-fno-function-sections" \
594 "-Wl,-z,unique-symbol,--emit-relocs" \
596 {pr26391a.c pr26391b.c pr26391c.c pr26391d.c} \
599 "-ffunction-sections" \
603 "-Wl,-z,unique-symbol" \
611 "tmpdir/pr26391-5.o" \
615 "-Wl,-z,unique-symbol" \
623 "tmpdir/pr26391-6.o" \
627 set merge_exec_tests {
629 {merge4a.c merge4b.s} "merge4" "merge4.out"}
631 run_ld_link_exec_tests $merge_exec_tests
633 catch "exec rm -f tmpdir/preinit tmpdir/init tmpdir/fini tmpdir/init-mixed" status