5e61ea1457227392d73be87ed053c828f25a3627
2 /***************************************************************************
3 * Copyright (C) 2003-2014 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
6 * This program is free software; you can redistribute it and/or modify *
7 * it under the terms of the GNU General Public License as published by *
8 * the Free Software Foundation; either version 2 of the License, or *
9 * (at your option) any later version. *
11 * This program is distributed in the hope that it will be useful, *
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
14 * GNU General Public License for more details. *
16 * You should have received a copy of the GNU General Public License *
17 * along with this program; if not, write to the Free Software *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
24 class ListeReq
extends Validate
40 public $rules = "Refuser les listes de binets si elles ne sont pas datées (oui : apv2002@, non : apv@).
41 Refuser également des listes qui pourraient nous servir (admin, postmaster…)";
45 public function __construct(User
$_user, $_asso, $_liste, $_domain, $_desc, $_advertise,
46 $_modlevel, $_inslevel, $_owners, $_members, $_stamp = 0)
48 parent
::__construct($_user, false
, 'liste', $_stamp);
51 $this->liste
= $_liste;
52 $this->domain
= $_domain;
54 $this->advertise
= $_advertise;
55 $this->modlevel
= $_modlevel;
56 $this->inslevel
= $_inslevel;
57 $this->owners
= $_owners;
58 $this->members
= $_members;
62 // {{{ function formu()
64 public function formu()
66 return 'include/form.valid.listes.tpl';
70 // {{{ function editor()
72 public function editor()
74 return 'include/form.valid.edit-listes.tpl';
78 // {{{ function handle_editor()
80 protected function handle_editor()
84 if (Env
::has('listname')) {
85 $this->liste
= Post
::t('listname');
87 if (Env
::has('domainname')) {
88 $this->domain
= Post
::t('domainname');
90 if (Env
::has('assotype')) {
91 $this->asso
= Post
::t('assotype');
94 $this->domain
= $globals->mail
->domain
;
96 foreach ($this->owners
as $key => &$email) {
97 $email = Post
::t('owners_' . $key);
99 foreach ($this->members
as $key => &$email) {
100 $email = Post
::t('members_' . $key);
106 // {{{ function _mail_subj
108 protected function _mail_subj()
110 return "[Polytechnique.org/LISTES] Demande de la liste {$this->liste}@{$this->domain}";
114 // {{{ function _mail_body
116 protected function _mail_body($isok)
119 return " Suite à ta demande de création de liste de diffusion, nous avons créé l'adresse {$this->liste}@{$this->domain}, qui est maintenant à ta disposition.";
121 return " La demande que tu avais faite pour la liste de diffusion {$this->liste}@{$this->domain} a été refusée.";
126 // {{{ function commit()
128 public function commit()
130 require_once 'emails.inc.php';
132 if ($this->asso
== 'alias') {
133 foreach ($this->members
as $member) {
134 add_to_list_alias($member, $this->liste
, $this->domain
);
137 $members = User
::getBulkForlifeEmails($this->members
, true
,
138 array('ListsModule', 'no_login_callback'));
139 $owners = User
::getBulkForlifeEmails($this->owners
, true
,
140 array('ListsModule', 'no_login_callback'));
142 // Make sure we send a list (array_values) of unique (array_unique)
144 $owners = array_values(array_unique($owners));
145 $members = array_values(array_unique($members));
147 $success = MailingList
::create($this->liste
, $this->domain
, S
::user(),
148 $this->desc
, $this->advertise
,
149 $this->modlevel
, $this->inslevel
,
153 create_list($this->liste
, $this->domain
);
164 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker fenc=utf-8: