<?php
/**
 * Y框架主入口文件 
 * 
 * @example 应用框架
 * <pre>
 *     $y = Framework_Y::instance($config);
 *     $y -> dispatch();
 * </pre>
 * 
 * @name Framework_Y
 * @package framework
 * @version 0.2 (2012-12-13 16:32:56) <fei.hong@yoho.cn> 
 * @since 0.1 (2012-6-26) <xiaoma>
 */
class Framework_Y 
{
	/**
	 * 应用配置
	 * 
	 * @var array
	 * @since 0.2
	 */
	private static $_configs = array();
	
	/**
	 * 自动加载注册类型
	 *
	 * @var Framework_YLoader
	 */
	private static $_load = null ;
	
    /**
	 * 核心类文件定义
	 *
	 * @var array
	 * @since 0.2
	 */
	private static $_coreClasses = array(
		'YLoader'	    => 'YLoader.class.php',
		'YRouter'	    => 'YRouter.class.php',
		'YComponent'	=> 'YComponent.class.php',
		'YController'	=> 'YController.class.php',
		'YService'	    => 'YService.class.php',
		'YView'	        => 'YView.class.php',
		'YException'	=> 'YException.class.php',
		'YHttpRequest'	=> 'YHttpRequest.class.php',
	    'YPlugin'	    => 'YPlugin.class.php',
		'YForward'      => 'response/YForward.class.php',
		'YRedirect'     => 'response/YRedirect.class.php',
	);
	
	/**
	 * 初始化框架-初始化运行环境
	 *
	 * @param array $config 应用配置项
	 */
	private function __construct($config = null) 
	{
		// 禁止 magic quotes
		if (phpversion() < '5.3') 
		{
			set_magic_quotes_runtime(false);
		}
		
		// 处理被 magic quotes 自动转义过的数据
// 		if (get_magic_quotes_gpc()) 
// 		{
// 			$in = array(&$_GET, &$_POST, &$_COOKIE, &$_REQUEST);
// 			while (list($k, $v) = each($in)) 
// 			{
// 				foreach ($v as $key => $val) 
// 				{
// 					if (! is_array($val)) 
// 					{
// 						if (is_string($val) && ! is_numeric($val))
// 						{
// 							$in[$k][$key] = stripslashes($val);
// 						}
// 						continue;
// 					}
// 					$in[] = &$in[$k][$key];
// 				}
// 			}
// 			unset($in);
// 		}
		
		// 初始化框架配置
		if (is_array($config))
		{ 
			$this->configure($config);
		}
	}
	
	/**
	 * 初始化框架配置
	 * 
	 * @param array $config 配置项
	 * @return void
	 * @since 0.2
	 */
	private function configure(array $config)
	{
		// 引入框架公共常量
		include(dirname(__FILE__) . '/include/Define.inc.php');

		// 调试开关
		if (isset($config['Debug']) && $config['Debug'])
		{
    		ini_set('error_reporting', E_ALL);
    		ini_set('display_errors', 1);
    		
    		set_error_handler(array($this, 'handleError'), error_reporting());
		}
		
		// 设置时区
		if (isset($config['Default_Timezone']))
		{
			date_default_timezone_set($config['Default_Timezone']);
		}
		
		// 设置Session
		if (isset($config['Session']) && is_array($config['Session']))
		{
			foreach ($config['Session'] as $name => $value)
			{
				ini_set($name, $value);
			}
		}
		
		// 配置引入文件的默认目录
		if (isset($config['Include_Path']))
		{
			set_include_path('.' . PATH_SEPARATOR . $config['Include_Path'] 
								 . PATH_SEPARATOR . get_include_path());
		}
		
		// 框架核心类文件所在的路径
		$path = $config['Framework_Dir'] . DS;
		
		// 注册使用按需要自动加载文件
		if (isset($config['Autoload']['open']) && $config['Autoload']['open'])
		{
			require($path . 'YLoader.class.php');
			
			//初始化加载类,其实这里是不需要验证是否开启自动加载功能的，因为他是框架不可缺少的一部分，不需要配置
			self::$_load = $autoload = new Framework_YLoader();
			$autoload->setPrefixes(array(Y_CLASS_PREFIX => dirname($config['Framework_Dir'])))
					 ->setSuffix($config['Autoload']['suffix'])
					 ->setUseIncludePath(true)
			         ->register();
		}
		// 引入核心类文件
		else
		{
			foreach (self::$_coreClasses as $class)
			{
				include($path . $class);
			}
		}
		
		// 静态注册APP应用配置, 备框架应用
		C(Y_CONFIG, $config);
		$saveHandler = new Util_Common_Session();
		 session_set_save_handler(
			array(&$saveHandler, 'open'), array(&$saveHandler, 'close'), array(&$saveHandler, 'read'), array(&$saveHandler, 'write'), array(&$saveHandler, 'destroy'), array(&$saveHandler, 'gc')
		);
	    /**
	     * 初始化插件
	     * 检查是否已经初始化,如外部已设置，则不进行初始化,支持外部可扩展
	     */
	    if ( !is_array( Framework_YPlugin::getPluginsConfig() ) )
	    {
    	    // 获取插件配置项
    	    $pluginsConfig = C(Y_CONFIG . '.Plugins');
    	    
    	    // 判断插件是否有事件需要执行
    	    if (! isset($pluginsConfig['event']))
    	    {
    	    	return;
    	    }
	        Framework_YPlugin::importPlugins($pluginsConfig);
	    }
	}
	
