Blame install-sh

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