# /bin/csh -f
set path = ($ADM_DIR $ADM_DIR/bin /bin /usr/bin /etc)

##########
########## KLUGE FOR BETA - LOCAL ONLY
##########
echo LOCAL > $ADM_DIR/tmp/p_mode
cp /dev/null $ADM_DIR/tmp/tcp_p_server
exit(0)
##########
########## ENDKLUGE
##########

set noglob

echo ""
echo ""
echo "User account administration can be performed using one of three methods:"
echo ""
echo "LOCAL	- user account modifications affect only this machine"
echo ""
echo "TCP	- user account modifications affect this machine and"
echo "	optionally others on the same network."
echo ""
echo "YP	- All machines sharing the same NFS Yellow Pages server will be"
echo "	affecected."
loop:
echo ""
echo ""
echo -n "Enter type of user account maintenance [LOCAL TCP YP q ?]: "
set  ANS = `get_resp`
switch ( $ANS )
case [Ll][Oo][Cc][Aa][Ll] :
	echo LOCAL > $ADM_DIR/tmp/p_mode
	cp /dev/null $ADM_DIR/tmp/tcp_p_server
	exit(0)
	breaksw
case [Tt][Cc][Pp] :
	echo TCP > $ADM_DIR/tmp/p_mode
	if ( { first_TCP_P_SERVER } ) then
		exit(0)
	else
		exit(1)
	endif
	breaksw
case [Yy][Pp] :
	echo YP > $ADM_DIR/tmp/p_mode
	cp /dev/null $ADM_DIR/tmp/tcp_p_server
	exit(0)
	breaksw
case _HELP_ :
	adm_help P_MODE
	goto loop
	breaksw
case [QqXx] :
	exit(1)
	breaksw
default :
	echo ""
	echo ""
	echo "Invalid response...enter one of [LOCAL TCP YP q ?]..."
	goto loop
	breaksw
endsw
#
# OOPS
#
echo "$0: OOPS - broke out of loop somehow."
exit(1)
