php goolge pr查询程序代码

下面来看看我提供的一款php goolge pr查询程序代码哦，好了费话不说多了来看看吧。

下面来看看我提供的一款php goolge pr查询程序代码哦，好了费话不说多了来看看吧。//下面的函数用于查pr
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 $c -= $a; $c -= $b; $c ^= (zeroFill($b,13));
$a -= $b; $a -= $c; $a ^= (zeroFill($c,12));
$b -= $c; $b -= $a; $b ^= ($a $c -= $a; $c -= $b; $c ^= (zeroFill($b,5));
$a -= $b; $a -= $c; $a ^= (zeroFill($c,3));
$b -= $c; $b -= $a; $b ^= ($a $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] $b += ($url[$k+4] +($url[$k+5] $c += ($url[$k+8] +($url[$k+9] $mix = mix($a,$b,$c);
$a = $mix[0]; $b = $mix[1]; $c = $mix[2];
$k += 12;
$len -= 12;
}
$c += $length;
switch($len)
{
case 11: $c+=($url[$k+10] case 10: $c+=($url[$k+9] case 9 : $c+=($url[$k+8] case 8 : $b+=($url[$k+7] case 7 : $b+=($url[$k+6] case 6 : $b+=($url[$k+5] case 5 : $b+=($url[$k+4]);
case 4 : $a+=($url[$k+3] case 3 : $a+=($url[$k+2] case 2 : $a+=($url[$k+1] case 1 : $a+=($url[$k+0]);
}
$mix = mix($a,$b,$c);
return $mix[2];
}

function strord($string) {
for($i=0;$i $result[$i] = ord($string{$i});
}
return $result;
}

function ReadPR($link)
{
$fp = fsockopen ("www.google.com", 80, $errno, $errstr, 30);
if (!$fp)
{
echo "$errstr ($errno)n";
exit(1);
}
else
{
$out = "GET $link HTTP/1.0rn";
$out .= "Host: toolbarqueries.google.comrn";
$out .= "User-Agent: Mozilla/4.0 (compatible; GoogleToolbar 2.0.114.9-big; Linux 2.6)rn";
$out .= "Connection: Closernrn";
fwrite($fp, $out);
do{
$line = fgets($fp, 128);
}while ($line !== "rn");
$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);
if(trim($rankarray[2])!=""){
return $rankarray[2];
}
else
return "0";
}