1:   2:   3:   4:   5:   6:   7:   8:   9:  10:  11:  12:  13:  14:  15:  16:  17:  18:  19:  20:  21:  22:  23:  24:  25:  26:  27:  28:  29:  30:  31:  32:  33:  34:  35:  36:  37:  38:  39:  40:  41:  42:  43:  44:  45:  46:  47:  48:  49:  50:  51:  52:  53:  54:  55:  56:  57:  58:  59:  60:  61:  62:  63:  64:  65:  66:  67:  68:  69:  70:  71:  72:  73:  74:  75:  76:  77:  78:  79:  80:  81:  82:  83:  84:  85:  86:  87:  88:  89:  90:  91:  92:  93:  94:  95:  96:  97:  98:  99: 100: 101: 102: 103: 104: 105: 106: 107: 108: 109: 110: 111: 112: 113: 114: 115: 116: 117: 118: 119: 120: 121: 122: 123: 124: 125: 126: 127: 128: 129: 130: 131: 132: 133: 134: 135: 

<?php
/*
 * Copyright 2017 Jack Sleight <http://jacksleight.com/>
 * This source file is subject to the MIT license that is bundled with this package in the file LICENCE. 
 */

namespace Coast;

use Coast\Url;
use Coast\File;
use Coast\Http;

class Http
{
    protected $_timeout;
    protected $_cookies;
    
    public function __construct(array $options = array())
    {
        foreach ($options as $name => $value) {
            if ($name[0] == '_') {
                throw new \Coast\Exception("Access to '{$name}' is prohibited");  
            }
            $this->$name($value);
        }
    }

    public function timeout($timeout = null)
    {
        if (func_num_args() > 0) {
            $this->_timeout = $timeout;
            return $this;
        }
        return $this->_timeout;
    }
    
    public function execute(Http\Request $request)
    {
        $method  = $request->method();
        $url     = $request->url();
        $body    = $request->body();
        $headers = $request->headers();
        $auth    = $request->auth();

        if (!isset($method)) {
            throw new Http\Exception("No method set");
        }
        if (!isset($url)) {
            throw new Http\Exception("No URL set");
        }

        $ch = curl_init((string) $url);
        curl_setopt($ch, CURLOPT_HEADER, true);
        if (!ini_get('open_basedir')) {
            curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true);
        }
        curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
        if (isset($this->_timeout)) {
            curl_setopt($ch, CURLOPT_TIMEOUT, $this->_timeout);
        }
        if (isset($this->_cookies)) {
            curl_setopt($ch, CURLOPT_COOKIE, $this->_cookies);
        }
        if (isset($headers)) {
            curl_setopt($ch, CURLOPT_HTTPHEADER, array_map(function($value, $name) {
                return "{$name}: {$value}";
            }, $headers, array_keys($headers)));
        }
        if (isset($auth)) {
            curl_setopt($ch, CURLOPT_HTTPAUTH, $auth['type']);
            curl_setopt($ch, CURLOPT_USERPWD, "{$auth['username']}:{$auth['password']}");
        }
        if ($method == Http\Request::METHOD_HEAD) {
            curl_setopt($ch, CURLOPT_NOBODY, true);
        } elseif ($method == Http\Request::METHOD_POST) {
            if (is_array($body)) {
                foreach ($body as $name => $value) {
                    if ($value instanceof File) {
                        $value = [$value];
                    }
                    if (is_array($value) && $value[0] instanceof File) {
                        $value = $value + [null, null, null];
                        $value = new \CURLFile($value[0], $value[1], $value[2]);
                    }
                    $body[$name] = $value;
                }
            }
            curl_setopt($ch, CURLOPT_POST, true);
            curl_setopt($ch, CURLOPT_POSTFIELDS, $body);
        }
        
        $response = curl_exec($ch);
        if ($response === false) {
            throw new Http\Exception(curl_error($ch));
        }
        
        $url    = new Url(curl_getinfo($ch, CURLINFO_EFFECTIVE_URL));
        $status = curl_getinfo($ch, CURLINFO_HTTP_CODE);
        $size   = curl_getinfo($ch, CURLINFO_HEADER_SIZE);
        $head   = substr($response, 0, $size);
        $body   = $method != Http\Request::METHOD_HEAD
            ? substr($response, $size)
            : null;
        
        $headers = [];
        if ($head) {
            $parts   = explode("\r\n\r\n", $head);
            $head    = $parts[count($parts) - 2];
            $head    = explode("\r\n", $head);
            $headers = [];
            foreach ($head as $header) {
                $parts = explode(':', $header, 2);
                if (count($parts) != 2) {
                    continue;
                }
                $name  = trim($parts[0]);
                $value = trim($parts[1]);
                $headers[$name] = $value;
            }
        }
        
        if (isset($headers['cookie'])) {
            $this->_cookies = $headers['cookie'];
        }
        
        curl_close($ch);
        return new Http\Response([
            'request' => $request,
            'url'     => $url,
            'status'  => $status,
            'headers' => $headers,
            'body'    => $body,
        ]);
    }
}