php写的域名查询系统whois

<?PHP
if($domain)
{
if($domain)
{

$fp=fsockopen("rs.internic.net",43,&$errno,&$errstr,10);
if(!$fp)
{
echo"$errstr($errno)<br>n";
}
else
{
fputs($fp,"$domainrn");
while(!feof($fp))
{
$buf=fgets($fp,128);
if(ereg("WhoisServer:",$buf))
{
$server=str_replace("WhoisServer:","",$buf);
$server=trim($server);
}
}
fclose($fp);
}
if($server)
{
echo"<B>$domainisregisteredat$server:</B><BR>";
echo"<PRE>";
$fp=fsockopen($server,43,&$errno,&$errstr,10);
if(!$fp)
{
echo"Couldnotopenconnectionto$serverMETHOD="post">
查找.com,.org,and.net主机<br>
主机名:<INPUTTYPE="text"NAME="domain"SIZE="40"MAXLENGTH="100">
<INPUTTYPE=submitVALUE="Findout"><INPUTTYPE=resetVALUE="Reset">
</FORM>