mirror of
git://gcc.gnu.org/git/gcc.git
synced 2024-12-25 06:58:55 +08:00
8dafb9d7be
From-SVN: r20181
365 lines
10 KiB
Bash
Executable File
365 lines
10 KiB
Bash
Executable File
#!/bin/sh -p
|
|
#
|
|
# DO NOT EDIT THIS FILE (fixincl.sh)
|
|
#
|
|
# It has been autogen-ed Tuesday June 02, 1998 at 06:46:41 AM PDT
|
|
# From the definitions inclhack.def
|
|
# and the template file inclhack.tpl
|
|
#
|
|
# Install modified versions of certain ANSI-incompatible system header
|
|
# files which are fixed to work correctly with ANSI C and placed in a
|
|
# directory that GNU C will search.
|
|
#
|
|
# This script contains 108 fixup scripts.
|
|
#
|
|
# See README-fixinc for more information.
|
|
#
|
|
# fixincludes is free software.
|
|
#
|
|
# You may redistribute it and/or modify it under the terms of the
|
|
# GNU General Public License, as published by the Free Software
|
|
# Foundation; either version 2, or (at your option) any later version.
|
|
#
|
|
# fixincludes 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 fixincludes. See the file "COPYING". If not,
|
|
# write to: The Free Software Foundation, Inc.,
|
|
# 59 Temple Place - Suite 330,
|
|
# Boston, MA 02111-1307, USA.
|
|
#
|
|
# # # # # # # # # # # # # # # # # # # # #
|
|
#
|
|
# Directory containing the original header files.
|
|
# (This was named INCLUDES, but that conflicts with a name in Makefile.in.)
|
|
#
|
|
INPUT=${2-${INPUT-/usr/include}}
|
|
|
|
( \cd ${INPUT} > /dev/null 2>&1 ) || {
|
|
echo 'fixincludes: input dir `'$INPUT"' is an invalid directory"
|
|
exit 1
|
|
}
|
|
|
|
# # # # # # # # # # # # # # # # # # # # #
|
|
#
|
|
# Directory in which to store the results.
|
|
# Fail if no arg to specify a directory for the output.
|
|
if [ "x$1" = "x" ]
|
|
then echo fixincludes: no output directory specified
|
|
exit 1
|
|
fi
|
|
|
|
LIB=${1}
|
|
|
|
# Make sure it exists.
|
|
if [ ! -d $LIB ]; then
|
|
mkdir $LIB || {
|
|
echo fixincludes: output dir '`'$LIB"' cannot be created"
|
|
exit 1
|
|
}
|
|
else
|
|
( \cd $LIB && touch DONE && rm DONE ) || {
|
|
echo fixincludes: output dir '`'$LIB"' is an invalid directory"
|
|
exit 1
|
|
}
|
|
fi
|
|
|
|
# Define what target system we're fixing.
|
|
#
|
|
if test -r ./Makefile; then
|
|
target_canonical="`sed -n -e 's,^target[ ]*=[ ]*\(.*\)$,\1,p' < Makefile`"
|
|
fi
|
|
|
|
# If not from the Makefile, then try config.guess
|
|
#
|
|
if test -z "${target_canonical}" ; then
|
|
if test -x ./config.guess ; then
|
|
target_canonical="`config.guess`" ; fi
|
|
test -z "${target_canonical}" && target_canonical=unknown
|
|
fi
|
|
export target_canonical
|
|
|
|
# # # # # # # # # # # # # # # # # # # # #
|
|
#
|
|
# Define PWDCMD as a command to use to get the working dir
|
|
# in the form that we want.
|
|
PWDCMD=pwd
|
|
|
|
case "`$PWDCMD`" in
|
|
//*)
|
|
# On an Apollo, discard everything before `/usr'.
|
|
PWDCMD="eval pwd | sed -e 's,.*/usr/,/usr/,'"
|
|
;;
|
|
esac
|
|
|
|
# Original directory.
|
|
ORIGDIR=`${PWDCMD}`
|
|
FIXINCL=${ORIGDIR}/fixincl
|
|
export FIXINCL
|
|
|
|
# Make LIB absolute only if needed to avoid problems with the amd.
|
|
case $LIB in
|
|
/*)
|
|
;;
|
|
*)
|
|
cd $LIB; LIB=`${PWDCMD}`
|
|
;;
|
|
esac
|
|
|
|
echo Fixing headers into ${LIB} for ${target_canonical} target
|
|
|
|
# Determine whether this system has symbolic links.
|
|
if ln -s X $LIB/ShouldNotExist 2>/dev/null; then
|
|
rm -f $LIB/ShouldNotExist
|
|
LINKS=true
|
|
elif ln -s X /tmp/ShouldNotExist 2>/dev/null; then
|
|
rm -f /tmp/ShouldNotExist
|
|
LINKS=true
|
|
else
|
|
LINKS=false
|
|
fi
|
|
|
|
# # # # # # # # # # # # # # # # # # # # #
|
|
#
|
|
echo Finding directories and links to directories
|
|
cd ${INPUT}
|
|
# Find all directories and all symlinks that point to directories.
|
|
# Put the list in $files.
|
|
# Each time we find a symlink, add it to newdirs
|
|
# so that we do another find within the dir the link points to.
|
|
# Note that $files may have duplicates in it;
|
|
# later parts of this file are supposed to ignore them.
|
|
dirs="."
|
|
levels=2
|
|
while [ -n "$dirs" ] && [ $levels -gt 0 ]
|
|
do
|
|
levels=`expr $levels - 1`
|
|
newdirs=
|
|
for d in $dirs
|
|
do
|
|
echo " Searching $INPUT/$d"
|
|
|
|
# Find all directories under $d, relative to $d, excluding $d itself.
|
|
# (The /. is needed after $d in case $d is a symlink.)
|
|
files="$files `find $d/. -type d -print | \
|
|
sed -e '/\/\.$/d' -e 's@/./@/@g'`"
|
|
# Find all links to directories.
|
|
# Using `-exec test -d' in find fails on some systems,
|
|
# and trying to run test via sh fails on others,
|
|
# so this is the simplest alternative left.
|
|
# First find all the links, then test each one.
|
|
theselinks=
|
|
$LINKS && \
|
|
theselinks=`find $d/. -type l -print | sed -e 's@/./@/@g'`
|
|
for d1 in $theselinks --dummy--
|
|
do
|
|
# If the link points to a directory,
|
|
# add that dir to $newdirs
|
|
if [ -d $d1 ]
|
|
then
|
|
files="$files $d1"
|
|
if [ "`ls -ld $d1 | sed -n 's/.*-> //p'`" != "." ]
|
|
then
|
|
newdirs="$newdirs $d1"
|
|
fi
|
|
fi
|
|
done
|
|
done
|
|
|
|
dirs="$newdirs"
|
|
done
|
|
|
|
# # # # # # # # # # # # # # # # # # # # #
|
|
#
|
|
dirs=
|
|
echo "All directories (including links to directories):"
|
|
echo $files
|
|
|
|
for file in $files; do
|
|
rm -rf $LIB/$file
|
|
if [ ! -d $LIB/$file ]
|
|
then mkdir $LIB/$file
|
|
fi
|
|
done
|
|
mkdir $LIB/root
|
|
|
|
# # # # # # # # # # # # # # # # # # # # #
|
|
#
|
|
# treetops gets an alternating list
|
|
# of old directories to copy
|
|
# and the new directories to copy to.
|
|
treetops="${INPUT} ${LIB}"
|
|
|
|
if $LINKS; then
|
|
echo 'Making symbolic directory links'
|
|
for file in $files; do
|
|
dest=`ls -ld $file | sed -n 's/.*-> //p'`
|
|
if [ "$dest" ]; then
|
|
cwd=`${PWDCMD}`
|
|
# In case $dest is relative, get to $file's dir first.
|
|
cd ${INPUT}
|
|
cd `echo ./$file | sed -n 's&[^/]*$&&p'`
|
|
# Check that the target directory exists.
|
|
# Redirections changed to avoid bug in sh on Ultrix.
|
|
(cd $dest) > /dev/null 2>&1
|
|
if [ $? = 0 ]; then
|
|
cd $dest
|
|
# X gets the dir that the link actually leads to.
|
|
x=`${PWDCMD}`
|
|
# Canonicalize ${INPUT} now to minimize the time an
|
|
# automounter has to change the result of ${PWDCMD}.
|
|
cinput=`cd ${INPUT}; ${PWDCMD}`
|
|
# If a link points to ., make a similar link to .
|
|
if [ $x = ${cinput} ]; then
|
|
echo $file '->' . ': Making link'
|
|
rm -fr ${LIB}/$file > /dev/null 2>&1
|
|
ln -s . ${LIB}/$file > /dev/null 2>&1
|
|
# If link leads back into ${INPUT},
|
|
# make a similar link here.
|
|
elif expr $x : "${cinput}/.*" > /dev/null; then
|
|
# Y gets the actual target dir name, relative to ${INPUT}.
|
|
y=`echo $x | sed -n "s&${cinput}/&&p"`
|
|
# DOTS is the relative path from ${LIB}/$file's dir back to ${LIB}.
|
|
dots=`echo "$file" |
|
|
sed -e 's@^./@@' -e 's@/./@/@g' -e 's@[^/][^/]*@..@g' -e 's@..$@@'`
|
|
echo $file '->' $dots$y ': Making link'
|
|
rm -fr ${LIB}/$file > /dev/null 2>&1
|
|
ln -s $dots$y ${LIB}/$file > /dev/null 2>&1
|
|
else
|
|
# If the link is to a dir $target outside ${INPUT},
|
|
# repoint the link at ${INPUT}/root$target
|
|
# and process $target into ${INPUT}/root$target
|
|
# treat this directory as if it actually contained the files.
|
|
echo $file '->' root$x ': Making link'
|
|
if [ -d $LIB/root$x ]
|
|
then true
|
|
else
|
|
dirname=root$x/
|
|
dirmade=.
|
|
cd $LIB
|
|
while [ x$dirname != x ]; do
|
|
component=`echo $dirname | sed -e 's|/.*$||'`
|
|
mkdir $component >/dev/null 2>&1
|
|
cd $component
|
|
dirmade=$dirmade/$component
|
|
dirname=`echo $dirname | sed -e 's|[^/]*/||'`
|
|
done
|
|
fi
|
|
# Duplicate directory structure created in ${LIB}/$file in new
|
|
# root area.
|
|
for file2 in $files; do
|
|
case $file2 in
|
|
$file/*)
|
|
dupdir=${LIB}/root$x/`echo $file2 | sed -n "s|^${file}/||p"`
|
|
echo "Duplicating ${file}'s ${dupdir}"
|
|
if [ -d ${dupdir} ]
|
|
then true
|
|
else
|
|
mkdir ${dupdir}
|
|
fi
|
|
;;
|
|
*)
|
|
;;
|
|
esac
|
|
done
|
|
# Get the path from ${LIB} to $file, accounting for symlinks.
|
|
parent=`echo "$file" | sed -e 's@/[^/]*$@@'`
|
|
libabs=`cd ${LIB}; ${PWDCMD}`
|
|
file2=`cd ${LIB}; cd $parent; ${PWDCMD} | sed -e "s@^${libabs}@@"`
|
|
# DOTS is the relative path from ${LIB}/$file's dir back to ${LIB}.
|
|
dots=`echo "$file2" | sed -e 's@/[^/]*@../@g'`
|
|
rm -fr ${LIB}/$file > /dev/null 2>&1
|
|
ln -s ${dots}root$x ${LIB}/$file > /dev/null 2>&1
|
|
treetops="$treetops $x ${LIB}/root$x"
|
|
fi
|
|
fi
|
|
cd $cwd
|
|
fi
|
|
done
|
|
fi
|
|
|
|
# # # # # # # # # # # # # # # # # # # # #
|
|
#
|
|
required=
|
|
set x $treetops
|
|
shift
|
|
while [ $# != 0 ]; do
|
|
# $1 is an old directory to copy, and $2 is the new directory to copy to.
|
|
#
|
|
SRCDIR=`cd ${INPUT} ; cd $1 ; ${PWDCMD}`
|
|
export SRCDIR
|
|
shift
|
|
|
|
DESTDIR=`cd $1;${PWDCMD}`
|
|
export DESTDIR
|
|
shift
|
|
|
|
# The same dir can appear more than once in treetops.
|
|
# There's no need to scan it more than once.
|
|
#
|
|
if [ -f ${DESTDIR}/DONE ]
|
|
then continue ; fi
|
|
|
|
touch ${DESTDIR}/DONE
|
|
echo Fixing directory ${SRCDIR} into ${DESTDIR}
|
|
|
|
# Check .h files which are symlinks as well as those which are files.
|
|
# A link to a header file will not be processed by anything but this.
|
|
#
|
|
cd ${SRCDIR}
|
|
|
|
required="$required `if $LINKS; then
|
|
find . -name '*.h' \( -type f -o -type l \) -print
|
|
else
|
|
find . -name '*.h' -type f -print
|
|
fi | ${FIXINCL}`"
|
|
done
|
|
|
|
## Make sure that any include files referenced using double quotes
|
|
## exist in the fixed directory. This comes last since otherwise
|
|
## we might end up deleting some of these files "because they don't
|
|
## need any change."
|
|
set x `echo $required`
|
|
shift
|
|
while [ $# != 0 ]; do
|
|
newreq=
|
|
while [ $# != 0 ]; do
|
|
# $1 is the directory to copy from,
|
|
# $2 is the unfixed file,
|
|
# $3 is the fixed file name.
|
|
#
|
|
cd ${INPUT}
|
|
cd $1
|
|
if [ -r $2 ] && [ ! -r $3 ]; then
|
|
cp $2 $3 >/dev/null 2>&1 || echo "Can't copy $2" >&2
|
|
chmod +w $3 2>/dev/null
|
|
chmod a+r $3 2>/dev/null
|
|
echo Copied $2
|
|
for include in `egrep '^[ ]*#[ ]*include[ ]*"[^/]' $3 |
|
|
sed -e 's/^[ ]*#[ ]*include[ ]*"\([^"]*\)".*$/\1/'`
|
|
do
|
|
dir=`echo $2 | sed -e s'|/[^/]*$||'`
|
|
dir2=`echo $3 | sed -e s'|/[^/]*$||'`
|
|
newreq="$newreq $1 $dir/$include $dir2/$include"
|
|
done
|
|
fi
|
|
shift; shift; shift
|
|
done
|
|
set x $newreq
|
|
shift
|
|
done
|
|
|
|
echo 'Cleaning up DONE files.'
|
|
cd $LIB
|
|
find . -name DONE -exec rm -f '{}' ';'
|
|
|
|
echo 'Removing unneeded directories:'
|
|
cd $LIB
|
|
files=`find . -type d -print | sort -r`
|
|
for file in $files; do
|
|
rmdir $LIB/$file > /dev/null 2>&1
|
|
done
|