Return to lcuserdel CVS log

Up to [LON-CAPA] / loncom

starting program script descriptions for setuid scripts
which allow for adding and deleting users

    1: #!/usr/bin/perl
    2: #
    3: # lcuserdel
    4: #
    5: # Scott Harrison
    6: # October 27, 2000
    7: 
    8: use strict;
    9: 
   10: # This script is a setuid script that should
   11: # be run by user 'www'.  It DOES NOT delete directories.
   12: # All it does is remove a user's entries from
   13: # /etc/passwd, /etc/groups, and /etc/smbpasswd.
   14: 
   15: 
   16: 
   17: # Standard input usage
   18: # First line is USERNAME
   19: 
   20: # Command-line arguments [USERNAME]
   21: # Yes, but be very careful here (don't pass shell commands)
   22: # and this is only supported to allow perl-system calls.
   23: 
   24: # Security
   25: $ENV{'PATH'}=""; # Nullify path information.
   26: $ENV{'BASH_ENV'}=""; # Nullify shell environment information.
   27: