<?php

/**
 * PESCMS for PHP 5.4+
 *
 * Copyright (c) 2015 PESCMS (http://www.pescms.com)
 *
 * For the full copyright and license information, please view
 * the file LICENSE.md that was distributed with this source code.
 * @version 2.5
 */

namespace Core\Controller;

/**
 * PES控制器
 * @author LuoBoss
 * @version 1.0
 */
class Controller {

    /**
     * 控制器快速获取表前缀
     */
    public $prefix;

    /**
     * 模型快速获取表前缀
     */
    public static $modelPrefix;

    public static $config = [];

    /**
     * 当前启用的主题
     */
    protected $theme;

    public final function __construct() {
        if (empty(self::$config)) {
            self::$config = \Core\Func\CoreFunc::loadConfig();
        }
        $this->prefix = self::$modelPrefix = empty(self::$config[GROUP]) ? self::$config['DB_PREFIX'] : self::$config[GROUP]['DB_PREFIX'];
        $this->chooseTheme();
        $this->__init();
    }

    /**
     * 实现自定义构造函数
     */
    public function __init() {

    }

    /**
     * 初始化数据库
     * @param str $name 表名
     * @return obj 返回数据库对象
     */
    protected static function db($name = '', $database = '', $dbPrefix = '') {
        return \Core\Func\CoreFunc::db($name, $database, $dbPrefix);
    }

    /**
     * 安全过滤GET提交的数据
     * @param string $name 名称
     * @param boolean $htmlentities 是否转义HTML标签
     * @return string 返回处理完的数据
     */
    protected static function g($name, $htmlentities = TRUE) {
        return self::handleData($_GET[$name], $htmlentities);
    }

    /**
     * 安全过滤POST提交的数据
     * @param string $name 名称
     * @param boolean $htmlentities 是否转义HTML标签
     * @return string 返回处理完的数据
     */
    protected static function p($name, $htmlentities = TRUE) {
        return self::handleData($_POST[$name], $htmlentities);
    }

    /**
     * 处理数据
     * @param $data 传递过来的数据
     * @param bool $htmlentities 是否转义
     * @return array|bool|string
     */
    private static function handleData($data, $htmlentities = TRUE){
        if (empty($data) && !is_numeric($data)) {
            return '';
        }

        if (is_array($data)) {
            return $data;
        }
        if ((bool)$htmlentities) {
            $antiXss = new \voku\helper\AntiXSS();
            //允许内联样式
            $antiXss->removeEvilAttributes(array('style'));
            $name = htmlspecialchars($antiXss-> xss_clean(trim($data)));
        } else {
            $name = trim($data);
        }
        return $name;
    }

    /**
     * 判断GET是否有数据提交
     * @param sting $name 名称
     * @param sting $message 返回的提示信息
     * @param boolean $htmlentities 是否转义HTML标签
     */
    protected static function isG($name, $message, $htmlentities = TRUE) {
        //当为0时，直接返回
        if ($_GET[$name] == '0') {
            return self::g($name, $htmlentities);
        } elseif (is_array($_GET[$name])) {
            return $_GET[$name];
        }
        if (empty($_GET[$name]) || !trim($_GET[$name]) || !is_string($_GET[$name])) {
            self::error($message);
        } elseif (empty($_GET[$name]) && is_array($_GET[$name])) {
            self::error($message);
        }
        return self::g($name, $htmlentities);
    }

    /**
     * 判断POST是否有数据提交
     * @param sting $name 名称
     * @param sting $message 返回的提示信息
     * @param boolean $htmlentities 是否转义HTML标签
     */
    protected static function isP($name, $message, $htmlentities = TRUE) {
        //当为0时，直接返回
        if ($_POST[$name] == '0') {
            return self::p($name, $htmlentities);
        } elseif (is_array($_POST[$name])) {
            return $_POST[$name];
        }
        if (empty($_POST[$name]) || !trim($_POST[$name]) || !is_string($_POST[$name])) {
            self::error($message);
        } elseif (empty($_POST[$name]) && is_array($_POST[$name])) {
            self::error($message);
        }
        return self::p($name, $htmlentities);
    }

