dm-v2.com/ThinkPHP/Library/Think/Dispatcher.class.php

<?php
// +----------------------------------------------------------------------
// | ThinkPHP [ WE CAN DO IT JUST THINK IT ]
// +----------------------------------------------------------------------
// | Copyright (c) 2006-2014 http://thinkphp.cn All rights reserved.
// +----------------------------------------------------------------------
// | Licensed ( http://www.apache.org/licenses/LICENSE-2.0 )
// +----------------------------------------------------------------------
// | Author: liu21st <liu21st@gmail.com>
// +----------------------------------------------------------------------
namespace Think;

/**
 * ThinkPHP内置的Dispatcher类
 * 完成URL解析、路由和调度
 */
class Dispatcher
{

    /**
     * URL映射到控制器
     * @access public
     * @return void
     */
    public static function dispatch()
    {
        $varPath = C('VAR_PATHINFO');
        $urlCase = C('URL_CASE_INSENSITIVE');
        if (isset($_GET[$varPath])) { // 判断URL里面是否有兼容模式参数
            $_SERVER['PATH_INFO'] = $_GET[$varPath];
            unset($_GET[$varPath]);
        } elseif (IS_CLI) { // CLI模式下 index.php module/controller/action/params/...
            $_SERVER['PATH_INFO'] = isset($_SERVER['argv'][1]) ? $_SERVER['argv'][1] : '';
        }

        // 开启子域名部署
        if (C('APP_SUB_DOMAIN_DEPLOY')) {
            $rules = C('APP_SUB_DOMAIN_RULES');
            if (isset($rules[$_SERVER['HTTP_HOST']])) { // 完整域名或者IP配置
                define('APP_DOMAIN', $_SERVER['HTTP_HOST']); // 当前完整域名
                $rule = $rules[APP_DOMAIN];
            } else {
                if (strpos(C('APP_DOMAIN_SUFFIX'), '.')) { // com.cn net.cn
                    $domain = array_slice(explode('.', $_SERVER['HTTP_HOST']), 0, -3);
                } else {
                    $domain = array_slice(explode('.', $_SERVER['HTTP_HOST']), 0, -2);
                }
                if (!empty($domain)) {
                    $subDomain = implode('.', $domain);
                    define('SUB_DOMAIN', $subDomain); // 当前完整子域名
                    $domain2 = array_pop($domain); // 二级域名
                    if ($domain) {
                        // 存在三级域名
                        $domain3 = array_pop($domain);
                    }
                    if (isset($rules[$subDomain])) {
                        // 子域名
                        $rule = $rules[$subDomain];
                    } elseif (isset($rules['*.' . $domain2]) && !empty($domain3)) {
                        // 泛三级域名
                        $rule      = $rules['*.' . $domain2];
                        $panDomain = $domain3;
                    } elseif (isset($rules['*']) && !empty($domain2) && 'www' != $domain2) {
                        // 泛二级域名
                        $rule      = $rules['*'];
                        $panDomain = $domain2;
                    }
                }
            }

            if (!empty($rule)) {
                // 子域名部署规则 '子域名'=>array('模块名[/控制器名]','var1=a&var2=b');
                if (is_array($rule)) {
                    list($rule, $vars) = $rule;
                }
                $array = explode('/', $rule);
                // 模块绑定
                define('BIND_MODULE', array_shift($array));
                // 控制器绑定
                if (!empty($array)) {
                    $controller = array_shift($array);
                    if ($controller) {
                        define('BIND_CONTROLLER', $controller);
                    }
                }
                if (isset($vars)) {
                    // 传入参数
                    parse_str($vars, $parms);
                    if (isset($panDomain)) {
                        $pos = array_search('*', $parms);
                        if (false !== $pos) {
                            // 泛域名作为参数
                            $parms[$pos] = $panDomain;
                        }
                    }
                    $_GET = array_merge($_GET, $parms);
                }
            }
        }
        // 分析PATHINFO信息
        if (!isset($_SERVER['PATH_INFO'])) {
            $types = explode(',', C('URL_PATHINFO_FETCH'));
            foreach ($types as $type) {
                if (0 === strpos($type, ':')) {
                    // 支持函数判断
                    $_SERVER['PATH_INFO'] = call_user_func(substr($type, 1));
                    break;
                } elseif (!empty($_SERVER[$type])) {
                    $_SERVER['PATH_INFO'] = (0 === strpos($_SERVER[$type], $_SERVER['SCRIPT_NAME'])) ?
                    substr($_SERVER[$type], strlen($_SERVER['SCRIPT_NAME'])) : $_SERVER[$type];
                    break;
                }
            }
        }

        $depr = C('URL_PATHINFO_DEPR');
        define('MODULE_PATHINFO_DEPR', $depr);

        if (empty($_SERVER['PATH_INFO'])) {
            $_SERVER['PATH_INFO'] = '';
            define('__INFO__', '');
            define('__EXT__', '');
            $paths = array();
        } else {
            // URL后缀
            define('__EXT__', strtolower(pathinfo($_SERVER['PATH_INFO'], PATHINFO_EXTENSION)));
            // 检查禁止访问的URL后缀
            if ($denySuffix = C('URL_DENY_SUFFIX')) {
                if (in_array(__EXT__, explode('|', strtolower(str_replace('.', '', $denySuffix))))) {
                    send_http_status(404);
                    exit;
                }
            }
            define('__INFO__', trim($_SERVER['PATH_INFO'], '/'));
            // 去除URL后缀
            $_SERVER['PATH_INFO'] = preg_replace('/\.' . __EXT__ . '$/i', '', __INFO__);
            $paths                = explode($depr, trim($_SERVER['PATH_INFO'], $depr));
        }

        // URL常量
        define('__SELF__', strip_tags($_SERVER[C('URL_REQUEST_URI')]));

        // 获取模块名称
        define('MODULE_NAME', self::getModule($paths));

        // 检测模块是否存在
        if (MODULE_NAME && is_dir(APP_PATH . MODULE_NAME)) {
            // 定义当前模块路径
            define('MODULE_PATH', APP_PATH . MODULE_NAME . '/');
            // 定义当前模块的模版缓存路径
            C('CACHE_PATH', CACHE_PATH . MODULE_NAME . '/');
            // 定义当前模块的日志目录
            C('LOG_PATH', realpath(LOG_PATH) . '/' . MODULE_NAME . '/');

            // 模块配置文件开始载入检测位
            Hook::listen('module_check');

            // 加载模块配置文件
            if (is_file(MODULE_PATH . 'Conf/config' . CONF_EXT)) {
                C(load_config(MODULE_PATH . 'Conf/config' . CONF_EXT));
            }

            // 加载应用模式对应的配置文件
            if ('common' != APP_MODE && is_file(MODULE_PATH . 'Conf/config_' . APP_MODE . CONF_EXT)) {
                C(load_config(MODULE_PATH . 'Conf/config_' . APP_MODE . CONF_EXT));
            }

            // 当前应用状态对应的配置文件
            if (APP_STATUS && is_file(MODULE_PATH . 'Conf/' . APP_STATUS . CONF_EXT)) {
                C(load_config(MODULE_PATH . 'Conf/' . APP_STATUS . CONF_EXT));
            }

            // 加载模块别名定义
            if (is_file(MODULE_PATH . 'Conf/alias.php')) {
                Think::addMap(include MODULE_PATH . 'Conf/alias.php');
            }

            // 加载模块tags文件定义
            if (is_file(MODULE_PATH . 'Conf/tags.php')) {
                Hook::import(include MODULE_PATH . 'Conf/tags.php');
            }

            // 加载模块函数文件
            if (is_file(MODULE_PATH . 'Common/function.php')) {
                include MODULE_PATH . 'Common/function.php';
            }

            // 加载模块的扩展配置文件
            load_ext_file(MODULE_PATH);

            // 模块配置文件加载完成检测位
            Hook::listen('module_config');
        } else {
            E(L('_MODULE_NOT_EXIST_') . ':' . MODULE_NAME);
        }

        if (!defined('__APP__')) {
            $urlMode = C('URL_MODEL');
            if (URL_COMPAT == $urlMode) {
                // 兼容模式判断
                define('PHP_FILE', _PHP_FILE_ . '?' . $varPath . '=');
            } elseif (URL_REWRITE == $urlMode) {
                $url = dirname(_PHP_FILE_);
                if ('/' == $url || '\\' == $url) {
                    $url = '';
                }

                define('PHP_FILE', $url);
            } else {
                define('PHP_FILE', _PHP_FILE_);
            }
            // 当前应用地址
            define('__APP__', strip_tags(PHP_FILE));
        }
        // 模块URL地址
        $moduleName = defined('MODULE_ALIAS') ? MODULE_ALIAS : MODULE_NAME;
        define('__MODULE__', (defined('BIND_MODULE') || !C('MULTI_MODULE')) ? __APP__ : __APP__ . '/' . ($urlCase ? strtolower($moduleName) : $moduleName));
        // 获取控制器和操作名
        define('CONTROLLER_NAME', self::getController($paths, $urlCase));
        define('ACTION_NAME', self::getAction($paths, $urlCase));

        if ($paths) {
            // 解析剩余的URL参数
            $var = array();
            if (C('URL_PARAMS_BIND') && 1 == C('URL_PARAMS_BIND_TYPE')) {
                // URL参数按顺序绑定变量
                $var = $paths;
            } else {
                preg_replace_callback('/(\w+)\/([^\/]+)/', function ($match) use (&$var) {
                    $var[$match[1]] = strip_tags($match[2]);
                }, implode('/', $paths));
            }
            $_GET = array_merge($var, $_GET);
        }
        // 获取控制器的命名空间（路径）
        define('CONTROLLER_PATH', self::getSpace($urlCase));

        // 当前控制器的UR地址
        $controllerName = defined('CONTROLLER_ALIAS') ? CONTROLLER_ALIAS : CONTROLLER_NAME;
        define('__CONTROLLER__', __MODULE__ . $depr . (defined('BIND_CONTROLLER') ? '' : ($urlCase ? parse_name($controllerName) : $controllerName)));

        // 当前操作的URL地址
        define('__ACTION__', __CONTROLLER__ . $depr . (defined('ACTION_ALIAS') ? ACTION_ALIAS : ACTION_NAME));

        //保证$_REQUEST正常取值
        $_REQUEST = array_merge($_POST, $_GET);
    }

