Subversion Repositories Applications.annuaire

Rev

Rev 32 | Rev 120 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
14 aurelien 1 
<?php
2 
/**
3 
* PHP Version 5
4 
*
5 
* @category  PHP
6 
* @package   annuaire
7 
* @author    aurelien <aurelien@tela-botanica.org>
8 
* @copyright 2010 Tela-Botanica
9 
* @license   http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
10 
* @version   SVN: <svn_id>
11 
* @link      /doc/annuaire/
12 
*/
13 
 
32 aurelien 14 
/**
15 
 * Controleur permettant l'abonnement à une liste de diffusion
16 
 * à travers un mécanisme de mail ou de web services
17 
 */
14 aurelien 18 
class LettreControleur extends Controleur {
19 
 
32 aurelien 20 
	/** Adresse de base des web services
21 
	 * ex : http://mail.domaine.com/
22 
	 */
23 
	private $adresse_service_lettre = null;
14 aurelien 24 
 
32 aurelien 25 
	/**
26 
	 * Nom du service permettant de s'inscrire
27 
	 * ex : inscription.php
28 
	 */
29 
	private $service_inscription_lettre = null;
14 aurelien 30 
 
32 aurelien 31 
	/**
32 
	 * Nom du service permettant de s'inscrire
33 
	 * ex : desinscription.php
34 
	 */
35 
	private $service_desinscription_lettre = null;
14 aurelien 36 
 
32 aurelien 37 
	/**
38 
	 * domaine de la liste
39 
	 * ex : domaine.org
40 
	 */
41 
	private $domaine_lettre = null;
14 aurelien 42 
 
32 aurelien 43 
	/**
44 
	 * nom de la liste de diffusion
45 
	 * ex : actualite
46 
	 */
47 
	private $nom_lettre = null;
48 
 
49 
	/**
50 
	 * adresse mail d'inscription (si on utilise les mails)
51 
	 */
14 aurelien 52 
	private $adresse_inscription_lettre = null;
53 
 
32 aurelien 54 
	/**
55 
	 * adresse mail de desinscription (si on utilise les mails)
56 
	 */
14 aurelien 57 
	private $adresse_desinscription_lettre = null;
58 
 
32 aurelien 59 
	/**
60 
	 * indique si on utilise les mails ou non
61 
	 * (si les infos des web services sont entrées, on met cette variable à true)
62 
	 */
14 aurelien 63 
	private $utilise_mail = false;
64 
 
32 aurelien 65 
	/**
66 
	 * Constructeur sans paramètres
67 
	 */
14 aurelien 68 
	public function LettreControleur() {
69 
 
70 
		$this->__construct();
71 
 
32 aurelien 72 
		// on charge les variables de classes à partir du fichier de configuration
73 
		if(Config::get('adresse_service_lettre') != null) {
74 
			$this->adresse_service_lettre = Config::get('adresse_service_lettre');
14 aurelien 75 
		} else {
76 
			$this->utilise_mail = true;
77 
		}
78 
 
32 aurelien 79 
		if(Config::get('service_inscription_lettre') != null) {
80 
			$this->service_inscription_lettre = Config::get('service_inscription_lettre');
14 aurelien 81 
		} else {
82 
			$this->utilise_mail = true;
83 
		}
84 
 
32 aurelien 85 
		if(Config::get('service_desinscription_lettre') != null) {
86 
			$this->service_desinscription_lettre = Config::get('service_desinscription_lettre');
14 aurelien 87 
		} else{
88 
			$this->utilise_mail = true;
89 
		}
90 
 
32 aurelien 91 
		if(Config::get('domaine_lettre') != null) {
92 
			$this->domaine_lettre = Config::get('domaine_lettre');
14 aurelien 93 
		} else {
94 
			$this->utilise_mail = true;
95 
		}
96 
 
32 aurelien 97 
		if(Config::get('nom_lettre') != null) {
98 
			$this->nom_lettre = Config::get('nom_lettre');
99 
		} else {
100 
			$this->utilise_mail = true;
101 
		}
102 
		// si l'une des variables pour les web services n'est pas valide
103 
 
104 
		// alors on utilise les mails
14 aurelien 105 
		if(Config::get('adresse_inscription_lettre') != null) {
106 
			$this->adresse_inscription_lettre = Config::get('adresse_inscription_lettre');
107 
		}
108 
 
109 
		if(Config::get('adresse_desinscription_lettre') != null) {
110 
			$this->adresse_desinscription_lettre = Config::get('adresse_desinscription_lettre');
111 
		}
112 
	}
113 
 
32 aurelien 114 
	/**
115 
	 * Envoie un mail avec l'adresse de l'utilisateur donné en paramètre,
116 
	 * à l'adresse donnée en paramètre
117 
	 * @param string $adresse l'adresse de la liste à laquelle on veut abonner
118 
	 * @param string $inscrit l'adresse de l'inscrit qui doit être abonné
119 
	 * @param string $sujet sujet du mail
120 
	 * @return boolean true ou false suivant le succès ou non de l'envoi
121 
	 */
14 aurelien 122 
	private function envoyerMail($adresse, $inscrit, $sujet) {
123 
 
124 
		 // Pour envoyer un mail HTML, l'en-tête Content-type doit être défini
125 
	     $entetes  = 'MIME-Version: 1.0' . "\r\n";
126 
	     $entetes .= 'Content-type: text/html; charset='.Config::get('appli_encodage'). "\r\n";
127 
	     // En-têtes additionnels
128 
	     $entetes .= 'To: '.$adresse."\r\n";
129 
	     $entetes .= 'From: '.$inscrit."\r\n";
130 
 
131 
	     $contenu_mail = '';
132 
 
133 
		return mail($adresse, $sujet, $contenu_mail, $entetes);
134 
	}
135 
 
32 aurelien 136 
	/**
137 
	 * Inscrit une adresse à la lettre d'actu
138 
	 * @param string $mail le mail à inscrire à la lettre
139 
	 * @return boolean true ou false suivant le succès de la requete
140 
	 */
14 aurelien 141 
	public function inscriptionLettreActualite($mail) {
142 
 
143 
		if($this->utilise_mail) {
144 
			return $this->envoyerMail($this->adresse_inscription_lettre, $mail, 'inscription à la lettre d\'actualité');
145 
		} else {
32 aurelien 146 
			$params = '?domaine='.$this->domaine_lettre.'&liste='.$this->nom_lettre.'&mail='.$mail;
147 
			//Log::getInstance()->ajouterEntree('lettre','inscription params '.$this->adresse_service_lettre.$this->service_inscription_lettre.$params);
148 
			//return file_get_contents($this->adresse_service_lettre.$this->service_inscription_lettre.$params);
14 aurelien 149 
		}
150 
 
151 
	}
152 
 
32 aurelien 153 
	/**
154 
	 * Desinscrit une adresse à une liste donnée
155 
	 * @param string $mail le mail à desinscrire à la lettre
156 
	 * @return boolean true ou false suivant le succès de la requete
157 
	 */
14 aurelien 158 
	public function desinscriptionLettreActualite($mail) {
159 
 
160 
		if($this->utilise_mail) {
161 
			return $this->envoyerMail($this->adresse_inscription_lettre, $mail, 'desinscription à la lettre d\'actualité');
162 
		} else {
32 aurelien 163 
			$params = '?domaine='.$this->domaine_lettre.'&liste='.$this->nom_lettre.'&mail='.$mail;
164 
			//Log::getInstance()->ajouterEntree('lettre','desinscription params '.$this->adresse_service_lettre.$this->service_desinscription_lettre.$params);
165 
			//return file_get_contents($this->adresse_service_lettre.$this->service_desinscription_lettre.$params);
14 aurelien 166 
		}
167 
 
168 
	}
169 
 
32 aurelien 170 
	/**
171 
	 * Desinscrit l'ancien mail d'un utilisateur et réinscrit le nouveau
172 
	 * @param string $ancien_mail l'ancien mail à desinscrire à la lettre
173 
	 * @param string $nouveau_mail l'ancien mail à inscrire à la lettre
174 
	 * @return boolean true ou false suivant le succès de la requete
175 
	 */
64 aurelien 176 
	public function modificationInscriptionLettreActualite($ancien_mail, $nouveau_mail) {
14 aurelien 177 
 
178 
		if($this->utilise_mail) {
179 
 
180 
			$adresse_deinscription_lettre = Config::get('adresse_desinscription_lettre');
181 
			$suppression_ancien_mail = $this->envoyerMail($adresse_deinscription_lettre, $ancien_mail, 'desinscription à la lettre d\'actualité');
182 
 
183 
			$adresse_inscription_lettre = Config::get('adresse_inscription_lettre');
184 
			$ajout_nouveau_mail = $this->envoyerMail($adresse_inscription_lettre, $nouveau_mail, 'inscription à la lettre d\'actualité');
185 
 
186 
			return $suppression_ancien_mail && $ajout_nouveau_mail;
187 
		} else {
188 
			$desinscription = $this->desinscriptionLettreActualite($ancien_mail);
189 
			$inscription = $this->inscriptionLettreActualite($nouveau_mail);
190 
 
191 
			return ($desinscription && $inscription);
192 
		}
193 
 
194 
	}
195 
}
196 
?>