<?
function get_whois($server,$domain,&$output)
{
    $whois = fsockopen($server, 43);
    fputs($whois, "$domain\r\n");
    $result = "";
    while(!feof($whois))
    {
        $str = fgets($whois, 1024);
        $result .= $str;
        if (strstr($str, "Whois Server:"))
        {
            $new_server = split(": ", $str);
            $output = chop("$new_server[1]");  
            fclose($whois);
            return(1);   
        }
    }
    $output = $result; 
    fclose($whois);
    return(0);  
}

function kontrol($domain)
{
$output = "";


$redirect = get_whois("rs.internic.net", $domain, $output);


while ($redirect)
{
    $whois_server = $output;
    $redirect = get_whois($whois_server, $domain, $output);
}

if(ereg("No match for",$output))
 echo "yok";
else
 echo "var";
}

for($x1 = 65; $x1 < 91; $x1++) 
 for($x2 = 65; $x2 < 91; $x2++) 
  for($x3 = 65; $x3 < 91; $x3++) 
   { 
   $domain = chr($x1).chr($x2).chr($x3).".com" 
   echo($domain." ".kontrol($domain)."<br>");
   } 
?>