Subversion Repositories Applications.projet

Rev

Rev 107 | Rev 397 | 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 '.
389 aurelien 109
                    'pil_id_liste='.$liste->getId().', pil_id_statut='.$type_inscription.' where pil_id_utilisateur='.$utilisateur->getInfo('identifiant') ;
2 ddelon 110
        $resultat = $this->_db->query ($requete) ;
111
        if (DB::isError ($resultat)) {
107 alexandre_ 112
            echo ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
2 ddelon 113
        }
114
        if ($this->_db->affectedRows() == 0) {
115
            $requete = 'insert into projet_inscription_liste set pil_id_utilisateur='.$utilisateur->getInfo('identifiant').
389 aurelien 116
                        ', pil_id_liste='.$liste->getId().', pil_id_statut='.$type_inscription ;
2 ddelon 117
            $resultat = $this->_db->query ($requete) ;
118
            if (DB::isError ($resultat)) {
107 alexandre_ 119
                echo ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
2 ddelon 120
            }
121
        }
389 aurelien 122
 
2 ddelon 123
        // Ajout dans la liste des commandes au serveur
124
        // On inscrit le créateur de la liste
30 alexandre_ 125
        $resultat_ajout_utilisateur = file_get_contents (PROJET_SERVEUR_VPOPMAIL.'/ajout_abonne.php?domaine='.
126
                  $liste->getDomaine().'&liste='.$liste->getNom().'&mail='.$utilisateur->getInfo('mail')) ;
389 aurelien 127
 
2 ddelon 128
    } // end of member function inscrireUtilisateur
129
 
130
    /**
131
     *
389 aurelien 132
     *
133
     * @param int id_utilisateur
134
     * @param int id_liste
2 ddelon 135
     * @return void
136
     * @access public
137
     */
138
    function desinscrireUtilisateur( &$utilisateur, &$liste )
139
    {
140
        $requete = 'delete from projet_inscription_liste where pil_id_utilisateur='.$utilisateur->getInfo('identifiant').' and pil_id_liste='.$liste->getId() ;
141
        $resultat = $this->_db->query ($requete) ;
30 alexandre_ 142
        $resultat_suppression_utilisateur = file_get_contents (PROJET_SERVEUR_VPOPMAIL.'/suppression_abonne.php?domaine='.
143
                  $liste->getDomaine().'&liste='.$liste->getNom().'&mail='.$utilisateur->getInfo('mail')) ;
144
 
2 ddelon 145
    } // end of member function desinscrireUtilisateur
146
 
147
    /**
148
     *
389 aurelien 149
     *
150
     * @param int id_liste
151
     * @param int id_utilisateur
152
     * @param int type_inscription
2 ddelon 153
     * @return void
154
     * @access public
155
     */
156
    function modifierTypeInscription( $liste,  $utilisateur,  $type_inscription )
157
    {
23 alexandre_ 158
 
2 ddelon 159
        // envoie d'une demande d'inscription par email à la liste
11 alexandre_ 160
        //include_once 'Mail.php' ;
389 aurelien 161
 
2 ddelon 162
        switch ($type_inscription) {
163
            case 0 :
23 alexandre_ 164
 
11 alexandre_ 165
            // Ajout du modérateur en tant qu'utilisateur
23 alexandre_ 166
            $resultat_suppression_utilisateur = file_get_contents (PROJET_SERVEUR_VPOPMAIL.'/suppression_abonne.php?domaine='.
11 alexandre_ 167
                                    $liste->getDomaine().'&liste='.$liste->getNom().'&mail='.$utilisateur->getInfo('mail')) ;
168
 
2 ddelon 169
            break ;
170
            case 1 :
389 aurelien 171
 
2 ddelon 172
            break ;
389 aurelien 173
            case 2 :
23 alexandre_ 174
 
11 alexandre_ 175
                // Ajout d'un utilisateur
23 alexandre_ 176
                $resultat_ajout_utilisateur = file_get_contents (PROJET_SERVEUR_VPOPMAIL.'/ajout_abonne.php?domaine='.
11 alexandre_ 177
                                    $liste->getDomaine().'&liste='.$liste->getNom().'&mail='.$utilisateur->getInfo('mail')) ;
2 ddelon 178
            break ;
179
        }
180
    } // end of member function modifierTypeInscription
181
 
182
    /**
183
     * Renvoie la liste des statuts d'un utilisateur
184
     *
389 aurelien 185
     * @param int id_utilisateur
2 ddelon 186
     * @return Array
187
     * @access public
188
     */
189
    function getStatutsInscrit( $id_utilisateur )
190
    {
389 aurelien 191
 
2 ddelon 192
        $requete = 'select pil_id_liste, pil_id_statut from projet_inscription_liste where pil_id_utilisateur='.$id_utilisateur ;
11 alexandre_ 193
        $resultat = $this->_db->query ($requete) ;echo $requete;
2 ddelon 194
        if (DB::isError ($resultat)) {
195
            die ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
196
        }
197
        $tableau_resultat = array() ;
198
        while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
199
            $tableau_resultat[$ligne->pil_id_liste] = $ligne->pil_id_statut ;
200
        }
201
        return $tableau_resultat ;
11 alexandre_ 202
 
389 aurelien 203
 
2 ddelon 204
    } // end of member function getStatutsInscrit
205
 
206
    /**
207
     * Renvoie le statut d'un inscrit à une liste
208
     *
389 aurelien 209
     * @param int id_liste
210
     * @param int id_utilisateur
2 ddelon 211
     * @return int
212
     * @access public
213
     */
11 alexandre_ 214
    function getStatutInscrit( $id_liste,  &$auth )
2 ddelon 215
    {
389 aurelien 216
 
11 alexandre_ 217
        // Récupération de la liste des listes !!
218
        $requete = 'select pl_nom_liste, pl_domaine from projet_liste where pl_id_liste='.$id_liste ;
219
        $resultat = $this->_db->query ($requete) ;
220
        if (DB::isError ($resultat)) {
221
            die ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
222
        }
223
        $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT) ;
23 alexandre_ 224
        $xml = file_get_contents(PROJET_SERVEUR_VPOPMAIL.'/liste_abonnes.php?domaine='.
11 alexandre_ 225
                            $ligne->pl_domaine.'&liste='.$ligne->pl_nom_liste) ;
226
        $tableau_mail = array() ;
227
        $tableau_ligne = explode ('<email>', $xml) ;
228
        foreach ($tableau_ligne as $ligne) array_push ($tableau_mail, strip_tags($ligne)) ;
229
        array_shift($tableau_mail) ;
230
        if (in_array($auth->getUsername(), $tableau_mail)) {
231
            return 2;       // Inscrit est le statut  2
232
        }
233
        return 0 ;
2 ddelon 234
    } // end of member function getStatutInscrit
235
} // end of isncription_liste
236
?>