| [127] | 1 | #!/usr/bin/perl | 
|---|
 | 2 | use strict; | 
|---|
| [1222] | 3 | use FindBin qw($Bin); | 
|---|
 | 4 | use lib $Bin; | 
|---|
| [1129] | 5 | use onserver_star; | 
|---|
| [474] | 6 | use File::Path; | 
|---|
| [127] | 7 |  | 
|---|
 | 8 | setup(); | 
|---|
 | 9 |  | 
|---|
| [1129] | 10 | # Initial installation page | 
|---|
| [472] | 11 | fetch_uri( | 
|---|
| [1129] | 12 |     'install/index.php', | 
|---|
 | 13 |     {mode => 'install', | 
|---|
 | 14 |      language => 'en'}, | 
|---|
 | 15 |     {}); | 
|---|
 | 16 | print "Loaded initial installation page\n"; | 
|---|
 | 17 |  | 
|---|
 | 18 | # Requirements page | 
|---|
 | 19 | fetch_uri( | 
|---|
 | 20 |     'install/index.php', | 
|---|
 | 21 |     {mode => 'install', | 
|---|
 | 22 |      sub => 'requirements', | 
|---|
 | 23 |      language => 'en'}, | 
|---|
 | 24 |     {}); | 
|---|
 | 25 | print "Loaded requirements page\n"; | 
|---|
 | 26 |  | 
|---|
 | 27 | # Database page | 
|---|
 | 28 | fetch_uri( | 
|---|
 | 29 |     'install/index.php', | 
|---|
 | 30 |     {mode => 'install', | 
|---|
 | 31 |      sub => 'database', | 
|---|
 | 32 |      language => 'en'}, | 
|---|
 | 33 |     {img_imagick => '/usr/bin/'}); | 
|---|
 | 34 | print "Loaded database page\n"; | 
|---|
 | 35 |  | 
|---|
 | 36 | # Database again | 
|---|
 | 37 | fetch_uri( | 
|---|
 | 38 |     'install/index.php', | 
|---|
 | 39 |     {mode => 'install', | 
|---|
 | 40 |      sub => 'database'}, | 
|---|
 | 41 |     {dbms => 'mysql', | 
|---|
| [472] | 42 |      dbhost => $sqlhost, | 
|---|
| [1129] | 43 |      dbname => $sqldb, | 
|---|
| [472] | 44 |      dbuser => $sqluser, | 
|---|
| [1129] | 45 |      dbpasswd => $sqlpass, | 
|---|
 | 46 |      table_prefix => '', | 
|---|
 | 47 |      img_imagick => '/usr/bin/', | 
|---|
 | 48 |      language => 'en', | 
|---|
 | 49 |      testdb => 'true'}); | 
|---|
 | 50 | print "Loaded database page (part 2)\n"; | 
|---|
 | 51 |  | 
|---|
 | 52 | # Administrator page | 
|---|
 | 53 | fetch_uri( | 
|---|
 | 54 |     'install/index.php', | 
|---|
 | 55 |     {mode => 'install', | 
|---|
 | 56 |      sub => 'administrator'}, | 
|---|
 | 57 |     {img_imagick => '/usr/bin/', | 
|---|
 | 58 |      language => 'en', | 
|---|
 | 59 |      dbms => 'mysql', | 
|---|
 | 60 |      dbhost => $sqlhost, | 
|---|
 | 61 |      dbport => '', | 
|---|
| [472] | 62 |      dbname => $sqldb, | 
|---|
| [1129] | 63 |      dbuser => $sqluser, | 
|---|
| [472] | 64 |      dbpasswd => $sqlpass, | 
|---|
| [1129] | 65 |      table_prefix => ''}); | 
|---|
 | 66 | print "Loaded administrator page\n"; | 
|---|
 | 67 |  | 
|---|
 | 68 | # Administrator page again | 
