# 要显示用户名称为 Smith 的 ARPANET 注册用户的相关信息，请输入
whois Smith
 
# 要显示使用句柄 Hobo 的 ARPANET 注册用户的相关信息，请输入
whois !Hobo
 
# 要显示用户名称为 John Smith 的 ARPANET 注册用户的相关信息，请输入
whois  .Smith, John
 
# 要显示用户名称或句柄以字母 HEN 开头的 ARPANET 注册用户的相关信息，请输入
whois HEN  ...
 
# 要获取关于 whois 命令的帮助信息，请输入
whois ?
 
# 查询Google域名信息
whois google.com
 
# 查询gooss.org的域名信息，可以看到whois命令将域名的所有人、地址、邮箱都列出来了
whois gooss.org

<?php
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,"$ipn");    
    //$buffer = fread($sock, 8192); 
    while(!feof($sock))        $buffer.=fgets($sock, 8192); 
    fclose($sock);    
  } 
  return $buffer; 
}
?>