<?php
/**
* iCMS - i Content Management System
* Copyright (c) 2007-2012 idreamsoft.com iiimon Inc. All rights reserved.
*
* @author coolmoo <idreamsoft@qq.com>
* @site http://www.idreamsoft.com
* @licence http://www.idreamsoft.com/license.php
* @version 6.0.0
* @$Id: install.php 2330 2014年01月03日 05:19:07Z coolmoo $
*/
ini_set('display_errors','ON');
error_reporting(E_ALL & ~E_NOTICE);

define('iPHP',TRUE);
define('iPHP_APP','iCMS'); //应用名
define('iPATH',dirname(strtr(__FILE__,'\\','/'))."/../");

if($_POST['action']=='install'){
	$db_host = trim($_POST['DB_HOST']);
	$db_user = trim($_POST['DB_USER']);
 $db_port = trim($_POST['DB_PORT']);
	$db_password = trim($_POST['DB_PASSWORD']);
	$db_name = trim($_POST['DB_NAME']);
	$db_prefix = trim($_POST['DB_PREFIX']);

 empty($db_port) && $db_port = 3306;

	define('iPHP_DB_HOST',$db_host);	// 服务器名或服务器ip,一般为localhost
 define('iPHP_DB_PORT', $db_port); // 服务器端口
	define('iPHP_DB_USER',$db_user);		// 数据库用户
	define('iPHP_DB_PASSWORD',$db_password);//数据库密码
	define('iPHP_DB_NAME',$db_name);		// 数据库名
	define('iPHP_DB_PREFIX',$db_prefix);	// 表名前缀, 同一数据库安装多个请修改此处
 define('iPHP_DB_PREFIX_TAG','#iCMS@__');

	require iPATH.'iPHP/iPHP.php';//iPHP框架文件

 $router_dir = rtrim($_POST['ROUTER_DIR'],'/').'/';
 $router_url = trim($_POST['ROUTER_URL'],'/');
 $admin_name = trim($_POST['ADMIN_NAME']);
 $admin_password = trim($_POST['ADMIN_PASSWORD']);
	$lock_file = iPATH.'cache/install.lock';

	file_exists($lock_file) && iPHP::alert('请先删除 cache/install.lock 这个文件。','js:top.callback();');

	iPHP_DB_HOST OR iPHP::alert("请填写数据库服务器地址",'js:top.callback("#DB_HOST");');
	iPHP_DB_USER OR iPHP::alert("请填写数据库用户名",'js:top.callback("#DB_USER");');
	iPHP_DB_PASSWORD OR iPHP::alert("请填写数据库密码",'js:top.callback("#DB_PASSWORD");');
	iPHP_DB_NAME OR iPHP::alert("请填写数据库名",'js:top.callback("#DB_NAME");');
	strstr(iPHP_DB_PREFIX, '.') && iPHP::alert("您指定的数据表前缀包含点字符,请返回修改",'js:top.callback("#DB_PREFIX");');
	//preg_match('/([a-zA-z\_]+)/is', $db_prefix) OR iPHP::alert("您指定的数据表前缀包含非法字符,请返回修改",'js:top.callback("#DB_PREFIX");');

	$admin_name OR iPHP::alert("请填写超级管理员账号",'js:top.callback("#ADMIN_NAME");');
	$admin_password OR iPHP::alert("请填写超级管理员密码",'js:top.callback("#ADMIN_PASSWORD");');
	strlen($admin_password)<6 && iPHP::alert("请填写超级管理员密码",'js:top.callback("#ADMIN_PASSWORD");');

 $mysql_link = iDB::connect('link');
	// $mysql_link = @mysql_connect($db_host,$db_user,$db_password);
	$mysql_link OR iPHP::alert("数据库连接出错",'js:top.callback();');
 //(MYSQL ERROR:".iDB::$last_error.")
	// mysql_query("SET NAMES '".iPHP_DB_CHARSET."'");
	// @mysql_select_db($db_name,$mysql_link) OR iPHP::alert("数据库{$db_name}不存在",'js:top.callback("#DB_NAME");');
 if(isset($_POST['CREATE_DATABASE'])){
 iDB::connect('!select_db');
 iDB::query("CREATE DATABASE `".iPHP_DB_NAME."`CHARACTER SET utf8 COLLATE utf8_general_ci",'get')
 OR
 iPHP::alert('数据库创建失败,请确认数据库是否已存在或该用户是否有权限创建数据库','js:top.callback();');
 }else{
 iDB::connect();
 }
 iDB::pre_set();
 iDB::select_db(true) OR iPHP::alert("不能链接到数据库".iPHP_DB_NAME,'js:top.callback("#DB_NAME");');

	$config = iPATH.'config.php';
	$content = iFS::read($config,false);
	$content = preg_replace("/define\(\'iPHP_DB_HOST\',\'.*?\'\)/is", 		"define('iPHP_DB_HOST','".iPHP_DB_HOST."')", $content);
 $content = preg_replace("/define\(\'iPHP_DB_PORT\',\'.*?\'\)/is", "define('iPHP_DB_PORT','".iPHP_DB_PORT."')", $content);
	$content = preg_replace("/define\(\'iPHP_DB_USER\',\'.*?\'\)/is", 		"define('iPHP_DB_USER','".iPHP_DB_USER."')", 	 $content);
	$content = preg_replace("/define\(\'iPHP_DB_PASSWORD\',\'.*?\'\)/is", 	"define('iPHP_DB_PASSWORD','".iPHP_DB_PASSWORD."')", $content);
	$content = preg_replace("/define\(\'iPHP_DB_NAME\',\'.*?\'\)/is", 		"define('iPHP_DB_NAME','".iPHP_DB_NAME."')", $content);
	$content = preg_replace("/define\(\'iPHP_DB_PREFIX\',\'.*?\'\)/is", 	"define('iPHP_DB_PREFIX','".iPHP_DB_PREFIX."')", $content);
	$content = preg_replace("/define\(\'iPHP_KEY\',\'.*?\'\)/is", 			"define('iPHP_KEY','".random(32)."')",$content);

	$parse_url = parse_url($router_url);
	$host = $parse_url['host'];
	$COOKIE_DOMAIN = '.'.LtDomainParser::getRootDomain($host);
 preg_match("/^(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})$/",$host) && $COOKIE_DOMAIN = '';
	$content = preg_replace("/define\(\'iPHP_COOKIE_DOMAIN\',\s*\'.*?\'\)/is","define('iPHP_COOKIE_DOMAIN','$COOKIE_DOMAIN')",$content);

	iFS::write($config,$content,false);
//开始安装 数据库

	$sql_file = dirname(strtr(__FILE__,'\\','/')).'/iCMS.V6.sql';
	is_readable($sql_file) OR iPHP::alert('数据库文件不存在或者读取失败','js:top.callback();');
	//require_once ($config);

	$sql = iFS::read($sql_file);
	// $sql = str_replace('#iCMS@__',$db_prefix,$sql);
 //
 //
	run_query($sql);

//设置超级管理员
	$admin_password = md5($admin_password);
	iDB::query("
		UPDATE `#iCMS@__members`
		SET `username` = '{$admin_name}', `password` = '{$admin_password}'
		WHERE `uid` = '1';
	");

//配置程序
	$result = iDB::all("SELECT * FROM `#iCMS@__config` WHERE `appid`='0'");

 foreach ($result as $key => $c) {
 $value = $c['value'];
 strstr($c['value'], 'a:') && $value = unserialize($c['value']);
 $setting[$c['name']] = $value;
 }


	$setting['router']['URL'] = $router_url;
	$setting['router']['DIR'] = $router_dir;
	$setting['router']['public_url'] = $router_url.'/public';
	$setting['router']['user_url'] = $router_url.'/usercp';
	$setting['router']['404'] = $router_url.'/public/404.htm';
	$setting['router']['tag_url'] = $router_url;

	$setting['FS']['url'] = $router_url.'/res/';

	$setting['template']['mobile']['domain'] = $router_url;
	$setting['template']['device'][0]['domain'] = $router_url;

	foreach($setting AS $n=>$v){
 is_array($v) && $v = addslashes(serialize($v));
 iDB::query("UPDATE `#iCMS@__config` SET `value` = '$v' WHERE `appid` ='0' AND `name` ='$n'");
	}

 	$output = "<?php\ndefined('iPHP') OR exit('Access Denied');\nreturn ";
	$output.= var_export($setting,true);
	$output.= ';';
	iFS::write(iPATH.'conf/iCMS/config.php',$output,false);
//写入数据库配置<hr />开始安装数据库<hr />数据库安装完成<hr />设置超级管理员<hr />更新网站缓存<hr />
	iFS::write($lock_file,'iCMS.'.time(),false);
	iFS::rmdir(iPATH.'install');
	iPHP::success("安装完成",'js:top.install.step4();');
}
function run_query($sql) {
	$sql = str_replace("\r", "\n", $sql);
	$resource = array();
	$num = 0;
	$sql_array = explode(";\n", trim($sql));
 foreach($sql_array as $query) {
 $queries = explode("\n", trim($query));
 foreach($queries as $query) {
 $resource[$num] .= $query[0] == '#' ? '' : $query;
 }
 $num++;
 }
 unset($sql);

 foreach($resource as $key=>$query) {
 $query = trim($query);
 $query && iDB::query($query);
 }
}

/**
 * from https://github.com/qinjx/lotusphp/blob/master/runtime/DomainParser/DomainParser.php
 */
class LtDomainParser {
 protected static $TLD = array(
 "aero" => 1, "asia" => 1, "biz" => 1, "cat" => 1, "com" => 1, "coop" => 1, "edu" => 1, "gov" => 1, "local" => 1,
 "info" => 1, "int" => 1, "jobs" => 1, "mil" => 1, "mobi" => 1, "name" => 1, "net" => 1, "org" => 1, "post" => 1,
 "pro" => 1, "tel" => 1, "xxx" => 1
 );
 /**
 * ccTLD
 * @var array
 * ccTLD list: http://en.wikipedia.org/wiki/ISO_3166-1_alpha-2
 * Reserved ccSLD: http://mxr.mozilla.org/mozilla-central/source/netwerk/dns/effective_tld_names.dat?raw=1
 */
 protected static $ccTLD = array(
 "cn" => array(
 "sh" => 1,
 "com" => 1,
 ),
 "hk" => array(
 "com" => 1,
 ),
 "ch" => 1,
 );
 /**
 * 从URL中的主机名解析出网站根域名
 * @param string $hostname URL中的主机名
 * @return bool|string 网站根域名
 */
 public static function getRootDomain($hostname) {
 if (is_string($hostname) && $Last3Tokens = self::getValidLast3DomainLabels($hostname)) {
 $sld = $Last3Tokens[1] . "." . $Last3Tokens[0];
 if (3 <= strlen($Last3Tokens[0])) {//gTLD
 if (isset(self::$TLD[$Last3Tokens[0]])) {
 return $sld;
 }
 } else {//ccTLD
 if (isset(self::$ccTLD[$Last3Tokens[0]])) {//ccTLD
 if (isset(self::$ccTLD[$Last3Tokens[0]][$Last3Tokens[1]])) {//Reserved ccSLD
 if (isset($Last3Tokens[2])) {
 return $Last3Tokens[2] . "." . $sld;
 }
 } else {
 return $sld;
 }
 }
 }
 }
 return null;
 }
 /**
 * 获取主机名最后三段,如果只有两段,返回两段
 * @param $hostname
 * @return array|null
 */
 protected static function getValidLast3DomainLabels($hostname) {
 if ("." !== substr($hostname, 0, 1) && "." !== substr($hostname, -1) && 253 > strlen($hostname)) {
 $labels = explode(".", $hostname);
 $labelsNum = count($labels);
 if (2 <= $labelsNum && 127 >= $labelsNum) {
 $Last3Tokens = array();
 for ($i = $labelsNum-1; $i >= 0; $i --) {
 if (true === self::isValidDomainLabel($labels[$i])) {
 if ($i >= $labelsNum - 3) {
 $Last3Tokens[$labelsNum - $i - 1] = $labels[$i];
 }
 } else {
 return null;
 }
 }
 return $Last3Tokens;
 }
 }
 return null;
 }
 /**
 * 判断是否合法的域名,主要条件:最长63字节,不可包含非法字符
 * @param $label
 * @return bool
 */
 protected static function isValidDomainLabel($label) {
 $labelLen = strlen($label);
 if (63 >= $labelLen && 1 <= $labelLen) {
 for($i = 0; $i < $labelLen; $i ++) {
 $ascii = ord($label[$i]);
 if (
 $ascii >= 65 && $ascii <= 90 //A-Z
 or
 $ascii >= 97 && $ascii <= 122//a-z
 or
 $ascii >= 48 && $ascii <= 57 //0-9
 or
 $ascii == 45//-
 ) {
 // it is valid
 } else {
 return false;
 }
 }
 return true;
 } else {
 return false;
 }
 }
}