| /**************************
查网站PR 和百度收录数的方法 getpr('http://www.im286.com') 返回数字RP值
pagerank($url,$width=40,$method='style') 返回指定宽度的HTML代码 $method 可选 style 和 image
baidu($url) 返回百度收录数 **************************/
function StrToNum($Str, $Check, $Magic) {
$Int32Unit = 4294967296; $length = strlen($Str);
for ($i = 0; $i < $length; $i++) {
$Check *= $Magic;
if ($Check >= $Int32Unit) {
$Check = ($Check - $Int32Unit * (int) ($Check / $Int32Unit));
$Check = ($Check < -2147483648) ? ($Check + $Int32Unit) : $Check;
}
$Check += ord($Str{$i});
}
return $Check;
} function HashURL($String) {
$Check1 = StrToNum($String, 0x1505, 0x21);
$Check2 = 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);
} 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;
}
function getch($url) {
return CheckHash(HashURL($url));
}
function getpr($url) {
$googlehost='toolbarqueries.google.com';
$googleua ='Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 6.0; SLCC1; .NET CLR 2.0.50727; .NET CLR 3.0.04506; .NET CLR 1.1.4322)';
$ch = getch($url);
$fp = fsockopen($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";
$out .= "User-Agent: $googleua\r\n";
$out .= "Host: $googlehost\r\n";
$out .= "Connection: Close\r\n\r\n"; fwrite($fp, $out); while (!feof($fp)) {
$data = fgets($fp, 128);
$pos = strpos($data, "Rank_");
if($pos === false){} else{
$pr=substr($data, $pos + 9);
$pr=trim($pr);
$pr=str_replace("\n",'',$pr);
return $pr;
}
}
fclose($fp);
}
}
function pagerank($url,$width=40,$method='style') {
if (!preg_match('/^(http:\/\/)?([^\/]+)/i', $url)) { $url='http://'.$url; }
$pr=getpr($url);
$pagerank="PageRank: $pr/10";
if ($method == 'image') {
$prpos=$width*$pr/10;
$prneg=$width-$prpos;
$html='  ';
}
if ($method == 'style') {
$prpercent=100*$pr/10;
$html='
';
} $out=''.$html.'';
return $out;
}
function cut($string,$start,$end)
{
$content = explode($start,$string);
$content = explode($end,$content[1]);
return $content[0];
}
function baidu($url) {
$url = explode('/',str_replace('http://','',$url));
$url = 'http://www.baidu.com/s?wd=site:'.str_replace('www.','',$url[0]);
$baidu = file_get_contents($url);
$num = str_replace(",","",cut($baidu,"找到相关网页约", "篇" ));
if(!$num){
$num = str_replace(",","",cut($baidu,"找到相关网页", "篇" ));
if(!$num){
$num = 0;
}
}
return $num;
}
?>
| 
