<?php

class Qs_Request
{
    protected static $_baseUrl;
    protected static $_baseFinalUrl;
    protected static $_url;
    protected static $_finalUrl;
    protected static $_instance = null;

    public static function getInstance()
    {
        if (null === Qs_Request::$_instance) {
            Qs_Request::$_instance = new Qs_Request();
        }
        return Qs_Request::$_instance;
    }

    protected static function _getBaseUrl($final = false)
    {
        $propertyName = ($final) ? '_baseFinalUrl' : '_baseUrl';
        if (null === Qs_Request::${$propertyName}) {
            Qs_Request::${$propertyName} = Qs_Constant::get('BASE_URL_LANGUAGE');
            $page = Qs_Constant::get(($final) ? 'CURRENT_PAGE_FINAL' : 'CURRENT_PAGE');
            if (!empty($page)) {
                Qs_Request::${$propertyName} .= '/' . $page;
            }
        }
        return Qs_Request::${$propertyName};
    }

    protected static function _setUrl($url, $final = false)
    {
        $propertyName = ($final) ? '_url' : '_finalUrl';
        Qs_Request::${$propertyName} = $url;
    }

    protected static function _getUrl($final = false)
    {
        $propertyName = ($final) ? '_url' : '_finalUrl';
        if (null === Qs_Request::${$propertyName}) {
            $url = Qs_Request::_getBaseUrl($final);
            if (!empty($_SERVER['QUERY_STRING'])) {
                $url .= '?' . $_SERVER['QUERY_STRING'];
            }
            Qs_Request::_setUrl($url, $final);
        }
        return Qs_Request::${$propertyName};
    }

    protected static function _getUrlExclude($args = array(), $final = false)
    {
        $url = Qs_Request::_getBaseUrl($final);
        $queryParams = array_diff_key($_GET, array_combine($args, $args));
        $queryString = http_build_query($queryParams);
        if (!empty($queryString)) {
            $url .= '?' . $queryString;
        }
        return $url;
    }

    public static function getFinalBaseUrl()
    {
        return Qs_Request::_getBaseUrl(true);
    }

    public static function getBaseUrl()
    {
        return Qs_Request::_getBaseUrl(false);
    }

    public static function getFinalUrl()
    {
        return Qs_Request::_getUrl(true);
    }

    public static function getUrl()
    {
        return Qs_Request::_getUrl(false);
    }

    public static function setUrl($url)
    {
        Qs_Request::_setUrl($url ,false);
    }

    public static function setFinalUrl($url)
    {
        Qs_Request::_setUrl($url, false);
    }

    public static function getUrlExclude()
    {
         $args = func_get_args();
         return Qs_Request::_getUrlExclude($args, false);
    }

    public static function getFinalUrlExclude()
    {
         $args = func_get_args();
         return Qs_Request::_getUrlExclude($args, true);
    }

    public static function getLanguageUrl($language)
    {
        $url = Qs_Constant::get('BASE_URL');
        if ($language !== Qs_Constant::get('DEFAULT_LANGUAGE')) {
            $url .= '/' . $language;
        }
        $url .= '/' . Qs_Constant::get('CURRENT_PAGE');
        if (!empty($_SERVER['QUERY_STRING'])) {
            $url .= '?' . $_SERVER['QUERY_STRING'];
        }
        return $url;
    }

    protected static function _getValue($array, $name, $checkQuotes = false, $default = null)
    {
        if (null === ($value = Qs_Array::get($array, $name))) {
            return $default;
        }
        if ($checkQuotes) {
            $value = Qs_Request::_unescape($value);
        }
        return $value;
    }

    protected static function _unescape($value)
    {
        if (version_compare(phpversion(), '5.3.0', '<=') && 1 == get_magic_quotes_gpc()) {
            if (is_scalar($value)) {
                $value = stripslashes($value);
            } else {
                $value = Qs_Request::_recursiveFilter('stripslashes', $value);
            }
        }
        return $value;
    }

