Subversion Repositories Applications.projet

Rev

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

Rev Author Line No. Line
2 ddelon 1
<?php
2
/*vim: set expandtab tabstop=4 shiftwidth=4: */
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
// +------------------------------------------------------------------------------------------------------+
346 alexandre_ 22
// CVS : $Id: forums.php,v 1.14 2008-09-16 14:12:43 alexandre_tb Exp $
2 ddelon 23
/**
24
* Application projet
25
*
26
* Action forums
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-2005
346 alexandre_ 34
*@version       $Revision: 1.14 $
2 ddelon 35
// +------------------------------------------------------------------------------------------------------+
36
*/
37
 
38
// +------------------------------------------------------------------------------------------------------+
39
// |                                            ENTETE du PROGRAMME                                       |
40
// +------------------------------------------------------------------------------------------------------+
41
 
208 neiluj 42
include_once PROJET_CHEMIN_CLASSES.'projet.class.php' ;
43
include_once PROJET_CHEMIN_CLASSES.'participe.class.php' ;
294 alexandre_ 44
include_once PROJET_CHEMIN_CLASSES.'HTML_formulaireMail.class.php' ;
45
include_once PROJET_CHEMIN_CLASSES.'inscription_liste.class.php' ;
46
include_once PROJET_CHEMIN_CLASSES.'ezmlmAccessObject.class.php' ;
2 ddelon 47
// RAPPEL IMPORTANT
294 alexandre_ 48
// On se situe dans la methode run() de la classe projetControleur
2 ddelon 49
//
50
 
51
 
294 alexandre_ 52
// creation de l'objet projet courant
2 ddelon 53
$projet = new projet ($this->_db, $this->_id_projet) ;
54
 
294 alexandre_ 55
/* contiendra le lien vers la liste yahoo */
2 ddelon 56
$liste_ext_res = '' ;
294 alexandre_ 57
 
58
$url_page_en_cours = $this->_url->getURL();
59
 
46 ddelon 60
$inscription_laius ='' ;
294 alexandre_ 61
$bouton_poster = '';
62
$bouton_desinscription_liste = '';
63
 
64
$loggue = $this->_auth->getAuth();
65
 
66
// Un appel a papyrus pour modifier le titre de la page
67
$GLOBALS['_PAPYRUS_']['rendu']['TITRE_PAGE'] = $projet->getTitre().' - '.PROJET_FORUM;
68
 
69
include_once PROJET_CHEMIN_CLASSES.'liste_externe.class.php' ;
70
$listes_ext = new liste_externe ($this->_db) ;
71
$tableau_liste = $listes_ext->getListesAssociees($this->_id_projet) ;
72
 
73
if (count ($tableau_liste) != 0) {
74
    //$liste_ext_res .= '<h2>'.PROJET_LISTES_ASSOCIEES.'</h2>'."\n" ;
75
    for ($i = 0; $i < count ($tableau_liste); $i++) {
76
        $info_liste = $listes_ext->getInfoListe($tableau_liste[$i]) ;
77
        $liste_ext_res .= '<p><a href="'.$info_liste->AGO_A_URLGRP.'">'.$info_liste->AGO_A_URLGRP.'</a></p>'."\n" ;
78
        $liste_ext_res .= '<br />'."\n" ;
79
    }
80
    $avoir_liste_externe = true;
81
    $adresse_envoie = $info_liste->AGO_A_MAILSEND;
346 alexandre_ 82
    $adresse_inscription = $info_liste->AGO_A_MAILABO;
294 alexandre_ 83
} else {
84
	$avoir_liste_externe = false;
85
}
86
 
87
 
