PHP: Werbefreier Domaincheck für die eigene Homepage

Oft ist es erwünscht, auf der eigenen Homepage einen Domaincheck-Service anzubieten.
Gerade wenn man sich mit Webdesign und allgemein mit dem WWW beschäftigt, kann dies auf der eigenen Homepage von Vorteil sein.

Dr. Web veröffentliche mehrere PHP-Scripts, die nun nicht mehr nur den zahlenden Abonnenten zur Verfügung stehen, sondern kostenlos von jedermann gelesen und heruntergeladen werden können.

Sehr interessant ist hierbei das Script für den werbefreien Domaincheck auf der eigenen Seite:



<html>
<head>
<title>Domaincheck</title>
</head>
<body>

<form action="<? $_SERVER["PHP_SELF"] ?>" method="post">

<p>Pr&uuml;fen Sie, ob Ihre Wunschdomain noch frei ist!</p>

<?

$domain_name = $_POST["domain_name"];
$domain_endung = $_POST["domain_endung"];

$domain = $domain_name.$domain_endung;

if($domain_endung == ".de") $domain_endung_de = " selected=\"selected\"";
if($domain_endung == ".at") $domain_endung_at = " selected=\"selected\"";
if($domain_endung == ".ch") $domain_endung_ch = " selected=\"selected\"";
if($domain_endung == ".com") $domain_endung_com = " selected=\"selected\"";
if($domain_endung == ".net") $domain_endung_net = " selected=\"selected\"";
if($domain_endung == ".org") $domain_endung_org = " selected=\"selected\"";

?>

<p><input type="text" name="domain_name" value="<? echo $domain_name ?>" />
<select name="domain_endung">
    <option<? echo $domain_endung_de ?>>.de</option>
    <option<? echo $domain_endung_at ?>>.at</option>
    <option<? echo $domain_endung_ch ?>>.ch</option>
    <option<? echo $domain_endung_com ?>>.com</option>
    <option<? echo $domain_endung_net ?>>.net</option>
    <option<? echo $domain_endung_org ?>>.org</option>
</select></p>

<p><input type="submit" value="Domain pr&uuml;fen" />

</form>

<?

$ausgabe_unzulaessig = "Der von Ihnen gew&auml;hlte Domainname ist nicht zul&auml;ssig.";
$ausgabe_verbindung = "Es konnte keine Verbindung zum Whois-Server aufgenommen werden.";
$ausgabe_frei = "Der von Ihnen gew&auml;hlte Domainname <span style=\"font-weight:bold\">".$domain."</span> ist noch frei.";
$ausgabe_vergeben = "Der von Ihnen gew&auml;hlte Domainname <span style=\"font-weight:bold\">".$domain."</span> ist bereits vergeben.";

if($domain_name != "" && $domain_endung != "") {

    switch($domain_endung) {
        case ".de":
            $daten = array("whois.denic.de", "status: free", "status: invalid", "connection refused");
            break;
        case ".at":
            $daten = array("whois.nic.at", "nothing found");
            break;
        case ".ch":
            $daten = array("whois.nic.ch", "we do not have an entry");
            break;
        case ".com":
            $daten = array("whois.internic.net", "no match");
            break;
        case ".net":
            $daten = array("rs.internic.net", "no match");
            break;
        case ".org":
            $daten = array("whois.networksolutions.com", "no match");
            break;
        default:
            die("Diese Domainendung wird nicht unterst&uuml;tzt.");
            break;
    }

    $server = $daten[0];
    $meldung_frei = $daten[1];
    $meldung_unzulaessig = $daten[2];
    $meldung_verbindung = $daten[3];

    $check = fsockopen($server, 43);

    if($check) {
        fputs($check, $domain." \r\n");
        while(!feof($check)) $ergebnis = $ergebnis.fgets($check, 128);
        fclose($check);
    }

    $ergebnis = strtolower($ergebnis);
    while(substr_count($ergebnis, "  ") > 0) $ergebnis = str_replace("  ", " ", $ergebnis);

    if(ereg($meldung_frei, $ergebnis) && $ausgabe == "") {
        $ausgabe = $ausgabe_frei;
    } else if(ereg($meldung_unzulaessig, $ergebnis) && $ausgabe == "") {
        $ausgabe = $ausgabe_unzulaessig;
    } else if(ereg($meldung_verbindung, $ergebnis) && $ausgabe == "") {
        $ausgabe = $ausgabe_verbindung;
    } else if($domain != "" && $ausgabe == "") {
        $ausgabe = $ausgabe_vergeben;
    }

}

echo "<p>".$ausgabe."</p>\r\n";

?>

</body>
</html>

Abschließend sei noch jedem einen Besuch beim Dr. Web ans Herz gelegt.

 

abgelegt in Codeschnipsel Ι geposted von admin - 2007-10-25