The R Project SVN – R – Diff – /trunk/tools/install-sh

 #!/bin/sh
 # install - install a program, script, or datafile
-scriptversion=2003-09-24.23
+scriptversion=2004-01-13.14
 # 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.
+#
 src=
 dst=
 dir_arg=
 usage="Usage: $0 [OPTION]... SRCFILE DSTFILE
+   or: $0 [OPTION]... SRCFILES... DIRECTORY
-   or: $0 -d DIR1 DIR2...
+   or: $0 -d DIRECTORIES...
 In the first form, install SRCFILE to DSTFILE, removing SRCFILE by default.
 In the second, create the directory path DIR.
 Options:
         shift
         continue;;
     --version) echo "$0 $scriptversion"; exit 0;;
+    *)  # When -d is used, all remaining arguments are directories to create.
-    *)  if test -z "$src"; then
+	test -n "$dir_arg" && break
+        # Otherwise, the last argument is the destination.  Remove it from $@.
-          src=$1
+	for arg
+	do
-        else
+          if test -n "$dstarg"; then
-          # this colon is to work around a 386BSD /bin/sh bug
+	    # $@ is not empty: it contains at least $arg.
-          :
+	    set fnord "$@" "$dstarg"
-          dst=$1
+	    shift # fnord
-        fi
+	  fi
-        shift
+	  shift # arg
-        continue;;
+	  dstarg=$arg
+	done
+	break;;
   esac
 done
-if test -z "$src"; then
+if test -z "$1"; then
-  echo "$0: no input file specified." >&2
-  exit 1
-fi
-# Protect names starting with `-'.
-case $src in
-  -*) src=./$src ;;
-esac
-if test -n "$dir_arg"; then
+  if test -z "$dir_arg"; then
-  dst=$src
-  src=
-  if test -d "$dst"; then
-    instcmd=:
-    chmodcmd=
-  else
-    instcmd=$mkdirprog
-  fi
-else
-  # Waiting for this to be detected by the "$instcmd $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 "$dst"; then
-    echo "$0: no destination specified." >&2
+    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
+for src
+do
   # Protect names starting with `-'.
-  case $dst in
+  case $src in
-    -*) dst=./$dst ;;
+    -*) src=./$src ;;
   esac
-  # If destination is a directory, append the input filename; won't work
+  if test -n "$dir_arg"; then
-  # if double slashes aren't ignored.
+    dst=$src
+    src=
-  if test -d "$dst"; then
+    if test -d "$dst"; then
+      instcmd=:
+      chmodcmd=
+    else
-    dst=$dst/`basename "$src"`
+      instcmd=$mkdirprog
-  fi
+    fi
+  else
+    # Waiting for this to be detected by the "$instcmd $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
+    fi
-# This sed command emulates the dirname command.
+    if test -z "$dstarg"; then
-dstdir=`echo "$dst" | sed -e 's,[^/]*$,,;s,/$,,;s,^$,.,'`
+      echo "$0: no destination specified." >&2
+      exit 1
+    fi
+    dst=$dstarg
-# Make sure that the destination directory exists.
+    # Protect names starting with `-'.
+    case $dst in
+      -*) dst=./$dst ;;
+    esac
+    # If destination is a directory, append the input filename; won't work
+    # if double slashes aren't ignored.
+    if test -d "$dst"; then
+      dst=$dst/`basename "$src"`
+    fi
+  fi
-# Skip lots of stat calls in the usual case.
-if test ! -d "$dstdir"; then
-  defaultIFS='
-	'
-  IFS="${IFS-$defaultIFS}"
-  oIFS=$IFS
-  # Some sh's can't handle IFS=/ for some reason.
+  # This sed command emulates the dirname command.
-  IFS='%'
-  set - `echo "$dstdir" | sed -e 's@/@%@g' -e 's@^%@/@'`
+  dstdir=`echo "$dst" | sed -e 's,[^/]*$,,;s,/$,,;s,^$,.,'`
-  IFS=$oIFS
-  pathcomp=
-  while test $# -ne 0 ; do
-    pathcomp=$pathcomp$1
-    shift
-    test -d "$pathcomp" || $mkdirprog "$pathcomp"
-    pathcomp=$pathcomp/
-  done
-fi
+  # Make sure that the destination directory exists.
+  # Skip lots of stat calls in the usual case.
-if test -n "$dir_arg"; then
+  if test ! -d "$dstdir"; then
-  $doit $instcmd "$dst" \
+    defaultIFS='
+	 '
-    && { test -z "$chowncmd" || $doit $chowncmd "$dst"; } \
+    IFS="${IFS-$defaultIFS}"
+    oIFS=$IFS
-    && { test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } \
+    # Some sh's can't handle IFS=/ for some reason.
+    IFS='%'
-    && { test -z "$stripcmd" || $doit $stripcmd "$dst"; } \
+    set - `echo "$dstdir" | sed -e 's@/@%@g' -e 's@^%@/@'`
-    && { test -z "$chmodcmd" || $doit $chmodcmd "$dst"; }
+    IFS=$oIFS
+    pathcomp=
-else
-  # If we're going to rename the final executable, determine the name now.
-  if test -z "$transformarg"; then
+    while test $# -ne 0 ; do
-    dstfile=`basename "$dst"`
+      pathcomp=$pathcomp$1
-  else
+      shift
-    dstfile=`basename "$dst" $transformbasename \
+      test -d "$pathcomp" || $mkdirprog "$pathcomp"
-             | sed $transformarg`$transformbasename
+      pathcomp=$pathcomp/
+    done
   fi
