Blame install-sh

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