Blame install-sh

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