phpはウェブサイトのGoogle PR値を取得します

/**
* ウェブサイトの PR 値を取得するための php コード
* by bbs.it-home.org
*/
$googlehost="toolbarqueries.google.com";
$googleua="Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.0.6) Gecko/20060728 Firefox/1.5";
echo getpr('http://bbs.it-home.org');
//文字列を 32 ビット整数に変換します
function StrToNum($Str, $Check, $Magic) {
$Int32Unit = 4294967296; // 2^32
$length = strlen($Str);
for ($i = 0; $i < $length; $i++) {
$Check *= $Magic;
//浮動小数点が整数の境界を超えている場合 (通常 +/- 2.15e+9 = 2^31)、
// 整数への変換結果は未定義です
// http://www.php を参照してください.net/manual/ja/ language.types.integer.php
if ($Check >= $Int32Unit) {
$Check = ($Check - $Int32Unit * (int) ($Check / $Int32Unit));
//チェックが -2^31 未満の場合
$Check = ($Check }
$Check += ord($Str{$i});
}
$Check を返す;
}
//URL のハッシュを生成します
function HashURL($String) {
$Check1 = StrToNum($String, 0×1505, 0×21);
$Check2 = StrToNum($String, 0, 0×1003F);
$Check1 >>= 2;
$Check1 = (($Check1 >> 4) & 0×3FFFFC0 ) | ($Check1 & 0×3F);
$Check1 = (($Check1 >> 4) & 0×3FFC00 ) | ($Check1 & 0×3FF);
$Check1 = (($Check1 >> 4) & 0×3C000 ) | ($Check1 & 0×3FFF);
$T1 = (((($Check1 & 0×3C0) << 4) | ($Check1 & 0×3C)) <<2 ) | ($Check2 & 0xF0F );
$T2 = (((($Check1 & 0xFFFFC000) << 4) | ($Check1 & 0×3C00)) << 0xA) | ($Check2 & 0xF0F0000 );
return ($T1 | $T2);
}
//ハッシュ文字列のチェックサムを生成します
function CheckHash($Hashnum) {
$CheckByte = 0;
$フラグ = 0;
$HashStr = sprintf(‘%u’, $Hashnum) ;
$length = strlen($HashStr);
for ($i = $length - 1; $i >= 0; $i –) {
$Re = $HashStr{$i};
if (1 === ($Flag % 2)) {
$Re += $Re;
$Re = (int)($Re / 10) + ($Re % 10);
}
$CheckByte += $Re;
$フラグ++;
}
$CheckByte %= 10;
if (0 !== $CheckByte) {
$CheckByte = 10 - $CheckByte;
if (1 === ($Flag % 2) ) {
if (1 === ($CheckByte % 2)) {
$CheckByte += 9;
}
$CheckByte >>= 1;
}
}
return "7".$CheckByte.$HashStr;
}
//ページランクのチェックサムハッシュを返します
function getch($url) { return CheckHash(HashURL($url)); }
//ページランクの数値を返す
function getpr($url) {
global $googlehost,$googleua;
$pr = 0; // デフォルトの戻り値
$ch = getch($url);
$fp = fsockopen($googlehost, 80, $errno, $errstr, 30);
if ($fp) {
$out = "GET /search?client=navclient-auto&ch=$ch&features=Rank&q=info:$url HTTP/1.1rn";
//エコー $outn”; // デバッグのみ
$out .= “User-Agent: $googleuarn”;
$out .= “ホスト: $googlehostrn”;
$out .= “接続: Closernrn”;
fwrite($fp, $out);
//$pagerank = substr(fgets($fp, 128), 4); //デバッグのみ
//echo $pagerank; //デバッグのみ
while (!feof($fp)) {
$data = fgets($fp, 128);
//$data をエコー;
$pos = strpos($data, “Rank_”);
if($pos === false){} else{
$pr=substr($data, $pos + 9);
$pr=トリム($pr);
$pr=str_replace(“n”,”,$pr);
 $pr を返します;
}
}
//else { echo “$errstr ($errno) n”; } //デバッグのみ
fclose($fp);
}
 $pr を返します。
}
?>