IPwhois查詢,網域名稱whois查詢

<div  class=contentbox>
<div class="content_nav"><span class="tt">IP/網域名稱WHOIS查詢</span></div>
<div class=toolitem>
<br>
<form action="" method="get">
IP/網域名稱：<input style="height:26px;border: 1px solid rgb(126, 157, 185); background-color: white;" id="query" maxlength="100" size="44" name="q" autocomplete="off" type="text" value="<?php教程 echo $q; ?>">
<span class="backgroundbord"><button class="srh_onesearch" type="submit">查      詢</button></span>
</form>
</div>
</div>
<?php
require_once $_SERVER['DOCUMENT_ROOT'].'/ad/mid.php';
if($q2<>''){
 if($isdomain){
  echo '<div class=contentbox>';
  echo '<div class="content_nav"><span class="tt">查詢結果</span></div>';
  echo '<div class=topmenuitem>';
  // Server List File
  $config['server_list'] = "./whois/servers.lst";
  whois($domain);
  echo '</div>';
  echo '</div>';
 }elseif($isip){
  echo '<div class=contentbox>';
  echo '<div class="content_nav"><span class="tt">查詢結果</span></div>';
  echo '<div class=topmenuitem>';
  $sourcecode=getsourcecode(".net教程/apnic-bin/whois.pl?searchtext=".$q">http://wq.apnic.net/apnic-bin/whois.pl?searchtext=".$q);
  //echo $sourcecode;
  preg_match('/(<pre><b><u>.*?)<div class="highlight" id="key">/s', $sourcecode, $ipwhois);
  $result=$ipwhois[1];
  $result=nl2br($result);
  echo $result;
  echo '</div>';
  echo '</div>';
 }else{
  echo '<div class=contentbox>';
  echo '<div class="content_nav"><span class="tt">Error！</span></div>';
  echo '<div class=topmenuitem><p><font color=red>Error！</font>請確保你輸入的不是網域名稱（中文網域名稱暫不支援）就是IP，你要是輸入的是電話號碼之類那我們真查不了！</p>';
  echo '</div>';
  echo '</div>';
 }
}else{
  echo '<div class=contentbox>';
  echo '<div class="content_nav"><span class="tt">工具說明</span></div>';
  echo '<div class=topmenuitem><p>請輸入IP或網域名稱，如chaxun.la或xxx.xxx.xxx.xxx</p>';
  echo '</div>';
  echo '</div>';
}
function whois() {
 global $domain;
 if(!$server = get_server()) {
  die("無法查詢此類型的網域名稱");
 }
  $result = whois_request($server['server'], $domain);
  if(!$result) {
   echo "無法串連伺服器";
   die();
  }
  $server['info']=trim($server['info']);
  if($server['info']){
   $he = strpos($result,$server['info']) + strlen($server['info']);
   $le = strpos($result, " ", $he);
   $whois_server = trim(substr($result, $he, $le-$he));
   $result2 = whois_request($whois_server, $domain);
   if($result2){
    echo nl2br($result." 以下資訊來自：".$whois_server." ".$result2);
   }else {
    echo nl2br($result);
   }
  }else {
   echo nl2br($result);
  }
}
/*function whois() {
 global $domain;
 if(!$server = get_server()) {
  echo "無法查詢此類型的網域名稱";
 }else{
  $result = whois_request($server['server'], $domain);
  if(!$result) {
   echo "無法串連伺服器";
  } else {
   echo $result;
  }
 }
}
*/
function whois_request($server, $query)
{
    $data = "";
 if(!$fp = @fsockopen($server, 43)) {
  Return false;
 } else {
  fputs($fp, $query . " ");
        while (!feof($fp)) {
            $data .= fread($fp, 1000);
        }
        fclose($fp);
 }
    //return nl2br($data);
 return $data;
}

function get_server() {
 global $config,$domain;
 $serverarray = file($config['server_list']);
 $i = 0;
 foreach($serverarray as $key=>$val) {
  if(substr($val,0,1) != "#") {
   $server_p = explode("|",$val);
   $server[$i]['tld'] = $server_p[0];
   $server[$i]['server'] = $server_p[1];
   $server[$i]['avail'] = $server_p[2];
   $server[$i]['infoserver'] = $server_p[3];
   $server[$i]['backserver'] = $server_p[4];
   $server[$i]['info'] = $server_p[5];
  }
  $i++;
 }

 $domain_c = explode(".",$domain);
 $partnum = count($domain_c);
 $last_part_1 = $domain_c[$partnum-1];
 $last_part_2 = $domain_c[$partnum-2];
 
 foreach($server as $key=>$val) {
  if($val['tld'] == $last_part_2.".".$last_part_1) {
   Return $val;
  } elseif($val['tld'] == $last_part_1) {
   Return $val;
  }
 }
 Return false;
}

$q=trim($_GET['q']);
$q2=$q;
if($q<>''){
if($q=matchip($q2)){
  $isip=1;
 }elseif($q=matchdomain($q2)){
  $domain=topdomain($q2);
  $isdomain=1;
 }
}