2 /***************************************************************************
3 * Copyright (C) 2003-2011 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 ***************************************************************************/
22 // {{{ class HomonymeReq
24 class HomonymeReq
extends Validate
30 public $warning = true
;
32 public $homonymes_hruid;
34 public $rules = "Accepter, sauf cas particulier d'utilisateur dont l'homonymie est traité plus … manuellement.";
39 public function __construct(User
$_user, $_loginbis, $_homonymes_hruid, $warning=true
)
41 $this->warning
= $warning;
43 parent
::__construct($_user, true
, $this->title());
45 $this->refuse
= false
;
46 $this->loginbis
= $_loginbis;
47 $this->homonymes_hruid
= $_homonymes_hruid;
53 private function title()
55 return ($this->warning ?
'alerte alias' : 'robot répondeur');
59 // {{{ function formu()
61 public function formu()
63 return 'include/form.valid.homonymes.tpl';
67 // {{{ function _mail_subj
69 protected function _mail_subj()
72 return "[Polytechnique.org/Support] "
73 . ($this->warning ?
"Dans une semaine : suppression de l'alias " : "Mise en place du robot")
74 . " $loginbis@" . $globals->mail
->domain
;
78 // {{{ function _mail_body
80 protected function _mail_body($isok)
85 Comme nous t'en avons informé par email il y a quelques temps,
86 pour respecter nos engagements en terme d'adresses email devinables,
87 tu te verras bientôt retirer l'alias ".$this->loginbis
."@".$globals->mail
->domain
." pour
88 ne garder que " . $this->user
->forlifeEmail() . ".
90 Toute personne qui écrira à ".$this->loginbis
."@".$globals->mail
->domain
." recevra la
91 réponse d'un robot qui l'informera que ".$this->loginbis
."@".$globals->mail
->domain
."
92 est ambigu pour des raisons d'homonymie et signalera ton email exact.";
96 // {{{ function sendmail()
98 protected function sendmail($isok)
100 if (!$isok) return false
;
102 $mailer = new PlMailer
;
103 $cc = "support+homonyme@" . $globals->mail
->domain
;
104 $from = "\"Support Polytechnique.org\" <$cc>";
105 $mailer->setSubject($this->_mail_subj());
106 $mailer->setFrom($from);
107 $mailer->addTo("\"{$this->user->fullName()}\" <{$this->user->bestEmail()}>");
110 $body = $this->user
->displayName() . ",\n\n"
111 . $this->_mail_body($isok)
112 . (Env
::has('comm') ?
"\n\n".Env
::v('comm') : '')
113 . "\n\nCordialement,\n\n-- \nL'équipe de Polytechnique.org\n";
115 $mailer->setTxtBody(wordwrap($body));
119 // {{{ function commit()
121 public function commit()
123 Platal
::load('admin', 'homonyms.inc.php');
124 if (!$this->warning
) {
126 require_once 'emails.inc.php';
128 XDB
::execute('DELETE e
129 FROM email_source_account AS e
130 INNER JOIN email_virtual_domains AS d ON (e.domain = d.id)
131 WHERE e.email = {?} AND d.name = {?}',
132 $this->loginbis
, $globals->mail
->domain
);
133 XDB
::execute('INSERT INTO email_source_other (hrmid, email, domain, type, expire)
134 SELECT CONCAT(\'h.\', {?}, \'.\', {?}), {?}, id, \'homonym\', NOW()
135 FROM email_virtual_domains
137 $this->loginbis
, $globals->mail
->domain
, $this->loginbis
, $globals->mail
->domain
);
138 XDB
::execute('INSERT IGNORE INTO homonyms_list (hrmid, uid)
140 'h.' . $this->loginbis
. '.' . $globals->mail
->domain
, $this->user
->id());
141 fix_bestalias($this->user
);
152 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: