source: extensions/free_mail/main.inc.php @ 3981

<?php
/*
Plugin Name: Free Mail
Version: 1.0.6
Description: Plugin modifie l entete des mails en cas de SPAM
Plugin URI: http://piwigo.org/ext/extension_view.php?eid=309
Author: cljosse
Author URI:http://cljosse.e3b.org
*/
 
if (!defined('PHPWG_ROOT_PATH')) die('Hacking attempt!');
define('Free_Mail_DIR' , basename(dirname(__FILE__)));
define('Free_Mail_PATH' , PHPWG_PLUGINS_PATH.basename(dirname(__FILE__)).'/');
include_once (Free_Mail_PATH.'include/constants.php'); 

/*
 add_event_handler('send_mail_headers','clj_send_mail_headers' ) ;
function clj_send_mail_headers($headers)
{
echo '<pre>';
print_r($headers) ;
echo '</pre>' ;
}

add_event_handler('send_mail_to', 'clj_send_mail_to');
function clj_send_mail_to($mailto)
{
echo '<pre>';
//print_r($mailto) ;
echo '</pre>' ;
}

add_event_handler('send_mail_content', 'clj_send_mail_content');
function clj_send_mail_content($content)
{
echo '<pre>';
//print_r($content) ;
echo '</pre>' ;
}

*/
//  trigger_event('send_mail_to', get_strict_email_list($to)),
// add_event_handler('send_mail_to', 'clj_send_mail_to');
/*function clj_send_mail_to($mailto)
{

$to=get_strict_email_list($mailto);
echo '<pre>';
 print_r($mailto) ;
 print_r( $to);
echo '</pre>' ;

 
} 
EVENT_HANDLER_PRIORITY_NEUTRAL  */
  
add_event_handler('send_mail', 'clj_send_mail',1 , 6);

function clj_send_mail($result, $mailto, $subject, $content, $headers, $args)
{
    global $conf, $user, $lang_info,  $conf_mail;
        
        $infos=Get_données();
        
$nbenv    =     $infos->nbenv ;
$next_day  =  $infos->next_day ;
$reste =    $infos->reste ;
$quarantaine    = $infos->quarantaine   ;       
$admins = $infos->admins   ;    
         
$ret="Attente de déblocage SPAMS " ;
 
  
   //================= réécriture de l'entête ===============================

if (!isset( $mailto)){ echo 'erreur maito absent'; exit(); }
if (empty( $mailto))  {  
 /*
echo '<pre>
-------------------------------------------------------------------
CONF_MAIL
';
 print_r($conf_mail) ;
 echo '<pre>
-------------------------------------------------------------------
ARGS
';
 print_r($args) ;
echo '</pre>' ;
*/
 
//$mailto=$conf_mail['email_webmaster'];
 //$mailto="";
                if (!empty($args['Cc']))
                {
                $headers= corrige_headers('Cc:',$headers);
                }
                if (!empty($args['Bcc']))
                {
                $headers        = corrige_headers('Bcc',$headers);
                }

 /* 
   echo '<pre>
-------------------------------------------------------------------
headers
';
 print_r($headers) ;
echo '</pre>' ;
  */
 }
 
 
                $ret=false;
 if (  $reste <=0 ) {
   ob_start();
   $ret = mail($mailto, $subject, $content, $headers);
   $message = ob_get_contents()."\n";
 
   
        //ob_flush();
   ob_end_clean();
//Trop de spam
$pos = strpos($message, 'spam');
        $query = '
        UPDATE '.FREE_MAIL_TABLE.'
        SET message="'. $message.'. "
      ;';
      pwg_query($query);
          
if ($pos === false) {
     if ($nbenv==0) {
         $dateenv=time();
                $query = '
        UPDATE '.FREE_MAIL_TABLE.'
        SET dateenv="'. $dateenv.'"
      ;';
      pwg_query($query);
         } 
         $next_day = time() + (0); //20 secondes
                $query = '
        UPDATE '.FREE_MAIL_TABLE.'
        SET date_check="'.  $next_day .'"
      ;';
      pwg_query($query);
          
           $nbenv += 1;
       $query = '
        UPDATE '.FREE_MAIL_TABLE.'
        SET nbenv="'. $nbenv.'"
      ;';
      pwg_query($query);
        
          
   if ($ret) {  
   
   return $ret; 
   
   }
                echo '<pre>';
                echo '
                ---- La fonction mail à retournée [false]  ------
                ';
 

echo            'mailto:   '.$mailto.'
';
                echo '
                -------- MESSAGE -----------------
                ';
                print_r($message) ;     
                echo '
                --------HEADERS -----------------
                ';
                        print_r($headers) ;
                echo '
                --------CONTENT -----------------
                ';
                        print_r($content) ;
                echo '</pre>' ;
                exit();
                
        } else { 
                        echo $message;
                        $ret=false;
   }
 //==================================================================

 if ($ret) {
     return $ret;
 }else{
        $next_day = time() + (2 * 24 * 60 * 60);
        echo "Attention defaut d'envoie de mails " .$ret. "\n" ;
       $query = '
        UPDATE '.FREE_MAIL_TABLE.'
        SET date_check="'. $next_day.'"
      ;';
      pwg_query($query);
          $reste=($next_day-time()) /3600 ;
            exit();
 }
 


}else{

        /*      echo '<pre>';
print_r ($headers);
print_r($content );
echo '</pre>';  
*/

                
if      ($reste >= 1) {
   echo '<pre>';
        print "Attention il ya eu un d&eacute;faut d'envoie de mails encore 
                ". (int ) $reste . "H
                avant le d&eacute;blocage." ;
                }
                else{echo '<pre>';
                        print "Il faut attendre au minimun 20 sec avent un deuxième envoie encore avant le d&eacute;blocage."   ;
                        }
                        
                echo '</pre>';
                echo '
          <a href="admin.php">RETOUR  </a>
          ';
                 
                echo "Dernier message :".$message. " reçu.";
                
           exit();
           
                echo 'ARGS:             ';
                print_r($args) ;
                        echo '
                        ----------------------------------------------------
                        MAIL TO: 
                        ' ;
                        print_r($mailto) ;

                        echo '
                        ----------------------------------------------------
                        HEADER
                        ' ;
                        print_r($headers) ;
                                        echo '
                                        ----------------------------------------------------
                                        content 
                        ' ;
                        
                        print_r($content) ;
                echo '</pre>' ;
        
  
 }
 

}

