+build_cvs_prefix() {
+ CVS_PREFIX=:${1}:
+ if [ "${2}" != - ]; then
+ CVS_PREFIX=${CVS_PREFIX}${2}@
+ fi
+}
+
+case "${CVS_AUTH--}" in
+-) : ${CVS_RSH:?}
+ CVS_PREFIX="";;
+pserver) build_cvs_prefix $CVS_AUTH ${CVS_USER:-anoncvs};;
+gserver|server)
+ build_cvs_prefix $CVS_AUTH ${CVS_USER--};;
+ext) : ${CVS_RSH:?}
+ build_cvs_prefix $CVS_AUTH ${CVS_USER--};;
+*) echo "$0: Unknown CVS access method" >&2
+ exit 1;;
+esac