	/**
	 * 请求派遣
	 * 
	 * @since 0.2
	 */
	public function dispatch($args = array())
	{
		// 实例化HTTP请求对象
		$request = Framework_YHttpRequest::instance();
		if (is_array($args) && ! empty($args))
		{
			$request->setParams($args);
		}
		// 获得请求对应的 UDI（统一目的地信息）
		$udi = $request->requestUDI('array');
	
		// 模块名
		$module = $udi[Framework_YHttpRequest::UDI_MODULE];
		$class = 'Controller' . Y_CLASS_SEPARATORY;
		if ($module !== Framework_YHttpRequest::UDI_DEFAULT_MODULE)
		{
			$dir = C(Y_CONFIG.'.Module_Dir');
			//将控制器目录定位至modules下
			self::$_load->setPrefixes(array(Y_CONTROLLER_PREFIX => $dir.DS.strtolower($module).DS))
			            ->setUseIncludePath(true)
			            ->register();
			$dir .= DS . $module . DS . 'controller';
			//$class = 'Modules' . Y_CLASS_SEPARATORY . $module . Y_CLASS_SEPARATORY . 'Controller' . Y_CLASS_SEPARATORY;
		}
		else
		{
			$dir = C(Y_CONFIG.'.Root_Dir');
			$dir .= DS . 'controller';
		}
		// 目录名
		$namespace = $udi[Framework_YHttpRequest::UDI_NAMESPACE];
		if ($namespace !== Framework_YHttpRequest::UDI_DEFAULT_NAMESPACE)
		{
			$dir .= DS . $namespace;
			$class .= ucfirst($namespace) . Y_CLASS_SEPARATORY;
		}
		// 控制器名
		$controller = ucfirst($udi[Framework_YHttpRequest::UDI_CONTROLLER]);
		$class .= $controller;
		$controller = $dir . DS . $controller . '.class.php';
	
		do
		{
			// 判断控制器文件是否存在
			if (! file_exists($controller))
			{
				$response = $this->_on_controller_not_found($class);
				break;
			}
			// 执行插件
			$response = Framework_YPlugin::execute('beforeDispatch');
			if ($response !== null)
			{
				break;
			}
			// 构造控制器对象
			$action = $udi[Framework_YHttpRequest::UDI_ACTION];
			// 控制器类名称 = [Modules_模块名_]Controller_目录名_控制器名
			$controller = new $class($this);
			// 如果指定动作存在, 则调用执行Action
			if ($controller->existsAction($action))
			{
				$response = $controller->execute($action, $args);
				break;
			}
			// 如果指定动作不存在, 则尝试调用控制器的 _on_action_not_defined() 函数处理错误
			// 如果控制器的 _on_action_not_defined() 函数没有返回处理结果
			// 则由当前默认应用程序对象的 _on_action_not_defined() 函数处理
			if (method_exists($controller, '_on_action_not_defined'))
			{
				$response = $controller->_on_action_not_defined($action);
			}
			else
			{
				$response = $this->_on_action_not_defined($action);
			}
		}
		while (false);
	
		// 如果返回的是对象并且包含execute方法，就执行此方法
		if (is_object($response) && method_exists($response, 'execute'))
		{
			$response = $response->execute();
		}
		// 如果是一个 Framework_Response_YForward 对象，则将请求进行转发
		elseif ($response instanceof Framework_Response_YForward)
		{
			$args = $response->getArgs();
			$response = $this->dispatch($args);
		}
	
		// 执行afterRender方法, 通知已经完成视图渲染并返回
		if (is_string($response))
		{
			Framework_YPlugin::execute('afterRender', $response);
		}
	
		echo (string) $response;
	}
	
	/**
	 * 实例化应用
	 *
	 * @param array $config 应用配置项
	 * @return Framework_Y
	 */
	public static function instance($config = null)
	{
		static $instance = null;
		if (null === $instance)
		{
			$instance = new self($config);
		}
		return $instance;
	}

