包罗万象--好东西要收藏--共享无限: 最新的查询网站谷歌pr值的PHP代码

最新的查询网站谷歌pr值的PHP代码

2011年11月27日星期日 | | |

php 最新查谷歌pr代码，很爽的哈，速度也很快，

但是如果你批量查的话，最好时间间隔过2秒，不然会被谷歌封IP的

代码如下：

<?php      echo getPR("1kkg.com");     // url get method macro.  define('G_PR_GET_TYPE_FILE', 1);    // use fopen() function  define('G_PR_GET_TYPE_SOCKET', 2);  // use standard fsocketopen function       // main function to be called  function getPR($_url,$gettype=G_PR_GET_TYPE_SOCKET){      $url = 'info:'.$_url;      $ch = GCH(strord($url));      $ch = NewGCH($ch);      $url=str_replace("_","%5F",'info:'.urlencode($_url));      $googlePRUrl =          "http://toolbarqueries.google.com/tbr?client=navclient-auto&ch=6"          .$ch."&ie=UTF-8&oe=UTF-8&features=Rank&q=".$url;      $pr_str = retrieveURLContent($googlePRUrl,$gettype);      return substr($pr_str,strrpos($pr_str, ":")+1);  }       //unsigned shift right  function zeroFill($a, $b){      $z = hexdec('8'.implode('',array_fill(0,PHP_INT_SIZE*2-1,'0')));      if ($z & $a){          $a = ($a>>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 <= 4){          settype($n,'float');          if ( $n < 0 ) $n += 4294967296;          return $n;      }      else{          $clearbit = '';          for($i=0;$i<PHP_INT_SIZE-4;$i++){              $clearbit .= '00';          }          for($i=0;$i<4;$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<<8)); $b = trunkbitForce32bit($b);           $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<<16));           $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<<10));           $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 ) << 2 ) |              ( ( myfmod( $ch,13 ) ) & 7 ) );           $prbuf = array();      $prbuf[0] = $ch;      for( $i = 1; $i < 20; $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 < count($arr32); $i++ ) {          for( $bitOrder = $i * 4;                  $bitOrder <= $i * 4 + 3; $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]<<8)                +trunkbitForce32bit($url[$k+2]<<16)                +trunkbitForce32bit($url[$k+3]<<24));          $b += ($url[$k+4] +trunkbitForce32bit($url[$k+5]<<8)                +trunkbitForce32bit($url[$k+6]<<16)                +trunkbitForce32bit($url[$k+7]<<24));          $c += ($url[$k+8] +trunkbitForce32bit($url[$k+9]<<8)                +trunkbitForce32bit($url[$k+10]<<16)                +trunkbitForce32bit($url[$k+11]<<24));          $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]<<24);               case 10:          $c+=trunkbitForce32bit($url[$k+9]<<16);               case 9 :          $c+=trunkbitForce32bit($url[$k+8]<<8);               case 8 :          $b+=trunkbitForce32bit($url[$k+7]<<24);               case 7 :          $b+=trunkbitForce32bit($url[$k+6]<<16);               case 6 :          $b+=trunkbitForce32bit($url[$k+5]<<8);               case 5 :          $b+=trunkbitForce32bit($url[$k+4]);               case 4 :          $a+=trunkbitForce32bit($url[$k+3]<<24);               case 3 :          $a+=trunkbitForce32bit($url[$k+2]<<16);               case 2 :          $a+=trunkbitForce32bit($url[$k+1]<<8);               case 1 :          $a+=trunkbitForce32bit($url[$k+0]);      }           $mixo = mix( $a, $b, $c );           $mixo[2] = trunkbitForce32bit($mixo[2]);           if( $mixo[2] < 0 ){          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<strlen($string);$i++){          $result[$i] = ord($string{$i});      }      return $result;  }       // return url page content or false if failed.  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.0\r\n"                 ."Host: ".$host."\r\n"                 ."Accept: */*\r\n"                 ."User-Agent: ZealGet\r\n"                 ."\r\n";      $sHnd = @fsockopen ($host, $port, $errno, $errstr, $timeout);      if(!$sHnd){          return false;      }           @fputs($sHnd, $request);           $status = fgets($sHnd, 4096);      if(!preg_match('/HTTP\/1\.0\s*200\s*OK/i', $status))      {          echo $status."\n";          exit;      }      // Get source      $result = "";      while (!feof($sHnd)){          $result .= fgets($sHnd,4096);      }      fclose($sHnd);           $headerend = strpos($result,"\r\n\r\n");      if (is_bool($headerend))      {          return $result;      }      else{          return substr($result,$headerend+4);      }  }  ?>

至于批量查询的代码我就不公布了. 大家自己写吧..

有用的话欢迎转载. 请注明出处!