php whois查询,PHP IP Whois查询的实现代码

include_once "lang.inc.php";

$IP = isset($_GET['ip'])?$_GET['ip']:'blank';

if (-1 === ip2long($ip))

die(str_replace('%IP%', $IP, $Text['ip_invalid']));

echo GetWhois($IP);

function GetWhois($IP)

{

global $Text;

$rootwhois = 'whois.arin.net';

$buffer = str_replace('%SERVER%', $rootwhois, $Text['sock_connect']);

$buffer1 = ReadSocket($rootwhois,$IP);

if ($buffer1 !== '')

{

$whois = SubStrByTag("ReferralServer: whois://","\n",$buffer1);

//remove port number ":43";

if ( ($pos=strpos($whois,":")) !== FALSE)

{

$whois = substr($whois, 0,$pos);

}

if ($whois !== '')

{

$buffer .= str_replace('%SERVER%', $whois, $Text['sock_connect']);

$buffer .= ReadSocket($whois,$IP);

}

else

{

$buffer .= $buffer1;

}

}

return nl2br($buffer);

}

function SubStrByTag($firstTag,$secondTag,&$longStr)

{

$firstPos = strpos ($longStr,$firstTag);

$ret = '';

if ($firstPos !== FALSE)

{

$secondPos = strpos ($longStr,$secondTag,$firstPos);

if ($secondPos !== FALSE)

{

$firstPos += strlen($firstTag);

$ret = substr($longStr,$firstPos,$secondPos-$firstPos);

}

}

return $ret;

}

function ReadSocket($whois,$ip)

{

global $Text;

$buffer = '';

if (!$sock = fsockopen( $whois, 43, $errNum, $errStr, 20))

{

$buffer = str_replace('%SERVER%', $whois, $Text['sock_fail']);

}

else

{

fputs($sock,"$ip\n");

//$buffer = fread($sock, 8192);

while(!feof($sock)) $buffer.=fgets($sock, 8192);

fclose($sock);

}

return $buffer;

}

?>