3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2014 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
13 if (!defined('_ECRIRE_INC_VERSION')) return;
15 include_spip('inc/filtres');
16 include_spip('base/abstract_sql');
18 if (!defined('_EMAIL_GENERAL'))
19 define('_EMAIL_GENERAL','general'); // permet aux admin d'envoyer un email a tout le monde
22 * Lister les statuts des auteurs pouvant recevoir un message
23 * c'est tous les auteurs au moins redacteur
27 function messagerie_statuts_destinataires_possibles(){
28 include_spip('inc/filtres_ecrire');
29 return pipeline('messagerie_statuts_destinataires_possibles', auteurs_lister_statuts('redacteurs',false));
33 * Nettoyer une liste de destinataires
34 * @param $destinataires
37 function messagerie_nettoyer_destinataires($destinataires){
38 foreach ($destinataires as $k=>$id){
39 // il se peut que l'id recupere l'ancre qui suit avec certains ie ... :(
40 if (preg_match(',^[0-9]+#[a-z_0-9]+,',$id))
41 $destinataires[$k] = intval($id);
43 return $destinataires;
47 * Fonction generique de verification des destinataires
48 * lors de l'envoi d'un message ou de recommander
49 * un destinataire peut etre un id_auteur numerique
50 * ou une adresse mail valide, si l'options accepter_email est true
52 * @param array $destinataires
53 * @param array $options
56 function messagerie_verifier_destinataires($destinataires,$options=array('accepter_email'=>true)){
59 $destinataires = messagerie_nettoyer_destinataires($destinataires);
60 foreach ($destinataires as $id){
63 $erreurs[] = _T('organiseur:erreur_destinataire_invalide',array('dest'=>$id));
66 if (!$options['accepter_email']
67 OR !email_valide($id))
68 $erreurs[] = _T('organiseur:erreur_destinataire_invalide',array('dest'=>$id));
76 * Selectionner les destinataires en distinguant emails et id_auteur
81 function messagerie_destiner($dests){
82 // separer les destinataires auteur des destinataires email
83 $auteurs_dest = array();
84 $email_dests = array();
86 $dests = messagerie_nettoyer_destinataires($dests);
87 foreach ($dests as $id){
89 $auteurs_dest[] = $id;
90 elseif (defined('_MESSAGERIE_EMAIL_GENERAL') AND $id!=_MESSAGERIE_EMAIL_GENERAL
)
93 if (count($email_dests)) {
94 // retrouver les id des emails pour ceux qui sont en base
95 $res = sql_select('id_auteur,email','spip_auteurs',sql_in('email', $email_dests));
96 $auteurs_dest_found = array();
97 while ($row = sql_fetch($res)){
98 $auteurs_dest_found[] = $row['id_auteur'];
100 $auteurs_dest = array_merge($auteurs_dest,$auteurs_dest_found);
102 return array($auteurs_dest,$email_dests);
106 * Diffuser un message par la messagerie interne
108 * @param int $id_message
109 * @param array $auteurs_dest
112 function messagerie_diffuser_message($id_message, $auteurs_dest=array()){
114 if ($id_message=intval($id_message)
115 AND count($auteurs_dest)){
116 include_spip('action/editer_liens');
117 $out = objet_associer(array('auteur'=>$auteurs_dest),array('message'=>$id_message),array('vu'=>'non'));
123 * Envoyer un message par mail pour les destinataires externes
125 * @param int $id_message
126 * @param array $emails_dest
129 function messagerie_mailer_message($id_message, $emails_dest=array()){
130 if ($id_message=intval($id_message)
131 AND count($emails_dest)) {
132 if ($row = sql_fetsel('titre,texte,id_auteur','spip_messages','id_message='.intval($id_message))){
133 $from = sql_getfetsel('email','spip_auteurs','id_auteur='.$row['id_auteur']);
134 foreach($emails_dest as $email)
138 array($email,$row['titre'],array('texte'=>$row['texte'],'from'=>$from)),
148 * Marquer un message dans l'etat indique par $vu
150 * @param int $id_auteur
151 * @param array $liste
155 function messagerie_marquer_message($id_auteur,$liste,$vu){
156 include_spip('action/editer_liens');
157 if (!is_array($liste))
158 $liste = array($liste);
159 // completer les liens qui n'existent pas encore
160 // ex : pour marquer lue une annonce, on ajoute le lien d'abord (n'existe pas)
161 // puis on le marque 'oui'
162 $liens = objet_trouver_liens(array('auteur'=>$id_auteur),array('message'=>$liste));
164 foreach($liens as $lien)
165 $l[] = $lien['message'];
166 objet_associer(array('auteur'=>$id_auteur),array('message'=>array_diff($liste,$l)),array('vu'=>$vu));
167 // puis les marquer tous lus
168 objet_qualifier_liens(array('auteur'=>$id_auteur),array('message'=>$liste),array('vu'=>$vu));
169 include_spip('inc/invalideur');
170 suivre_invalideur("message/".implode(',',$liste));
174 * Marquer un message comme lu
176 * @param int $id_auteur
177 * @param array $liste_id_message
179 function messagerie_marquer_lus($id_auteur,$liste_id_message){messagerie_marquer_message($id_auteur,$liste_id_message,'oui');}
182 * Marquer un message comme non lu
184 * @param int $id_auteur
185 * @param array $liste_id_message
187 function messagerie_marquer_non_lus($id_auteur,$liste_id_message){messagerie_marquer_message($id_auteur,$liste_id_message,'non');}
190 * Effacer un message recu
192 * @param int $id_auteur
193 * @param array $liste_id_message
195 function messagerie_effacer_message_recu($id_auteur,$liste_id_message){messagerie_marquer_message($id_auteur,$liste_id_message,'poub');}