| y el codigo whois.inc<?
function get_whois_info($domain){
$whoisservers=array(
array("ac","whois.nic.ac","No match"),
array("ac.cn","whois.cnnic.net.cn","No entries found"),
array("ac.jp","whois.nic.ad.jp","No match"),
domain"),
array("nm.cn","whois.cnnic.net.cn","No entries found"),
array("no","whois.norid.no","no matches"),
array("nom.br","whois.nic.br","No match"),
array("not.br","whois.nic.br","No match"),
array("ntr.br","whois.nic.br","No match"),
array("nu","whois.nic.nu","NO MATCH for"),
array("nx.cn","whois.cnnic.net.cn","No entries found"),
array("nz","whois.domainz.net.nz","220 Available"),
array("plc.uk","whois.nic.uk","No match for"),
array("odo.br","whois.nic.br","No match"),
array("oop.br","whois.nic.br","No match"),
array("or.jp","whois.nic.ad.jp","No match"),
array("org","whois.pir.org","NOT FOUND"),
array("org.au","whois.aunic.net","No Data Found"),
array("org.br","whois.nic.br","No match"),
array("org.cn","whois.cnnic.net.cn","No entries found"),
array("org.hk","whois.hknic.net.hk","No Match for"),
array("org.lu","whois.dns.lu","No entries found"),
array("org.ru","whois.ripn.ru","No entries found"),
array("org.tw","whois.twnic.net","NO MATCH TIP"),
array("org.uk","whois.nic.uk","No match for"),
array("pl","nazgul.nask.waw.pl","does not exists"),
array("plc.uk","whois.nic.uk","No match for"),
array("pp.ru","whois.ripn.ru","No entries found"),
array("ppg.br","whois.nic.br","No match"),
array("pro.br","whois.nic.br","No match"),
array("psi.br","whois.nic.br","No match"),
array("psc.br","whois.nic.br","No match"),
array("pt","whois.ripe.net","No entries found"),
array("qh.cn","whois.cnnic.net.cn","No entries found"),
array("qsl.br","whois.nic.br","No match"),
array("rec.br","whois.nic.br","No match"),
array("ro","whois.rotld.ro","No entries found"),
array("ru","whois.ripn.ru","No entries found"),
array("sc.cn","whois.cnnic.net.cn","No entries found"),
array("sd.cn","whois.cnnic.net.cn","No entries found"),
array("se","whois.nic-se.se","No data found"),
array("sg","whois.nic.net.sg","NO entry found"),
array("sh","whois.nic.sh","No match for"),
array("sh.cn","whois.cnnic.net.cn","No entries found"),
array("si","whois.arnes.si","No entries found"),
array("sk","whois.ripe.net","no entries found"),
array("slg.br","whois.nic.br","No match"),
array("sm","whois.ripe.net","no entries found"),
array("sn.cn","whois.cnnic.net.cn","No entries found"),
array("srv.br","whois.nic.br","No match"),
array("st","whois.nic.st","No entries found"),
array("sx.cn","whois.cnnic.net.cn","No entries found"),
array("tc","whois.adamsnames.tc","is not registered"),
array("th","whois.nic.uk","No entries found"),
array("tj.cn","whois.cnnic.net.cn","No entries found"),
array("tld.uk","whois.nic.uk","No match for"),
array("tmp.br","whois.nic.br","No match"),
array("to","whois.tonic.to","No match"),
array("tr","whois.ripe.net","Not found in database"),
array("trd.br","whois.nic.br","No match"),
array("tur.br","whois.nic.br","No match"),
array("tv","whois.tv","MAXCHARS:75"),
array("tv.br","whois.nic.br","No match"),
array("tw","whois.twnic.net","NO MATCH TIP"),
array("tw.cn","whois.cnnic.net.cn","No entries found"),
array("uk","whois.thnic.net","No match for"),
array("us","whois.nic.us","Not found:"),
array("va","whois.ripe.net","No entries found"),
array("vet.br","whois.nic.br","No match"),
array("vg","whois.adamsnames.tc","is not registered"),
array("wattle.id.au","whois.aunic.net","No Data Found"),
array("ws","whois.worldsite.ws","No match for"),
array("xj.cn","whois.cnnic.net.cn","No entries found"),
array("xz.cn","whois.cnnic.net.cn","No entries found"),
array("yn.cn","whois.cnnic.net.cn","No entries found"),
array("zlg.br","whois.nic.br","No match"),
array("zj.cn","whois.cnnic.net.cn","No entries found"),
array("fo","whois.ripe.net","no entries found")
);
$whocnt = count($whoisservers);
for ($x=0;$x<$whocnt;$x++){
$artld = $whoisservers[$x][0];
$tldlen = intval(0 - strlen($artld));
if (substr($domain, $tldlen) == $artld) {
$out[0] = $whoisservers[$x][1];
$out[1] = $whoisservers[$x][2];
return $out;
}
}
return $out;
}
function lookup($dom){
$whoinf = get_whois_info($dom);
$lusrv = $whoinf[0];
$notfndtxt = $whoinf[1];
if (!$lusrv) return "";
$fp = fsockopen($lusrv,43);
fputs($fp, "$dom\r\n");
$string="";
while(!feof($fp)){
$string.= fgets($fp,128);
}
fclose($fp);
$reg = "/Whois Server: (.*?)\n/i";
preg_match_all($reg, $string, $matches);
$secondtry = $matches[1][0];
if ($secondtry){
$fp = fsockopen($secondtry,43);
fputs($fp, "$dom\r\n");
$string="";
while(!feof($fp)){
$string.=fgets($fp,128);
}
fclose($fp);
}
if (stristr($string, $notfndtxt)) $data[0] = "1";
$data[1] = $string;
return $data;
}
?>
de todas formas gracias |