mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-12-21 04:42:53 +08:00
5b1f6c9570
"unresolved" as a test result means runtest returns an error, which can be confusing when there is no apparent error unless you look in .log files. In particular many tests are skipped without reporting an error if no target C compiler is found, but if a target C compiler is found but won't compile a testcase for some reason we used to mark the test as unresolved. Which is no more worthy of an error than when lacking a C compiler entirely. * testsuite/ld-cdtest/cdtest.exp, * testsuite/ld-checks/checks.exp, * testsuite/ld-elf/binutils.exp, * testsuite/ld-elf/compress.exp, * testsuite/ld-elf/dwarf.exp, * testsuite/ld-elf/exclude.exp, * testsuite/ld-elf/frame.exp, * testsuite/ld-elf/indirect.exp, * testsuite/ld-elf/linux-x86.exp, * testsuite/ld-elf/sec-to-seg.exp, * testsuite/ld-elf/tls_common.exp, * testsuite/ld-elfcomm/elfcomm.exp, * testsuite/ld-elfvers/vers.exp, * testsuite/ld-elfvsb/elfvsb.exp, * testsuite/ld-elfweak/elfweak.exp, * testsuite/ld-ifunc/binutils.exp, * testsuite/ld-mips-elf/mips-elf-flags.exp, * testsuite/ld-misc/defsym.exp, * testsuite/ld-mn10300/mn10300.exp, * testsuite/ld-plugin/lto.exp, * testsuite/ld-plugin/plugin.exp, * testsuite/ld-scripts/align.exp, * testsuite/ld-scripts/assert.exp, * testsuite/ld-scripts/crossref.exp, * testsuite/ld-scripts/defined.exp, * testsuite/ld-scripts/extern.exp, * testsuite/ld-scripts/log2.exp, * testsuite/ld-scripts/map-address.exp, * testsuite/ld-scripts/phdrs.exp, * testsuite/ld-scripts/phdrs2.exp, * testsuite/ld-scripts/script.exp, * testsuite/ld-scripts/section-flags.exp, * testsuite/ld-scripts/sizeof.exp, * testsuite/ld-scripts/weak.exp, * testsuite/ld-selective/selective.exp, * testsuite/ld-sh/sh.exp, * testsuite/ld-shared/shared.exp, * testsuite/ld-srec/srec.exp, * testsuite/ld-tic6x/tic6x.exp, * testsuite/ld-undefined/undefined.exp, * testsuite/ld-undefined/weak-undef.exp, * testsuite/lib/ld-lib.exp: Don't use unresolved except after perror. Instead report "unsupported" or "fail".
80 lines
2.5 KiB
Plaintext
80 lines
2.5 KiB
Plaintext
# Expect script for .tls_common tests
|
|
# Copyright (C) 2006-2021 Free Software Foundation, Inc.
|
|
#
|
|
# This file is part of the GNU Binutils.
|
|
#
|
|
# This program is free software; you can redistribute it and/or modify
|
|
# it under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation; either version 3 of the License, or
|
|
# (at your option) any later version.
|
|
#
|
|
# This program is distributed in the hope that it will be useful,
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
#
|
|
# 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., 51 Franklin Street - Fifth Floor, Boston,
|
|
# MA 02110-1301, USA.
|
|
#
|
|
# Written by Jakub Jelinek (jakub@redhat.com)
|
|
#
|
|
|
|
# Make sure that binutils can correctly handle ld output in ELF.
|
|
|
|
if { !([istarget *-*-linux*]
|
|
|| [istarget arm*-*-uclinuxfdpiceabi]
|
|
|| [istarget *-*-nacl*]
|
|
|| [istarget *-*-gnu*]) || [istarget *ecoff] } then {
|
|
return
|
|
}
|
|
|
|
if { ![ld_assemble $as "--elf-stt-common=no $srcdir/$subdir/tls_common.s" tmpdir/tls_commona.o]
|
|
|| ![ld_assemble $as "--elf-stt-common=yes $srcdir/$subdir/tls_common.s" tmpdir/tls_commonb.o] } {
|
|
unsupported "tls_common"
|
|
return
|
|
}
|
|
|
|
if { ![ld_link $ld tmpdir/tls_common1a.o "-r tmpdir/tls_commona.o"]
|
|
|| ![ld_link $ld tmpdir/tls_common1b.o "-r tmpdir/tls_commona.o"] } {
|
|
fail "tls_common"
|
|
return
|
|
}
|
|
|
|
if { ![ld_link $ld tmpdir/tls_commona "tmpdir/tls_common1a.o"] } {
|
|
if { [string match "*not supported*" $link_output]
|
|
|| [string match "*unrecognized option*" $link_output] } {
|
|
unsupported "$ld_options is not supported by this target"
|
|
} else {
|
|
fail "tls_common"
|
|
}
|
|
return
|
|
}
|
|
|
|
if { ![ld_link $ld tmpdir/tls_commonb "tmpdir/tls_common1b.o"] } {
|
|
if { [string match "*not supported*" $link_output]
|
|
|| [string match "*unrecognized option*" $link_output] } {
|
|
unsupported "$ld_options is not supported by this target"
|
|
} else {
|
|
fail "tls_common"
|
|
}
|
|
return
|
|
}
|
|
|
|
set readelf_output [run_host_cmd "$READELF" "-l --wide tmpdir/tls_commona"]
|
|
if ![regexp ".*TLS.*0x0+ 0x0+4 R .*" $readelf_output] then {
|
|
send_log "$readelf_output\n"
|
|
fail "tls_common"
|
|
return
|
|
}
|
|
|
|
set readelf_output [run_host_cmd "$READELF" "-l --wide tmpdir/tls_commona"]
|
|
if ![regexp ".*TLS.*0x0+ 0x0+4 R .*" $readelf_output] then {
|
|
send_log "$readelf_output\n"
|
|
fail "tls_common"
|
|
return
|
|
}
|
|
|
|
pass "tls_common"
|