/**
* Checking current request File as Root path
*
* @return string base directory of root path
*/
public static function currentRootpath()
{
static $root;
if (!$root) {
$root = static::cleanSlashed(dirname(Server::get('SCRIPT_FILENAME')));
}
return $root;
}
/**
* Parse x_Routes
*
* Matches any x_routes that may exist in the x_routes definition
* @access private
*/
protected function parse()
{
// remove not found
self::removeNotFound();
// Turn the segment array into a URI string
$uri = implode('/', Url::allSegment());
// Get HTTP verb
$http_verb = strtoupper(trim(Server::get('REQUEST_METHOD', 'CLI')));
if (!isset($this->x_routes['main'])) {
$this->x_routes['main'] = array();
}
if (!isset($this->x_routes['default'])) {
$this->x_routes['default'] = array();
}
$default_array = array('main' => $this->x_routes['main'], 'default' => $this->x_routes['default']);
// sort it again
$this->x_routes = array_merge($default_array, $this->x_routes);
unset($default_array);
// freed
foreach ($this->x_routes as $routeKey => $route) {
if (empty($route)) {
continue;
}
// Is there a literal match? If so we're done
if (isset($route[$uri]) && !preg_match('/[\\)\\(]/', $uri) && strpos($uri, ':any') === false && strpos($uri, ':num') === false && is_callable($route[$uri]['function']) && $route[$uri]['method'] == $http_verb) {
$this->x_current_route = array('name' => $routeKey, 'route' => $uri);
return $this->setRequest($route[$uri]['function']);
}
// Loop through the route array looking for wildcards
foreach ($route as $key => $Rval) {
if (!is_array($Rval)) {
continue;
}
// $keyTmp = $key;
// Convert wildcards to RegEx
$key = str_replace(array(':any', ':num'), array('[^/]+', '[0-9]+'), $key);
if (strpos($key, '/') === 0) {
$key = "/" . substr($key, 1);
} elseif ($key && preg_match('/(^\\(\\?[iUXxms]\\))/', $key)) {
// parentesis
$key = preg_replace_callback('/(^\\(\\?[iUXxms]\\))(.*)/', function ($match) {
return $match[1] . (strpos($match[2], '/') === 0 ? substr($match[2], 1) : $match[2]);
}, $key);
} else {
$key = "/{$key}";
}
// fix :any or [^/]+ on first statements
$key = preg_replace('/^(\\/|\\(\\?[iUXxms]\\))(\\(+)?(\\[\\^\\/\\]\\+)(\\)+)/', "\$1(.?\$3)", $key);
// Does the RegEx match?
if (preg_match('#^' . $key . '$#', '/' . $uri, $matches)) {
// Are we using callbacks to process back-references?
if (is_callable($Rval['function'])) {
if ($Rval['method'] == 'ALL' || in_array($http_verb, explode('|', $Rval['method']))) {
$this->x_current_route = array('name' => $routeKey, 'route' => $key);
return $this->setRequest($Rval['function']);
}
}
}
}
}
// set Not Found
empty($uri) || self::setNotfound();
// If we got this far it means we didn't encounter a
// matching route so we'll set the site default route
return $this->setRequest();
}
/**
* Initialize application
*
* @return object $instance current singleton instance object
*/
public static function create()
{
static $has_call = null;
$instance = static::singleton();
if (!$has_call) {
$has_call = true;
// for CLI used
if (defined('STDIN')) {
chdir(dirname(Server::get('SCRIPT_FILENAME', getcwd())));
}
}
return $instance;
}
/**
* Parse Request URL
*
* @return string Request URI parsed
*/
protected function parseRequestUri()
{
// static cached
static $return = null;
if ($return !== null) {
return $return;
}
if (!Server::get('REQUEST_URI') && !Server::get('SCRIPT_NAME')) {
$return = '';
return $return;
}
// add Request URI
// $requri = Path::cleanSlashed(Request::getHost().'/'.Server::get('REQUEST_URI'));
$requri = Server::get('REQUEST_URI');
$requri = substr($requri, 0, 1) == '/' ? $requri : "/{$requri}";
$requri = rtrim(Request::getHost(), '/') . $requri;
$uri = parse_url('http://' . $requri);
$query = isset($uri['query']) ? $uri['query'] : '';
$uri = isset($uri['path']) ? $uri['path'] : '';
$script_name = Server::get('SCRIPT_NAME');
if (isset($script_name[0])) {
/**
* Set New URL Path
*/
if (strpos($uri, $script_name) === 0) {
$uri = substr($uri, strlen($script_name));
} elseif (strpos($uri, dirname($script_name)) === 0) {
$uri = substr($uri, strlen(dirname($script_name)));
}
}
// This section ensures that even on servers that require the URI to be in the query string (Nginx) a correct
// URI is found, and also fixes the QUERY_STRING server var and $_GET array.
if (trim($uri, '/') === '' && strncmp($query, '/', 1) === 0) {
$query = explode('?', $query, 2);
$uri = $query[0];
$_SERVER['QUERY_STRING'] = isset($query[1]) ? $query[1] : '';
} else {
$_SERVER['QUERY_STRING'] = $query;
}
// replace server attributes
Server::replace($_SERVER);
// parse the string
parse_str($_SERVER['QUERY_STRING'], $_GET);
// replace get
Get::replace($_GET);
if ($uri === '/' || $uri === '') {
$return = '/';
} else {
$return = Path::removeRelativeDirectory($uri);
}
return $return;
}
/**
* Get Path Info (virtual path)
*
* @return string
*/
public static function getPathInfo()
{
return Server::get('PATH_INFO');
}
