ossp-pkg/shiela/shiela-test.sh
1.5
#!/bin/sh
##
## OSSP shiela - CVS Access Control and Logging Facility
## Copyright (c) 2000-2006 Ralf S. Engelschall <rse@engelschall.com>
## Copyright (c) 2000-2006 The OSSP Project <http://www.ossp.org/>
##
## This file is part of OSSP shiela, an access control and logging
## facility for Concurrent Versions System (CVS) repositories
## which can be found at http://www.ossp.org/pkg/tool/shiela/.
##
## This program is free software; you can redistribute it and/or
## modify it under the terms of the GNU General Public License
## as published by the Free Software Foundation; either version
## 2.0 of the License, or (at your option) any later version.
##
## This program is distributed in the hope that it will be useful,
## but WITHOUT ANY WARRANTY; without even the implied warranty of
## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
## General Public License for more details.
##
## You should have received a copy of the GNU General Public License
## along with this file; if not, write to the Free Software
## Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
## USA, or contact Ralf S. Engelschall <rse@engelschall.com>.
##
## shiela-test.sh: simple test suite (syntax: Bourne-Shell)
##
# determine absolute path
abspath () {
cwd=`pwd`
echo "$1" |\
sed -e "s;^\\.\$;$cwd;" \
-e "s;^\\./;$cwd/;" \
-e "s;^\\([^/]\\);$cwd/\\1;"
}
# configuration
if [ ".$1" != . ]; then
path_cvs=`abspath $1`
else
path_cvs=`which cvs`
fi
if [ ! -f $path_cvs ]; then
echo "shiela-test:ERROR: invalid path to CVS program: $path_cvs"
exit 1
fi
if [ ".$2" != . ]; then
path_perl=`abspath $2`
else
path_perl=`which perl`
fi
if [ ! -f $path_perl ]; then
echo "shiela-test:ERROR: invalid path to Perl program: $path_perl"
exit 1
fi
if [ ".$3" != . ]; then
path_shtool=`abspath $3`
else
path_shtool=`which shtool`
fi
if [ ! -f $path_shtool ]; then
echo "shiela-test:ERROR: invalid path to Shtool program: $path_shtool"
exit 1
fi
if [ ".$4" != . ]; then
path_shiela=`abspath $4`
else
path_shiela=`which shiela`
fi
if [ ! -f $path_shiela ]; then
echo "shiela-test:ERROR: invalid path to Shiela program: $path_shiela"
exit 1
fi
if [ ".$5" != . ]; then
path_shiela_install=`abspath $5`
else
path_shiela_install=`which shiela-install`
fi
if [ ! -f $path_shiela_install ]; then
echo "shiela-test:ERROR: invalid path to Shiela Install program: $path_shiela_install"
exit 1
fi
if [ ".$6" != . ]; then
cwd=`pwd`
path_test=`echo "$6" | sed -e "s;^\\.\$;$cwd;" -e "s;^\\./;$cwd/;" -e "s;^\\([^/]\\);$cwd/\\1;"`
else
path_test="`pwd`/shiela-test.d"
fi
if [ ".$path_test" = . ]; then
echo "shiela-test:ERROR: empty path to test tree"
exit 1
fi
if [ ".$7" != . ]; then
cwd=`pwd`
path_log=`echo "$7" | sed -e "s;^\\.\$;$cwd;" -e "s;^\\./;$cwd/;" -e "s;^\\([^/]\\);$cwd/\\1;"`
else
path_log="`pwd`/shiela-test.log"
fi
if [ ".$path_log" = . ]; then
echo "shiela-test:ERROR: empty path to logfile"
exit 1
fi
# print header
header () {
msg="$1"
echo "" 1>&2
echo "#######################################################################" 1>&2
$path_shtool echo -e "## %B$msg%b" 1>&2
echo "#######################################################################" 1>&2
echo "" 1>&2
}
# prepare test directory
oldcwd=`pwd`
rm -rf $path_test >/dev/null 2>&1 || true
mkdir $path_test || exit 1
cd $path_test || exit 1
# prepare sendmail emulator for logfile writing
cp /dev/null $path_log
( echo "#!/bin/sh"
echo "cat >>$path_log"
echo "exit 0"
) >sendmail
chmod a+x sendmail
path_sendmail=`abspath sendmail`
# create new repository
rm -rf cvs
mkdir cvs
cvs -d $path_test/cvs init
# setup CVSUSER variable
export CVSUSER=jdoe
# apply shiela to repository
header "Apply Shiela to CVS Repository"
$path_shiela_install \
batch=yes \
repos_path=$path_test/cvs \
tool_shiela=$path_shiela \
tool_cvs=$path_cvs \
tool_perl=$path_perl \
tool_sendmail=$path_sendmail \
shiela_local=no \
host_name="cvs" \
domain_name="example.com" \
user_name="jdoe" \
user_realname="John Doe" \
user_email="john.doe@example.com"
# activate forthcoming module in shiela
header "Activate Forthcoming Module in Shiela"
rm -rf CVSROOT
cvs -d :fork:$path_test/cvs co CVSROOT
patch -p0 <<EOT
--- CVSROOT/shiela.cfg.orig Wed May 5 20:02:24 2004
+++ CVSROOT/shiela.cfg Wed May 5 20:02:45 2004
@@ -61,6 +61,12 @@
Log passwd none;
Log * mail:john.doe@example.com;
};
+ Module foo "The Foo Module" {
+ Acl * *:users;
+ Acl *:* *:users;
+ Log * mail:john.doe@example.com;
+ Log *:* mail:john.doe@example.com;
+ };
};
};
EOT
(cd CVSROOT && cvs ci -m "activate foo module" shiela.cfg)
# add module 'foo' to repository by importing
header "Add Module to CVS Repository (cvs import)"
rm -rf foo
mkdir foo
echo "bar" >foo/bar.txt
echo "baz" >foo/baz.txt
(cd foo && cvs -d :fork:$path_test/cvs import -m "initial content" foo X Y)
rm -rf foo
# checking out module 'foo'
header "Checking Out Module from CVS Repository"
cvs -f -d :fork:$path_test/cvs co foo
# edit module 'foo' by committing
header "Edit Module in CVS Repository (cvs commit)"
( cd foo || exit 1
( echo "bar1"
echo "bar"
echo "bar2"
) >bar.txt
rm baz.txt
cvs rm baz.txt
echo "quux" >quux.txt
cvs add quux.txt
( echo "many modifications"
echo "PR:"
) >log
cvs ci -F log
rm -f log
)
# tag module files
header "Tagging Module Files in CVS Repository (cvs tag)"
( cd foo || exit 1
cvs tag BAR_1_0 bar.txt
cvs tag BAR_1_1 bar.txt
cvs tag BAR_1_2 bar.txt
)
# binary file handling
header "Handling Binary Files in CVS Repository"
( cd foo || exit 1
echo "quux" >quux.bin
cvs add -kb quux.bin
cvs ci -m "add binary file"
echo "quux2" >quux.bin
cvs ci -m "change binary file"
rm quux.bin
cvs rm quux.bin
cvs ci -m "remove binary file"
)
# cleanup
cd $oldpwd
rm -rf $path_test >/dev/null 2>&1 || true
