Blame install-sh

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