source: extensions/Mail_supervisor/main.inc.php @ 4049

Revision 4049, 9.8 KB checked in by cljosse, 10 years ago (diff)

[mail_supervisor] modif bug in fonctions.php

Line 
1<?php
2// +-----------------------------------------------------------------------+
3// | Piwigo - a PHP based picture gallery                                  |
4// +-----------------------------------------------------------------------+
5// | Copyright(C) 2008-2009 Piwigo Team                  http://piwigo.org |
6// | Copyright(C) 2003-2008 PhpWebGallery Team    http://phpwebgallery.net |
7// | Copyright(C) 2002-2003 Pierrick LE GALL   http://le-gall.net/pierrick |
8// +-----------------------------------------------------------------------+
9// | This program is free software; you can redistribute it and/or modify  |
10// | it under the terms of the GNU General Public License as published by  |
11// | the Free Software Foundation                                          |
12// |                                                                       |
13// | This program is distributed in the hope that it will be useful, but   |
14// | WITHOUT ANY WARRANTY; without even the implied warranty of            |
15// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU      |
16// | General Public License for more details.                              |
17// |                                                                       |
18// | You should have received a copy of the GNU General Public License     |
19// | along with this program; if not, write to the Free Software           |
20// | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, |
21// | USA.                                                                  |
22// +-----------------------------------------------------------------------+
23
24/*
25Plugin Name: Mail supervisor
26Version: 1.1.1
27Description:  Mail supervisor surveille l'envoie des mails.
28Plugin URI: http://piwigo.org/ext/extension_view.php?eid=315
29Author: cljosse
30Author URI:http://cljosse.e3b.org
31*/
32
33if (!defined('PHPWG_ROOT_PATH')) die('Hacking attempt!');
34
35if (!defined('MAILl_SUPERV_DIR')) define('MAILl_SUPERV_DIR' , basename(dirname(__FILE__)));
36if (!defined('MAIL_SUPERV_PATH')) define('MAIL_SUPERV_PATH' , PHPWG_PLUGINS_PATH.basename(dirname(__FILE__)).'/');
37
38include_once (MAIL_SUPERV_PATH.'include/constants.php'); 
39include_once (MAIL_SUPERV_PATH.'include/fonctions.php'); 
40
41/*
42EVENT_HANDLER_PRIORITY_NEUTRAL  */
43
44add_event_handler('send_mail', 'clj_mail',EVENT_HANDLER_PRIORITY_NEUTRAL - 1 , 6);
45
46function clj_mail($result, $mailto, $subject, $content, $headers, $args)
47{
48    global $conf, $user, $lang_info,  $conf_mail,$mails_options,$mails_données , $template,$page ,$erreur_message,$infos_message; 
49        // lecture config table -------------
50
51   
52        $mails_options = explode("," , $conf['mail_superv']);
53        $message ="";
54        if (!isset($infos_message))
55        {
56        $infos_message = "";
57        }
58if (!isset($erreur_message))
59        {
60        $erreur_message = '';
61        }
62        // lecture données       -------------
63    $mails_données = Get_Datas();
64
65       
66        $nb_mails         =     $mails_données['nb_mails'] ;
67        $next_day  =  $mails_données['date_mail'] ;
68       
69        $reste =    $mails_données['reste'] ;
70       
71       
72        $rest_mail =    $mails_données['rest_mail'] ;
73        if ($rest_mail <=0 || $mails_données['nb_mails'] ==0 ){
74           $mails_données['nb_mails'] =0 ;
75           $mails_données['date_mail'] = time();
76        }
77       
78        $rest_spam =    $mails_données['rest_spam'] ;
79        if ($rest_spam <=0 || $mails_données['nb_spams'] ==0 ){
80           $mails_données['nb_spams'] =0 ;
81           $mails_données['date_spam'] = time();
82        }
83       
84        $alerte =   ( $mails_données['reste'] >0 ) ? true : false ; 
85       
86        $alerte_mail =    ( $mails_données['nb_mails'] >   $mails_données['nb_mails_maxi']-1 ) ? true : false ;
87        $alerte_spam =    (  $mails_données['nb_spams'] >   $mails_données['nb_spams_maxi']-1 ) ? true : false ;
88       
89 
90 if ( ( !$alerte  && !$alerte_spam  && !$alerte_mail ) ) 
91        {
92                 
93  $nb_destinataires=0;
94                if ($mails_options[0] == 'on') {
95                        if ($mailto == "" )     $mailto = $conf_mail['email_webmaster'];
96                }   
97 if ($mailto<>"" )            $nb_destinataires +=1; 
98
99                if (!empty($args['Bcc']))  { 
100                        $nb_destinataires += count($args['Bcc']); 
101                        } 
102                if (!empty($args['Cc']))  {   
103                        $nb_destinataires += count($args['Cc']); 
104                        }
105   //================= réécriture de l'entête ===============================
106if ( $nb_destinataires  == 1 )
107        {
108                if ($mailto == "" ) 
109                  {
110                          if (!empty($args['Cc']) and count($args['Cc']) > 0 )  $mailto  = get_strict_email_list(implode(',', $args['Cc'])) ;
111                          if (!empty($args['Bcc']) and count($args['Bcc']) > 0 ) $mailto  = get_strict_email_list(implode(',', $args['Bcc'])) ;
112                         
113                                $headers = preg_replace('/.*Bcc(.*).\n/i', '', $headers);
114                                $headers = preg_replace('/.*Cc(.*).\n/i', '', $headers);
115                               
116                  }
117        }else{
118   
119                if (!empty($args['Cc']))
120                        {
121                        if ($mails_options[1] == 'on') {  $headers= corrige_header('Cc',$headers);}
122                        }
123                if (!empty($args['Bcc']))
124                        {   
125                                if ($mails_options[1] == 'on') {  $headers      = corrige_header('Bcc',$headers);}
126                        }
127
128 
129     }
130
131if ($mails_options[2]=='on')   {
132
133        $texte = "This is a multi-part message in MIME format.\n"; 
134       
135        $texte .= "-----=".$conf_mail['boundary_key']."\n"; 
136        $texte .= "Ceci est un message est au format MIME.\n"; 
137        $texte .= 'Content-Type: text/plain; charset="UTF-8"'."\n"; 
138        $texte .= 'Content-Transfer-Encoding: 8bit'."\n\n"; 
139        $texte .= $mails_données['header_text']; // A voir texte brut...
140           
141                $texte .= "\n\n"; 
142       
143                $content =$texte .$content ;
144}
145 
146$ret=false;
147       
148            //======== Non mise en quarantaine =============
149                ob_start();
150                $ret = false;
151                 if ($nb_destinataires > 0) {
152                   $ret = mail($mailto, $subject, $content, $headers);
153/* <br />
154<b>Warning</b>:  mail() [<a href='function.mail'>function.mail</a>]: Trop de spam. Fonction mail() bloque.
155 in <b>/mnt/102/sdb/9/5/cl.josse/Galerie/plugins/mail_supervisor/main.inc.php</b> on line <b>132</b><br />
156*/
157                        }else{
158                           $message .='Nombre de destinataires = 0';
159                        }
160                        $message .= ob_get_contents();
161            ob_end_clean();
162                        $mails_données['message']=$message;     
163                        Gestion_erreurs($message,$ret,$nb_destinataires,$headers,$mailto);
164               
165       
166       
167        } else {
168
169        //================== Est en quarantaine =======================
170                $erreur_message .=      l10n('To_day_is')."<br />";
171                        if ($alerte_spam ) { 
172                        $type="Spams";
173                               
174                                $d1=$mails_données['nb_spams'] . '  \\  ' . $mails_données['nb_spams_maxi'];
175                                $d2=$mails_données['nb_spams'];
176                                $d3= $mails_données['rest_spam'];
177                                $d4=time()+$d3 ;
178                        } 
179 
180                        if ($alerte_mail) {
181                        $type="Mails";
182                       
183                                $d1=$mails_données['nb_mails']. '  \\  ' . $mails_données['nb_mails_maxi'];;
184                                $d2=$mails_données['date_mail'];
185                                $d3= $mails_données['rest_mail'];
186                                $d4=time()+$d3 ;
187                               
188                               
189                        }
190                        if ($alerte) {
191                        $type="Spams(Quarantaine)";
192                                $d1=$mails_données['nb_spams'] . '  \\  ' . $mails_données['nb_spams_maxi'];
193                                $d2=$mails_données['date_quarantaine'];
194                                $d3= $mails_données['reste'];
195                                $d4=time()+$d3 ;
196                        } 
197
198
199$d2=date(l10n('formatdate'),$d2);
200$d3=int_to_heure($d3) ;
201$d4=date(l10n('formatdate'),$d4);
202
203        if ($alerte_mail) {
204              $erreur_message .='<br />'.sprintf(l10n('alerte_mail %s %s %s %s %s'),$type,$d1,$d2,$d3,$d4).'<br />';
205                }else{
206                           $erreur_message .='<br />'.sprintf(l10n('mise_en_quarantaine %s %s %s %s %s'),$type,$d1,$d2,$d3,$d4).'<br />';
207
208                }
209 $infos_message = l10n('mail_not_send');
210 
211 }                     
212 sauve_données();
213 return true ;
214}
215//===========================================================================================   
216function Gestion_erreurs($message,$ret,$nb_destinataires,$headers,$mailto)
217{                       
218         global $conf, $user, $lang_info,  $conf_mail,$mails_options,$mails_données , $template,$page ,$infos_message,$erreur_message,$args; 
219    $match=array("<",">");
220    $string=array("&lt;","&gt;") ;       
221
222       
223        $est_un_spam =!(strpos(strtolower($message), 'spam') === false);
224        $headers=str_replace( $match,$string, $headers); 
225       
226        if ( ($ret==false) || ($est_un_spam==true) || ($nb_destinataires == 0) ) {
227                 ;                              // Bad recipient address syntax
228                $pos1 = strpos(strtolower($message), 'bad recipient address syntax');
229                if (  !($pos1 === false) ){
230                        $erreur_message .='Détection de : Bad recipient address syntax .';
231                        $erreur_message .='Vérifiez les destinataires: (Bcc,Cc,To)<br />';
232                        }       
233       
234        $erreur_message .= sprintf(l10n('debug_message %s %s %s %s %s'),($ret==true)? "true" : "false",$message,$mailto,$headers,$nb_destinataires);
235       //=============== La fonction mail à retournéeune erreur =========================               
236
237                               
238                                }       
239                               
240        if ($est_un_spam == false) 
241                        {
242                        if ($mails_données['nb_mails']==0) {    $mails_données['date_mail'] =  time();  }       
243                        $mails_données['nb_mails'] += $nb_destinataires;
244                        }
245                        else
246                        {
247                                $mails_données['nb_spams'] += $nb_destinataires;                       
248                            //--- Détection de spam ------------------
249                                if ($mails_données['nb_spams']==0) {$mails_données['date_spam'] = time();       }
250
251                                $trop_de_spam =!(strpos(strtolower($message), 'trop de spam') === false);
252                                if ( $trop_de_spam ) {
253                                                $mails_données['nb_spams_maxi']=$mails_données['nb_spams'];
254
255                                                $mails_données['date_quarantaine']= time()  ;   
256                                                $mails_données['quarantaine']= true    ;       
257                                                $infos_message .=memo_var($mails_données);
258                                        }
259
260                        }
261 
262
263 
264
265 
266 $ret=true;
267 return $ret ;
268 
269}
270
271//==========================================================================================
272function admin_menu($menu)
273{
274    array_push($menu, array('NAME' => 'Mail_Superv',
275      'URL' => get_admin_plugin_menu_link(MAIL_SUPERV_PATH . 'admin/mail_superv_admin.php')));
276    return $menu;
277}
278
279
280add_event_handler('get_admin_plugin_menu_links', 'admin_menu');
281//add_event_handler('loc_end_page_tail', 'affiche_message');
282add_event_handler('loc_after_page_header', 'affiche_message');
283
284?>
Note: See TracBrowser for help on using the repository browser.