    /**
     * 模板变量赋值
     */
    protected function assign($name, $value = '') {

        if (is_array($name)) {
            \Core\Func\CoreFunc::$param = array_merge(\Core\Func\CoreFunc::$param, $name);
        } elseif (is_object($name)) {
            foreach ($name as $key => $val)
                \Core\Func\CoreFunc::$param[$key] = $val;
        } else {
            \Core\Func\CoreFunc::$param[$name] = $value;
        }
    }

    /**
     * 加载项目主题
     * @param string $themeFile 为空时，则调用 控制器名称_方法.php 的模板(参数不带.php后缀)。
     */
    protected function display($themeFile = '') {

        /* 加载标签库 */
        $label = new \Expand\Label();

        if (!empty(\Core\Func\CoreFunc::$param)) {
            extract(\Core\Func\CoreFunc::$param, EXTR_OVERWRITE);
        }

        include $this->checkThemeFileExist($themeFile);
    }

    /**
     * @param type $themeFile 模板名称 为空时，则调用 控制器名称_方法.php 的模板(参数不带.php后缀)。
     * @param string $layout 布局模板文件名称 | 默认调用 layout(参数不带.php后缀)
     */
    protected function layout($themeFile = '', $layout = "layout") {
        $file = $this->checkThemeFileExist($themeFile);

        /* 加载标签库 */
        $label = new \Expand\Label();

        if (!empty(\Core\Func\CoreFunc::$param)) {
            extract(\Core\Func\CoreFunc::$param, EXTR_OVERWRITE);
        }

        //检查布局文件是否存在
        $layoutFile = THEME . '/' . GROUP . "/{$this->theme}/{$layout}.php";

        if (!is_file($layoutFile)) {
	        $layoutFile = THEME . '/' . GROUP . "/{$this->theme}/" . MODULE . "/{$layout}.php";
	        if(!is_file($layoutFile)){
		        $this->error("The theme file {$layout} not exist!");
	        }
        }

        require $layoutFile;
    }

    /**
     * 404专用提示
     */
    protected function _404($layout = false, $title = '404 - 页面被怪兽吃掉了'){
        header("HTTP/1.1 404 Page not found");
        $this->assign('title', $title);
        if($layout == true){
            $this->layout('404');
        }else{
            $this->display('404');
        }

        exit;
    }

    /**
     * 选择前后台主题名称
     */
    private function chooseTheme() {
        if (empty($this->theme)) {
            $this->theme = \Core\Func\CoreFunc::getThemeName(GROUP);
        }
        return $this->theme;
    }

    /**
     * 检查主题文件是否存在
     */
    protected function checkThemeFileExist($themeFile) {
        \Core\Func\CoreFunc::token();
        $this->beforeInitView();
        if (empty($themeFile)) {
            $themeFile = MODULE . '_' . ACTION . '.php';
            $file = THEME . '/' . GROUP . '/' . $this->theme . "/" . MODULE . '/' . MODULE . '_' . ACTION . '.php';
        } else {
            $file = THEME . '/' . GROUP . '/' . $this->theme . "/" . MODULE . '/' . $themeFile . '.php';
            if (!is_file($file)) {
                $file = THEME . '/' . GROUP . '/' . $this->theme . "/" . $themeFile . '.php';
            }
        }

        if (!is_file($file)) {
            $this->error("The theme file {$themeFile} not exist!");
        }
        return $file;
    }

    /**
     * 切片开始前执行的动作
     */
    private static function beforeInitView() {
        array_walk(\Core\Slice\InitSlice::$slice, function ($obj) {
            \Core\Slice\InitSlice::$beforeViewToExecAfter = true;
            $obj->after();
        });
    }

    /**
     * 执行成功提示信息
     * @param string $message 信息
     * @param string $url 跳转地址|默认为返回上一页
     * @param int $waitSecond 跳转等待时间
     */
    protected static function success($message, $jumpUrl = 'javascript:history.go(-1)', $waitSecond = '3') {
        self::tipsJump($message, $jumpUrl, $waitSecond, 200);
    }

