$longueurMaxCommentaires) or (@ strlen($c)>$longueurMaxCommentaires)) { print("Désolé, la taille maximale des commentaires pouvant être postés est limitée à $longueurMaxCommentaires caractères.
\n"); print("Retour au Livre d'Or\n"); exit; } // ##################################################################################### ?>

LIVRE D'OR


",$chaineRes); } return($chaineRes); } // *********************************************************************************** // récupération de l'Ip de l'internaute // *********************************************************************************** if(isset($_SERVER['HTTP_X_FORWARDED_FOR'])){ $ip = $_SERVER['HTTP_X_FORWARDED_FOR'];} elseif(isset($_SERVER['HTTP_CLIENT_IP'])){ $ip = $_SERVER['HTTP_CLIENT_IP'];} else{ $ip = $_SERVER['REMOTE_ADDR'];} // ##################################################################################### // *********************************************************************************** // chargement en table des Ip interdites // *********************************************************************************** $TabIp=file("interdiction_ip.dat"); $nLignesTabIp=count($TabIp)-1; $nIp=$nLignesTabIp; for($comptip=1;$comptip<=$nIp;$comptip++) { $Ip[$comptip]=trim(stripslashes($TabIp[$comptip])); }; // ##################################################################################### // *********************************************************************************** // si IP interdites afficher page blanche // *********************************************************************************** $ippourri=0; for($comptip=1;$comptip<=$nIp;$comptip++) { if ($ip == $Ip[$comptip]) { $ippourri = $ippourri + 1; $suppl = "IP rejetée"; }; }; // ##################################################################################### // *********************************************************************************** // chargement en table des Mots interdits // *********************************************************************************** $TabMot=file("interdiction_mot.dat"); $nLignesTabMot=count($TabMot)-1; $nMot=$nLignesTabMot; for($comptmot=1;$comptmot<=$nMot;$comptmot++) { $Mot[$comptmot]=trim(stripslashes($TabMot[$comptmot])); }; // *********************************************************************************** // Nettoyage et enregistrement des nouveaux commentaires envoyés lors de l'appel du script // *********************************************************************************** if ($c and $n) { $comm = "a".$c.$n; // détermination de la date $tdate=getdate(); $jour=sprintf("%02.2d",$tdate["mday"])."/".sprintf("%02.2d",$tdate["mon"])."/".$tdate["year"]; $heure=sprintf("%02.2d",$tdate["hours"])."H".sprintf("%02.2d",$tdate["minutes"]); $d=$jour." à ".$heure; // nettoyage du nom $n=htmlentities($n); $n=stripslashes($n); $n=trim($n); // nettoyage du commentaire $c=htmlentities($c); $c=str_replace(chr(10),"
",$c); $c=str_replace(chr(13),"",$c); $c=stripslashes($c); $c=trim($c); // test si mots interdits mais // verif si pas plus de 2 adresse internet sur $n et plus de 1 adresse sur $n // verif si $ip fait partie des ip censurées // puis nettoyage de la chaine des majuscules, des lettres accentuées, des retour à la ligne puis detection des mots censurés $car ="car"; $suppl ="texte contenant des mots interdits"; $comptadresse = 0; $ipcensure = 0; $compturl = 0; $compturl = substr_count($c , "www."); if ($compturl > 1) {$comptadresse = $compteadresse + 1; $suppl = "trop de liens dans le commentaire"; }; $compturl = substr_count($c , "http:"); if ($compturl > 1) {$comptadresse = $compteadresse + 1; $suppl = "trop de liens dans le commentaire";}; $compturl = substr_count($n , "www."); if ($compturl > 1) {$comptadresse = $compteadresse + 1; $suppl = "trop de liens dans le nom";}; $compturl = substr_count($n , "http:"); if ($compturl > 1) {$comptadresse = $compteadresse + 1; $suppl = "trop de liens dans le nom";}; for($comptip=1;$comptip<=$nIp;$comptip++) { if ($ip == $Ip[$comptip]) { $ipcensure = $ipcensure + 1; $suppl = "IP rejetée"; }; }; $censure = 0; $comm = strtolower($comm); $comm = strtr($comm, "ÀÁÂÃÄÅàáâãäåÒÓÔÕÖØòóôõöøÈÉÊËèéêëÇçÌÍÎÏìíîïÙÚÛÜùúûüÿÑñ.;:,!*%;", "aaaaaaaaaaaaooooooooooooeeeeeeeecciiiiiiiiuuuuuuuuynn "); $comm = ereg_replace( "(\r\n){0,15}$", "", $comm); $comm = ereg_replace( "^(\r\n){0,15}", "", $comm); $comm = str_replace(CHR(10),"",$comm); $comm = str_replace(CHR(13),"",$comm); $comm = str_replace("
"," ",$comm); $comm = str_replace("
"," ",$comm); $comm = str_replace("
"," ",$comm); $comm = trim( $comm ); $Nouvelle=""; for ($i = 0; $i < strlen($comm); $i++) { if (substr($comm, $i,1) != ' ') { $Nouvelle=$Nouvelle . substr($comm, $i,1); }; }; $comm = $Nouvelle; $censure = $censure + $ipcensure + $comptadresse; for($comptmot=1;$comptmot<=$nMot;$comptmot++) { $censure = $censure + strpos(" ".$comm , $Mot[$comptmot] ); }; if ($censure == 0) { $idFicLivreCom=fopen("livre.dat","a+"); fputs($idFicLivreCom,$n); // 1ère ligne fputs($idFicLivreCom,"|"); // fputs($idFicLivreCom,$d."|\n"); // fputs($idFicLivreCom,$c."\n"); // 2ème ligne fclose($idFicLivreCom); $alertmail = "OK"; $merci = "Toqu'en Tête vous remercie pour votre participation !"; $car = ""; $suppl = ""; } else { $alertmail = "CENSURé"; $merci = "Votre message a été rejeté automatiquement par le robot
son contenu étant suspect car a priori 'hors Charte Netiquette'."; }; } // *********************************************************************************** // Lecture des messages déjà postés dans le livre, et stockage des données // dans les tableaux $nom et $commentaire // *********************************************************************************** $TabLivre=file("livre.dat"); $nLignesTabLivre=count($TabLivre)-1; $nCommentaires=$nLignesTabLivre/2; for($compt=1;$compt<=$nCommentaires;$compt++) { $nom[$compt]=trim(stripslashes(strtok($TabLivre[($compt*2)-1],"|"))); $date[$compt]=trim(stripslashes(strtok("|"))); $commentaire[$compt]=trim(stripslashes($TabLivre[($compt*2)])); } // *********************************************************************************** // Affichage d'un message de remerciement au cas ou un commentaire a été envoyé en même // temps que l'appel du script // *********************************************************************************** if($n and $c) { print("
\n"); print(" \n"); print("
\n"); print("
\n"); print(" \n"); print("".$merci." \n"); if ($censure > 0) { print ("

Votre adresse IP '"); echo "".$ip.""; print ("' a été enregistrée
pour faire valoir ce que de droit
en cas d'utilisation abusive de ce formulaire..."); } else { $headers = 'From: '."\n"; $Titre2="livre d'or : ".$alertmail; $Texte1= "\n\n\n\nalert mail : ".$alertmail." ".$car." ".$suppl."\nAdresse IP : ".$ip."\nDate : ".$d."\nAuteur : ".$n."\nTexte : ".$c."\nPage Orig : ".$page."\n"; mail("toquentete@toquentete.net",$Titre2,$Texte1,$headers); }; print("
\n"); print("
\n"); print("
\n"); print("
\n"); } // *********************************************************************************** // Affichage des commentaires déjà postés dans un tableau // *********************************************************************************** if(!$p) { $p=1; // $p représente le numéro de la page de commentaire à afficher : par défaut, $p=1 } if($nCommentaires>0) { print(" \n"); print(" \n"); print("
\n"); print(" \n"); print(" \n"); print(" \n"); print(" \n"); for($compt=($nCommentaires-(($p-1)*$NombreComParPage));$compt>=max(1,($nCommentaires-($p*$NombreComParPage)+1));$compt--) { print(" \n"); print(" \n"); } if(($nCommentaires>$NombreComParPage) and $p<=min($NombreMaxPages,floor((($nCommentaires-1)/$NombreComParPage)+1))) { print(" \n"); print(" \n"); print(" \n"); } print("
\n"); print("
\n"); if($nCommentaires>$NombreComParPage) { print("
\n"); print(" \n"); print("pages   \n"); print(" \n"); for($a=1;$a<=min($NombreMaxPages,floor((($nCommentaires-1)/$NombreComParPage)+1));$a++) { if($a==$p) print("$a   \n"); else print("$a   \n"); }; print(" \n"); print(" \n"); print("
\n"); }; print("
\n"); print("
\n"); print(" \n"); if ($saisieinterdite != "oui") {print("
Pour ajouter votre commentaire,
cliquez ici.
Pour ajouter votre commentaire sur le Livre d'Or,
Cliquez ici.


\n"); } else { print("
LIVRE D'OR EN MAINTENANCE,

vous pouvez consulter celui-ci
mais vous ne pourrez pas ajouter votre signature
Revenez plus tard


\n"); }; print("
\n"); print("
\n"); print("
\n"); print(" \n"); print(" \n"); print(" \n"); print(" \n"); print(" \n"); print("
  \n"); $nom[$compt] = ereg_replace( "(http://|https://|ftp://)([[:alnum:]/\n+-=%&:_.~?]+[#[:alnum:]+]*)", "\\1://\\2Se rendre sur ce lien",$nom[$compt]); print("".coupeMotsLongs($nom[$compt],$longueurMaxMots)." a écrit, le ".$date[$compt]." : \n"); print("
\n"); print("
\n"); print(" \n"); print(" \n"); print(" \n"); print(" \n"); print(" \n"); print("
  \n"); $commentaire[$compt] = eregi_replace( "(http|https|ftp)://([[:alnum:]/\n+-=%&:_.~?]+[#[:alnum:]+]*)", "\\1://\\2Se rendre sur ce lien",$commentaire[$compt]); // ".$liburl."Se rendre sur ce lien print("".coupeMotsLongs($commentaire[$compt],$longueurMaxMots)."\n"); print("
\n"); print("
\n"); print("
\n"); print("
\n"); print(" \n"); print("pages   \n"); print(" \n"); for($a=1;$a<=min($NombreMaxPages,floor((($nCommentaires-1)/$NombreComParPage)+1));$a++) { if($a==$p) print("$a   \n"); else print("$a   \n"); } print(" \n"); print(" \n"); print("
\n"); print("
\n"); print("
\n"); print("
\n"); } // ********************************************************************************************* // Affichage d'un message d'avertissement au cas où aucun commentaire n'a été encore été envoyé // ********************************************************************************************* if($nCommentaires<1) { print(" \n"); print(" \n"); print("
\n"); print("
\n"); print(" \n"); print("Le livre d'or ne comporte encore aucun commentaire. \n"); print(" \n"); print("
\n"); print("
\n"); print("
\n"); } // *********************************************************************************** // Affichage du formulaire permettant de poster un nouveau commentaire // *********************************************************************************** if ($ippourri==0) { print(""); print("
\n"); print(" \n"); print("
\n"); print(" \n"); print(" \n"); print(" \n"); print(" \n"); print(" \n"); } print("
\n"); print("

\n"); if ($saisieinterdite != "oui") { if($nCommentaires>0) print("Ajoutez votre commentaire : \n"); else print("

Envoyer un premier commentaire :
\n"); print("

\n"); print("
\n"); $valeurfunction = rand(10, 100000); print("
\n"); print("
\n"); print("
\n"); print(" \n"); print("Votre nom (ou pseudo) : 
\n"); print("
\n"); print(" \n"); print(" \n"); print("

Votre commentaire :
\n"); print("
\n"); print(" \n"); print("

\n"); print(" \n"); print("Vérification anti-robot.
Donnez le résultat de ce calcul avant d'envoyer :
\n"); print(" \n"); $valeur3 = rand(1, 2); $multiplicateur = rand (8, 20); if ($valeur3 == 1) { $nomvarjs1 = "k883oru"; $nomvarjs = "va0oni"; $valeur1 = rand(1, 9); $valeur2 = rand(1, 9); print("  "); print("   \n"); $valeur2 = $valeur2 * 10 ; } else { $nomvarjs1 = "z29cra"; $nomvarjs = "co02tw"; $valeur1 = rand(1, 9); $valeur2 = rand(1, 9); print("   "); print("  \n"); $valeur1 = $valeur1 * 10 ; }; $valeurvariablejs = rand(900, 1100); $valeurvariable2js = rand(900, 1100); $valeurresultat = $valeur1 + $valeur2; $valeurresultatjc = $valeurresultat * $multiplicateur ; print("\n"); print(" \n"); print("


\n"); print("\n"); print("

Pour tout commentaire nécessitant une réponse de la part de Toqu'en Tête,
utilisez plutôt ce formulaire-ci :

\n"); print("
\n"); print(" \n"); print("
\n"); print("
\n"); print("
\n

"); }; if (($ippourri>0) && ($mailsitentativeippourri == "oui")) { $headers = 'From: '."\n"; $Titre2="livre d'or : Tentative IP: ".$ip." :"; $Texte1= "\n\n\nAdresse IP : ".$ip."\nPage Orig : ".$page."\n"; mail("toquentete@toquentete.net",$Titre2,$Texte1,$headers); }; // ##################################################################################### ?>