	/**
	 * 处理运行时发生的错误
	 *
	 * @param integer $code
	 * @param string $message
	 * @param string $file
	 * @param integer $line
	 */
	public function handleError($code, $message, $file, $line)
	{
		if ($code & error_reporting())
		{
			restore_error_handler();
			$log = "$message $file on line: $line<br>Stack trace:<br>";
			$trace = debug_backtrace();
			array_shift($trace);
			foreach ($trace as $i => $t)
			{
				if (! isset($t['file']))
				{
					$t['file'] = 'unknown';
				}
				if (! isset($t['line']))
				{
					$t['line'] = 0;
				}
				if (! isset($t['function']))
				{
					$t['function'] = 'unknown';
				}
				$log .= "#$i {$t['file']}({$t['line']}): ";
				if (isset($t['object']) && is_object($t['object']))
				{
					$log .= get_class($t['object']).'->';
				}
				$log .= "{$t['function']}()\n";
			}
			if (isset($_SERVER['REQUEST_URI']))
			{
				$log .= 'REQUEST_URI=' . $_SERVER['REQUEST_URI'] . "\n";
			}
			echo $log;
		}
	}
	
	/**
	 * 未定义的控制器 - 将错误指派到Error控制器
	 */
	protected function _on_controller_not_found($class) 
	{
		$controller = new Framework_YController();
		return $controller->_forward('default::error', array(
			'sign' => '_on_controller_not_found', 
			'error' => 'Undefined Controller: ' . $class 
		));
	}
	
	/**
	 * 未定义的操作方法 - 将错误指派到Error控制器
	 */
	protected function _on_action_not_defined($action) 
	{
		$controller = new Framework_YController();
		return $controller->_forward('default::error', array(
			'sign' => '_on_action_not_defined', 
			'error' => 'Undefined Action: ' . $action . 'Action' 
		));
	}
	
	/**
	 * 无权限 - 将错误指派到Error控制器
	 */
	protected function _on_not_allow() 
	{
		$controller = new Framework_YController();
		return $controller->_forward('default::error', array(
			'sign' => '_on_not_allow', 
			'error' => 'Not allow to access' 
		));
	}

}

/**
 * 转换 HTML 特殊字符，等同于 htmlspecialchars()
 *
 * @param string $text
 * @return string
 */
function h($text) 
{
	return htmlspecialchars($text);
}

/**
 * 用于输出一个变量的内容
 *
 * @param mixed $vars 要输出的变量
 * @param string $label 输出变量时显示的标签
 * @param boolean $return 是否返回输出内容
 *
 * @return string
 */
function dump($vars, $label = null, $return = false) 
{
	if (ini_get('html_errors')) 
	{
		$content = "<pre>\n";
		if ($label !== null && $label !== '') 
		{
			$content .= "<strong>{$label} :</strong>\n";
		}
		$content .= htmlspecialchars(print_r($vars, true));
		$content .= "\n</pre>\n";
	} 
	else 
	{
		$content = "\n";
		if ($label !== null && $label !== '') 
		{
			$content .= $label . " :\n";
		}
		$content .= print_r($vars, true) . "\n";
	}
	if ($return) 
	{
		return $content;
	}
	else
	{
		echo $content;
	}
}

/**
 * 设置/获取配置值（获取时,最多仅支持二维数组）
 *
 * @param string $name 配置名
 * @param mixed $value 对应值
 * @return unknown
 */
function C($name=null, $value=null) 
{
    static $_config = array();
    // 无参数时获取所有
    if ( null === $name )
    {
        return $_config;
    }
    
    // 优先执行设置获取或赋值
    if (is_string($name)) 
    {
        if (!strpos($name, '.')) 
        {
            $name = strtolower($name);
            if (is_null($value))
            {
            	return isset($_config[$name]) ? $_config[$name] : null;
            }
            $_config[$name] = $value;
            return;
        }
        // 二维数组设置和获取支持
        $name = explode('.', $name);
        $name[0]   =  strtolower($name[0]);
        if (is_null($value))
        {
        	return isset($_config[$name[0]][$name[1]]) ? $_config[$name[0]][$name[1]] : null;
        }
        $_config[$name[0]][$name[1]] = $value;
        return;
    }
    // 批量设置
    if (is_array($name))
    {
        return $_config = array_merge($_config, array_change_key_case($name));
    }
    return null; // 避免非法参数
}
/**
 * Framework_YHttpRequest::url() 方法的简写，用于构造一个 URL 地址
 *
 * url() 方法的参数比较复杂，请参考 Framework_YHttpRequest::url() 方法的详细说明。
 *
 * @param string $udi UDI 字符串
 * @param array|string $params 附加参数数组
 * @param string $route 路由名
 * @param array $opts 控制如何生成 URL 的选项
 *
 * @return string 生成的 URL 地址
 */
function url($udi, $params = null, $route = null, array $opts = null)
{
	return Framework_YHttpRequest::instance()->url($udi, $params, $route, $opts);
}