1 | #!/usr/bin/perl |
---|
2 | use strict; |
---|
3 | use FindBin qw($Bin); |
---|
4 | use lib $Bin; |
---|
5 | use onserver_star; |
---|
6 | use File::Path; |
---|
7 | |
---|
8 | setup(); |
---|
9 | |
---|
10 | # Initial installation page |
---|
11 | fetch_uri( |
---|
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', |
---|
42 | dbhost => $sqlhost, |
---|
43 | dbname => $sqldb, |
---|
44 | dbuser => $sqluser, |
---|
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 => '', |
---|
62 | dbname => $sqldb, |
---|
63 | dbuser => $sqluser, |
---|
64 | dbpasswd => $sqlpass, |
---|
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', |
---|
74 | admin_name => $admin_username, |
---|
75 | admin_pass1 => $admin_password, |
---|
76 | admin_pass2 => $admin_password, |
---|
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"; |
---|
90 | |
---|
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']); |
---|