Blame install-sh

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