#!/bin/ksh
# Get shit from sourceforge CVS

arg0=$(basename $0)

if [ $# -eq 0 ]
then
	print "Usage: $arg0 <project> [modules]" 1>&2
	exit 1
fi

project="$1"
shift

echo "Project passwords are usually blank." 1>&2
if ! cvs -d:"pserver:anonymous@$project.cvs.sourceforge.net:/cvsroot/$project" login
then
	exit 1
fi

[ $# -eq 0 ] && set $project

errors=0
for module in "$@"
do
	cvs -z3 -d:"pserver:anonymous@$project.cvs.sourceforge.net:/cvsroot/$project" co -P "$module" || errors=1
done
cvs -d:"pserver:anonymous@$project.cvs.sourceforge.net:/cvsroot/$project" logout

if [ $errors -eq 0 ]
then
	echo "$arg0: Success." 1>&2
else
	echo "$arg0: There were errors." 1>&2
fi