+  if test -n "$dir_arg"; then
+    $doit $instcmd "$dst" \
-  # don't allow the sed command to completely eliminate the filename.
+      && { test -z "$chowncmd" || $doit $chowncmd "$dst"; } \
+      && { test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } \
-  test -z "$dstfile" && dstfile=`basename "$dst"`
+      && { test -z "$stripcmd" || $doit $stripcmd "$dst"; } \
+      && { test -z "$chmodcmd" || $doit $chmodcmd "$dst"; }
-  # Make a couple of temp file names in the proper directory.
-  dsttmp=$dstdir/_inst.$$_
-  rmtmp=$dstdir/_rm.$$_
-  # Trap to clean up those temp files at exit.
-  trap 'status=$?; rm -f "$dsttmp" "$rmtmp" && exit $status' 0
-  trap '(exit $?); exit' 1 2 13 15
-  # Move or copy the file name to the temp name
-  $doit $instcmd "$src" "$dsttmp" &&
-  # and set any options; do chmod last to preserve setuid bits.
-  #
+  else
-  # If any of these fail, we abort the whole thing.  If we want to
+    # If we're going to rename the final executable, determine the name now.
-  # ignore errors from any of these, just make sure not to ignore
-  # errors from the above "$doit $instcmd $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 "$dsttmp"; } &&
-  # 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 "$dstdir/$dstfile"; then
+    if test -z "$transformarg"; then
-      $doit $rmcmd -f "$dstdir/$dstfile" 2>/dev/null \
-      || $doit $mvcmd -f "$dstdir/$dstfile" "$rmtmp" 2>/dev/null \
-      || {
-	  echo "$0: cannot unlink or rename $dstdir/$dstfile" >&2
+      dstfile=`basename "$dst"`
-	  (exit 1); exit
-      }
     else
-      :
+      dstfile=`basename "$dst" $transformbasename \
+               | sed $transformarg`$transformbasename
     fi
-  } &&
+    # don't allow the sed command to completely eliminate the filename.
+    test -z "$dstfile" && dstfile=`basename "$dst"`
+    # Make a couple of temp file names in the proper directory.
+    dsttmp=$dstdir/_inst.$$_
+    rmtmp=$dstdir/_rm.$$_
+    # Trap to clean up those temp files at exit.
+    trap 'status=$?; rm -f "$dsttmp" "$rmtmp" && exit $status' 0
+    trap '(exit $?); exit' 1 2 13 15
+    # Move or copy the file name to the temp name
+    $doit $instcmd "$src" "$dsttmp" &&
+    # 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 $instcmd $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 "$dsttmp"; } &&
+    # 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 "$dstdir/$dstfile"; then
+        $doit $rmcmd -f "$dstdir/$dstfile" 2>/dev/null \
+        || $doit $mvcmd -f "$dstdir/$dstfile" "$rmtmp" 2>/dev/null \
+        || {
+	  echo "$0: cannot unlink or rename $dstdir/$dstfile" >&2
+	  (exit 1); exit
+        }
+      else
+        :
+      fi
+    } &&
-  # Now rename the file to the real destination.
+    # Now rename the file to the real destination.
-  $doit $mvcmd "$dsttmp" "$dstdir/$dstfile"
+    $doit $mvcmd "$dsttmp" "$dstdir/$dstfile"
+  fi || { (exit 1); exit; }
-fi &&
+done
 # The final little trick to "correctly" pass the exit status to the exit trap.
+{
   (exit 0); exit
+}

The R Project SVN R

(root)/trunk/tools/install-sh – Rev 26592 → 28188