<?
function domain_sorgu($domain) {
 $server = 'whois.crsnic.net';
 $hata = 'No match';
 $fp = @fsockopen($server, 43);
 if( $fp ){
  @fputs($fp, $domain."\r\n");
  while( !@feof($fp) ){
   $data .= @fread($fp, 4096);
  }
  if(eregi($hata,$data)) {$durum = 'dolu';} else {$durum = 'bos';}
  @fclose($fp);
  return($durum);
 }
}
function domain_3_harfli($uzanti) {
 for($x1 = 65; $x1 < 91; $x1++)
 for($x2 = 65; $x2 < 91; $x2++)
 for($x3 = 65; $x3 < 91; $x3++) 
  {
   $dom= (chr($x1).chr($x2).chr($x3).".".$uzanti);
   echo $dom.' - ';
   echo domain_sorgu($dom);
   echo '<br>';
  } 
}
domain_3_harfli('com');
domain_3_harfli('net');
domain_3_harfli('org');
?>