Subversion Repositories Applications.annuaire

Rev

Rev 493 | Rev 507 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 493 Rev 503
Line 18... Line 18...
18
	//TODO: cette classe est en doublon avec du code de l'annuaire
18
	//TODO: cette classe est en doublon avec du code de l'annuaire
19
	// une fois passé à la dernière version du framework, il faudrait factoriser ces fonctions 
19
	// une fois passé à la dernière version du framework, il faudrait factoriser ces fonctions 
20
	// dans une lib commune accessible aux scripts et au code standard
20
	// dans une lib commune accessible aux scripts et au code standard
21
	const STATUT_A_TRAITER = 'a_traiter';
21
	const STATUT_A_TRAITER = 'a_traiter';
22
	const STATUT_EN_TRAITEMENT = 'en_traitement';
22
	const STATUT_EN_TRAITEMENT = 'en_traitement';
-
 
23
	const STATUT_EN_ECHEC = 'en_echec';
Line 23... Line 24...
23
	
24
	
24
	// Définit le délai au bout du quel on remet des mails en traitement à traiter
25
	// Définit le délai au bout du quel on remet des mails en traitement à traiter
25
	// au format (avec la syntaxe utilisée avec INTERVAL en SQL)
26
	// au format (avec la syntaxe utilisée avec INTERVAL en SQL)
26
	// http://dev.mysql.com/doc/refman/5.0/fr/date-and-time-functions.html
27
	// http://dev.mysql.com/doc/refman/5.0/fr/date-and-time-functions.html
Line 32... Line 33...
32
		$this->bdd = new Bdd();
33
		$this->bdd = new Bdd();
Line 33... Line 34...
33
		
34
		
34
		$cmd = $this->getParametre('a');
35
		$cmd = $this->getParametre('a');
Line -... Line 36...
-
 
36
		$this->mode_verbeux = $this->getParametre('v');
-
 
37
		
35
		$this->mode_verbeux = $this->getParametre('v');
38
		$retour = array();
36
		
39
		
37
		switch($cmd) {
40
		switch($cmd) {
38
			case "tous":
41
			case "tous":
39
				$retour = $this->traiterMailsEnAttente();
42
				$retour = $this->traiterMailsEnAttente();
40
			break;
43
			break;
41
			// TODO: case supplémentaire pour traiter un mail par son id ?
44
			// TODO: case supplémentaire pour traiter un mail par son id ?
42
			// TODO: option "force" pour traiter les mails quelques soient leur statut ?
45
			// TODO: option "force" pour traiter les mails quelques soient leur statut ?
Line 43... Line 46...
43
			default:	
46
			default:	
-
 
47
		}
44
		}
48
		
45
		
49
		if($this->mode_verbeux) {
46
		if($this->mode_verbeux) {
50
			// echo pour que bash capte la sortie et stocke dans le log
Line 47... Line 51...
47
			print_r($retour);
51
			echo 'Identifiants des mails traites : '.implode(',', $retour)."--";
48
		}
52
		}
49
	}
53
	}
50
	
54
	