    /**
     * 获得控制器的命名空间路径 便于插件机制访问
     * @param  boolean $urlCase 是否转换成小写
     * @return string
     */
    private static function getSpace($urlCase)
    {
        $var   = C('VAR_ADDON');
        $space = !empty($_GET[$var]) ? strip_tags($_GET[$var]) : '';
        unset($_GET[$var]);
        return $space;
    }

    /**
     * 获得实际的控制器名称
     * @param  array $paths path_info数组
     * @param  boolean $urlCase 是否转换成小写
     * @return string
     */
    private static function getController(&$paths, $urlCase)
    {
        if (defined('BIND_CONTROLLER')) {
            return BIND_CONTROLLER;
        } else {
            if ($paths && C('URL_ROUTER_ON') && Route::check($paths)) {
                $depr  = C('URL_PATHINFO_DEPR');
                $paths = explode($depr, trim($_SERVER['PATH_INFO'], $depr));
            }
            if ($paths) {
                // PATH_INFO检测标签位
                Hook::listen('path_info');
                if (C('CONTROLLER_LEVEL') > 1) { // 控制器层次
                    $controller = implode('/', array_slice($paths, 0, C('CONTROLLER_LEVEL')));
                    $paths      = array_slice($paths, C('CONTROLLER_LEVEL'));
                } else {
                    $controller = array_shift($paths);
                }
            } else {
                $var = C('VAR_CONTROLLER');
                if (!empty($_GET[$var])) {
                    $controller = $_GET[$var];
                    unset($_GET[$var]);
                } else {
                    $controller = C('DEFAULT_CONTROLLER');
                }
            }
        }
        if ($maps = C('URL_CONTROLLER_MAP')) {
            if (isset($maps[strtolower($controller)])) {
                // 记录当前别名
                define('CONTROLLER_ALIAS', strtolower($controller));
                // 获取实际的控制器名
                return ucfirst($maps[CONTROLLER_ALIAS]);
            } elseif (array_search(strtolower($controller), $maps)) {
                // 禁止访问原始控制器
                return '';
            }
        }
        if ($urlCase) {
            // URL地址不区分大小写
            // 智能识别方式 user_type 识别到 UserTypeController 控制器
            $controller = parse_name($controller, 1);
        }
        return strip_tags(ucfirst($controller));
    }

