下面的代码是一段获取 google pr值，并且还支持js调用显示哦。
>1);
        $a &= (~$z);
        $a |= hexdec('4'.implode('',array_fill(0,php_int_size*2-1,'0')));
        $a = ($a>>($b-1));
    }
    else{
        $a = ($a>>$b);
    }
    return $a;
}
// discard bits beyonds 32 bit.
function trunkbitforce32bit($n){
    if(php_int_size         settype($n,'float');
        if ( $n         return $n;
    }
    else{
        $clearbit = '';
        for($i=0;$i            $clearbit .= '00';
        }
        for($i=0;$i            $clearbit .= 'ff';
        }
        return ($n & hexdec($clearbit));
    }
}
function bigxor($m,$n){
    //if(function_exists('gmp_init')){
    //  return floatval(gmp_strval(gmp_xor($m,$n)));
    //}
    //else{
        return $m ^ $n;
    //}
}
function mix($a,$b,$c){
    $a = trunkbitforce32bit($a);
    $b = trunkbitforce32bit($b);
    $c = trunkbitforce32bit($c);
$a -= $b; $a = trunkbitforce32bit($a);
    $a -= $c; $a = trunkbitforce32bit($a);
    $a = bigxor($a,(zerofill($c,13))); $a = trunkbitforce32bit($a);
$b -= $c; $b = trunkbitforce32bit($b);
    $b -= $a; $b = trunkbitforce32bit($b);
    $b = bigxor($b,trunkbitforce32bit($a
$c -= $a; $c = trunkbitforce32bit($c);
    $c -= $b; $c = trunkbitforce32bit($c);
    $c = bigxor($c,(zerofill($b,13))); $c = trunkbitforce32bit($c);
$a -= $b;$a = trunkbitforce32bit($a);
    $a -= $c;$a = trunkbitforce32bit($a);
    $a = bigxor($a,(zerofill($c,12)));$a = trunkbitforce32bit($a);
$b -= $c;$b = trunkbitforce32bit($b);
    $b -= $a;$b = trunkbitforce32bit($b);
    $b = bigxor($b,trunkbitforce32bit($a
    $c -= $a; $c = trunkbitforce32bit($c);
    $c -= $b; $c = trunkbitforce32bit($c);
    $c = bigxor($c,(zerofill($b,5))); $c = trunkbitforce32bit($c);
    $a -= $b;$a = trunkbitforce32bit($a);
    $a -= $c;$a = trunkbitforce32bit($a);
    $a = bigxor($a,(zerofill($c,3)));$a = trunkbitforce32bit($a);
$b -= $c;$b = trunkbitforce32bit($b);
    $b -= $a;$b = trunkbitforce32bit($b);
    $b = bigxor($b,trunkbitforce32bit($a
    $c -= $a; $c = trunkbitforce32bit($c);
    $c -= $b; $c = trunkbitforce32bit($c);
    $c = bigxor($c,(zerofill($b,15))); $c = trunkbitforce32bit($c);
    return array($a,$b,$c);
}
function newgch($ch){
    $ch = ( trunkbitforce32bit( ( $ch / 7 )             ( ( myfmod( $ch,13 ) ) & 7 ) );
    $prbuf = array();
    $prbuf[0] = $ch;
    for( $i = 1; $i     {
      $prbuf[$i] = $prbuf[$i-1] - 9;
    }
    $ch = gch( c32to8bit( $prbuf ) );
    return $ch;
}
function myfmod($x,$y){
    $i = floor( $x / $y );
    return ( $x - $i * $y );
}
function c32to8bit($arr32){
    $arr8 = array();
    for( $i = 0; $i         for( $bitorder = $i * 4;
                $bitorder         $arr8[$bitorder] = $arr32[$i] & 255;
        $arr32[$i] = zerofill( $arr32[$i], 8 );
      }
    }
    return $arr8;
}
function gch($url, $length=null){
    if(is_null($length)) {
        $length = sizeof($url);
    }
    $init = 0xe6359a60;
    $a = 0x9e3779b9;
    $b = 0x9e3779b9;
    $c = 0xe6359a60;
    $k = 0;
    $len = $length;
    $mixo = array();
    while( $len >= 12 ){
        $a += ($url[$k+0] +trunkbitforce32bit($url[$k+1]              +trunkbitforce32bit($url[$k+2]              +trunkbitforce32bit($url[$k+3]        $b += ($url[$k+4] +trunkbitforce32bit($url[$k+5]              +trunkbitforce32bit($url[$k+6]              +trunkbitforce32bit($url[$k+7]        $c += ($url[$k+8] +trunkbitforce32bit($url[$k+9]              +trunkbitforce32bit($url[$k+10]              +trunkbitforce32bit($url[$k+11]        $mixo = mix($a,$b,$c);
        $a = $mixo[0]; $b = $mixo[1]; $c = $mixo[2];
        $k += 12;
        $len -= 12;
    }
    $c += $length;
    switch( $len ) {
        case 11:
        $c += trunkbitforce32bit($url[$k+10]
        case 10:
        $c+=trunkbitforce32bit($url[$k+9]
        case 9 :
        $c+=trunkbitforce32bit($url[$k+8]
        case 8 :
        $b+=trunkbitforce32bit($url[$k+7]
        case 7 :
        $b+=trunkbitforce32bit($url[$k+6]
        case 6 :
        $b+=trunkbitforce32bit($url[$k+5]
        case 5 :
        $b+=trunkbitforce32bit($url[$k+4]);
        case 4 :
        $a+=trunkbitforce32bit($url[$k+3]
        case 3 :
        $a+=trunkbitforce32bit($url[$k+2]
        case 2 :
        $a+=trunkbitforce32bit($url[$k+1]
        case 1 :
        $a+=trunkbitforce32bit($url[$k+0]);
    }
    $mixo = mix( $a, $b, $c );
    $mixo[2] = trunkbitforce32bit($mixo[2]);
    if( $mixo[2]         return (
            hexdec('1'.
                implode('',
                    array_fill(0,php_int_size*2,'0')))
            + $mixo[2] );
    }
    else{
        return $mixo[2];
    }
}
// converts a string into an array of integers
// containing the numeric value of the char
function strord($string){
    for($i=0;$i        $result[$i] = ord($string{$i});
    }
    return $result;
}
function retrieveurlcontent($url,$gettype){
    switch($gettype){
        case g_pr_get_type_file:
            return retrieveurlcontentbyfile($url);
            break;
        default:
            return retrieveurlcontentbysocket($url);
            break;
    }
}
function retrieveurlcontentbyfile($url){
    $fd = @fopen($url,r);
    if(!$fd){
        return false;
    }
    $result = ;
    while($buffer = fgets($fd, 4096)) {
      $result .= $buffer;
    }
    fclose($fd);
    return $result;
}
function retrieveurlcontentbysocket($url,
                                    $host=,
                                    $port=80,
                                    $timeout=30){
    if($host == ){
        if(!($pos = strpos($url,'://'))){
            return false;
        }
        $host = substr( $url,
                        $pos+3,
                        strpos($url,'/',$pos+3) - $pos - 3);
        $uri = substr($url,strpos($url,'/',$pos+3));
    }
    else{
        $uri = $url;
    }
    $request =  get .$uri. http/1.0rn
               .host: .$host.rn
               .accept: */*rn
               .user-agent: zealgetrn
               .rn;
    $shnd = @fsockopen ($host, $port, $errno, $errstr, $timeout);
    if(!$shnd){
        return false;
    }
@fputs ($shnd, $request);
    // get source
    $result = ;
    while (!feof($shnd)){
        $result .= fgets($shnd,4096);
    }
    fclose($shnd);
    $headerend = strpos($result,rnrn);
    if (is_bool($headerend))
    {
        return $result;
    }
    else{
        return substr($result,$headerend+4);
    }
}
站长推荐：
http://tool.111cn.net/pr/pr.php可以查询你网站的pr值并且还可以调用pr在你网站显示哦。