require_once CLASS_DIR . "limit_traffic.class.php";
$traffic = new traffics();
if ($traffic->is_error != 0) {
html_error($traffic->ret_msg, 0);
}
$traffic->get();
if ($options["day_reset_trafic"] > 0) {
$traffic->autoreset();
}
$is_exceed = $traffic->total - $traffic->max >= 0;
$is_expired = $traffic->is_expired;
}
// Check working time
$is_worktime = $options["limit_timework"] ? cek_worktime($options["workstart"], $options["workend"]) : true;
// Check storages
$serverfiles = calcUsedSpace();
$storage_exceed = false;
if ($options["storage_limit"] > 0) {
if ($serverfiles > $options["storage_limit"] * 1024 * 1024) {
$storage_exceed = true;
}
}
// Check download limit by ip
$FilesDownloadedPerTime = 0;
$is_dllimit = false;
if ($options['downloadLimitbyIP']) {
if ($visitors->is_error != 0) {
html_error($visitors->ret_msg);
}
$visitors->_create_list_LIP();
foreach ($list as $k => $file) {
function geturl($host, $port, $url, $referer = 0, $cookie = 0, $post = 0, $saveToFile = 0, $proxy = 0, $pauth = 0, $auth = 0, $scheme = "http", $resume_from = 0, $XMLRequest = 0)
{
global $nn, $lastError, $Resume, $bytesReceived, $fs, $force_name, $options, $L, $visitors, $ada_acc;
$scheme .= '://';
if ($post !== 0 && ($scheme == 'http://' || $scheme == 'https://')) {
$method = 'POST';
$postdata = is_array($post) ? formpostdata($post) : $post;
$length = strlen($postdata);
$content_tl = "Content-Type: application/x-www-form-urlencoded{$nn}" . "Content-Length: {$length}{$nn}";
} else {
$method = 'GET';
$content_tl = $postdata = '';
}
$cookies = '';
if (!empty($cookie)) {
if (is_array($cookie)) {
if (count($cookie) > 0) {
$cookies = 'Cookie: ' . CookiesToStr($cookie) . $nn;
}
} else {
$cookies = 'Cookie: ' . trim($cookie) . $nn;
}
}
$referer = $referer ? "Referer: {$referer}{$nn}" : '';
if ($scheme == 'https://') {
$scheme = 'ssl://';
if ($port == 0 || $port == 80) {
$port = 443;
}
}
if ($proxy) {
list($proxyHost, $proxyPort) = explode(':', $proxy, 2);
$host = $host . ($port != 80 && ($scheme != 'ssl://' || $port != 443) ? ':' . $port : '');
$url = $scheme . $host . $url;
}
if ($scheme != 'ssl://') {
$scheme = '';
}
$http_auth = !empty($auth) ? "Authorization: Basic {$auth}{$nn}" : '';
$proxyauth = !empty($pauth) ? "Proxy-Authorization: Basic {$pauth}{$nn}" : '';
$request = array();
$request[] = $method . ' ' . str_replace(' ', '%20', $url) . ' HTTP/1.1';
$request[] = "Host: {$host}";
$request[] = 'User-Agent: Opera/9.80 (Windows NT 6.1) Presto/2.12.388 Version/12.12';
$request[] = 'Accept: */*';
$request[] = 'Accept-Language: en-US;q=0.7,en;q=0.3';
$request[] = 'Accept-Charset: utf-8,windows-1251;q=0.7,*;q=0.7';
$request[] = 'Pragma: no-cache';
$request[] = 'Cache-Control: no-cache';
if ($Resume['use'] === TRUE) {
$request[] = 'Range: bytes=' . $Resume['from'] . '-';
}
if ($XMLRequest) {
$request[] = 'X-Requested-With: XMLHttpRequest';
}
$request = implode($nn, $request) . $nn . $http_auth . $proxyauth . $referer . $cookies . $content_tl . 'Connection: Close' . $nn . $nn . $postdata;
if (isset($options['mip_enabled']) && $options['mip_enabled']) {
$mip_action = "download";
echo "<p>Multi IP Enabled</b>...<br />\n";
if (file_exists(CLASS_DIR . "mip.php")) {
@(include CLASS_DIR . "mip.php");
}
} else {
$errno = 0;
$errstr = '';
$hosts = (!empty($proxyHost) ? $scheme . $proxyHost : $scheme . $host) . ':' . (!empty($proxyPort) ? $proxyPort : $port);
$fp = @stream_socket_client($hosts, $errno, $errstr, 120, STREAM_CLIENT_CONNECT);
}
if (!$fp) {
$dis_host = !empty($proxyHost) ? $proxyHost : $host;
$dis_port = !empty($proxyPort) ? $proxyPort : $port;
html_error($L->sprintf($L->say['_couldnt_con_to'], $dis_host, $dis_port));
}
if ($errno || $errstr) {
$lastError = $errstr;
return false;
}
if ($saveToFile) {
if ($proxy) {
echo '<p>' . $L->sprintf($L->say['_con_proxy'], $proxyHost, $proxyPort) . '<br />';
echo "GET: <b>" . $url . "</b>...<br />\n";
} else {
echo "<p>";
echo $L->sprintf($L->say['_con_to'], $host, $port) . '<br />';
echo isset($options['mip_enabled']) && $options['mip_enabled'] ? "using IP: " . $mip_ip . "<br />\n" : "";
}
}
#########################################################################
fputs($fp, $request);
fflush($fp);
$timeStart = getmicrotime();
// Rewrote the get header function according to the proxy script
// Also made sure it goes faster and I think 8192 is the best value for retrieving headers
// Oops.. The previous function hooked up everything and now I'm returning it back to normal
$llen = 0;
$header = '';
do {
$header .= fgets($fp, 16384);
$len = strlen($header);
if (!$header || $len == $llen) {
$lastError = $L->say['_noheader'];
return false;
}
$llen = $len;
} while (strpos($header, $nn . $nn) === false);
#########################################################################
if ($saveToFile) {
if (!isset($_GET['dis_plug']) || $_GET['dis_plug'] != 'on') {
$cbhost = strpos($host, ':') !== false ? substr($host, 0, strpos($host, ':')) : $host;
// Remove the port that may be added when it's using proxy
$chkhost = preg_match('/^\\d{1,3}.\\d{1,3}.\\d{1,3}.\\d{1,3}$/', $cbhost) ? false : true;
if (!empty($referer)) {
$cbrefhost = str_ireplace('www.', '', cut_str($referer, 'Referer: ', "\r\n"));
$cbrefhost = parse_url($cbrefhost, PHP_URL_HOST);
$chkref = empty($cbrefhost) || preg_match('/^\\d{1,3}.\\d{1,3}.\\d{1,3}.\\d{1,3}$/', $cbrefhost) ? false : ($chkhost && strtolower($cbhost) == strtolower($cbrefhost) ? false : true);
} else {
$chkref = false;
}
$found = false;
if ($chkhost || $chkref) {
foreach ($GLOBALS['host'] as $site => $file) {
if ($chkhost && host_matches($site, $cbhost)) {
$found = true;
} elseif ($chkref && host_matches($site, $cbrefhost)) {
$found = true;
}
if ($found) {
if ($options['limitbyIP']) {
if ($ada_acc) {
global $premium_acc;
if (preg_match('|^(?:.+\\.)?(.+\\..+)$|i', $cbhost, $prematch) || preg_match('|^(?:.+\\.)?(.+\\..+)$|i', $cbrefhost, $prematch)) {
$prematch = str_replace('.', '_', $prematch[1]);
if (!empty($premium_acc[$prematch])) {
$fname = basename($saveToFile) . "." . rand(1, 1000);
$limitedfile = $visitors->userip . $fname;
$ret = mkdir($visitors->tmp_dir . $limitedfile, 0777);
}
}
}
}
require_once HOST_DIR . 'DownloadClass.php';
require_once HOST_DIR . "download/{$file}";
$class = substr($file, 0, -4);
$firstchar = substr($file, 0, 1);
if ($firstchar > 0) {
$class = "d{$class}";
}
if (!class_exists($class) || !method_exists($class, 'CheckBack')) {
break;
}
// is_callable(array($class , 'CheckBack'))
$hostClass = new $class(false);
$hostClass->CheckBack($header);
break;
}
}
unset($cbhost, $cbrefhost, $chkhost, $chkref, $found);
}
}
if (preg_match('/^HTTP\\/1\\.[0|1] (\\d+) .*/', $header, $responsecode) && ($responsecode[1] == 404 || $responsecode[1] == 403)) {
// Do some checking, please, at least tell them what error it was
if ($responsecode[1] == 403) {
$lastError = $L->say['_page_notfound'];
} elseif ($responsecode[1] == 404) {
$lastError = $L->say['_forbidden_access'];
} else {
// Weird, it shouldn't come here...
$lastError = $L->say['_notfound_forbidden'];
}
return false;
}
$bytesTotal = trim(cut_str($header, "Content-Length:", "\n"));
if ($options['maxlimitsize'] > 0) {
if ($bytesTotal > $options['maxlimitsize'] * 1024 * 1024) {
$lastError = $L->sprintf($L->say['_sorry_tobig'], bytesToKbOrMbOrGb($bytesTotal), $options["maxlimitsize"]);
return false;
}
}
if ($options['minlimitsize'] > 0) {
if ($bytesTotal < $options['minlimitsize'] * 1024 * 1024) {
$lastError = $L->sprintf($L->say['_sorry_tosmall'], bytesToKbOrMbOrGb($bytesTotal), $options["minlimitsize"]);
return false;
}
}
// check storage limit (it is in MB)
if ($options['storage_limit'] > 0) {
$serverfiles = calcUsedSpace();
if ($serverfiles + $bytesTotal > $options['storage_limit'] * 1024 * 1024) {
$lastError = $L->sprintf($L->say['_sorry_insuficient_storage'], bytesToKbOrMbOrGb($serverfiles), $options["storage_limit"]);
return false;
}
}
if (stripos($header, "\nLocation: ") !== false && preg_match('/\\nLocation: ([^\\r\\n]+)/i', $header, $redir)) {
$redirect = trim($redir[1]);
$lastError = $L->sprintf($L->say['_error_redirectto'], $redirect);
return FALSE;
}
if (in_array(cut_str($header, "WWW-Authenticate: ", " "), array("Basic", "Digest"))) {
$lastError = $L->say['_req_auth'];
return FALSE;
}
//$ContentType = trim(cut_str($header, "Content-Type:", "\n"));
if ($Resume['use'] === TRUE && stripos($header, "\nContent-Range: ") === false) {
$lastError = stripos($header, '503 Limit Exceeded') !== false ? $L->say['_error_resume'] : $L->say['_error_noresume'];
return FALSE;
}
if ($force_name) {
$FileName = $force_name;
$saveToFile = dirname($saveToFile) . PATH_SPLITTER . $FileName;
} else {
$ContentDisposition = trim(cut_str($header, "Content-Disposition:", "\n")) . "\n";
if ($ContentDisposition && stripos($ContentDisposition, "filename=") !== false) {
$FileName = trim(trim(trim(trim(trim(cut_str($ContentDisposition, "filename=", "\n")), "="), "?"), ";"), '"');
if (strpos($FileName, "/") !== false) {
$FileName = basename($FileName);
}
if (preg_match("/UTF\\-8\\?B\\?(.*)\$/i", $FileName, $b64)) {
$FileName = preg_replace("/[^a-zA-Z0-9\\-\\.]/", "_", base64_decode($b64[1]));
}
$saveToFile = dirname($saveToFile) . PATH_SPLITTER . $FileName;
}
}
if (!empty($options["add_ext_5city"]) || !empty($options['rename_suffix']) || !empty($options['rename_prefix']) || $options['rename_underscore']) {
if (!empty($options["add_ext_5city"])) {
$ext = str_replace(".", "", $options["add_ext_5city"]);
$File_Name = basename($saveToFile) . "." . $options["add_ext_5city"];
}
if (!empty($options['rename_prefix'])) {
$File_Name = $options['rename_prefix'] . '_' . basename($saveToFile);
}
if (!empty($options['rename_suffix'])) {
$ext = strrchr(basename($saveToFile), ".");
$before_ext = explode($ext, basename($saveToFile));
$File_Name = $before_ext[0] . '_' . $options['rename_suffix'] . $ext;
}
if ($options['rename_underscore']) {
$File_Name = str_replace(array(' ', '%20'), '_', basename($saveToFile));
}
$saveToFile = dirname($saveToFile) . PATH_SPLITTER . $File_Name;
}
$filetype = strrchr($saveToFile, ".");
if (is_array($options['forbidden_filetypes']) && in_array(strtolower($filetype), $options['forbidden_filetypes'])) {
if ($options['forbidden_filetypes_block']) {
$lastError = $L->sprintf($L->say['_forbid_filetype'], $filetype);
return false;
} else {
$saveToFile = str_replace($filetype, $options['rename_these_filetypes_to'], $saveToFile);
}
}
if (@file_exists($saveToFile) && $options['bw_save']) {
html_error($L->say['_download'] . ': ' . link_for_file($saveToFile), 0);
}
if (@file_exists($saveToFile) && $Resume["use"] === TRUE) {
$fs = @fopen($saveToFile, "ab");
if (!$fs) {
$lastError = $L->sprintf($L->say['_error_cantsave'], basename($saveToFile)) . '<br />' . $L->say['_error_trychmod'] . '<br /><a href="javascript:location.reload();">' . $L->say['_error_tryagain'] . '</a>';
return FALSE;
}
} else {
if (@file_exists($saveToFile)) {
$saveToFile = dirname($saveToFile) . PATH_SPLITTER . TIME_NOW . "_" . basename($saveToFile);
}
$fs = @fopen($saveToFile, "wb");
if (!$fs) {
$secondName = dirname($saveToFile) . PATH_SPLITTER . str_replace(":", "", str_replace("?", "", basename($saveToFile)));
$fs = @fopen($secondName, "wb");
if (!$fs) {
$lastError = $L->sprintf($L->say['_error_cantsave'], basename($saveToFile)) . '<br />' . $L->say['_error_trychmod'] . '<br /><a href="javascript:location.reload();">' . $L->say['_error_tryagain'] . '</a>';
return FALSE;
}
}
}
flock($fs, LOCK_EX);
if ($Resume['use'] === TRUE && stripos($header, "\nContent-Range: ") !== false) {
list($temp, $Resume['range']) = explode(' ', trim(cut_str($header, "\nContent-Range: ", "\n")));
list($Resume['range'], $fileSize) = explode('/', $Resume['range']);
$fileSize = bytesToKbOrMbOrGb($fileSize);
} else {
$fileSize = bytesToKbOrMbOrGb($bytesTotal);
}
$chunkSize = GetChunkSize($bytesTotal);
$File_Name = basename($saveToFile);
if (!empty($options["add_ext_5city"])) {
$ext = "." . get_extension(basename($saveToFile));
$File_Name = str_replace($ext, "", basename($saveToFile));
}
echo $L->sprintf($L->say['_saveprogres'], $File_Name, $ext, $fileSize) . '<br />';
//$scriptStarted = false;
require_once TEMPLATE_DIR . 'transloadui.php';
if ($Resume['use'] === TRUE) {
$received = bytesToKbOrMbOrGb(filesize($saveToFile));
$percent = round($Resume['from'] / ($bytesTotal + $Resume['from']) * 100, 2);
echo '<script type="text/javascript">pr(' . "'" . $percent . "', '" . $received . "', '0');</script>";
//$scriptStarted = true;
flush();
}
} else {
$page = "";
}
$time = $last = $lastChunkTime = 0;
do {
$data = @fread($fp, $saveToFile ? $chunkSize : 16384);
// 16384 saw this value in Pear HTTP_Request2 package // (fix - szal) using this actually just causes massive cpu usage for large files, too much data is flushed to the browser!)
if ($data == '') {
break;
}
if ($saveToFile) {
$bytesSaved = fwrite($fs, $data);
if ($bytesSaved !== false && strlen($data) == $bytesSaved) {
//if ($bytesSaved > - 1) {
$bytesReceived += $bytesSaved;
} else {
$lastError = $L->sprintf($L->say['_error_imposible_record'], $saveToFile);
unlink($saveToFile);
return false;
}
if ($bytesReceived >= $bytesTotal) {
$percent = 100;
} else {
$percent = @round(($bytesReceived + $Resume['from']) / ($bytesTotal + $Resume['from']) * 100, 2);
}
if ($bytesReceived > $last + $chunkSize) {
$received = bytesToKbOrMbOrGb($bytesReceived + $Resume['from']);
$time = getmicrotime() - $timeStart;
$chunkTime = $time - $lastChunkTime;
$chunkTime = $chunkTime ? $chunkTime : 1;
$lastChunkTime = $time;
$speed = @round($chunkSize / 1024 / $chunkTime, 2);
/* if (!$scriptStarted) {
echo('<script type="text/javascript">');
$scriptStarted = true;
} */
echo "<script type='text/javascript'>pr('" . $percent . "', '" . $received . "', '" . $speed . "');</script>";
$last = $bytesReceived;
}
} else {
$page .= $data;
}
} while (strlen($data) > 0);
//echo('</script>');
if ($saveToFile) {
flock($fs, LOCK_UN);
fclose($fs);
if ($bytesReceived <= 0) {
$lastError = $L->say['_error_misc'];
fclose($fp);
return FALSE;
}
}
fclose($fp);
if ($saveToFile) {
return array('time' => sec2time(round($time)), 'speed' => @round($bytesTotal / 1024 / (getmicrotime() - $timeStart), 2), 'received' => true, 'size' => $fileSize, 'bytesReceived' => $bytesReceived + $Resume['from'], 'bytesTotal' => $bytesTotal + $Resume['from'], 'file' => $saveToFile);
} else {
if (stripos($header, "\nTransfer-Encoding: chunked") !== false && function_exists('http_chunked_decode')) {
$dechunked = http_chunked_decode($page);
if ($dechunked !== false) {
$page = $dechunked;
}
unset($dechunked);
}
$page = $header . $page;
return $page;
}
}