//=================================================================================
function Get_colonne_de($table)
{
  $columns_of = array();
    $query = 'DESC '.$table.';';
    $result = mysql_query($query);
    $columns_of[$table] = array();
    while ($row = mysql_fetch_row($result))
    {
      array_push($columns_of[$table], $row[0]);
    }
  return $columns_of;
}

function Get_données()
{
global $conf, $user;

    $nb = Get_colonne_de(FREE_MAIL_TABLE);
        $table=$nb[FREE_MAIL_TABLE];     
//================================================================================      
    if (!in_array( "nbenv",$table)) {   
                $query = "ALTER TABLE `".FREE_MAIL_TABLE."` ADD `nbenv` smallint(5) NOT NULL default '0' ";
                           pwg_query($query);            }  
        if (!in_array( "dateenv",$table)) {     
          $query = "ALTER TABLE `".FREE_MAIL_TABLE."` ADD `dateenv` INT NOT NULL default '0' ";
                           pwg_query($query);            }  
                if (!in_array( "quarantaine",$table)) { 
          $query = "ALTER TABLE `".FREE_MAIL_TABLE."` ADD `quarantaine` bool NOT NULL ";
                           pwg_query($query);            }              
                if (!in_array( "message",$table)) {     
          $query = "ALTER TABLE `".FREE_MAIL_TABLE."` ADD `message` TEXT   ";
                           pwg_query($query);            }                                          
      $query = "
                SELECT COUNT(*)
                FROM ".FREE_MAIL_TABLE."
                ;";
//==============================================================================                
  list($count) = mysql_fetch_row(pwg_query($query));
  if ($count == 0)
  {
         $next_day = time()  ;
         $date_check='';
           $q = '
    INSERT INTO '.FREE_MAIL_TABLE.' (id,nbenv, date_check,dateenv, quarantaine,message)
    VALUES (1,0,"'. $next_day.'","'. $next_day.'" ,false,".")
         ;';
        pwg_query($q);
        } 
        
        
         $query = "
    SELECT *
    FROM ".FREE_MAIL_TABLE."
        ;";
    $data = mysql_fetch_array(pwg_query($query));
        // limite 2000 par semaine.

        $infos->nbenv    = $data['nbenv'];
    $infos->next_day = $data['date_check'];
        
    $infos->reste =(float) ( $data['date_check'] - time())/3600 ;
        
        $infos->quarantaine = $data['quarantaine']; 
        $infos->message = $data['message'];     
//============================================================

  $admins = array();

  $query = '
select
  U.'.$conf['user_fields']['username'].' as username,
  U.'.$conf['user_fields']['email'].' as mail_address
from
  '.USERS_TABLE.' as U,
  '.USER_INFOS_TABLE.' as I
where
  I.user_id =  U.'.$conf['user_fields']['id'].' and
  I.status in (\'webmaster\',  \'admin\') and
  I.adviser = \'false\' and
  '.$conf['user_fields']['email'].' is not null and
  I.user_id <> '.$user['id'].'
order by
  username
';

  $datas = pwg_query($query);
  if (!empty($datas))
  {
    while ($admin = mysql_fetch_array($datas))
    {
      if (!empty($admin['mail_address']))
      {
   //  array_push($admins, format_email($admin['username'], $admin['mail_address']));
         $temp=   $admin['mail_address']   ;
            array_push($admins,$temp);
      }
    }
  }

  if (count($admins) > 0)
  {
  
  }     
$infos->admins = $admins ; 
  return $infos;
//========================================================================  
  echo '<pre>';
echo FREE_MAIL_TABLE;
echo '
----------- ADMINS ----------------------------------------
';      
print_r ($admins);
echo '
-------------------------------------------------------------------
';      
print_r ($infos);
echo '</pre>';

        


}
function corrige_headers($Carbonne,$headers)
        {
        global $conf_statistics,$conf_mail;
        $mailto="";
        /* if ($conf_free_mail[1] == 'on') {
                $mailto=$conf_mail['email_webmaster'];
        }
        */
                $splitter="|".$Carbonne.":(.*)\n|U";
                preg_match_all($splitter,$headers, $out,PREG_PATTERN_ORDER);
                $val=array();
                $match=array("<",">");
                $string=array("","") ;
                foreach($out as $messages)
                {
                $val[]=  $messages[0] ;
                }
 

        $val[1]=  str_replace( $match,$string,$val[0] ) ;
        $src=$val[0];
        
        $splitter="|\"(.*)\"|U";
        preg_match_all($splitter,$val[1], $out,PREG_PATTERN_ORDER);
        $string=array();
        $string = array_fill( 0, count($out), '');
        $dest = str_replace($out[0], $string, $val[1]) ;
/* if ($conf_free_mail[1] == 'on')
         $dest=str_replace($mailto.',', '', $dest) ;
         $dest=str_replace($mailto, '', $dest) ;
}
*/
        $headers = str_replace( $src,$dest, $headers) ;
        return $headers;
//==============================================================================================================        

                
        }
?>