| Last change
                  on this file since 438 was
                  127,
                  checked in by jbarnold, 19 years ago | 
        
          | old copies of locker software | 
        
          | 
              
                  Property svn:executable set to
                  * | 
        | File size:
            873 bytes | 
      
      
        
  | Rev | Line |  | 
|---|
| [127] | 1 | #!/usr/bin/perl | 
|---|
|  | 2 | use strict; | 
|---|
|  | 3 | use lib '/mit/scripts/deploy/bin'; | 
|---|
|  | 4 | use onserver; | 
|---|
|  | 5 |  | 
|---|
|  | 6 | setup(); | 
|---|
|  | 7 |  | 
|---|
|  | 8 | totmp("-d \"server=$sqlhost&name=$sqluser&password=$sqlpass&db=$sqldbcurl&prefix=e107_&stage=3\""); | 
|---|
|  | 9 | my $preva=`curl -K $tmp http://$server/~$USER/$addrend/install.php 2>/dev/null | grep previous_steps | cut -d "'" -f 6`; | 
|---|
|  | 10 |  | 
|---|
|  | 11 | my $prevb=`curl -d "stage=4&previous_steps=$preva" http://$server/~$USER/$addrend/install.php 2>/dev/null | grep previous_steps | cut -d "'" -f 6`; | 
|---|
|  | 12 |  | 
|---|
|  | 13 | totmp("-d \"u_name=$admin_username&d_name=$admin_username&pass1=$admin_password&pass2=$admin_password&email=$human\@mit.edu&stage=6&previous_steps=$prevb\""); | 
|---|
|  | 14 | my $prevc=`curl -K $tmp http://$server/~$USER/$addrend/install.php 2>/dev/null | grep previous_steps | cut -d "'" -f 6`; | 
|---|
|  | 15 |  | 
|---|
|  | 16 | `curl -d "stage=7&previous_steps=$prevc" http://$server/~$USER/$addrend/install.php >/dev/null 2>/dev/null`; | 
|---|
|  | 17 |  | 
|---|
|  | 18 | `rm -rf install.php`; | 
|---|
       
      
      Note: See 
TracBrowser
        for help on using the repository browser.