Diff for /gforth/install-sh between versions 1.1 and 1.3

version 1.1, 1994/12/12 17:10:40 version 1.3, 2007/06/02 14:25:26
Line 1 Line 1
 #!/bin/sh  #!/bin/sh
 #  
 # install - install a program, script, or datafile  # install - install a program, script, or datafile
 # This comes from X11R5.  
   scriptversion=2006-10-14.15
   
   # This originates from X11R5 (mit/util/scripts/install.sh), which was
   # later released in X11R6 (xc/config/util/install.sh) with the
   # following copyright and license.
   #
   # Copyright (C) 1994 X Consortium
   #
   # Permission is hereby granted, free of charge, to any person obtaining a copy
   # of this software and associated documentation files (the "Software"), to
   # deal in the Software without restriction, including without limitation the
   # rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
   # sell copies of the Software, and to permit persons to whom the Software is
   # furnished to do so, subject to the following conditions:
   #
   # The above copyright notice and this permission notice shall be included in
   # all copies or substantial portions of the Software.
   #
   # THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
   # IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
   # FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
   # X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
   # AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNEC-
   # TION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
   #
   # Except as contained in this notice, the name of the X Consortium shall not
   # be used in advertising or otherwise to promote the sale, use or other deal-
   # ings in this Software without prior written authorization from the X Consor-
   # tium.
   #
   #
   # FSF changes to this file are in the public domain.
 #  #
 # Calling this script install-sh is preferred over install.sh, to prevent  # Calling this script install-sh is preferred over install.sh, to prevent
 # `make' implicit rules from creating a file called install from it  # `make' implicit rules from creating a file called install from it
Line 9 Line 40
 #  #
 # This script is compatible with the BSD install script, but was written  # This script is compatible with the BSD install script, but was written
 # from scratch.  # from scratch.
 #  
   
   nl='
   '
   IFS=" ""        $nl"
   
 # set DOITPROG to echo to test this script  # set DOITPROG to echo to test this script
   
 # Don't use :- since 4.3BSD and earlier shells don't like it.  # Don't use :- since 4.3BSD and earlier shells don't like it.
 doit="${DOITPROG-}"  doit="${DOITPROG-}"
   if test -z "$doit"; then
     doit_exec=exec
   else
     doit_exec=$doit
   fi
   
   # Put in absolute file names if you don't have them in your path;
 # put in absolute paths if you don't have them in your path; or use env. vars.  # or use environment vars.
   
 mvprog="${MVPROG-mv}"  mvprog="${MVPROG-mv}"
 cpprog="${CPPROG-cp}"  cpprog="${CPPROG-cp}"
