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

 #!/bin/sh
 # install - install a program, script, or datafile
-scriptversion=2006-10-14.15
+scriptversion=2006-12-25.00
 # 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.
+#
 IFS=" ""	$nl"
 # set DOITPROG to echo to test this script
 # 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;
 # or use environment vars.
-mvprog="${MVPROG-mv}"
+chgrpprog=${CHGRPPROG-chgrp}
-cpprog="${CPPROG-cp}"
+chmodprog=${CHMODPROG-chmod}
-chmodprog="${CHMODPROG-chmod}"
+chownprog=${CHOWNPROG-chown}
-chownprog="${CHOWNPROG-chown}"
+cmpprog=${CMPPROG-cmp}
-chgrpprog="${CHGRPPROG-chgrp}"
+cpprog=${CPPROG-cp}
-stripprog="${STRIPPROG-strip}"
+mkdirprog=${MKDIRPROG-mkdir}
+mvprog=${MVPROG-mv}
-rmprog="${RMPROG-rm}"
+rmprog=${RMPROG-rm}
-mkdirprog="${MKDIRPROG-mkdir}"
+stripprog=${STRIPPROG-strip}
+posix_glob='?'
+initialize_posix_glob='
+  test "$posix_glob" != "?" || {
+    if (set -f) 2>/dev/null; then
+      posix_glob=
+    else
+      posix_glob=:
+    fi
+  }
+'
-posix_glob=
 posix_mkdir=
 # Desired mode of installed file.
 mode=0755
+chgrpcmd=
 chmodcmd=$chmodprog
 chowncmd=
-chgrpcmd=
-stripcmd=
+mvcmd=$mvprog
 rmcmd="$rmprog -f"
-mvcmd="$mvprog"
+stripcmd=
 src=
 dst=
 dir_arg=
-dstarg=
+dst_arg=
+copy_on_change=false
 no_target_directory=
+usage="\
-usage="Usage: $0 [OPTION]... [-T] SRCFILE DSTFILE
+Usage: $0 [OPTION]... [-T] SRCFILE DSTFILE
    or: $0 [OPTION]... SRCFILES... DIRECTORY
    or: $0 [OPTION]... -t DIRECTORY SRCFILES...
    or: $0 [OPTION]... -d DIRECTORIES...
 In the 1st form, copy SRCFILE to DSTFILE.
 In the 2nd and 3rd, copy all SRCFILES to DIRECTORY.
 In the 4th, create DIRECTORIES.
 Options:
+     --help     display this help and exit.
+     --version  display version info and exit.
--c         (ignored)
+  -c            (ignored)
+  -C            install only if different (preserve the last data modification time)
--d         create directories instead of installing files.
+  -d            create directories instead of installing files.
--g GROUP   $chgrpprog installed files to GROUP.
+  -g GROUP      $chgrpprog installed files to GROUP.
--m MODE    $chmodprog installed files to MODE.
+  -m MODE       $chmodprog installed files to MODE.
--o USER    $chownprog installed files to USER.
+  -o USER       $chownprog installed files to USER.
--s         $stripprog installed files.
+  -s            $stripprog installed files.
--t DIRECTORY  install into DIRECTORY.
+  -t DIRECTORY  install into DIRECTORY.
--T         report an error if DSTFILE is a directory.
+  -T            report an error if DSTFILE is a directory.
---help     display this help and exit.
---version  display version info and exit.
 Environment variables override the default commands:
-  CHGRPPROG CHMODPROG CHOWNPROG CPPROG MKDIRPROG MVPROG RMPROG STRIPPROG
+  CHGRPPROG CHMODPROG CHOWNPROG CMPPROG CPPROG MKDIRPROG MVPROG
+  RMPROG STRIPPROG
+"
 while test $# -ne 0; do
   case $1 in
-    -c) shift
+    -c) ;;
-        continue;;
+    -C) copy_on_change=true;;
-    -d) dir_arg=true
+    -d) dir_arg=true;;
-        shift
-        continue;;
     -g) chgrpcmd="$chgrpprog $2"
-        shift
-        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;;
+	shift;;
     -o) chowncmd="$chownprog $2"
-        shift
-        shift
+	shift;;
-        continue;;
-    -s) stripcmd=$stripprog
+    -s) stripcmd=$stripprog;;
-        shift
-        continue;;
-    -t) dstarg=$2
+    -t) dst_arg=$2
-	shift
-	shift
+	shift;;
-	continue;;
-    -T) no_target_directory=true
+    -T) no_target_directory=true;;
-	shift
-	continue;;
     --version) echo "$0 $scriptversion"; exit $?;;
     --)	shift
 	break;;
     -*)	echo "$0: invalid option: $1" >&2
 	exit 1;;
     *)  break;;
   esac
+  shift
 done
-if test $# -ne 0 && test -z "$dir_arg$dstarg"; then
+if test $# -ne 0 && test -z "$dir_arg$dst_arg"; 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
+    if test -n "$dst_arg"; then
       # $@ is not empty: it contains at least $arg.
-      set fnord "$@" "$dstarg"
+      set fnord "$@" "$dst_arg"
       shift # fnord
     fi
     shift # arg
-    dstarg=$arg
+    dst_arg=$arg
   done
 fi
 if test $# -eq 0; then
   if test -z "$dir_arg"; then
 for src
 do
   # Protect names starting with `-'.
   case $src in
