From 26e29d7f885f929793b9f0720fde8843e7bf8d6d Mon Sep 17 00:00:00 2001 From: friendica Date: Thu, 9 Aug 2012 20:31:06 -0700 Subject: zot basic comm structure (real basic) --- include/network.php | 90 +++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 90 insertions(+) (limited to 'include/network.php') diff --git a/include/network.php b/include/network.php index 6b9557234..e987c5fb4 100644 --- a/include/network.php +++ b/include/network.php @@ -182,6 +182,96 @@ function post_url($url,$params, $headers = null, &$redirects = 0, $timeout = 0) return($body); }} +if(! function_exists('z_fetch_url')) { +function z_fetch_url($url,$binary = false, &$redirects = 0, $timeout = 0, $accept_content=Null) { + + $ret = array('return_code' => 0, 'success' => false, 'header' => "", 'body' => ""); + + $a = get_app(); + + $ch = @curl_init($url); + if(($redirects > 8) || (! $ch)) + return false; + + @curl_setopt($ch, CURLOPT_HEADER, true); + + if (!is_null($accept_content)){ + curl_setopt($ch,CURLOPT_HTTPHEADER, array ( + "Accept: " . $accept_content + )); + } + + @curl_setopt($ch, CURLOPT_RETURNTRANSFER,true); + @curl_setopt($ch, CURLOPT_USERAGENT, "Mozilla/5.0 (compatible; Friendica)"); + + + if(intval($timeout)) { + @curl_setopt($ch, CURLOPT_TIMEOUT, $timeout); + } + else { + $curl_time = intval(get_config('system','curl_timeout')); + @curl_setopt($ch, CURLOPT_TIMEOUT, (($curl_time !== false) ? $curl_time : 60)); + } + // by default we will allow self-signed certs + // but you can override this + + $check_cert = get_config('system','verifyssl'); + @curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, (($check_cert) ? true : false)); + + $prx = get_config('system','proxy'); + if(strlen($prx)) { + @curl_setopt($ch, CURLOPT_HTTPPROXYTUNNEL, 1); + @curl_setopt($ch, CURLOPT_PROXY, $prx); + $prxusr = @get_config('system','proxyuser'); + if(strlen($prxusr)) + @curl_setopt($ch, CURLOPT_PROXYUSERPWD, $prxusr); + } + if($binary) + @curl_setopt($ch, CURLOPT_BINARYTRANSFER,1); + + + // don't let curl abort the entire application + // if it throws any errors. + + $s = @curl_exec($ch); + + $base = $s; + $curl_info = @curl_getinfo($ch); + $http_code = $curl_info['http_code']; +// logger('fetch_url:' . $http_code . ' data: ' . $s); + $header = ''; + + // Pull out multiple headers, e.g. proxy and continuation headers + // allow for HTTP/2.x without fixing code + + while(preg_match('/^HTTP\/[1-2].+? [1-5][0-9][0-9]/',$base)) { + $chunk = substr($base,0,strpos($base,"\r\n\r\n")+4); + $header .= $chunk; + $base = substr($base,strlen($chunk)); + } + + if($http_code == 301 || $http_code == 302 || $http_code == 303 || $http_code == 307) { + $matches = array(); + preg_match('/(Location:|URI:)(.*?)\n/', $header, $matches); + $newurl = trim(array_pop($matches)); + if(strpos($newurl,'/') === 0) + $newurl = $url . $newurl; + $url_parsed = @parse_url($newurl); + if (isset($url_parsed)) { + $redirects++; + @curl_close($ch); + return z_fetch_url($newurl,$binary,$redirects,$timeout,$accpt_content); + } + } + + $rc = intval($http_code); + $ret['return_code'] = $rc; + $ret['success'] = (($rc >= 200 && $rc <= 299) ? true : false); + $ret['body'] = substr($s,strlen($header)); + $ret['header'] = $header; + @curl_close($ch); + return($ret); +}} -- cgit v1.2.3