发程序了…… 详细教程请看: http://www.quchao.com/?p=64 PHP: define('GMAG', 0xE6359A60); // url get method macro.define('G_PR_GET_TYPE_FILE', 1); // use fopen() functiondefine('G_PR_GET_TYPE_SOCKET', 2); // use standard fsocketopen function // rank type.define('RANK_TYPE_GOOGLE', 1); // get google page rankdefine('RANK_TYPE_ALEXA', 2); // get alexa rank // main function to be calledfunction getRank($_url='www.quchao.com', $ranktype=RANK_TYPE_GOOGLE,$gettype=G_PR_GET_TYPE_SOCKET){ if($ranktype == RANK_TYPE_GOOGLE) { $url = 'info:'.$_url; $ch = GCH(strord($url)); $url='info:'.urlencode($_url); $googlePRUrl = "http://www.google.com/search?client=navclient-auto&ch=6" .$ch."&ie=UTF-8&oe=UTF-8&features=Rank&q=".$url; $pr_str = retrieveURLContent($googlePRUrl,$gettype); if($pr_str) { return intval(substr($pr_str,strrpos($pr_str, ":")+1)); } else { return 0; } } elseif ($ranktype == RANK_TYPE_ALEXA) { $url=urlencode($_url); $alexaRankUrl = "http://data.alexa.com/data/+wQ411en8000lA?cli=10&dat=snba&ver=7.0&cdt=alx_vw%3D20%26wid%3D12206%26act%3D00000000000%26ss%3D1680x16t%3D0%26ttl%3D35371%26vis%3D1%26rq%3D4&url=; $result = retrieveURLContent($alexaRankUrl,$gettype); if (preg_match('/REACH RANK=\"(\d+)\"/', $result, $match)) { return intval($match[1]); } else { return 0; } } else { return 0; }} //unsigned shift rightfunction zeroFill($a, $b){ $z = hexdec(80000000); if ($z & $a){ $a = ($a>>1); $a &= (~$z); $a |= 0x40000000; $a = ($a>>($b-1)); } else{ $a = ($a>>$b); } return $a;}function mix($a,$b,$c){ $a -= $b; $a -= $c; $a ^= (zeroFill($c,13)); $b -= $c; $b -= $a; $b ^= ($a< <8); $c -= $a; $c -= $b; $c ^= (zeroFill($b,13)); $a -= $b; $a -= $c; $a ^= (zeroFill($c,12)); $b -= $c; $b -= $a; $b ^= ($a<<16); $c -= $a; $c -= $b; $c ^= (zeroFill($b,5)); $a -= $b; $a -= $c; $a ^= (zeroFill($c,3)); $b -= $c; $b -= $a; $b ^= ($a<<10); $c -= $a; $c -= $b; $c ^= (zeroFill($b,15)); return array($a,$b,$c);} function GCH($url, $length=null, $init=GMAG){ if(is_null($length)) { $length = sizeof($url); } $a = $b = 0x9E3779B9; $c = $init; $k = 0; $len = $length; while($len >= 12) { $a += ($url[$k+0] + ($url[$k+1]< <8) + ($url[$k+2]<<16) + ($url[$k+3]<<24)); $b += ($url[$k+4] + ($url[$k+5]<<8) + ($url[$k+6]<<16) + ($url[$k+7]<<24)); $c += ($url[$k+8] + ($url[$k+9]<<8) + ($url[$k+10]<<16) + ($url[$k+11]<<24)); $mix = mix($a,$b,$c); $a = $mix[0]; $b = $mix[1]; $c = $mix[2]; $k += 12; $len -= 12; } $c += $length; /* all the case statements fall through */ switch($len){ case 11: $c+=($url[$k+10]<<24); case 10: $c+=($url[$k+9]<<16); case 9 : $c+=($url[$k+8]<<8); /* the first byte of c is reserved for the length */ case 8 : $b+=($url[$k+7]<<24); case 7 : $b+=($url[$k+6]<<16); case 6 : $b+=($url[$k+5]<<8); case 5 : $b+=($url[$k+4]); case 4 : $a+=($url[$k+3]<<24); case 3 : $a+=($url[$k+2]<<16); case 2 : $a+=($url[$k+1]<<8); case 1 : $a+=($url[$k+0]); /* case 0: nothing left to add */ } $mix = mix($a,$b,$c); /*------------ report the result */ return $mix[2];} // converts a string into an array of integers// containing the numeric value of the charfunction strord($string){ for($i=0;$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); // 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); }}