<?php


function getPagerank($q, $host='toolbarqueries.google.com', $context=NULL) {
    $seed = "Mining PageRank is AGAINST GOOGLE'S TERMS OF SERVICE. Yes, I'm talking to you, scammer.";
    $result = 0x01020345;
    $len = strlen($q);
    for ($i=0; $i<$len; $i++) {
        $result ^= ord($seed{$i%strlen($seed)}) ^ ord($q{$i});
        $result = (($result >> 23) & 0x1ff) | $result << 9;
    }
    $ch = sprintf('8%x', $result);
    $url = 'http://%s/tbr?client=navclient-auto&ch=%s&features=Rank&q=info:%s';
    $url = sprintf($url,$host,$ch,$q);
    @$pr = file_get_contents($url,false,$context);
    return $pr ? substr(strrchr($pr, ':'), 1) : false;
}

/**
 *
 * Class for retrieving Google PageRank
 * @author xrank.cz
 * @see http://xrank.cz/
 *
 * Usage:
 *     $pagerank = new PageRank();
 *     echo $pagerank->getRank('http://xrank.cz/');
 *
 * Based on:
 *      http://www.hm2k.com/projects/pagerank
 *      PageRank Lookup v1.1 by HM2K (update: 31/01/07)
 *      based on an alogoritham found here: http://pagerank.gamesaga.net/
 *
 */



class PageRank {

    const GOOGLEHOST = 'toolbarqueries.google.com';
    const GOOGLEUA = 'Opera/9.63 (X11; Linux i686; U; en) Presto/2.1.1';

    private function strToNum($Str, $Check, $Magic) {
        $Int32Unit = 4294967296;  // 2^32
        $length = strlen($Str);
        for ($i = 0; $i < $length; $i++) {
            $Check *= $Magic;
            // If the float is beyond the boundaries of integer (usually +/- 2.15e+9 = 2^31),
            //  the result of converting to integer is undefined
            //  refer to http://www.php.net/manual/en/language.types.integer.php
            if ($Check >= $Int32Unit) {
                $Check = ($Check - $Int32Unit * (int) ($Check / $Int32Unit));
                //if the check less than -2^31
                $Check = ($Check < -2147483648) ? ($Check + $Int32Unit) : $Check;
            }
            $Check += ord($Str{$i});
        }
        return $Check;
    }

    /**
     * genearate a hash for a url
     */
    private function  hashUrl($String) {
        $Check1 = $this->strToNum($String, 0x1505, 0x21);
        $Check2 = $this->strToNum($String, 0, 0x1003F);

        $Check1 >>= 2;
        $Check1 = (($Check1 >> 4) & 0x3FFFFC0 ) | ($Check1 & 0x3F);
        $Check1 = (($Check1 >> 4) & 0x3FFC00 ) | ($Check1 & 0x3FF);
        $Check1 = (($Check1 >> 4) & 0x3C000 ) | ($Check1 & 0x3FFF);

        $T1 = (((($Check1 & 0x3C0) << 4) | ($Check1 & 0x3C)) <<2 ) | ($Check2 & 0xF0F );
        $T2 = (((($Check1 & 0xFFFFC000) << 4) | ($Check1 & 0x3C00)) << 0xA) | ($Check2 & 0xF0F0000 );

        return ($T1 | $T2);
    }

    /**
     * genearate a checksum for the hash string
     */
    private function checkHash($Hashnum) {
        $CheckByte = 0;
        $Flag = 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;
            $Flag ++;
        }

        $CheckByte %= 10;
        if (0 !== $CheckByte) {
            $CheckByte = 10 - $CheckByte;
            if (1 === ($Flag % 2) ) {
                if (1 === ($CheckByte % 2)) {
                    $CheckByte += 9;
                }
                $CheckByte >>= 1;
            }
        }

        return '7'.$CheckByte.$HashStr;
    }

    /**
     * return the pagerank checksum hash
     */
    private function getch($url) {
        return $this->checkHash($this->hashUrl($url));
    }

    /**
     * return the pagerank figure
     */
    public function getRank($url) {
        $ch = $this->getch($url);
        $fp = fsockopen(self::GOOGLEHOST, 80, $errno, $errstr, 30);
        if ($fp) {
            $out = "GET /search?client=navclient-auto&ch=$ch&features=Rank&q=info:$url HTTP/1.1\r\n";
            //echo "<pre>$out</pre>\n"; //debug only
            $out .= "User-Agent: " . self::GOOGLEUA . "\r\n";
            $out .= "Host: " . self::GOOGLEHOST . "\r\n";
            $out .= "Connection: Close\r\n\r\n";

            fwrite($fp, $out);

            //$pagerank = substr(fgets($fp, 128), 4); //debug only
            //echo $pagerank; //debug only
            while (!feof($fp)) {
                $data = fgets($fp, 128);
                //echo $data;
                $pos = strpos($data, "Rank_");
                if($pos === false){} else{
                    $pr=substr($data, $pos + 9);
                    $pr=trim($pr);
                    $pr=str_replace("\n",'',$pr);
                    return $pr;
                }
            }
            //else { echo "$errstr ($errno)<br />\n"; } //debug only
            fclose($fp);
        }
    }

}