Return to lcuseradd CVS log

Up to [LON-CAPA] / loncom

Annotation of loncom/lcuseradd, revision 1.1

1.1     ! harris41    1: #!/usr/bin/perl
        !             2: #
        !             3: # lcuseradd
        !             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 creates a /home/USERNAME directory
        !            12: # as well as a /home/USERNAME/public_html directory.
        !            13: # It adds user entries to
        !            14: # /etc/passwd and /etc/groups.
        !            15: # Passwords are set with lcpasswd
        !            16: 
        !            17: # Standard input usage
        !            18: # First line is USERNAME
        !            19: # Second line is PASSWORD
        !            20: 
        !            21: # Command-line arguments [USERNAME] [PASSWORD]
        !            22: # Yes, but be very careful here (don't pass shell commands)
        !            23: # and this is only supported to allow perl-system calls.
        !            24: 
        !            25: # Security
        !            26: $ENV{'PATH'}=""; # Nullify path information.
        !            27: $ENV{'BASH_ENV'}=""; # Nullify shell environment information.
        !            28: