Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|
Нужен код для подсчета Pr и Тиц на сайт |
23.06.2008, 15:00
|
|
Познающий
Регистрация: 18.11.2007
Сообщений: 81
Провел на форуме:
249705
Репутация:
6
|
|
Нужен код для подсчета Pr и Тиц на сайт
Уважаемые , не у кого не найдется кода на сайт для подсчета pr и тиц?
|
|
|
23.06.2008, 15:05
|
|
Super Moderator
Регистрация: 08.11.2004
Сообщений: 3,395
Провел на форуме:
13166814
Репутация:
3876
|
|
а гуглом пользоваться не учили? 
по сабжу, например, pr-cy.ru |
|
|
|
23.06.2008, 15:08
|
|
Banned
Регистрация: 19.06.2008
Сообщений: 31
Провел на форуме:
116104
Репутация:
17
|
|
x3k.ru
|
|
|
|
23.06.2008, 15:16
|
|
Reservists Of Antichat - Level 6
Регистрация: 19.03.2007
Сообщений: 953
Провел на форуме:
7617458
Репутация:
3965
|
|
В гугле найти просто. Тиц найдеш сам, это проще простого
PHP код:
// Google PR
define('GOOGLE_MAGIC', 0xE6359A60);
function nooverflow($a)
{
while ($a<-2147483648)
$a+=2147483648+2147483648;
while ($a>2147483647)
$a-=2147483648+2147483648;
return $a;
}
function zeroFill ($x, $bits)
{
if ($bits==0) return $x;
if ($bits==32) return 0;
$y = ($x & 0x7FFFFFFF) >> $bits;
if (0x80000000 & $x)
{
$y |= (1<<(31-$bits));
}
return $y;
}
function mix($a,$b,$c)
{
$a=(int)$a; $b=(int)$b; $c=(int)$c;
$a -= $b; $a -= $c; $a=nooverflow($a); $a ^= (zeroFill($c,13));
$b -= $c; $b -= $a; $b=nooverflow($b); $b ^= ($a<<8);
$c -= $a; $c -= $b; $c=nooverflow($c); $c ^= (zeroFill($b,13));
$a -= $b; $a -= $c; $a=nooverflow($a); $a ^= (zeroFill($c,12));
$b -= $c; $b -= $a; $b=nooverflow($b); $b ^= ($a<<16);
$c -= $a; $c -= $b; $c=nooverflow($c); $c ^= (zeroFill($b,5));
$a -= $b; $a -= $c; $a=nooverflow($a); $a ^= (zeroFill($c,3));
$b -= $c; $b -= $a; $b=nooverflow($b); $b ^= ($a<<10);
$c -= $a; $c -= $b; $c=nooverflow($c); $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);
/*-------------------------------------------- report the result */
return $mix[2];
}
function strord($string) {
for($i=0;$i<strlen($string);$i++) {
$result[$i] = ord($string{$i});
}
return $result;
}
function get_pr($url) {
$result=array("",-1);
if (($url.""!="")&&($url.""!="http://")):
if (substr(strtolower($url),0,7)!="http://"):
$url="http://".$url;
endif;
$url="info:".$url;
$checksum=GoogleCH(strord($url));
$google_url=sprintf("http://www.google.com/search?client=navclient&ch=6%u&features=Rank&q=".$url,$checksum); // url to get from google
$handle = @fopen($google_url, "rb");
$contents = '';
if ($handle) {
while (!@feof($handle)) {
$contents.= @fread($handle, 8192);
}
fclose($handle);
$p=explode(":",$contents);
if (isset($p[2])):
$result=trim($p[2]);
endif;
} else {$result = 0;}
endif;
return($result!="" && (strlen($result)>0 && (strlen($result)<3))?$result:"0");
}
__________________
BlackHat. MoDL
Последний раз редактировалось Dimi4; 23.06.2008 в 15:20..
|
|
|
|
23.06.2008, 15:33
|
|
Постоянный
Регистрация: 30.09.2007
Сообщений: 815
Провел на форуме:
2590715
Репутация:
659
|
|
А по форуму сделать поиск слабо? Совсем недавно тот же был вопрос и на него были даны ответы
|
|
|
|
23.06.2008, 20:05
|
|
Познающий
Регистрация: 18.11.2007
Сообщений: 81
Провел на форуме:
249705
Репутация:
6
|
|
Сообщение от Rebz
а гуглом пользоваться не учили?
по сабжу, например, pr-cy.ru Имелось в виду иное .....создание сарвиса на подобие pr-cy...весь функционал не требуется ...а нужен лишь код для проверки тиц и pr на мой сайт
|
|
|
|
Подскажите в какой переменной хранятся данные о pr |
27.07.2008, 11:17
|
|
Познающий
Регистрация: 18.11.2007
Сообщений: 81
Провел на форуме:
249705
Репутация:
6
|
|
Подскажите в какой переменной хранятся данные о pr
Не подскажите какая переменная в скрипте выше по итогу хранит значиние pr .. отправил дданые в скрипт используюя get метод...дописал соответствующюю строку в скрипт на присваивании переменной значиния из формы ..а как вывести значение pr не знаю ... думал что переменная содержет его ........добавил
PHP код:
echo "PR сайта" . $result;
...хе ....нифига ....денвер выдал ошибку ......познания в php не особо велики как видете ....подскажи плз...)))
Последний раз редактировалось still12; 27.07.2008 в 11:44..
|
|
|
|
27.07.2008, 11:37
|
|
Banned
Регистрация: 06.10.2006
Сообщений: 288
Провел на форуме:
2741921
Репутация:
469
|
|
PHP код:
$pr = get_pr("www.google.ru")
в переменной $pr храниться значение |
|
|
|
27.07.2008, 12:13
|
|
Познающий
Регистрация: 18.11.2007
Сообщений: 81
Провел на форуме:
249705
Репутация:
6
|
|
хм ..
блин ..я все равно что то не так делаю ...у мну все равно ошибки ....(((((
|
|
|
|
27.07.2008, 12:26
|
|
Познающий
Регистрация: 18.11.2007
Сообщений: 81
Провел на форуме:
249705
Репутация:
6
|
|
Ура...
Всем спасибо ..нашел скрипт на ином сайте ......выкладываю если кому нужен
З.Ы. Как ни странно но после использовании на локальной машине апач постоянно выдавал ошибку и переставал работать ....залил на хост ....все норм )))
PHP код:
<?php
//error_reporting(0);
define('GMAG', 0xE6359A60);
//unsigned shift right
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 GCH($url, $length=null, $init=GMAG) {
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);
/*-------------------------------------------- report the result */
return $mix[2];
}
//converts a string into an array of integers containing the numeric value of the char
function strord($string) {
for($i=0;$i<strlen($string);$i++) {
$result[$i] = ord($string{$i});
}
return $result;
}
function getPR($_url) {
$url = 'info:'.$_url;
$ch = GCH(strord($url));
$url='info:'.urlencode($_url);
$pr = file("http://www.google.com/search?client=navclient-auto&ch=6$ch&ie=UTF-8&oe=UTF-8&features=Rank&q=$url");
$pr_str = implode("", $pr);
return substr($pr_str,strrpos($pr_str, ":")+1);
}
if (isset($_GET['url'])) echo getPR($_GET['url']);
?>
Как юзать :
/навазние вашего скрипта.php?url=адресс_определ яемого_сайта
пример: (файл обозвал index.php)
мой_сайт/index.php?url=ya.ru
Удачи ...всем спс ... |
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