-    -*) src=./$src ;;
+    -*) src=./$src;;
   esac
   if test -n "$dir_arg"; then
     dst=$src
     dstdir=$dst
     if test ! -f "$src" && test ! -d "$src"; then
       echo "$0: $src does not exist." >&2
       exit 1
     fi
-    if test -z "$dstarg"; then
+    if test -z "$dst_arg"; then
       echo "$0: no destination specified." >&2
       exit 1
     fi
-    dst=$dstarg
+    dst=$dst_arg
     # Protect names starting with `-'.
     case $dst in
-      -*) dst=./$dst ;;
+      -*) 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
       if test -n "$no_target_directory"; then
-	echo "$0: $dstarg: Is a directory" >&2
+	echo "$0: $dst_arg: Is a directory" >&2
 	exit 1
       fi
       dstdir=$dst
       dst=$dstdir/`basename "$src"`
       dstdir_status=0
       # 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=./ ;;
+	-*) prefix='./';;
-	*)  prefix= ;;
+	*)  prefix='';;
       esac
-      case $posix_glob in
+      eval "$initialize_posix_glob"
-        '')
-	  if (set -f) 2>/dev/null; then
-	    posix_glob=true
-	  else
-	    posix_glob=false
-	  fi ;;
-      esac
       oIFS=$IFS
       IFS=/
-      $posix_glob && set -f
+      $posix_glob set -f
       set fnord $dstdir
       shift
-      $posix_glob && set +f
+      $posix_glob set +f
       IFS=$oIFS
       prefixes=
       for d
+    #
     # 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 "$chowncmd" || $doit $chowncmd "$dsttmp"; } &&
-      && { test -z "$chgrpcmd" || $doit $chgrpcmd "$dsttmp"; } \
+    { test -z "$chgrpcmd" || $doit $chgrpcmd "$dsttmp"; } &&
-      && { test -z "$stripcmd" || $doit $stripcmd "$dsttmp"; } \
+    { test -z "$stripcmd" || $doit $stripcmd "$dsttmp"; } &&
-      && { test -z "$chmodcmd" || $doit $chmodcmd $mode "$dsttmp"; } &&
+    { test -z "$chmodcmd" || $doit $chmodcmd $mode "$dsttmp"; } &&
+    # If -C, don't bother to copy if it wouldn't change the file.
+    if $copy_on_change &&
+       old=`LC_ALL=C ls -dlL "$dst"	2>/dev/null` &&
+       new=`LC_ALL=C ls -dlL "$dsttmp"	2>/dev/null` &&
+       eval "$initialize_posix_glob" &&
+       $posix_glob set -f &&
+       set X $old && old=:$2:$4:$5:$6 &&
+       set X $new && new=:$2:$4:$5:$6 &&
+       $posix_glob set +f &&
+       test "$old" = "$new" &&
+       $cmpprog "$dst" "$dsttmp" >/dev/null 2>&1
+    then
+      rm -f "$dsttmp"
+    else
-    # Now rename the file to the real destination.
+      # Rename the file to the real destination.
-    { $doit $mvcmd -f "$dsttmp" "$dst" 2>/dev/null \
+      $doit $mvcmd -f "$dsttmp" "$dst" 2>/dev/null ||
-      || {
-	   # The rename failed, perhaps because mv can't rename something else
+      # The rename failed, perhaps because mv can't rename something else
-	   # to itself, or perhaps because mv is so ancient that it does not
+      # to itself, or perhaps because mv is so ancient that it does not
-	   # support -f.
+      # support -f.
+      {
-	   # Now remove or move aside any old file at destination location.
+	# Now remove or move aside any old file at destination location.
-	   # We try this two ways since rm can't unlink itself on some
+	# We try this two ways since rm can't unlink itself on some
-	   # systems and the destination file might be busy for other
+	# systems and the destination file might be busy for other
-	   # reasons.  In this case, the final cleanup might fail but the new
+	# reasons.  In this case, the final cleanup might fail but the new
-	   # file should still install successfully.
+	# file should still install successfully.
-	   {
+	{
-	     if test -f "$dst"; then
+	  test ! -f "$dst" ||
-	       $doit $rmcmd -f "$dst" 2>/dev/null \
+	  $doit $rmcmd -f "$dst" 2>/dev/null ||
-	       || { $doit $mvcmd -f "$dst" "$rmtmp" 2>/dev/null \
+	  { $doit $mvcmd -f "$dst" "$rmtmp" 2>/dev/null &&
-		     && { $doit $rmcmd -f "$rmtmp" 2>/dev/null; :; }; }\
+	    { $doit $rmcmd -f "$rmtmp" 2>/dev/null; :; }
-	       || {
+	  } ||
-		 echo "$0: cannot unlink or rename $dst" >&2
+	  { echo "$0: cannot unlink or rename $dst" >&2
-		 (exit 1); exit 1
+	    (exit 1); exit 1
-	       }
+	  }
-	     else
-	       :
-	     fi
-	   } &&
+	} &&
-	   # Now rename the file to the real destination.
+	# Now rename the file to the real destination.
-	   $doit $mvcmd "$dsttmp" "$dst"
+	$doit $mvcmd "$dsttmp" "$dst"
-	 }
+      }
-    } || exit 1
+    fi || exit 1
     trap '' 0
   fi
 done

The R Project SVN R

(root)/trunk/tools/install-sh – Rev 40109 → 44851