wenew 发表于 2005 年 1 月 28 日 13:39:52

google PR 查询的php代码测试

测试,

http://wenew.net.ru/pr/

esnak 发表于 2005 年 1 月 28 日 14:06:59

代码呢??

gzpty2 发表于 2005 年 1 月 28 日 14:14:46

为什么要加上3721弹出,我狠死3721了

linxicn 发表于 2005 年 1 月 28 日 15:45:13

我也不喜欢3721

wenew 发表于 2005 年 1 月 28 日 15:47:15

居然有3721??????

wenew 发表于 2005 年 1 月 28 日 15:48:24

我操,,肯定是太极统计搞的鬼!!!!我自己用的浏览器屏蔽了

wenew 发表于 2005 年 1 月 28 日 15:51:23

代码
http://www.wenew.net.ru/phpwind/read.php?tid=6007&fpage=1

linxicn 发表于 2005 年 1 月 28 日 15:52:55

直接贴出来把,我会给你加分的

wenew 发表于 2005 年 1 月 28 日 16:18:38

我去找,,

wenew 发表于 2005 年 1 月 28 日 16:25:27

<?php
//error_reporting(E_ALL);

define('GOOGLE_MAGIC', 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 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; $b = $mix; $c = $mix;
 $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;
}

//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 ReadPR($link)
{
$fp = fsockopen ("www.google.com",80,$errno,$errstr,30);
//$ip = gethostbyname("www.google.com");
//$fp = fsockopen ($ip,80,$errno,$errstr,30);

if (!$fp)
{
echo "$errstr($errno)\n";
exit(1);
}
else
{
//$out = "GET $link HTTP/1.1\r\n";
$out = "GET $link HTTP/1.0\r\n";
$out .= "Host: toolbarqueries.google.com\r\n";
$out .= "User-Agent: Mozilla/4.0 (compatible; GoogleToolbar 2.0.114.9-big; Windows 5.2)\r\n";
$out .= "Connection: Close\r\n\r\n";
fwrite($fp, $out);

//while (!feof($fp))
//echo fgets ($fp,128);

do{
$line = fgets($fp, 128);
}while ($line !== "\r\n");
$data = fread($fp,8192);  
fclose ($fp);
return $data;
}
}



function GetPR($url)
{
$url ='info:'.$url;
$ch = GoogleCH(strord($url));
$data = ReadPR("/search?client=navclient-auto&ch=6$ch&features=Rank&q=$url");
$rankarray = explode (':', $data);
return $rankarray;
}


$provider = '<br><br><small><a href="http://wenew.net.ru/" target="_blank">wenew.net.ru</a></small>';
if (isset($_POST['url']) && $_POST['url'] !== '' )
{
echo 'PageRank: '.GetPR($_POST['url']).$provider;
}
else
{
echo "<html><title>Get PageRank From Google.com</title><body>PageRank(PR) Querying Script<br>";
echo "<form action='' method='post'>"."<br>URL:<input name='url' value='http://' type='text' size=40>";
echo "<input name='submit' type='submit' value='Get PR'></form>".$provider."</body></html>";
}

?>
页: [1] 2
查看完整版本: google PR 查询的php代码测试