    /**
     * 执行失败提信息
     * @param string $message 信息
     * @param string $url 跳转地址|默认为返回上一页
     * @param int $waitSecond 跳转等待时间
     */
    protected static function error($message, $jumpUrl = 'javascript:history.go(-1)', $waitSecond = '3') {
        self::tipsJump($message, $jumpUrl, $waitSecond, 0);
    }

    /**
     * 提示信息跳转
     * @param $message 信息
     * @param string $jumpUrl 跳转地址|默认为返回上一页
     * @param string $waitSecond 跳转等待时间
     * @param $code 状态码
     */
    private static function tipsJump($message, $jumpUrl = 'javascript:history.go(-1)', $waitSecond = '3', $code){

        self::beforeInitView();
        \Core\Func\CoreFunc::isAjax(is_array($message) ? $message : ['msg' => $message],$code, $jumpUrl, $waitSecond);

        if($waitSecond == -1 && $jumpUrl != 'javascript:history.go(-1)' ){
            self::jump($jumpUrl);
        }

        /* 加载标签库 */
        $label = new \Expand\Label();
        if (!empty(\Core\Func\CoreFunc::$param)) {
            extract(\Core\Func\CoreFunc::$param, EXTR_OVERWRITE);
        }
        require self::promptPage();
        exit;
    }

    /**
     * 以302方式跳转页面
     */
    protected static function jump($url) {
        header("Location:{$url}");
        exit;
    }

    /**
     * 获取提示页
     * @return type 返回模板
     */
    private static function promptPage() {
	    if(is_file(THEME_PATH.'/jump.php')){
		    return THEME_PATH . '/jump.php';
	    }else{
		    return PES_CORE . 'Core/Theme/jump.php';
	    }

    }

    /**
     * 返回ajax数据
     * @param type $data 调用数据
     * @param type $code 状态码|默认200
     */
    protected static function ajaxReturn($data, $code = 200) {
        \Core\Func\CoreFunc::isAjax($data, $code);
    }

    /**
     * 验证令牌
     */
    protected static function checkToken() {
        if (empty($_REQUEST['token'])) {
            self::error('令牌不存在，无法校验数据一致性。');
        }

        if ($_REQUEST['token'] != self::session()->get('token')) {
            self::error('提交数据超时，请再次提交。');
        }

        self::session()->delete('token');
    }

    /**
     * 验证验证码
     */
    protected static function checkVerify() {
        if (empty($_REQUEST['verify'])) {
            self::error('请输入验证码');
        }

        if (md5(strtolower($_REQUEST['verify'])) !== self::session()->get('verify')) {
            self::error('验证码不一致');
        }

        self::session()->delete('verify');

    }

    /**
     * 生成URL链接
     * @param type $controller 链接的控制器
     * @param array $param 参数
     * @return type 返回URL
     */
    protected static function url($controller, $param = array()) {
        return \Core\Func\CoreFunc::url($controller, $param);
    }

    /**
     * 插件URL快速生成
     * @param array $param
     * @param null $group
     * @param bool $filterHtmlSuffix
     * @return type
     */
    protected function pluginUrl(array $param, $group = NULL, $filterHtmlSuffix = false){
        $group = empty($group) ? GROUP : $group;
        return $this->url("{$group}-Application-Plugin", $param, $filterHtmlSuffix);
    }

    /**
     * restful方法
     */
    protected function routeMethod($type) {
        $this->assign('method', $type);
    }

    /**
     * 后退地址
     * @param type $url 缺省的请求地址
     */
    protected static function backUrl($url) {
        if (empty($_REQUEST['back_url'])) {
            return $url;
        } else {
            return $_REQUEST['back_url'];
        }
    }

    /**
     * 调用session
     * @return \duncan3dc\Sessions\SessionInstance
     */
    public final static function session($id = ''){
        return \Core\Func\CoreFunc::session($id);
    }

}