    /**
     * @static
     * @param $requestMethod string
     * @return array
     */
    public static function get($requestMethod)
    {
        return Qs_Request::_unescape($GLOBALS['_' . strtoupper($requestMethod)]);
    }

    protected static function _recursiveFilter($filter, $value)
    {
        if (is_array($value)) {
            $cleanValues = array();
            foreach ($value as $k => $v) {
                $cleanValues[$k] = Qs_Request::_recursiveFilter($filter, $v);
            }
            return $cleanValues;
        } else {
            return call_user_func($filter, $value);
        }
    }

    public static function getPostValue($name, $default = null)
    {
        return Qs_Request::_getValue($_POST, $name, true, $default);
    }

    public static function getGetValue($name, $default = null)
    {
        return Qs_Request::_getValue($_GET, $name, true, $default);
    }

    public static function getGetValues()
    {
        $arguments = func_get_args();
        $result = array();
        foreach ($arguments as $argument) {
            $result[$argument] = Qs_Request::_getValue($_GET, $argument, true);
        }
        return $result;
    }

    public static function getRequestValue($name, $default = null)
    {
        return Qs_Request::_getValue($_REQUEST, $name, true, $default);
    }

    public static function getCookieValue($name, $default = null)
    {
        return Qs_Request::_getValue($_COOKIE, $name, false, $default);
    }

    public static function getHeader($header)
    {
        if (empty($header)) {
            return false;
        }
        // Try to get it from the $_SERVER array first
        $temp = 'HTTP_' . strtoupper(str_replace('-', '_', $header));
        if (!empty($_SERVER[$temp])) {
            return $_SERVER[$temp];
        }
        // This seems to be the only way to get the Authorization header on
        // Apache
        if (function_exists('apache_request_headers')) {
            $headers = apache_request_headers();
            if (!empty($headers[$header])) {
                return $headers[$header];
            }
        }
        return false;
    }

    public static function isXmlHttpRequest()
    {
        return (Qs_Request::getHeader('X_REQUESTED_WITH') == 'XMLHttpRequest');
    }

    public static function getPost()
    {
        return Qs_Request::_get($_POST);
    }

    public static function getGet()
    {
        return Qs_Request::_get($_GET);
    }

    protected static function _get($array)
    {
        if (1 == get_magic_quotes_gpc()) {
            $array = Qs_Request::_recursiveFilter('stripslashes', $array);
        }
        return $array;
    }

    /**
     * Checks whether the url belongs to the site
     * The protocol is ignored
     * @param string $url
     * @return bool
     */
    public static function isOwnUrl($url)
    {
        if (empty($url) || !is_string($url)) {
            return false;
        }
        $urlInfo = parse_url($url);
        if (empty($urlInfo['host'])) {
            return true;
        }
        $ownInfo = parse_url(BASE_URL_LANGUAGE);
        return $urlInfo['host'] == $ownInfo['host']
           && (
                $urlInfo['path'] === $ownInfo['path']
                || 0 === strpos($urlInfo['path'], $ownInfo['path'] . '/')
           );
    }

    /**
     * Checks whether the referer belongs to the site
     * @static
     * @return bool
     */
    public static function isOwnReferer()
    {
        $referer = Qs_Array::get($_SERVER, 'HTTP_REFERER');
        return (null === $referer) ? false : Qs_Request::isOwnUrl($referer);
    }

    public static function url(array $query = array())
    {
        $url = BASE_URL_LANGUAGE . '/' . CURRENT_PAGE;
        if (!empty($query)) {
            $url .= '?' . http_build_query($query);
        }
        return $url;
    }

    public static function isPost()
    {
        return 'POST' == $_SERVER['REQUEST_METHOD'];
    }

    public static function isGet()
    {
        return 'GET' == $_SERVER['REQUEST_METHOD'];
    }

