gcc/fixproto

   1 #!/bin/sh
   2 #
   3 # SYNOPSIS
   4 #       fixproto TARGET-DIR SOURCE-DIR-ALL SOURCE-DIR-STD
   5 #
   6 # COPYRIGHT
   7 #       Copyright (C) 1993, 1994 Free Software Foundation, Inc.
   8 #       This file is part of GNU CC.
   9 #
  10 #       GNU CC is free software; you can redistribute it and/or modify
  11 #       it under the terms of the GNU General Public License as published by
  12 #       the Free Software Foundation; either version 2, or (at your option)
  13 #       any later version.
  14 #
  15 #       GNU CC is distributed in the hope that it will be useful,
  16 #       but WITHOUT ANY WARRANTY; without even the implied warranty of
  17 #       MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18 #       GNU General Public License for more details.
  19 #
  20 #       You should have received a copy of the GNU General Public License
  21 #       along with GNU CC; see the file COPYING.  If not, write to
  22 #       the Free Software Foundation, 59 Temple Place - Suite 330,
  23 #       Boston, MA 02111-1307, USA.
  24 #
  25 # DESCRIPTION
  26 #       Adjunct script for GNU CC to populate a directory with ANSI,
  27 #       Posix.1, and C++ compatible header files.
  28 #
  29 #       Each file found under SOURCE-DIR-ALL is analyzed and "fixed."
  30 #       Only standard ANSI/POSIX files found under SOURCE-DIR-STD
  31 #       are analyzed and "fixed."
  32 #       The SOURCE-DIRs are searched in order; a file found
  33 #       under multiple SOURCE-DIRs is only handled for the first one.
  34 #
  35 # STRATEGY
  36 #       Each include file is fed through cpp, and the scan-decls program
  37 #       parses it, and emits any found function declarations.
  38 #       The fix-header program analyzes the scan-decls output,
  39 #       together with the original include file, and writes a "fixed"
  40 #       include file, if needed.
  41 #
  42 #       The comment at the beginning of fix-header.c lists specifically
  43 #       what kind of changes are made.
  44 #
  45 # NOTE
  46 #       Some file space will be wasted, because the original header
  47 #       files are copied.  An earlier version just included the original
  48 #       by "reference", using GNU cpp's #include_next mechanism.
  49 #       This is currently not done, partly because #include_next is
  50 #       fragile (susceptible to version incompatibilities, and depends
  51 #       and GCC-specific features), and partly for performance reasons.
  52 #
  53 # AUTHORS
  54 #       Ron Guilmette (rfg@netcom.com) (original idea and code)
  55 #       Per Bothner (bothner@cygnus.com) (major re-write)
  56
  57 progname=$0
  58 progname=`basename $progname`
  59 original_dir=`pwd`
  60 FIX_HEADER=${FIX_HEADER-$original_dir/fix-header}
  61 DEFINES="-D__STDC__=0 -D__cplusplus ${FIXPROTO_DEFINES}"
  62
  63 if [ `echo $1 | wc -w` = 0 ] ; then
  64   echo $progname\: usage\: $progname target-dir \[ source-dir \.\.\. \]
  65   exit 1
  66 fi
  67
  68 std_files="ctype.h dirent.h errno.h curses.h fcntl.h grp.h locale.h math.h pwd.h setjmp.h signal.h stdio.h stdlib.h string.h sys/socket.h sys/stat.h sys/times.h sys/resource.h sys/utsname.h sys/wait.h tar.h termios.h time.h unistd.h utime.h"
  69
  70 rel_target_dir=$1
  71 # All files in $src_dir_all (normally same as $rel_target_dir) are
  72 # processed.
  73 src_dir_all=$2
  74 # In $src_dir_std (normally same as /usr/include), only the
  75 # "standard" ANSI/POSIX files listed in $std_files are processed.
  76 src_dir_std=$3
  77
  78 if [ `expr $rel_target_dir : '\(.\)'` != '/' ] ; then
  79   abs_target_dir=$original_dir/$rel_target_dir
  80 else
  81   abs_target_dir=$rel_target_dir
  82 fi
  83
  84 # Determine whether this system has symbolic links.
  85 if ln -s X $rel_target_dir/ShouldNotExist 2>/dev/null; then
  86   rm -f $rel_target_dir/ShouldNotExist
  87   LINKS=true
  88 elif ln -s X /tmp/ShouldNotExist 2>/dev/null; then
  89   rm -f /tmp/ShouldNotExist
  90   LINKS=true
  91 else
  92   LINKS=false
  93 fi
  94
  95 if [ \! -d $abs_target_dir ] ; then
  96   echo $progname\: creating directory $rel_target_dir
  97   mkdir $abs_target_dir
  98 fi
  99
 100 echo $progname\: populating \`$rel_target_dir\'
 101
 102 include_path=""
 103
 104 if [ `echo $* | wc -w` != 0 ] ; then
 105   for rel_source_dir in $src_dir_all $src_dir_std; do
 106     if [ `expr $rel_source_dir : '\(.\)'` != '/' ] ; then
 107       abs_source_dir=$original_dir/$rel_source_dir
 108     else
 109       abs_source_dir=$rel_source_dir
 110     fi
 111     include_path="$include_path -I$abs_source_dir"
 112   done
 113 fi
 114
 115 required_stdlib_h="abort abs atexit atof atoi atol bsearch calloc exit free getenv labs malloc putenv qsort rand realloc srand strtod strtol strtoul system"
 116 # "div ldiv", - ignored because these depend on div_t, ldiv_t
 117 # ignore these: "mblen mbstowcs mbstowc wcstombs wctomb"
 118 # Left out getgroups, because SunOS4 has incompatible BSD and SVR4 versions.
 119 # Should perhaps also add NULL
 120 required_unistd_h="_exit access alarm chdir chown close ctermid cuserid dup dup2 execl execle execlp execv execve execvp fork fpathconf getcwd getegid geteuid getgid getlogin getopt getpgrp getpid getppid getuid isatty link lseek pathconf pause pipe read rmdir setgid setpgid setsid setuid sleep sysconf tcgetpgrp tcsetpgrp ttyname unlink write"
 121
 122 done_dirs=""
 123 echo "" >fixproto.list
 124
 125 for code in ALL STD ; do
 126
 127   subdirs="."
 128
 129   case $code in
 130     ALL)
 131       rel_source_dir=$src_dir_all
 132
 133       dirs="."
 134       levels=2
 135       while $LINKS && test -n "$dirs" -a $levels -gt 0
 136       do
 137         levels=`expr $levels - 1`
 138         newdirs=
 139         for d in $dirs ; do
 140           # Find all directories under $d, relative to $d, excluding $d itself.
 141           # Assume directory names ending in CC or containing ++ are
 142           # for C++, so skip those.
 143           subdirs="$subdirs "`cd $rel_source_dir/$d; find . -type d -print | \
 144                    sed -e '/^\.$/d' -e "s|^\./|${d}/|" -e 's|^\./||' \
 145                      -e '/CC$/d' -e '/[+][+]/d'`
 146           links=
 147           links=`cd $rel_source_dir; find $d/. -type l -print | \
 148                        sed -e "s|$d/./|$d/|" -e 's|^\./||'`
 149           for link in $links --dummy-- ; do
 150             test -d $rel_source_dir/$link/. && newdirs="$newdirs $link"
 151           done
 152         done
 153         dirs="$newdirs"
 154         subdirs="$subdirs $newdirs"
 155       done
 156       ;;
 157     STD)
 158       rel_source_dir=$src_dir_std
 159       ;;
 160   esac
 161
 162   if [ `expr $rel_source_dir : '\(.\)'` != '/' ] ; then
 163     abs_source_dir=$original_dir/$rel_source_dir
 164   else
 165     abs_source_dir=$rel_source_dir
 166   fi
 167
 168   if [ \! -d $abs_source_dir ] ; then
 169     echo $progname\: warning\: no such directory\: \`$rel_source_dir\'
 170     continue
 171   fi
 172
 173   for rel_source_subdir in $subdirs; do
 174
 175       abs_target_subdir=${abs_target_dir}/${rel_source_subdir}
 176       if [ \! -d $abs_target_subdir ] ; then
 177         mkdir $abs_target_subdir
 178       fi
 179       # Append "/"; remove initial "./". Hence "." -> "" and "sys" -> "sys/".
 180       rel_source_prefix=`echo $rel_source_subdir | sed -e 's|$|/|' -e 's|^./||'`
 181
 182       case $code in
 183         ALL)
 184           # The 'sed' is in case the *.h matches nothing, which yields "*.h"
 185           # which would then get re-globbed in the current directory.  Sigh.
 186           rel_source_files=`cd ${abs_source_dir}/${rel_source_subdir}; echo *.h | sed -e 's|[*].h|NONE|'`
 187           ;;
 188
 189         STD)
 190           files_to_check="$std_files"
 191           rel_source_files=""
 192
 193           # Also process files #included by the $std_files.
 194           while [ -n "${files_to_check}" ]
 195           do
 196             new_files_to_check=""
 197             for file in $files_to_check ; do
 198               xxfile=`echo $file | sed -e 's|/\([^/\.][^/\.]*\)/\.\./|/|'`
 199               # Create the dir where this file will go when fixed.
 200               xxdir=`echo ./$file | sed -e 's|/[^/]*$||'`
 201               if [ \! -d $abs_target_subdir/$xxdir ] ; then
 202                 mkdir $abs_target_subdir/$xxdir
 203               fi
 204               # Just in case we have edited out a symbolic link
 205               if [ -f $src_dir_std/$file -a -f $src_dir_std/$xxfile ] ; then
 206                 file=$xxfile
 207               fi
 208               case " $rel_source_files " in
 209                 *" ${file} "*)
 210                   # Already seen $file; nothing to do
 211                   ;;
 212                 *)
 213                   if test -f $src_dir_std/$file ; then
 214                     rel_dir=`echo $file | sed -n -e 's|^\(.*/\)[^/]*$|\1|p'`
 215                     # For #include "foo.h", that might be either "foo.h"
 216                     # or "${rel_dir}foo.h (or something bogus).
 217                     new_files_to_check="$new_files_to_check "`sed -n \
 218                         -e 's@  @ @g' \
 219                         -e 's@^ *# *include *<\([^>]*\)>.*$@\1@p' -e \
 220                         's@^ *# *include *\"\([^\"]*\)\".*$@\1 '$rel_dir'\1@p'\
 221                         <$src_dir_std/$file`
 222                     rel_source_files="$rel_source_files $file"
 223                   fi
 224                   ;;
 225               esac
 226             done
 227             files_to_check="$new_files_to_check"
 228           done
 229           rel_source_files="$rel_source_files"
 230           ;;
 231       esac
 232
 233       for filename in $rel_source_files ; do
 234         rel_source_file=${rel_source_prefix}${filename}
 235         abs_source_file=$abs_source_dir/$rel_source_file
 236         abs_target_file=$abs_target_dir/$rel_source_file
 237
 238         if test "$filename" = 'NONE' ; then
 239           echo "(No *.h files in $abs_source_dir/$rel_source_subdir)"
 240         # If target file exists, check if was written while processing one
 241         # of the earlier source directories;  if so ignore it.
 242         elif test -f $abs_target_file -a -n "$done_dirs" \
 243           && grep "$rel_source_file" fixproto.list >/dev/null
 244         then true
 245         else
 246           $FIX_HEADER $rel_source_file $abs_source_file $abs_target_file ${DEFINES} $include_path
 247           echo "${rel_source_file}" >>fixproto.list
 248         fi
 249       done
 250     done
 251     done_dirs="$done_dir $rel_source_dir"
 252 done
 253
 254 # This might be more cleanly moved into the main loop, by adding
 255 # a <dummy> source directory at the end.  FIXME!
 256 for rel_source_file in unistd.h stdlib.h
 257 do
 258   if grep "$rel_source_file" fixproto.list >/dev/null
 259   then true
 260   else
 261     echo Adding missing $rel_source_file
 262     rel_source_ident=`echo $rel_source_file | tr ./ __`
 263     required_list=`eval echo '${required_'${rel_source_ident}'-}'`
 264     cat >tmp.h <<EOF
 265 #ifndef ${rel_source_ident}
 266 #define ${rel_source_ident}
 267 #endif
 268 EOF
 269     ${FIX_HEADER} $rel_source_file tmp.h $abs_target_dir/$rel_source_file ${DEFINES} $include_path
 270     rm tmp.h
 271   fi
 272 done
 273 exit 0