Cek PageRank Situs

http://

PageRank situs jenggo.net :
PageRank : 2

Rumus pengecekan PageRank

Jenggo.net menggunakan rumus penghitungan PageRank seperti berikut :
<?php
// Copyright 2005 WiZzMaster - All rights reserved
// Advanced PageRAnk 1.1
// Please distribute
// A script by Ccucu for WiZzWorldWide.

function GooglePageRank($url){
      $arr = parse_url($url);
      $url = $arr[’host’];
      $url="info:".$url; $ch=GoogleCSum($url,0xE6359A60);
      $host="toolbarqueries.google.com"; $hostip=gethostbyname($host);
      $query ="GET /search?client=navclient-auto&ch=6".$ch."&ie=UTF-8&oe=UTF-8&features=Rank&q=".rawurlencode($url)." HTTP/1.0";
      $query.="Host: $host";
      $rank=-1;
      $query.="User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)";
      $query.="Connection: Close";
      $fp=fsockopen($hostip,80,$errno,$errstr,30);
      if ($fp)
      { fputs($fp,$query); $data=""; while (!feof($fp)) $data.=fgets($fp,4096); fclose($fp);
      $data=explode("",$data);
      foreach ($data as $line)
      if (!is_bool(strpos($line,"Rank_1")))
      { $rank=explode(":",trim($line)); $rank=$rank[2]; break; } }

return $rank;
}

function GoogleCSum($s,$key){
      $v4=$len=strlen($s); $esi=$key; $ebx=$edi=0x9E3779B9; $p=0;
      if ($len>=12)
      for($i=0;$i=11) $esi=unsign($esi+(ord($s[$p+10]) << 24));
      if ($v4>=10) $esi=unsign($esi+(ord($s[$p+9]) << 16));
      if ($v4>=9) $esi=unsign($esi+(ord($s[$p+8]) << 8));
      if ($v4>=8) $edi=unsign($edi+ord($s[$p+4])+(ord($s[$p+5]) << 8)+(ord($s[$p+6]) << 16)+(ord($s[$p+7]) << 24));
      else
      { if ($v4>=7) $edi=unsign($edi+(ord($s[$p+6]) << 16));
      if ($v4>=6) $edi=unsign($edi+(ord($s[$p+5]) << 8));
      if ($v4>=5) $edi=unsign($edi+ord($s[$p+4])); }
      if ($v4>=4) $ebx=unsign($ebx+ord($s[$p+0])+(ord($s[$p+1]) << 8)+(ord($s[$p+2]) << 16)+(ord($s[$p+3]) << 24));
      else
      { if ($v4>=3) $ebx=unsign($ebx+(ord($s[$p+2]) << 16));
      if ($v4>=2) $ebx=unsign($ebx+(ord($s[$p+1]) << 8));
      if ($v4>=1) $ebx=unsign($ebx+ord($s[$p+0])); }
      $ebx=unsign(($ebx-$edi-$esi)^shr($esi,13));
      $edi=unsign(($edi-$esi-$ebx)^($ebx << 8));
      $esi=unsign(($esi-$ebx-$edi)^shr($edi,13));
      $ebx=unsign(($ebx-$edi-$esi)^shr($esi,12));
      $edi=unsign(($edi-$esi-$ebx)^($ebx << 16));
      $esi=unsign(($esi-$ebx-$edi)^shr($edi,5));
      $ebx=unsign(($ebx-$edi-$esi)^shr($esi,3));
      $edi=unsign(($edi-$esi-$ebx)^($ebx << 10));
      $esi=unsign(($esi-$ebx-$edi)^shr($edi,15)); return $esi;
}

function shr($x,$y) {
      $x=unsign($x);
      for($i=0;$i<$y;$i++) $x=floor($x/2); return $x;
}

function unsign($l) {
      $l=intval($l);
      if ($l>=0){
          return $l;
      }else{
          return 4294967296+$l;
      }
}
?>