<?php

    use Unirest\HttpMethod;
    use Unirest\HttpResponse;

    class Unirest
    {

        /**
         * Send a GET request to a URL
         * @param string $url URL to send the GET request to
         * @param array  $headers additional headers to send
         * @return string|stdObj response string or stdObj if response is json-decodable
         */
        public static function get($url, $headers = array())
        {
            return Unirest::request(HttpMethod::GET, $url, NULL, $headers);
        }

        /**
         * Send POST request to a URL
         * @param string $url URL to send the POST request to
         * @param array $headers additional headers to send
         * @param mixed $body POST body data
         * @return string|stdObj response string or stdObj if response is json-decodable
         */
        public static function post($url, $headers = array(), $body = NULL)
        {
            return Unirest::request(HttpMethod::POST, $url, $body, $headers);
        }

        /**
         * Send DELETE request to a URL
         * @param  string $url URL to send the DELETE request to
         * @param  array  $headers additional headers to send
         * @return string|stdObj response string or stdObj if response is json-decodable
         */
        public static function delete($url, $headers = array())
        {
            return Unirest::request(HttpMethod::DELETE, $url, NULL, $headers);
        }

        /**
         * Send PUT request to a URL
         * @param string $url URL to send the PUT request to
         * @param array $headers additional headers to send
         * @param mixed $body PUT body data
         * @return string|stdObj response string or stdObj if response is json-decodable
         */
        public static function put($url, $headers = array(), $body = NULL)
        {
            return Unirest::request(HttpMethod::PUT, $url, $body, $headers);
        }

        /**
         * Send PATCH request to a URL
         * @param string $url URL to send the PATCH request to
         * @param array  $headers additional headers to send
         * @param mixed $body PATCH body data
         * @return string|stdObj response string or stdObj if response is json-decodable
         */
        public static function patch($url, $headers = array(), $body = NULL)
        {
            return Unirest::request(HttpMethod::PATCH, $url, $body, $headers);
        }

        /**
         * Send a cURL request
         * @param  string $httpMethod HTTP method to use (based off \Unirest\HttpMethod constants)
         * @param  string $url URL to send the request to
         * @param  mixed  $body request body
         * @param  array  $headers additional headers to send
         * @throws Exception if a cURL error occurs
         * @return HttpResponse
         */
        private static function request($httpMethod, $url, $body = NULL, $headers = array())
        {
            $lowercaseHeaders = array();
            foreach ($headers as $key => $val) {
                $key = trim(strtolower($key));
                if ($key == "user-agent" || $key == "expect")
                    continue;
                $lowercaseHeaders[] = $key . ": " . $val;
            }
            $lowercaseHeaders[] = "user-agent: unirest-php/1.0";
            $lowercaseHeaders[] = "expect:";

            $ch = curl_init();
            if ($httpMethod != HttpMethod::GET) {
                curl_setopt($ch, CURLOPT_CUSTOMREQUEST, $httpMethod);
                curl_setopt($ch, CURLOPT_POSTFIELDS, $body);
            }

            curl_setopt($ch, CURLOPT_URL, Unirest::encodeUrl($url));
            curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
            curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true);
            curl_setopt($ch, CURLOPT_MAXREDIRS, 10);
            curl_setopt($ch, CURLOPT_HTTPHEADER, $lowercaseHeaders);
            curl_setopt($ch, CURLOPT_HEADER, true);
            curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);

            $response = curl_exec($ch);
            $error = curl_error($ch);
            if ($error) {
                throw new \Exception($error);
            }

            $curl_info = curl_getinfo($ch);
            $header_size = $curl_info["header_size"];
            $header = substr($response, 0, $header_size);
            $body = substr($response, $header_size);
            $httpCode = $curl_info["http_code"];

            return new HttpResponse($httpCode, $body, $header);
        }

        /**
         * Ensure that a URL is encoded and safe to use with cURL
         * @param  string $url URL to encode
         * @return string
         */
        private static function encodeUrl($url)
        {
            $url_parsed = parse_url($url);

            $scheme = $url_parsed['scheme'] . '://';
            $host = $url_parsed['host'];
            $port = (isset($url_parsed['port']) ? $url_parsed['port'] : null);
            $path = (isset($url_parsed['path']) ? $url_parsed['path'] : null);
            $query = (isset($url_parsed['query']) ? $url_parsed['query'] : null);

            if ($query != null) {
                parse_str($url_parsed['query'], $query_parsed);
                $query = '?' . http_build_query($query_parsed);
            }
            
            if ($port && $port[0] != ":")
                $port = ":" . $port;

            $result = $scheme . $host . $port . $path . $query;
            return $result;
        }

    }

    if (!function_exists('http_chunked_decode')) {
        /**
         * Dechunk an http 'transfer-encoding: chunked' message 
         * @param string $chunk the encoded message 
         * @return string the decoded message
         */
        function http_chunked_decode($chunk)
        {
            $pos = 0;
            $len = strlen($chunk);
            $dechunk = null;

            while (($pos < $len) 
                && ($chunkLenHex = substr($chunk, $pos, ($newlineAt = strpos($chunk, "\n", $pos + 1)) - $pos))) {
               
                if (!is_hex($chunkLenHex)) {
                    trigger_error('Value is not properly chunk encoded', E_USER_WARNING);
                    return $chunk;
                }

                $pos = $newlineAt + 1;
                $chunkLen = hexdec(rtrim($chunkLenHex, "\r\n"));
                $dechunk .= substr($chunk, $pos, $chunkLen);
                $pos = strpos($chunk, "\n", $pos + $chunkLen) + 1;
            }
            
            return $dechunk;
        }
    }

    /**
     * determine if a string can represent a number in hexadecimal 
     * @link http://uk1.php.net/ctype_xdigit
     * @param string $hex 
     * @return boolean true if the string is a hex, otherwise false 
     */
    function is_hex($hex)
    {
        return ctype_xdigit($hex);
    }