Blame install-sh

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