|---|
 | 69 | fetch_uri( | 
|---|
 | 70 |     'install/index.php', | 
|---|
 | 71 |     {mode => 'install', | 
|---|
 | 72 |      sub => 'administrator'}, | 
|---|
 | 73 |     {default_lang => 'en', | 
|---|
| [472] | 74 |      admin_name => $admin_username, | 
|---|
 | 75 |      admin_pass1 => $admin_password, | 
|---|
 | 76 |      admin_pass2 => $admin_password, | 
|---|
| [1129] | 77 |      board_email1 => $email, | 
|---|
 | 78 |      board_email2 => $email, | 
|---|
 | 79 |      img_imagick => '/usr/bin/', | 
|---|
 | 80 |      language => 'en', | 
|---|
 | 81 |      dbms => 'mysql', | 
|---|
 | 82 |      dbhost => $sqlhost, | 
|---|
 | 83 |      dbport => '', | 
|---|
 | 84 |      dbname => $sqldb, | 
|---|
 | 85 |      dbuser => $sqluser, | 
|---|
 | 86 |      dbpasswd => $sqlpass, | 
|---|
 | 87 |      table_prefix => '', | 
|---|
 | 88 |      check => 'true'}); | 
|---|
 | 89 | print "Loaded administrator page (part 2)\n"; | 
|---|
| [127] | 90 |  | 
|---|
| [1129] | 91 | # Config file page | 
|---|
 | 92 | fetch_uri( | 
|---|
 | 93 |     'install/index.php', | 
|---|
 | 94 |     {mode => 'install', | 
|---|
 | 95 |      sub => 'config_file'}, | 
|---|
 | 96 |     {img_imagick => '/usr/bin/', | 
|---|
 | 97 |      default_lang => 'en', | 
|---|
 | 98 |      admin_name => $admin_username, | 
|---|
 | 99 |      admin_pass1 => $admin_password, | 
|---|
 | 100 |      admin_pass2 => $admin_password, | 
|---|
 | 101 |      board_email1 => $email, | 
|---|
 | 102 |      board_email2 => $email, | 
|---|
 | 103 |      language => 'en', | 
|---|
 | 104 |      dbms => 'mysql', | 
|---|
 | 105 |      dbhost => $sqlhost, | 
|---|
 | 106 |      dbport => '', | 
|---|
 | 107 |      dbname => $sqldb, | 
|---|
 | 108 |      dbuser => $sqluser, | 
|---|
 | 109 |      dbpasswd => $sqlpass, | 
|---|
 | 110 |      table_prefix => ''}); | 
|---|
 | 111 | print "Loaded config file page\n"; | 
|---|
 | 112 |  | 
|---|
 | 113 | # Advanced page | 
|---|
 | 114 | fetch_uri( | 
|---|
 | 115 |     'install/index.php', | 
|---|
 | 116 |     {mode => 'install', | 
|---|
 | 117 |      sub => 'advanced'}, | 
|---|
 | 118 |     {img_imagick => '/usr/bin/', | 
|---|
 | 119 |      language => 'en', | 
|---|
 | 120 |      dbms => 'mysql', | 
|---|
 | 121 |      dbhost => $sqlhost, | 
|---|
 | 122 |      dbport => '', | 
|---|
 | 123 |      dbname => $sqldb, | 
|---|
 | 124 |      dbuser => $sqluser, | 
|---|
 | 125 |      dbpasswd => $sqlpass, | 
|---|
 | 126 |      table_prefix => '', | 
|---|
 | 127 |      default_lang => 'en', | 
|---|
 | 128 |      admin_name => $admin_username, | 
|---|
 | 129 |      admin_pass1 => $admin_password, | 
|---|
 | 130 |      admin_pass2 => $admin_password, | 
|---|
 | 131 |      board_email1 => $email, | 
|---|
 | 132 |      board_email2 => $email}); | 
|---|
 | 133 | print "Loaded advanced setup page\n"; | 
|---|
 | 134 |  | 
|---|
 | 135 | # Create database tables | 
