1999-03-28 14:39:34 +00:00
|
|
|
#!/bin/sh
|
|
|
|
|
|
|
|
|
|
if test "$VERBOSE" = yes; then
|
|
|
|
|
set -x
|
|
|
|
|
chmod --version
|
|
|
|
|
fi
|
|
|
|
|
|
2000-11-19 22:24:24 +00:00
|
|
|
pwd=`pwd`
|
1999-03-28 14:39:34 +00:00
|
|
|
tmp=eq-x-$$
|
2000-11-22 13:15:10 +00:00
|
|
|
trap 'status=$?; cd $pwd; chmod -R a+rwx $tmp; rm -rf $tmp && exit $status' 0
|
2000-11-19 22:24:24 +00:00
|
|
|
trap '(exit $?); exit' 1 2 13 15
|
1999-03-28 14:39:34 +00:00
|
|
|
|
|
|
|
|
framework_failure=0
|
2000-11-23 14:32:09 +00:00
|
|
|
mkdir $tmp || framework_failure=1
|
|
|
|
|
cd $tmp || framework_failure=1
|
1999-03-28 14:39:34 +00:00
|
|
|
|
2000-11-23 14:32:09 +00:00
|
|
|
file=f
|
2000-11-19 22:24:24 +00:00
|
|
|
touch $file || framework_failure=1
|
|
|
|
|
chmod 444 $file || framework_failure=1
|
1999-03-28 14:39:34 +00:00
|
|
|
|
|
|
|
|
if test $framework_failure = 1; then
|
|
|
|
|
echo 'failure in testing framework'
|
2000-11-19 22:24:24 +00:00
|
|
|
(exit 1); exit
|
1999-03-28 14:39:34 +00:00
|
|
|
fi
|
|
|
|
|
|
|
|
|
|
umask 005
|
2000-11-19 22:24:24 +00:00
|
|
|
chmod =x $file
|
|
|
|
|
case "`ls -l $file`" in
|
1999-03-28 14:39:34 +00:00
|
|
|
---x--x---*) fail=0 ;;
|
2000-11-19 22:24:24 +00:00
|
|
|
*) fail=1; ls -l $file ;;
|
1999-03-28 14:39:34 +00:00
|
|
|
esac
|
|
|
|
|
|
2000-11-19 22:24:24 +00:00
|
|
|
(exit $fail); exit
|