• [^] # Re: Euh

    Posté par (site web personnel) . En réponse au journal TrollMaster est là !. Évalué à 3.

    Un autre trollomètre (ne vous étonez pas de la différence de scores, la technologie est différente, il s'agit de "velu inside"). Ici (en mode verbeux): http://www.nakan.ch/trollometre.php(...) Le source est là:
    <?php
    if (!isset($url)) {
     echo '
     
     Détécteur de trolls (velu inside)
     Page à analyser: 
     
     ';
    }
    else {
     // Ouverture de l'URL en lecture
     if (@fopen($url, "r")) {
     $ptr = @fopen($url, "r");
     $contents = '';
     while (!feof($ptr)) {
     $contents .= fread($ptr, 8192);
     }
     fclose($ptr);
     
     $trollCnt = 0;
     // Batterie de tests de trolls:
     $velu[0] = "troll|5";
     $velu[1] = "windows|5";
     $velu[2] = "microsoft|5";
     $velu[3] = "linux|1";
     $velu[4] = "mac os x|3";
     $velu[5] = "debian|5";
     $velu[6] = "mandrake|5";
     $velu[7] = "gentoo|5";
     $velu[8] = "proprietaire|7";
     $velu[9] = "proprio|7";
     $velu[10] = "mieux que|7";
     $velu[11] = "java|7";
     $velu[12] = "asp|4";
     $velu[13] = "apple|3";
     $velu[14] = "rms|5";
     $velu[15] = "stallman|5";
     $velu[16] = "capucestpaslibre|15";
     
     for ($i = 0; $i < sizeof($velu); $i++) {
     $tresVelu = explode("|", $velu[$i]);
     $nb = substr_count(strtolower($contents), strtolower($tresVelu[0]));
     echo "WORD: " . $tresVelu[0] . " (" . $tresVelu[1] . ") * $nb = " . ($nb * $tresVelu[1]) . "";
     $trollCnt += ($nb * $tresVelu[1]);
     }
     echo "TOTAL: $trollCnt";
     }
     else {
     echo "Erreur d'ouverture de la page :-(";
     }
    }
    ?>
    
    Vous pouvez donc modifier le score de chaque mot, et en ajouter :-)