#!/usr/bin/perl
#
#Copyright (c) 2001-2005 cPanel, Inc.
#
#This auto install script, "install" is hereinafter referred to as the "Software."  No other parts of this package
#will be considered, infered or implied to be part of the the "Software."
#
#Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated
#documentation files (the "Software"), to deal in the Software without restriction, including without limitation the
#rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to
#permit persons to whom the Software is furnished to do so, subject to the following conditions:
#
#The above copyright notice and this permission notice shall be included in all copies or substantial portions of the
#Software.
#
#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE
#WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR
#COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
#OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
#
############################################################################################

BEGIN {
	push(@INC,"/usr/local/cpanel");
}

use SafeFile;
require '/scripts/regsrep.pl';

#VARIBLES
my $domain = '%domain%';
my $installpath = '%installpath%';
my $modulename = '%modulename%';
my $modulepath = '%modulepath%';
my $homedir = '%homedir%';
my $user = '%user%';
my $installdir = '%installdir%';
my $publichtml = '%public_html%';
my $sqldb = '%sqldb%';
my $sqluser = '%sqluser%';
my $sqlpass = '%sqlpass%';
my $sqlserver = '%sqlhost%';
my $username = '%username%';
my $password = '%password%';

print "<b>We are installing in $installdir...\n</b><br/>";

print "<b>Moving installation files into place...</b>";

system("mv $installdir/pkg/* $installdir/");

print "<b>Done\n</b><br/>";
print "<b>Setting up config file...</b>";

rename("$installdir/wp-config-sample.php","$installdir/wp-config.php");

regsrep("${installdir}/wp-config.php",'wordpress',"define('DB_NAME', '${sqldb}');");
regsrep("${installdir}/wp-config.php",'username',"define('DB_USER', '${sqluser}');");
regsrep("${installdir}/wp-config.php",'password',"define('DB_PASSWORD', '${sqlpass}');");
regsrep("${installdir}/wp-config.php",'localhost',"define('DB_HOST', '${sqlhost}');");

print "<b>Done</b><br/>";

print "<b>Finishing installation steps...</b>";

$install= `curl ${domain}${installpath}/wp-admin/install.php?step=2`;

if ( $install =~ /<dt>Login<\/dt>\n<dd><code>(.*)<\/code><\/dd>\n<dt>Password<\/dt>\n<dd><code>(.*)<\/code><\/dd>\n/m ) {
	$username = $1;
	$password = $2;
}

chmod(0000,"${installdir}/wpadmin/install.php");
chmod(0000,"${installdir}/wpadmin/install-helper.php");

print "<b>Done</b><br/>";

print "<b>Installation Finished<br/>";
print "<b>To access your WordPress installation go to: <a href='http://${domain}${installpath}/'>http://${domain}${installpath}/</a></br>";
print "<b>To access the admin area of your WordPress installation go to: <a href='http://${domain}${installpath}/wp-admin'>http://${domain}${installpath}/wp-admin/</a><br/>";
print "<b>The default randomly generated username and password are:</b><br/>";
print "<b>Username: $username</b><br/>";
print "<b>Password: $password</b><br/>";