| |
 1.5 Кб |
|
| | Получил от партнера по обмену ссылками предложение разместить на своем сайте его скрипт, автоматизирующий процесс обмена. Этот скрипт небольшой, он в приложении.
Хотелось бы узнать у Гуру рнр, не зашито ли в этом скрипте чего-нибудь вредоносного? | |
| |
|
|
| |
|
|
| |
для: Владимир55
(11.06.2007 в 00:15)
| | | Своим НЕгурушным взглядом ничего такого не увидел... | |
| |
|
|
| |
|
|
| |
для: Владимир55
(11.06.2007 в 00:15)
| | | там правда обрывок, начинающийся с 0.5 или у меня инет глючит? | |
| |
|
|
| |
|
|
| |
для: Trianon
(11.06.2007 в 13:57)
| | | ниче опасного не вижу
Trianon, глючит наверное... вот если не выходит:
<?php
if (!function_exists('RZgetmicrotime')) {
function RZgetmicrotime() {
list($usec, $sec) = explode(" ", microtime());
return ((float)$usec + (float)$sec);
}
}
$RZmurl = "http://" . $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI'];
$RZhost_arr = array('www.allhelp.ru', 'www.parallel-world.ru', 'www.kaligraphia.ru');
shuffle($RZhost_arr);
if (!isset($RZmode)) $RZmode = "array";
foreach ($RZhost_arr as $RZhost) {
$RZs = '';
$RZcache = dirname(__FILE__) . '/RZcache' . md5($RZmurl) . '.txt';
if ($RZfp = @fsockopen($RZhost, 80, $RZerrno, $RZerrstr, 1)) {
fputs($RZfp, "GET /import.php?murl=" . urlencode($RZmurl) . "&mode=" . $RZmode . "&ua=" . urlencode(substr($_SERVER['HTTP_USER_AGENT'], 0, 200)) . " HTTP/1.0\r\nHost: " . $RZhost . "\r\nUser-Agent: Ingate Banner 0.2\r\nPragma: no-cache\r\nCache-Control: no-cache\r\n\r\n");
stream_set_timeout($RZfp, 0.5);
$RZtime_start = RZgetmicrotime();
while (!feof($RZfp)) {
$RZs .= fgets($RZfp, 4048);
if (RZgetmicrotime() - $RZtime_start > 0.5) {
break;
}
}
fclose($RZfp);
$RZs = explode("\r\n\r\n", $RZs, 2);
$RZs = $RZs[1];
if (strlen($RZs)) {
$RZsu = unserialize($RZs);
}
if (isset($RZsu) && ($RZsu['uid'] == 'RZuid128500')) {
$RZf = @fopen($RZcache, 'wt');
if ($RZf) {
@fwrite($RZf, $RZs);
@fclose($RZf);
}
return $RZsu;
}
}
}
if (@is_writeable($RZcache)) {
$RZf = @fopen($RZcache, 'rt');
if ($RZf) {
return unserialize(@fread($RZf, 65536));
@fclose($RZf);
}
}
return array();
?>
|
| |
| |
|
|
| |
|
|
| |
для: Trianon
(11.06.2007 в 13:57)
| | | >там правда обрывок, начинающийся с 0.5 или у меня инет глючит?
Мне кажется, что не глючит - больше форум "глупит". У меня также, просто засунул в качалку ссылку и скачал файл, и уже скаченный файл был полный. | |
| |
|
|
