Technische Dokumentation zum Unix-Verbund ... - Dr. Hubert Feyrer

B.17 Adduser/lock_account 308
done
-h)
-*)
*)
esac
shift
if [ $LOGINSET -eq 0 ]
then
usage
exit 1
fi
if [ "$NOT" = 1 ]
then
EXEC=echo
fi
VERBOSE=`expr $VERBOSE + 2`
;;
usage
exit 0
;;
echo $0: unbekannte Option $1
exit 1
;;
if [ $LOGINSET -eq 1 ]
then
usage
exit 1
fi
LOGIN=$1
LOGINSET=1
if [ "$VERBOSE" -gt 0 ]
then
$EXEC rsh bt-win2k-server -l Administrator \
"cscript f:verwaltungsskripten\\deluser.vbs $LOGIN"
else
$EXEC rsh bt-win2k-server -l Administrator \
"cscript f:verwaltungsskripten\\deluser.vbs $LOGIN" \
>/dev/null
fi
B.17 Adduser/lock_account
#!/soft/bin/perl5
# $Id: lock_account,v 1.12 2001/08/22 11:36:59 feyrer Exp $
##########################################################################
# The contents of this file are (c) Copyright 1996-1998 by Hubert Feyrer.
# Any use of the knowledge stored in this file may not be used outside
# of the Fachhochschule Regensburg without contacting me first.
###########################################################################
require misc::writelogfile;
$YPPASSWDDIR="/var/yp";
#$YPPASSWDDIR="/tmp";
$YPPASSWD="$YPPASSWDDIR/passwd";
###########################################################################
###########################################################################
##
## Main
##
###########################################################################
###########################################################################
(c) 1996-2003 Hubert Feyrer Stand: 21. Oktober 2003