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 "

";

}

?>