Whois muito bom PHP dominos .net .com.br .com

obs= é necessário que a sua pospedagem aceite <? ?> , voce pode habilitar pelo php.ini ou trocar no <? por <?php e ?> apena manter.

<?
function whois ($domain, $tipo) {
/*
Desenvolvido por: Otavio James Bernardes Junior 
Programação PHP – (0xx12) 9765-8667
*/
$server[0] = “whois.registro.br”; //–> Domínios Nacionais
$server[1] = “whois.internic.net”; //–> Domínios .com, .net, .org, .edu
$server[2] = “whois.networksolutions.com”; //–> Domínios .aero, .arpa, .biz, .coop, .info, .int, .museum

$domain = strtolower($domain);
if (trim($domain) <> “”) {
$domain = trim($domain);
$final = substr($domain, -4);
// Verifica dominios do brasil
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”,” \n”,trim($buffer));
}
fclose ($br);
}

// Verifica domínios .com, .net, .org, .edu
} 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 .= “——————————————————————————- ”;
fputs($entidade, “$domain\r\n”);
while (!feof($entidade)) {
$buffer .= fread($entidade,128);
}
$dados .= str_replace(“\n”,” \n”,trim($buffer));
fclose ($entidade);
}
}
}
fclose ($internic);
}

// Verifica os outros
} 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”,” \n”,trim($buffer));
}
fclose ($network);
}
}
}
return $dados;
}

?>
<form method=get>

<input type=text name=dominio size=30>
<input type=submit value=Consultar>

</form>

<? if (strlen($_GET[“dominio”]) > 0) { ?>

<HR>
Resposta simplificada: 
 
O Domínio 
<?=$_GET[“dominio”]?>

<? if (whois($_GET[“dominio”],1) == 1) echo “ <img src=registrado.jpg width=32 height=32 align=absmiddle> DOMINIO REGISTRADO”; else echo “ <img src=livre.jpg width=32 height=32 align=absmiddle>DOMINIO
LIVRE ”;?>

<HR>
Resposta completa: 
 
<?= whois($_GET[“dominio”],2)?>
<? } ?>

http://www.codigosnaweb.com/forum/Script-de-pesquisa-de-dominios-whois_1_1801.html

http://forum.wmonline.com.br/topic/191189-script-pesquisa-de-dominios-whois/

testar html

http://jsfiddle.net/

teste php

http://phptester.net/

verificar socket

http://php.net/manual/pt_BR/book.sockets.php

https://www.google.com.br/search?q=Desenvolvido+por%3A+Otavio+James+Bernardes+Junior+whois+corrigido&oq=Desenvolvido+por%3A+Otavio+James+Bernardes+Junior+whois+corrigido&aqs=chrome..69i57.215j0j7&sourceid=chrome&es_sm=93&ie=UTF-8

Deixe um comentário Cancelar resposta