From fb9df0c269f36703909b8b259abbdbed29881ecd Mon Sep 17 00:00:00 2001 From: tcit Date: Thu, 24 Jul 2014 21:56:04 +0200 Subject: use directly MOBIClass --- inc/3rdparty/libraries/MOBIClass/Http.php | 171 ++++++++++++++++++++++++++++++ 1 file changed, 171 insertions(+) create mode 100644 inc/3rdparty/libraries/MOBIClass/Http.php (limited to 'inc/3rdparty/libraries/MOBIClass/Http.php') diff --git a/inc/3rdparty/libraries/MOBIClass/Http.php b/inc/3rdparty/libraries/MOBIClass/Http.php new file mode 100644 index 00000000..9e5852e3 --- /dev/null +++ b/inc/3rdparty/libraries/MOBIClass/Http.php @@ -0,0 +1,171 @@ + 'val1', 'var2' => 'val2') */ + $postdata = array(), /* HTTP POST Data ie. array('var1' => 'val1', 'var2' => 'val2') */ + $cookie = array(), /* HTTP Cookie Data ie. array('var1' => 'val1', 'var2' => 'val2') */ + $custom_headers = array(), /* Custom HTTP headers ie. array('Referer: http://localhost/ */ + $timeout = 1000, /* Socket timeout in milliseconds */ + $req_hdr = false, /* Include HTTP request headers */ + $res_hdr = false, /* Include HTTP response headers */ + $depth = 4 /* Depth of the iteration left (to avoid redirection loops) */ + ) + { + if(self::$cache){ + $cacheFile = "cache/".$ip."/".str_replace("/", "...", $uri); + + if(is_file($cacheFile)){ + $data = file_get_contents($cacheFile); + + return self::resolveTruncated($data); + } + } + $ret = ''; + $verb = strtoupper($verb); + $cookie_str = ''; + $getdata_str = count($getdata) ? '?' : ''; + $postdata_str = ''; + + foreach ($getdata as $k => $v) + $getdata_str .= urlencode($k) .'='. urlencode($v); + + foreach ($postdata as $k => $v) + $postdata_str .= urlencode($k) .'='. urlencode($v) .'&'; + + foreach ($cookie as $k => $v) + $cookie_str .= urlencode($k) .'='. urlencode($v) .'; '; + + $crlf = "\r\n"; + $req = $verb .' '. $uri . $getdata_str .' HTTP/1.1' . $crlf; + $req .= 'Host: '. $ip . $crlf; + $req .= 'User-Agent: Mozilla/5.0 Firefox/3.6.12' . $crlf; + $req .= 'Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8' . $crlf; + $req .= 'Accept-Language: en-us,en;q=0.5' . $crlf; + $req .= 'Accept-Encoding: deflate' . $crlf; + $req .= 'Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7' . $crlf; + + + foreach ($custom_headers as $k => $v) + $req .= $k .': '. $v . $crlf; + + if (!empty($cookie_str)) + $req .= 'Cookie: '. substr($cookie_str, 0, -2) . $crlf; + + if ($verb == 'POST' && !empty($postdata_str)) + { + $postdata_str = substr($postdata_str, 0, -1); + $req .= 'Content-Type: application/x-www-form-urlencoded' . $crlf; + $req .= 'Content-Length: '. strlen($postdata_str) . $crlf . $crlf; + $req .= $postdata_str; + } + else $req .= $crlf; + + if ($req_hdr) + $ret .= $req; + + if (($fp = @fsockopen($ip, $port, $errno, $errstr)) == false) + return "Error $errno: $errstr\n"; + + stream_set_timeout($fp, 0, $timeout * 1000); + + fputs($fp, $req); + $ret .= stream_get_contents($fp); + fclose($fp); + + $headerSplit = strpos($ret, "\r\n\r\n"); + $header = substr($ret, 0, $headerSplit); + + $redirectURL = self::CheckForRedirect($header); + + if($redirectURL !== false){ + if($depth > 0){ + $url_parts = parse_url($redirectURL); + $url_parts["port"] = isset($url_parts["port"]) ? $url_parts["port"] : 80; + $url_parts["path"] = isset($url_parts["path"]) ? $url_parts["path"] : "/"; + + return self::FullRequest($verb, $url_parts["host"], $url_parts["port"], $url_parts["path"], $getdata, $postdata, $cookie, $custom_headers, $timeout, $req_hdr, $res_hdr, $depth-1); + }else{ + return "Redirect loop, stopping..."; + } + } + + $truncated = false; + $headerLines = explode("\r\n", $header); + foreach($headerLines as $line){ + list($name, $value) = explode(":", $line); + $name = trim($name); + $value = trim($value); + + if(strtolower($name) == "transfer-encoding" && strtolower($value) == "chunked"){ //TODO: Put right values! + $truncated = true; + } + } + + if (!$res_hdr) + $ret = substr($ret, $headerSplit + 4); + + if($truncated){ + $ret = self::resolveTruncated($ret); + } + if(self::$cache){ + if(!is_dir("cache")){ + mkdir("cache"); + } + if(!is_dir("cache/".$ip)){ + mkdir("cache/".$ip); + } + if(!is_file("cache/".$ip."/".str_replace("/", "...", $uri))){ + $h = fopen("cache/".$ip."/".str_replace("/", "...", $uri), "w"); + fwrite($h, $ret); + fclose($h); + } + } + + return $ret; + } + + private static function resolveTruncated($data){ + $pos = 0; + $end = strlen($data); + $out = ""; + + while($pos < $end){ + $endVal = strpos($data, "\r\n", $pos); + $value = hexdec(substr($data, $pos, $endVal-$pos)); + $out .= substr($data, $endVal+2, $value); + $pos = $endVal+2+$value; + } + + return $out; + } + + private static function CheckForRedirect($header){ + $firstLine = substr($header, 0, strpos($header, "\r\n")); + list($httpVersion, $statusCode, $message) = explode(" ", $firstLine); + + if(substr($statusCode, 0, 1) == "3"){ + $part = substr($header, strpos(strtolower($header), "location: ")+strlen("location: ")); + $location = trim(substr($part, 0, strpos($part, "\r\n"))); + + if(strlen($location) > 0){ + return $location; + } + } + return false; + } +} +?> \ No newline at end of file -- cgit v1.2.3