mirror of
https://https.git.savannah.gnu.org/git/coreutils.git
synced 2026-01-30 19:34:26 +00:00
49 lines
1.1 KiB
Bash
Executable File
49 lines
1.1 KiB
Bash
Executable File
#!/bin/sh
|
|
|
|
if test "$VERBOSE" = yes; then
|
|
set -x
|
|
cp --version
|
|
fi
|
|
|
|
pwd=`pwd`
|
|
t0=`echo "$0"|sed 's,.*/,,'`.tmp; tmp=$t0/$$
|
|
trap 'status=$?; cd $pwd; chmod -R u+rwx $t0; rm -rf $t0 && exit $status' 0
|
|
trap '(exit $?); exit' 1 2 13 15
|
|
|
|
framework_failure=0
|
|
mkdir -p $tmp || framework_failure=1
|
|
cd $tmp || framework_failure=1
|
|
|
|
mkdir D || framework_failure=1
|
|
touch D/a || framework_failure=1
|
|
chmod 0 D/a || framework_failure=1
|
|
chmod 500 D || framework_failure=1
|
|
|
|
touch file || framework_failure=1
|
|
chmod u-w file || framework_failure=1
|
|
(echo foo >> file) >/dev/null 2>&1 && {
|
|
echo '********************************************'
|
|
echo "$0: NOTICE: This test case cannot be run as root."
|
|
echo '********************************************'
|
|
exit 77
|
|
}
|
|
|
|
if test $framework_failure = 1; then
|
|
echo 'failure in testing framework'
|
|
exit 1
|
|
fi
|
|
|
|
fail=0
|
|
|
|
# This is expected to exit non-zero, because it can't read D/a.
|
|
cp -pR D DD > /dev/null 2>&1 && fail=1
|
|
|
|
# Permissions on DD must be `dr-x------'
|
|
|
|
set X `ls -ld DD`
|
|
shift
|
|
test "$1" = dr-x------ || fail=1
|
|
chmod 700 D
|
|
|
|
(exit $fail); exit
|