2008-05-30 11:40:08 +00:00
< ? php
/**
* HTTP Socket connection class .
*
* PHP versions 4 and 5
*
2009-11-06 06:46:59 +00:00
* CakePHP ( tm ) : Rapid Development Framework ( http :// cakephp . org )
2010-01-26 19:18:20 +00:00
* Copyright 2005 - 2010 , Cake Software Foundation , Inc . ( http :// cakefoundation . org )
2008-05-30 11:40:08 +00:00
*
* Licensed under The MIT License
* Redistributions of files must retain the above copyright notice .
*
2010-01-26 19:18:20 +00:00
* @ copyright Copyright 2005 - 2010 , Cake Software Foundation , Inc . ( http :// cakefoundation . org )
2009-11-06 06:00:11 +00:00
* @ link http :// cakephp . org CakePHP ( tm ) Project
2008-10-30 17:30:26 +00:00
* @ package cake
* @ subpackage cake . cake . libs
* @ since CakePHP ( tm ) v 1.2 . 0
2009-11-06 06:51:51 +00:00
* @ license MIT License ( http :// www . opensource . org / licenses / mit - license . php )
2008-05-30 11:40:08 +00:00
*/
2009-03-15 20:52:27 +00:00
App :: import ( 'Core' , array ( 'CakeSocket' , 'Set' , 'Router' ));
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Cake network socket connection class .
*
2010-01-25 16:01:05 +00:00
* Core base class for HTTP network communication . HttpSocket can be used as an
* Object Oriented replacement for cURL in many places .
2008-05-30 11:40:08 +00:00
*
2008-10-30 17:30:26 +00:00
* @ package cake
* @ subpackage cake . cake . libs
2008-05-30 11:40:08 +00:00
*/
class HttpSocket extends CakeSocket {
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Object description
*
* @ var string
* @ access public
*/
var $description = 'HTTP-based DataSource Interface' ;
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
2009-05-07 18:49:21 +00:00
* When one activates the $quirksMode by setting it to true , all checks meant to
* enforce RFC 2616 ( HTTP / 1.1 specs ) .
2008-05-30 11:40:08 +00:00
* will be disabled and additional measures to deal with non - standard responses will be enabled .
*
* @ var boolean
* @ access public
*/
var $quirksMode = false ;
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* The default values to use for a request
*
* @ var array
* @ access public
*/
var $request = array (
'method' => 'GET' ,
'uri' => array (
'scheme' => 'http' ,
'host' => null ,
'port' => 80 ,
'user' => null ,
'pass' => null ,
'path' => null ,
'query' => null ,
'fragment' => null
),
'auth' => array (
2009-02-11 23:46:59 +00:00
'method' => 'Basic' ,
2008-05-30 11:40:08 +00:00
'user' => null ,
'pass' => null
),
'version' => '1.1' ,
'body' => '' ,
'line' => null ,
'header' => array (
'Connection' => 'close' ,
'User-Agent' => 'CakePHP'
),
'raw' => null ,
'cookies' => array ()
);
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* The default structure for storing the response
*
* @ var array
* @ access public
*/
var $response = array (
'raw' => array (
'status-line' => null ,
'header' => null ,
2008-06-20 20:17:23 +00:00
'body' => null ,
'response' => null
2008-05-30 11:40:08 +00:00
),
'status' => array (
'http-version' => null ,
'code' => null ,
'reason-phrase' => null
),
'header' => array (),
'body' => '' ,
2008-11-08 02:54:07 +00:00
'cookies' => array ()
2008-05-30 11:40:08 +00:00
);
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Default configuration settings for the HttpSocket
*
* @ var array
* @ access public
*/
var $config = array (
'persistent' => false ,
2010-01-25 16:01:05 +00:00
'host' => 'localhost' ,
'protocol' => 'tcp' ,
'port' => 80 ,
'timeout' => 30 ,
2008-05-30 11:40:08 +00:00
'request' => array (
'uri' => array (
'scheme' => 'http' ,
'host' => 'localhost' ,
'port' => 80
),
'auth' => array (
2009-02-11 23:46:59 +00:00
'method' => 'Basic' ,
2008-05-30 11:40:08 +00:00
'user' => null ,
'pass' => null
),
2008-11-08 02:54:07 +00:00
'cookies' => array ()
2008-05-30 11:40:08 +00:00
)
);
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* String that represents a line break .
*
* @ var string
* @ access public
*/
var $lineBreak = " \r \n " ;
/**
* Build an HTTP Socket using the specified configuration .
*
2010-01-25 16:01:05 +00:00
* You can use a url string to set the url and use default configurations for
* all other options :
*
* `$http =& new HttpSockect('http://cakephp.org/');`
*
* Or use an array to configure multiple options :
*
* {{{
* $http =& new HttpSocket ( array (
* 'host' => 'cakephp.org' ,
* 'timeout' => 20
* ));
* }}}
*
* See HttpSocket :: $config for options that can be used .
*
* @ param mixed $config Configuration information , either a string url or an array of options .
* @ access public
2008-05-30 11:40:08 +00:00
*/
function __construct ( $config = array ()) {
if ( is_string ( $config )) {
2009-05-07 18:49:21 +00:00
$this -> _configUri ( $config );
2008-05-30 11:40:08 +00:00
} elseif ( is_array ( $config )) {
if ( isset ( $config [ 'request' ][ 'uri' ]) && is_string ( $config [ 'request' ][ 'uri' ])) {
2009-05-07 18:49:21 +00:00
$this -> _configUri ( $config [ 'request' ][ 'uri' ]);
2008-05-30 11:40:08 +00:00
unset ( $config [ 'request' ][ 'uri' ]);
}
$this -> config = Set :: merge ( $this -> config , $config );
}
parent :: __construct ( $this -> config );
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
2010-01-25 16:01:05 +00:00
* Issue the specified request . HttpSocket :: get () and HttpSocket :: post () wrap this
* method and provide a more granular interface .
2008-05-30 11:40:08 +00:00
*
* @ param mixed $request Either an URI string , or an array defining host / uri
* @ return mixed false on error , request body on success
* @ access public
*/
function request ( $request = array ()) {
$this -> reset ( false );
if ( is_string ( $request )) {
$request = array ( 'uri' => $request );
} elseif ( ! is_array ( $request )) {
return false ;
}
if ( ! isset ( $request [ 'uri' ])) {
$request [ 'uri' ] = null ;
}
2009-05-07 18:49:21 +00:00
$uri = $this -> _parseUri ( $request [ 'uri' ]);
2010-07-07 02:30:48 +00:00
$hadAuth = false ;
if ( is_array ( $uri ) && array_key_exists ( 'user' , $uri )) {
$hadAuth = true ;
}
2008-05-30 11:40:08 +00:00
if ( ! isset ( $uri [ 'host' ])) {
$host = $this -> config [ 'host' ];
}
if ( isset ( $request [ 'host' ])) {
$host = $request [ 'host' ];
unset ( $request [ 'host' ]);
}
$request [ 'uri' ] = $this -> url ( $request [ 'uri' ]);
2009-05-07 18:49:21 +00:00
$request [ 'uri' ] = $this -> _parseUri ( $request [ 'uri' ], true );
2008-05-30 11:40:08 +00:00
$this -> request = Set :: merge ( $this -> request , $this -> config [ 'request' ], $request );
2010-07-07 02:30:48 +00:00
if ( ! $hadAuth && ! empty ( $this -> config [ 'request' ][ 'auth' ][ 'user' ])) {
$this -> request [ 'uri' ][ 'user' ] = $this -> config [ 'request' ][ 'auth' ][ 'user' ];
$this -> request [ 'uri' ][ 'pass' ] = $this -> config [ 'request' ][ 'auth' ][ 'pass' ];
}
2009-05-07 18:49:21 +00:00
$this -> _configUri ( $this -> request [ 'uri' ]);
2008-05-30 11:40:08 +00:00
if ( isset ( $host )) {
$this -> config [ 'host' ] = $host ;
}
$cookies = null ;
if ( is_array ( $this -> request [ 'header' ])) {
2009-05-07 18:49:21 +00:00
$this -> request [ 'header' ] = $this -> _parseHeader ( $this -> request [ 'header' ]);
2008-05-30 11:40:08 +00:00
if ( ! empty ( $this -> request [ 'cookies' ])) {
$cookies = $this -> buildCookies ( $this -> request [ 'cookies' ]);
}
2010-07-23 03:13:19 +00:00
$Host = $this -> request [ 'uri' ][ 'host' ];
$schema = '' ;
$port = 0 ;
if ( isset ( $this -> request [ 'uri' ][ 'schema' ])) {
$schema = $this -> request [ 'uri' ][ 'schema' ];
}
if ( isset ( $this -> request [ 'uri' ][ 'port' ])) {
$port = $this -> request [ 'uri' ][ 'port' ];
}
if (
( $schema === 'http' && $port != 80 ) ||
( $schema === 'https' && $port != 443 ) ||
( $port != 80 && $port != 443 )
) {
$Host .= ':' . $port ;
}
$this -> request [ 'header' ] = array_merge ( compact ( 'Host' ), $this -> request [ 'header' ]);
2008-05-30 11:40:08 +00:00
}
if ( isset ( $this -> request [ 'auth' ][ 'user' ]) && isset ( $this -> request [ 'auth' ][ 'pass' ])) {
2009-07-28 20:01:42 +00:00
$this -> request [ 'header' ][ 'Authorization' ] = $this -> request [ 'auth' ][ 'method' ] . " " . base64_encode ( $this -> request [ 'auth' ][ 'user' ] . " : " . $this -> request [ 'auth' ][ 'pass' ]);
2008-05-30 11:40:08 +00:00
}
if ( isset ( $this -> request [ 'uri' ][ 'user' ]) && isset ( $this -> request [ 'uri' ][ 'pass' ])) {
2009-07-28 20:01:42 +00:00
$this -> request [ 'header' ][ 'Authorization' ] = $this -> request [ 'auth' ][ 'method' ] . " " . base64_encode ( $this -> request [ 'uri' ][ 'user' ] . " : " . $this -> request [ 'uri' ][ 'pass' ]);
2008-05-30 11:40:08 +00:00
}
if ( is_array ( $this -> request [ 'body' ])) {
2009-05-07 18:49:21 +00:00
$this -> request [ 'body' ] = $this -> _httpSerialize ( $this -> request [ 'body' ]);
2008-05-30 11:40:08 +00:00
}
if ( ! empty ( $this -> request [ 'body' ]) && ! isset ( $this -> request [ 'header' ][ 'Content-Type' ])) {
$this -> request [ 'header' ][ 'Content-Type' ] = 'application/x-www-form-urlencoded' ;
}
if ( ! empty ( $this -> request [ 'body' ]) && ! isset ( $this -> request [ 'header' ][ 'Content-Length' ])) {
$this -> request [ 'header' ][ 'Content-Length' ] = strlen ( $this -> request [ 'body' ]);
}
2009-07-15 19:15:14 +00:00
$connectionType = null ;
if ( isset ( $this -> request [ 'header' ][ 'Connection' ])) {
$connectionType = $this -> request [ 'header' ][ 'Connection' ];
}
2009-07-20 16:31:56 +00:00
$this -> request [ 'header' ] = $this -> _buildHeader ( $this -> request [ 'header' ]) . $cookies ;
2008-05-30 11:40:08 +00:00
if ( empty ( $this -> request [ 'line' ])) {
2009-05-07 18:49:21 +00:00
$this -> request [ 'line' ] = $this -> _buildRequestLine ( $this -> request );
2008-05-30 11:40:08 +00:00
}
if ( $this -> quirksMode === false && $this -> request [ 'line' ] === false ) {
return $this -> response = false ;
}
if ( $this -> request [ 'line' ] !== false ) {
$this -> request [ 'raw' ] = $this -> request [ 'line' ];
}
if ( $this -> request [ 'header' ] !== false ) {
$this -> request [ 'raw' ] .= $this -> request [ 'header' ];
}
$this -> request [ 'raw' ] .= " \r \n " ;
$this -> request [ 'raw' ] .= $this -> request [ 'body' ];
$this -> write ( $this -> request [ 'raw' ]);
$response = null ;
while ( $data = $this -> read ()) {
$response .= $data ;
}
if ( $connectionType == 'close' ) {
$this -> disconnect ();
}
2009-05-07 18:49:21 +00:00
$this -> response = $this -> _parseResponse ( $response );
2008-05-30 11:40:08 +00:00
if ( ! empty ( $this -> response [ 'cookies' ])) {
$this -> config [ 'request' ][ 'cookies' ] = array_merge ( $this -> config [ 'request' ][ 'cookies' ], $this -> response [ 'cookies' ]);
}
return $this -> response [ 'body' ];
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Issues a GET request to the specified URI , query , and request .
*
2010-01-25 16:01:05 +00:00
* Using a string uri and an array of query string parameters :
*
* `$response = $http->get('http://google.com/search', array('q' => 'cakephp', 'client' => 'safari'));`
*
* Would do a GET request to `http://google.com/search?q=cakephp&client=safari`
*
* You could express the same thing using a uri array and query string parameters :
*
* {{{
* $response = $http -> get (
* array ( 'host' => 'google.com' , 'path' => '/search' ),
* array ( 'q' => 'cakephp' , 'client' => 'safari' )
* );
* }}}
*
* @ param mixed $uri URI to request . Either a string uri , or a uri array , see HttpSocket :: _parseUri ()
* @ param array $query Querystring parameters to append to URI
2008-05-30 11:40:08 +00:00
* @ param array $request An indexed array with indexes such as 'method' or uri
2010-01-25 16:01:05 +00:00
* @ return mixed Result of request , either false on failure or the response to the request .
2008-05-30 11:40:08 +00:00
* @ access public
*/
function get ( $uri = null , $query = array (), $request = array ()) {
if ( ! empty ( $query )) {
2010-01-25 16:01:05 +00:00
$uri = $this -> _parseUri ( $uri );
2008-05-30 11:40:08 +00:00
if ( isset ( $uri [ 'query' ])) {
$uri [ 'query' ] = array_merge ( $uri [ 'query' ], $query );
} else {
$uri [ 'query' ] = $query ;
}
2009-05-07 18:49:21 +00:00
$uri = $this -> _buildUri ( $uri );
2008-05-30 11:40:08 +00:00
}
$request = Set :: merge ( array ( 'method' => 'GET' , 'uri' => $uri ), $request );
return $this -> request ( $request );
}
/**
* Issues a POST request to the specified URI , query , and request .
*
2010-01-25 16:01:05 +00:00
* `post()` can be used to post simple data arrays to a url :
*
* {{{
* $response = $http -> post ( 'http://example.com' , array (
* 'username' => 'batman' ,
* 'password' => 'bruce_w4yne'
* ));
* }}}
*
* @ param mixed $uri URI to request . See HttpSocket :: _parseUri ()
* @ param array $data Array of POST data keys and values .
2008-05-30 11:40:08 +00:00
* @ param array $request An indexed array with indexes such as 'method' or uri
2010-01-25 16:01:05 +00:00
* @ return mixed Result of request , either false on failure or the response to the request .
2008-05-30 11:40:08 +00:00
* @ access public
*/
function post ( $uri = null , $data = array (), $request = array ()) {
$request = Set :: merge ( array ( 'method' => 'POST' , 'uri' => $uri , 'body' => $data ), $request );
return $this -> request ( $request );
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Issues a PUT request to the specified URI , query , and request .
*
2010-01-25 16:01:05 +00:00
* @ param mixed $uri URI to request , See HttpSocket :: _parseUri ()
* @ param array $data Array of PUT data keys and values .
2008-05-30 11:40:08 +00:00
* @ param array $request An indexed array with indexes such as 'method' or uri
* @ return mixed Result of request
* @ access public
*/
function put ( $uri = null , $data = array (), $request = array ()) {
$request = Set :: merge ( array ( 'method' => 'PUT' , 'uri' => $uri , 'body' => $data ), $request );
return $this -> request ( $request );
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Issues a DELETE request to the specified URI , query , and request .
*
2009-05-07 18:49:21 +00:00
* @ param mixed $uri URI to request ( see { @ link _parseUri ()})
2010-01-25 16:01:05 +00:00
* @ param array $data Query to append to URI
2008-05-30 11:40:08 +00:00
* @ param array $request An indexed array with indexes such as 'method' or uri
* @ return mixed Result of request
* @ access public
*/
function delete ( $uri = null , $data = array (), $request = array ()) {
$request = Set :: merge ( array ( 'method' => 'DELETE' , 'uri' => $uri , 'body' => $data ), $request );
return $this -> request ( $request );
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
2010-01-25 16:01:05 +00:00
* Normalizes urls into a $uriTemplate . If no template is provided
* a default one will be used . Will generate the url using the
* current config information .
*
* ### Usage:
*
* After configuring part of the request parameters , you can use url () to generate
* urls .
*
* {{{
* $http -> configUri ( 'http://www.cakephp.org' );
* $url = $http -> url ( '/search?q=bar' );
* }}}
*
* Would return `http://www.cakephp.org/search?q=bar`
*
* url () can also be used with custom templates :
*
* `$url = $http->url('http://www.cakephp/search?q=socket', '/%path?%query');`
*
* Would return `/search?q=socket` .
2008-05-30 11:40:08 +00:00
*
2010-01-25 16:01:05 +00:00
* @ param mixed $url Either a string or array of url options to create a url with .
* @ param string $uriTemplate A template string to use for url formatting .
* @ return mixed Either false on failure or a string containing the composed url .
2008-05-30 11:40:08 +00:00
* @ access public
*/
function url ( $url = null , $uriTemplate = null ) {
if ( is_null ( $url )) {
$url = '/' ;
}
if ( is_string ( $url )) {
if ( $url { 0 } == '/' ) {
$url = $this -> config [ 'request' ][ 'uri' ][ 'host' ] . ':' . $this -> config [ 'request' ][ 'uri' ][ 'port' ] . $url ;
}
if ( ! preg_match ( '/^.+:\/\/|\*|^\//' , $url )) {
$url = $this -> config [ 'request' ][ 'uri' ][ 'scheme' ] . '://' . $url ;
}
} elseif ( ! is_array ( $url ) && ! empty ( $url )) {
return false ;
}
$base = array_merge ( $this -> config [ 'request' ][ 'uri' ], array ( 'scheme' => array ( 'http' , 'https' ), 'port' => array ( 80 , 443 )));
2009-05-07 18:49:21 +00:00
$url = $this -> _parseUri ( $url , $base );
2008-05-30 11:40:08 +00:00
if ( empty ( $url )) {
$url = $this -> config [ 'request' ][ 'uri' ];
}
if ( ! empty ( $uriTemplate )) {
2009-05-07 18:49:21 +00:00
return $this -> _buildUri ( $url , $uriTemplate );
2008-05-30 11:40:08 +00:00
}
2009-05-07 18:49:21 +00:00
return $this -> _buildUri ( $url );
2008-05-30 11:40:08 +00:00
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Parses the given message and breaks it down in parts .
*
* @ param string $message Message to parse
* @ return array Parsed message ( with indexed elements such as raw , status , header , body )
* @ access protected
*/
2009-05-07 18:49:21 +00:00
function _parseResponse ( $message ) {
2008-05-30 11:40:08 +00:00
if ( is_array ( $message )) {
return $message ;
} elseif ( ! is_string ( $message )) {
return false ;
}
static $responseTemplate ;
if ( empty ( $responseTemplate )) {
$classVars = get_class_vars ( __CLASS__ );
$responseTemplate = $classVars [ 'response' ];
}
$response = $responseTemplate ;
if ( ! preg_match ( " /^(.+ \r \n )(.*)(?<= \r \n ) \r \n /Us " , $message , $match )) {
return false ;
}
list ( $null , $response [ 'raw' ][ 'status-line' ], $response [ 'raw' ][ 'header' ]) = $match ;
$response [ 'raw' ][ 'response' ] = $message ;
$response [ 'raw' ][ 'body' ] = substr ( $message , strlen ( $match [ 0 ]));
if ( preg_match ( " /(.+) ([0-9] { 3}) (.+) \r \n /DU " , $response [ 'raw' ][ 'status-line' ], $match )) {
$response [ 'status' ][ 'http-version' ] = $match [ 1 ];
$response [ 'status' ][ 'code' ] = ( int ) $match [ 2 ];
$response [ 'status' ][ 'reason-phrase' ] = $match [ 3 ];
}
2009-05-07 18:49:21 +00:00
$response [ 'header' ] = $this -> _parseHeader ( $response [ 'raw' ][ 'header' ]);
2009-07-15 19:15:14 +00:00
$transferEncoding = null ;
if ( isset ( $response [ 'header' ][ 'Transfer-Encoding' ])) {
$transferEncoding = $response [ 'header' ][ 'Transfer-Encoding' ];
}
2009-07-20 16:31:56 +00:00
$decoded = $this -> _decodeBody ( $response [ 'raw' ][ 'body' ], $transferEncoding );
2008-05-30 11:40:08 +00:00
$response [ 'body' ] = $decoded [ 'body' ];
if ( ! empty ( $decoded [ 'header' ])) {
2009-05-07 18:49:21 +00:00
$response [ 'header' ] = $this -> _parseHeader ( $this -> _buildHeader ( $response [ 'header' ]) . $this -> _buildHeader ( $decoded [ 'header' ]));
2008-05-30 11:40:08 +00:00
}
if ( ! empty ( $response [ 'header' ])) {
$response [ 'cookies' ] = $this -> parseCookies ( $response [ 'header' ]);
}
foreach ( $response [ 'raw' ] as $field => $val ) {
if ( $val === '' ) {
$response [ 'raw' ][ $field ] = null ;
}
}
return $response ;
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Generic function to decode a $body with a given $encoding . Returns either an array with the keys
* 'body' and 'header' or false on failure .
*
2010-01-25 16:01:05 +00:00
* @ param string $body A string continaing the body to decode .
* @ param mixed $encoding Can be false in case no encoding is being used , or a string representing the encoding .
* @ return mixed Array of response headers and body or false .
2008-05-30 11:40:08 +00:00
* @ access protected
*/
2009-05-07 18:49:21 +00:00
function _decodeBody ( $body , $encoding = 'chunked' ) {
2008-05-30 11:40:08 +00:00
if ( ! is_string ( $body )) {
return false ;
}
if ( empty ( $encoding )) {
return array ( 'body' => $body , 'header' => false );
}
2009-08-31 14:36:31 +00:00
$decodeMethod = '_decode' . Inflector :: camelize ( str_replace ( '-' , '_' , $encoding )) . 'Body' ;
2008-05-30 11:40:08 +00:00
if ( ! is_callable ( array ( & $this , $decodeMethod ))) {
if ( ! $this -> quirksMode ) {
2009-05-07 18:49:21 +00:00
trigger_error ( sprintf ( __ ( 'HttpSocket::_decodeBody - Unknown encoding: %s. Activate quirks mode to surpress error.' , true ), h ( $encoding )), E_USER_WARNING );
2008-05-30 11:40:08 +00:00
}
return array ( 'body' => $body , 'header' => false );
}
return $this -> { $decodeMethod }( $body );
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Decodes a chunked message $body and returns either an array with the keys 'body' and 'header' or false as
* a result .
*
2010-01-25 16:01:05 +00:00
* @ param string $body A string continaing the chunked body to decode .
* @ return mixed Array of response headers and body or false .
2008-05-30 11:40:08 +00:00
* @ access protected
*/
2009-05-07 18:49:21 +00:00
function _decodeChunkedBody ( $body ) {
2008-05-30 11:40:08 +00:00
if ( ! is_string ( $body )) {
return false ;
}
$decodedBody = null ;
$chunkLength = null ;
while ( $chunkLength !== 0 ) {
if ( ! preg_match ( " /^([0-9a-f]+) *(?:;(.+)=(.+))? \r \n /iU " , $body , $match )) {
if ( ! $this -> quirksMode ) {
2009-05-07 18:49:21 +00:00
trigger_error ( __ ( 'HttpSocket::_decodeChunkedBody - Could not parse malformed chunk. Activate quirks mode to do this.' , true ), E_USER_WARNING );
2008-05-30 11:40:08 +00:00
return false ;
}
break ;
}
$chunkSize = 0 ;
$hexLength = 0 ;
$chunkExtensionName = '' ;
$chunkExtensionValue = '' ;
if ( isset ( $match [ 0 ])) {
$chunkSize = $match [ 0 ];
}
if ( isset ( $match [ 1 ])) {
$hexLength = $match [ 1 ];
}
if ( isset ( $match [ 2 ])) {
$chunkExtensionName = $match [ 2 ];
}
if ( isset ( $match [ 3 ])) {
$chunkExtensionValue = $match [ 3 ];
}
$body = substr ( $body , strlen ( $chunkSize ));
$chunkLength = hexdec ( $hexLength );
$chunk = substr ( $body , 0 , $chunkLength );
if ( ! empty ( $chunkExtensionName )) {
/**
* @ todo See if there are popular chunk extensions we should implement
*/
}
$decodedBody .= $chunk ;
if ( $chunkLength !== 0 ) {
$body = substr ( $body , $chunkLength + strlen ( " \r \n " ));
}
}
$entityHeader = false ;
if ( ! empty ( $body )) {
2009-05-07 18:49:21 +00:00
$entityHeader = $this -> _parseHeader ( $body );
2008-05-30 11:40:08 +00:00
}
return array ( 'body' => $decodedBody , 'header' => $entityHeader );
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Parses and sets the specified URI into current request configuration .
*
2010-01-25 16:01:05 +00:00
* @ param mixed $uri URI , See HttpSocket :: _parseUri ()
2008-05-30 11:40:08 +00:00
* @ return array Current configuration settings
* @ access protected
*/
2009-05-07 18:49:21 +00:00
function _configUri ( $uri = null ) {
2008-05-30 11:40:08 +00:00
if ( empty ( $uri )) {
return false ;
}
if ( is_array ( $uri )) {
2009-05-07 18:49:21 +00:00
$uri = $this -> _parseUri ( $uri );
2008-05-30 11:40:08 +00:00
} else {
2009-05-07 18:49:21 +00:00
$uri = $this -> _parseUri ( $uri , true );
2008-05-30 11:40:08 +00:00
}
if ( ! isset ( $uri [ 'host' ])) {
return false ;
}
$config = array (
'request' => array (
'uri' => array_intersect_key ( $uri , $this -> config [ 'request' ][ 'uri' ]),
'auth' => array_intersect_key ( $uri , $this -> config [ 'request' ][ 'auth' ])
)
);
$this -> config = Set :: merge ( $this -> config , $config );
$this -> config = Set :: merge ( $this -> config , array_intersect_key ( $this -> config [ 'request' ][ 'uri' ], $this -> config ));
return $this -> config ;
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Takes a $uri array and turns it into a fully qualified URL string
*
2010-01-25 16:01:05 +00:00
* @ param mixed $uri Either A $uri array , or a request string . Will use $this -> config if left empty .
* @ param string $uriTemplate The Uri template / format to use .
* @ return mixed A fully qualified URL formated according to $uriTemplate , or false on failure
2008-05-30 11:40:08 +00:00
* @ access protected
*/
2009-05-07 18:49:21 +00:00
function _buildUri ( $uri = array (), $uriTemplate = '%scheme://%user:%pass@%host:%port/%path?%query#%fragment' ) {
2008-05-30 11:40:08 +00:00
if ( is_string ( $uri )) {
$uri = array ( 'host' => $uri );
}
2009-05-07 18:49:21 +00:00
$uri = $this -> _parseUri ( $uri , true );
2008-05-30 11:40:08 +00:00
if ( ! is_array ( $uri ) || empty ( $uri )) {
return false ;
}
$uri [ 'path' ] = preg_replace ( '/^\//' , null , $uri [ 'path' ]);
2009-05-07 18:49:21 +00:00
$uri [ 'query' ] = $this -> _httpSerialize ( $uri [ 'query' ]);
2008-05-30 11:40:08 +00:00
$stripIfEmpty = array (
'query' => '?%query' ,
'fragment' => '#%fragment' ,
2009-11-13 19:42:40 +00:00
'user' => '%user:%pass@' ,
'host' => '%host:%port/'
2008-05-30 11:40:08 +00:00
);
foreach ( $stripIfEmpty as $key => $strip ) {
if ( empty ( $uri [ $key ])) {
$uriTemplate = str_replace ( $strip , null , $uriTemplate );
}
}
$defaultPorts = array ( 'http' => 80 , 'https' => 443 );
if ( array_key_exists ( $uri [ 'scheme' ], $defaultPorts ) && $defaultPorts [ $uri [ 'scheme' ]] == $uri [ 'port' ]) {
$uriTemplate = str_replace ( ':%port' , null , $uriTemplate );
}
foreach ( $uri as $property => $value ) {
$uriTemplate = str_replace ( '%' . $property , $value , $uriTemplate );
}
if ( $uriTemplate === '/*' ) {
$uriTemplate = '*' ;
}
return $uriTemplate ;
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Parses the given URI and breaks it down into pieces as an indexed array with elements
* such as 'scheme' , 'port' , 'query' .
*
* @ param string $uri URI to parse
* @ param mixed $base If true use default URI config , otherwise indexed array to set 'scheme' , 'host' , 'port' , etc .
* @ return array Parsed URI
* @ access protected
*/
2009-05-07 18:49:21 +00:00
function _parseUri ( $uri = null , $base = array ()) {
2008-05-30 11:40:08 +00:00
$uriBase = array (
'scheme' => array ( 'http' , 'https' ),
'host' => null ,
'port' => array ( 80 , 443 ),
'user' => null ,
'pass' => null ,
'path' => '/' ,
'query' => null ,
'fragment' => null
);
if ( is_string ( $uri )) {
$uri = parse_url ( $uri );
}
if ( ! is_array ( $uri ) || empty ( $uri )) {
return false ;
}
if ( $base === true ) {
$base = $uriBase ;
}
if ( isset ( $base [ 'port' ], $base [ 'scheme' ]) && is_array ( $base [ 'port' ]) && is_array ( $base [ 'scheme' ])) {
if ( isset ( $uri [ 'scheme' ]) && ! isset ( $uri [ 'port' ])) {
$base [ 'port' ] = $base [ 'port' ][ array_search ( $uri [ 'scheme' ], $base [ 'scheme' ])];
} elseif ( isset ( $uri [ 'port' ]) && ! isset ( $uri [ 'scheme' ])) {
$base [ 'scheme' ] = $base [ 'scheme' ][ array_search ( $uri [ 'port' ], $base [ 'port' ])];
}
}
if ( is_array ( $base ) && ! empty ( $base )) {
$uri = array_merge ( $base , $uri );
}
if ( isset ( $uri [ 'scheme' ]) && is_array ( $uri [ 'scheme' ])) {
$uri [ 'scheme' ] = array_shift ( $uri [ 'scheme' ]);
}
if ( isset ( $uri [ 'port' ]) && is_array ( $uri [ 'port' ])) {
$uri [ 'port' ] = array_shift ( $uri [ 'port' ]);
}
if ( array_key_exists ( 'query' , $uri )) {
2009-05-07 18:49:21 +00:00
$uri [ 'query' ] = $this -> _parseQuery ( $uri [ 'query' ]);
2008-05-30 11:40:08 +00:00
}
if ( ! array_intersect_key ( $uriBase , $uri )) {
return false ;
}
return $uri ;
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* This function can be thought of as a reverse to PHP5 ' s http_build_query () . It takes a given query string and turns it into an array and
* supports nesting by using the php bracket syntax . So this menas you can parse queries like :
*
* - ? key [ subKey ] = value
* - ? key [] = value1 & key [] = value2
*
2010-01-25 16:01:05 +00:00
* A leading '?' mark in $query is optional and does not effect the outcome of this function .
* For the complete capabilities of this implementation take a look at HttpSocketTest :: testparseQuery ()
2008-05-30 11:40:08 +00:00
*
* @ param mixed $query A query string to parse into an array or an array to return directly " as is "
2010-01-25 16:01:05 +00:00
* @ return array The $query parsed into a possibly multi - level array . If an empty $query is
* given , an empty array is returned .
2008-05-30 11:40:08 +00:00
* @ access protected
*/
2009-05-07 18:49:21 +00:00
function _parseQuery ( $query ) {
2008-05-30 11:40:08 +00:00
if ( is_array ( $query )) {
return $query ;
}
$parsedQuery = array ();
if ( is_string ( $query ) && ! empty ( $query )) {
$query = preg_replace ( '/^\?/' , '' , $query );
$items = explode ( '&' , $query );
foreach ( $items as $item ) {
if ( strpos ( $item , '=' ) !== false ) {
2009-10-30 00:14:36 +00:00
list ( $key , $value ) = explode ( '=' , $item , 2 );
2008-05-30 11:40:08 +00:00
} else {
$key = $item ;
$value = null ;
}
$key = urldecode ( $key );
$value = urldecode ( $value );
if ( preg_match_all ( '/\[([^\[\]]*)\]/iUs' , $key , $matches )) {
$subKeys = $matches [ 1 ];
$rootKey = substr ( $key , 0 , strpos ( $key , '[' ));
if ( ! empty ( $rootKey )) {
array_unshift ( $subKeys , $rootKey );
}
$queryNode =& $parsedQuery ;
foreach ( $subKeys as $subKey ) {
if ( ! is_array ( $queryNode )) {
$queryNode = array ();
}
if ( $subKey === '' ) {
$queryNode [] = array ();
end ( $queryNode );
$subKey = key ( $queryNode );
}
$queryNode =& $queryNode [ $subKey ];
}
$queryNode = $value ;
} else {
$parsedQuery [ $key ] = $value ;
}
}
}
return $parsedQuery ;
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Builds a request line according to HTTP / 1.1 specs . Activate quirks mode to work outside specs .
*
* @ param array $request Needs to contain a 'uri' key . Should also contain a 'method' key , otherwise defaults to GET .
* @ param string $versionToken The version token to use , defaults to HTTP / 1.1
* @ return string Request line
* @ access protected
*/
2009-05-07 18:49:21 +00:00
function _buildRequestLine ( $request = array (), $versionToken = 'HTTP/1.1' ) {
2008-05-30 11:40:08 +00:00
$asteriskMethods = array ( 'OPTIONS' );
if ( is_string ( $request )) {
$isValid = preg_match ( " /(.+) (.+) (.+) \r \n /U " , $request , $match );
if ( ! $this -> quirksMode && ( ! $isValid || ( $match [ 2 ] == '*' && ! in_array ( $match [ 3 ], $asteriskMethods )))) {
2009-05-07 18:49:21 +00:00
trigger_error ( __ ( 'HttpSocket::_buildRequestLine - Passed an invalid request line string. Activate quirks mode to do this.' , true ), E_USER_WARNING );
2008-05-30 11:40:08 +00:00
return false ;
}
return $request ;
} elseif ( ! is_array ( $request )) {
return false ;
} elseif ( ! array_key_exists ( 'uri' , $request )) {
return false ;
}
2009-05-07 18:49:21 +00:00
$request [ 'uri' ] = $this -> _parseUri ( $request [ 'uri' ]);
2008-05-30 11:40:08 +00:00
$request = array_merge ( array ( 'method' => 'GET' ), $request );
2009-05-07 18:49:21 +00:00
$request [ 'uri' ] = $this -> _buildUri ( $request [ 'uri' ], '/%path?%query' );
2008-05-30 11:40:08 +00:00
if ( ! $this -> quirksMode && $request [ 'uri' ] === '*' && ! in_array ( $request [ 'method' ], $asteriskMethods )) {
2009-05-07 18:49:21 +00:00
trigger_error ( sprintf ( __ ( 'HttpSocket::_buildRequestLine - The "*" asterisk character is only allowed for the following methods: %s. Activate quirks mode to work outside of HTTP/1.1 specs.' , true ), join ( ',' , $asteriskMethods )), E_USER_WARNING );
2008-05-30 11:40:08 +00:00
return false ;
}
return $request [ 'method' ] . ' ' . $request [ 'uri' ] . ' ' . $versionToken . $this -> lineBreak ;
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Serializes an array for transport .
*
* @ param array $data Data to serialize
* @ return string Serialized variable
* @ access protected
*/
2009-05-07 18:49:21 +00:00
function _httpSerialize ( $data = array ()) {
2008-05-30 11:40:08 +00:00
if ( is_string ( $data )) {
return $data ;
}
if ( empty ( $data ) || ! is_array ( $data )) {
return false ;
}
return substr ( Router :: queryString ( $data ), 1 );
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Builds the header .
*
* @ param array $header Header to build
* @ return string Header built from array
* @ access protected
*/
2009-05-07 18:49:21 +00:00
function _buildHeader ( $header , $mode = 'standard' ) {
2008-05-30 11:40:08 +00:00
if ( is_string ( $header )) {
return $header ;
} elseif ( ! is_array ( $header )) {
return false ;
}
$returnHeader = '' ;
foreach ( $header as $field => $contents ) {
if ( is_array ( $contents ) && $mode == 'standard' ) {
2009-11-19 22:13:35 +00:00
$contents = implode ( ',' , $contents );
2008-05-30 11:40:08 +00:00
}
foreach (( array ) $contents as $content ) {
$contents = preg_replace ( " / \r \n (?![ \t ])/ " , " \r \n " , $content );
2009-05-07 18:49:21 +00:00
$field = $this -> _escapeToken ( $field );
2008-05-30 11:40:08 +00:00
$returnHeader .= $field . ': ' . $contents . $this -> lineBreak ;
}
}
return $returnHeader ;
}
/**
* Parses an array based header .
*
* @ param array $header Header as an indexed array ( field => value )
* @ return array Parsed header
* @ access protected
*/
2009-05-07 18:49:21 +00:00
function _parseHeader ( $header ) {
2008-05-30 11:40:08 +00:00
if ( is_array ( $header )) {
foreach ( $header as $field => $value ) {
unset ( $header [ $field ]);
$field = strtolower ( $field );
preg_match_all ( '/(?:^|(?<=-))[a-z]/U' , $field , $offsets , PREG_OFFSET_CAPTURE );
foreach ( $offsets [ 0 ] as $offset ) {
$field = substr_replace ( $field , strtoupper ( $offset [ 0 ]), $offset [ 1 ], 1 );
}
$header [ $field ] = $value ;
}
return $header ;
} elseif ( ! is_string ( $header )) {
return false ;
}
2009-07-28 20:01:42 +00:00
preg_match_all ( " /(.+):(.+)(?:(?<![ \t ]) " . $this -> lineBreak . " | \$ )/Uis " , $header , $matches , PREG_SET_ORDER );
2008-05-30 11:40:08 +00:00
$header = array ();
foreach ( $matches as $match ) {
list (, $field , $value ) = $match ;
$value = trim ( $value );
$value = preg_replace ( " /[ \t ] \r \n / " , " \r \n " , $value );
2009-05-07 18:49:21 +00:00
$field = $this -> _unescapeToken ( $field );
2008-05-30 11:40:08 +00:00
$field = strtolower ( $field );
preg_match_all ( '/(?:^|(?<=-))[a-z]/U' , $field , $offsets , PREG_OFFSET_CAPTURE );
foreach ( $offsets [ 0 ] as $offset ) {
$field = substr_replace ( $field , strtoupper ( $offset [ 0 ]), $offset [ 1 ], 1 );
}
if ( ! isset ( $header [ $field ])) {
$header [ $field ] = $value ;
} else {
$header [ $field ] = array_merge (( array ) $header [ $field ], ( array ) $value );
}
}
return $header ;
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
2010-01-25 16:01:05 +00:00
* Parses cookies in response headers .
2008-05-30 11:40:08 +00:00
*
2010-01-25 16:01:05 +00:00
* @ param array $header Header array containing one ore more 'Set-Cookie' headers .
* @ return mixed Either false on no cookies , or an array of cookies recieved .
2008-05-30 11:40:08 +00:00
* @ access public
* @ todo Make this 100 % RFC 2965 confirm
*/
function parseCookies ( $header ) {
if ( ! isset ( $header [ 'Set-Cookie' ])) {
return false ;
}
$cookies = array ();
foreach (( array ) $header [ 'Set-Cookie' ] as $cookie ) {
2009-08-02 06:47:28 +00:00
if ( strpos ( $cookie , '";"' ) !== false ) {
$cookie = str_replace ( '";"' , " { __cookie_replace__} " , $cookie );
2009-11-19 22:16:26 +00:00
$parts = str_replace ( " { __cookie_replace__} " , '";"' , explode ( ';' , $cookie ));
2009-08-02 06:47:28 +00:00
} else {
$parts = preg_split ( '/\;[ \t]*/' , $cookie );
}
2009-05-04 19:53:39 +00:00
list ( $name , $value ) = explode ( '=' , array_shift ( $parts ), 2 );
2008-05-30 11:40:08 +00:00
$cookies [ $name ] = compact ( 'value' );
2009-08-02 06:47:28 +00:00
2008-05-30 11:40:08 +00:00
foreach ( $parts as $part ) {
if ( strpos ( $part , '=' ) !== false ) {
list ( $key , $value ) = explode ( '=' , $part );
} else {
$key = $part ;
$value = true ;
}
$key = strtolower ( $key );
if ( ! isset ( $cookies [ $name ][ $key ])) {
$cookies [ $name ][ $key ] = $value ;
}
}
}
return $cookies ;
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
2010-01-25 16:01:05 +00:00
* Builds cookie headers for a request .
2008-05-30 11:40:08 +00:00
*
2010-01-25 16:01:05 +00:00
* @ param array $cookies Array of cookies to send with the request .
* @ return string Cookie header string to be sent with the request .
2008-05-30 11:40:08 +00:00
* @ access public
* @ todo Refactor token escape mechanism to be configurable
*/
function buildCookies ( $cookies ) {
$header = array ();
foreach ( $cookies as $name => $cookie ) {
2009-05-07 18:49:21 +00:00
$header [] = $name . '=' . $this -> _escapeToken ( $cookie [ 'value' ], array ( ';' ));
2008-05-30 11:40:08 +00:00
}
2010-06-23 03:10:21 +00:00
$header = $this -> _buildHeader ( array ( 'Cookie' => implode ( '; ' , $header )), 'pragmatic' );
2008-05-30 11:40:08 +00:00
return $header ;
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Unescapes a given $token according to RFC 2616 ( HTTP 1.1 specs )
*
* @ param string $token Token to unescape
* @ return string Unescaped token
* @ access protected
* @ todo Test $chars parameter
*/
2009-05-07 18:49:21 +00:00
function _unescapeToken ( $token , $chars = null ) {
$regex = '/"([' . join ( '' , $this -> _tokenEscapeChars ( true , $chars )) . '])"/' ;
2008-05-30 11:40:08 +00:00
$token = preg_replace ( $regex , '\\1' , $token );
return $token ;
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Escapes a given $token according to RFC 2616 ( HTTP 1.1 specs )
*
* @ param string $token Token to escape
* @ return string Escaped token
* @ access protected
* @ todo Test $chars parameter
*/
2009-05-07 18:49:21 +00:00
function _escapeToken ( $token , $chars = null ) {
$regex = '/([' . join ( '' , $this -> _tokenEscapeChars ( true , $chars )) . '])/' ;
2008-05-30 11:40:08 +00:00
$token = preg_replace ( $regex , '"\\1"' , $token );
return $token ;
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Gets escape chars according to RFC 2616 ( HTTP 1.1 specs ) .
*
* @ param boolean $hex true to get them as HEX values , false otherwise
* @ return array Escape chars
2009-05-07 18:49:21 +00:00
* @ access protected
2008-05-30 11:40:08 +00:00
* @ todo Test $chars parameter
*/
2009-05-07 18:49:21 +00:00
function _tokenEscapeChars ( $hex = true , $chars = null ) {
2008-05-30 11:40:08 +00:00
if ( ! empty ( $chars )) {
$escape = $chars ;
} else {
$escape = array ( '"' , " ( " , " ) " , " < " , " > " , " @ " , " , " , " ; " , " : " , " \\ " , " / " , " [ " , " ] " , " ? " , " = " , " { " , " } " , " " );
for ( $i = 0 ; $i <= 31 ; $i ++ ) {
$escape [] = chr ( $i );
}
$escape [] = chr ( 127 );
}
if ( $hex == false ) {
return $escape ;
}
$regexChars = '' ;
foreach ( $escape as $key => $char ) {
$escape [ $key ] = '\\x' . str_pad ( dechex ( ord ( $char )), 2 , '0' , STR_PAD_LEFT );
}
return $escape ;
}
2009-07-24 19:18:37 +00:00
2008-05-30 11:40:08 +00:00
/**
* Resets the state of this HttpSocket instance to it ' s initial state ( before Object :: __construct got executed ) or does
* the same thing partially for the request and the response property only .
*
* @ param boolean $full If set to false only HttpSocket :: response and HttpSocket :: request are reseted
* @ return boolean True on success
* @ access public
*/
function reset ( $full = true ) {
static $initalState = array ();
if ( empty ( $initalState )) {
$initalState = get_class_vars ( __CLASS__ );
}
if ( $full == false ) {
$this -> request = $initalState [ 'request' ];
$this -> response = $initalState [ 'response' ];
return true ;
}
parent :: reset ( $initalState );
return true ;
}
}