    /**
     * 获得实际的操作名称
     * @param  array $paths path_info数组
     * @param  boolean $urlCase 是否转换成小写
     * @return string
     */
    private static function getAction(&$paths, $urlCase)
    {
        if (defined('BIND_ACTION')) {
            return BIND_ACTION;
        } else {
            if ($paths) {
                $action = array_shift($paths);
            } else {
                $var = C('VAR_ACTION');
                if (!empty($_GET[$var])) {
                    $action = $_GET[$var];
                    unset($_GET[$var]);
                } elseif (!empty($_POST[$var])) {
                    $action = $_POST[$var];
                    unset($_POST[$var]);
                } else {
                    $action = C('DEFAULT_ACTION');
                }
            }
        }
        if ($maps = C('URL_ACTION_MAP')) {
            if (isset($maps[strtolower(CONTROLLER_NAME)])) {
                $maps = $maps[strtolower(CONTROLLER_NAME)];
                if (isset($maps[strtolower($action)])) {
                    // 记录当前别名
                    define('ACTION_ALIAS', strtolower($action));
                    // 获取实际的操作名
                    if (is_array($maps[ACTION_ALIAS])) {
                        parse_str($maps[ACTION_ALIAS][1], $vars);
                        $_GET = array_merge($_GET, $vars);
                        return $maps[ACTION_ALIAS][0];
                    } else {
                        return $maps[ACTION_ALIAS];
                    }

                } elseif (array_search(strtolower($action), $maps)) {
                    // 禁止访问原始操作
                    return '';
                }
            }
        }
        return strip_tags($urlCase ? strtolower($action) : $action);
    }

