WHOIS类的修改版

　　1、简化了代码。（其实就是去掉了一些用不着的变量的定义）

　　2、针对从INTERNIC检索到的信息过于简单，根据INTERNIC反馈的信息中的WHOIS SERVER进行进一步查询。比如，YAHOO在whois.networksolutions.com上有更详细的信息。

　　class whois {

　　var $use_cache = 1;

　　var $FROM_CACHE=0;

　　var $cache_dir = "./"; // 根据你的系统自己设置

　　var $port = 43;

　　var $MAXLEN = 100;

　　// 如果你想在连接失败后自动重试，

　　// 设置重试次数 $MAX_RETRIES

　　var $MAX_RETRIES = 0;

　　var $SLEEP_VAL = 1;

　　var $RETRY = 0;

　　var $FOUND = 0; // 查询没有结果，次值为0

　　var $ERROR = 0; // 查询过程中的出错次数

　　var $DATA_MIN = 8; // 我们至少应该获得8个字节的数据

　　var $DATA_COUNT = 0;

　　var $WHOIS_SERVER;

　　var $NEW_WHOIS;

　　var $FURTHER_INFO = 0;

　　// 打开和WHOIS SERVER的SOCKET连接

　　// 默认的是 whois.internic.net

　　function connect ($server) {

　　$this->RETRY=0;

　　while($this->RETRY <= $this->MAX_RETRIES):

　　$ptr = fsockopen($server, $this->port);

　　if($ptr>0):

　　$this->ERROR=0; // just in case we're on a retry

　　return($ptr);

　　else:

　　$this->ERROR++;

　　$this->RETRY++;

　　sleep($this->SLEEP_VAL);

　　endif;

　　endwhile;

　　}

　　// 获取简单的查询结果，并以行为单位，放入数组

　　// 国际域名查询

　　function rawlookup ($query, $server) {

　　if(!$query):

　　return( "");

　　endif;

　　$ptr=$this->connect($server);

　　if($ptr):

　　if(!ereg($query, "n$")):

　　$query .= "n";

　　endif;

　　fputs($ptr, "$query");

　　$i=0;

　　$this->FOUND=1;

　　while(!feof($ptr)):

　　$array[$i]=fgets($ptr,$this->MAXLEN);

　　$this->DATA_COUNT+=strlen(chop($array[$i]));

　　if(eregi( "No match for", $array[$i]) || eregi ("No entries found", $array[$i])):

　　$this->FOUND=0;

　　elseif(eregi( "WHOIS database is down",$array[$i])):

　　$this->ERROR++;

　　$this->FOUND=0;

　　elseif(eregi( "Please wait a while and try again",$array[$i])):

　　$this->ERROR++;

　　$this->FOUND=0;

　　break;

　　endif;

　　if(eregi("Whois Server:",$array[$i])):

　　$this->NEW_WHOIS=trim(substr(trim($array[$i]),(strlen(trim($array[$i]))-13)*(-1)));

　　$this->FURTHER_INFO=1;

　　endif;

　　$i++;

　　endwhile;

　　fclose($ptr);

　　if($this->DATA_COUNT>$this->DATA_MIN):

　　return($array);

　　else:

　　$this->ERROR++;

　　endif;

　　else:

　　$this->ERROR++;

　　endif;

　　}

　　// 国内域名查询

　　function cnrawlookup ($query, $server) {

　　if(!$query):

　　return( "");

　　endif;

　　$ptr=$this->connect($server);

　　if($ptr):

　　if(!ereg($query, "n$")):

　　$query .= "n";

　　endif;

　　fputs($ptr, "$query");

　　$i=0;

　　$this->FOUND=1;

　　while(!feof($ptr)):

　　$array[$i]=fgets($ptr,$this->MAXLEN);

　　$this->DATA_COUNT+=strlen(chop($array[$i]));

　　if(eregi( "No match for", $array[$i]) || eregi ("No entries found", $array[$i])):

　　$this->FOUND=0;

　　elseif(eregi( "WHOIS database is down",$array[$i])):

　　$this->ERROR++;

　　$this->FOUND=0;

　　elseif(eregi( "Please wait a while and try again",$array[$i])):

　　$this->ERROR++;

　　$this->FOUND=0;

　　break;

　　endif;

　　$i++;

　　endwhile;

　　fclose($ptr);

　　if($this->DATA_COUNT>$this->DATA_MIN):

　　return($array);

　　else:

　　$this->ERROR++;

　　endif;

　　else:

　　$this->ERROR++;

　　endif;

　　}

　　};

　　$myWHOIS=new whois();

　　$thisname=$servername.$domainname;

　　// 根据国内域名或国际域名选择WHOIS SERVER

　　if (ereg(".cn$",$thisname))

　　{

　　$myWHOIS->WHOIS_SERVER="whois.cnnic.net.cn";

　　$array=$myWHOIS->cnrawlookup($thisname,$myWHOIS->WHOIS_SERVER);

　　}

　　else

　　{

　　$myWHOIS->WHOIS_SERVER="whois.internic.net";

　　//$myWHOIS->WHOIS_SERVER="whois.networksolutions.com";

　　$array=$myWHOIS->rawlookup($thisname,$myWHOIS->WHOIS_SERVER);

　　}

　　echo "

　　".$thisname."

　　";

　　echo "";

　　$x=0;

　　while ($x {

　　echo " $x ";

　　echo " $array[$x] ";

　　$x++;

　　}

　　echo "

　　";

　　if (!ereg(".cn$",$thisname))

　　{

　　echo "

　　Furth infomation

　　";

　　$array_further=$myWHOIS->rawlookup($thisname,$myWHOIS->NEW_WHOIS);

　　echo "";

　　$x=0;

　　while ($x {

　　echo " $x ";

　　echo " $array_further[$x] ";

　　$x++;

　　}

　　echo "

　　";

　　}

　　?>