-
-
/** - * Google PR の価値を取得
- * by bbs.it-home.org
- */
- define('GOOGLE_MAGIC', 0xE6359A60);
- 関数 zeroFill($a, $b)
- {
- $z = hexdec(80000000);
- if ($z & $a)
- {
- $a = ($a>>1);
- $a &= (~$z);
- $a |= 0x40000000;
- $a = ($a>>($b-1));
- }
- else
- {
- $a = ($a>>$b);
- }
- $a を返します。
- }
関数 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));
- 配列($a,$b,$c)を返す;
- }
関数 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]$b += ($url[$k+4] +($url[$k+5]<<8) +($url[$k+6]<<16) +($url [$k+7]$c += ($url[$k+8] +($url[$k+9]<<8) +($url[$k+10]<<16)+($url [$k+11]$mix = mix($a,$b,$c);
- $a = $mix[0]; $b = $mix[1]; $c = $mix[2];
- $k += 12;
- $len -= 12;
- }
$c += $length;
- switch($len)
- {
- ケース 11: $c+=($url[$k+10]<<24);
- ケース 10: $c+=($url[$k+9]<<16);
- ケース 9 : $c+=($url[$k+8]<<8);
- ケース 8 : $b+=($url[$k+7]<<24);
- ケース 7 : $b+=($url[$k+6]<<16);
- ケース 6 : $b+=($url[$k+5]<<8);
- ケース 5 : $b+=($url[$k+4]);
- ケース 4 : $a+=($url[$k+3]<<24);
- ケース 3 : $a+=($url[$k+2]<<16);
- ケース 2 : $a+=($url[$k+1]<<8);
- ケース 1 : $a+=($url[$k+0]);
- }
- $mix = mix($a,$b,$c);
- $mix[2] を返します;
- }
function strord($string) {
- for($i=0;$i$result[$i] = ord( $string{$i});
- }
- $result を返します。
- }
function ReadPR($link)
- {
- $fp = fsockopen ("www.google.com", 80, $errno, $errstr, 30);
if (!$fp)
- {
- echo "$errstr ($errno)n";
- 終了(1);
- }
- else
- {
- $out = "GET $link HTTP/1.0rn";
- $out .= "ホスト:toolbarqueries.google.comrn";
- $out .= "ユーザーエージェント: Mozilla/4.0 (互換性; GoogleToolbar 2.0.114.9-big; Linux 2.6)rn";
- $out .= "接続: 閉じるrnrn";
- fwrite($fp, $out);
do{
- $line = fgets($fp, 128);
- }while ($line !== "rn");
- $data = fread($fp,8192);
- fclose ($fp);
- $data を返す;
- }
- }
関数 GetPR($url)
- {
- $url ='info:'.$url;
- $ch = GoogleCH(strord($url));
- $data = ReadPR("/search?client=navclient-auto&ch=6$ch&features=Rank&q=$url");
- $rankarray = 爆発 (':', $data);
- $rankarray[2] を返します;
- }
if ( isset($_POST['url']) && $_POST['url'] !== '' )
- {
- echo 'PageRank: '.GetPR($ _POST['url']);
- }
- ?>
- Google PR值查询
- Google PR值查询 获取源代码
复制代
|