    /**
     * Used pattern from http://detectmobilebrowsers.com/
     * @return bool
     */
    public static function isMobile()
    {
        static $isMobile;
        if (null === $isMobile) {
            $userAgent = self::getUserAgent();
            $isMobile = preg_match('/(android|bb\d+|meego).+mobile|avantgo|bada\/|blackberry|blazer|compal|elaine|fennec|hiptop|iemobile|ip(hone|od)|iris|kindle|lge |maemo|midp|mmp|mobile.+firefox|netfront|opera m(ob|in)i|palm( os)?|phone|p(ixi|re)\/|plucker|pocket|psp|series(4|6)0|symbian|treo|up\.(browser|link)|vodafone|wap|windows ce|xda|xiino/i', $userAgent)
                     || preg_match('/1207|6310|6590|3gso|4thp|50[1-6]i|770s|802s|a wa|abac|ac(er|oo|s\-)|ai(ko|rn)|al(av|ca|co)|amoi|an(ex|ny|yw)|aptu|ar(ch|go)|as(te|us)|attw|au(di|\-m|r |s )|avan|be(ck|ll|nq)|bi(lb|rd)|bl(ac|az)|br(e|v)w|bumb|bw\-(n|u)|c55\/|capi|ccwa|cdm\-|cell|chtm|cldc|cmd\-|co(mp|nd)|craw|da(it|ll|ng)|dbte|dc\-s|devi|dica|dmob|do(c|p)o|ds(12|\-d)|el(49|ai)|em(l2|ul)|er(ic|k0)|esl8|ez([4-7]0|os|wa|ze)|fetc|fly(\-|_)|g1 u|g560|gene|gf\-5|g\-mo|go(\.w|od)|gr(ad|un)|haie|hcit|hd\-(m|p|t)|hei\-|hi(pt|ta)|hp( i|ip)|hs\-c|ht(c(\-| |_|a|g|p|s|t)|tp)|hu(aw|tc)|i\-(20|go|ma)|i230|iac( |\-|\/)|ibro|idea|ig01|ikom|im1k|inno|ipaq|iris|ja(t|v)a|jbro|jemu|jigs|kddi|keji|kgt( |\/)|klon|kpt |kwc\-|kyo(c|k)|le(no|xi)|lg( g|\/(k|l|u)|50|54|\-[a-w])|libw|lynx|m1\-w|m3ga|m50\/|ma(te|ui|xo)|mc(01|21|ca)|m\-cr|me(rc|ri)|mi(o8|oa|ts)|mmef|mo(01|02|bi|de|do|t(\-| |o|v)|zz)|mt(50|p1|v )|mwbp|mywa|n10[0-2]|n20[2-3]|n30(0|2)|n50(0|2|5)|n7(0(0|1)|10)|ne((c|m)\-|on|tf|wf|wg|wt)|nok(6|i)|nzph|o2im|op(ti|wv)|oran|owg1|p800|pan(a|d|t)|pdxg|pg(13|\-([1-8]|c))|phil|pire|pl(ay|uc)|pn\-2|po(ck|rt|se)|prox|psio|pt\-g|qa\-a|qc(07|12|21|32|60|\-[2-7]|i\-)|qtek|r380|r600|raks|rim9|ro(ve|zo)|s55\/|sa(ge|ma|mm|ms|ny|va)|sc(01|h\-|oo|p\-)|sdk\/|se(c(\-|0|1)|47|mc|nd|ri)|sgh\-|shar|sie(\-|m)|sk\-0|sl(45|id)|sm(al|ar|b3|it|t5)|so(ft|ny)|sp(01|h\-|v\-|v )|sy(01|mb)|t2(18|50)|t6(00|10|18)|ta(gt|lk)|tcl\-|tdg\-|tel(i|m)|tim\-|t\-mo|to(pl|sh)|ts(70|m\-|m3|m5)|tx\-9|up(\.b|g1|si)|utst|v400|v750|veri|vi(rg|te)|vk(40|5[0-3]|\-v)|vm40|voda|vulc|vx(52|53|60|61|70|80|81|83|85|98)|w3c(\-| )|webc|whit|wi(g |nc|nw)|wmlb|wonu|x700|yas\-|your|zeto|zte\-/i', substr($userAgent, 0, 4));
        }
        return $isMobile;
    }

    public static function getUserAgent()
    {
        return $_SERVER['HTTP_USER_AGENT'];
    }
}