Vérifie l'existence d'un lien dans une page cible

                               

                            
/*---------------------------------------------------------------*/
/*
    Titre : Vérifie l'existence d'un lien dans une page cible                                                          
                                                                                                                          
    URL   : https://phpsources.net/code_s.php?id=298
    Auteur           : Sebastienjulien                                                                                    
    Date édition     : 03 Sept 2007                                                                                      
    Date mise a jour : 19 Aout 2019
                                                                                      
    Rapport de la maj:                                                                                                    
    - fonctionnement du code vérifié                                                                                
    Date mise a jour : 21 Jan 2026
                                                                                       
    Rapport de la maj:                                                                                                    
    - refactoring du code en PHP 8                                                                                        
    - fonctionnement du code vérifié en PHP 8                                                                       
*/
/*---------------------------------------------------------------*/?>

    <form name="form" action="" method="post">
    Source : <input type=text name=source size=50 value="">
    Link : <input type=text name=link size=50 value="">
    <input type=submit value=chercher>
    </form>

<?php

   // url source
    $source = isset($_POST["source"]) ? $_POST["source"] : "";
    // url cible
    $link = isset($_POST["link"]) ? $_POST["link"] : "";

  if (isset($_POST["source"])) {
    $fp=fopen($source,"r");
        $chaine = '';
     if($fp)  
         {  
               while(!feof($fp))  
                {  
                       $chaine .= fgets($fp,1024);  
                   }  
        }  
    
         $masque  = '#';
         $masque .= '([http|ftp|https]+://';
         $masque .= '[www\.]?';
         $masque .= '[\.\-a-zA-Z0-9]*';
         $masque .= '[a-zA-Z]{2,4}?';
         $masque .= '[\?/\=\&\-_.a-zA-Z0-9]+?';
         // si vous avez + de répertoires a analyser, ajouter + de lignes
         // comme la ligne modèle ci dessous :
         $masque .= '[\?/\=\&\-_.a-zA-Z0-9]+?';
         // fin ligne modèle
         $masque .= '[\?/\=\&\-_.a-zA-Z0-9]+)';
         $masque .= '#i';
         // FIN MASQUE

         preg_match_all($masque,$chaine,$out,PREG_SET_ORDER);


    
     $i=-1;
     $compte=-0;
     $out = [];
      
     while ($i < count($out)) 
         { 
            $i++; 
              // affiche tous les elements du tableau 
              // vous pouvez decocher la ligne ci dessous 
                        // pour lister tous les elements du tableau 

            if (!is_null($out) && isset($out['key'])) {

              if($out[$i][1] == "$link")
                {
                    echo "<b><font color=blue size=4>".$out[$i][1].
"</font></b><br>";
                    $compte++;
                } 
            else 
                {
                    echo $out[$i][1]."<br>";
                }
             }

              else {  $out = [];
                  }
                  
         } 
      }
              // Check if form is submitted
         if ($_SERVER['REQUEST_METHOD'] === 'POST') {
             echo "<pre>"; // Preserve formatting for arrays
             print_r($_POST); // Print the POST data
             echo "</pre>";
         } 

    

     if (isset($compte) and  $compte > 0)  echo "<b>Le lien existe </b> (".
$compte." x )";
?>