mirror of
https://github.com/fish-shell/fish-shell
synced 2024-12-26 12:53:13 +00:00
d83ef07ca7
This adds the new builtin 'string' which supports various string manipulation and matching algorithms, including PCRE based regular expressions. Fixes #2296 Squashed commit of the following: commit 4c3eaeb6e57d76463e9683c327142b0aeafb92b8 Author: ridiculousfish <corydoras@ridiculousfish.com> Date: Sat Sep 12 12:51:30 2015 -0700 Remove testdata and doc dirs from pcre2 source commit b2a8b4b50f2398b204fb72cfe4b5ba77ece2e1ab Merge:11c8a47
7974aab
Author: ridiculousfish <corydoras@ridiculousfish.com> Date: Sat Sep 12 12:32:40 2015 -0700 Merge branch 'string' of git://github.com/msteed/fish-shell into string-test commit7974aab6d3
Author: Michael Steed <msteed@saltstack.com> Date: Fri Sep 11 13:00:02 2015 -0600 build pcre2 lib only, no docs commiteb20b43d2d
Merge:1a09e70
5f519cb
Author: Michael Steed <msteed68@gmail.com> Date: Thu Sep 10 20:00:47 2015 -0600 Merge branch 'string' of github.com:msteed/fish-shell into string commit1a09e709d0
Author: Michael Steed <msteed68@gmail.com> Date: Thu Sep 10 19:58:24 2015 -0600 rebase on master & address the fallout commita0ec9772cd
Author: Michael Steed <msteed68@gmail.com> Date: Thu Sep 10 19:26:45 2015 -0600 use fish's wildcard_match() for glob matching commit64c25a01e3
Author: Michael Steed <msteed68@gmail.com> Date: Thu Aug 27 08:19:23 2015 -0600 some fixes from review - string_get_arg_stdin(): simplify and don't discard the argument when the trailing newline is absent - fix calls to pcre2 for e.g. string match -r -a 'a*' 'b' - correct test for args coming from stdin commitece7f35ec5
Author: Michael Steed <msteed68@gmail.com> Date: Sat Aug 22 19:35:56 2015 -0600 fixes from review - Makefile.in: restore iwyu target - regex_replacer_t::replace_matches(): correct size passed to realloc() commit9ff7477a92
Author: Michael Steed <msteed68@gmail.com> Date: Thu Aug 20 13:08:33 2015 -0600 Minor doc improvements commitbaf4e096b2
Author: Michael Steed <msteed68@gmail.com> Date: Wed Aug 19 18:29:02 2015 -0600 another attempt to fix the ci build commit896a2c2b27
Author: Michael Steed <msteed68@gmail.com> Date: Wed Aug 19 18:03:49 2015 -0600 Updates after review comments - make match/replace without -a operate on the first match on each argument - use different exit codes for "no operation performed" and errors, as grep does - refactor regex compile code - use human-friendly error messages from pcre2 - improve error handling & reporting elsewhere - add a few tests - make some doc fixes - some simplification & cleanup - fix ci build failure (I hope) commitefd47dcbda
Author: Michael Steed <msteed68@gmail.com> Date: Wed Aug 12 00:26:07 2015 -0600 fix dependencies for parallel make commited0850e2db
Author: Michael Steed <msteed68@gmail.com> Date: Tue Aug 11 23:37:22 2015 -0600 Add missing pcre2 files + .gitignore commit9492e7a7e9
Author: Michael Steed <msteed68@gmail.com> Date: Tue Aug 11 22:44:05 2015 -0600 add pcre2-10.20 and update license.hdr commit1a60b93371
Author: Michael Steed <msteed68@gmail.com> Date: Tue Aug 11 22:41:19 2015 -0600 add string builtin files - string builtin source, tests, & docs - changes to configure.ac & Makefile.in commit5f519cb2a2
Author: Michael Steed <msteed68@gmail.com> Date: Thu Sep 10 19:26:45 2015 -0600 use fish's wildcard_match() for glob matching commit2ecd24f795
Author: Michael Steed <msteed68@gmail.com> Date: Thu Aug 27 08:19:23 2015 -0600 some fixes from review - string_get_arg_stdin(): simplify and don't discard the argument when the trailing newline is absent - fix calls to pcre2 for e.g. string match -r -a 'a*' 'b' - correct test for args coming from stdin commit45b777e4dc
Author: Michael Steed <msteed68@gmail.com> Date: Sat Aug 22 19:35:56 2015 -0600 fixes from review - Makefile.in: restore iwyu target - regex_replacer_t::replace_matches(): correct size passed to realloc() commit981cbb6ddf
Author: Michael Steed <msteed68@gmail.com> Date: Thu Aug 20 13:08:33 2015 -0600 Minor doc improvements commitddb6a2a8fd
Author: Michael Steed <msteed68@gmail.com> Date: Wed Aug 19 18:29:02 2015 -0600 another attempt to fix the ci build commit1e34e3191b
Author: Michael Steed <msteed68@gmail.com> Date: Wed Aug 19 18:03:49 2015 -0600 Updates after review comments - make match/replace without -a operate on the first match on each argument - use different exit codes for "no operation performed" and errors, as grep does - refactor regex compile code - use human-friendly error messages from pcre2 - improve error handling & reporting elsewhere - add a few tests - make some doc fixes - some simplification & cleanup - fix ci build failure (I hope) commit34232e152d
Author: Michael Steed <msteed68@gmail.com> Date: Wed Aug 12 00:26:07 2015 -0600 fix dependencies for parallel make commit00d7e78169
Author: Michael Steed <msteed68@gmail.com> Date: Tue Aug 11 23:37:22 2015 -0600 Add missing pcre2 files + .gitignore commit4498aa5f57
Author: Michael Steed <msteed68@gmail.com> Date: Tue Aug 11 22:44:05 2015 -0600 add pcre2-10.20 and update license.hdr commit290c58c72e
Author: Michael Steed <msteed68@gmail.com> Date: Tue Aug 11 22:41:19 2015 -0600 add string builtin files - string builtin source, tests, & docs - changes to configure.ac & Makefile.in
501 lines
14 KiB
Bash
Executable file
501 lines
14 KiB
Bash
Executable file
#!/bin/sh
|
|
# install - install a program, script, or datafile
|
|
|
|
scriptversion=2013-12-25.23; # UTC
|
|
|
|
# This originates from X11R5 (mit/util/scripts/install.sh), which was
|
|
# later released in X11R6 (xc/config/util/install.sh) with the
|
|
# following copyright and license.
|
|
#
|
|
# Copyright (C) 1994 X Consortium
|
|
#
|
|
# Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
# of this software and associated documentation files (the "Software"), to
|
|
# deal in the Software without restriction, including without limitation the
|
|
# rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
|
|
# sell copies of the Software, and to permit persons to whom the Software is
|
|
# furnished to do so, subject to the following conditions:
|
|
#
|
|
# The above copyright notice and this permission notice shall be included in
|
|
# all copies or substantial portions of the Software.
|
|
#
|
|
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
# X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
|
|
# AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNEC-
|
|
# TION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
#
|
|
# Except as contained in this notice, the name of the X Consortium shall not
|
|
# be used in advertising or otherwise to promote the sale, use or other deal-
|
|
# ings in this Software without prior written authorization from the X Consor-
|
|
# tium.
|
|
#
|
|
#
|
|
# FSF changes to this file are in the public domain.
|
|
#
|
|
# Calling this script install-sh is preferred over install.sh, to prevent
|
|
# 'make' implicit rules from creating a file called install from it
|
|
# when there is no Makefile.
|
|
#
|
|
# This script is compatible with the BSD install script, but was written
|
|
# from scratch.
|
|
|
|
tab=' '
|
|
nl='
|
|
'
|
|
IFS=" $tab$nl"
|
|
|
|
# Set DOITPROG to "echo" to test this script.
|
|
|
|
doit=${DOITPROG-}
|
|
doit_exec=${doit:-exec}
|
|
|
|
# Put in absolute file names if you don't have them in your path;
|
|
# or use environment vars.
|
|
|
|
chgrpprog=${CHGRPPROG-chgrp}
|
|
chmodprog=${CHMODPROG-chmod}
|
|
chownprog=${CHOWNPROG-chown}
|
|
cmpprog=${CMPPROG-cmp}
|
|
cpprog=${CPPROG-cp}
|
|
mkdirprog=${MKDIRPROG-mkdir}
|
|
mvprog=${MVPROG-mv}
|
|
rmprog=${RMPROG-rm}
|
|
stripprog=${STRIPPROG-strip}
|
|
|
|
posix_mkdir=
|
|
|
|
# Desired mode of installed file.
|
|
mode=0755
|
|
|
|
chgrpcmd=
|
|
chmodcmd=$chmodprog
|
|
chowncmd=
|
|
mvcmd=$mvprog
|
|
rmcmd="$rmprog -f"
|
|
stripcmd=
|
|
|
|
src=
|
|
dst=
|
|
dir_arg=
|
|
dst_arg=
|
|
|
|
copy_on_change=false
|
|
is_target_a_directory=possibly
|
|
|
|
usage="\
|
|
Usage: $0 [OPTION]... [-T] SRCFILE DSTFILE
|
|
or: $0 [OPTION]... SRCFILES... DIRECTORY
|
|
or: $0 [OPTION]... -t DIRECTORY SRCFILES...
|
|
or: $0 [OPTION]... -d DIRECTORIES...
|
|
|
|
In the 1st form, copy SRCFILE to DSTFILE.
|
|
In the 2nd and 3rd, copy all SRCFILES to DIRECTORY.
|
|
In the 4th, create DIRECTORIES.
|
|
|
|
Options:
|
|
--help display this help and exit.
|
|
--version display version info and exit.
|
|
|
|
-c (ignored)
|
|
-C install only if different (preserve the last data modification time)
|
|
-d create directories instead of installing files.
|
|
-g GROUP $chgrpprog installed files to GROUP.
|
|
-m MODE $chmodprog installed files to MODE.
|
|
-o USER $chownprog installed files to USER.
|
|
-s $stripprog installed files.
|
|
-t DIRECTORY install into DIRECTORY.
|
|
-T report an error if DSTFILE is a directory.
|
|
|
|
Environment variables override the default commands:
|
|
CHGRPPROG CHMODPROG CHOWNPROG CMPPROG CPPROG MKDIRPROG MVPROG
|
|
RMPROG STRIPPROG
|
|
"
|
|
|
|
while test $# -ne 0; do
|
|
case $1 in
|
|
-c) ;;
|
|
|
|
-C) copy_on_change=true;;
|
|
|
|
-d) dir_arg=true;;
|
|
|
|
-g) chgrpcmd="$chgrpprog $2"
|
|
shift;;
|
|
|
|
--help) echo "$usage"; exit $?;;
|
|
|
|
-m) mode=$2
|
|
case $mode in
|
|
*' '* | *"$tab"* | *"$nl"* | *'*'* | *'?'* | *'['*)
|
|
echo "$0: invalid mode: $mode" >&2
|
|
exit 1;;
|
|
esac
|
|
shift;;
|
|
|
|
-o) chowncmd="$chownprog $2"
|
|
shift;;
|
|
|
|
-s) stripcmd=$stripprog;;
|
|
|
|
-t)
|
|
is_target_a_directory=always
|
|
dst_arg=$2
|
|
# Protect names problematic for 'test' and other utilities.
|
|
case $dst_arg in
|
|
-* | [=\(\)!]) dst_arg=./$dst_arg;;
|
|
esac
|
|
shift;;
|
|
|
|
-T) is_target_a_directory=never;;
|
|
|
|
--version) echo "$0 $scriptversion"; exit $?;;
|
|
|
|
--) shift
|
|
break;;
|
|
|
|
-*) echo "$0: invalid option: $1" >&2
|
|
exit 1;;
|
|
|
|
*) break;;
|
|
esac
|
|
shift
|
|
done
|
|
|
|
# We allow the use of options -d and -T together, by making -d
|
|
# take the precedence; this is for compatibility with GNU install.
|
|
|
|
if test -n "$dir_arg"; then
|
|
if test -n "$dst_arg"; then
|
|
echo "$0: target directory not allowed when installing a directory." >&2
|
|
exit 1
|
|
fi
|
|
fi
|
|
|
|
if test $# -ne 0 && test -z "$dir_arg$dst_arg"; then
|
|
# When -d is used, all remaining arguments are directories to create.
|
|
# When -t is used, the destination is already specified.
|
|
# Otherwise, the last argument is the destination. Remove it from $@.
|
|
for arg
|
|
do
|
|
if test -n "$dst_arg"; then
|
|
# $@ is not empty: it contains at least $arg.
|
|
set fnord "$@" "$dst_arg"
|
|
shift # fnord
|
|
fi
|
|
shift # arg
|
|
dst_arg=$arg
|
|
# Protect names problematic for 'test' and other utilities.
|
|
case $dst_arg in
|
|
-* | [=\(\)!]) dst_arg=./$dst_arg;;
|
|
esac
|
|
done
|
|
fi
|
|
|
|
if test $# -eq 0; then
|
|
if test -z "$dir_arg"; then
|
|
echo "$0: no input file specified." >&2
|
|
exit 1
|
|
fi
|
|
# It's OK to call 'install-sh -d' without argument.
|
|
# This can happen when creating conditional directories.
|
|
exit 0
|
|
fi
|
|
|
|
if test -z "$dir_arg"; then
|
|
if test $# -gt 1 || test "$is_target_a_directory" = always; then
|
|
if test ! -d "$dst_arg"; then
|
|
echo "$0: $dst_arg: Is not a directory." >&2
|
|
exit 1
|
|
fi
|
|
fi
|
|
fi
|
|
|
|
if test -z "$dir_arg"; then
|
|
do_exit='(exit $ret); exit $ret'
|
|
trap "ret=129; $do_exit" 1
|
|
trap "ret=130; $do_exit" 2
|
|
trap "ret=141; $do_exit" 13
|
|
trap "ret=143; $do_exit" 15
|
|
|
|
# Set umask so as not to create temps with too-generous modes.
|
|
# However, 'strip' requires both read and write access to temps.
|
|
case $mode in
|
|
# Optimize common cases.
|
|
*644) cp_umask=133;;
|
|
*755) cp_umask=22;;
|
|
|
|
*[0-7])
|
|
if test -z "$stripcmd"; then
|
|
u_plus_rw=
|
|
else
|
|
u_plus_rw='% 200'
|
|
fi
|
|
cp_umask=`expr '(' 777 - $mode % 1000 ')' $u_plus_rw`;;
|
|
*)
|
|
if test -z "$stripcmd"; then
|
|
u_plus_rw=
|
|
else
|
|
u_plus_rw=,u+rw
|
|
fi
|
|
cp_umask=$mode$u_plus_rw;;
|
|
esac
|
|
fi
|
|
|
|
for src
|
|
do
|
|
# Protect names problematic for 'test' and other utilities.
|
|
case $src in
|
|
-* | [=\(\)!]) src=./$src;;
|
|
esac
|
|
|
|
if test -n "$dir_arg"; then
|
|
dst=$src
|
|
dstdir=$dst
|
|
test -d "$dstdir"
|
|
dstdir_status=$?
|
|
else
|
|
|
|
# Waiting for this to be detected by the "$cpprog $src $dsttmp" command
|
|
# might cause directories to be created, which would be especially bad
|
|
# if $src (and thus $dsttmp) contains '*'.
|
|
if test ! -f "$src" && test ! -d "$src"; then
|
|
echo "$0: $src does not exist." >&2
|
|
exit 1
|
|
fi
|
|
|
|
if test -z "$dst_arg"; then
|
|
echo "$0: no destination specified." >&2
|
|
exit 1
|
|
fi
|
|
dst=$dst_arg
|
|
|
|
# If destination is a directory, append the input filename; won't work
|
|
# if double slashes aren't ignored.
|
|
if test -d "$dst"; then
|
|
if test "$is_target_a_directory" = never; then
|
|
echo "$0: $dst_arg: Is a directory" >&2
|
|
exit 1
|
|
fi
|
|
dstdir=$dst
|
|
dst=$dstdir/`basename "$src"`
|
|
dstdir_status=0
|
|
else
|
|
dstdir=`dirname "$dst"`
|
|
test -d "$dstdir"
|
|
dstdir_status=$?
|
|
fi
|
|
fi
|
|
|
|
obsolete_mkdir_used=false
|
|
|
|
if test $dstdir_status != 0; then
|
|
case $posix_mkdir in
|
|
'')
|
|
# Create intermediate dirs using mode 755 as modified by the umask.
|
|
# This is like FreeBSD 'install' as of 1997-10-28.
|
|
umask=`umask`
|
|
case $stripcmd.$umask in
|
|
# Optimize common cases.
|
|
*[2367][2367]) mkdir_umask=$umask;;
|
|
.*0[02][02] | .[02][02] | .[02]) mkdir_umask=22;;
|
|
|
|
*[0-7])
|
|
mkdir_umask=`expr $umask + 22 \
|
|
- $umask % 100 % 40 + $umask % 20 \
|
|
- $umask % 10 % 4 + $umask % 2
|
|
`;;
|
|
*) mkdir_umask=$umask,go-w;;
|
|
esac
|
|
|
|
# With -d, create the new directory with the user-specified mode.
|
|
# Otherwise, rely on $mkdir_umask.
|
|
if test -n "$dir_arg"; then
|
|
mkdir_mode=-m$mode
|
|
else
|
|
mkdir_mode=
|
|
fi
|
|
|
|
posix_mkdir=false
|
|
case $umask in
|
|
*[123567][0-7][0-7])
|
|
# POSIX mkdir -p sets u+wx bits regardless of umask, which
|
|
# is incompatible with FreeBSD 'install' when (umask & 300) != 0.
|
|
;;
|
|
*)
|
|
tmpdir=${TMPDIR-/tmp}/ins$RANDOM-$$
|
|
trap 'ret=$?; rmdir "$tmpdir/d" "$tmpdir" 2>/dev/null; exit $ret' 0
|
|
|
|
if (umask $mkdir_umask &&
|
|
exec $mkdirprog $mkdir_mode -p -- "$tmpdir/d") >/dev/null 2>&1
|
|
then
|
|
if test -z "$dir_arg" || {
|
|
# Check for POSIX incompatibilities with -m.
|
|
# HP-UX 11.23 and IRIX 6.5 mkdir -m -p sets group- or
|
|
# other-writable bit of parent directory when it shouldn't.
|
|
# FreeBSD 6.1 mkdir -m -p sets mode of existing directory.
|
|
ls_ld_tmpdir=`ls -ld "$tmpdir"`
|
|
case $ls_ld_tmpdir in
|
|
d????-?r-*) different_mode=700;;
|
|
d????-?--*) different_mode=755;;
|
|
*) false;;
|
|
esac &&
|
|
$mkdirprog -m$different_mode -p -- "$tmpdir" && {
|
|
ls_ld_tmpdir_1=`ls -ld "$tmpdir"`
|
|
test "$ls_ld_tmpdir" = "$ls_ld_tmpdir_1"
|
|
}
|
|
}
|
|
then posix_mkdir=:
|
|
fi
|
|
rmdir "$tmpdir/d" "$tmpdir"
|
|
else
|
|
# Remove any dirs left behind by ancient mkdir implementations.
|
|
rmdir ./$mkdir_mode ./-p ./-- 2>/dev/null
|
|
fi
|
|
trap '' 0;;
|
|
esac;;
|
|
esac
|
|
|
|
if
|
|
$posix_mkdir && (
|
|
umask $mkdir_umask &&
|
|
$doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir"
|
|
)
|
|
then :
|
|
else
|
|
|
|
# The umask is ridiculous, or mkdir does not conform to POSIX,
|
|
# or it failed possibly due to a race condition. Create the
|
|
# directory the slow way, step by step, checking for races as we go.
|
|
|
|
case $dstdir in
|
|
/*) prefix='/';;
|
|
[-=\(\)!]*) prefix='./';;
|
|
*) prefix='';;
|
|
esac
|
|
|
|
oIFS=$IFS
|
|
IFS=/
|
|
set -f
|
|
set fnord $dstdir
|
|
shift
|
|
set +f
|
|
IFS=$oIFS
|
|
|
|
prefixes=
|
|
|
|
for d
|
|
do
|
|
test X"$d" = X && continue
|
|
|
|
prefix=$prefix$d
|
|
if test -d "$prefix"; then
|
|
prefixes=
|
|
else
|
|
if $posix_mkdir; then
|
|
(umask=$mkdir_umask &&
|
|
$doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir") && break
|
|
# Don't fail if two instances are running concurrently.
|
|
test -d "$prefix" || exit 1
|
|
else
|
|
case $prefix in
|
|
*\'*) qprefix=`echo "$prefix" | sed "s/'/'\\\\\\\\''/g"`;;
|
|
*) qprefix=$prefix;;
|
|
esac
|
|
prefixes="$prefixes '$qprefix'"
|
|
fi
|
|
fi
|
|
prefix=$prefix/
|
|
done
|
|
|
|
if test -n "$prefixes"; then
|
|
# Don't fail if two instances are running concurrently.
|
|
(umask $mkdir_umask &&
|
|
eval "\$doit_exec \$mkdirprog $prefixes") ||
|
|
test -d "$dstdir" || exit 1
|
|
obsolete_mkdir_used=true
|
|
fi
|
|
fi
|
|
fi
|
|
|
|
if test -n "$dir_arg"; then
|
|
{ test -z "$chowncmd" || $doit $chowncmd "$dst"; } &&
|
|
{ test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } &&
|
|
{ test "$obsolete_mkdir_used$chowncmd$chgrpcmd" = false ||
|
|
test -z "$chmodcmd" || $doit $chmodcmd $mode "$dst"; } || exit 1
|
|
else
|
|
|
|
# Make a couple of temp file names in the proper directory.
|
|
dsttmp=$dstdir/_inst.$$_
|
|
rmtmp=$dstdir/_rm.$$_
|
|
|
|
# Trap to clean up those temp files at exit.
|
|
trap 'ret=$?; rm -f "$dsttmp" "$rmtmp" && exit $ret' 0
|
|
|
|
# Copy the file name to the temp name.
|
|
(umask $cp_umask && $doit_exec $cpprog "$src" "$dsttmp") &&
|
|
|
|
# and set any options; do chmod last to preserve setuid bits.
|
|
#
|
|
# If any of these fail, we abort the whole thing. If we want to
|
|
# ignore errors from any of these, just make sure not to ignore
|
|
# errors from the above "$doit $cpprog $src $dsttmp" command.
|
|
#
|
|
{ test -z "$chowncmd" || $doit $chowncmd "$dsttmp"; } &&
|
|
{ test -z "$chgrpcmd" || $doit $chgrpcmd "$dsttmp"; } &&
|
|
{ test -z "$stripcmd" || $doit $stripcmd "$dsttmp"; } &&
|
|
{ test -z "$chmodcmd" || $doit $chmodcmd $mode "$dsttmp"; } &&
|
|
|
|
# If -C, don't bother to copy if it wouldn't change the file.
|
|
if $copy_on_change &&
|
|
old=`LC_ALL=C ls -dlL "$dst" 2>/dev/null` &&
|
|
new=`LC_ALL=C ls -dlL "$dsttmp" 2>/dev/null` &&
|
|
set -f &&
|
|
set X $old && old=:$2:$4:$5:$6 &&
|
|
set X $new && new=:$2:$4:$5:$6 &&
|
|
set +f &&
|
|
test "$old" = "$new" &&
|
|
$cmpprog "$dst" "$dsttmp" >/dev/null 2>&1
|
|
then
|
|
rm -f "$dsttmp"
|
|
else
|
|
# Rename the file to the real destination.
|
|
$doit $mvcmd -f "$dsttmp" "$dst" 2>/dev/null ||
|
|
|
|
# The rename failed, perhaps because mv can't rename something else
|
|
# to itself, or perhaps because mv is so ancient that it does not
|
|
# support -f.
|
|
{
|
|
# Now remove or move aside any old file at destination location.
|
|
# We try this two ways since rm can't unlink itself on some
|
|
# systems and the destination file might be busy for other
|
|
# reasons. In this case, the final cleanup might fail but the new
|
|
# file should still install successfully.
|
|
{
|
|
test ! -f "$dst" ||
|
|
$doit $rmcmd -f "$dst" 2>/dev/null ||
|
|
{ $doit $mvcmd -f "$dst" "$rmtmp" 2>/dev/null &&
|
|
{ $doit $rmcmd -f "$rmtmp" 2>/dev/null; :; }
|
|
} ||
|
|
{ echo "$0: cannot unlink or rename $dst" >&2
|
|
(exit 1); exit 1
|
|
}
|
|
} &&
|
|
|
|
# Now rename the file to the real destination.
|
|
$doit $mvcmd "$dsttmp" "$dst"
|
|
}
|
|
fi || exit 1
|
|
|
|
trap '' 0
|
|
fi
|
|
done
|
|
|
|
# Local variables:
|
|
# eval: (add-hook 'write-file-hooks 'time-stamp)
|
|
# time-stamp-start: "scriptversion="
|
|
# time-stamp-format: "%:y-%02m-%02d.%02H"
|
|
# time-stamp-time-zone: "UTC"
|
|
# time-stamp-end: "; # UTC"
|
|
# End:
|