域名查询代码公布

域名查询代码公布
    <？php
// 网络技术主管座右铭：三人行，其必有我师焉。http://www.ctohome.com
// 这个代码可以是说是非常的SMART，我改动了小小部分使它更容易用。

$moreinfolist = array（ // 储存WHOIS查询主机的连接方法
"at" => "www.ripe.net/cgi-bin/whois？query=",
"au" => "www.aunic.net/cgi-bin/whois.aunic？",
"bm" => "www.bermudanic.bm/cgi-bin/BermudaNIC/rwhois_query_get.pl？query_text=",
"ch" => "www.switch.ch/cgi-bin/domain/search_domain？keyword=",
"com"=> "www.networksolutions.com/cgi-bin/whois/whois/？STRING=",
"cz" => "www.ripe.net/cgi-bin/whois？query=",
"de" => "www.ripe.net/cgi-bin/whois？query=",
"dk" => "www.ripe.net/cgi-bin/whois？query=",
"edu"=> "www.networksolutions.com/cgi-bin/whois/whois/？STRING=",
"es" => "www.nic.es/whois/index.php？type=Dominios&key=",
"fi" => "www.ripe.net/cgi-bin/whois？query=",
"fo" => "www.ripe.net/cgi-bin/whois？query=",
"fr" => "harmonic.nic.fr/cgi-bin/HarmoNIC.pl？Annu_Suffixe=&Annu_Action=Rechercher&Annu_Automaton_State=17&Annu_Motif=",
"gl" => "www.ripe.net/cgi-bin/whois？query=",
"gm" => "www.ripe.net/cgi-bin/whois？query=",
"gov"=> "www.nic.gov/cgi-bin/whois？s=nic.gov",
"gr" => "www.ripe.net/cgi-bin/whois？query=",
"hu" => "www.ripe.net/cgi-bin/whois？query=",
"id" => "whois.idnic.net.id/cgi-bin/whois-cgi？user=",
"ie" => "www.ripe.net/cgi-bin/whois？query=",
"il" => "www.ripe.net/cgi-bin/whois？query=",
"is" => "www.ripe.net/cgi-bin/whois？query=",
"it" => "www.ripe.net/cgi-bin/whois？query=",
"jp" => "www.nic.ad.jp/cgi-bin/whois_gw？lang=/e&type=DOM&rule=ex&key=",
"lb" => "www.aub.edu.lb/cgi-bin/lbdr.pl？cn=",
"li" => "www.switch.ch/cgi-bin/domain/search_domain？keyword=",
"lt" => "www.ripe.net/cgi-bin/whois？query=",
"lv" => "www.ripe.net/cgi-bin/whois？query=",
"mc" => "www.ripe.net/cgi-bin/whois？query=",
"mil"=> "www.nic.mil/cgi-bin/whois？stype=Domains&ctype=reg&keyword=",
"ms" => "www.adamsnames.tc/whois/？seen=y&domain=",
"mx" => "www.nic.mx/cgi/whois？",
"net"=> "www.networksolutions.com/cgi-bin/whois/whois/？STRING=",
"no" => "www.ripe.net/cgi-bin/whois？query=",
"nz" => "www.domainz.net.nz/facility/namesearch/Result.asp？prmMode=Search&DomainName=",
"org"=> "www.networksolutions.com/cgi-bin/whois/whois/？STRING=",
"pt" => "www.ripe.net/cgi-bin/whois？query=",
"ro" => "whois.rotld.ro/cgi-bin/whois？whois=",
"sk" => "www.ripe.net/cgi-bin/whois？query=",
"sm" => "www.ripe.net/cgi-bin/whois？query=",
"tc" => "www.adamsnames.tc/whois/？seen=y&domain=",
"tf" => "www.adamsnames.tc/whois/？seen=y&domain=",
"th" => "www.thnic.net/cgi-bin/whois.pl？server=whois.thnic.net&string=",
"tj" => "www.nic.tj/whois.cgi？domain",
"tr" => "whois.cc.metu.edu.tr/whois/wwwwhois？Whois=",
"uk" => "www.nic.uk/cgi-bin/whois.cgi？query=",
"va" => "www.ripe.net/cgi-bin/whois？query=",
"vg" => "www.adamsnames.tc/whois/？seen=y&domain="
）;

# where can we get more info？
$moreinfo = FALSE;
for （ reset（$moreinfolist） ; list（$tail, $moreinfoname） = each（$moreinfolist） ; ）
if （ eregi（"\.$tail$", $address）） { // 比较域名后缀
$moreinfo = $moreinfoname; // 遇到匹配项就立即结束循环
break;
}

if （ $moreinfo && $address） { // 跳转到WHOIS主机
header（"Location: http://". $moreinfo . $address）;
exit（）;
}
else {
echo "<form action=$PHP_SELF method=post>
请输入域名：<input name=address>
<input type=submit></form>";
}

？>

<html>

<head>
<title>whois tool</title>
</head>

<body>

<p>网络技术主管汉化解释</a>.</p>

<hr />
<address>http://www.ctohome.com</address>

</body>

</html>

<？php
highlight_file（"whois.php"）;
？>