Line 29  stripprog="${STRIPPROG-strip}" Line 67  stripprog="${STRIPPROG-strip}"
 rmprog="${RMPROG-rm}"  rmprog="${RMPROG-rm}"
 mkdirprog="${MKDIRPROG-mkdir}"  mkdirprog="${MKDIRPROG-mkdir}"
   
 tranformbasename=""  posix_glob=
 transform_arg=""  posix_mkdir=
 instcmd="$mvprog"  
 chmodcmd="$chmodprog 0755"  
 chowncmd=""  
 chgrpcmd=""  
 stripcmd=""  
 rmcmd="$rmprog -f"  
 mvcmd="$mvprog"  
 src=""  
 dst=""  
 dir_arg=""  
   
 while [ x"$1" != x ]; do  
     case $1 in  
         -c) instcmd="$cpprog"  
             shift  
             continue;;  
   
         -d) dir_arg=true  
             shift  
             continue;;  
   
         -m) chmodcmd="$chmodprog $2"  
             shift  
             shift  
             continue;;  
   
         -o) chowncmd="$chownprog $2"  
             shift  
             shift  
             continue;;  
   
         -g) chgrpcmd="$chgrpprog $2"  
             shift  
             shift  
             continue;;  
   
         -s) stripcmd="$stripprog"  
             shift  
             continue;;  
   
         -t=*) transformarg=`echo $1 | sed 's/-t=//'`  
             shift  
             continue;;  
   
         -b=*) transformbasename=`echo $1 | sed 's/-b=//'`  
             shift  
             continue;;  
   
         *)  if [ x"$src" = x ]  # Desired mode of installed file.
             then  mode=0755
                 src=$1  
             else  
                 # this colon is to work around a 386BSD /bin/sh bug  
                 :  
                 dst=$1  
             fi  
             shift  
             continue;;  
     esac  
 done  
   
 if [ x"$src" = x ]  chmodcmd=$chmodprog
 then  chowncmd=
         echo "install:  no input file specified"  chgrpcmd=
         exit 1  stripcmd=
 else  rmcmd="$rmprog -f"
         true  mvcmd="$mvprog"
 fi  src=
   dst=
 if [ x"$dir_arg" != x ]; then  dir_arg=
         dst=$src  dstarg=
         src=""  no_target_directory=
           
         if [ -d $dst ]; then  usage="Usage: $0 [OPTION]... [-T] SRCFILE DSTFILE
                 instcmd=:     or: $0 [OPTION]... SRCFILES... DIRECTORY
         else     or: $0 [OPTION]... -t DIRECTORY SRCFILES...
                 instcmd=mkdir     or: $0 [OPTION]... -d DIRECTORIES...
         fi  
 else  In the 1st form, copy SRCFILE to DSTFILE.
   In the 2nd and 3rd, copy all SRCFILES to DIRECTORY.
 # Waiting for this to be detected by the "$instcmd $src $dsttmp" command  In the 4th, create DIRECTORIES.
 # might cause directories to be created, which would be especially bad   
 # if $src (and thus $dsttmp) contains '*'.  Options:
   -c         (ignored)
         if [ -f $src -o -d $src ]  -d         create directories instead of installing files.
         then  -g GROUP   $chgrpprog installed files to GROUP.
                 true  -m MODE    $chmodprog installed files to MODE.
         else  -o USER    $chownprog installed files to USER.
                 echo "install:  $src does not exist"  -s         $stripprog installed files.
                 exit 1  -t DIRECTORY  install into DIRECTORY.
         fi  -T         report an error if DSTFILE is a directory.
           --help     display this help and exit.
         if [ x"$dst" = x ]  --version  display version info and exit.
         then  
                 echo "install:  no destination specified"  Environment variables override the default commands:
                 exit 1    CHGRPPROG CHMODPROG CHOWNPROG CPPROG MKDIRPROG MVPROG RMPROG STRIPPROG
         else  "
                 true  
         fi  while test $# -ne 0; do
     case $1 in
       -c) shift
           continue;;
   
       -d) dir_arg=true
           shift
           continue;;
   
       -g) chgrpcmd="$chgrpprog $2"
           shift
           shift
           continue;;
   
       --help) echo "$usage"; exit $?;;
   
       -m) mode=$2
           shift
           shift
           case $mode in
             *' '* | *'    '* | *'
   '*        | *'*'* | *'?'* | *'['*)
               echo "$0: invalid mode: $mode" >&2
               exit 1;;
           esac
           continue;;
   
       -o) chowncmd="$chownprog $2"
           shift
           shift
           continue;;
   
       -s) stripcmd=$stripprog
           shift
           continue;;
   
 # If destination is a directory, append the input filename; if your system      -t) dstarg=$2
 # does not like double slashes in filenames, you may need to add some logic          shift
           shift
           continue;;
   
         if [ -d $dst ]      -T) no_target_directory=true
         then          shift
                 dst="$dst"/`basename $src`          continue;;
         else  
                 true  
         fi  
 fi  
   
 ## this sed command emulates the dirname command      --version) echo "$0 $scriptversion"; exit $?;;
 dstdir=`echo $dst | sed -e 's,[^/]*$,,;s,/$,,;s,^$,.,'`  
   
 # Make sure that the destination directory exists.      --) shift
 #  this part is taken from Noah Friedman's mkinstalldirs script          break;;
   
 # Skip lots of stat calls in the usual case.      -*) echo "$0: invalid option: $1" >&2
 if [ ! -d "$dstdir" ]; then          exit 1;;
 defaultIFS='      
 '  
 IFS="${IFS-${defaultIFS}}"  
   
 oIFS="${IFS}"      *)  break;;
 # Some sh's can't handle IFS=/ for some reason.    esac
 IFS='%'  done
 set - `echo ${dstdir} | sed -e 's@/@%@g' -e 's@^%@/@'`  
 IFS="${oIFS}"  
   
 pathcomp=''  if test $# -ne 0 && test -z "$dir_arg$dstarg"; then
     # When -d is used, all remaining arguments are directories to create.
     # When -t is used, the destination is already specified.
     # Otherwise, the last argument is the destination.  Remove it from $@.
     for arg
     do
       if test -n "$dstarg"; then
         # $@ is not empty: it contains at least $arg.
         set fnord "$@" "$dstarg"
         shift # fnord
       fi
       shift # arg
       dstarg=$arg
     done
   fi
   
 while [ $# -ne 0 ] ; do  if test $# -eq 0; then
         pathcomp="${pathcomp}${1}"    if test -z "$dir_arg"; then
         shift      echo "$0: no input file specified." >&2
       exit 1
     fi
     # It's OK to call `install-sh -d' without argument.
     # This can happen when creating conditional directories.
     exit 0
   fi
   
         if [ ! -d "${pathcomp}" ] ;  if test -z "$dir_arg"; then
         then    trap '(exit $?); exit' 1 2 13 15
                 $mkdirprog "${pathcomp}"  
         else  
                 true  
         fi  
   
         pathcomp="${pathcomp}/"    # Set umask so as not to create temps with too-generous modes.
 done    # However, 'strip' requires both read and write access to temps.
     case $mode in
       # Optimize common cases.
       *644) cp_umask=133;;
       *755) cp_umask=22;;
   
       *[0-7])
         if test -z "$stripcmd"; then
           u_plus_rw=
         else
           u_plus_rw='% 200'
         fi
         cp_umask=`expr '(' 777 - $mode % 1000 ')' $u_plus_rw`;;
       *)
         if test -z "$stripcmd"; then
           u_plus_rw=
         else
           u_plus_rw=,u+rw
         fi
         cp_umask=$mode$u_plus_rw;;
     esac
 fi  fi
   
 if [ x"$dir_arg" != x ]  for src
 then  do
         $doit $instcmd $dst &&    # Protect names starting with `-'.
     case $src in
         if [ x"$chowncmd" != x ]; then $doit $chowncmd $dst; else true ; fi &&      -*) src=./$src ;;
         if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd $dst; else true ; fi &&    esac
         if [ x"$stripcmd" != x ]; then $doit $stripcmd $dst; else true ; fi &&  
         if [ x"$chmodcmd" != x ]; then $doit $chmodcmd $dst; else true ; fi    if test -n "$dir_arg"; then
 else      dst=$src
       dstdir=$dst
 # If we're going to rename the final executable, determine the name now.      test -d "$dstdir"
       dstdir_status=$?
     else
   
       # Waiting for this to be detected by the "$cpprog $src $dsttmp" command
       # might cause directories to be created, which would be especially bad
       # if $src (and thus $dsttmp) contains '*'.
       if test ! -f "$src" && test ! -d "$src"; then
         echo "$0: $src does not exist." >&2
         exit 1
       fi
   
       if test -z "$dstarg"; then
         echo "$0: no destination specified." >&2
         exit 1
       fi
   
       dst=$dstarg
       # Protect names starting with `-'.
       case $dst in
         -*) dst=./$dst ;;
       esac
   
         if [ x"$transformarg" = x ]       # If destination is a directory, append the input filename; won't work
         then      # if double slashes aren't ignored.
                 dstfile=`basename $dst`      if test -d "$dst"; then
         if test -n "$no_target_directory"; then
           echo "$0: $dstarg: Is a directory" >&2
           exit 1
         fi
         dstdir=$dst
         dst=$dstdir/`basename "$src"`
         dstdir_status=0
       else
         # Prefer dirname, but fall back on a substitute if dirname fails.
         dstdir=`
           (dirname "$dst") 2>/dev/null ||
           expr X"$dst" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
                X"$dst" : 'X\(//\)[^/]' \| \
                X"$dst" : 'X\(//\)$' \| \
                X"$dst" : 'X\(/\)' \| . 2>/dev/null ||
           echo X"$dst" |
               sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
                      s//\1/
                      q
                    }
                    /^X\(\/\/\)[^/].*/{
                      s//\1/
                      q
                    }
                    /^X\(\/\/\)$/{
                      s//\1/
                      q
                    }
                    /^X\(\/\).*/{
                      s//\1/
                      q
                    }
                    s/.*/./; q'
         `
   
         test -d "$dstdir"
         dstdir_status=$?
       fi
     fi
   
     obsolete_mkdir_used=false
   
     if test $dstdir_status != 0; then
       case $posix_mkdir in
         '')
           # Create intermediate dirs using mode 755 as modified by the umask.
           # This is like FreeBSD 'install' as of 1997-10-28.
           umask=`umask`
           case $stripcmd.$umask in
             # Optimize common cases.
             *[2367][2367]) mkdir_umask=$umask;;
             .*0[02][02] | .[02][02] | .[02]) mkdir_umask=22;;
   
             *[0-7])
               mkdir_umask=`expr $umask + 22 \
                 - $umask % 100 % 40 + $umask % 20 \
                 - $umask % 10 % 4 + $umask % 2
               `;;
             *) mkdir_umask=$umask,go-w;;
           esac
   
           # With -d, create the new directory with the user-specified mode.
           # Otherwise, rely on $mkdir_umask.
           if test -n "$dir_arg"; then
             mkdir_mode=-m$mode
         else          else
                 dstfile=`basename $dst $transformbasename |             mkdir_mode=
                         sed $transformarg`$transformbasename  
         fi          fi
   
 # don't allow the sed command to completely eliminate the filename          posix_mkdir=false
           case $umask in
             *[123567][0-7][0-7])
               # POSIX mkdir -p sets u+wx bits regardless of umask, which
               # is incompatible with FreeBSD 'install' when (umask & 300) != 0.
               ;;
             *)
               tmpdir=${TMPDIR-/tmp}/ins$RANDOM-$$
               trap 'ret=$?; rmdir "$tmpdir/d" "$tmpdir" 2>/dev/null; exit $ret' 0
   
         if [ x"$dstfile" = x ]               if (umask $mkdir_umask &&
         then                  exec $mkdirprog $mkdir_mode -p -- "$tmpdir/d") >/dev/null 2>&1
                 dstfile=`basename $dst`              then
                 if test -z "$dir_arg" || {
                      # Check for POSIX incompatibilities with -m.
                      # HP-UX 11.23 and IRIX 6.5 mkdir -m -p sets group- or
                      # other-writeable bit of parent directory when it shouldn't.
                      # FreeBSD 6.1 mkdir -m -p sets mode of existing directory.
                      ls_ld_tmpdir=`ls -ld "$tmpdir"`
                      case $ls_ld_tmpdir in
                        d????-?r-*) different_mode=700;;
                        d????-?--*) different_mode=755;;
                        *) false;;
                      esac &&
                      $mkdirprog -m$different_mode -p -- "$tmpdir" && {
                        ls_ld_tmpdir_1=`ls -ld "$tmpdir"`
                        test "$ls_ld_tmpdir" = "$ls_ld_tmpdir_1"
                      }
                    }
                 then posix_mkdir=:
                 fi
                 rmdir "$tmpdir/d" "$tmpdir"
               else
                 # Remove any dirs left behind by ancient mkdir implementations.
                 rmdir ./$mkdir_mode ./-p ./-- 2>/dev/null
               fi
               trap '' 0;;
           esac;;
       esac
   
       if
         $posix_mkdir && (
           umask $mkdir_umask &&
           $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir"
         )
       then :
       else
   
         # The umask is ridiculous, or mkdir does not conform to POSIX,
         # or it failed possibly due to a race condition.  Create the
         # directory the slow way, step by step, checking for races as we go.
   
         case $dstdir in
           /*) prefix=/ ;;
           -*) prefix=./ ;;
           *)  prefix= ;;
         esac
   
         case $posix_glob in
           '')
             if (set -f) 2>/dev/null; then
               posix_glob=true
             else
               posix_glob=false
             fi ;;
         esac
   
         oIFS=$IFS
         IFS=/
         $posix_glob && set -f
         set fnord $dstdir
         shift
         $posix_glob && set +f
         IFS=$oIFS
   
         prefixes=
   
         for d
         do
           test -z "$d" && continue
   
           prefix=$prefix$d
           if test -d "$prefix"; then
             prefixes=
         else          else
                 true            if $posix_mkdir; then
               (umask=$mkdir_umask &&
                $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir") && break
               # Don't fail if two instances are running concurrently.
               test -d "$prefix" || exit 1
             else
               case $prefix in
                 *\'*) qprefix=`echo "$prefix" | sed "s/'/'\\\\\\\\''/g"`;;
                 *) qprefix=$prefix;;
               esac
               prefixes="$prefixes '$qprefix'"
             fi
         fi          fi
           prefix=$prefix/
         done
   
 # Make a temp file name in the proper directory.        if test -n "$prefixes"; then
           # Don't fail if two instances are running concurrently.
         dsttmp=$dstdir/#inst.$$#          (umask $mkdir_umask &&
            eval "\$doit_exec \$mkdirprog $prefixes") ||
 # Move or copy the file name to the temp name            test -d "$dstdir" || exit 1
           obsolete_mkdir_used=true
         $doit $instcmd $src $dsttmp &&        fi
       fi
         trap "rm -f ${dsttmp}" 0 &&    fi
   
 # and set any options; do chmod last to preserve setuid bits    if test -n "$dir_arg"; then
       { test -z "$chowncmd" || $doit $chowncmd "$dst"; } &&
 # If any of these fail, we abort the whole thing.  If we want to      { test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } &&
 # ignore errors from any of these, just make sure not to ignore      { test "$obsolete_mkdir_used$chowncmd$chgrpcmd" = false ||
 # errors from the above "$doit $instcmd $src $dsttmp" command.        test -z "$chmodcmd" || $doit $chmodcmd $mode "$dst"; } || exit 1
     else
         if [ x"$chowncmd" != x ]; then $doit $chowncmd $dsttmp; else true;fi &&  
         if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd $dsttmp; else true;fi &&      # Make a couple of temp file names in the proper directory.
         if [ x"$stripcmd" != x ]; then $doit $stripcmd $dsttmp; else true;fi &&      dsttmp=$dstdir/_inst.$$_
         if [ x"$chmodcmd" != x ]; then $doit $chmodcmd $dsttmp; else true;fi &&      rmtmp=$dstdir/_rm.$$_
   
 # Now rename the file to the real destination.      # Trap to clean up those temp files at exit.
       trap 'ret=$?; rm -f "$dsttmp" "$rmtmp" && exit $ret' 0
         $doit $rmcmd -f $dstdir/$dstfile &&  
         $doit $mvcmd $dsttmp $dstdir/$dstfile       # Copy the file name to the temp name.
       (umask $cp_umask && $doit_exec $cpprog "$src" "$dsttmp") &&
 fi &&  
       # and set any options; do chmod last to preserve setuid bits.
       #
       # If any of these fail, we abort the whole thing.  If we want to
       # ignore errors from any of these, just make sure not to ignore
       # errors from the above "$doit $cpprog $src $dsttmp" command.
       #
       { test -z "$chowncmd" || $doit $chowncmd "$dsttmp"; } \
         && { test -z "$chgrpcmd" || $doit $chgrpcmd "$dsttmp"; } \
         && { test -z "$stripcmd" || $doit $stripcmd "$dsttmp"; } \
         && { test -z "$chmodcmd" || $doit $chmodcmd $mode "$dsttmp"; } &&
   
       # Now rename the file to the real destination.
       { $doit $mvcmd -f "$dsttmp" "$dst" 2>/dev/null \
         || {
              # The rename failed, perhaps because mv can't rename something else
              # to itself, or perhaps because mv is so ancient that it does not
              # support -f.
   
              # Now remove or move aside any old file at destination location.
              # We try this two ways since rm can't unlink itself on some
              # systems and the destination file might be busy for other
              # reasons.  In this case, the final cleanup might fail but the new
              # file should still install successfully.
              {
                if test -f "$dst"; then
                  $doit $rmcmd -f "$dst" 2>/dev/null \
                  || { $doit $mvcmd -f "$dst" "$rmtmp" 2>/dev/null \
                        && { $doit $rmcmd -f "$rmtmp" 2>/dev/null; :; }; }\
                  || {
                    echo "$0: cannot unlink or rename $dst" >&2
                    (exit 1); exit 1
                  }
                else
                  :
                fi
              } &&
   
              # Now rename the file to the real destination.
              $doit $mvcmd "$dsttmp" "$dst"
            }
       } || exit 1
   
       trap '' 0
     fi
   done
   
 exit 0  # Local variables:
   # eval: (add-hook 'write-file-hooks 'time-stamp)
   # time-stamp-start: "scriptversion="
   # time-stamp-format: "%:y-%02m-%02d.%02H"
   # time-stamp-end: "$"
   # End:

Removed from v.1.1  
changed lines
  Added in v.1.3


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>