Blame install-sh

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