Blame install-sh

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