<?xml version="1.0" encoding="iso-8859-1"?>
<div xmlns="http://www.w3.org/1999/xhtml"><?php /////////////////////////////////////////////////////////
function controle($EMail, $Comment, $Prov) {
$zmail=trim($EMail);
$zcomm=trim($Comment); // 2008-04-07
// SPAM_CONT liste de contenus indesirables
if ($fic = fopen("spam_cont.txt", "r")) { 
    while (!feof($fic)) {
        $lig = trim(fgets($fic)," \n\r");
        if ($lig) {
            if (stristr($zcomm, $lig)) return 'err_c';
            }
        }
    fclose ($fic);
}
// SPAM_EMAIL liste d'adresse emails indesirables
if ($fic = fopen("spam_email.txt", "r")) { 
    while (!feof($fic)) {
        $lig = trim(fgets($fic)," \n\r");
        if ($lig) {
            if (stristr($zmail, $lig)) return 'err_e';
            }
        }
    fclose ($fic);
}
// Page non utilisable (hackee...)
//if (eregi("marchenewsnewsvet",$Prov)) return 'err_h';
//if (stristr("marchenewsnewsvet",$Prov)) return 'err_h';
if (eregi("^([-!#$%&\'*+\\./0-9=?A-Z^_`a-z{|}~]+)@(((25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?))|(([-!#$%&\'*+\\/0-9=?A-Z^_`a-z{|}~]+)\.)([-A-Za-z]{2,4}))$",$zmail)) return 'ok'; 
// if (eregi("^([-!#$%&\'*+\\./0-9=?A-Z^_`a-z{|}~]+)@(([-!#$%&\'*+\\/0-9=?A-Z^_`a-z{|}~]+)\.)([-A-Za-z]{2,4})$",$zmail)) return 'ok'; 
else return 'err';
}

//////////////////// Test adresse IP ou domaine spammer
function testadr()
{
$Spammer = @gethostbyname($_SERVER["REMOTE_ADDR"]);
// SPAM_ADR liste des URL indesirables dans un fichier
if ($fic = fopen("spam_adr.txt", "r"))
    {
    while (!feof($fic)) 
        {
        $lig = trim(fgets($fic)," \n\r");
        if ($lig) {if (stristr($Spammer,$lig)) return 'err_s';}
        }
    fclose ($fic);
    }
}
//////////////////////////////////////////////////////////
function envoimail($EMail,$Prov,$Name,$Comment,$Aujourd)
{
// Chargement zones
$Aujourd = date("jS F Y, H:i");
$SendFrom = "$EMail";
if($Prov == 'LILOFE') {
        $SendTo = 'dominique.guebey@club-internet.fr,roma.manouche@voila.fr';
        $Cc = '';
        }
else {
        $SendTo = 'dominique.guebey@club-internet.fr';
        $Cc = '';
        }
$SubjectLine = "Contact $Name";
if($Prov != ''): $SubjectLine .= " depuis $Prov";
endif;
$Divider =     "=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=";
// Message
$MsgBody = @gethostbyname($_SERVER["REMOTE_ADDR"]) . ' ' . @gethostbyaddr($_SERVER["REMOTE_ADDR"]) . "\n" . $_SERVER["HTTP_USER_AGENT"] . "\n";
$MsgBody .= $Aujourd . "\n$Divider";
// corps du message a partir des donnees du formulaire
foreach ($_POST as $Field=>$Value)
   if(($Field != 'acq') && ($Field != 'Envoi') && ($Field != 'Prov')) {
        if($Field == 'Comment') {
                $MsgBody .= "\n=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=\n";}
        else {  $MsgBody .= "\n$Field: "; }
        $MsgBody .= $Value;
        }
$MsgBody = htmlspecialchars($MsgBody);  // securisation
// HEADERS
$Headers .= "\r\nFrom:" . $SendFrom;
if($Cc != ''): $Headers = "\r\nCC:" . $Cc;
endif;
// Envoi E-Mail

//        $dibog = fopen ('test.log','w');
//        fwrite($dibog,$$Headers);
//        fclose($dibog);

$acq = mail($SendTo, $SubjectLine, $MsgBody, $Headers);
   if(!$acq) {print "<p class='bgroug'><span class="bold">Problème serveur : le message n'a pas pu être envoyé / <span class="italic" xml:lang='en'>Message could not be sent</span></span></p>";}
   else {
   print "<p class='bgver'><span class="bold">Le message a bien été envoyé / <span class="italic" xml:lang='en'>Message successfuly sent</span></span></p>";
   }
}
/////////////////////////////////////////////////////

// test isset $Envoi OK : on vient du formulaire avec input "envoi"
if(isset($Envoi)):
   // Controles
   $r = controle($EMail, $Comment, $Prov);
   if ($r == 'err') {print "<p class='bgroug'>Cette adresse eMail n'est pas valide /<span class="italic" xml:lang='en'>Please enter valid e-mail</span></p>";}
//   else if ($r == 'err_s') {print "<p class='bgroug'>Expediteur non admis /<span class="italic" xml:lang='en'>Unauthorized</span></p>";}
   else if ($r == 'err_c') {print "<p class='bgroug'>Contenu non admis /<span class="italic" xml:lang='en'>Unauthorized content</span></p>";}
   else if ($r == 'err_e') {print "<p class='bgroug'>Adresse non admise /<span class="italic" xml:lang='en'>Unauthorized adress</span></p>";}
   else if ($r == 'err_h') {print "<p class='bgroug'>Je vous conseille de ne pas recommencer /<span class="italic" xml:lang='en'>Your interest is to stop this</span></p>";}
   else if($Name == '') {print "<p class='bgroug'>Le nom doit &ecirc;tre renseign&eacute; <span class="italic" xml:lang='en'>Please enter a name</span></p>";}
   else {
      envoimail($EMail,$Prov,$Name,$Comment,$Aujourd);
      $Name = "";
      $EMail = "";
      $Comment = "";
      }

else:
// sinon : on en est au premier affichage, le formulaire est affiché...
//      sauf si adresse interdite

?></div>