|
Last change
on this file since 468 was
127,
checked in by jbarnold, 18 years ago
|
|
old copies of locker software
|
-
Property svn:executable set to
*
|
|
File size:
873 bytes
|
| Line | |
|---|
| 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.
