xref: /openbsd/gnu/gcc/fixincludes/fixinc.in (revision 5af055cd)
1#!/bin/sh
2#
3# Install modified versions of certain ANSI-incompatible system header
4# files which are fixed to work correctly with ANSI C and placed in a
5# directory that GCC will search.
6#
7# See README-fixinc for more information.
8#
9#  fixincludes copyright (c) 1998, 1999, 2000, 2002
10#  The Free Software Foundation, Inc.
11#
12# fixincludes is free software.
13#
14# You may redistribute it and/or modify it under the terms of the
15# GNU General Public License, as published by the Free Software
16# Foundation; either version 2, or (at your option) any later version.
17#
18# fixincludes is distributed in the hope that it will be useful,
19# but WITHOUT ANY WARRANTY; without even the implied warranty of
20# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
21# See the GNU General Public License for more details.
22#
23# You should have received a copy of the GNU General Public License
24# along with fixincludes.  See the file "COPYING".  If not,
25# write to:  The Free Software Foundation, Inc.,
26#            51 Franklin Street, Fifth Floor,
27#            Boston,  MA  02110-1301, USA.
28#
29# # # # # # # # # # # # # # # # # # # # #
30
31# Usage: fixinc.sh output-dir input-dir
32#
33# Directory in which to store the results.
34# Fail if no arg to specify a directory for the output.
35if [ "x$1" = "x" ]
36then
37  echo fixincludes: no output directory specified
38  exit 1
39fi
40
41LIB=${1}
42shift
43
44# Make sure it exists.
45if [ ! -d $LIB ]; then
46  mkdir $LIB || {
47    echo fixincludes:  output dir '`'$LIB"' cannot be created"
48    exit 1
49  }
50else
51  ( cd $LIB && touch DONE && rm DONE ) || {
52    echo fixincludes:  output dir '`'$LIB"' is an invalid directory"
53    exit 1
54  }
55fi
56
57if test -z "$VERBOSE"
58then
59  VERBOSE=2
60  export VERBOSE
61else
62  case "$VERBOSE" in
63  [0-9] ) : ;;
64  * )  VERBOSE=3 ;;
65  esac
66fi
67
68# Define what target system we're fixing.
69#
70if test -r ./Makefile; then
71  target_canonical="`sed -n -e 's,^target[ 	]*=[ 	]*\(.*\)$,\1,p' < Makefile`"
72fi
73
74# If not from the Makefile, then try config.guess
75#
76if test -z "${target_canonical}" ; then
77  if test -x ./config.guess ; then
78    target_canonical="`config.guess`" ; fi
79  test -z "${target_canonical}" && target_canonical=unknown
80fi
81export target_canonical
82
83# # # # # # # # # # # # # # # # # # # # #
84#
85# Define PWDCMD as a command to use to get the working dir
86# in the form that we want.
87PWDCMD=${PWDCMD-pwd}
88
89case "`$PWDCMD`" in
90//*)
91    # On an Apollo, discard everything before `/usr'.
92    PWDCMD="eval pwd | sed -e 's,.*/usr/,/usr/,'"
93    ;;
94esac
95
96# Original directory.
97ORIGDIR=`${PWDCMD}`
98export ORIGDIR
99FIXINCL=`${PWDCMD}`/fixincl
100if [ ! -x $FIXINCL ] ; then
101  echo "Cannot find fixincl" >&2
102  exit 1
103fi
104export FIXINCL
105
106# Make LIB absolute only if needed to avoid problems with the amd.
107case $LIB in
108/*)
109    ;;
110*)
111    cd $LIB; LIB=`${PWDCMD}`
112    ;;
113esac
114
115if test $VERBOSE -gt 0
116then echo Fixing headers into ${LIB} for ${target_canonical} target ; fi
117
118# Determine whether this system has symbolic links.
119if test -n "$DJDIR"; then
120  LINKS=false
121elif ln -s X $LIB/ShouldNotExist 2>/dev/null; then
122  rm -f $LIB/ShouldNotExist
123  LINKS=true
124elif ln -s X /tmp/ShouldNotExist 2>/dev/null; then
125  rm -f /tmp/ShouldNotExist
126  LINKS=true
127else
128  LINKS=false
129fi
130
131# # # # # # # # # # # # # # # # # # # # #
132#
133#  In the file macro_list are listed all the predefined
134#  macros that are not in the C89 reserved namespace (the reserved
135#  namespace is all identifiers beginnning with two underscores or one
136#  underscore followed by a capital letter).  A regular expression to find
137#  any of those macros in a header file is written to MN_NAME_PAT.
138#
139#  Note dependency on ASCII. \012 = newline.
140#  tr ' ' '\n' is, alas, not portable.
141
142if test -s ${MACRO_LIST}
143then
144  if test $VERBOSE -gt 0; then
145    echo "Forbidden identifiers: `tr '\012' ' ' < ${MACRO_LIST}`"
146  fi
147  MN_NAME_PAT="`sed 's/^/\\\\</; s/$/\\\\>/; $!s/$/|/' \
148      < ${MACRO_LIST} | tr -d '\012'`"
149  export MN_NAME_PAT
150else
151  if test $VERBOSE -gt 0
152  then echo "No forbidden identifiers defined by this target" ; fi
153fi
154
155# # # # # # # # # # # # # # # # # # # # #
156#
157#  Search each input directory for broken header files.
158#  This loop ends near the end of the file.
159#
160if test $# -eq 0
161then
162    INPUTLIST="/usr/include"
163else
164    INPUTLIST="$@"
165fi
166
167for INPUT in ${INPUTLIST} ; do
168
169cd ${ORIGDIR}
170
171#  Make sure a directory exists before changing into it,
172#  otherwise Solaris2 will fail-exit the script.
173#
174if [ ! -d ${INPUT} ]; then
175  continue
176fi
177cd ${INPUT}
178
179INPUT=`${PWDCMD}`
180export INPUT
181
182#
183# # # # # # # # # # # # # # # # # # # # #
184#
185if test $VERBOSE -gt 1
186then echo Finding directories and links to directories ; fi
187
188# Find all directories and all symlinks that point to directories.
189# Put the list in $all_dirs.
190# Each time we find a symlink, add it to newdirs
191# so that we do another find within the dir the link points to.
192# Note that $all_dirs may have duplicates in it;
193# later parts of this file are supposed to ignore them.
194dirs="."
195levels=2
196all_dirs=""
197search_dirs=""
198
199while [ -n "$dirs" ] && [ $levels -gt 0 ]
200do
201  levels=`expr $levels - 1`
202  newdirs=
203  for d in $dirs
204  do
205    if test $VERBOSE -gt 1
206    then echo " Searching $INPUT/$d" ; fi
207
208    # Find all directories under $d, relative to $d, excluding $d itself.
209    # (The /. is needed after $d in case $d is a symlink.)
210    all_dirs="$all_dirs `find $d/. -type d -print | \
211               sed -e '/\/\.$/d' -e 's@/./@/@g'`"
212    # Find all links to directories.
213    # Using `-exec test -d' in find fails on some systems,
214    # and trying to run test via sh fails on others,
215    # so this is the simplest alternative left.
216    # First find all the links, then test each one.
217    theselinks=
218    $LINKS && \
219      theselinks=`find $d/. -type l -print | sed -e 's@/./@/@g'`
220    for d1 in $theselinks --dummy--
221    do
222      # If the link points to a directory,
223      # add that dir to $newdirs
224      if [ -d $d1 ]
225      then
226        all_dirs="$all_dirs $d1"
227        if [ "`ls -ld $d1 | sed -n 's/.*-> //p'`" != "." ]
228        then
229          newdirs="$newdirs $d1"
230          search_dirs="$search_dirs $d1"
231        fi
232      fi
233    done
234  done
235
236  dirs="$newdirs"
237done
238
239# # # # # # # # # # # # # # # # # # # # #
240#
241dirs=
242if test $VERBOSE -gt 2
243then echo "All directories (including links to directories):"
244     echo $all_dirs
245fi
246
247for file in $all_dirs; do
248  rm -rf $LIB/$file
249  if [ ! -d $LIB/$file ]
250  then mkdir $LIB/$file
251  fi
252done
253mkdir $LIB/root
254
255# # # # # # # # # # # # # # # # # # # # #
256#
257# treetops gets an alternating list
258# of old directories to copy
259# and the new directories to copy to.
260treetops=". ${LIB}"
261
262if $LINKS; then
263  if test $VERBOSE -gt 1
264  then echo 'Making symbolic directory links' ; fi
265  cwd=`${PWDCMD}`
266
267  for sym_link in $search_dirs; do
268    cd ${INPUT}
269    dest=`ls -ld ${sym_link} | sed -n 's/.*-> //p'`
270
271    # In case $dest is relative, get to ${sym_link}'s dir first.
272    #
273    cd ./`echo ${sym_link} | sed 's;/[^/]*$;;'`
274
275    # Check that the target directory exists.
276    # Redirections changed to avoid bug in sh on Ultrix.
277    #
278    (cd $dest) > /dev/null 2>&1
279    if [ $? = 0 ]; then
280      cd $dest
281
282      # full_dest_dir gets the dir that the link actually leads to.
283      #
284      full_dest_dir=`${PWDCMD}`
285
286      # Canonicalize ${INPUT} now to minimize the time an
287      # automounter has to change the result of ${PWDCMD}.
288      #
289      cinput=`cd ${INPUT}; ${PWDCMD}`
290
291      # If a link points to ., make a similar link to .
292      #
293      if [ ${full_dest_dir} = ${cinput} ]; then
294        if test $VERBOSE -gt 2
295        then echo ${sym_link} '->' . ': Making self link' ; fi
296        rm -fr ${LIB}/${sym_link} > /dev/null 2>&1
297        ln -s . ${LIB}/${sym_link} > /dev/null 2>&1
298
299      # If link leads back into ${INPUT},
300      # make a similar link here.
301      #
302      elif expr ${full_dest_dir} : "${cinput}/.*" > /dev/null; then
303        # Y gets the actual target dir name, relative to ${INPUT}.
304        y=`echo ${full_dest_dir} | sed -n "s&${cinput}/&&p"`
305        # DOTS is the relative path from ${LIB}/${sym_link} back to ${LIB}.
306        dots=`echo "${sym_link}" |
307          sed -e 's@^./@@' -e 's@/./@/@g' -e 's@[^/][^/]*@..@g' -e 's@..$@@'`
308        if test $VERBOSE -gt 2
309        then echo ${sym_link} '->' $dots$y ': Making local link' ; fi
310        rm -fr ${LIB}/${sym_link} > /dev/null 2>&1
311        ln -s $dots$y ${LIB}/${sym_link} > /dev/null 2>&1
312
313      else
314        # If the link is to a dir $target outside ${INPUT},
315        # repoint the link at ${INPUT}/root$target
316        # and process $target into ${INPUT}/root$target
317        # treat this directory as if it actually contained the files.
318        #
319        if test $VERBOSE -gt 2
320        then echo ${sym_link} '->' root${full_dest_dir} ': Making rooted link'
321        fi
322        if [ -d $LIB/root${full_dest_dir} ]
323        then true
324        else
325          dirname=root${full_dest_dir}/
326          dirmade=.
327          cd $LIB
328          while [ x$dirname != x ]; do
329            component=`echo $dirname | sed -e 's|/.*$||'`
330            mkdir $component >/dev/null 2>&1
331            cd $component
332            dirmade=$dirmade/$component
333            dirname=`echo $dirname | sed -e 's|[^/]*/||'`
334          done
335        fi
336
337        # Duplicate directory structure created in ${LIB}/${sym_link} in new
338        # root area.
339        #
340        for file2 in $all_dirs; do
341          case $file2 in
342            ${sym_link}/*)
343              dupdir=${LIB}/root${full_dest_dir}/`echo $file2 |
344                      sed -n "s|^${sym_link}/||p"`
345              if test $VERBOSE -gt 2
346              then echo "Duplicating ${sym_link}'s ${dupdir}" ; fi
347              if [ -d ${dupdir} ]
348              then true
349              else
350                mkdir ${dupdir}
351              fi
352              ;;
353            *)
354              ;;
355          esac
356        done
357
358        # Get the path from ${LIB} to ${sym_link}, accounting for symlinks.
359        #
360        parent=`echo "${sym_link}" | sed -e 's@/[^/]*$@@'`
361        libabs=`cd ${LIB}; ${PWDCMD}`
362        file2=`cd ${LIB}; cd $parent; ${PWDCMD} | sed -e "s@^${libabs}@@"`
363
364        # DOTS is the relative path from ${LIB}/${sym_link} back to ${LIB}.
365        #
366        dots=`echo "$file2" | sed -e 's@/[^/]*@../@g'`
367        rm -fr ${LIB}/${sym_link} > /dev/null 2>&1
368        ln -s ${dots}root${full_dest_dir} ${LIB}/${sym_link} > /dev/null 2>&1
369        treetops="$treetops ${sym_link} ${LIB}/root${full_dest_dir}"
370      fi
371    fi
372  done
373fi
374
375# # # # # # # # # # # # # # # # # # # # #
376#
377required=
378set x $treetops
379shift
380while [ $# != 0 ]; do
381  # $1 is an old directory to copy, and $2 is the new directory to copy to.
382  #
383  SRCDIR=`cd ${INPUT} ; cd $1 ; ${PWDCMD}`
384  export SRCDIR
385
386  FIND_BASE=$1
387  export FIND_BASE
388  shift
389
390  DESTDIR=`cd $1;${PWDCMD}`
391  export DESTDIR
392  shift
393
394  # The same dir can appear more than once in treetops.
395  # There's no need to scan it more than once.
396  #
397  if [ -f ${DESTDIR}/DONE ]
398  then continue ; fi
399
400  touch ${DESTDIR}/DONE
401  if test $VERBOSE -gt 1
402  then echo Fixing directory ${SRCDIR} into ${DESTDIR} ; fi
403
404  # Check files which are symlinks as well as those which are files.
405  #
406  cd ${INPUT}
407  required="$required `if $LINKS; then
408    find ${FIND_BASE}/. -name '*.h' \( -type f -o -type l \) -print
409  else
410    find ${FIND_BASE}/. -name '*.h' -type f -print
411  fi | \
412    sed -e 's;/\./;/;g' -e 's;//*;/;g' | \
413    ${FIXINCL}`"
414done
415
416## Make sure that any include files referenced using double quotes
417## exist in the fixed directory.  This comes last since otherwise
418## we might end up deleting some of these files "because they don't
419## need any change."
420set x `echo $required`
421shift
422while [ $# != 0 ]; do
423  newreq=
424  while [ $# != 0 ]; do
425    # $1 is the directory to copy from,
426    # $2 is the unfixed file,
427    # $3 is the fixed file name.
428    #
429    cd ${INPUT}
430    cd $1
431    if [ -f $2 ] ; then
432      if [ -r $2 ] && [ ! -r $3 ]; then
433        cp $2 $3 >/dev/null 2>&1 || echo "Can't copy $2" >&2
434        chmod +w $3 2>/dev/null
435        chmod a+r $3 2>/dev/null
436        if test $VERBOSE -gt 2
437        then echo Copied $2 ; fi
438        for include in `egrep '^[ 	]*#[ 	]*include[ 	]*"[^/]' $3 |
439             sed -e 's/^[ 	]*#[ 	]*include[ 	]*"\([^"]*\)".*$/\1/'`
440        do
441	  dir=`echo $2 | sed -e s'|/[^/]*$||'`
442	  dir2=`echo $3 | sed -e s'|/[^/]*$||'`
443	  newreq="$newreq $1 $dir/$include $dir2/$include"
444        done
445      fi
446    fi
447    shift; shift; shift
448  done
449  set x $newreq
450  shift
451done
452
453if test $VERBOSE -gt 2
454then echo 'Cleaning up DONE files.' ; fi
455cd $LIB
456# Look for files case-insensitively, for the benefit of
457# DOS/Windows filesystems.
458find . -name '[Dd][Oo][Nn][Ee]' -exec rm -f '{}' ';'
459
460if test $VERBOSE -gt 1
461then echo 'Cleaning up unneeded directories:' ; fi
462cd $LIB
463all_dirs=`find . -type d \! -name '.' -print | sort -r`
464for file in $all_dirs; do
465  if rmdir $LIB/$file > /dev/null
466  then
467    test $VERBOSE -gt 3 && echo "  removed $file"
468  fi
469done 2> /dev/null
470
471# On systems which don't support symlinks, `find' may barf
472# if called with "-type l" predicate.  So only use that if
473# we know we should look for symlinks.
474if $LINKS; then
475  test $VERBOSE -gt 2 && echo "Removing unused symlinks"
476
477  all_dirs=`find . -type l -print`
478  for file in $all_dirs
479  do
480    if test ! -d $file
481    then
482      rm -f $file
483      test $VERBOSE -gt 3 && echo "  removed $file"
484      rmdir `dirname $file` > /dev/null && \
485           test $VERBOSE -gt 3 && \
486           echo "  removed `dirname $file`"
487    fi
488  done 2> /dev/null
489fi
490
491if test $VERBOSE -gt 0
492then echo fixincludes is done ; fi
493
494# # # # # # # # # # # # # # # # # # # # #
495#
496# End of for INPUT directories
497#
498done
499#
500# # # # # # # # # # # # # # # # # # # # #
501