Verifie la validite d'une adresse internet

<?php
/******************************************************************************/
/*                                                                            */
/*                       __        ____                                       */
/*                 ___  / /  ___  / __/__  __ _____________ ___               */
/*                / _ \/ _ \/ _ \_\ \/ _ \/ // / __/ __/ -_|_-<               */
/*               / .__/_//_/ .__/___/\___/\_,_/_/  \__/\__/___/               */
/*              /_/       /_/                                                 */
/*                                                                            */
/*                                                                            */
/******************************************************************************/
/*                                                                            */
/* Titre          : Verifie la validite d'une adresse internet                */
/*                                                                            */
/* URL            : http://www.phpsources.org/scripts503-PHP.htm              */
/* Auteur         : KOogar                                                    */
/* Date édition   : 05 Avril 2009                                             */
/* Website auteur : http://www.koogar.fr                                      */
/*                                                                            */
/******************************************************************************/


  define("TEST_URL",true);
  $url = 'http://www.phpsources.net';


            $url_parsee = parse_url($url);
            $host = $url_parsee["host"];
            $path = isset($url_parsee["path"]) ? trim($url_parsee['path']) : '';

            //verification du lien et affichage du resultat
            //affichage du lien
            ?>
            <a href="<?php echo $url; ?>" target="_blank"><?php echo $url; ?>
</a>
            <br />
            <br />
            
            <?php
            //on verifie le lien
            $tab_return = check_connect($host,$path);
            //on affiche le resultat
            echo $tab_return["message"];



 function check_connect($host,$path)
//verifie la validite de l'adresse, c'est a dire on regarde si le site existe
// bien...
//on rend dans un tableau :
// "statut" : 0 si KO, 1 si redirect ou bien pour faire passer en local, 2 si
// OK
// "code" : code HTTP

{
    if(!TEST_URL)
    //si on travaille en local, on ne se connecte pas
    {
        $tab_return["statut"] = 1;
        $tab_return["code"] = 0;
        $tab_return["message"] = 
"<font color=\"#ff9900\">Pas de test de connexion</font>\n";
        return $tab_return;
    }
    $connect = 0;
    $no_code = 0;
    //connexion par socket
    if ($fp = fsockopen($host,80))
    {
        //traitement du path
        if(substr($path,strlen($path)-1) != '/')
        {
            if(!ereg("\.",$path))
                $path .= "/";
        }
        //envoi de la requete HTTP
        fputs($fp,"GET ".$path." HTTP/1.1\r\n"); 
        fputs($fp,"Host: ".$host."\r\n");
        fputs($fp,"Connection: close\r\n\r\n");
        //on lit le fichier
        $line = fread($fp,255);
        $en_tete = $line;
        
//on lit tant qu'on n'est pas la fin du fichier ou qu'on trouve le debut du code
// html...
        while (!feof($fp) && !ereg("<",$line) )
        {
            $en_tete .= $line;
            $line = fread($fp,255);
        }
        fclose($fp);
        //on switch sur le code HTTP renvoye
        $no_code = substr($en_tete,9,3);
        switch ($no_code)
        {
            // 2** la page a été trouvée
            case 200 :    $message = "OK";
                        $color = "#33cc00";
                        $connect = 2;
                        break;
            case 204 :    $message = "Cette page ne contient rien! (204)";
                        $color = "#ff9966";
                        break;
            case 206 :    $message = "Contenu partiel de la page! (206)";
                        $color = "#ff9966";
                        break;
            // 3** il y a une redirection
            case 301 :    $message = 
"La page a été déplacée définitivement! (301)";
                        $message .= seek_redirect_location($en_tete);    
                        $color = "#ff9966";
                        $connect = 1;
                        break;
            case 302 :    $message = 
"La page a été déplacée momentanément! (302)";
                        $message .= seek_redirect_location($en_tete);
                        $color = "#ff9966";
                        $connect = 1;
                        break;
            // 4** erreur du coté du client
            case 400 :    $message = "Erreur dans la requête HTTP! (400)";
                        $color = "#ff0000";
                        break;
            case 401 :    $message = "Authentification requise! (401)";
                        $color = "#ff0000";
                        break;
            case 402 :    $message = "L'accès à la page est payant! (402)";
                        $color = "#ff0000";
                        break;
            case 403 :    $message = "Accès à la page refusé! (403)";
                        $color = "#ff0000";
                        break;
            case 404 :    $message = "Page inexistante! (404)";
                        $color = "#ff0000";
                        break;
            // 5** erreur du coté du serveur
            case 500 :    $message = "Erreur interne au serveur! (500)";
                        $color = "#ff0000";
                        $connect = 1;
                        break;
            case 502 :    $message = 
"Erreur à cause de la passerelle du serveur! (502)";
                        $color = "#ff0000";
                        break;
            // cas restant
            default :    $message = 
"Erreur non traitée dont le numéro est : $no_code!";
                        $color = "#000000";
                        break;
        }
    }
    else
    {
        $message = "Impossible de se connecter par socket";
        $color = "#ff0000";
    }
    //creation du tableau avec les valeurs a rendre
    $data_return["statut"] = $connect; 
//la page est OK ou KO (200 => OK sinon KO)
    $data_return["code"] = $no_code; //code HTTP renvoye
    $data_return["message"] = "<font color=\"".$color."\">".$message."</font>\n"
; //message a afficher
    return $data_return;
}


function seek_redirect_location($header)
//recherche la location de la redirection si l'erreur HTTP renvoyee commence par
// 3
{
    $location = "";
    $tab_header = explode("\n",$header);
    for ($i=0;$tab_header[$i];$i++)
    {
        $line = split(":",$tab_header[$i],2);
        if(eregi("location",$line[0]))
        {
            $location = trim($line[1]);
            break;
        }
    }
    if ($location)
        return 
"<br>Redirection vers :<br><a href=\"$location\" target=\"_blank\">".$location.
"</a>\n";
    else
        return "<br>Aucune adresse de redirection n'a été trouvée...\n";
}
?>