2007-02-20 20:06:55 +00:00
< ? php
/* SVN FILE: $Id$ */
/**
* HTTP Socket connection class .
*
* PHP versions 4 and 5
*
* CakePHP ( tm ) : Rapid Development Framework < http :// www . cakephp . org />
* Copyright 2005 - 2007 , Cake Software Foundation , Inc .
* 1785 E . Sahara Avenue , Suite 490 - 204
* Las Vegas , Nevada 89104
*
* Licensed under The MIT License
* Redistributions of files must retain the above copyright notice .
*
* @ filesource
* @ copyright Copyright 2005 - 2007 , Cake Software Foundation , Inc .
* @ link http :// www . cakefoundation . org / projects / info / cakephp CakePHP ( tm ) Project
* @ package cake
* @ subpackage cake . cake . libs
* @ since CakePHP ( tm ) v 1.2 . 0
* @ version $Revision $
* @ modifiedby $LastChangedBy $
* @ lastmodified $Date $
* @ license http :// www . opensource . org / licenses / mit - license . php The MIT License
*/
2007-04-10 22:56:07 +00:00
uses ( 'socket' , 'set' );
2007-02-20 20:06:55 +00:00
/**
* Cake network socket connection class .
*
2007-07-19 13:38:26 +00:00
* Core base class for HTTP network communication .
2007-02-20 20:06:55 +00:00
*
* @ package cake
* @ subpackage cake . cake . libs
*/
class HttpSocket extends CakeSocket {
/**
* Object description
*
* @ var string
2007-05-22 02:38:12 +00:00
* @ access public
2007-02-20 20:06:55 +00:00
*/
var $description = 'HTTP-based DataSource Interface' ;
2007-05-20 16:40:26 +00:00
2007-05-15 19:59:59 +00:00
/**
* When one activates the $quirksMode by setting it to true , all checks meant to enforce RFC 2616 ( HTTP / 1.1 specs )
* will be disabled and additional measures to deal with non - standard responses will be enabled .
*
* @ var boolean
2007-05-22 02:38:12 +00:00
* @ access public
2007-05-15 19:59:59 +00:00
*/
var $quirksMode = false ;
2007-02-20 20:06:55 +00:00
/**
2007-04-10 22:56:07 +00:00
* The default values to use for a request
2007-02-20 20:06:55 +00:00
*
* @ var array
2007-05-22 02:38:12 +00:00
* @ access public
2007-02-20 20:06:55 +00:00
*/
2007-04-10 22:56:07 +00:00
var $request = array (
2007-05-15 19:59:59 +00:00
'method' => 'GET' ,
'uri' => array (
'scheme' => 'http' ,
2007-04-10 22:56:07 +00:00
'host' => null ,
'port' => 80 ,
2007-05-15 19:59:59 +00:00
'user' => null ,
'pass' => null ,
'path' => null ,
'query' => null ,
'fragment' => null
),
'auth' => array (
'method' => 'basic' ,
'user' => null ,
'pass' => null
),
'version' => '1.1' ,
'body' => '' ,
'line' => null ,
'header' => array (
'Connection' => 'close' ,
'User-Agent' => 'CakePHP'
),
2007-11-20 17:19:20 +00:00
'raw' => null ,
'cookies' => array ()
2007-05-15 19:59:59 +00:00
);
2007-02-20 20:06:55 +00:00
/**
2007-05-15 19:59:59 +00:00
* The default structure for storing the response
*
* @ var array
2007-05-22 02:38:12 +00:00
* @ access public
2007-05-15 19:59:59 +00:00
*/
2007-04-10 22:56:07 +00:00
var $response = array (
2007-05-15 19:59:59 +00:00
'raw' => array (
'status-line' => null ,
'header' => null ,
'body' => null ,
'response' => null
),
'status' => array (
'http-version' => null ,
'code' => null ,
'reason-phrase' => null
),
'header' => array (),
2007-11-20 17:19:20 +00:00
'body' => '' ,
'cookies' => array (),
2007-04-10 22:56:07 +00:00
);
2007-02-20 20:06:55 +00:00
/**
2007-05-15 19:59:59 +00:00
* Default configuration settings for the HttpSocket
2007-02-20 20:06:55 +00:00
*
* @ var array
2007-05-22 02:38:12 +00:00
* @ access public
2007-02-20 20:06:55 +00:00
*/
2007-05-15 19:59:59 +00:00
var $config = array (
'persistent' => false ,
'host' => 'localhost' ,
'protocol' => 'tcp' ,
'port' => 80 ,
'timeout' => 30 ,
'request' => array (
'uri' => array (
'scheme' => 'http' ,
'host' => 'localhost' ,
'port' => 80
),
'auth' => array (
'method' => 'basic' ,
'user' => null ,
'pass' => null
2007-11-20 17:19:20 +00:00
),
'cookies' => array (),
2007-05-15 19:59:59 +00:00
)
2007-02-20 20:06:55 +00:00
);
2007-05-15 19:59:59 +00:00
2007-02-20 20:06:55 +00:00
/**
2007-05-20 16:40:26 +00:00
* String that represents a line break .
2007-02-20 20:06:55 +00:00
*
2007-05-20 16:40:26 +00:00
* @ var string
2007-05-22 02:38:12 +00:00
* @ access public
2007-02-20 20:06:55 +00:00
*/
2007-05-15 19:59:59 +00:00
var $lineBreak = " \r \n " ;
2007-05-20 16:40:26 +00:00
/**
* Build an HTTP Socket using the specified configuration .
*
* @ param array $config Configuration
*/
2007-02-20 20:06:55 +00:00
function __construct ( $config = array ()) {
2007-04-10 22:56:07 +00:00
if ( is_string ( $config )) {
2007-05-15 19:59:59 +00:00
$this -> configUri ( $config );
} elseif ( is_array ( $config )) {
$this -> config = Set :: merge ( $this -> config , $config );
2007-02-20 20:06:55 +00:00
}
2007-05-15 19:59:59 +00:00
parent :: __construct ( $this -> config );
2007-02-20 20:06:55 +00:00
}
2007-05-15 19:59:59 +00:00
2007-05-20 16:40:26 +00:00
/**
* Issue the specified request .
*
* @ param mixed $request Either an URI string , or an array defining host / uri
* @ return mixed false on error , request body on success
* @ access public
*/
2007-05-15 19:59:59 +00:00
function request ( $request = array ()) {
$this -> reset ( false );
if ( is_string ( $request )) {
$request = array ( 'uri' => $request );
} elseif ( ! is_array ( $request )) {
return false ;
}
2007-11-18 16:51:11 +00:00
if ( ! isset ( $request [ 'uri' ])) {
$request [ 'uri' ] = null ;
}
$uri = $this -> parseUri ( $request [ 'uri' ]);
if ( ! isset ( $uri [ 'host' ])) {
$host = $this -> config [ 'host' ];
}
2007-05-15 19:59:59 +00:00
if ( isset ( $request [ 'host' ])) {
$host = $request [ 'host' ];
unset ( $request [ 'host' ]);
}
2007-11-18 16:51:11 +00:00
$request [ 'uri' ] = $this -> url ( $request [ 'uri' ]);
$request [ 'uri' ] = $this -> parseUri ( $request [ 'uri' ], true );
2007-05-15 19:59:59 +00:00
$this -> request = Set :: merge ( $this -> request , $this -> config [ 'request' ], $request );
$this -> configUri ( $this -> request [ 'uri' ]);
if ( isset ( $host )) {
$this -> config [ 'host' ] = $host ;
}
2007-11-20 17:19:20 +00:00
$cookies = null ;
2007-05-15 19:59:59 +00:00
if ( is_array ( $this -> request [ 'header' ])) {
$this -> request [ 'header' ] = $this -> parseHeader ( $this -> request [ 'header' ]);
2007-11-20 17:19:20 +00:00
if ( ! empty ( $this -> request [ 'cookies' ])) {
$cookies = $this -> buildCookies ( $this -> request [ 'cookies' ]);
}
2007-12-08 06:08:03 +00:00
$this -> request [ 'header' ] = array_merge ( array ( 'Host' => $this -> request [ 'uri' ][ 'host' ]), $this -> request [ 'header' ]);
2007-05-20 16:40:26 +00:00
}
2007-05-15 19:59:59 +00:00
if ( is_array ( $this -> request [ 'body' ])) {
$this -> request [ 'body' ] = $this -> httpSerialize ( $this -> request [ 'body' ]);
}
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' ]);
}
2007-11-20 17:19:20 +00:00
$connectionType = @ $this -> request [ 'header' ][ 'Connection' ];
$this -> request [ 'header' ] = $this -> buildHeader ( $this -> request [ 'header' ]) . $cookies ;
2007-05-15 19:59:59 +00:00
if ( empty ( $this -> request [ 'line' ])) {
$this -> request [ 'line' ] = $this -> buildRequestLine ( $this -> request );
}
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 ;
}
2007-11-20 17:19:20 +00:00
if ( $connectionType == 'close' ) {
$this -> disconnect ();
}
2007-05-15 19:59:59 +00:00
$this -> response = $this -> parseResponse ( $response );
2007-11-20 17:19:20 +00:00
if ( ! empty ( $this -> response [ 'cookies' ])) {
2007-12-08 06:08:03 +00:00
$this -> config [ 'request' ][ 'cookies' ] = array_merge ( $this -> config [ 'request' ][ 'cookies' ], $this -> response [ 'cookies' ]);
2007-11-20 17:19:20 +00:00
}
2007-05-15 19:59:59 +00:00
return $this -> response [ 'body' ];
}
2007-05-20 16:40:26 +00:00
/**
* Issues a GET request to the specified URI , query , and request .
*
* @ param mixed $uri URI to request ( see { @ link parseUri ()})
* @ param array $query Query to append to URI
* @ param array $request An indexed array with indexes such as 'method' or uri
* @ return mixed Result of request
* @ access public
*/
function get ( $uri = null , $query = array (), $request = array ()) {
2007-05-15 19:59:59 +00:00
if ( ! empty ( $query )) {
$uri = $this -> parseUri ( $uri );
if ( isset ( $uri [ 'query' ])) {
2007-12-08 06:08:03 +00:00
$uri [ 'query' ] = array_merge ( $uri [ 'query' ], $query );
2007-05-15 19:59:59 +00:00
} else {
$uri [ 'query' ] = $query ;
}
$uri = $this -> buildUri ( $uri );
2007-04-10 22:56:07 +00:00
}
2007-05-20 16:40:26 +00:00
2007-05-15 19:59:59 +00:00
$request = Set :: merge ( array ( 'method' => 'GET' , 'uri' => $uri ), $request );
return $this -> request ( $request );
}
2007-05-20 16:40:26 +00:00
/**
* Issues a POST request to the specified URI , query , and request .
*
* @ param mixed $uri URI to request ( see { @ link parseUri ()})
* @ param array $query Query to append to URI
* @ param array $request An indexed array with indexes such as 'method' or uri
* @ return mixed Result of request
* @ access public
*/
2007-05-15 19:59:59 +00:00
function post ( $uri = null , $data = array (), $request = array ()) {
$request = Set :: merge ( array ( 'method' => 'POST' , 'uri' => $uri , 'body' => $data ), $request );
return $this -> request ( $request );
}
2007-05-20 16:40:26 +00:00
/**
* Issues a PUT request to the specified URI , query , and request .
*
* @ param mixed $uri URI to request ( see { @ link parseUri ()})
* @ param array $query Query to append to URI
* @ param array $request An indexed array with indexes such as 'method' or uri
* @ return mixed Result of request
* @ access public
*/
2007-05-15 19:59:59 +00:00
function put ( $uri = null , $data = array (), $request = array ()) {
$request = Set :: merge ( array ( 'method' => 'PUT' , 'uri' => $uri , 'body' => $data ), $request );
return $this -> request ( $request );
}
2007-05-20 16:40:26 +00:00
/**
* Issues a DELETE request to the specified URI , query , and request .
*
* @ param mixed $uri URI to request ( see { @ link parseUri ()})
* @ param array $query Query to append to URI
* @ param array $request An indexed array with indexes such as 'method' or uri
* @ return mixed Result of request
* @ access public
*/
2007-05-15 19:59:59 +00:00
function delete ( $uri = null , $data = array (), $request = array ()) {
$request = Set :: merge ( array ( 'method' => 'DELETE' , 'uri' => $uri , 'body' => $data ), $request );
return $this -> request ( $request );
}
2007-11-18 16:51:11 +00:00
/**
* undocumented function
*
2007-12-08 06:08:03 +00:00
* @ param unknown $url
* @ param unknown $uriTemplate
2007-11-18 16:51:11 +00:00
* @ return void
* @ access public
*/
function url ( $url = null , $uriTemplate = null ) {
if ( is_null ( $url )) {
$url = '/' ;
}
if ( is_string ( $url )) {
if ( $url { 0 } == '/' ) {
2007-11-18 18:55:50 +00:00
$url = $this -> config [ 'request' ][ 'uri' ][ 'host' ] . ':' . $this -> config [ 'request' ][ 'uri' ][ 'port' ] . $url ;
2007-11-18 16:51:11 +00:00
}
2007-11-18 18:55:50 +00:00
if ( ! preg_match ( '/^.+:\/\/|\*|^\//' , $url )) {
2007-11-18 16:51:11 +00:00
$url = $this -> config [ 'request' ][ 'uri' ][ 'scheme' ] . '://' . $url ;
}
} elseif ( ! is_array ( $url ) && ! empty ( $url )) {
return false ;
}
2007-12-08 06:08:03 +00:00
$base = array_merge ( $this -> config [ 'request' ][ 'uri' ], array ( 'scheme' => array ( 'http' , 'https' ), 'port' => array ( 80 , 443 )));
2007-11-18 18:55:50 +00:00
$url = $this -> parseUri ( $url , $base );
2007-11-18 16:51:11 +00:00
if ( empty ( $url )) {
$url = $this -> config [ 'request' ][ 'uri' ];
}
if ( ! empty ( $uriTemplate )) {
return $this -> buildUri ( $url , $uriTemplate );
}
return $this -> buildUri ( $url );
}
2007-05-15 19:59:59 +00:00
2007-05-20 16:40:26 +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
*/
2007-05-15 19:59:59 +00:00
function parseResponse ( $message ) {
if ( is_array ( $message )) {
return $message ;
} elseif ( ! is_string ( $message )) {
2007-02-20 20:06:55 +00:00
return false ;
}
2007-05-15 19:59:59 +00:00
2007-05-20 16:40:26 +00:00
static $responseTemplate ;
2007-05-15 19:59:59 +00:00
if ( empty ( $responseTemplate )) {
$classVars = get_class_vars ( __CLASS__ );
$responseTemplate = $classVars [ 'response' ];
2007-02-20 20:06:55 +00:00
}
2007-05-15 19:59:59 +00:00
$response = $responseTemplate ;
2007-11-20 17:19:20 +00:00
if ( ! preg_match ( " /^(.+ \r \n )(.*)(?<= \r \n ) \r \n /Us " , $message , $match )) {
return false ;
}
2007-12-08 06:08:03 +00:00
2007-11-20 17:19:20 +00:00
list (, $response [ 'raw' ][ 'status-line' ], $response [ 'raw' ][ 'header' ]) = $match ;
$response [ 'raw' ][ 'response' ] = $message ;
$response [ 'raw' ][ 'body' ] = substr ( $message , strlen ( $match [ 0 ]));
2007-05-15 19:59:59 +00:00
2007-11-20 17:19:20 +00:00
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 ];
}
2007-05-15 19:59:59 +00:00
2007-11-20 17:19:20 +00:00
$response [ 'header' ] = $this -> parseHeader ( $response [ 'raw' ][ 'header' ]);
$decoded = $this -> decodeBody ( $response [ 'raw' ][ 'body' ], @ $response [ 'header' ][ 'Transfer-Encoding' ]);
$response [ 'body' ] = $decoded [ 'body' ];
if ( ! empty ( $decoded [ 'header' ])) {
$response [ 'header' ] = $this -> parseHeader ( $this -> buildHeader ( $response [ 'header' ]) . $this -> buildHeader ( $decoded [ 'header' ]));
}
2007-12-08 06:08:03 +00:00
2007-11-20 17:19:20 +00:00
if ( ! empty ( $response [ 'header' ])) {
$response [ 'cookies' ] = $this -> parseCookies ( $response [ 'header' ]);
2007-02-20 20:06:55 +00:00
}
2007-05-15 19:59:59 +00:00
foreach ( $response [ 'raw' ] as $field => $val ) {
if ( $val === '' ) {
$response [ 'raw' ][ $field ] = null ;
2007-02-20 20:06:55 +00:00
}
}
2007-05-15 19:59:59 +00:00
return $response ;
2007-02-20 20:06:55 +00:00
}
/**
2007-05-15 19:59:59 +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 .
2007-02-20 20:06:55 +00:00
*
2007-05-15 19:59:59 +00:00
* @ param string $body A string continaing the body to decode
2007-05-20 16:40:26 +00:00
* @ param mixed $encoding Can be false in case no encoding is being used , or a string representing the encoding
2007-05-15 19:59:59 +00:00
* @ return mixed Array or false
2007-05-20 16:40:26 +00:00
* @ access protected
2007-02-20 20:06:55 +00:00
*/
2007-05-15 19:59:59 +00:00
function decodeBody ( $body , $encoding = 'chunked' ) {
if ( ! is_string ( $body )) {
return false ;
2007-02-20 20:06:55 +00:00
}
2007-05-15 19:59:59 +00:00
if ( empty ( $encoding )) {
return array ( 'body' => $body , 'header' => false );
2007-02-20 20:06:55 +00:00
}
2007-12-08 06:08:03 +00:00
$decodeMethod = 'decode' . Inflector :: camelize ( str_replace ( '-' , '_' , $encoding )) . 'Body' ;
2007-02-20 20:06:55 +00:00
2007-05-15 19:59:59 +00:00
if ( ! is_callable ( array ( & $this , $decodeMethod ))) {
if ( ! $this -> quirksMode ) {
2007-05-24 23:23:38 +00:00
trigger_error ( sprintf ( __ ( 'HttpSocket::decodeBody - Unknown encoding: %s. Activate quirks mode to surpress error.' , true ), h ( $encoding )), E_USER_WARNING );
2007-05-15 19:59:59 +00:00
}
return array ( 'body' => $body , 'header' => false );
2007-02-20 20:06:55 +00:00
}
2007-05-15 19:59:59 +00:00
return $this -> { $decodeMethod }( $body );
2007-02-20 20:06:55 +00:00
}
/**
2007-05-15 19:59:59 +00:00
* Decodes a chunked message $body and returns either an array with the keys 'body' and 'header' or false as
* a result .
2007-02-20 20:06:55 +00:00
*
2007-05-15 19:59:59 +00:00
* @ param string $body A string continaing the chunked body to decode
* @ return mixed Array or false
2007-05-20 16:40:26 +00:00
* @ access protected
2007-02-20 20:06:55 +00:00
*/
2007-05-15 19:59:59 +00:00
function decodeChunkedBody ( $body ) {
if ( ! is_string ( $body )) {
return false ;
}
2007-05-20 16:40:26 +00:00
$decodedBody = null ;
2007-05-15 19:59:59 +00:00
$chunkLength = null ;
while ( $chunkLength !== 0 ) {
if ( ! preg_match ( " /^([0-9a-f]+)(?:;(.+)=(.+))? \r \n /iU " , $body , $match )) {
if ( ! $this -> quirksMode ) {
2007-05-20 16:40:26 +00:00
trigger_error ( __ ( 'HttpSocket::decodeChunkedBody - Could not parse malformed chunk. Activate quirks mode to do this.' , true ), E_USER_WARNING );
2007-05-15 19:59:59 +00:00
return false ;
}
break ;
}
@ list ( $chunkSize , $hexLength , $chunkExtensionName , $chunkExtensionValue ) = $match ;
$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 )) {
$entityHeader = $this -> parseHeader ( $body );
}
return array ( 'body' => $decodedBody , 'header' => $entityHeader );
2007-02-20 20:06:55 +00:00
}
/**
2007-05-20 16:40:26 +00:00
* Parses and sets the specified URI into current request configuration .
2007-02-20 20:06:55 +00:00
*
2007-05-20 16:40:26 +00:00
* @ param mixed $uri URI ( see { @ link parseUri ()})
* @ return array Current configuration settings
* @ access protected
2007-02-20 20:06:55 +00:00
*/
2007-05-15 19:59:59 +00:00
function configUri ( $uri = null ) {
if ( empty ( $uri )) {
return false ;
}
if ( is_array ( $uri )) {
$uri = $this -> parseUri ( $uri );
} else {
$uri = $this -> parseUri ( $uri , true );
}
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' ])
2007-04-10 22:56:07 +00:00
)
);
2007-05-15 19:59:59 +00:00
$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 ;
}
/**
* Takes a $uri array and turns it into a fully qualified URL string
*
* @ param array $uri A $uri array , or uses $this -> config if left empty
* @ param string $uriTemplate The Uri template / format to use
* @ return string A fully qualified URL formated according to $uriTemplate
2007-05-20 16:40:26 +00:00
* @ access protected
2007-05-15 19:59:59 +00:00
*/
function buildUri ( $uri = array (), $uriTemplate = '%scheme://%user:%pass@%host:%port/%path?%query#%fragment' ) {
if ( is_string ( $uri )) {
$uri = array ( 'host' => $uri );
2007-04-10 22:56:07 +00:00
}
2007-05-15 19:59:59 +00:00
$uri = $this -> parseUri ( $uri , true );
2007-02-20 20:06:55 +00:00
2007-05-15 19:59:59 +00:00
if ( ! is_array ( $uri ) || empty ( $uri )) {
return false ;
}
2007-02-20 20:06:55 +00:00
2007-05-15 19:59:59 +00:00
$uri [ 'path' ] = preg_replace ( '/^\//' , null , $uri [ 'path' ]);
$uri [ 'query' ] = $this -> httpSerialize ( $uri [ 'query' ]);
$stripIfEmpty = array (
'query' => '?%query' ,
'fragment' => '#%fragment' ,
'user' => '%user:%pass@'
);
2007-02-20 20:06:55 +00:00
2007-05-15 19:59:59 +00:00
foreach ( $stripIfEmpty as $key => $strip ) {
if ( empty ( $uri [ $key ])) {
$uriTemplate = str_replace ( $strip , null , $uriTemplate );
}
}
2007-02-20 20:06:55 +00:00
2007-05-15 19:59:59 +00:00
$defaultPorts = array ( 'http' => 80 , 'https' => 443 );
if ( array_key_exists ( $uri [ 'scheme' ], $defaultPorts ) && $defaultPorts [ $uri [ 'scheme' ]] == $uri [ 'port' ]) {
$uriTemplate = str_replace ( ':%port' , null , $uriTemplate );
}
2007-04-10 22:56:07 +00:00
2007-05-15 19:59:59 +00:00
foreach ( $uri as $property => $value ) {
$uriTemplate = str_replace ( '%' . $property , $value , $uriTemplate );
}
2007-04-10 22:56:07 +00:00
2007-05-15 19:59:59 +00:00
if ( $uriTemplate === '/*' ) {
$uriTemplate = '*' ;
}
return $uriTemplate ;
2007-04-10 22:56:07 +00:00
}
/**
2007-05-20 16:40:26 +00:00
* Parses the given URI and breaks it down into pieces as an indexed array with elements
* such as 'scheme' , 'port' , 'query' .
2007-04-10 22:56:07 +00:00
*
2007-05-20 16:40:26 +00:00
* @ 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
2007-04-10 22:56:07 +00:00
*/
2007-05-15 19:59:59 +00:00
function parseUri ( $uri = null , $base = array ()) {
$uriBase = array (
'scheme' => array ( 'http' , 'https' ),
'host' => null ,
'port' => array ( 80 , 443 ),
'user' => null ,
'pass' => null ,
2007-11-18 16:51:11 +00:00
'path' => '/' ,
2007-05-15 19:59:59 +00:00
'query' => null ,
'fragment' => null
);
if ( is_string ( $uri )) {
$uri = parse_url ( $uri );
2007-04-10 22:56:07 +00:00
}
2007-05-15 19:59:59 +00:00
if ( ! is_array ( $uri ) || empty ( $uri )) {
2007-04-10 22:56:07 +00:00
return false ;
}
2007-05-15 19:59:59 +00:00
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' ])];
2007-04-10 22:56:07 +00:00
}
}
2007-05-15 19:59:59 +00:00
if ( is_array ( $base ) && ! empty ( $base )) {
2007-12-08 06:08:03 +00:00
$uri = array_merge ( $base , $uri );
2007-05-15 19:59:59 +00:00
}
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 )) {
$uri [ 'query' ] = $this -> parseQuery ( $uri [ 'query' ]);
}
if ( ! array_intersect_key ( $uriBase , $uri )) {
return false ;
}
return $uri ;
2007-04-10 22:56:07 +00:00
}
2007-02-20 20:06:55 +00:00
/**
2007-05-15 19:59:59 +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 :
2007-05-20 16:40:26 +00:00
*
2007-05-15 19:59:59 +00:00
* - ? key [ subKey ] = value
* - ? key [] = value1 & key [] = value2
2007-05-20 16:40:26 +00:00
*
2007-05-15 19:59:59 +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 ()
2007-05-20 16:40:26 +00:00
*
2007-05-15 19:59:59 +00:00
* @ param mixed $query A query string to parse into an array or an array to return directly " as is "
* @ return array The $query parsed into a possibly multi - level array . If an empty $query is given , an empty array is returned .
2007-05-20 16:40:26 +00:00
* @ access protected
2007-02-20 20:06:55 +00:00
*/
2007-05-15 19:59:59 +00:00
function parseQuery ( $query ) {
if ( is_array ( $query )) {
return $query ;
}
$parsedQuery = array ();
2007-04-10 22:56:07 +00:00
2007-05-15 19:59:59 +00:00
if ( is_string ( $query ) && ! empty ( $query )) {
$query = preg_replace ( '/^\?/' , '' , $query );
$items = explode ( '&' , $query );
foreach ( $items as $item ) {
if ( strpos ( $item , '=' ) !== false ) {
list ( $key , $value ) = explode ( '=' , $item );
} else {
$key = $item ;
$value = null ;
}
$key = urldecode ( $key );
$value = urldecode ( $value );
if ( $value === '' ) {
$value = null ;
} elseif ( ctype_digit ( $value ) == true ) {
$value = ( int ) $value ;
}
2007-06-20 06:15:35 +00:00
if ( preg_match_all ( '/\[([^\[\]]*)\]/iUs' , $key , $matches )) {
2007-05-15 19:59:59 +00:00
$subKeys = $matches [ 1 ];
$rootKey = substr ( $key , 0 , strpos ( $key , '[' ));
if ( ! empty ( $rootKey )) {
array_unshift ( $subKeys , $rootKey );
}
$queryNode =& $parsedQuery ;
foreach ( $subKeys as $subKey ) {
2007-05-20 16:40:26 +00:00
if ( ! is_array ( $queryNode )) {
2007-05-15 19:59:59 +00:00
$queryNode = array ();
}
if ( $subKey === '' ) {
$queryNode [] = array ();
end ( $queryNode );
$subKey = key ( $queryNode );
}
$queryNode =& $queryNode [ $subKey ];
}
$queryNode = $value ;
} else {
$parsedQuery [ $key ] = $value ;
}
2007-04-10 22:56:07 +00:00
}
}
2007-05-15 19:59:59 +00:00
return $parsedQuery ;
2007-04-10 22:56:07 +00:00
}
2007-02-20 20:06:55 +00:00
/**
2007-05-15 19:59:59 +00:00
* Builds a request line according to HTTP / 1.1 specs . Activate quirks mode to work outside specs .
2007-02-20 20:06:55 +00:00
*
2007-05-15 19:59:59 +00:00
* @ 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
2007-05-20 16:40:26 +00:00
* @ return string Request line
* @ access protected
2007-02-20 20:06:55 +00:00
*/
2007-05-15 19:59:59 +00:00
function buildRequestLine ( $request = array (), $versionToken = 'HTTP/1.1' ) {
$asteriskMethods = array ( 'OPTIONS' );
2007-04-10 22:56:07 +00:00
2007-05-15 19:59:59 +00:00
if ( is_string ( $request )) {
$isValid = preg_match ( " /(.+) (.+) (.+) \r \n /U " , $request , $match );
if ( ! $this -> quirksMode && ( ! $isValid || ( $match [ 2 ] == '*' && ! in_array ( $match [ 3 ], $asteriskMethods )))) {
2007-05-20 16:40:26 +00:00
trigger_error ( __ ( 'HttpSocket::buildRequestLine - Passed an invalid request line string. Activate quirks mode to do this.' , true ), E_USER_WARNING );
2007-05-15 19:59:59 +00:00
return false ;
2007-04-10 22:56:07 +00:00
}
2007-05-15 19:59:59 +00:00
return $request ;
} elseif ( ! is_array ( $request )) {
return false ;
} elseif ( ! array_key_exists ( 'uri' , $request )) {
return false ;
2007-04-10 22:56:07 +00:00
}
2007-05-15 19:59:59 +00:00
$request [ 'uri' ] = $this -> parseUri ( $request [ 'uri' ]);
2007-12-08 06:08:03 +00:00
$request = array_merge ( array ( 'method' => 'GET' ), $request );
2007-05-15 19:59:59 +00:00
$request [ 'uri' ] = $this -> buildUri ( $request [ 'uri' ], '/%path?%query' );
if ( ! $this -> quirksMode && $request [ 'uri' ] === '*' && ! in_array ( $request [ 'method' ], $asteriskMethods )) {
2007-05-20 16:40:26 +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 );
2007-05-15 19:59:59 +00:00
return false ;
}
return $request [ 'method' ] . ' ' . $request [ 'uri' ] . ' ' . $versionToken . $this -> lineBreak ;
2007-04-10 22:56:07 +00:00
}
2007-05-15 19:59:59 +00:00
2007-05-20 16:40:26 +00:00
/**
* Serializes an array for transport .
*
* @ param array $data Data to serialize
* @ return string Serialized variable
* @ access protected
*/
2007-05-15 19:59:59 +00:00
function httpSerialize ( $data = array ()) {
if ( is_string ( $data )) {
return $data ;
}
if ( empty ( $data ) || ! is_array ( $data )) {
return false ;
}
return substr ( Router :: queryString ( $data ), 1 );
2007-04-10 22:56:07 +00:00
}
2007-02-20 20:06:55 +00:00
/**
2007-05-20 16:40:26 +00:00
* Builds the header .
2007-02-20 20:06:55 +00:00
*
2007-05-20 16:40:26 +00:00
* @ param array $header Header to build
* @ return string Header built from array
* @ access protected
2007-02-20 20:06:55 +00:00
*/
2007-11-18 20:57:42 +00:00
function buildHeader ( $header , $mode = 'standard' ) {
2007-05-15 19:59:59 +00:00
if ( is_string ( $header )) {
return $header ;
} elseif ( ! is_array ( $header )) {
return false ;
}
$returnHeader = '' ;
foreach ( $header as $field => $contents ) {
2007-11-18 20:57:42 +00:00
if ( is_array ( $contents ) && $mode == 'standard' ) {
2007-05-15 19:59:59 +00:00
$contents = join ( ',' , $contents );
}
2007-11-18 20:57:42 +00:00
foreach (( array ) $contents as $content ) {
$contents = preg_replace ( " / \r \n (?![ \t ])/ " , " \r \n " , $content );
$field = $this -> escapeToken ( $field );
2007-05-15 19:59:59 +00:00
2007-11-18 20:57:42 +00:00
$returnHeader .= $field . ': ' . $contents . $this -> lineBreak ;
}
2007-05-15 19:59:59 +00:00
}
return $returnHeader ;
2007-04-10 22:56:07 +00:00
}
2007-05-20 16:40:26 +00:00
/**
* Parses an array based header .
*
* @ param array $header Header as an indexed array ( field => value )
* @ return array Parsed header
* @ access protected
*/
2007-05-15 19:59:59 +00:00
function parseHeader ( $header ) {
if ( is_array ( $header )) {
foreach ( $header as $field => $value ) {
unset ( $header [ $field ]);
2007-12-08 06:08:03 +00:00
$field = strtolower ( $field );
2007-05-15 19:59:59 +00:00
preg_match_all ( '/(?:^|(?<=-))[a-z]/U' , $field , $offsets , PREG_OFFSET_CAPTURE );
foreach ( $offsets [ 0 ] as $offset ) {
2007-12-08 06:08:03 +00:00
$field = substr_replace ( $field , strtoupper ( $offset [ 0 ]), $offset [ 1 ], 1 );
2007-05-15 19:59:59 +00:00
}
$header [ $field ] = $value ;
}
return $header ;
} elseif ( ! is_string ( $header )) {
return false ;
2007-04-10 22:56:07 +00:00
}
2007-05-15 19:59:59 +00:00
preg_match_all ( " /(.+):(.+)(?:(?<![ \t ]) " . $this -> lineBreak . " | \$ )/Uis " , $header , $matches , PREG_SET_ORDER );
$header = array ();
foreach ( $matches as $match ) {
list (, $field , $value ) = $match ;
$value = trim ( $value );
$value = preg_replace ( " /[ \t ] \r \n / " , " \r \n " , $value );
2007-05-20 16:40:26 +00:00
2007-05-15 19:59:59 +00:00
$field = $this -> unescapeToken ( $field );
2007-05-20 16:40:26 +00:00
2007-12-08 06:08:03 +00:00
$field = strtolower ( $field );
2007-05-15 19:59:59 +00:00
preg_match_all ( '/(?:^|(?<=-))[a-z]/U' , $field , $offsets , PREG_OFFSET_CAPTURE );
foreach ( $offsets [ 0 ] as $offset ) {
2007-12-08 06:08:03 +00:00
$field = substr_replace ( $field , strtoupper ( $offset [ 0 ]), $offset [ 1 ], 1 );
2007-04-10 22:56:07 +00:00
}
2007-05-15 19:59:59 +00:00
if ( ! isset ( $header [ $field ])) {
$header [ $field ] = $value ;
} else {
2007-12-08 06:08:03 +00:00
$header [ $field ] = array_merge (( array ) $header [ $field ], ( array ) $value );
2007-04-10 22:56:07 +00:00
}
}
2007-05-15 19:59:59 +00:00
return $header ;
}
2007-11-18 20:57:42 +00:00
/**
* undocumented function
*
2007-12-08 06:08:03 +00:00
* @ param unknown $header
2007-11-18 20:57:42 +00:00
* @ return void
* @ access public
* @ todo Make this 100 % RFC 2965 confirm
*/
function parseCookies ( $header ) {
if ( ! isset ( $header [ 'Set-Cookie' ])) {
return false ;
}
2007-04-10 22:56:07 +00:00
2007-11-18 20:57:42 +00:00
$cookies = array ();
2007-11-20 17:19:20 +00:00
foreach (( array ) $header [ 'Set-Cookie' ] as $cookie ) {
2007-11-18 20:57:42 +00:00
$parts = preg_split ( '/(?<![^;]");[ \t]*/' , $cookie );
list ( $name , $value ) = explode ( '=' , array_shift ( $parts ));
$cookies [ $name ] = compact ( 'value' );
foreach ( $parts as $part ) {
@ list ( $key , $value ) = explode ( '=' , $part );
if ( is_null ( $value )) {
$value = true ;
}
2007-12-08 06:08:03 +00:00
$key = strtolower ( $key );
2007-11-18 20:57:42 +00:00
if ( ! isset ( $cookies [ $name ][ $key ])) {
$cookies [ $name ][ $key ] = $value ;
}
}
}
return $cookies ;
}
/**
* undocumented function
*
2007-12-08 06:08:03 +00:00
* @ param unknown $cookies
2007-11-18 20:57:42 +00:00
* @ return void
* @ access public
* @ todo Refactor token escape mechanism to be configurable
*/
function buildCookies ( $cookies ) {
$header = array ();
foreach ( $cookies as $name => $cookie ) {
2007-11-20 17:19:20 +00:00
$header [] = $name . '=' . $this -> escapeToken ( $cookie [ 'value' ], array ( ';' ));
2007-11-18 20:57:42 +00:00
}
$header = $this -> buildHeader ( array ( 'Cookie' => $header ), 'pragmatic' );
return $header ;
}
2007-11-20 17:19:20 +00:00
/**
* undocumented function
*
* @ return void
* @ access public
*/
function saveCookies () {
2007-12-08 06:08:03 +00:00
2007-11-20 17:19:20 +00:00
}
/**
* undocumented function
*
* @ return void
* @ access public
*/
function loadCookies () {
2007-12-08 06:08:03 +00:00
2007-11-20 17:19:20 +00:00
}
2007-05-20 16:40:26 +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
2007-11-18 20:57:42 +00:00
* @ todo Test $chars parameter
2007-05-20 16:40:26 +00:00
*/
2007-11-18 20:57:42 +00:00
function unescapeToken ( $token , $chars = null ) {
$regex = '/"([' . join ( '' , $this -> __tokenEscapeChars ( true , $chars )) . '])"/' ;
2007-05-15 19:59:59 +00:00
$token = preg_replace ( $regex , '\\1' , $token );
return $token ;
2007-04-10 22:56:07 +00:00
}
2007-02-20 20:06:55 +00:00
/**
2007-05-15 19:59:59 +00:00
* Escapes a given $token according to RFC 2616 ( HTTP 1.1 specs )
2007-02-20 20:06:55 +00:00
*
2007-05-20 16:40:26 +00:00
* @ param string $token Token to escape
* @ return string Escaped token
* @ access protected
2007-11-18 20:57:42 +00:00
* @ todo Test $chars parameter
2007-02-20 20:06:55 +00:00
*/
2007-11-18 20:57:42 +00:00
function escapeToken ( $token , $chars = null ) {
$regex = '/([' . join ( '' , $this -> __tokenEscapeChars ( true , $chars )) . '])/' ;
2007-05-15 19:59:59 +00:00
$token = preg_replace ( $regex , '"\\1"' , $token );
return $token ;
2007-02-20 20:06:55 +00:00
}
2007-05-20 16:40:26 +00:00
/**
* Gets escape chars according to RFC 2616 ( HTTP 1.1 specs ) .
*
2007-10-22 16:54:36 +00:00
* @ param boolean $hex true to get them as HEX values , false otherwise
2007-05-20 16:40:26 +00:00
* @ return array Escape chars
* @ access private
2007-11-18 20:57:42 +00:00
* @ todo Test $chars parameter
2007-05-20 16:40:26 +00:00
*/
2007-11-18 20:57:42 +00:00
function __tokenEscapeChars ( $hex = true , $chars = null ) {
if ( ! empty ( $chars )) {
$escape = $chars ;
} else {
$escape = array ( '"' , " ( " , " ) " , " < " , " > " , " @ " , " , " , " ; " , " : " , " \\ " , " / " , " [ " , " ] " , " ? " , " = " , " { " , " } " , " " );
for ( $i = 0 ; $i <= 31 ; $i ++ ) {
$escape [] = chr ( $i );
}
$escape [] = chr ( 127 );
2007-02-20 20:06:55 +00:00
}
2007-04-10 22:56:07 +00:00
2007-05-15 19:59:59 +00:00
if ( $hex == false ) {
return $escape ;
2007-04-10 22:56:07 +00:00
}
2007-05-15 19:59:59 +00:00
$regexChars = '' ;
foreach ( $escape as $key => $char ) {
$escape [ $key ] = '\\x' . str_pad ( dechex ( ord ( $char )), 2 , '0' , STR_PAD_LEFT );
2007-04-10 22:56:07 +00:00
}
2007-05-15 19:59:59 +00:00
return $escape ;
2007-02-20 20:06:55 +00:00
}
/**
2007-05-20 16:40:26 +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 .
2007-02-20 20:06:55 +00:00
*
2007-10-22 16:54:36 +00:00
* @ param boolean $full If set to false only HttpSocket :: response and HttpSocket :: request are reseted
2007-10-22 16:09:35 +00:00
* @ return boolean True on success
2007-05-20 16:40:26 +00:00
* @ access public
2007-02-20 20:06:55 +00:00
*/
2007-04-10 22:56:07 +00:00
function reset ( $full = true ) {
2007-05-15 19:59:59 +00:00
static $initalState = array () ;
if ( empty ( $initalState )) {
$initalState = get_class_vars ( __CLASS__ );
2007-02-20 20:06:55 +00:00
}
2007-05-15 19:59:59 +00:00
2007-04-10 22:56:07 +00:00
if ( $full == false ) {
2007-05-15 19:59:59 +00:00
$this -> request = $initalState [ 'request' ];
$this -> response = $initalState [ 'response' ];
2007-04-10 22:56:07 +00:00
return true ;
}
2007-05-15 19:59:59 +00:00
foreach ( $initalState as $property => $value ) {
$this -> { $property } = $value ;
2007-04-10 22:56:07 +00:00
}
return true ;
2007-02-20 20:06:55 +00:00
}
}
?>