|
Главная | Правила | Регистрация | Дневники | Справка | Пользователи | Календарь | Поиск | Сообщения за день | Все разделы прочитаны |
|
Опции темы | Опции просмотра |
09.12.2008, 17:40 | #1 (permalink) |
Новичок
Регистрация: 09.12.2008
Сообщений: 1
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Подскажите прогу для фильтра сайтов по pr и тиц.
|
09.12.2008, 17:40 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
В решении вашей проблемы помогут эти топики Доработка фильтра 35АС-015 Схема фильтра Подскажите прогу для синхронизации нокиа 5230 под линух Подскажите прогу... Подкиньте схемку фильтра |
09.12.2008, 17:48 | #2 (permalink) |
Member
Регистрация: 25.04.2008
Сообщений: 238
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
В яндексе можно найти без особых проблем...
На работоспособность не проверял. Код:
<?php function showform() { echo "<br/><br/><center/><form action=pr.php method=GET>"; echo "Адрес:<br/>"; echo "<input type=text name=url size=50><br/>"; echo "<input type=submit> demo: <b>domenforum.net</b>"; echo "</form>"; } if (isset($_REQUEST['url'])) { $url=str_replace("www.","",$_REQUEST['url']); define('GOOGLE_MAGIC', 0xE6359A60); function getCI($url) { $my_host = parse_url($url); $cit_index_url = "http://search.yaca.yandex.ru/yca/cy/ch/www.{$my_host['path']}/"; $data = file_get_contents($cit_index_url); $upurl = str_replace('.', '\.', $url); $upurl = str_replace('/', '\/', $upurl); $reurl[1] = (strpos($url, 'www') == 0)?'http:\/\/www\.':'http:\/\/'; $reurl[1] .= $upurl; $reurl[2] = (strpos($url, 'www') == 0)?'http:\/\/':'http:\/\/www\.'; $reurl[2] .= $upurl; $reurl[3] = (strpos($url, 'www') == 0)?'www\.'.$upurl:$upurl; $reurl[4] = (strpos($url, 'www') == 0)?$upurl:'www\.'.$upurl; $reg_www = "/<a href=\"(http:\/\/www\.yandex\.ru\/yandsearch\/\?text=&Link={$reurl[1]}.+?&iserverurl={$reurl[3]}.+?)\".+?>.+?<\/a>/si"; $reg = "/<a href=\"(http:\/\/www\.yandex\.ru\/yandsearch\/\?text=&Link={$reurl[2]}.+?&iserverurl={$reurl[4]}.+?)\".+?>.+?<\/a>/si"; if(preg_match_all($reg_www, $data, $pockets)) { $to_parse = $pockets[1][0]; } if(preg_match_all($reg, $data, $pockets)) { $to_parse = $pockets[1][0]; } $my = parse_url($to_parse); $my = parse_str($my['query'], $out); print_r($out); return $out['ci']; } function zeroFill($a, $b) { $z = hexdec(80000000); if ($z & $a) { $a = ($a>>1); $a &= (~$z); $a |= 0x40000000; $a = ($a>>($b-1)); } else { $a = ($a>>$b); } return $a; } function mix($a,$b,$c) { $a -= $b; $a -= $c; $a ^= (zeroFill($c,13)); $b -= $c; $b -= $a; $b ^= ($a<<8); $c -= $a; $c -= $b; $c ^= (zeroFill($b,13)); $a -= $b; $a -= $c; $a ^= (zeroFill($c,12)); $b -= $c; $b -= $a; $b ^= ($a<<16); $c -= $a; $c -= $b; $c ^= (zeroFill($b,5)); $a -= $b; $a -= $c; $a ^= (zeroFill($c,3)); $b -= $c; $b -= $a; $b ^= ($a<<10); $c -= $a; $c -= $b; $c ^= (zeroFill($b,15)); return array($a,$b,$c); } function GoogleCH($url, $length=null, $init=GOOGLE_MAGIC) { if(is_null($length)) { $length = sizeof($url); } $a = $b = 0x9E3779B9; $c = $init; $k = 0; $len = $length; while($len >= 12) { $a += ($url[$k+0] +($url[$k+1]<<8) +($url[$k+2]<<16) +($url[$k+3]<<24)); $b += ($url[$k+4] +($url[$k+5]<<8) +($url[$k+6]<<16) +($url[$k+7]<<24)); $c += ($url[$k+8] +($url[$k+9]<<8) +($url[$k+10]<<16)+($url[$k+11]<<24)); $mix = mix($a,$b,$c); $a = $mix[0]; $b = $mix[1]; $c = $mix[2]; $k += 12; $len -= 12; } $c += $length; switch($len) /* all the case statements fall through */ { case 11: $c+=($url[$k+10]<<24); case 10: $c+=($url[$k+9]<<16); case 9 : $c+=($url[$k+8]<<8); /* the first byte of c is reserved for the length */ case 8 : $b+=($url[$k+7]<<24); case 7 : $b+=($url[$k+6]<<16); case 6 : $b+=($url[$k+5]<<8); case 5 : $b+=($url[$k+4]); case 4 : $a+=($url[$k+3]<<24); case 3 : $a+=($url[$k+2]<<16); case 2 : $a+=($url[$k+1]<<8); case 1 : $a+=($url[$k+0]); /* case 0: nothing left to add */ } $mix = mix($a,$b,$c); return $mix[2]; } function strord($string) { for($i=0;$i<strlen($string);$i++) { $result[$i] = ord($string{$i}); } return $result; } function getrank($url) { $url = 'info:'.$url; $ch = GoogleCH(strord($url)); $file = "http://www.google.com/search?client=navclient-auto&ch=6$ch&features=Rank&q=$url"; $data = file($file); $rankarray = explode (':', $data[2]); $rank = $rankarray[2]; return $rank; } $rank=getrank($url); $rank1=getrank("www".$url); if ($rank1>$rank) $url="www.".$url; echo '<center>PageRank: '.getrank($url)."<br>"; echo 'тИЦ: '.getCI($url); echo "<br/>"; showform(); } else { showform(); } ?> |
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
Опции темы | |
Опции просмотра | |
|
|