|---|
 | 136 | fetch_uri( | 
|---|
 | 137 |     'install/index.php', | 
|---|
 | 138 |     {mode => 'install', | 
|---|
 | 139 |      sub => 'create_table'}, | 
|---|
 | 140 |     {email_enable => '1', | 
|---|
 | 141 |      smtp_delivery => '0', | 
|---|
 | 142 |      smtp_auth => 'PLAIN', | 
|---|
 | 143 |      cookie_secure => '0', | 
|---|
 | 144 |      force_server_vars => '0', | 
|---|
 | 145 |      server_protocol => 'http://', | 
|---|
 | 146 |      server_name => "$USER.scripts.mit.edu", | 
|---|
 | 147 |      server_port => '80', | 
|---|
 | 148 |      script_path => "/$addrend", | 
|---|
 | 149 |      img_imagick => '/usr/bin/', | 
|---|
 | 150 |      language => 'en', | 
|---|
 | 151 |      dbms => 'mysql', | 
|---|
 | 152 |      dbhost => $sqlhost, | 
|---|
 | 153 |      dbport => '', | 
|---|
 | 154 |      dbname => $sqldb, | 
|---|
 | 155 |      dbuser => $sqluser, | 
|---|
 | 156 |      dbpasswd => $sqlpass, | 
|---|
 | 157 |      table_prefix => '', | 
|---|
 | 158 |      default_lang => 'en', | 
|---|
 | 159 |      admin_name => $admin_username, | 
|---|
 | 160 |      admin_pass1 => $admin_password, | 
|---|
 | 161 |      admin_pass2 => $admin_password, | 
|---|
 | 162 |      board_email1 => $email, | 
|---|
 | 163 |      board_email2 => $email}); | 
|---|
 | 164 | print "Loaded database table creation page\n"; | 
|---|
 | 165 |  | 
|---|
 | 166 | # Final page | 
|---|
 | 167 | fetch_uri( | 
|---|
 | 168 |     'install/index.php', | 
|---|
 | 169 |     {mode => 'install', | 
|---|
 | 170 |      sub => 'final'}, | 
|---|
 | 171 |     {language => 'en', | 
|---|
 | 172 |      dbms => 'mysql', | 
|---|
 | 173 |      dbhost => $sqlhost, | 
|---|
 | 174 |      dbport => '', | 
|---|
 | 175 |      dbuser => $sqluser, | 
|---|
 | 176 |      dbpasswd => $sqlpass, | 
|---|
 | 177 |      dbname => $sqldb, | 
|---|
 | 178 |      table_prefix => '', | 
|---|
 | 179 |      default_lang => 'en', | 
|---|
 | 180 |      admin_name => $admin_username, | 
|---|
 | 181 |      admin_pass1 => $admin_password, | 
|---|
 | 182 |      admin_pass2 => $admin_password, | 
|---|
 | 183 |      board_email1 => $email, | 
|---|
 | 184 |      board_email2 => $email, | 
|---|
 | 185 |      img_imagick => '/usr/bin/', | 
|---|
 | 186 |      ftp_path => '', | 
|---|
 | 187 |      ftp_user => '', | 
|---|
 | 188 |      ftp_pass => '', | 
|---|
 | 189 |      email_enable => '1', | 
|---|
 | 190 |      smtp_delivery => '0', | 
|---|
 | 191 |      smtp_host => '', | 
|---|
 | 192 |      smtp_auth => 'PLAIN', | 
|---|
 | 193 |      smtp_user => '', | 
|---|
 | 194 |      smtp_pass => '', | 
|---|
 | 195 |      cookie_secure => '0', | 
|---|
 | 196 |      force_server_vars => '0', | 
|---|
 | 197 |      server_protocol => 'http://', | 
|---|
 | 198 |      server_name => "$USER.scripts.mit.edu", | 
|---|
 | 199 |      server_port => '80', | 
|---|
 | 200 |      script_path => "/$addrend"}); | 
|---|
 | 201 | print "Loaded installation finalization page\n"; | 
|---|
 | 202 |  | 
|---|
 | 203 | rmtree(['install']); | 
|---|