Módulo para pesquisa de dominio

Se eu não me engano para fazer pesquisas e registros diretamente no registro.br é um pouco burocrático, precisa homologar o sistema/servidor, etc, etc, etc, rsrsrs.

Lembro de ter visto alguma documentação no site sobre isso.

Ai galera eu usei esse código e resolveu esse problema de consultar .com.br e domínios internacionais .net .com e etc, ja testei e deu certo!!!



<?


function whois ($domain, $tipo)

{ $buffer=""; $dados="";

$server[0] = "whois.registro.br";
$server[1] = "whois.internic.net";
$server[2] = "whois.networksolutions.com";

$domain = strtolower($domain);
if (trim($domain) <> "")
{
$domain = trim($domain);
$final = substr($domain, -4);

if (substr("$domain", -3) == ".br")
{
$br = fsockopen($server[0], 43, $errno, $errstr, 30);
if (!$br)
{
$dados .= "$errstr ($errno)";
}
else {
fputs($br, "$domain\r\n");
while (!feof($br))
{

$buffer .= fread($br,128);

}
if ($tipo == 1)
{
if (strpos($buffer, "No match for") > 0) $dados .= false; else $dados .= true;
}
else {
$dados .= str_replace("\n","<BR>\n",trim($buffer));
}
fclose ($br);
}

}
elseif (($final == '.com') OR ($final == '.net') OR ($final == '.org') OR ($final == '.edu'))
{
$internic = fsockopen($server[1], 43, $errno, $errstr, 30);
if (!$internic)
{
$dados .= "$errstr ($errno)";
}
else {
fputs($internic, "$domain\r\n");
while (!feof($internic))
{
$buffer .= fread($internic,128);
}
if ($tipo == 1)
{
if (strpos($buffer, "No match for") > 0) $dados .= false; else $dados .= true;
}
else {
if (strpos($buffer, "No match for") > 0)
{
$dados .= "<pre>" . trim($buffer) . "</pre>";
}
else {
$servidor = substr($buffer, strpos($buffer, "Whois Server:")+14, strlen($buffer));
$servidor = substr($servidor, 0, strpos($servidor, "\n"));
$entidade = fsockopen("$servidor", 43, $errno, $errstr, 30);
if (!$entidade)
{
$dados .= "$errstr ($errno)";
}
else {
$buffer .= "

---

<BR> <BR>";
fputs($entidade, "$domain\r\n");
while (!feof($entidade))
{
$buffer .= fread($entidade,128);
}
$dados .= str_replace("\n","<BR>\n",trim($buffer));
fclose ($entidade);
}
}
}
fclose ($internic);
}


}
else {
$network = fsockopen($server[2], 43, $errno, $errstr, 30);
if (!$network)
{
$dados .= "$errstr ($errno)";
}
else {
fputs($network, "$domain\r\n");
while (!feof($network))
{
$buffer .= fread($network,128);
}
if ($tipo == 1)
{
if (strpos($buffer, "NOT FOUND") > 0) $dados .= false; else $dados .= true;
}
else {
$dados .= str_replace("\n","<BR>\n",trim($buffer));
}
fclose ($network);
}
}
}
return $dados;
}

?>




<form method=get>





<font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<!-- w -->[url=http://www" onclick="window.open(this.href);return false;]www[/url]<!-- w -->. type=text name=dominio size=30>





<input type=submit value=Consultar>

</font>
</form>




<font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<? if (!empty($_GET["dominio"])) { $dominio=$_GET["dominio"]; ?>
</font>
<HR>
<font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b>Resposta simplificada:</b><BR>
<BR>
O Domínio <b>
<?=$dominio?>
</b>
<? if (whois($dominio,1) == 1) echo "<br><b> <font color=#FF0000 size=1 face=Verdana, Arial, Helvetica, sans-serif>DOMINIO REGISTRADO</font></b>"; else echo "<br><b><font color=#66CC66 size=1 face=Verdana, Arial, Helvetica, sans-serif>DOMINIO
LIVRE </b> </font>";?>
</font>
<HR>

<? } ?>
<br>
<br>
<br>


está ai o código,ate mais !!!!

baixei um modulo para introduzir codigo dentro de um artigo do joomla,ai deu certo !!!

Uma duvida, o código acima não deu certo para mim, teria como eu ver funcionando??? Obrigado

Consegui resolver este problema da seguinte maneira:

Usei o modulo: mod_s5_domain_check_15
Baixei e instalei o módulo pela area administrativa do meu site. Depois entrei pelo Cpanel do meu servidor de hospedagem e fiz algumas modificações.
Como não utilizarei todos os tipos de domínios que vêm configurados, o que fiz foi modificar um deles, acrescentando assim o domínio .com.br

No Cpanel entrei no Gerenciador de Arquivos e fiz o seguinte:
abri a pasta: modules e dentro dela abri a pasta: mod_s5_domain_check

o caminho para ficar mais fácil, é este:
/public_html/modules/mod_s5_domain_check

Nesta pasta encontrei dois arquivos: mod_s5_domain_check.php e mod_s5_domain_check.xml

Abri o arquivo: mod_s5_domain_check.php pelo editor e modifiquei a busca para o domínio .co.uk

procurei a linha onde estava escrito: <?php if ($s5_domain6 == "yes") { ?>
<input type="checkbox" name="couk"/> .co.uk
<?php if ($s5_break6 == "yes") { ?>
<div style="height:8px"></div>
<?php } ?>
<?php } ?>

e editei para: <?php if ($s5_domain6 == "yes") { ?>
<input type="checkbox" name="combr"/> .com.br
<?php if ($s5_break6 == "yes") { ?>
<div style="height:8px"></div>
<?php } ?>
<?php } ?>

depois, procurei a linha onde estava escrito: if ($s5_domain6 == "yes") {
$d_couk = (isset($_POST)) ? 'couk' : '';
}

e editei para:
if ($s5_domain6 == "yes") {
$d_combr = (isset($_POST)) ? 'combr' : '';
}

para finalizar, procurei a linha: if ($s5_domain6 == "yes") {
if (($d_couk != '') || ($d_all != '') ) showDomainResult($domainbase.".co.uk",'whois.nic.uk','No match for');
}
e editei para:
if ($s5_domain6 == "yes") {
if (($d_combr != '') || ($d_all != '') ) showDomainResult($domainbase.".com.br",'whois.registro.br','No match for');
}

salvei o arquivo.



Para que tudo funcione, é preciso editar também o arquivo mod_s5_domain_check.xml.
Então, abri o arquivo: mod_s5_domain_check.xml

procurei a linha onde estava escrito: <param name="s5_domain6" type="radio" default="yes" label="Would you like .co.uk to be available?" >
<option value="yes">yes</option>
<option value="no">no</option>
</param>

e editei para:
<param name="s5_domain6" type="radio" default="yes" label="Would you like .com.br to be available?" >
<option value="yes">yes</option>
<option value="no">no</option>
</param>

salvei o arquivo e pronto!

Comigo deu certo e estou usando. Espero ter ajudado.