xref: /dokuwiki/inc/HTTP/HTTPClient.php (revision 8a10b6f0b9defd7bdd1efbf12c88f94752882eda)
15a8d6e48SMichael Große<?php
25a8d6e48SMichael Große
35a8d6e48SMichael Großenamespace dokuwiki\HTTP;
45a8d6e48SMichael Große
55a8d6e48SMichael Großedefine('HTTP_NL',"\r\n");
65a8d6e48SMichael Große
75a8d6e48SMichael Große
85a8d6e48SMichael Große/**
95a8d6e48SMichael Große * This class implements a basic HTTP client
105a8d6e48SMichael Große *
115a8d6e48SMichael Große * It supports POST and GET, Proxy usage, basic authentication,
12*8a10b6f0SElan Ruusamäe * handles cookies and referrers. It is based upon the httpclient
135a8d6e48SMichael Große * function from the VideoDB project.
145a8d6e48SMichael Große *
15*8a10b6f0SElan Ruusamäe * @link   https://www.splitbrain.org/projects/videodb
165a8d6e48SMichael Große * @author Andreas Goetz <cpuidle@gmx.de>
175a8d6e48SMichael Große * @author Andreas Gohr <andi@splitbrain.org>
185a8d6e48SMichael Große * @author Tobias Sarnowski <sarnowski@new-thoughts.org>
195a8d6e48SMichael Große */
205a8d6e48SMichael Großeclass HTTPClient {
215a8d6e48SMichael Große    //set these if you like
225a8d6e48SMichael Große    public $agent;         // User agent
235a8d6e48SMichael Große    public $http;          // HTTP version defaults to 1.0
245a8d6e48SMichael Große    public $timeout;       // read timeout (seconds)
255a8d6e48SMichael Große    public $cookies;
265a8d6e48SMichael Große    public $referer;
275a8d6e48SMichael Große    public $max_redirect;
285a8d6e48SMichael Große    public $max_bodysize;
295a8d6e48SMichael Große    public $max_bodysize_abort = true;  // if set, abort if the response body is bigger than max_bodysize
305a8d6e48SMichael Große    public $header_regexp; // if set this RE must match against the headers, else abort
315a8d6e48SMichael Große    public $headers;
325a8d6e48SMichael Große    public $debug;
335a8d6e48SMichael Große    public $start = 0.0; // for timings
345a8d6e48SMichael Große    public $keep_alive = true; // keep alive rocks
355a8d6e48SMichael Große
365a8d6e48SMichael Große    // don't set these, read on error
375a8d6e48SMichael Große    public $error;
385a8d6e48SMichael Große    public $redirect_count;
395a8d6e48SMichael Große
405a8d6e48SMichael Große    // read these after a successful request
415a8d6e48SMichael Große    public $status;
425a8d6e48SMichael Große    public $resp_body;
435a8d6e48SMichael Große    public $resp_headers;
445a8d6e48SMichael Große
455a8d6e48SMichael Große    // set these to do basic authentication
465a8d6e48SMichael Große    public $user;
475a8d6e48SMichael Große    public $pass;
485a8d6e48SMichael Große
495a8d6e48SMichael Große    // set these if you need to use a proxy
505a8d6e48SMichael Große    public $proxy_host;
515a8d6e48SMichael Große    public $proxy_port;
525a8d6e48SMichael Große    public $proxy_user;
535a8d6e48SMichael Große    public $proxy_pass;
545a8d6e48SMichael Große    public $proxy_ssl; //boolean set to true if your proxy needs SSL
555a8d6e48SMichael Große    public $proxy_except; // regexp of URLs to exclude from proxy
565a8d6e48SMichael Große
575a8d6e48SMichael Große    // list of kept alive connections
585a8d6e48SMichael Große    protected static $connections = array();
595a8d6e48SMichael Große
605a8d6e48SMichael Große    // what we use as boundary on multipart/form-data posts
615a8d6e48SMichael Große    protected $boundary = '---DokuWikiHTTPClient--4523452351';
625a8d6e48SMichael Große
635a8d6e48SMichael Große    /**
645a8d6e48SMichael Große     * Constructor.
655a8d6e48SMichael Große     *
665a8d6e48SMichael Große     * @author Andreas Gohr <andi@splitbrain.org>
675a8d6e48SMichael Große     */
685a8d6e48SMichael Große    public function __construct(){
695a8d6e48SMichael Große        $this->agent        = 'Mozilla/4.0 (compatible; DokuWiki HTTP Client; '.PHP_OS.')';
705a8d6e48SMichael Große        $this->timeout      = 15;
715a8d6e48SMichael Große        $this->cookies      = array();
725a8d6e48SMichael Große        $this->referer      = '';
735a8d6e48SMichael Große        $this->max_redirect = 3;
745a8d6e48SMichael Große        $this->redirect_count = 0;
755a8d6e48SMichael Große        $this->status       = 0;
765a8d6e48SMichael Große        $this->headers      = array();
775a8d6e48SMichael Große        $this->http         = '1.0';
785a8d6e48SMichael Große        $this->debug        = false;
795a8d6e48SMichael Große        $this->max_bodysize = 0;
805a8d6e48SMichael Große        $this->header_regexp= '';
815a8d6e48SMichael Große        if(extension_loaded('zlib')) $this->headers['Accept-encoding'] = 'gzip';
825a8d6e48SMichael Große        $this->headers['Accept'] = 'text/xml,application/xml,application/xhtml+xml,'.
835a8d6e48SMichael Große            'text/html,text/plain,image/png,image/jpeg,image/gif,*/*';
845a8d6e48SMichael Große        $this->headers['Accept-Language'] = 'en-us';
855a8d6e48SMichael Große    }
865a8d6e48SMichael Große
875a8d6e48SMichael Große
885a8d6e48SMichael Große    /**
895a8d6e48SMichael Große     * Simple function to do a GET request
905a8d6e48SMichael Große     *
915a8d6e48SMichael Große     * Returns the wanted page or false on an error;
925a8d6e48SMichael Große     *
935a8d6e48SMichael Große     * @param  string $url       The URL to fetch
945a8d6e48SMichael Große     * @param  bool   $sloppy304 Return body on 304 not modified
955a8d6e48SMichael Große     * @return false|string  response body, false on error
965a8d6e48SMichael Große     *
975a8d6e48SMichael Große     * @author Andreas Gohr <andi@splitbrain.org>
985a8d6e48SMichael Große     */
995a8d6e48SMichael Große    public function get($url,$sloppy304=false){
1005a8d6e48SMichael Große        if(!$this->sendRequest($url)) return false;
1015a8d6e48SMichael Große        if($this->status == 304 && $sloppy304) return $this->resp_body;
1025a8d6e48SMichael Große        if($this->status < 200 || $this->status > 206) return false;
1035a8d6e48SMichael Große        return $this->resp_body;
1045a8d6e48SMichael Große    }
1055a8d6e48SMichael Große
1065a8d6e48SMichael Große    /**
1075a8d6e48SMichael Große     * Simple function to do a GET request with given parameters
1085a8d6e48SMichael Große     *
1095a8d6e48SMichael Große     * Returns the wanted page or false on an error.
1105a8d6e48SMichael Große     *
1115a8d6e48SMichael Große     * This is a convenience wrapper around get(). The given parameters
1125a8d6e48SMichael Große     * will be correctly encoded and added to the given base URL.
1135a8d6e48SMichael Große     *
1145a8d6e48SMichael Große     * @param  string $url       The URL to fetch
1155a8d6e48SMichael Große     * @param  array  $data      Associative array of parameters
1165a8d6e48SMichael Große     * @param  bool   $sloppy304 Return body on 304 not modified
1175a8d6e48SMichael Große     * @return false|string  response body, false on error
1185a8d6e48SMichael Große     *
1195a8d6e48SMichael Große     * @author Andreas Gohr <andi@splitbrain.org>
1205a8d6e48SMichael Große     */
1215a8d6e48SMichael Große    public function dget($url,$data,$sloppy304=false){
1225a8d6e48SMichael Große        if(strpos($url,'?')){
1235a8d6e48SMichael Große            $url .= '&';
1245a8d6e48SMichael Große        }else{
1255a8d6e48SMichael Große            $url .= '?';
1265a8d6e48SMichael Große        }
1275a8d6e48SMichael Große        $url .= $this->postEncode($data);
1285a8d6e48SMichael Große        return $this->get($url,$sloppy304);
1295a8d6e48SMichael Große    }
1305a8d6e48SMichael Große
1315a8d6e48SMichael Große    /**
1325a8d6e48SMichael Große     * Simple function to do a POST request
1335a8d6e48SMichael Große     *
1345a8d6e48SMichael Große     * Returns the resulting page or false on an error;
1355a8d6e48SMichael Große     *
1365a8d6e48SMichael Große     * @param  string $url       The URL to fetch
1375a8d6e48SMichael Große     * @param  array  $data      Associative array of parameters
1385a8d6e48SMichael Große     * @return false|string  response body, false on error
1395a8d6e48SMichael Große     * @author Andreas Gohr <andi@splitbrain.org>
1405a8d6e48SMichael Große     */
1415a8d6e48SMichael Große    public function post($url,$data){
1425a8d6e48SMichael Große        if(!$this->sendRequest($url,$data,'POST')) return false;
1435a8d6e48SMichael Große        if($this->status < 200 || $this->status > 206) return false;
1445a8d6e48SMichael Große        return $this->resp_body;
1455a8d6e48SMichael Große    }
1465a8d6e48SMichael Große
1475a8d6e48SMichael Große    /**
1485a8d6e48SMichael Große     * Send an HTTP request
1495a8d6e48SMichael Große     *
1505a8d6e48SMichael Große     * This method handles the whole HTTP communication. It respects set proxy settings,
1515a8d6e48SMichael Große     * builds the request headers, follows redirects and parses the response.
1525a8d6e48SMichael Große     *
1535a8d6e48SMichael Große     * Post data should be passed as associative array. When passed as string it will be
1545a8d6e48SMichael Große     * sent as is. You will need to setup your own Content-Type header then.
1555a8d6e48SMichael Große     *
1565a8d6e48SMichael Große     * @param  string $url    - the complete URL
1575a8d6e48SMichael Große     * @param  mixed  $data   - the post data either as array or raw data
1585a8d6e48SMichael Große     * @param  string $method - HTTP Method usually GET or POST.
1595a8d6e48SMichael Große     * @return bool - true on success
1605a8d6e48SMichael Große     *
1615a8d6e48SMichael Große     * @author Andreas Goetz <cpuidle@gmx.de>
1625a8d6e48SMichael Große     * @author Andreas Gohr <andi@splitbrain.org>
1635a8d6e48SMichael Große     */
1645a8d6e48SMichael Große    public function sendRequest($url,$data='',$method='GET'){
1655a8d6e48SMichael Große        $this->start  = $this->time();
1665a8d6e48SMichael Große        $this->error  = '';
1675a8d6e48SMichael Große        $this->status = 0;
1685a8d6e48SMichael Große        $this->resp_body = '';
1695a8d6e48SMichael Große        $this->resp_headers = array();
1705a8d6e48SMichael Große
17167600f75STom Kunze        // save unencoded data for recursive call
17267600f75STom Kunze        $unencodedData = $data;
17367600f75STom Kunze
1745a8d6e48SMichael Große        // don't accept gzip if truncated bodies might occur
1755a8d6e48SMichael Große        if($this->max_bodysize &&
1765a8d6e48SMichael Große            !$this->max_bodysize_abort &&
177d9a7912aSAndreas Gohr            isset($this->headers['Accept-encoding']) &&
1785a8d6e48SMichael Große            $this->headers['Accept-encoding'] == 'gzip'){
1795a8d6e48SMichael Große            unset($this->headers['Accept-encoding']);
1805a8d6e48SMichael Große        }
1815a8d6e48SMichael Große
1825a8d6e48SMichael Große        // parse URL into bits
1835a8d6e48SMichael Große        $uri = parse_url($url);
1845a8d6e48SMichael Große        $server = $uri['host'];
185056bf31fSDamien Regad        $path   = !empty($uri['path']) ? $uri['path'] : '/';
186056bf31fSDamien Regad        $uriPort = !empty($uri['port']) ? $uri['port'] : null;
1875a8d6e48SMichael Große        if(!empty($uri['query'])) $path .= '?'.$uri['query'];
1885a8d6e48SMichael Große        if(isset($uri['user'])) $this->user = $uri['user'];
1895a8d6e48SMichael Große        if(isset($uri['pass'])) $this->pass = $uri['pass'];
1905a8d6e48SMichael Große
1915a8d6e48SMichael Große        // proxy setup
192980f9f38SAndreas Gohr        if($this->useProxyForUrl($url)){
1935a8d6e48SMichael Große            $request_url = $url;
1945a8d6e48SMichael Große            $server      = $this->proxy_host;
1955a8d6e48SMichael Große            $port        = $this->proxy_port;
1965a8d6e48SMichael Große            if (empty($port)) $port = 8080;
1975a8d6e48SMichael Große            $use_tls     = $this->proxy_ssl;
1985a8d6e48SMichael Große        }else{
1995a8d6e48SMichael Große            $request_url = $path;
20066b64c2aSDamien Regad            $port = $uriPort ?: ($uri['scheme'] == 'https' ? 443 : 80);
2015a8d6e48SMichael Große            $use_tls     = ($uri['scheme'] == 'https');
2025a8d6e48SMichael Große        }
2035a8d6e48SMichael Große
2045a8d6e48SMichael Große        // add SSL stream prefix if needed - needs SSL support in PHP
2055a8d6e48SMichael Große        if($use_tls) {
2065a8d6e48SMichael Große            if(!in_array('ssl', stream_get_transports())) {
2075a8d6e48SMichael Große                $this->status = -200;
2085a8d6e48SMichael Große                $this->error = 'This PHP version does not support SSL - cannot connect to server';
2095a8d6e48SMichael Große            }
2105a8d6e48SMichael Große            $server = 'ssl://'.$server;
2115a8d6e48SMichael Große        }
2125a8d6e48SMichael Große
2135a8d6e48SMichael Große        // prepare headers
2145a8d6e48SMichael Große        $headers               = $this->headers;
215056bf31fSDamien Regad        $headers['Host']       = $uri['host']
216056bf31fSDamien Regad            . ($uriPort ? ':' . $uriPort : '');
2175a8d6e48SMichael Große        $headers['User-Agent'] = $this->agent;
2185a8d6e48SMichael Große        $headers['Referer']    = $this->referer;
2195a8d6e48SMichael Große
2205a8d6e48SMichael Große        if($method == 'POST'){
2215a8d6e48SMichael Große            if(is_array($data)){
2225a8d6e48SMichael Große                if (empty($headers['Content-Type'])) {
2235a8d6e48SMichael Große                    $headers['Content-Type'] = null;
2245a8d6e48SMichael Große                }
2255a8d6e48SMichael Große                switch ($headers['Content-Type']) {
2265a8d6e48SMichael Große                    case 'multipart/form-data':
2275a8d6e48SMichael Große                        $headers['Content-Type']   = 'multipart/form-data; boundary=' . $this->boundary;
2285a8d6e48SMichael Große                        $data = $this->postMultipartEncode($data);
2295a8d6e48SMichael Große                        break;
2305a8d6e48SMichael Große                    default:
2315a8d6e48SMichael Große                        $headers['Content-Type']   = 'application/x-www-form-urlencoded';
2325a8d6e48SMichael Große                        $data = $this->postEncode($data);
2335a8d6e48SMichael Große                }
2345a8d6e48SMichael Große            }
2355a8d6e48SMichael Große        }elseif($method == 'GET'){
2365a8d6e48SMichael Große            $data = ''; //no data allowed on GET requests
2375a8d6e48SMichael Große        }
2385a8d6e48SMichael Große
2395a8d6e48SMichael Große        $contentlength = strlen($data);
2405a8d6e48SMichael Große        if($contentlength)  {
2415a8d6e48SMichael Große            $headers['Content-Length'] = $contentlength;
2425a8d6e48SMichael Große        }
2435a8d6e48SMichael Große
2445a8d6e48SMichael Große        if($this->user) {
2455a8d6e48SMichael Große            $headers['Authorization'] = 'Basic '.base64_encode($this->user.':'.$this->pass);
2465a8d6e48SMichael Große        }
2475a8d6e48SMichael Große        if($this->proxy_user) {
2485a8d6e48SMichael Große            $headers['Proxy-Authorization'] = 'Basic '.base64_encode($this->proxy_user.':'.$this->proxy_pass);
2495a8d6e48SMichael Große        }
2505a8d6e48SMichael Große
2515a8d6e48SMichael Große        // already connected?
2525a8d6e48SMichael Große        $connectionId = $this->uniqueConnectionId($server,$port);
2535a8d6e48SMichael Große        $this->debug('connection pool', self::$connections);
2545a8d6e48SMichael Große        $socket = null;
2555a8d6e48SMichael Große        if (isset(self::$connections[$connectionId])) {
2565a8d6e48SMichael Große            $this->debug('reusing connection', $connectionId);
2575a8d6e48SMichael Große            $socket = self::$connections[$connectionId];
2585a8d6e48SMichael Große        }
2595a8d6e48SMichael Große        if (is_null($socket) || feof($socket)) {
2605a8d6e48SMichael Große            $this->debug('opening connection', $connectionId);
2615a8d6e48SMichael Große            // open socket
2625a8d6e48SMichael Große            $socket = @fsockopen($server,$port,$errno, $errstr, $this->timeout);
2635a8d6e48SMichael Große            if (!$socket){
2645a8d6e48SMichael Große                $this->status = -100;
2655a8d6e48SMichael Große                $this->error = "Could not connect to $server:$port\n$errstr ($errno)";
2665a8d6e48SMichael Große                return false;
2675a8d6e48SMichael Große            }
2685a8d6e48SMichael Große
269*8a10b6f0SElan Ruusamäe            // try to establish a CONNECT tunnel for SSL
2705a8d6e48SMichael Große            try {
2715a8d6e48SMichael Große                if($this->ssltunnel($socket, $request_url)){
2725a8d6e48SMichael Große                    // no keep alive for tunnels
2735a8d6e48SMichael Große                    $this->keep_alive = false;
2745a8d6e48SMichael Große                    // tunnel is authed already
2755a8d6e48SMichael Große                    if(isset($headers['Proxy-Authentication'])) unset($headers['Proxy-Authentication']);
2765a8d6e48SMichael Große                }
2775a8d6e48SMichael Große            } catch (HTTPClientException $e) {
2785a8d6e48SMichael Große                $this->status = $e->getCode();
2795a8d6e48SMichael Große                $this->error = $e->getMessage();
2805a8d6e48SMichael Große                fclose($socket);
2815a8d6e48SMichael Große                return false;
2825a8d6e48SMichael Große            }
2835a8d6e48SMichael Große
2845a8d6e48SMichael Große            // keep alive?
2855a8d6e48SMichael Große            if ($this->keep_alive) {
2865a8d6e48SMichael Große                self::$connections[$connectionId] = $socket;
2875a8d6e48SMichael Große            } else {
2885a8d6e48SMichael Große                unset(self::$connections[$connectionId]);
2895a8d6e48SMichael Große            }
2905a8d6e48SMichael Große        }
2915a8d6e48SMichael Große
292980f9f38SAndreas Gohr        if ($this->keep_alive && !$this->useProxyForUrl($request_url)) {
2935a8d6e48SMichael Große            // RFC 2068, section 19.7.1: A client MUST NOT send the Keep-Alive
2945a8d6e48SMichael Große            // connection token to a proxy server. We still do keep the connection the
2955a8d6e48SMichael Große            // proxy alive (well except for CONNECT tunnels)
2965a8d6e48SMichael Große            $headers['Connection'] = 'Keep-Alive';
2975a8d6e48SMichael Große        } else {
2985a8d6e48SMichael Große            $headers['Connection'] = 'Close';
2995a8d6e48SMichael Große        }
3005a8d6e48SMichael Große
3015a8d6e48SMichael Große        try {
3025a8d6e48SMichael Große            //set non-blocking
3035a8d6e48SMichael Große            stream_set_blocking($socket, 0);
3045a8d6e48SMichael Große
3055a8d6e48SMichael Große            // build request
3065a8d6e48SMichael Große            $request  = "$method $request_url HTTP/".$this->http.HTTP_NL;
3075a8d6e48SMichael Große            $request .= $this->buildHeaders($headers);
3085a8d6e48SMichael Große            $request .= $this->getCookies();
3095a8d6e48SMichael Große            $request .= HTTP_NL;
3105a8d6e48SMichael Große            $request .= $data;
3115a8d6e48SMichael Große
3125a8d6e48SMichael Große            $this->debug('request',$request);
3135a8d6e48SMichael Große            $this->sendData($socket, $request, 'request');
3145a8d6e48SMichael Große
3155a8d6e48SMichael Große            // read headers from socket
3165a8d6e48SMichael Große            $r_headers = '';
3175a8d6e48SMichael Große            do{
3185a8d6e48SMichael Große                $r_line = $this->readLine($socket, 'headers');
3195a8d6e48SMichael Große                $r_headers .= $r_line;
3205a8d6e48SMichael Große            }while($r_line != "\r\n" && $r_line != "\n");
3215a8d6e48SMichael Große
3225a8d6e48SMichael Große            $this->debug('response headers',$r_headers);
3235a8d6e48SMichael Große
3245a8d6e48SMichael Große            // check if expected body size exceeds allowance
3255a8d6e48SMichael Große            if($this->max_bodysize && preg_match('/\r?\nContent-Length:\s*(\d+)\r?\n/i',$r_headers,$match)){
3265a8d6e48SMichael Große                if($match[1] > $this->max_bodysize){
3275a8d6e48SMichael Große                    if ($this->max_bodysize_abort)
3285a8d6e48SMichael Große                        throw new HTTPClientException('Reported content length exceeds allowed response size');
3295a8d6e48SMichael Große                    else
3305a8d6e48SMichael Große                        $this->error = 'Reported content length exceeds allowed response size';
3315a8d6e48SMichael Große                }
3325a8d6e48SMichael Große            }
3335a8d6e48SMichael Große
3345a8d6e48SMichael Große            // get Status
33503c2c428Sfiwswe            if (!preg_match('/^HTTP\/(\d\.\d)\s*(\d+).*?\n/s', $r_headers, $m))
3365a8d6e48SMichael Große                throw new HTTPClientException('Server returned bad answer '.$r_headers);
3375a8d6e48SMichael Große
3385a8d6e48SMichael Große            $this->status = $m[2];
3395a8d6e48SMichael Große
3405a8d6e48SMichael Große            // handle headers and cookies
3415a8d6e48SMichael Große            $this->resp_headers = $this->parseHeaders($r_headers);
3425a8d6e48SMichael Große            if(isset($this->resp_headers['set-cookie'])){
3435a8d6e48SMichael Große                foreach ((array) $this->resp_headers['set-cookie'] as $cookie){
344ec34bb30SAndreas Gohr                    list($cookie) = sexplode(';', $cookie, 2, '');
345ec34bb30SAndreas Gohr                    list($key, $val) = sexplode('=', $cookie, 2, '');
3465a8d6e48SMichael Große                    $key = trim($key);
3475a8d6e48SMichael Große                    if($val == 'deleted'){
3485a8d6e48SMichael Große                        if(isset($this->cookies[$key])){
3495a8d6e48SMichael Große                            unset($this->cookies[$key]);
3505a8d6e48SMichael Große                        }
3515a8d6e48SMichael Große                    }elseif($key){
3525a8d6e48SMichael Große                        $this->cookies[$key] = $val;
3535a8d6e48SMichael Große                    }
3545a8d6e48SMichael Große                }
3555a8d6e48SMichael Große            }
3565a8d6e48SMichael Große
3575a8d6e48SMichael Große            $this->debug('Object headers',$this->resp_headers);
3585a8d6e48SMichael Große
3595a8d6e48SMichael Große            // check server status code to follow redirect
36067600f75STom Kunze            if(in_array($this->status, [301, 302, 303, 307, 308])){
3615a8d6e48SMichael Große                if (empty($this->resp_headers['location'])){
3625a8d6e48SMichael Große                    throw new HTTPClientException('Redirect but no Location Header found');
3635a8d6e48SMichael Große                }elseif($this->redirect_count == $this->max_redirect){
3645a8d6e48SMichael Große                    throw new HTTPClientException('Maximum number of redirects exceeded');
3655a8d6e48SMichael Große                }else{
3665a8d6e48SMichael Große                    // close the connection because we don't handle content retrieval here
3675a8d6e48SMichael Große                    // that's the easiest way to clean up the connection
3685a8d6e48SMichael Große                    fclose($socket);
3695a8d6e48SMichael Große                    unset(self::$connections[$connectionId]);
3705a8d6e48SMichael Große
3715a8d6e48SMichael Große                    $this->redirect_count++;
3725a8d6e48SMichael Große                    $this->referer = $url;
3735a8d6e48SMichael Große                    // handle non-RFC-compliant relative redirects
3745a8d6e48SMichael Große                    if (!preg_match('/^http/i', $this->resp_headers['location'])){
3755a8d6e48SMichael Große                        if($this->resp_headers['location'][0] != '/'){
376056bf31fSDamien Regad                            $this->resp_headers['location'] = $uri['scheme'].'://'.$uri['host'].':'.$uriPort.
377056bf31fSDamien Regad                                dirname($path).'/'.$this->resp_headers['location'];
3785a8d6e48SMichael Große                        }else{
379056bf31fSDamien Regad                            $this->resp_headers['location'] = $uri['scheme'].'://'.$uri['host'].':'.$uriPort.
3805a8d6e48SMichael Große                                $this->resp_headers['location'];
3815a8d6e48SMichael Große                        }
3825a8d6e48SMichael Große                    }
38367600f75STom Kunze                    if($this->status == 307 || $this->status == 308) {
38467600f75STom Kunze                        // perform redirected request, same method as before (required by RFC)
38567600f75STom Kunze                        return $this->sendRequest($this->resp_headers['location'],$unencodedData,$method);
38667600f75STom Kunze                    }else{
3875a8d6e48SMichael Große                        // perform redirected request, always via GET (required by RFC)
3885a8d6e48SMichael Große                        return $this->sendRequest($this->resp_headers['location'],array(),'GET');
3895a8d6e48SMichael Große                    }
3905a8d6e48SMichael Große                }
39167600f75STom Kunze            }
3925a8d6e48SMichael Große
3935a8d6e48SMichael Große            // check if headers are as expected
3945a8d6e48SMichael Große            if($this->header_regexp && !preg_match($this->header_regexp,$r_headers))
3955a8d6e48SMichael Große                throw new HTTPClientException('The received headers did not match the given regexp');
3965a8d6e48SMichael Große
3975a8d6e48SMichael Große            //read body (with chunked encoding if needed)
3985a8d6e48SMichael Große            $r_body    = '';
3995a8d6e48SMichael Große            if(
4005a8d6e48SMichael Große                (
4015a8d6e48SMichael Große                    isset($this->resp_headers['transfer-encoding']) &&
4025a8d6e48SMichael Große                    $this->resp_headers['transfer-encoding'] == 'chunked'
4035a8d6e48SMichael Große                ) || (
4045a8d6e48SMichael Große                    isset($this->resp_headers['transfer-coding']) &&
4055a8d6e48SMichael Große                    $this->resp_headers['transfer-coding'] == 'chunked'
4065a8d6e48SMichael Große                )
4075a8d6e48SMichael Große            ) {
4085a8d6e48SMichael Große                $abort = false;
4095a8d6e48SMichael Große                do {
4105a8d6e48SMichael Große                    $chunk_size = '';
4115a8d6e48SMichael Große                    while (preg_match('/^[a-zA-Z0-9]?$/',$byte=$this->readData($socket,1,'chunk'))){
4125a8d6e48SMichael Große                        // read chunksize until \r
4135a8d6e48SMichael Große                        $chunk_size .= $byte;
4145a8d6e48SMichael Große                        if (strlen($chunk_size) > 128) // set an abritrary limit on the size of chunks
4155a8d6e48SMichael Große                            throw new HTTPClientException('Allowed response size exceeded');
4165a8d6e48SMichael Große                    }
4175a8d6e48SMichael Große                    $this->readLine($socket, 'chunk');     // readtrailing \n
4185a8d6e48SMichael Große                    $chunk_size = hexdec($chunk_size);
4195a8d6e48SMichael Große
4205a8d6e48SMichael Große                    if($this->max_bodysize && $chunk_size+strlen($r_body) > $this->max_bodysize){
4215a8d6e48SMichael Große                        if ($this->max_bodysize_abort)
4225a8d6e48SMichael Große                            throw new HTTPClientException('Allowed response size exceeded');
4235a8d6e48SMichael Große                        $this->error = 'Allowed response size exceeded';
4245a8d6e48SMichael Große                        $chunk_size = $this->max_bodysize - strlen($r_body);
4255a8d6e48SMichael Große                        $abort = true;
4265a8d6e48SMichael Große                    }
4275a8d6e48SMichael Große
4285a8d6e48SMichael Große                    if ($chunk_size > 0) {
4295a8d6e48SMichael Große                        $r_body .= $this->readData($socket, $chunk_size, 'chunk');
4305a8d6e48SMichael Große                        $this->readData($socket, 2, 'chunk'); // read trailing \r\n
4315a8d6e48SMichael Große                    }
4325a8d6e48SMichael Große                } while ($chunk_size && !$abort);
4335a8d6e48SMichael Große            }elseif(isset($this->resp_headers['content-length']) && !isset($this->resp_headers['transfer-encoding'])){
4345a8d6e48SMichael Große                /* RFC 2616
4355a8d6e48SMichael Große                 * If a message is received with both a Transfer-Encoding header field and a Content-Length
4365a8d6e48SMichael Große                 * header field, the latter MUST be ignored.
4375a8d6e48SMichael Große                 */
4385a8d6e48SMichael Große
4395a8d6e48SMichael Große                // read up to the content-length or max_bodysize
4405a8d6e48SMichael Große                // for keep alive we need to read the whole message to clean up the socket for the next read
4415a8d6e48SMichael Große                if(
4425a8d6e48SMichael Große                    !$this->keep_alive &&
4435a8d6e48SMichael Große                    $this->max_bodysize &&
4445a8d6e48SMichael Große                    $this->max_bodysize < $this->resp_headers['content-length']
4455a8d6e48SMichael Große                ) {
4465a8d6e48SMichael Große                    $length = $this->max_bodysize + 1;
4475a8d6e48SMichael Große                }else{
4485a8d6e48SMichael Große                    $length = $this->resp_headers['content-length'];
4495a8d6e48SMichael Große                }
4505a8d6e48SMichael Große
4515a8d6e48SMichael Große                $r_body = $this->readData($socket, $length, 'response (content-length limited)', true);
4525a8d6e48SMichael Große            }elseif( !isset($this->resp_headers['transfer-encoding']) && $this->max_bodysize && !$this->keep_alive){
4535a8d6e48SMichael Große                $r_body = $this->readData($socket, $this->max_bodysize+1, 'response (content-length limited)', true);
4545a8d6e48SMichael Große            } elseif ((int)$this->status === 204) {
4555a8d6e48SMichael Große                // request has no content
4565a8d6e48SMichael Große            } else{
4575a8d6e48SMichael Große                // read entire socket
4585a8d6e48SMichael Große                while (!feof($socket)) {
4595a8d6e48SMichael Große                    $r_body .= $this->readData($socket, 4096, 'response (unlimited)', true);
4605a8d6e48SMichael Große                }
4615a8d6e48SMichael Große            }
4625a8d6e48SMichael Große
4635a8d6e48SMichael Große            // recheck body size, we might have read max_bodysize+1 or even the whole body, so we abort late here
4645a8d6e48SMichael Große            if($this->max_bodysize){
4655a8d6e48SMichael Große                if(strlen($r_body) > $this->max_bodysize){
4665a8d6e48SMichael Große                    if ($this->max_bodysize_abort) {
4675a8d6e48SMichael Große                        throw new HTTPClientException('Allowed response size exceeded');
4685a8d6e48SMichael Große                    } else {
4695a8d6e48SMichael Große                        $this->error = 'Allowed response size exceeded';
4705a8d6e48SMichael Große                    }
4715a8d6e48SMichael Große                }
4725a8d6e48SMichael Große            }
4735a8d6e48SMichael Große
4745a8d6e48SMichael Große        } catch (HTTPClientException $err) {
4755a8d6e48SMichael Große            $this->error = $err->getMessage();
4765a8d6e48SMichael Große            if ($err->getCode())
4775a8d6e48SMichael Große                $this->status = $err->getCode();
4785a8d6e48SMichael Große            unset(self::$connections[$connectionId]);
4795a8d6e48SMichael Große            fclose($socket);
4805a8d6e48SMichael Große            return false;
4815a8d6e48SMichael Große        }
4825a8d6e48SMichael Große
4835a8d6e48SMichael Große        if (!$this->keep_alive ||
4845a8d6e48SMichael Große            (isset($this->resp_headers['connection']) && $this->resp_headers['connection'] == 'Close')) {
4855a8d6e48SMichael Große            // close socket
4865a8d6e48SMichael Große            fclose($socket);
4875a8d6e48SMichael Große            unset(self::$connections[$connectionId]);
4885a8d6e48SMichael Große        }
4895a8d6e48SMichael Große
4905a8d6e48SMichael Große        // decode gzip if needed
4915a8d6e48SMichael Große        if(isset($this->resp_headers['content-encoding']) &&
4925a8d6e48SMichael Große            $this->resp_headers['content-encoding'] == 'gzip' &&
4935a8d6e48SMichael Große            strlen($r_body) > 10 && substr($r_body,0,3)=="\x1f\x8b\x08"){
4945a8d6e48SMichael Große            $this->resp_body = @gzinflate(substr($r_body, 10));
4955a8d6e48SMichael Große            if($this->resp_body === false){
4965a8d6e48SMichael Große                $this->error = 'Failed to decompress gzip encoded content';
4975a8d6e48SMichael Große                $this->resp_body = $r_body;
4985a8d6e48SMichael Große            }
4995a8d6e48SMichael Große        }else{
5005a8d6e48SMichael Große            $this->resp_body = $r_body;
5015a8d6e48SMichael Große        }
5025a8d6e48SMichael Große
5035a8d6e48SMichael Große        $this->debug('response body',$this->resp_body);
5045a8d6e48SMichael Große        $this->redirect_count = 0;
5055a8d6e48SMichael Große        return true;
5065a8d6e48SMichael Große    }
5075a8d6e48SMichael Große
5085a8d6e48SMichael Große    /**
5095a8d6e48SMichael Große     * Tries to establish a CONNECT tunnel via Proxy
5105a8d6e48SMichael Große     *
5115a8d6e48SMichael Große     * Protocol, Servername and Port will be stripped from the request URL when a successful CONNECT happened
5125a8d6e48SMichael Große     *
5135a8d6e48SMichael Große     * @param resource &$socket
5145a8d6e48SMichael Große     * @param string   &$requesturl
5155a8d6e48SMichael Große     * @throws HTTPClientException when a tunnel is needed but could not be established
5165a8d6e48SMichael Große     * @return bool true if a tunnel was established
5175a8d6e48SMichael Große     */
5185a8d6e48SMichael Große    protected function ssltunnel(&$socket, &$requesturl){
519980f9f38SAndreas Gohr        if(!$this->useProxyForUrl($requesturl)) return false;
5205a8d6e48SMichael Große        $requestinfo = parse_url($requesturl);
5215a8d6e48SMichael Große        if($requestinfo['scheme'] != 'https') return false;
522056bf31fSDamien Regad        if(empty($requestinfo['port'])) $requestinfo['port'] = 443;
5235a8d6e48SMichael Große
5245a8d6e48SMichael Große        // build request
5255a8d6e48SMichael Große        $request  = "CONNECT {$requestinfo['host']}:{$requestinfo['port']} HTTP/1.0".HTTP_NL;
5265a8d6e48SMichael Große        $request .= "Host: {$requestinfo['host']}".HTTP_NL;
5275a8d6e48SMichael Große        if($this->proxy_user) {
5285a8d6e48SMichael Große            $request .= 'Proxy-Authorization: Basic '.base64_encode($this->proxy_user.':'.$this->proxy_pass).HTTP_NL;
5295a8d6e48SMichael Große        }
5305a8d6e48SMichael Große        $request .= HTTP_NL;
5315a8d6e48SMichael Große
5325a8d6e48SMichael Große        $this->debug('SSL Tunnel CONNECT',$request);
5335a8d6e48SMichael Große        $this->sendData($socket, $request, 'SSL Tunnel CONNECT');
5345a8d6e48SMichael Große
5355a8d6e48SMichael Große        // read headers from socket
5365a8d6e48SMichael Große        $r_headers = '';
5375a8d6e48SMichael Große        do{
5385a8d6e48SMichael Große            $r_line = $this->readLine($socket, 'headers');
5395a8d6e48SMichael Große            $r_headers .= $r_line;
5405a8d6e48SMichael Große        }while($r_line != "\r\n" && $r_line != "\n");
5415a8d6e48SMichael Große
5425a8d6e48SMichael Große        $this->debug('SSL Tunnel Response',$r_headers);
5435a8d6e48SMichael Große        if(preg_match('/^HTTP\/1\.[01] 200/i',$r_headers)){
5445a8d6e48SMichael Große            // set correct peer name for verification (enabled since PHP 5.6)
5455a8d6e48SMichael Große            stream_context_set_option($socket, 'ssl', 'peer_name', $requestinfo['host']);
5465a8d6e48SMichael Große
5475a8d6e48SMichael Große            // SSLv3 is broken, use only TLS connections.
5485a8d6e48SMichael Große            // @link https://bugs.php.net/69195
5495a8d6e48SMichael Große            if (PHP_VERSION_ID >= 50600 && PHP_VERSION_ID <= 50606) {
5505a8d6e48SMichael Große                $cryptoMethod = STREAM_CRYPTO_METHOD_TLS_CLIENT;
5515a8d6e48SMichael Große            } else {
5525a8d6e48SMichael Große                // actually means neither SSLv2 nor SSLv3
5535a8d6e48SMichael Große                $cryptoMethod = STREAM_CRYPTO_METHOD_SSLv23_CLIENT;
5545a8d6e48SMichael Große            }
5555a8d6e48SMichael Große
5565a8d6e48SMichael Große            if (@stream_socket_enable_crypto($socket, true, $cryptoMethod)) {
5575a8d6e48SMichael Große                $requesturl = $requestinfo['path'].
5585a8d6e48SMichael Große                    (!empty($requestinfo['query'])?'?'.$requestinfo['query']:'');
5595a8d6e48SMichael Große                return true;
5605a8d6e48SMichael Große            }
5615a8d6e48SMichael Große
5625a8d6e48SMichael Große            throw new HTTPClientException(
5635a8d6e48SMichael Große                'Failed to set up crypto for secure connection to '.$requestinfo['host'], -151
5645a8d6e48SMichael Große            );
5655a8d6e48SMichael Große        }
5665a8d6e48SMichael Große
5675a8d6e48SMichael Große        throw new HTTPClientException('Failed to establish secure proxy connection', -150);
5685a8d6e48SMichael Große    }
5695a8d6e48SMichael Große
5705a8d6e48SMichael Große    /**
5715a8d6e48SMichael Große     * Safely write data to a socket
5725a8d6e48SMichael Große     *
5735a8d6e48SMichael Große     * @param  resource $socket     An open socket handle
5745a8d6e48SMichael Große     * @param  string   $data       The data to write
5755a8d6e48SMichael Große     * @param  string   $message    Description of what is being read
5765a8d6e48SMichael Große     * @throws HTTPClientException
5775a8d6e48SMichael Große     *
5785a8d6e48SMichael Große     * @author Tom N Harris <tnharris@whoopdedo.org>
5795a8d6e48SMichael Große     */
5805a8d6e48SMichael Große    protected function sendData($socket, $data, $message) {
5815a8d6e48SMichael Große        // send request
5825a8d6e48SMichael Große        $towrite = strlen($data);
5835a8d6e48SMichael Große        $written = 0;
5845a8d6e48SMichael Große        while($written < $towrite){
5855a8d6e48SMichael Große            // check timeout
5865a8d6e48SMichael Große            $time_used = $this->time() - $this->start;
5875a8d6e48SMichael Große            if($time_used > $this->timeout)
5885a8d6e48SMichael Große                throw new HTTPClientException(sprintf('Timeout while sending %s (%.3fs)',$message, $time_used), -100);
5895a8d6e48SMichael Große            if(feof($socket))
5905a8d6e48SMichael Große                throw new HTTPClientException("Socket disconnected while writing $message");
5915a8d6e48SMichael Große
5925a8d6e48SMichael Große            // select parameters
5935a8d6e48SMichael Große            $sel_r = null;
5945a8d6e48SMichael Große            $sel_w = array($socket);
5955a8d6e48SMichael Große            $sel_e = null;
5965a8d6e48SMichael Große            // wait for stream ready or timeout (1sec)
5975a8d6e48SMichael Große            if(@stream_select($sel_r,$sel_w,$sel_e,1) === false){
5985a8d6e48SMichael Große                usleep(1000);
5995a8d6e48SMichael Große                continue;
6005a8d6e48SMichael Große            }
6015a8d6e48SMichael Große
6025a8d6e48SMichael Große            // write to stream
6035a8d6e48SMichael Große            $nbytes = fwrite($socket, substr($data,$written,4096));
6045a8d6e48SMichael Große            if($nbytes === false)
6055a8d6e48SMichael Große                throw new HTTPClientException("Failed writing to socket while sending $message", -100);
6065a8d6e48SMichael Große            $written += $nbytes;
6075a8d6e48SMichael Große        }
6085a8d6e48SMichael Große    }
6095a8d6e48SMichael Große
6105a8d6e48SMichael Große    /**
6115a8d6e48SMichael Große     * Safely read data from a socket
6125a8d6e48SMichael Große     *
6135a8d6e48SMichael Große     * Reads up to a given number of bytes or throws an exception if the
6145a8d6e48SMichael Große     * response times out or ends prematurely.
6155a8d6e48SMichael Große     *
6165a8d6e48SMichael Große     * @param  resource $socket     An open socket handle in non-blocking mode
6175a8d6e48SMichael Große     * @param  int      $nbytes     Number of bytes to read
6185a8d6e48SMichael Große     * @param  string   $message    Description of what is being read
6195a8d6e48SMichael Große     * @param  bool     $ignore_eof End-of-file is not an error if this is set
6205a8d6e48SMichael Große     * @throws HTTPClientException
6215a8d6e48SMichael Große     * @return string
6225a8d6e48SMichael Große     *
6235a8d6e48SMichael Große     * @author Tom N Harris <tnharris@whoopdedo.org>
6245a8d6e48SMichael Große     */
6255a8d6e48SMichael Große    protected function readData($socket, $nbytes, $message, $ignore_eof = false) {
6265a8d6e48SMichael Große        $r_data = '';
6275a8d6e48SMichael Große        // Does not return immediately so timeout and eof can be checked
6285a8d6e48SMichael Große        if ($nbytes < 0) $nbytes = 0;
6295a8d6e48SMichael Große        $to_read = $nbytes;
6305a8d6e48SMichael Große        do {
6315a8d6e48SMichael Große            $time_used = $this->time() - $this->start;
6325a8d6e48SMichael Große            if ($time_used > $this->timeout)
6335a8d6e48SMichael Große                throw new HTTPClientException(
6345a8d6e48SMichael Große                    sprintf('Timeout while reading %s after %d bytes (%.3fs)', $message,
6355a8d6e48SMichael Große                        strlen($r_data), $time_used), -100);
6365a8d6e48SMichael Große            if(feof($socket)) {
6375a8d6e48SMichael Große                if(!$ignore_eof)
6385a8d6e48SMichael Große                    throw new HTTPClientException("Premature End of File (socket) while reading $message");
6395a8d6e48SMichael Große                break;
6405a8d6e48SMichael Große            }
6415a8d6e48SMichael Große
6425a8d6e48SMichael Große            if ($to_read > 0) {
6435a8d6e48SMichael Große                // select parameters
6445a8d6e48SMichael Große                $sel_r = array($socket);
6455a8d6e48SMichael Große                $sel_w = null;
6465a8d6e48SMichael Große                $sel_e = null;
6475a8d6e48SMichael Große                // wait for stream ready or timeout (1sec)
6485a8d6e48SMichael Große                if(@stream_select($sel_r,$sel_w,$sel_e,1) === false){
6495a8d6e48SMichael Große                    usleep(1000);
6505a8d6e48SMichael Große                    continue;
6515a8d6e48SMichael Große                }
6525a8d6e48SMichael Große
6535a8d6e48SMichael Große                $bytes = fread($socket, $to_read);
6545a8d6e48SMichael Große                if($bytes === false)
6555a8d6e48SMichael Große                    throw new HTTPClientException("Failed reading from socket while reading $message", -100);
6565a8d6e48SMichael Große                $r_data .= $bytes;
6575a8d6e48SMichael Große                $to_read -= strlen($bytes);
6585a8d6e48SMichael Große            }
6595a8d6e48SMichael Große        } while ($to_read > 0 && strlen($r_data) < $nbytes);
6605a8d6e48SMichael Große        return $r_data;
6615a8d6e48SMichael Große    }
6625a8d6e48SMichael Große
6635a8d6e48SMichael Große    /**
6645a8d6e48SMichael Große     * Safely read a \n-terminated line from a socket
6655a8d6e48SMichael Große     *
6665a8d6e48SMichael Große     * Always returns a complete line, including the terminating \n.
6675a8d6e48SMichael Große     *
6685a8d6e48SMichael Große     * @param  resource $socket     An open socket handle in non-blocking mode
6695a8d6e48SMichael Große     * @param  string   $message    Description of what is being read
6705a8d6e48SMichael Große     * @throws HTTPClientException
6715a8d6e48SMichael Große     * @return string
6725a8d6e48SMichael Große     *
6735a8d6e48SMichael Große     * @author Tom N Harris <tnharris@whoopdedo.org>
6745a8d6e48SMichael Große     */
6755a8d6e48SMichael Große    protected function readLine($socket, $message) {
6765a8d6e48SMichael Große        $r_data = '';
6775a8d6e48SMichael Große        do {
6785a8d6e48SMichael Große            $time_used = $this->time() - $this->start;
6795a8d6e48SMichael Große            if ($time_used > $this->timeout)
6805a8d6e48SMichael Große                throw new HTTPClientException(
6815a8d6e48SMichael Große                    sprintf('Timeout while reading %s (%.3fs) >%s<', $message, $time_used, $r_data),
6825a8d6e48SMichael Große                    -100);
6835a8d6e48SMichael Große            if(feof($socket))
6845a8d6e48SMichael Große                throw new HTTPClientException("Premature End of File (socket) while reading $message");
6855a8d6e48SMichael Große
6865a8d6e48SMichael Große            // select parameters
6875a8d6e48SMichael Große            $sel_r = array($socket);
6885a8d6e48SMichael Große            $sel_w = null;
6895a8d6e48SMichael Große            $sel_e = null;
6905a8d6e48SMichael Große            // wait for stream ready or timeout (1sec)
6915a8d6e48SMichael Große            if(@stream_select($sel_r,$sel_w,$sel_e,1) === false){
6925a8d6e48SMichael Große                usleep(1000);
6935a8d6e48SMichael Große                continue;
6945a8d6e48SMichael Große            }
6955a8d6e48SMichael Große
6965a8d6e48SMichael Große            $r_data = fgets($socket, 1024);
6975a8d6e48SMichael Große        } while (!preg_match('/\n$/',$r_data));
6985a8d6e48SMichael Große        return $r_data;
6995a8d6e48SMichael Große    }
7005a8d6e48SMichael Große
7015a8d6e48SMichael Große    /**
7025a8d6e48SMichael Große     * print debug info
7035a8d6e48SMichael Große     *
7045a8d6e48SMichael Große     * Uses _debug_text or _debug_html depending on the SAPI name
7055a8d6e48SMichael Große     *
7065a8d6e48SMichael Große     * @author Andreas Gohr <andi@splitbrain.org>
7075a8d6e48SMichael Große     *
7085a8d6e48SMichael Große     * @param string $info
7095a8d6e48SMichael Große     * @param mixed  $var
7105a8d6e48SMichael Große     */
7115a8d6e48SMichael Große    protected function debug($info,$var=null){
7125a8d6e48SMichael Große        if(!$this->debug) return;
7135a8d6e48SMichael Große        if(php_sapi_name() == 'cli'){
7145a8d6e48SMichael Große            $this->debugText($info, $var);
7155a8d6e48SMichael Große        }else{
7165a8d6e48SMichael Große            $this->debugHtml($info, $var);
7175a8d6e48SMichael Große        }
7185a8d6e48SMichael Große    }
7195a8d6e48SMichael Große
7205a8d6e48SMichael Große    /**
7215a8d6e48SMichael Große     * print debug info as HTML
7225a8d6e48SMichael Große     *
7235a8d6e48SMichael Große     * @param string $info
7245a8d6e48SMichael Große     * @param mixed  $var
7255a8d6e48SMichael Große     */
7265a8d6e48SMichael Große    protected function debugHtml($info, $var=null){
7275a8d6e48SMichael Große        print '<b>'.$info.'</b> '.($this->time() - $this->start).'s<br />';
7285a8d6e48SMichael Große        if(!is_null($var)){
7295a8d6e48SMichael Große            ob_start();
7305a8d6e48SMichael Große            print_r($var);
7315a8d6e48SMichael Große            $content = htmlspecialchars(ob_get_contents());
7325a8d6e48SMichael Große            ob_end_clean();
7335a8d6e48SMichael Große            print '<pre>'.$content.'</pre>';
7345a8d6e48SMichael Große        }
7355a8d6e48SMichael Große    }
7365a8d6e48SMichael Große
7375a8d6e48SMichael Große    /**
7385a8d6e48SMichael Große     * prints debug info as plain text
7395a8d6e48SMichael Große     *
7405a8d6e48SMichael Große     * @param string $info
7415a8d6e48SMichael Große     * @param mixed  $var
7425a8d6e48SMichael Große     */
7435a8d6e48SMichael Große    protected function debugText($info, $var=null){
7445a8d6e48SMichael Große        print '*'.$info.'* '.($this->time() - $this->start)."s\n";
7455a8d6e48SMichael Große        if(!is_null($var)) print_r($var);
7465a8d6e48SMichael Große        print "\n-----------------------------------------------\n";
7475a8d6e48SMichael Große    }
7485a8d6e48SMichael Große
7495a8d6e48SMichael Große    /**
7505a8d6e48SMichael Große     * Return current timestamp in microsecond resolution
7515a8d6e48SMichael Große     *
7525a8d6e48SMichael Große     * @return float
7535a8d6e48SMichael Große     */
7545a8d6e48SMichael Große    protected static function time(){
7555a8d6e48SMichael Große        list($usec, $sec) = explode(" ", microtime());
7565a8d6e48SMichael Große        return ((float)$usec + (float)$sec);
7575a8d6e48SMichael Große    }
7585a8d6e48SMichael Große
7595a8d6e48SMichael Große    /**
7605a8d6e48SMichael Große     * convert given header string to Header array
7615a8d6e48SMichael Große     *
7625a8d6e48SMichael Große     * All Keys are lowercased.
7635a8d6e48SMichael Große     *
7645a8d6e48SMichael Große     * @author Andreas Gohr <andi@splitbrain.org>
7655a8d6e48SMichael Große     *
7665a8d6e48SMichael Große     * @param string $string
7675a8d6e48SMichael Große     * @return array
7685a8d6e48SMichael Große     */
7695a8d6e48SMichael Große    protected function parseHeaders($string){
7705a8d6e48SMichael Große        $headers = array();
7715a8d6e48SMichael Große        $lines = explode("\n",$string);
7725a8d6e48SMichael Große        array_shift($lines); //skip first line (status)
7735a8d6e48SMichael Große        foreach($lines as $line){
774ec34bb30SAndreas Gohr            list($key, $val) = sexplode(':', $line, 2, '');
7755a8d6e48SMichael Große            $key = trim($key);
776ec34bb30SAndreas Gohr            $val = trim($val);
7775a8d6e48SMichael Große            $key = strtolower($key);
7785a8d6e48SMichael Große            if(!$key) continue;
7795a8d6e48SMichael Große            if(isset($headers[$key])){
7805a8d6e48SMichael Große                if(is_array($headers[$key])){
7815a8d6e48SMichael Große                    $headers[$key][] = $val;
7825a8d6e48SMichael Große                }else{
7835a8d6e48SMichael Große                    $headers[$key] = array($headers[$key],$val);
7845a8d6e48SMichael Große                }
7855a8d6e48SMichael Große            }else{
7865a8d6e48SMichael Große                $headers[$key] = $val;
7875a8d6e48SMichael Große            }
7885a8d6e48SMichael Große        }
7895a8d6e48SMichael Große        return $headers;
7905a8d6e48SMichael Große    }
7915a8d6e48SMichael Große
7925a8d6e48SMichael Große    /**
7935a8d6e48SMichael Große     * convert given header array to header string
7945a8d6e48SMichael Große     *
7955a8d6e48SMichael Große     * @author Andreas Gohr <andi@splitbrain.org>
7965a8d6e48SMichael Große     *
7975a8d6e48SMichael Große     * @param array $headers
7985a8d6e48SMichael Große     * @return string
7995a8d6e48SMichael Große     */
8005a8d6e48SMichael Große    protected function buildHeaders($headers){
8015a8d6e48SMichael Große        $string = '';
8025a8d6e48SMichael Große        foreach($headers as $key => $value){
8035a8d6e48SMichael Große            if($value === '') continue;
8045a8d6e48SMichael Große            $string .= $key.': '.$value.HTTP_NL;
8055a8d6e48SMichael Große        }
8065a8d6e48SMichael Große        return $string;
8075a8d6e48SMichael Große    }
8085a8d6e48SMichael Große
8095a8d6e48SMichael Große    /**
8105a8d6e48SMichael Große     * get cookies as http header string
8115a8d6e48SMichael Große     *
8125a8d6e48SMichael Große     * @author Andreas Goetz <cpuidle@gmx.de>
8135a8d6e48SMichael Große     *
8145a8d6e48SMichael Große     * @return string
8155a8d6e48SMichael Große     */
8165a8d6e48SMichael Große    protected function getCookies(){
8175a8d6e48SMichael Große        $headers = '';
8185a8d6e48SMichael Große        foreach ($this->cookies as $key => $val){
8195a8d6e48SMichael Große            $headers .= "$key=$val; ";
8205a8d6e48SMichael Große        }
8215a8d6e48SMichael Große        $headers = substr($headers, 0, -2);
8225a8d6e48SMichael Große        if ($headers) $headers = "Cookie: $headers".HTTP_NL;
8235a8d6e48SMichael Große        return $headers;
8245a8d6e48SMichael Große    }
8255a8d6e48SMichael Große
8265a8d6e48SMichael Große    /**
8275a8d6e48SMichael Große     * Encode data for posting
8285a8d6e48SMichael Große     *
8295a8d6e48SMichael Große     * @author Andreas Gohr <andi@splitbrain.org>
8305a8d6e48SMichael Große     *
8315a8d6e48SMichael Große     * @param array $data
8325a8d6e48SMichael Große     * @return string
8335a8d6e48SMichael Große     */
8345a8d6e48SMichael Große    protected function postEncode($data){
8355a8d6e48SMichael Große        return http_build_query($data,'','&');
8365a8d6e48SMichael Große    }
8375a8d6e48SMichael Große
8385a8d6e48SMichael Große    /**
8395a8d6e48SMichael Große     * Encode data for posting using multipart encoding
8405a8d6e48SMichael Große     *
8415a8d6e48SMichael Große     * @fixme use of urlencode might be wrong here
8425a8d6e48SMichael Große     * @author Andreas Gohr <andi@splitbrain.org>
8435a8d6e48SMichael Große     *
8445a8d6e48SMichael Große     * @param array $data
8455a8d6e48SMichael Große     * @return string
8465a8d6e48SMichael Große     */
8475a8d6e48SMichael Große    protected function postMultipartEncode($data){
8485a8d6e48SMichael Große        $boundary = '--'.$this->boundary;
8495a8d6e48SMichael Große        $out = '';
8505a8d6e48SMichael Große        foreach($data as $key => $val){
8515a8d6e48SMichael Große            $out .= $boundary.HTTP_NL;
8525a8d6e48SMichael Große            if(!is_array($val)){
8535a8d6e48SMichael Große                $out .= 'Content-Disposition: form-data; name="'.urlencode($key).'"'.HTTP_NL;
8545a8d6e48SMichael Große                $out .= HTTP_NL; // end of headers
8555a8d6e48SMichael Große                $out .= $val;
8565a8d6e48SMichael Große                $out .= HTTP_NL;
8575a8d6e48SMichael Große            }else{
8585a8d6e48SMichael Große                $out .= 'Content-Disposition: form-data; name="'.urlencode($key).'"';
8595a8d6e48SMichael Große                if($val['filename']) $out .= '; filename="'.urlencode($val['filename']).'"';
8605a8d6e48SMichael Große                $out .= HTTP_NL;
8615a8d6e48SMichael Große                if($val['mimetype']) $out .= 'Content-Type: '.$val['mimetype'].HTTP_NL;
8625a8d6e48SMichael Große                $out .= HTTP_NL; // end of headers
8635a8d6e48SMichael Große                $out .= $val['body'];
8645a8d6e48SMichael Große                $out .= HTTP_NL;
8655a8d6e48SMichael Große            }
8665a8d6e48SMichael Große        }
8675a8d6e48SMichael Große        $out .= "$boundary--".HTTP_NL;
8685a8d6e48SMichael Große        return $out;
8695a8d6e48SMichael Große    }
8705a8d6e48SMichael Große
8715a8d6e48SMichael Große    /**
8725a8d6e48SMichael Große     * Generates a unique identifier for a connection.
8735a8d6e48SMichael Große     *
8745a8d6e48SMichael Große     * @param  string $server
8755a8d6e48SMichael Große     * @param  string $port
8765a8d6e48SMichael Große     * @return string unique identifier
8775a8d6e48SMichael Große     */
8785a8d6e48SMichael Große    protected function uniqueConnectionId($server, $port) {
8795a8d6e48SMichael Große        return "$server:$port";
8805a8d6e48SMichael Große    }
881980f9f38SAndreas Gohr
882980f9f38SAndreas Gohr    /**
883980f9f38SAndreas Gohr     * Should the Proxy be used for the given URL?
884980f9f38SAndreas Gohr     *
885980f9f38SAndreas Gohr     * Checks the exceptions
886980f9f38SAndreas Gohr     *
887980f9f38SAndreas Gohr     * @param string $url
888980f9f38SAndreas Gohr     * @return bool
889980f9f38SAndreas Gohr     */
890980f9f38SAndreas Gohr    protected function useProxyForUrl($url) {
891980f9f38SAndreas Gohr        return $this->proxy_host && (!$this->proxy_except || !preg_match('/' . $this->proxy_except . '/i', $url));
892980f9f38SAndreas Gohr    }
8935a8d6e48SMichael Große}
894