coreutils/tests/chgrp/basic
2004-08-19 20:03:48 +00:00

117 lines
2.4 KiB
Bash
Executable File

#!/bin/sh
# make sure chgrp is reasonable
if test "$VERBOSE" = yes; then
set -x
chgrp --version
fi
. $srcdir/../envvar-check
. $srcdir/../lang-default
. $srcdir/../group-names
pwd=`pwd`
tmp=basic.$$
trap 'status=$?; cd $pwd; rm -rf $tmp && exit $status' 0
trap '(exit $?); exit' 1 2 13 15
framework_failure=0
mkdir $tmp || framework_failure=1
cd $tmp || framework_failure=1
if test $framework_failure = 1; then
echo 'failure in testing framework' 1>&2
(exit 1); exit 1
fi
fail=0
set _ $groups; shift
g1=$1
g2=$2
mkdir d
touch f f2 d/f3
chgrp $g1 f || fail=1
chgrp $g2 f || fail=1
chgrp $g2 f2 || fail=1
chgrp -R $g1 d || fail=1
# Don't let verbose output interfere.
test "$VERBOSE" = yes && set +x
(
chgrp -c $g1 f
chgrp -c $g2 f
chgrp -c $g2 f
chgrp --verbose '' f
chgrp --verbose $g1 f
chgrp --verbose $g1 f
chgrp --verbose --reference=f2 f
chgrp -R --verbose $g2 d
chgrp -R --verbose $g1 d
chgrp -R -c $g2 d
chgrp -R -c $g1 d
chgrp -c $g2 d
rm -f f
touch f
ln -s f symlink
chgrp $g1 f
chgrp -h $g2 symlink
# This should not change the group of f.
chgrp -h -c $g2 symlink
chown --from=:$g1 -c :$g2 f
# This *should* change the group of f.
# Though note that the diagnostic is misleading in that
# it says the `group of `symlink'' has been changed.
chgrp -c $g1 symlink
chown --from=:$g1 -c :$g2 f
# If -R is specified without -H or L, -h is assumed.
chgrp -h $g1 f symlink
chgrp -R $g2 symlink
chown --from=:$g1 -c :$g2 f
# chown() must not be optimized away even when
# the file's owner and group already have the desired value.
touch f g
chgrp $g1 f g
chgrp $g2 g
sleep 1
chgrp $g1 f
chgrp '' f
ls -c -t f g
) 2>&1 | sed "s/\([ :]\)$g1$/\1G1/;s/\([ :]\)$g2$/\1G2/" > actual
cat <<\EOF > expected
changed group of `f' to G1
changed group of `f' to G2
ownership of `f' retained
changed group of `f' to G1
group of `f' retained as G1
changed group of `f' to G2
changed group of `d/f3' to G2
changed group of `d' to G2
changed group of `d/f3' to G1
changed group of `d' to G1
changed group of `d/f3' to G2
changed group of `d' to G2
changed group of `d/f3' to G1
changed group of `d' to G1
changed group of `d' to G2
changed ownership of `f' to :G2
changed group of `symlink' to G1
changed ownership of `f' to :G2
changed ownership of `f' to :G2
f
g
EOF
cmp expected actual \
|| { diff expected actual 1>&2; fail=1; }
(exit $fail); exit $fail