[BACK]Return to lcuseradd CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom

Diff for /loncom/Attic/lcuseradd between versions 1.19 and 1.20

version 1.19, 2002/02/14 22:09:14 version 1.20, 2002/04/27 13:10:47
Line 9 Line 9
 # 10/27,10/29,10/30 Scott Harrison  # 10/27,10/29,10/30 Scott Harrison
 # YEAR=2001  # YEAR=2001
 # 10/21,11/13,11/15 Scott Harrison  # 10/21,11/13,11/15 Scott Harrison
   # YEAR=2002
   #   May 19, 2002 Ron Fox
   #      - Removed creation of the pulic_html directory.  This directory
   #        can now be added in two ways:
   #        o The user can add it themselves if they want some local web
   #          space which may or may not contain construction items.
   #        o LonCapa will add it if/when the user is granted an Author
   #          role.
 #  #
 # $Id$  # $Id$
 ###  ###
Line 40  use strict; Line 48  use strict;
 # ------------------------------------------------------- Description of script  # ------------------------------------------------------- Description of script
 #  #
 # This script is a setuid script that should  # This script is a setuid script that should
 # be run by user 'www'.  It creates a /home/USERNAME directory  # be run by user 'www'.  It creates a /home/USERNAME directory.
 # as well as a /home/USERNAME/public_html directory.  
 # It adds a user to the unix system.  # It adds a user to the unix system.
 # Passwords are set with lcpasswd.  # Passwords are set with lcpasswd.
 # www becomes a member of this user group.  # www becomes a member of this user group.
Line 231  if ($?) { Line 238  if ($?) {
 ($>,$<)=($wwwid,0);  ($>,$<)=($wwwid,0);
 &enable_root_capability;  &enable_root_capability;
   
   # -- Don't add public_html... that can be added either by the user
   #    or by lchtmldir when the user is granted an authorship role.
   
 # ------------------------------ Make final modifications to the user directory  # ------------------------------ Make final modifications to the user directory
 # -- Add a public_html file with a stand-in index.html file  # -- Add a public_html file with a stand-in index.html file
   
 # system('/bin/chmod','-R','0660',"/home/$safeusername");  # system('/bin/chmod','-R','0660',"/home/$safeusername");
 system('/bin/chmod','0710',"/home/$safeusername");  #system('/bin/chmod','0710',"/home/$safeusername");
 mkdir "/home/$safeusername/public_html",0755;  #mkdir "/home/$safeusername/public_html",0755;
 system('/bin/chmod','02770',"/home/$safeusername/public_html");  #system('/bin/chmod','02770',"/home/$safeusername/public_html");
 open OUT,">/home/$safeusername/public_html/index.html";  #open OUT,">/home/$safeusername/public_html/index.html";
 print OUT<<END;  #print OUT<<END;
 <html>  #<html>
 <head>  #<head>
 <title>$safeusername</title>  #<title>$safeusername</title>
 </head>  #</head>
 <body>  #<body>
 <h1>$safeusername</h1>  #<h1>$safeusername</h1>
 <p>  #<p>
 Learning Online Network  #Learning Online Network
 </p>  #</p>
 <p>  #<p>
 This area provides for:  #This area provides for:
 </p>  #</p>
 <ul>  #<ul>
 <li>resource construction</li>  #<li>resource construction</li>
 <li>resource publication</li>  #<li>resource publication</li>
 <li>record-keeping</li>  #<li>record-keeping</li>
 </ul>  #</ul>
 </body>  #</body>
 </html>  #</html>
 END  #END
 close OUT;  #close OUT;
   
 system('/bin/chown','-R',"$safeusername:$safeusername","/home/$safeusername");  system('/bin/chown','-R',"$safeusername:$safeusername","/home/$safeusername");
   
 # -------------------------------------------------------- Exit script  # -------------------------------------------------------- Exit script
Removed from v.1.19  
changed lines
  Added in v.1.20

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>