function whois($host){
if(ereg(“([0-9]).([0-9]).([0-9]).([0-9])”,$host)) {
$server = “whois.krnic.net”;
$port = 43;

$fp = fsockopen($server, $port, &$errno, &$errstr, 30);

fputs($fp, “$host
“);

while(!feof($fp)) {
$list = fgets($fp, 1024);
$str=$str.$list;
}
fclose($fp);
if(!strpos($str,”조회하신 해당 IP주소는 국내(KRNIC)에 배정된 주소가 아닙니다.”)){
$ip[0]=strpos($str,”IP 주소”);
$ip[1]=strpos($str,”네트워크 이름”);
$ip[2]=strpos($str,”연결 ISP명”);
$ip[3]=strpos($str,”ISP 연결날짜”);
$ip[4]=strpos($str,”기관명”);
$ip[5]=strpos($str,”시도명”);
$ipaddress=substr($str,$ip[0]+21,$ip[1]-$ip[0]-22);
$netname=substr($str,$ip[1]+21,$ip[2]-$ip[1]-22);
$ispname=substr($str,$ip[2]+21,$ip[3]-$ip[2]-22);
$office_name=substr($str,$ip[4]+21,$ip[5]-$ip[4]-22);
$whois=array(“IP” => $ipaddress,
“ISP” => $ispname,
“OFFICE” => $office_name,
“NETNAME” => $netname
);
} else {
echo “검색할 수 없는 IP 주소 입니다.”;
}
} else {
echo “죄송합니다. IP주소만 이용가능 합니다.”;
}

return $whois;
}

/* IP WHOIS하는 함수
배열로 IP,기관명,ISP이름,네트워크 이름을 리턴한다.

EX > $whois=whois(“127.0.0.1”);
echo “[KRNIC WHOIS RESULT] $whois[IP] , $whois[OFFICE] , ($whois[ISP]/$whois[NETNAME])”;

위와 같은 사용이 가능함.
*/
?>