Changeset 128 for locker/bin

Timestamp:

Jan 28, 2007, 4:34:38 PM (18 years ago)

Author:

jbarnold

Message:

current copies of locker software

Location:

locker/bin

Files:

• signup-sql (modified) (1 diff)
• webaccess (modified) (1 diff)

locker/bin/signup-sql

@@ -9 +9 @@
 
 sshrun() {
-  athrun scripts sshmic scripts.mit.edu /usr/local/bin/runas $lname /mit/scripts/$1 2>/dev/null
+  athrun scripts sshmic ${lname}@scripts.mit.edu /mit/scripts/$1 2>/dev/null
 }
 
 vsshrun() {
-  athrun scripts sshmic scripts.mit.edu /usr/local/bin/runas $lname /mit/scripts/$1
+  athrun scripts sshmic ${lname}@scripts.mit.edu /mit/scripts/$1
 }
 

locker/bin/webaccess

@@ -47 +47 @@
         chmod(0777, ".htaccess");
 
-        my $salt = substr($username, 0, 2);
-        $password = crypt($password, $salt);
+        my $salt = join '', ('.', '/', 0..9, 'A'..'Z', 'a'..'z') [rand 64, rand 64, rand 64, rand 64, rand 64, rand 64, rand 64, rand 64];
+        $password = crypt($password, '$1$'.$salt);
 
         open(HTPASSWD, ">>.htpasswd");