Subversion Repositories Applications.projet

Rev

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

Rev Author Line No. Line
2 ddelon 1 
<?php
389 aurelien 2 
/*vim: set expandtab tabstop=4 shiftwidth=4: */
2 ddelon 3 
// +------------------------------------------------------------------------------------------------------+
4 
// | PHP version 4.1                                                                                      |
5 
// +------------------------------------------------------------------------------------------------------+
6 
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7 
// +------------------------------------------------------------------------------------------------------+
8 
// | This library is free software; you can redistribute it and/or                                        |
9 
// | modify it under the terms of the GNU General Public                                                  |
10 
// | License as published by the Free Software Foundation; either                                         |
11 
// | version 2.1 of the License, or (at your option) any later version.                                   |
12 
// |                                                                                                      |
13 
// | This library is distributed in the hope that it will be useful,                                      |
14 
// | but 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                                            |
19 
// | License along with this library; if not, write to the Free Software                                  |
20 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21 
// +------------------------------------------------------------------------------------------------------+
107 alexandre_ 22 
// CVS : $Id: inscription_liste.class.php,v 1.5 2006-04-19 13:50:49 alexandre_tb Exp $
2 ddelon 23 
/**
24 
* Application projet
25 
*
26 
* La classe inscription_liste
27 
*
28 
*@package projet
29 
//Auteur original :
30 
*@author        Alexandre Granier <alexandre@tela-botanica.org>
31 
//Autres auteurs :
32 
*@author        Aucun
33 
*@copyright     Tela-Botanica 2000-2004
107 alexandre_ 34 
*@version       $Revision: 1.5 $
2 ddelon 35 
// +------------------------------------------------------------------------------------------------------+
36 
*/
37 
 
38 
 
39 
// +------------------------------------------------------------------------------------------------------+
40 
// |                                            ENTETE du PROGRAMME                                       |
41 
// +------------------------------------------------------------------------------------------------------+
42 
 
43 
 
44 
/**
45 
 * class isncription_liste
389 aurelien 46 
 *
2 ddelon 47 
 */
