2 /***************************************************************************
3 * Copyright (C) 2003-2008 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 require_once("xorg.misc.inc.php");
24 // {{{ class MassMailer
26 abstract class MassMailer
40 protected $_subscriptionTable;
42 function __construct($tpl, $css, $prefix, $tbl, $stbl)
46 $this->_prefix
= $prefix;
48 $this->_subscriptionTable
= $stbl;
53 return is_null($this->_shortname
) ?
$this->_id
: $this->_shortname
;
56 private function selectId($where)
58 $res = XDB
::query("SELECT IF (n.short_name IS NULL, n.id, n.short_name)
59 FROM {$this->_table} AS n
60 WHERE n.bits != 'new' AND {$where}
62 if ($res->numRows() != 1) {
65 return $res->fetchOneCell();
68 public function prev()
72 $val = $this->selectId("n.id < {$this->_id} ORDER BY n.id DESC");
77 public function next()
81 $val = $this->selectId("n.id > {$this->_id} ORDER BY n.id");
86 public function last()
90 $res = XDB
::query("SELECT MAX(n.id)
91 FROM {$this->_table} AS n
92 WHERE n.bits != 'new' AND n.id > {?}",
94 if ($res->numRows() != 1) {
97 $val = $res->fetchOneCell();
103 public function title($mail = false
)
105 return $mail ?
$this->_title_mail
: $this->_title
;
108 public function head($prenom = null
, $nom = null
, $sexe = null
, $type = 'text')
110 if (is_null($prenom)) {
113 $head = $this->_head
;
114 $head = str_replace('<cher>', $sexe ?
'Chère' : 'Cher', $head);
115 $head = str_replace('<prenom>', $prenom, $head);
116 $head = str_replace('<nom>', $nom, $head);
117 return format_text($head, $type, 2, 64);
121 public function css(&$page = null
)
123 if (!is_null($page)) {
124 $page->addCssLink($this->_css
);
127 $css = file_get_contents(dirname(__FILE__
) . '/../htdocs/css/' . $this->_css
);
128 return preg_replace('@/\*.*?\*/@us', '', $css);
132 public function toText(&$page, $prenom, $nom, $sexe)
135 $page->assign('is_mail', false
);
136 $page->assign('mail_part', 'text');
137 $page->assign('prenom', $prenom);
138 $page->assign('nom', $nom);
139 $page->assign('sexe', $sexe);
140 $this->assignData($page);
143 public function toHtml(&$page, $prenom, $nom, $sexe)
146 $page->assign('prefix', $this->_prefix
. '/' . $this->id());
147 $page->assign('is_mail', false
);
148 $page->assign('mail_part', 'html');
149 $page->assign('prenom', $prenom);
150 $page->assign('nom', $nom);
151 $page->assign('sexe', $sexe);
152 $this->assignData($page);
155 private function createHash($line, $key = null
)
157 $hash = implode(time(), $line) . rand();
162 public function sendTo($prenom, $nom, $login, $sexe, $html, $hash = 0)
166 if (strpos($login, '@') === false
) {
167 $login = "$login@{$globals->mail->domain}";
169 require_once('user.func.inc.php');
170 $forlife = get_user_forlife($login, '_silent_user_callback');
174 if (strpos($alias, '@') === false
&& (is_null($hash) ||
$hash == 0)) {
176 $hash = $this->createHash(array($prenom, $nom, $login, $sexe, $html, rand(), "X.org rulez"));
177 XDB
::query("UPDATE {$this->_subscriptionTable} as ni
178 INNER JOIN aliases AS a ON (ni.user_id = a.id)
180 WHERE ni.user_id != 0 AND a.alias = {?}",
184 $mailer = new PlMailer($this->_tpl
);
185 $this->assignData($mailer);
186 $mailer->assign('is_mail', true
);
187 $mailer->assign('prenom', $prenom);
188 $mailer->assign('nom', $nom);
189 $mailer->assign('sexe', $sexe);
190 $mailer->assign('prefix', null
);
191 $mailer->assign('hash', $hash);
192 $mailer->assign('email', $login);
193 $mailer->assign('alias', $alias);
194 $mailer->addTo("\"$prenom $nom\" <$login>");
195 $mailer->send($html);
198 protected function getAllRecipients()
201 return "SELECT u.user_id, CONCAT(a.alias, '@{$globals->mail->domain}'),
202 u.prenom, IF(u.nom_usage='', u.nom, u.nom_usage),
203 FIND_IN_SET('femme', u.flags),
204 q.core_mail_fmt AS pref, ni.hash AS hash
205 FROM {$this->_subscriptionTable} AS ni
206 INNER JOIN auth_user_md5 AS u USING(user_id)
207 INNER JOIN auth_user_quick AS q ON(q.user_id = u.user_id)
208 INNER JOIN aliases AS a ON(u.user_id=a.id AND FIND_IN_SET('bestalias',a.flags))
209 LEFT JOIN emails AS e ON(e.uid=u.user_id AND e.flags='active')
210 WHERE ni.last < {?} AND ({$this->subscriptionWhere()}) AND
211 (e.email IS NOT NULL OR FIND_IN_SET('googleapps', u.mail_storage))
215 public function sendToAll()
218 $query = $this->getAllRecipients() . " LIMIT {?}";
220 $res = XDB
::iterRow($query, $this->_id
, 60);
221 if (!$res->total()) {
225 while (list($uid, $bestalias, $prenom, $nom, $sexe, $fmt, $hash) = $res->next()) {
226 $sent[] = "(user_id='$uid'" . (!$uid ?
" AND email='$bestalias')": ')');
227 $this->sendTo($prenom, $nom, $bestalias, $sexe, $fmt=='html', $hash);
229 XDB
::execute("UPDATE {$this->_subscriptionTable}
231 WHERE " . implode(' OR ', $sent), $this->_id
);
237 abstract protected function assignData(&$smarty);
238 abstract protected function setSent();
240 abstract protected function subscriptionWhere();
246 function format_text($input, $format, $indent = 0, $width = 68)
248 if ($format == 'text') {
249 return MiniWiki
::WikiToText($input, true
, $indent, $width, "title");
251 return MiniWiki
::WikiToHTML($input, "title");
254 // function enriched_to_text($input,$html=false,$just=false,$indent=0,$width=68)
258 // vim:set et sw=4 sts=4 sws=4 enc=utf-8: