Blame install-sh

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