48 
class inscription_liste
49 
{
50 
     /*** Attributes: ***/
51 
 
52 
    /**
53 
     * Identifiant de la liste
54 
     * @access private
55 
     */
56 
    var $_id_liste;
57 
    /**
58 
     * Identifiant de l'utilisateur
59 
     * @access private
60 
     */
61 
    var $_id_utilisateur;
62 
    /**
63 
     * Une ressource PEAR::DB
64 
     * @access private
65 
     */
66 
    var $_db;
67 
    /**
68 
     * Le type d'inscription indique : - 0 : pas d'email - 1 : normale - 2 : résumé
69 
     * @access private
70 
     */
71 
    var $_type_inscription;
72 
 
73 
    /**
74 
     * Constructeur
75 
     *
76 
     * @param DB objetDB Une ressource PEAR::DB
77 
     * @return void
78 
     * @access public
79 
     */
80 
    function inscription_liste( &$objetDB )
81 
    {
82 
        $this->_db = $objetDB ;
83 
    } // end of member function inscription_liste
84 
 
85 
    /**
86 
     * Renvoie un tableau avec la liste des inscrit à une liste.
87 
     *
88 
     * @param int id_liste L'identifiant de la liste
89 
     * @return Array
90 
     * @access public
91 
     */
92 
    function getInscritsListe( $id_liste )
93 
    {
389 aurelien 94 
 
2 ddelon 95 
    } // end of member function getInscritsListe
96 
 
97 
    /**
98 
     *
389 aurelien 99 
     *
100 
     * @param annire utilisateur
101 
     * @param liste_discussion id_liste
102 
     * @param int type_inscription
2 ddelon 103 
     * @return void
104 
     * @access public
105 
     */
106 
    function inscrireUtilisateur( &$utilisateur,  &$liste,  $type_inscription )
107 
    {
108 
        $requete = 'update projet_inscription_liste set '.
397 aurelien 109 
                    'pil_id_liste='.$this->_db->escapeSimple($liste->getId()).', pil_id_statut='.$this->_db->escapeSimple($type_inscription).
110 
        			' where pil_id_utilisateur='.$this->_db->escapeSimple($utilisateur->getInfo('identifiant')) ;
2 ddelon 111 
        $resultat = $this->_db->query ($requete) ;
112 
        if (DB::isError ($resultat)) {
107 alexandre_ 113 
            echo ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
2 ddelon 114 
        }
115 
        if ($this->_db->affectedRows() == 0) {
397 aurelien 116 
            $requete = 'insert into projet_inscription_liste set pil_id_utilisateur='.$this->_db->escapeSimple($utilisateur->getInfo('identifiant')).
117 
                        ', pil_id_liste='.$this->_db->escapeSimple($liste->getId()).', pil_id_statut='.$this->_db->escapeSimple($type_inscription) ;
2 ddelon 118 
            $resultat = $this->_db->query ($requete) ;
119 
            if (DB::isError ($resultat)) {
107 alexandre_ 120 
                echo ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
2 ddelon 121 
            }
122 
        }
389 aurelien 123 
 
2 ddelon 124 
        // Ajout dans la liste des commandes au serveur
125 
        // On inscrit le créateur de la liste
30 alexandre_ 126 
        $resultat_ajout_utilisateur = file_get_contents (PROJET_SERVEUR_VPOPMAIL.'/ajout_abonne.php?domaine='.
127 
                  $liste->getDomaine().'&liste='.$liste->getNom().'&mail='.$utilisateur->getInfo('mail')) ;
389 aurelien 128 
 
2 ddelon 129 
    } // end of member function inscrireUtilisateur
130 
 
131 
    /**
132 
     *
389 aurelien 133 
     *
134 
     * @param int id_utilisateur
135 
     * @param int id_liste
2 ddelon 136 
     * @return void
137 
     * @access public
138 
     */
139 
    function desinscrireUtilisateur( &$utilisateur, &$liste )
140 
    {
397 aurelien 141 
        $requete = 'delete from projet_inscription_liste where pil_id_utilisateur='.$this->_db->escapeSimple($utilisateur->getInfo('identifiant')).
142 
        			' and pil_id_liste='.$this->_db->escapeSimple($liste->getId()) ;
2 ddelon 143 
        $resultat = $this->_db->query ($requete) ;
30 alexandre_ 144 
        $resultat_suppression_utilisateur = file_get_contents (PROJET_SERVEUR_VPOPMAIL.'/suppression_abonne.php?domaine='.
145 
                  $liste->getDomaine().'&liste='.$liste->getNom().'&mail='.$utilisateur->getInfo('mail')) ;
146 
 
2 ddelon 147 
    } // end of member function desinscrireUtilisateur
148 
 
149 
    /**
150 
     *
389 aurelien 151 
     *
152 
     * @param int id_liste
153 
     * @param int id_utilisateur
154 
     * @param int type_inscription
2 ddelon 155 
     * @return void
156 
     * @access public
157 
     */
158 
    function modifierTypeInscription( $liste,  $utilisateur,  $type_inscription )
159 
    {
23 alexandre_ 160 
 
2 ddelon 161 
        // envoie d'une demande d'inscription par email à la liste
11 alexandre_ 162 
        //include_once 'Mail.php' ;
389 aurelien 163 
 
2 ddelon 164 
        switch ($type_inscription) {
165 
            case 0 :
23 alexandre_ 166 
 
11 alexandre_ 167 
            // Ajout du modérateur en tant qu'utilisateur
23 alexandre_ 168 
            $resultat_suppression_utilisateur = file_get_contents (PROJET_SERVEUR_VPOPMAIL.'/suppression_abonne.php?domaine='.
11 alexandre_ 169 
                                    $liste->getDomaine().'&liste='.$liste->getNom().'&mail='.$utilisateur->getInfo('mail')) ;
170 
 
2 ddelon 171 
            break ;
172 
            case 1 :
389 aurelien 173 
 
2 ddelon 174 
            break ;
389 aurelien 175 
            case 2 :
23 alexandre_ 176 
 
11 alexandre_ 177 
                // Ajout d'un utilisateur
23 alexandre_ 178 
                $resultat_ajout_utilisateur = file_get_contents (PROJET_SERVEUR_VPOPMAIL.'/ajout_abonne.php?domaine='.
11 alexandre_ 179 
                                    $liste->getDomaine().'&liste='.$liste->getNom().'&mail='.$utilisateur->getInfo('mail')) ;
2 ddelon 180 
            break ;
181 
        }
182 
    } // end of member function modifierTypeInscription
183 
 
184 
    /**
185 
     * Renvoie la liste des statuts d'un utilisateur
186 
     *
389 aurelien 187 
     * @param int id_utilisateur
2 ddelon 188 
     * @return Array
189 
     * @access public
190 
     */
191 
    function getStatutsInscrit( $id_utilisateur )
192 
    {
389 aurelien 193 
 
397 aurelien 194 
        $requete = 'select pil_id_liste, pil_id_statut from projet_inscription_liste where pil_id_utilisateur='.$this->_db->escapeSimple($id_utilisateur) ;
11 alexandre_ 195 
        $resultat = $this->_db->query ($requete) ;echo $requete;
2 ddelon 196 
        if (DB::isError ($resultat)) {
197 
            die ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
198 
        }
199 
        $tableau_resultat = array() ;
200 
        while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
201 
            $tableau_resultat[$ligne->pil_id_liste] = $ligne->pil_id_statut ;
202 
        }
203 
        return $tableau_resultat ;
11 alexandre_ 204 
 
389 aurelien 205 
 
2 ddelon 206 
    } // end of member function getStatutsInscrit
207 
 
208 
    /**
209 
     * Renvoie le statut d'un inscrit à une liste
210 
     *
389 aurelien 211 
     * @param int id_liste
212 
     * @param int id_utilisateur
2 ddelon 213 
     * @return int
214 
     * @access public
215 
     */
11 alexandre_ 216 
    function getStatutInscrit( $id_liste,  &$auth )
2 ddelon 217 
    {
389 aurelien 218 
 
11 alexandre_ 219 
        // Récupération de la liste des listes !!
397 aurelien 220 
        $requete = 'select pl_nom_liste, pl_domaine from projet_liste where pl_id_liste='.$this->_db->escapeSimple($id_liste) ;
11 alexandre_ 221 
        $resultat = $this->_db->query ($requete) ;
222 
        if (DB::isError ($resultat)) {
223 
            die ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
224 
        }
225 
        $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT) ;
23 alexandre_ 226 
        $xml = file_get_contents(PROJET_SERVEUR_VPOPMAIL.'/liste_abonnes.php?domaine='.
11 alexandre_ 227 
                            $ligne->pl_domaine.'&liste='.$ligne->pl_nom_liste) ;
228 
        $tableau_mail = array() ;
229 
        $tableau_ligne = explode ('<email>', $xml) ;
230 
        foreach ($tableau_ligne as $ligne) array_push ($tableau_mail, strip_tags($ligne)) ;
231 
        array_shift($tableau_mail) ;
232 
        if (in_array($auth->getUsername(), $tableau_mail)) {
233 
            return 2;       // Inscrit est le statut  2
234 
        }
235 
        return 0 ;
2 ddelon 236 
    } // end of member function getStatutInscrit
237 
} // end of isncription_liste
238 
?>