denyshell

denyshell: Denyshell is a small perl script that is intended to be used as a replacement shell when temporally revoking shell account access to a user. By default denyshell prints in red /etc/warningshell/warn/$UID to the user's terminal and then exits immediatly ($UID being the user's UID number), if it cannot find the file then it exits (or rather die() s). This can be used to inform the user why he has been denied shell access for the time being.