mirror of
https://sourceware.org/git/glibc.git
synced 2024-12-27 21:20:18 +00:00
104 lines
2.7 KiB
Bash
Executable File
104 lines
2.7 KiB
Bash
Executable File
#! /bin/bash
|
|
# Make sure no code in ld.so uses xmm/ymm registers on x86-64.
|
|
# Copyright (C) 2009-2014 Free Software Foundation, Inc.
|
|
# This file is part of the GNU C Library.
|
|
|
|
# The GNU C Library is free software; you can redistribute it and/or
|
|
# modify it under the terms of the GNU Lesser General Public
|
|
# License as published by the Free Software Foundation; either
|
|
# version 2.1 of the License, or (at your option) any later version.
|
|
|
|
# The GNU C Library 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
|
|
# Lesser General Public License for more details.
|
|
|
|
# You should have received a copy of the GNU Lesser General Public
|
|
# License along with the GNU C Library; if not, see
|
|
# <http://www.gnu.org/licenses/>.
|
|
|
|
set -e
|
|
|
|
objpfx="$1"
|
|
NM="$2"
|
|
OBJDUMP="$3"
|
|
READELF="$4"
|
|
|
|
tmp=$(mktemp ${objpfx}tst-xmmymm.XXXXXX)
|
|
trap 'rm -f "$tmp"' 1 2 3 15
|
|
|
|
# List of object files we have to test
|
|
rtldobjs=$($READELF -W -wi ${objpfx}dl-allobjs.os |
|
|
awk '/^ </ { if ($5 == "(DW_TAG_compile_unit)") c=1; else c=0 } $2 == "DW_AT_name" { if (c == 1) print $NF }' |
|
|
sed 's,\(.*/\|\)\([_[:alnum:]-]*[.]\).$,\2os,')
|
|
rtldobjs="$rtldobjs $(ar t ${objpfx}rtld-libc.a)"
|
|
|
|
# OBJECT symbols can be ignored.
|
|
$READELF -sW ${objpfx}dl-allobjs.os ${objpfx}rtld-libc.a |
|
|
egrep " OBJECT *GLOBAL " |
|
|
awk '{if ($7 != "ABS") print $8 }' |
|
|
sort -u > "$tmp"
|
|
declare -a objects
|
|
objects=($(cat "$tmp"))
|
|
|
|
objs="dl-runtime.os"
|
|
tocheck="dl-runtime.os"
|
|
|
|
while test -n "$objs"; do
|
|
this="$objs"
|
|
objs=""
|
|
|
|
for f in $this; do
|
|
undef=$($NM -u "$objpfx"../*/"$f" | awk '{print $2}')
|
|
if test -n "$undef"; then
|
|
for s in $undef; do
|
|
for obj in ${objects[*]} "_GLOBAL_OFFSET_TABLE_"; do
|
|
if test "$obj" = "$s"; then
|
|
continue 2
|
|
fi
|
|
done
|
|
for o in $rtldobjs; do
|
|
ro=$(echo "$objpfx"../*/"$o")
|
|
if $NM -g --defined-only "$ro" | egrep -qs " $s\$"; then
|
|
if ! (echo "$tocheck $objs" | fgrep -qs "$o"); then
|
|
echo "$o needed for $s"
|
|
objs="$objs $o"
|
|
fi
|
|
break;
|
|
fi
|
|
done
|
|
done
|
|
fi
|
|
done
|
|
tocheck="$tocheck$objs"
|
|
done
|
|
|
|
echo
|
|
echo
|
|
echo "object files needed: $tocheck"
|
|
|
|
cp /dev/null "$tmp"
|
|
for f in $tocheck; do
|
|
$OBJDUMP -d "$objpfx"../*/"$f" |
|
|
awk 'BEGIN { last="" } /^[[:xdigit:]]* <[_[:alnum:]]*>:$/ { fct=substr($2, 2, length($2)-3) } /,%[xy]mm[[:digit:]]*$/ { if (last != fct) { print fct; last=fct} }' |
|
|
while read fct; do
|
|
if test "$fct" = "_dl_runtime_profile" -o "$fct" = "_dl_x86_64_restore_sse"; then
|
|
continue;
|
|
fi
|
|
echo "function $fct in $f modifies xmm/ymm" >> "$tmp"
|
|
result=1
|
|
done
|
|
done
|
|
|
|
if test -s "$tmp"; then
|
|
echo
|
|
echo
|
|
cat "$tmp"
|
|
result=1
|
|
else
|
|
result=0
|
|
fi
|
|
|
|
rm "$tmp"
|
|
exit $result
|