Blame install-sh

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