kienan
/
AlternC
mirror of https://github.com/kienanstewart/AlternC.git
1
0
Fork 0
Code Issues Releases Wiki Activity

.ca WHOIS replies change and are now like .ws. Thanks CIRA! 

Reported by: Claude Girard
This commit is contained in:
Antoine Beaupré 2008-06-18 23:48:04 +00:00
parent 6a0aa72bf8
commit c20775231e
1 changed files with 2 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
bureau/class/m_dom.php
View File

@ -381,16 +381,6 @@ class m_dom {
$found = true;
}
break;
case "ca":
$ligne=ereg_replace(chr(10), "",ereg_replace(chr(13),"",ereg_replace(" ","", $ligne)));
if ($ligne=="Status:EXIST")
$found=true;
if (ereg("NS.-Hostname:", $ligne)) {
$tmp=strtolower(ereg_replace("NS.-Hostname:","", $ligne));
if ($tmp)
$server[]=$tmp;
}
break;
case "eu":
case "be":
$ligne=preg_replace("/^ *([^ ]*) \(.*\)$/","\\1",trim($ligne));
@ -419,12 +409,13 @@ class m_dom {
$server[]=$tmp;
}
break;
case "ca":
case "ws";
if (ereg('^[[:space:]]*Name servers:[[:space:]]*$', $ligne)) {
// found the server
$state = 1;
} elseif ($state) {
if ($ligne = ereg_replace('[[:space:]]', "", $ligne)) {
if (ereg('^[^%]', $ligne) && $ligne = ereg_replace('[[:space:]]', "", $ligne)) {
// first non-whitespace line is considered to be the nameservers themselves
$found = true;
$server[] = $ligne;