
02.03.2009, 20:35
|
|
Динозавр
Регистрация: 10.01.2008
Сообщений: 2,841
Провел на форуме: 9220514
Репутация:
3338
|
|
В общем вот, накалякал чото, проверил только на двух сайтах, инфо цепляется в таком виде:
RANK: SnapShot of ostrie.ru (rank #3,379,392) - Compete
соседи сгребаются с 2ip.ru
Код:
PHP код:
<pre>
<?
@set_time_limit(0);
@ini_set("display_errors","1");
$ip_file = "ip.txt"; //Файл со списком IP на проверку (может быть просто домен вместо ip)
$log_file = "log123.txt"; //Файл, куда будут складываться результаты
$sleep = 0; // Пауза между запросами в секундах
function get($url)
{
$ch = curl_init();
curl_setopt($ch, CURLOPT_URL,$url);
curl_setopt($ch, CURLOPT_RETURNTRANSFER,1);
curl_setopt($ch, CURLOPT_USERAGENT, 'Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.0.1) Gecko/2008070208');
$ss=curl_exec($ch);
curl_close($ch);
return $ss;
}
$handler=fopen($log_file,'a');
$ip = array_map("trim", file($ip_file));
$count = count($ip);
for ($i=0;$i<$count;$i++) {
$a=get('http://2ip.ru/server.php?ip='.$ip[$i]);
preg_match_all('|<li>([^<a href=.*>.*</a>].*)</li>|U',$a,$sosedi);
unset($sosedi[1][0]);
$count1 = count($sosedi[1]);
if($handler) fwrite($handler,"IP:{$ip[$i]} Соседей: $count1 " . "\r\n");
for ($z=1;$z<$count1;$z++) {
$site = str_replace('www.','',$sosedi[1][$z]);
$a=get('http://siteanalytics.compete.com/'.$site.'/');
preg_match('|<title>(.*)</title>|',$a,$rank);
if (empty($rank[1])) $stat = 0;
else $stat = $rank[1];
if($handler) fwrite($handler,"Сосед $z: {$sosedi[1][$z]}/ RANK: $stat " . "\r\n");
sleep($sleep);
}
echo "host: {$ip[$i]} is done\n";
if($handler) fwrite($handler,"-----------------------------------------------------" . "\r\n");
sleep($sleep);
}
fclose($handler);
?>
</pre>
|
|
|