    /**
     * 获得实际的模块名称
     * @param  array $paths path_info数组
     * @return string
     */
    private static function getModule(&$paths)
    {
        if (defined('BIND_MODULE')) {
            return BIND_MODULE;
        } else {
            // 检查路由
            if ($paths && C('URL_ROUTER_ON') && Route::check($paths)) {
                $paths = explode(MODULE_PATHINFO_DEPR, trim($_SERVER['PATH_INFO'], MODULE_PATHINFO_DEPR));
            }
            if ($paths && C('MULTI_MODULE')) { // 获取模块名
                $allowList = C('MODULE_ALLOW_LIST'); // 允许的模块列表
                if (empty($allowList) || (is_array($allowList) && in_array_case($paths[0], $allowList))) {
                    $module               = array_shift($paths);
                    $_SERVER['PATH_INFO'] = implode(MODULE_PATHINFO_DEPR, $paths);
                }
            } else {
                $var = C('VAR_MODULE');
                if (!empty($_GET[$var])) {
                    $module = $_GET[$var];
                    unset($_GET[$var]);
                }
            }
            if (empty($module)) {
                $module = C('DEFAULT_MODULE');
            }
        }
        if ($maps = C('URL_MODULE_MAP')) {
            if (isset($maps[strtolower($module)])) {
                // 记录当前别名
                define('MODULE_ALIAS', strtolower($module));
                // 获取实际的模块名
                return ucfirst($maps[MODULE_ALIAS]);
            } elseif (array_search(strtolower($module), $maps) || in_array_case($module, C('MODULE_DENY_LIST'))) {
                // 禁止访问原始模块
                return '';
            }
        }
        return strip_tags(ucfirst($module));
    }

}