69 alexandre_ 88
$this->_url->addQueryString (PROJET_VARIABLE_ID_PROJET, $this->_id_projet);
2 ddelon 89
if ($projet->avoirListe()) {
90
    foreach ($projet->_listes_associes as $info_liste) {
91
        ob_start() ;
92
        $id_u = $this->_auth->getAuthData(PROJET_CHAMPS_ID) ;
93
        if ($this->_auth->getAuth()) {
94
            $participant = new participe($this->_db) ;
294 alexandre_ 95
             $droits = $participant->getStatut($id_u, $this->_id_projet);
2 ddelon 96
        } else {
97
            $droits = PROJET_DROIT_AUCUN;
294 alexandre_ 98
            $this->_url->addQueryString(PROJET_VARIABLE_ACTION, PROJET_ACTION_S_INSCRIRE);
99
    		$lien_inscription = 'javascript:animatedcollapse.toggle(\'projet_bloc_inscription\');';
100
			$label_url_inscription = 'S\'inscrire &agrave; ce projet';
101
			GEN_stockerFichierScript('jquery', 'api/js/jquery/jquery.js');
102
			GEN_stockerFichierScript('animatedcollapse', 'api/js/jquery/animatedcollapse.js');
103
			GEN_stockerCodeScript('animatedcollapse.addDiv(\'projet_bloc_inscription\', \'fade=1, height="100px"\');' ."\n".
104
					'animatedcollapse.init();' ."\n");
2 ddelon 105
        }
294 alexandre_ 106
        switch ($droits) {
107
        	case PROJET_DROIT_AUCUN :
108
	        	$this->_url->addQueryString(PROJET_VARIABLE_ACTION, PROJET_ACTION_S_INSCRIRE);
109
	    		$lien_inscription = $this->_url->getURL();
110
	    		$label_url_inscription = 'S\'inscrire &agrave; ce projet';
111
				GEN_stockerFichierScript('jquery', 'api/js/jquery/jquery.js');
112
				GEN_stockerFichierScript('animatedcollapse', 'api/js/jquery/animatedcollapse.js');
113
				GEN_stockerCodeScript('animatedcollapse.addDiv(\'projet_bloc_inscription\', \'fade=1, height="100px"\');' ."\n".
114
						'animatedcollapse.init();' ."\n");
115
	    	break;
116
        }
117
        // gestion de l'inscription desinscription a la liste
118
        // TODO : la gestion de linscription au resume
33 alexandre_ 119
        $inscription_liste = new inscription_liste($this->_db) ;
120
        $statut = $inscription_liste->getStatutInscrit( $info_liste->getId(),  $this->_auth ) ;
69 alexandre_ 121
        if ($this->_auth->getAuth() && isset($GLOBALS['_GEN_commun']['info_application']->seulement_forum)) {
41 alexandre_ 122
	        if ($statut == 2) {
69 alexandre_ 123
	        	$this->_url->addQueryString(PROJET_VARIABLE_ACTION, PROJET_ACTION_DESINSCRIPTION_LISTE);
41 alexandre_ 124
	        	$inscription_laius ='<h2>'.PROJET_VOUS_ETES_INSCRIT.'</h2>'."\n" ;
125
	        	$inscription_laius .= '<a href="'.$this->_url->getURL().'">'.PROJET_SE_DESINSCRIRE_LISTE.'</a>'."\n" ;
126
	        } else {
69 alexandre_ 127
	        	$this->_url->addQueryString(PROJET_VARIABLE_ACTION, PROJET_ACTION_INSCRIPTION_LISTE);
41 alexandre_ 128
	        	$inscription_laius ='<h2>'.PROJET_VOUS_N_ETES_PAS_INSCRIT.'</h2>'."\n" ;
129
	        	$inscription_laius .= '<a href="'.$this->_url->getURL().'">'.PROJET_S_INSCRIRE.'</a>'."\n" ;
130
	        }
33 alexandre_ 131
        }
294 alexandre_ 132
        if ($inscription_liste->getStatutInscrit($info_liste->getId(),  $this->_auth) == 0) {
133
	        $action_inscription = PROJET_ACTION_INSCRIPTION_LISTE ;
134
	        $label_inscription = 'S\'inscrire &agrave; la liste' ;
135
	    } else {
136
	        // L'action envoyer un mail
137
	        $action_inscription = PROJET_ENVOYER_UN_MAIL ;
138
	        $label_inscription = PROJET_ECRIRE_LISTE ;
139
	        $this->_url->addQueryString(PROJET_VARIABLE_ACTION, PROJET_ACTION_DESINSCRIPTION_LISTE);
140
	        $bouton_desinscription_liste = bouton::toHTML($this->_url->getURL(), 'Se d&eacute;sinscrire de la liste','cross');
141
	    }
33 alexandre_ 142
 
2 ddelon 143
        if ($info_liste->isPublic() || $droits <= PROJET_DROIT_CONTRIBUTEUR) {
208 neiluj 144
            include_once PROJET_CHEMIN_CLASSES_LISTES.'ezmlm.php' ;
2 ddelon 145
            $liste = new ezmlm_php() ;
294 alexandre_ 146
            // Parametrage de la liste
2 ddelon 147
 
148
            $liste->listdir = PROJET_CHEMIN_LISTES.$info_liste->getDomaine().'/'.$info_liste->getNom();
149
            $liste->listname = $info_liste->getNom() ;
150
            $liste->listdomain = $info_liste->getDomaine();
151
 
152
            if (isset ($GLOBALS['action']) && $GLOBALS['action'] != '') {
153
                $liste->set_action($GLOBALS['action']) ;
154
                $liste->set_actionargs($GLOBALS['actionargs']) ;
155
            } else {
156
                $liste->set_action('list_info') ;
157
            }
158
            $liste->sendheaders	= false;
159
            $liste->sendbody        = false;
160
            $liste->sendfooters    = false;
161
            $liste->forcehref = $this->_url->getURL() ;
162
 
294 alexandre_ 163
            if (!$avoir_liste_externe) {
164
            	$adresse_envoie = $info_liste->getAdresseEnvoi();
165
            }
166
            print '<a href="mailto:'.$adresse_envoie.'">' . $adresse_envoie ;
2 ddelon 167
            print "</a><br />\n";
294 alexandre_ 168
            $this->_url->addQueryString(PROJET_VARIABLE_ACTION, $action_inscription);
169
            $bouton_poster = bouton::toHTML($this->_url->getURL(), $label_inscription,'ecrire');
69 alexandre_ 170
            if (isset ($GLOBALS['_GEN_commun']['info_application']->seulement_forum))
171
            		print '<a href="'.$this->_url->getURL().'">'.PROJET_ECRIRE_LISTE.'</a><br />';
2 ddelon 172
 
173
            print '<h2>'.PROJET_TOUS_LES_MESSAGES.'</h2>'."\n";
106 alexandre_ 174
            $this->_url->addQueryString(PROJET_VARIABLE_ACTION, PROJET_ACTION_VOIR_FORUM);
2 ddelon 175
 
294 alexandre_ 176
            if ($liste->action != 'show_message') {
177
	            $xml_parser = &new ezmlmAccessObject('calendrier_messages', $info_liste->getDomaine(),
178
	            									$info_liste->getNom(), $GLOBALS['lang'],
179
	            									$this->_url->getURL()) ;
180
				$xml_parser->load();
181
				ob_start();
182
				$resultat = $xml_parser->parse() ;
183
				$calendrier = ob_get_contents();
184
				ob_end_clean();
185
				$xml_parser->reset();
186
            }
106 alexandre_ 187
            //$this->_url->addQueryString(PROJET_VARIABLE_ACTION, $this->_action) ;
188
 
294 alexandre_ 189
            // On teste si l'on vient d'une reponse a un email, si oui
190
            // on modifie $liste->action pour renvoyer le message auquelon vient de repondre
2 ddelon 191
            if (isset($_POST['messageid'])) {
192
                $liste->action = 'show_msg' ;
193
            }
194
            switch ($liste->action) {
195
                case "show_msg":
196
                    if (count($liste->actionargs) < 2) {
197
                        $liste->error(EZMLM_INVALID_SYNTAX,TRUE);
198
                    }
106 alexandre_ 199
 
294 alexandre_ 200
 
201
                    // actionargs[0] contient le nom du repertoire et actionargs[1] le nom du fichier
2 ddelon 202
                    // On appelle la fonction qui affiche un fichier
106 alexandre_ 203
					$xml_parser->setAction ('message');
204
                    $xml_parser->setIdMessage($liste->actionargs[0], $liste->actionargs[1]) ;
205
                    $xml_parser->load();
206
                    ob_start ();
207
                    $xml_parser->parse() ;
208
                    $mail = ob_get_contents() ;
209
                    ob_end_clean();
210
 
211
                    $mimeDecode = new Mail_mimeDecode($mail) ;
212
        			$mailDecode = $mimeDecode->decode(array('decode_bodies' => 'true',
213
												'include_bodies' => 'true')) ;
214
					$message = new ezmlm_msgdisplay() ;
215
					$message->listname = $info_liste->getNom();
294 alexandre_ 216
 
217
					$numero_message = $xml_parser->getNumeroMessage();
218
        			$total_message = $xml_parser->getNombreTotalMessage();
219
 
208 neiluj 220
					$this->_url->addQueryString ('action', 'show_msg');
294 alexandre_ 221
 
222
					ob_start();
223
					if ($xml_parser->getNumeroFichierPrecedent() != 0) {
224
			            $lien_precedent = $this->_url->getURL(). '&amp;actionargs[]='.
106 alexandre_ 225
			            		$xml_parser->getNumeroRepertoirePrecedent().'&amp;actionargs[]='.
294 alexandre_ 226
			            		$xml_parser->getNumeroFichierPrecedent();
227
			            $bouton_precedent = bouton::toHTML($lien_precedent, PROJET_PRECEDENT, 'gauche', 'projet_bouton_inline');
228
			            $navigation = $bouton_precedent;
106 alexandre_ 229
			        }
294 alexandre_ 230
 
231
			        if ($xml_parser->getNumeroFichierSuivant() != '' && (int) $numero_message < (int) $total_message) {
232
			            $lien_suivant = $this->_url->getURL(). '&amp;actionargs[]='.
233
			            		$xml_parser->getNumeroRepertoireSuivant().'&amp;actionargs[]='.
234
			            		$xml_parser->getNumeroFichierSuivant();
235
			            $bouton_suivant = bouton::toHTML($lien_suivant ,PROJET_SUIVANT, 'droite', 'projet_bouton_inline');
236
			            $navigation .= $bouton_suivant;
237
			        }
106 alexandre_ 238
        			$this->_url->addQueryString ('action', 'repondre');
294 alexandre_ 239
        			$bouton_repondre = bouton::toHTML($this->_url->getURL().'&amp;actionargs[]='.$liste->actionargs[0].
240
							'&amp;actionargs[]='.$liste->actionargs[1], PROJET_REPONDRE, 'repondre', 'projet_bouton_inline');
241
        			$this->_url->removeQueryString('action');
242
        			/*
243
						Un bouton pour revenir a la liste des messages
244
					*/
245
 
246
					$navigation .= bouton::toHTML($this->_url->getURL() ,'retour', 'haut', 'projet_bouton_inline');
247
					if (!$avoir_liste_externe && $droits <= PROJET_DROIT_CONTRIBUTEUR) $navigation .= $bouton_repondre;
248
					if ($droits == PROJET_DROIT_COORDINATEUR || $droits == PROJET_DROIT_ADMINISTRATEUR) {
112 alexandre_ 249
						$this->_url->addQueryString ('action', 'supprimer');
294 alexandre_ 250
 
251
						$bouton_suppression_message = bouton::toHTML($this->_url->getURL().'&amp;actionargs[]='.$liste->actionargs[0].
252
							'&amp;actionargs[]='.$liste->actionargs[1], 'Supprimer', 'cross', 'projet_bouton_inline');
253
						$navigation .= $bouton_suppression_message;
112 alexandre_ 254
					}
294 alexandre_ 255
					$this->_url->removeQueryString ('action');
106 alexandre_ 256
					print '<div class="message">' ;
257
                    print $message->parse_entete_mail($mailDecode) ;
258
        	        $message->parse_template($mailDecode, $liste->actionargs[1], $liste->actionargs[0]);
259
       				print $message->message_rendu;
260
       				print '</div>' ;
294 alexandre_ 261
       				$message = ob_get_contents();
262
       				ob_end_clean();
106 alexandre_ 263
 
2 ddelon 264
                    break;
265
 
266
                case "list_info":
112 alexandre_ 267
                    $xml_parser->reset() ;
268
					$xml_parser->setAction ('derniers_messages');
269
                    $xml_parser->load();
270
                    ob_start ();
271
                    $xml_parser->parse() ;
272
                    $derniers_messages = ob_get_contents() ;
273
                    ob_end_clean();
294 alexandre_ 274
 
2 ddelon 275
 
276
                    break;
277
                case "show_threads":
112 alexandre_ 278
                    $xml_parser->reset() ;
279
					$xml_parser->setAction ('messages_thread');
280
					$xml_parser->setMois($liste->actionargs[0]);
281
                    $xml_parser->load();
282
                    ob_start ();
283
                    $xml_parser->parse() ;
284
                    $messages_thread = ob_get_contents() ;
285
                    ob_end_clean();
294 alexandre_ 286
                    $message = $messages_thread ;
2 ddelon 287
                    break;
288
                case "show_author_msgs" :
112 alexandre_ 289
                    $xml_parser->reset() ;
290
					$xml_parser->setAction ('messages_auteur');
291
					$xml_parser->setHashAuteur($liste->actionargs[0]);
292
                    $xml_parser->load();
293
                    ob_start ();
294
                    $xml_parser->parse() ;
295
                    $messages_auteur = ob_get_contents() ;
296
                    ob_end_clean();
294 alexandre_ 297
                    $message = $messages_auteur ;
2 ddelon 298
                    break;
299
                case 'show_month' :
294 alexandre_ 300
                	$this->_url->addQueryString(PROJET_VARIABLE_ACTION, 'forums');
301
                	$this->_url->addQueryString('action', 'show_threads');
302
                	$this->_url->addQueryString('actionargs[]', $liste->actionargs[0]);
303
                	$message = '[<a href="'.$this->_url->getURL().'">par fil de discussion</a>]';
304
 
112 alexandre_ 305
                    $xml_parser->reset() ;
306
					$xml_parser->setAction ('messages_mois');
307
					$xml_parser->setMois($liste->actionargs[0]);
308
                    $xml_parser->load();
309
                    ob_start ();
310
                    $xml_parser->parse() ;
311
                    $messages_mois = ob_get_contents() ;
312
                    ob_end_clean();
294 alexandre_ 313
                    $message .= $messages_mois ;
2 ddelon 314
                break;
315
                case 'repondre' :
316
                    if (count($liste->actionargs) < 2) {
317
                        $liste->error(EZMLM_INVALID_SYNTAX,TRUE);
318
                    }
112 alexandre_ 319
                    $xml_parser->setAction ('message');
320
                    $xml_parser->setIdMessage($liste->actionargs[0], $liste->actionargs[1]) ;
321
                    $xml_parser->load();
322
                    ob_start ();
323
                    $xml_parser->parse() ;
324
                    $message = ob_get_contents() ;
325
                    ob_end_clean();
326
        			$mimeDecode = new Mail_mimeDecode($message) ;
327
        			$mailDecode = $mimeDecode->decode(array('decode_bodies' => 'true', 'include_bodies' => 'true')) ;
328
 
329
					if (isset($_SESSION['formulaire_mail'])) {
330
            			unset ($_SESSION['formulaire_mail']) ;
331
        			}
332
 
333
			        $formulaireReponse = new HTML_formulaireMail('formulaire_reponse', 'post',
334
										str_replace('&amp;', '&', $this->_url->getURL()).
335
										'&action='.PROJET_ENVOYER_UN_MAIL_V.
336
                                        '&actionargs[]='.$liste->actionargs[0].
337
										'&actionargs[]='.$liste->actionargs[1].
338
										'&'.PROJET_VARIABLE_ACTION.'='.PROJET_ENVOYER_UN_MAIL_V) ;
339
			        $formulaireReponse->construitFormulaire() ;
340
 
341
					$repondre = new ezmlm_repondre();
2 ddelon 342
                    $repondre->listdir = $liste->listdir ;
343
                    $this->_url->removeQueryString (PROJET_VARIABLE_ACTION) ;
344
                    $repondre->forcehref = $this->_url->getURL();
345
                    $repondre->listname = $info_liste->getNom() ;
346
                    // actionargs[0] contient le nom du répertoire et actionargs[1] le nom du fichier
347
                    // On appelle la fonction qui affiche un fichier
294 alexandre_ 348
                    $message = '<h2>'.PROJET_REDIGER_REPONSE.'</h2>'."\n" ;
2 ddelon 349
                    $repondre->repondre($liste->actionargs[0] . "/" . $liste->actionargs[1]);
112 alexandre_ 350
 
351
                    $repondre->parse_template($mailDecode, $liste->actionargs[0], $liste->actionargs[1]);
352
			        $formulaireReponse->addElement ('hidden', 'messageid', $mailDecode->headers['message-id']) ;
353
			        // Ajout de > au début de chaque ligne du message
354
			        $tableau = explode ("\n", $repondre->message_rendu) ;
355
			        $repondre->message_rendu = "> ".implode ("\n> ", $tableau) ;
356
 
357
			        $formulaireReponse->setDefaults(array('mail_corps' => $repondre->message_rendu,
358
			                                              'mail_titre' => 'Re : '.$repondre->decode_iso ($mailDecode->headers['subject']))) ;
359
 
294 alexandre_ 360
			        $message .= $formulaireReponse->toHTML() ;
112 alexandre_ 361
 
2 ddelon 362
                    break;
112 alexandre_ 363
                case 'supprimer' :
364
                    $xml_parser->reset() ;
365
					$xml_parser->setAction ('supprimer');
366
					$xml_parser->setIdMessage($liste->actionargs[0], $liste->actionargs[1]) ;
367
                    $xml_parser->load();
294 alexandre_ 368
                    $message = '<h2>'.PROJET_DERNIERS_MESSAGES.'</h2>'."\n" ;
208 neiluj 369
                    $xml_parser->reset() ;
370
					$xml_parser->setAction ('derniers_messages');
371
                    $xml_parser->load();
372
                    ob_start ();
373
                    $xml_parser->parse() ;
294 alexandre_ 374
                    $message .= ob_get_contents() ;
208 neiluj 375
                    ob_end_clean();
294 alexandre_ 376
 
112 alexandre_ 377
                break;
2 ddelon 378
            }
379
 
380
        } else {
294 alexandre_ 381
            $message = PROJET_MESSAGE_LISTE_PRIVEE ;
2 ddelon 382
        }
383
        ob_end_clean() ;
384
    }
385
}
386
 
387
 
294 alexandre_ 388
if ($liste->action == 'show_msg') $squelette = 'message'; else $squelette = 'forum';
389
ob_start();
390
include_once PROJET_CHEMIN_APPLI.'/squelettes/'.$squelette.'.tpl.html';
391
$retour .= ob_get_contents();
392
ob_end_clean();
2 ddelon 393
 
33 alexandre_ 394
 
294 alexandre_ 395
$this->_url->removeQueryString ('actionargs');
396
$this->_url->addQueryString(PROJET_VARIABLE_ACTION, PROJET_ACTION_VOIR_FORUM);
397
/* +--Fin du code ----------------------------------------------------------------------------------------+
398
*
399
* $Log: not supported by cvs2svn $
346 alexandre_ 400
* Revision 1.13  2008-08-25 15:02:49  alexandre_tb
401
* mise en place des squelettes
294 alexandre_ 402
*
346 alexandre_ 403
*
294 alexandre_ 404
* +-- Fin du code ----------------------------------------------------------------------------------------+
405
*/
2 ddelon 406
?>