mirror of
https://github.com/gtbu/Typesetter-5.3-p8.git
synced 2024-11-11 01:44:02 +01:00
873 lines
22 KiB
PHP
873 lines
22 KiB
PHP
|
<?php
|
||
|
|
||
|
|
||
|
namespace gp\tool{
|
||
|
|
||
|
defined('is_running') or die('Not an entry point...');
|
||
|
|
||
|
class RemoteGet{
|
||
|
|
||
|
public static $redirected;
|
||
|
public static $maxlength = -1; // The maximum bytes to read. eg: stream_get_contents($handle, $maxlength)
|
||
|
public static $debug;
|
||
|
public static $methods = array('stream','curl','fopen','fsockopen');
|
||
|
|
||
|
|
||
|
protected $url_array = array();
|
||
|
protected $body = '';
|
||
|
protected $headers = '';
|
||
|
protected $bytes_written_total = 0;
|
||
|
|
||
|
|
||
|
|
||
|
/* determine if the functions exist for fetching remote files,
|
||
|
* test is done in order of preference
|
||
|
*
|
||
|
* notes from wordpress http.php
|
||
|
* The order for the GET/HEAD requests are Streams, HTTP Extension, Fopen,
|
||
|
* and finally Fsockopen. fsockopen() is used last, because it has the most
|
||
|
* overhead in its implementation. There isn't any real way around it, since
|
||
|
* redirects have to be supported, much the same way the other transports
|
||
|
* also handle redirects.
|
||
|
*
|
||
|
* @return mixed string indicates the method, False indicates it's not compatible
|
||
|
*/
|
||
|
public static function Test(){
|
||
|
|
||
|
foreach(static::$methods as $method){
|
||
|
if( static::Supported($method) ){
|
||
|
return $method;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Determine if a specific method is supported
|
||
|
*
|
||
|
*/
|
||
|
public static function Supported($method){
|
||
|
|
||
|
if( \gp\tool::IniGet('safe_mode') ){
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
switch($method){
|
||
|
|
||
|
case 'fsockopen':
|
||
|
return function_exists('fsockopen');
|
||
|
|
||
|
case 'curl';
|
||
|
return function_exists('curl_init') && function_exists('curl_exec');
|
||
|
|
||
|
}
|
||
|
|
||
|
//stream and fopen
|
||
|
return \gp\tool::IniGet('allow_url_fopen');
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Return response only if successful, otherwise return false
|
||
|
*
|
||
|
*/
|
||
|
public static function Get_Successful($url,$args=array()){
|
||
|
|
||
|
$getter = new \gp\tool\RemoteGet();
|
||
|
$result = $getter->Get($url,$args);
|
||
|
|
||
|
if( is_array($result) ){
|
||
|
if( (int)$result['response']['code'] >= 200 && (int)$result['response']['code'] < 300 ){
|
||
|
return $result['body'];
|
||
|
}
|
||
|
}
|
||
|
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Attempt to get the resource at $url
|
||
|
* Loop through all potential methods until successful
|
||
|
*/
|
||
|
public function Get($url,$args=array()){
|
||
|
|
||
|
static::$debug = array();
|
||
|
static::$debug['Redir'] = 0;
|
||
|
static::$debug['FailedMethods'] = '';
|
||
|
static::$debug['NotSupported'] = '';
|
||
|
static::$redirected = null;
|
||
|
|
||
|
return $this->_get($url,$args);
|
||
|
}
|
||
|
|
||
|
protected function _get($url, $args = array()){
|
||
|
|
||
|
//reset body, headers, bytes_written. Important for redirection, multiple requests using same object
|
||
|
$this->body = '';
|
||
|
$this->headers = '';
|
||
|
$this->bytes_written_total = 0;
|
||
|
|
||
|
|
||
|
//$url = rawurldecode($url);
|
||
|
$url = str_replace(' ','%20',$url); //spaces in the url can make the request fail
|
||
|
$url = static::FixScheme($url);
|
||
|
$this->url_array = static::ParseUrl($url);
|
||
|
|
||
|
if( $this->url_array === false ){
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
|
||
|
//arguments
|
||
|
$defaults = array(
|
||
|
'method' => 'GET',
|
||
|
'timeout' => 5,
|
||
|
'redirection' => 5,
|
||
|
'httpversion' => '1.0',
|
||
|
'user-agent' => 'Mozilla/5.0 (Typesetter RemoteGet) ',
|
||
|
'ignore_errors' => false,
|
||
|
|
||
|
|
||
|
//could be added
|
||
|
//'blocking' => true,
|
||
|
//'headers' => array(),
|
||
|
//'body' => null,
|
||
|
//'cookies' => array(),
|
||
|
);
|
||
|
|
||
|
$args += $defaults;
|
||
|
|
||
|
|
||
|
foreach(static::$methods as $method){
|
||
|
|
||
|
if( !static::Supported($method) ){
|
||
|
static::$debug['NotSupported'] .= $method.',';
|
||
|
continue;
|
||
|
}
|
||
|
|
||
|
$result = $this->GetMethod($method,$url,$args);
|
||
|
if( $result === false ){
|
||
|
static::$debug['FailedMethods'] .= $method.',';
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
static::$debug['Method'] = $method;
|
||
|
static::$debug['Len'] = strlen($result['body']);
|
||
|
|
||
|
return $result;
|
||
|
}
|
||
|
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
|
||
|
public function GetMethod($method,$url,$args=array()){
|
||
|
|
||
|
$func = $method.'_request';
|
||
|
|
||
|
if( method_exists($this,$func) ){
|
||
|
return $this->$func( $url, $args );
|
||
|
}
|
||
|
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Fetch a url using php's stream_get_contents() function
|
||
|
*
|
||
|
*/
|
||
|
public function stream_request($url,$r){
|
||
|
|
||
|
$arrContext = $this->stream_context($url,$r);
|
||
|
|
||
|
$context = stream_context_create($arrContext);
|
||
|
|
||
|
$handle = fopen($url, 'r', false, $context);
|
||
|
|
||
|
if( $handle === false ){
|
||
|
static::$debug['stream'] = 'no handle';
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
static::stream_timeout($handle,$r['timeout']);
|
||
|
|
||
|
$strResponse = stream_get_contents($handle, static::$maxlength);
|
||
|
$theHeaders = static::StreamHeaders($handle);
|
||
|
fclose($handle);
|
||
|
|
||
|
$processedHeaders = static::processHeaders($theHeaders);
|
||
|
|
||
|
$this->body = static::chunkTransferDecode($strResponse,$processedHeaders);
|
||
|
|
||
|
return $this->ReturnRequest( $url, $r, $processedHeaders );
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Create context array
|
||
|
*
|
||
|
*/
|
||
|
public function stream_context($url,$r){
|
||
|
|
||
|
//create context
|
||
|
$arrContext = array();
|
||
|
$arrContext['http'] = array(
|
||
|
'method' => 'GET',
|
||
|
'user_agent' => $r['user-agent'],
|
||
|
'max_redirects' => $r['redirection'],
|
||
|
'protocol_version' => (float) $r['httpversion'],
|
||
|
'timeout' => $r['timeout'],
|
||
|
'ignore_errors' => $r['ignore_errors'],
|
||
|
);
|
||
|
|
||
|
if( isset($r['http']) ){
|
||
|
$arrContext['http'] = $r['http'] + $arrContext['http'];
|
||
|
}
|
||
|
|
||
|
if( isset($r['headers']) ){
|
||
|
$arrContext['http']['header'] = '';
|
||
|
foreach($r['headers'] as $hk => $hv){
|
||
|
$arrContext['http']['header'] .= $hk.': '.$hv."\r\n";
|
||
|
}
|
||
|
$arrContext['http']['header'] = trim($arrContext['http']['header']);
|
||
|
}
|
||
|
|
||
|
return $arrContext;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Fetch a url using php's fopen() function
|
||
|
*
|
||
|
*/
|
||
|
public function fopen_request($url,$r){
|
||
|
|
||
|
$handle = fopen($url, 'r');
|
||
|
|
||
|
if( $handle === false ){
|
||
|
static::$debug['fopen'] = 'no handle';
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
static::stream_timeout($handle,$r['timeout']);
|
||
|
|
||
|
$strResponse = $this->ReadHandle($handle);
|
||
|
$theHeaders = static::StreamHeaders($handle);
|
||
|
|
||
|
fclose($handle);
|
||
|
|
||
|
$processedHeaders = static::processHeaders($theHeaders);
|
||
|
|
||
|
$this->body = static::chunkTransferDecode($strResponse,$processedHeaders);
|
||
|
|
||
|
return $this->ReturnRequest( $url, $r, $processedHeaders );
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Parse a URL and return its components
|
||
|
*
|
||
|
*/
|
||
|
public static function ParseUrl($url){
|
||
|
|
||
|
$arr_url = parse_url($url);
|
||
|
if( is_array($arr_url) ){
|
||
|
|
||
|
$arr_url += array('path'=>'');
|
||
|
}elseif( \gp\tool::LoggedIn() ){
|
||
|
trigger_error('invalid url: '.$url.' '.pre($url));
|
||
|
}
|
||
|
|
||
|
|
||
|
return $arr_url;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Make sure the url has an http or https scheme
|
||
|
*
|
||
|
*/
|
||
|
public static function FixScheme($url){
|
||
|
|
||
|
preg_match('#^[a-z]+:#',$url,$match);
|
||
|
|
||
|
if( empty($match) ){
|
||
|
return 'http://'.$url;
|
||
|
}
|
||
|
|
||
|
$match[0] = strtolower($match[0]);
|
||
|
if( $match[0] !== 'http:' && $match[0] !== 'https:' ){
|
||
|
$url = substr($url,strlen($match[0]));
|
||
|
$url = 'http://'.ltrim($url,'/');
|
||
|
}
|
||
|
|
||
|
return $url;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Fetch a url using php's fsockopen() function
|
||
|
*
|
||
|
*/
|
||
|
public function fsockopen_request($url,$r){
|
||
|
|
||
|
$fsockopen_host = $this->url_array['host'];
|
||
|
|
||
|
//fsockopen has issues with 'localhost' with IPv6 with certain versions of PHP, It attempts to connect to ::1,
|
||
|
// which fails when the server is not setup for it. For compatibility, always connect to the IPv4 address.
|
||
|
if ( 'localhost' == strtolower($fsockopen_host) )
|
||
|
$fsockopen_host = '127.0.0.1';
|
||
|
|
||
|
$iError = null; // Store error number
|
||
|
$strError = null; // Store error string
|
||
|
|
||
|
$port = 80;
|
||
|
if( !empty($this->url_array['port']) ){
|
||
|
$port = 80;
|
||
|
}
|
||
|
$handle = fsockopen( $fsockopen_host, $port, $iError, $strError, $r['timeout'] );
|
||
|
|
||
|
if( $handle === false ){
|
||
|
static::$debug['fsock'] = 'no handle';
|
||
|
return false;
|
||
|
}
|
||
|
static::stream_timeout($handle,$r['timeout']);
|
||
|
|
||
|
|
||
|
$strHeaders = $this->ReqHeader($r);
|
||
|
|
||
|
fwrite($handle, $strHeaders);
|
||
|
|
||
|
$strResponse = $this->ReadHandle($handle);
|
||
|
|
||
|
fclose($handle);
|
||
|
|
||
|
$process = static::processResponse($strResponse);
|
||
|
$processedHeaders = static::processHeaders($process['headers']);
|
||
|
$this->body = static::chunkTransferDecode($process['body'],$processedHeaders);
|
||
|
|
||
|
return $this->ReturnRequest( $url, $r, $processedHeaders );
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Return request header string
|
||
|
*
|
||
|
*/
|
||
|
protected function ReqHeader($r){
|
||
|
|
||
|
$requestPath = $this->url_array['path'] . ( isset($this->url_array['query']) ? '?' . $this->url_array['query'] : '' );
|
||
|
if ( empty($requestPath) )
|
||
|
$requestPath .= '/';
|
||
|
|
||
|
$strHeaders = strtoupper($r['method']) . ' ' . $requestPath . ' HTTP/' . $r['httpversion'] . "\r\n";
|
||
|
$strHeaders .= 'Host: ' . $this->url_array['host'] . "\r\n";
|
||
|
|
||
|
if ( isset($r['user-agent']) )
|
||
|
$strHeaders .= 'User-agent: ' . $r['user-agent'] . "\r\n";
|
||
|
|
||
|
$strHeaders .= "\r\n";
|
||
|
|
||
|
return $strHeaders;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Read all content from the handle
|
||
|
*
|
||
|
*/
|
||
|
protected function ReadHandle($handle){
|
||
|
$response = '';
|
||
|
while( !feof($handle) ){
|
||
|
$response .= fread($handle, 4096);
|
||
|
|
||
|
if( strlen($response) > static::$maxlength ){
|
||
|
break;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
return $response;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Fetch a url using php's curl library
|
||
|
*
|
||
|
*/
|
||
|
protected function curl_request($url, $r){
|
||
|
|
||
|
$handle = curl_init();
|
||
|
|
||
|
if( $handle === false ){
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* CURLOPT_TIMEOUT and CURLOPT_CONNECTTIMEOUT expect integers. Have to use ceil since.
|
||
|
* a value of 0 will allow an unlimited timeout.
|
||
|
*/
|
||
|
$timeout = (int) ceil( $r['timeout'] );
|
||
|
curl_setopt( $handle, CURLOPT_CONNECTTIMEOUT, $timeout );
|
||
|
curl_setopt( $handle, CURLOPT_TIMEOUT, $timeout );
|
||
|
|
||
|
curl_setopt( $handle, CURLOPT_URL, $url);
|
||
|
curl_setopt( $handle, CURLOPT_RETURNTRANSFER, true );
|
||
|
//curl_setopt( $handle, CURLOPT_SSL_VERIFYHOST, ( $ssl_verify === true ) ? 2 : false );
|
||
|
//curl_setopt( $handle, CURLOPT_SSL_VERIFYPEER, $ssl_verify );
|
||
|
|
||
|
//if ( $ssl_verify ) {
|
||
|
// curl_setopt( $handle, CURLOPT_CAINFO, $r['sslcertificates'] );
|
||
|
//}
|
||
|
|
||
|
curl_setopt( $handle, CURLOPT_USERAGENT, $r['user-agent'] );
|
||
|
|
||
|
/*
|
||
|
* The option doesn't work with safe mode or when open_basedir is set, and there's
|
||
|
* a bug #17490 with redirected POST requests, so handle redirections outside Curl.
|
||
|
*/
|
||
|
curl_setopt( $handle, CURLOPT_FOLLOWLOCATION, false );
|
||
|
if ( defined( 'CURLOPT_PROTOCOLS' ) ) // PHP 5.2.10 / cURL 7.19.4
|
||
|
curl_setopt( $handle, CURLOPT_PROTOCOLS, CURLPROTO_HTTP | CURLPROTO_HTTPS );
|
||
|
|
||
|
curl_setopt( $handle, CURLOPT_CUSTOMREQUEST, $r['method'] );
|
||
|
curl_setopt( $handle, CURLOPT_HEADERFUNCTION, array( $this, 'curl_headers' ) );
|
||
|
curl_setopt( $handle, CURLOPT_WRITEFUNCTION, array( $this, 'curl_body' ) );
|
||
|
curl_setopt( $handle, CURLOPT_HEADER, 0 );
|
||
|
|
||
|
if( $r['httpversion'] == '1.0' ){
|
||
|
curl_setopt( $handle, CURLOPT_HTTP_VERSION, CURL_HTTP_VERSION_1_0 );
|
||
|
}else{
|
||
|
curl_setopt( $handle, CURLOPT_HTTP_VERSION, CURL_HTTP_VERSION_1_1 );
|
||
|
}
|
||
|
|
||
|
curl_exec( $handle );
|
||
|
|
||
|
|
||
|
if( !$r['ignore_errors'] && curl_errno( $handle ) ){
|
||
|
static::$debug['curl_error'] = curl_error( $handle );
|
||
|
curl_close( $handle );
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
curl_close( $handle );
|
||
|
|
||
|
|
||
|
$processedHeaders = static::processHeaders($this->headers);
|
||
|
|
||
|
return $this->ReturnRequest( $url, $r, $processedHeaders );
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Grab the headers of the cURL request
|
||
|
*
|
||
|
* Each header is sent individually to this callback, so we append to the $header property for temporary storage
|
||
|
*
|
||
|
* @since 3.2.0
|
||
|
* @access private
|
||
|
* @return int
|
||
|
*/
|
||
|
private function curl_headers( $handle, $headers ) {
|
||
|
$this->headers .= $headers;
|
||
|
return strlen( $headers );
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Grab the body of the cURL request
|
||
|
*
|
||
|
* The contents of the document are passed in chunks, so we append to the $body property for temporary storage.
|
||
|
* Returning a length shorter than the length of $data passed in will cause cURL to abort the request with CURLE_WRITE_ERROR
|
||
|
*
|
||
|
* @since 3.6.0
|
||
|
* @access private
|
||
|
* @return int
|
||
|
*/
|
||
|
private function curl_body( $handle, $data ) {
|
||
|
$data_length = strlen( $data );
|
||
|
|
||
|
$this->body .= $data;
|
||
|
|
||
|
$this->bytes_written_total += $data_length;
|
||
|
|
||
|
// Upon event of this function returning less than strlen( $data ) curl will error with CURLE_WRITE_ERROR.
|
||
|
return $data_length;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Set the stream timeout
|
||
|
*
|
||
|
*/
|
||
|
public static function stream_timeout($handle,$time){
|
||
|
|
||
|
if( !function_exists('stream_set_timeout') ){
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
$timeout = (int) floor( $time );
|
||
|
$utimeout = $timeout == $time ? 0 : 1000000 * $time % 1000000;
|
||
|
stream_set_timeout( $handle, $timeout, $utimeout );
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Return the response info or redirection
|
||
|
*
|
||
|
*/
|
||
|
public function ReturnRequest( $url, $r, $processedHeaders ){
|
||
|
|
||
|
// If location is found, then assume redirect and redirect to location.
|
||
|
$redir_location = $this->RedirectLocation($processedHeaders);
|
||
|
if( $redir_location !== false ){
|
||
|
if( $redir_location == $url ){
|
||
|
// redirecting to the same url
|
||
|
// need cookies
|
||
|
if( \gp\tool::LoggedIn() ){
|
||
|
msg('infinite redirection: '.$redir_location);
|
||
|
}
|
||
|
return false;
|
||
|
}
|
||
|
return $this->Redirect($redir_location,$r);
|
||
|
}
|
||
|
|
||
|
if( isset($processedHeaders['headers']['content-encoding']) && $processedHeaders['headers']['content-encoding'] == 'gzip' ){
|
||
|
$this->Inflate();
|
||
|
}
|
||
|
|
||
|
return array('headers' => $processedHeaders['headers'], 'body' => $this->body, 'response' => $processedHeaders['response'], 'cookies' => $processedHeaders['cookies']);
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Inflate the gzipped content
|
||
|
*
|
||
|
*/
|
||
|
public function Inflate(){
|
||
|
|
||
|
$body = @gzdecode($this->body);
|
||
|
if( $body ){
|
||
|
$this->body = $body;
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
$body = @gzinflate(substr($this->body, 10));
|
||
|
if( $body ){
|
||
|
$this->body = $body;
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
trigger_error('RemoteGet::Inflate() failed. Content: '.substr($this->body,0,200));
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Handle a redirect response
|
||
|
*
|
||
|
*/
|
||
|
public function Redirect($location,$r){
|
||
|
|
||
|
if( $r['redirection']-- < 0 ){
|
||
|
trigger_error('Too many redirects');
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
static::$redirected = $location;
|
||
|
static::$debug['Redir'] = 1;
|
||
|
|
||
|
return $this->_get($location, $r);
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Get the redirect location
|
||
|
*
|
||
|
*/
|
||
|
public function RedirectLocation($headers){
|
||
|
|
||
|
if( empty($headers['headers']['location']) ){
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
//check location for releative value
|
||
|
$location = $headers['headers']['location'];
|
||
|
if( is_array($headers['headers']['location']) ){
|
||
|
do{
|
||
|
$location = array_pop($headers['headers']['location']);
|
||
|
$location = trim($location);
|
||
|
|
||
|
}while( count($headers['headers']['location']) && empty($location) );
|
||
|
}
|
||
|
|
||
|
$location = trim($location);
|
||
|
|
||
|
if( empty($location) ){
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
|
||
|
// //www.example.com
|
||
|
if( substr($location,0,2) == '//' ){
|
||
|
$location = $this->url_array['scheme'].':'.$location;
|
||
|
|
||
|
// ?page=test
|
||
|
}elseif( $location[0] == '?' ){
|
||
|
$location = $this->url_array['scheme'].'://'.rtrim($this->url_array['host'],'/').'/'.ltrim($this->url_array['path'],'/').$location;
|
||
|
|
||
|
// /page
|
||
|
}elseif( $location[0] == '/' ){
|
||
|
$location = $this->url_array['scheme'].'://'.rtrim($this->url_array['host'],'/').$location;
|
||
|
|
||
|
// http://www.example.com
|
||
|
}elseif( preg_match('#^[a-z]+:#i',$location) ){
|
||
|
// do nothing
|
||
|
|
||
|
// otherwise relative path
|
||
|
}else{
|
||
|
$urla = $this->url_array;
|
||
|
unset($urla['query'], $urla['fragment']);
|
||
|
|
||
|
if( empty($urla['path']) || $urla['path'] == '/' ){
|
||
|
$urla['path'] = $location;
|
||
|
|
||
|
}elseif( substr($urla['path'],-1) != '/' ){
|
||
|
$urla['path'] .= ltrim($location,'/');
|
||
|
|
||
|
}else{
|
||
|
$urla['path'] = rtrim(dirname($urla['path']),'/'). '/' . ltrim($location,'/');
|
||
|
}
|
||
|
|
||
|
$location = $this->unparse_url($urla);
|
||
|
}
|
||
|
|
||
|
return $location;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Convert a parsed url array to a url string
|
||
|
* @param array $parsed_url
|
||
|
* @return string
|
||
|
*
|
||
|
*/
|
||
|
public function unparse_url($parsed_url) {
|
||
|
|
||
|
$scheme = isset($parsed_url['scheme']) ? $parsed_url['scheme'] . '://' : '';
|
||
|
$host = isset($parsed_url['host']) ? $parsed_url['host'] : '';
|
||
|
$port = isset($parsed_url['port']) ? ':' . $parsed_url['port'] : '';
|
||
|
$user = isset($parsed_url['user']) ? $parsed_url['user'] : '';
|
||
|
$pass = isset($parsed_url['pass']) ? ':' . $parsed_url['pass'] : '';
|
||
|
$pass = ($user || $pass) ? "$pass@" : '';
|
||
|
$path = isset($parsed_url['path']) ? '/'.ltrim($parsed_url['path'],'/') : '';
|
||
|
$query = isset($parsed_url['query']) ? '?' . $parsed_url['query'] : '';
|
||
|
$fragment = isset($parsed_url['fragment']) ? '#' . $parsed_url['fragment'] : '';
|
||
|
|
||
|
return "$scheme$user$pass$host$port$path$query$fragment";
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Decodes chunk transfer-encoding, based off the HTTP 1.1 specification.
|
||
|
*
|
||
|
* Based off the HTTP http_encoding_dechunk function. Does not support UTF-8. Does not support
|
||
|
* returning footer headers. Shouldn't be too difficult to support it though.
|
||
|
*
|
||
|
* @todo Add support for footer chunked headers.
|
||
|
* @access public
|
||
|
* @since 1.7
|
||
|
* @static
|
||
|
*
|
||
|
* @param string $body Body content
|
||
|
* @return string Chunked decoded body on success or raw body on failure.
|
||
|
*/
|
||
|
public static function chunkTransferDecode($body,$headers){
|
||
|
|
||
|
if( !static::IsChunked($body,$headers) ){
|
||
|
return $body;
|
||
|
}
|
||
|
|
||
|
$parsed_body = '';
|
||
|
|
||
|
// We'll be altering $body, so need a backup in case of error.
|
||
|
$body_original = $body;
|
||
|
|
||
|
while ( true ) {
|
||
|
$has_chunk = (bool) preg_match( '/^([0-9a-f]+)[^\r\n]*\r\n/i', $body, $match );
|
||
|
if ( ! $has_chunk || empty( $match[1] ) )
|
||
|
return $body_original;
|
||
|
|
||
|
$length = (int)hexdec( $match[1] );
|
||
|
$chunk_length = strlen( $match[0] );
|
||
|
|
||
|
// Parse out the chunk of data.
|
||
|
$parsed_body .= substr( $body, $chunk_length, $length );
|
||
|
|
||
|
// Remove the chunk from the raw data.
|
||
|
$body = substr( $body, $length + $chunk_length );
|
||
|
|
||
|
// End of the document.
|
||
|
if ( '0' === trim( $body ) )
|
||
|
return $parsed_body;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Return true if the response body is chunked
|
||
|
*
|
||
|
*/
|
||
|
public static function IsChunked($body, $headers){
|
||
|
|
||
|
$body = trim($body);
|
||
|
|
||
|
if( empty($body) ){
|
||
|
return false;
|
||
|
}
|
||
|
if( !isset( $headers['headers']['transfer-encoding'] ) || 'chunked' != $headers['headers']['transfer-encoding'] ){
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
|
||
|
// The body is not chunked encoded or is malformed.
|
||
|
if( ! preg_match( '/^([0-9a-f]+)[^\r\n]*\r\n/i',$body) ){
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Gets stream headers, return false otherwise
|
||
|
*
|
||
|
* @access public
|
||
|
* @static
|
||
|
* @since 1.7
|
||
|
*
|
||
|
* @param resource $handle stream handle
|
||
|
* @return array|false Array with unprocessed string headers.
|
||
|
*/
|
||
|
public static function StreamHeaders($handle){
|
||
|
|
||
|
$meta = stream_get_meta_data($handle);
|
||
|
if( !isset($meta['wrapper_data']) ){
|
||
|
return $http_response_header; //$http_response_header is a PHP reserved variable which is set in the current-scope when using the HTTP Wrapper
|
||
|
}
|
||
|
|
||
|
$theHeaders = $meta['wrapper_data'];
|
||
|
if( isset($meta['wrapper_data']['headers']) ){
|
||
|
$theHeaders = $meta['wrapper_data']['headers'];
|
||
|
}
|
||
|
|
||
|
return $theHeaders;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Parses the responses and splits the parts into headers and body.
|
||
|
*
|
||
|
* @access public
|
||
|
* @static
|
||
|
* @since 1.7
|
||
|
*
|
||
|
* @param string $strResponse The full response string
|
||
|
* @return array Array with 'headers' and 'body' keys.
|
||
|
*/
|
||
|
public static function processResponse($strResponse) {
|
||
|
list($theHeaders, $theBody) = explode("\r\n\r\n", $strResponse, 2);
|
||
|
return array('headers' => $theHeaders, 'body' => $theBody);
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Transform header string into an array.
|
||
|
*
|
||
|
* If an array is given then it is assumed to be raw header data with numeric keys with the
|
||
|
* headers as the values. No headers must be passed that were already processed.
|
||
|
*
|
||
|
* @access public
|
||
|
* @static
|
||
|
* @since 1.7
|
||
|
*
|
||
|
* @param string|array $headers
|
||
|
* @return array Processed string headers. If duplicate headers are encountered,
|
||
|
* Then a numbered array is returned as the value of that header-key.
|
||
|
*/
|
||
|
public static function processHeaders($headers) {
|
||
|
|
||
|
$headers = static::HeadersArray($headers);
|
||
|
$response = array('code' => 0, 'message' => '');
|
||
|
$cookies = array();
|
||
|
$newheaders = array();
|
||
|
|
||
|
foreach( $headers as $tempheader ){
|
||
|
|
||
|
if( false === strpos($tempheader, ':') ){
|
||
|
$stack = explode(' ', $tempheader, 3);
|
||
|
$stack[] = '';
|
||
|
list( , $response['code'], $response['message']) = $stack;
|
||
|
continue;
|
||
|
}
|
||
|
|
||
|
list($key, $value) = explode(':', $tempheader, 2);
|
||
|
$key = strtolower( $key );
|
||
|
$value = trim( $value );
|
||
|
|
||
|
if( isset( $newheaders[$key] ) ){
|
||
|
if( !is_array( $newheaders[$key] ) ){
|
||
|
$newheaders[$key] = array( $newheaders[$key] );
|
||
|
}
|
||
|
$newheaders[$key][] = $value;
|
||
|
}else{
|
||
|
$newheaders[$key] = $value;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
|
||
|
static::$debug['Headers'] = count($newheaders);
|
||
|
|
||
|
return array('response' => $response, 'headers' => $newheaders, 'cookies' => $cookies);
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Split header header string into array if needed
|
||
|
*
|
||
|
*/
|
||
|
protected static function HeadersArray($headers){
|
||
|
// split headers, one per array element
|
||
|
if ( is_string($headers) ) {
|
||
|
// tolerate line terminator: CRLF = LF (RFC 2616 19.3)
|
||
|
$headers = str_replace("\r\n", "\n", $headers);
|
||
|
// unfold folded header fields. LWS = [CRLF] 1*( SP | HT ) <US-ASCII SP, space (32)>, <US-ASCII HT, horizontal-tab (9)> (RFC 2616 2.2)
|
||
|
$headers = preg_replace('/\n[ \t]/', ' ', $headers);
|
||
|
// create the headers array
|
||
|
$headers = explode("\n", $headers);
|
||
|
}
|
||
|
$headers = (array)$headers;
|
||
|
$headers = array_filter($headers);
|
||
|
|
||
|
return $headers;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Output debug info about the most recent request
|
||
|
*
|
||
|
*/
|
||
|
public static function Debug($lang_key, $debug = array()){
|
||
|
|
||
|
$debug = array_merge(static::$debug,$debug);
|
||
|
|
||
|
return \gp\tool::Debug($lang_key, $debug);
|
||
|
}
|
||
|
|
||
|
|
||
|
}
|
||
|
}
|
||
|
|
||
|
namespace {
|
||
|
class gpRemoteGet extends \gp\tool\RemoteGet{}
|
||
|
}
|