#!/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