Line 51... Line 55...
51
	private function traiterMailsEnAttente() {
55
	private function traiterMailsEnAttente() {
52
		// Gaston Lagaffe
56
		// Gaston Lagaffe
53
		$mails_en_retard = $this->remettreATraiterMailsEnRetard();
57
		$mails_en_retard = $this->traiterMailsEnRetard();
54
		$mails_a_traiter = $this->obtenirMailsEnAttente();
58
		$mails_a_traiter = $this->obtenirMailsEnAttente();
55
		
59
		
Line 56... Line 60...
56
		$retour = array();
60
		$retour = array();
57
		if(count($mails_a_traiter) > 0 && $this->mettreMailsEnCoursDeTraitement()) {
61
		if(count($mails_a_traiter) > 0 && $this->mettreMailsEnCoursDeTraitement()) {
58
			foreach($mails_a_traiter as $donnees_brutes_mail) {
62
			foreach($mails_a_traiter as $donnees_brutes_mail) {
59
				$mail_a_moderer = $this->decoderDonneeTemporaire($donnees_brutes_mail);
63
				$mail_a_moderer = $this->decoderDonneeTemporaire($donnees_brutes_mail);
60
				$id_mail = $donnees_brutes_mail['adt_id'];
64
				$id_mail = $donnees_brutes_mail['adt_id'];
Line 61... Line 65...
61
				
65
				
62
				$resultat_envoi = true;
66
				$resultat_envoi = true;
63
				$envois_echoues = $this->envoyerMail($mail_a_moderer['expediteur'],
67
				$envois_echoues = $this->envoyerMail($mail_a_moderer['expediteur'],
Line 82... Line 86...
82
		return $retour;
86
		return $retour;
83
	}
87
	}
Line 84... Line 88...
84
	
88
	
Line 85... Line 89...
85
	private function avertirModerateurEchecEnvoi($envois_echoues, $mail_a_moderer) {
89
	private function avertirModerateurEchecEnvoi($envois_echoues, $mail_a_moderer) {
86
		
90
		
87
		$corps_mail_echoue = "L'envoi d'un mail modéré à échoué pour les destinataires suivants (".count($envois_echoues)." au total) : <br />";
91
		$corps_mail_echoue = "L'envoi d'un mail modéré à échoué pour les destinataires suivants (".count($envois_echoues)." au total) : <br />";
88
		$corps_mail_echoue .= implode(", ", $envois_echoues);
92
		$corps_mail_echoue .= implode(", ", $envois_echoues);
89
		$corps_mail_echoue .= "<br /><br /><br />";
93
		$corps_mail_echoue .= "<br /><br /><br />";
90
		$corps_mail_echoue .= "--- <i> Message original ---</i><br />";
94
		$corps_mail_echoue .= "--- <i> Message original ---</i><br />";
91
		$corps_mail_echoue .= "Expéditeur  : ".$mail_a_moderer['expediteur']."<br />";
95
		$corps_mail_echoue .= "Expéditeur  : ".$mail_a_moderer['expediteur']."<br />";
Line 92... Line 96...
92
		$corps_mail_echoue .= "Sujet  : ".$mail_a_moderer['sujet']."<br />";
96
		$corps_mail_echoue .= "Sujet  : ".$mail_a_moderer['sujet']."<br />";
93
		$corps_mail_echoue .= "Message original : ".$mail_a_moderer['message']."<br />";
97
		$corps_mail_echoue .= "Message original : ".$mail_a_moderer['message']."<br />";
94
		
98
		
95
		$sujet = "L'envoi d'un mail modéré a échoué pour un ou plusieurs destinataires";
99
		$sujet = "L'envoi d'un mail modéré a échoué pour un ou plusieurs destinataires";
96
			
100
			
97
		// TODO: Que faire si l'envoi de mail d'avertissement échoue également ?
101
		// TODO: Que faire si l'envoi de mail d'avertissement échoue également ?
98
		$envoi_avertissement = $this->envoyerMail(Config::get('adresse_mail_annuaire'),
102
		$envoi_avertissement = $this->envoyerMail(Config::get('adresse_mail_annuaire'),
-
 
103
				Config::get('mail_moderateur'),
-
 
104
				$sujet,
-
 
105
				$corps_mail_echoue);
-
 
106
		// echo pour que bash capte la sortie et stocke dans le log
-
 
107
		echo 'Envoi du mail au moderateur pour signaler un echec '."--";
-
 
108
		return $envoi_avertissement;
Line -... Line 109...
-
 
109
	}
-
 
110
	
-
 
111
	private function avertirModerateurEchecTraitement($mails_en_echec) {
-
 
112
		
-
 
113
		$ids_mails_en_echec = array();
-
 
114
		foreach($mails_en_echec as $mail_echec) {
-
 
115
			$ids_mails_en_echec[] = $mail_echec['adt_id'];
-
 
116
		}
-
 
117
	
-
 
118
		$corps_mail_mal_traite = "Échec de traitement pour : ".implode(',', $ids_mails_en_echec)." depuis plus de ".self::DELAI_MAX_TRAITEMENT." <br />";
-
 
119
		$sujet = "Un ou plusieurs mails sont en échec de traitement";
-
 
120
			
-
 
121
		$envoi_avertissement = $this->envoyerMail(Config::get('adresse_mail_annuaire'),
-
 
122
				Config::get('mail_moderateur'),
-
 
123
				$sujet,
99
				Config::get('mail_moderateur'),
124
				$corps_mail_mal_traite);
100
				$sujet,
125
		
Line 101... Line 126...
101
				$corps_mail_echoue);
126
		// echo pour que bash capte la sortie et stocke dans le log
102
		
127
		echo 'Envoi du mail au moderateur pour signaler un traitement en echec depuis trop longtemps '."--";
103
		return $envoi_avertissement;
128
		return $envoi_avertissement;
104
	}
-
 
-
 
129
	}
-
 
130
	
105
	
131
	private function obtenirMailsEnAttente() {
106
	private function obtenirMailsEnAttente() {
132
		$requete = "SELECT * FROM annu_donnees_temp WHERE adt_statut = '".self::STATUT_A_TRAITER."' ";
Line 107... Line 133...
107
		$requete = "SELECT * FROM annu_donnees_temp WHERE adt_statut = '".self::STATUT_A_TRAITER."' ";
133
		$retour = $this->bdd->recupererTous($requete);
108
		$retour = $this->bdd->recupererTous($requete);
134
		// echo pour que bash capte la sortie et stocke dans le log
109
		
135
		echo 'Il y a '.count($retour).' mails en attente '."--";
110
		return $retour;
136
		return $retour;
-
 
137
	}
-
 
138
	
111
	}
139
	private function mettreMailsEnCoursDeTraitement() {
112
	
140
		$requete = "UPDATE annu_donnees_temp SET adt_statut = '".self::STATUT_EN_TRAITEMENT."', adt_date_debut_traitement = NOW() ".
Line 113... Line 141...
113
	private function mettreMailsEnCoursDeTraitement() {
141
					"WHERE adt_statut = '".self::STATUT_A_TRAITER."' ";
114
		$requete = "UPDATE annu_donnees_temp SET adt_statut = '".self::STATUT_EN_TRAITEMENT."', adt_date_debut_traitement = NOW() ".
142
		$maj = $this->bdd->executer($requete);
Line 125... Line 153...
125
		
153
		
126
		$requete = "UPDATE annu_donnees_temp ".
154
		$requete = "UPDATE annu_donnees_temp ".
127
					"SET adt_donnees = '".$mail_mal_traite."' ".
155
					"SET adt_donnees = '".$mail_mal_traite."' ".
Line 128... Line 156...
128
					"WHERE adt_id = '".$mail_a_moderer['adt_id']."'";
156
					"WHERE adt_id = '".$mail_a_moderer['adt_id']."'";
129
		
157
		
130
		$maj = $this->bdd->requeter($requete);
158
		$maj = $this->bdd->executer($requete);
Line 131... Line 159...
131
		return $maj;
159
		return $maj;
132
	}
160
	}
133
	
161
	
-
 
162
	private function supprimerMailTraite($id) {
-
 
163
		$requete = "DELETE FROM annu_donnees_temp WHERE adt_statut = '".self::STATUT_EN_TRAITEMENT."' ".
134
	private function supprimerMailTraite($id) {
164
					"AND adt_id = '".$id."'";
135
		$requete = "DELETE FROM annu_donnees_temp WHERE adt_statut = '".self::STATUT_EN_TRAITEMENT."' ".
165
		// echo pour que bash capte la sortie et stocke dans le log
136
					"AND adt_id = '".$id."'";
166
		echo'Suppression du mail '.$id.' qui a ete traite '."--";
Line 137... Line 167...
137
		$supp = $this->bdd->requeter($requete);
167
		$supp = $this->bdd->executer($requete);
138
		return $supp;
168
		return $supp;
139
	}
169
	}
140
	
170
	
141
	private function supprimerMailsEnCoursDeTraitement() {
171
	private function supprimerMailsEnCoursDeTraitement() {
Line 142... Line 172...
142
		$requete = "DELETE FROM annu_donnees_temp WHERE adt_statut = '".self::STATUT_EN_TRAITEMENT."' ";
172
		$requete = "DELETE FROM annu_donnees_temp WHERE adt_statut = '".self::STATUT_EN_TRAITEMENT."' ";
143
		$supp = $this->bdd->requeter($requete);
173
		$supp = $this->bdd->executer($requete);
144
		return $supp;
174
		return $supp;
145
	}
175
	}
146
	
176
	
147
	private function remettreATraiterMailsEnRetard() {
177
	private function traiterMailsEnRetard() {
Line 148... Line 178...
148
		// Les mails a traiter depuis plus de 10 heures sont considérés comme échoués et donc remis à traiter
178
		// Les mails a traiter depuis plus de 10 heures sont considérés comme échoués et donc remis à traiter
-
 
179
		// (en cas de plantage du script ou du serveur de mail pendant leur traitement)
-
 
180
		$requete = "UPDATE annu_donnees_temp SET adt_statut = '".self::STATUT_EN_ECHEC."', adt_date_debut_traitement = NULL ".
149
		// (en cas de plantage du script ou du serveur de mail pendant leur traitement)
181
				"WHERE adt_statut = '".self::STATUT_EN_TRAITEMENT."' ".
-
 
182
				"AND adt_date_debut_traitement < (DATE_SUB(now(), INTERVAL ".self::DELAI_MAX_TRAITEMENT.")) ";
-
 
183
		
-
 
184
		$maj = $this->bdd->executer($requete);
-
 
185
		// echo pour que bash capte la sortie et stocke dans le log
-
 
186
		echo 'Gestion des mails en retard '."--";
-
 
187
		if($maj !== false) {
-
 
188
			$requete = "SELECT * FROM annu_donnees_temp WHERE adt_statut = '".self::STATUT_EN_ECHEC."'";
-
 
189
			$mails_en_echec = $this->bdd->recupererTous($requete);
150
		$requete = "UPDATE annu_donnees_temp SET adt_statut = '".self::STATUT_A_TRAITER."', adt_date_debut_traitement = NULL ".
190
			// echo pour que bash capte la sortie et stocke dans le log
Line 151... Line 191...
151
				"WHERE adt_statut = '".self::STATUT_EN_TRAITEMENT."' ".
191
			echo 'Avertissement, des mails sont en retard : '.count($mails_en_echec)."--";
152
				"AND adt_date_debut_traitement < (DATE_SUB(now(), INTERVAL ".self::DELAI_MAX_TRAITEMENT.")) ";
192
			$this->avertirModerateurEchecTraitement($mails_en_echec);
153
		
193
		}
Line 154... Line 194...
154
		$maj = $this->bdd->requeter($requete);
194
		
155
		return ($maj !== false);
195
		return $maj;
156
	}
196
	}
Line 157... Line 197...
157
	
197
	
158
	private function encoderDonneeTemporaire($donnee) {
198
	private function encoderDonneeTemporaire($donnee) {
159
		return base64_encode(serialize($donnee));
199
		return base64_encode(serialize($donnee));
160
	}
200
	}
161
	
201
	
162
	private function decoderDonneeTemporaire($donnee_encodee) {
202
	private function decoderDonneeTemporaire($donnee_encodee) {
163
		return unserialize(base64_decode($donnee_encodee['adt_donnees']));
203
		return unserialize(base64_decode($donnee_encodee['adt_donnees']));
164
	}
204
	}
165
	
205
	
166
	/** Envoie un mail avec l'adresse de l'utilisateur donné en paramètre, à l'adresse donnée en paramètre.
206
	/** Envoie un mail avec l'adresse de l'utilisateur donné en paramètre, à l'adresse donnée en paramètre.
167
	 * ATTENTION : le sujet et le contenu envoyer à cette méthode doivent avoir le même encodage que l'application.
207
	 * ATTENTION : le sujet et le contenu envoyer à cette méthode doivent avoir le même encodage que l'application.
168
	 *
208
	 *
169
	 * @param string $expediteur l'expediteur du message
209
	 * @param string $expediteur l'expediteur du message
170
	 * @param mixed $destinataires un string ou un tableau de mails qui contiennent les destinataire
210
	 * @param mixed $destinataires un string ou un tableau de mails qui contiennent les destinataire
171
	 * @param string $sujet sujet du mail
211
	 * @param string $sujet sujet du mail
172
	 * @return boolean true ou false suivant le succès ou non de l'envoi
212
	 * @return boolean true ou false suivant le succès ou non de l'envoi
173
	 */
213
	 */
174
	public function envoyerMail($expediteur, $destinataires, $sujet, $message_html, $message_texte = '', $adresse_reponse = null) {
214
	public function envoyerMail($expediteur, $destinataires, $sujet, $message_html, $message_texte = '', $adresse_reponse = null) {
175
		if (!is_array($destinataires)) {
215
		if (!is_array($destinataires)) {
176
			$destinataires = array($destinataires);
216
			$destinataires = array($destinataires);
177
		}
217
		}
178
		if ($message_texte == '') {
218
		if ($message_texte == '') {
179
			$message_texte = $this->filtrerChaine($message_html);
219
			$message_texte = $this->filtrerChaine($message_html);
180
		}
220
		}
181
	
221
	
182
		$encodage = Config::get('appli_encodage');
222
		$encodage = Config::get('appli_encodage');
183
		$limite = "_----------=_parties_".md5(uniqid(rand()));
223
		$limite = "_----------=_parties_".md5(uniqid(rand()));
184
		$eol = "\n";
224
		$eol = "\n";
185
	
225
	
186
		$entetes = '';
226
		$entetes = '';
187
		// Définition d'un mail en texte simple et html
227
		// Définition d'un mail en texte simple et html
188
		// multipart/alternative signifie même contenu de la forme la plus simple à la plus complexe
228
		// multipart/alternative signifie même contenu de la forme la plus simple à la plus complexe
189
		$entetes .= "X-Sender: <http://www.tela-botanica.org>".$eol.
229
		$entetes .= "X-Sender: <http://www.tela-botanica.org>".$eol.
190
		"X-Mailer: PHP-ANNUAIRE-HTML".$eol.
230
		"X-Mailer: PHP-ANNUAIRE-HTML".$eol.
191
		"X-auth-smtp-user: annuaire@tela-botanica.org ".$eol.
231
		"X-auth-smtp-user: annuaire@tela-botanica.org ".$eol.
192
		"X-abuse-contact: annuaire@tela-botanica.org ".$eol.
232
		"X-abuse-contact: annuaire@tela-botanica.org ".$eol.
193
		'Date: '.date('r').$eol.
233
		'Date: '.date('r').$eol.
194
		'From: '.$expediteur.$eol.
234
		'From: '.$expediteur.$eol.
195
		'MIME-Version: 1.0'.$eol;
235
		'MIME-Version: 1.0'.$eol;
196
		if ($adresse_reponse !== null) {
236
		if ($adresse_reponse !== null) {
197
			$entetes .= 'Reply-To: '.$adresse_reponse.$eol;
237
			$entetes .= 'Reply-To: '.$adresse_reponse.$eol;
198
		}
238
		}
199
		$entetes .= "Content-Type: multipart/alternative; boundary=\"$limite\";".$eol.$eol;
239
		$entetes .= "Content-Type: multipart/alternative; boundary=\"$limite\";".$eol.$eol;
200
	
240
	
201
		// message en texte simple
241
		// message en texte simple
202
		$contenu = "--$limite".$eol.
242
		$contenu = "--$limite".$eol.
203
		"Content-Type: text/plain; charset=\"$encodage\";".$eol.
243
		"Content-Type: text/plain; charset=\"$encodage\";".$eol.
204
		"Content-Transfer-Encoding: 8bit;".$eol.$eol.
244
		"Content-Transfer-Encoding: 8bit;".$eol.$eol.
205
		$message_texte.$eol.$eol.
245
		$message_texte.$eol.$eol.
206
		// le message en html est préféré s'il est lisible
246
		// le message en html est préféré s'il est lisible
207
		"--$limite".$eol.
247
		"--$limite".$eol.
208
		"Content-Type: text/html; charset=\"$encodage\";".$eol.
248
		"Content-Type: text/html; charset=\"$encodage\";".$eol.
209
		"Content-Transfer-Encoding: 8bit;".$eol.$eol.
249
		"Content-Transfer-Encoding: 8bit;".$eol.$eol.
-
 
250
		$message_html.$eol.$eol.
-
 
251
		"--$limite--".$eol.$eol;
210
		$message_html.$eol.$eol.
252
	
211
		"--$limite--".$eol.$eol;
253
		$sujetEncode = mb_encode_mimeheader($sujet, mb_internal_encoding(), "B", "\n");
212
	
254
		$resultats_envois_echoues = array();
213
		$sujetEncode = mb_encode_mimeheader($sujet, mb_internal_encoding(), "B", "\n");
255
		$ok = true;
214
		$resultats_envois_echoues = array();
256
		foreach ($destinataires as $destinataire) {
215
		$ok = true;
257
			$ok = mail($destinataire, $sujetEncode, $contenu, $entetes);
216
		foreach ($destinataires as $destinataire) {
258
			if (!$ok) {
217
			$ok = mail($destinataire, $sujetEncode, $contenu, $entetes);
259
				// echo pour que bash capte la sortie et stocke dans le log
218
			if (!$ok) {
260
				echo'Echec envoi a '.$destinataire."\n";
219
				$resultats_envois_echoues[] = $destinataire;
261
				$resultats_envois_echoues[] = $destinataire;
220
			}
262
			}
221
		}
263
		}
222
		return $resultats_envois_echoues;
264
		return $resultats_envois_echoues;
223
	}
265
	}
224
	
266
	
225
	/** Transforme automatiquement le message html en message txt.
267
	/** Transforme automatiquement le message html en message txt.
226
	 *
268
	 *
227
	 * Réalise un strip_tags et avant ça un remplacement des liens sur mesure pour les mettre au format email txt.
269
	 * Réalise un strip_tags et avant ça un remplacement des liens sur mesure pour les mettre au format email txt.
228
	 */
270
	 */
229
	private function filtrerChaine($messageHtml) {
271
	private function filtrerChaine($messageHtml) {
230
		$messageTxt = strip_tags($messageHtml);
272
		$messageTxt = strip_tags($messageHtml);
231
		if ($messageHtml != $messageTxt) {
273
		if ($messageHtml != $messageTxt) {
232
			$html = $this->ajouterHrefDansBalise($messageHtml);
274
			$html = $this->ajouterHrefDansBalise($messageHtml);
233
			$messageAvecEntites = strip_tags($html);
275
			$messageAvecEntites = strip_tags($html);
234
			// TODO : en précisant l'encodage de l'appli dans html_entity_decode un double encodage UTF-8 se produit...
276
			// TODO : en précisant l'encodage de l'appli dans html_entity_decode un double encodage UTF-8 se produit...
235
			$messageTxt = html_entity_decode($messageAvecEntites, ENT_QUOTES);
277
			$messageTxt = html_entity_decode($messageAvecEntites, ENT_QUOTES);
236
		}
278
		}
237
		return $messageTxt;
279
		return $messageTxt;
238
	}
280
	}
239
	
281
	
240
	/**
282
	/**
241
	 * Extrait la valeur de l'attribut href des balises HTML de liens (a) et ajoute le lien entre
283
	 * Extrait la valeur de l'attribut href des balises HTML de liens (a) et ajoute le lien entre
242
	 * chevrons (<>) dans le contenu de la balise "a".
284
	 * chevrons (<>) dans le contenu de la balise "a".
243
	 */
285
	 */
244
	private function ajouterHrefDansBalise($html) {
286
	private function ajouterHrefDansBalise($html) {
245
		$dom = new DOMDocument;
287
		$dom = new DOMDocument;
246
		$dom->loadHTML($html);
288
		$dom->loadHTML($html);
247
		foreach ($dom->getElementsByTagName('a') as $node) {
289
		foreach ($dom->getElementsByTagName('a') as $node) {
248
			if ($node->hasAttribute( 'href' )) {
290
			if ($node->hasAttribute( 'href' )) {
249
				$href = $node->getAttribute('href');
291
				$href = $node->getAttribute('href');