X-Git-Url: http://git.polytechnique.org/?a=blobdiff_plain;f=modules%2Faxletter.php;h=7c8c936e7678b4c091c65b2b6117fe8eb14545cc;hb=ceb2a271a647d92967fa0f0810181b06733d3472;hp=4926ddb72b652ca130047120353d85b5ef5b1f7a;hpb=8da0d3c16b9acf8d83318e45d635b1cd17e98dd6;p=platal.git
diff --git a/modules/axletter.php b/modules/axletter.php
index 4926ddb..7c8c936 100644
--- a/modules/axletter.php
+++ b/modules/axletter.php
@@ -25,15 +25,30 @@ class AXLetterModule extends PLModule
{
return array(
'ax' => $this->make_hook('index', AUTH_COOKIE),
+ 'ax/out' => $this->make_hook('out', AUTH_PUBLIC),
'ax/show' => $this->make_hook('show', AUTH_COOKIE),
'ax/edit' => $this->make_hook('submit', AUTH_MDP),
'ax/edit/cancel' => $this->make_hook('cancel', AUTH_MDP),
'ax/edit/valid' => $this->make_hook('valid', AUTH_MDP),
- 'admin/axletter/rights' => $this->make_hook('admin_rights', AUTH_MDP, 'admin'),
+ 'admin/axletter' => $this->make_hook('admin', AUTH_MDP, 'admin'),
);
}
- function handler_index(&$page, $action = null, $hash = null)
+ function handler_out(&$page, $hash = null)
+ {
+ if (!$hash) {
+ if (!S::logged()) {
+ return PL_DO_AUTH;
+ } else {
+ return $this->handler_index($page, 'out');
+ }
+ }
+ require_once dirname(__FILE__) . '/axletter/axletter.inc.php';
+ $page->changeTpl('axletter/unsubscribe.tpl');
+ $page->assign('success', AXLetter::unsubscribe($hash, true));
+ }
+
+ function handler_index(&$page, $action = null)
{
require_once dirname(__FILE__) . '/axletter/axletter.inc.php';
@@ -41,18 +56,15 @@ class AXLetterModule extends PLModule
$page->assign('xorg_title','Polytechnique.org - Envois de l\'AX');
switch ($action) {
- case 'out': AXLetter::unsubscribe($hash); break;
case 'in': AXLetter::subscribe(); break;
- default: ;
+ case 'out': AXLetter::unsubscribe(); break;
}
$perm = AXLetter::hasPerms();
if ($perm) {
- $waiting = AXLetter::awaiting();
- if ($waiting) {
- $new = new AXLetter($waiting);
- $page->assign('new', $new);
- }
+ $res = XDB::query("SELECT * FROM axletter_ins");
+ $page->assign('count', $res->numRows());
+ $page->assign('new', AXLetter::awaiting());
}
$page->assign('axs', AXLetter::subscriptionState());
$page->assign('ax_list', AXLetter::listSent());
@@ -118,13 +130,13 @@ class AXLetterModule extends PLModule
$page->trig("L'annonce doit avoir un nom raccourci pour simplifier la navigation dans les archives");
Post::kill('valid');
} elseif (!preg_match('/^[a-z][-a-z0-9]*[a-z0-9]$/', $shortname)) {
- $page->trig("Le nom raccourci n'est pas valide, il doit comporter au moins 2 caractères et n'être composé "
+ $page->trig("Le nom raccourci n'est pas valide, il doit comporter au moins 2 caractères et n'être composé "
. "que de chiffres, lettres et tirets");
Post::kill('valid');
} elseif ($shortname != Post::v('old_shortname')) {
$res = XDB::query("SELECT id FROM axletter WHERE shortname = {?}", $shortname);
if ($res->numRows() && $res->fetchOneCell() != $id) {
- $page->trig("Le nom $shortname est déjà utilisé, merci d'en choisir un autre");
+ $page->trig("Le nom $shortname est déjà utilisé, merci d'en choisir un autre");
$shortname = Post::v('old_shortname');
if (empty($shortname)) {
Post::kill('valid');
@@ -133,7 +145,7 @@ class AXLetterModule extends PLModule
}
switch (@Post::v('valid')) {
- case 'Aperçu':
+ case 'Aperçu':
require_once dirname(__FILE__) . '/axletter/axletter.inc.php';
$al = new AXLetter(array($id, $shortname, $subject, $title, $body, $signature,
$promo_min, $promo_max, $echeance, 0, 'new'));
@@ -145,6 +157,32 @@ class AXLetterModule extends PLModule
SET id = {?}, shortname = {?}, subject = {?}, title = {?}, body = {?},
signature = {?}, promo_min = {?}, promo_max = {?}, echeance = {?}",
$id, $shortname, $subject, $title, $body, $signature, $promo_min, $promo_max, $echeance);
+ if (!$saved) {
+ $mailer = new PlMailer();
+ $mailer->setFrom("support@" . $globals->mail->domain);
+ $mailer->setSubject("Un nouveau projet de mail de l'AX vient d'être proposé");
+ $mailer->setTxtBody("Un nouveau mail vient d'être rédigé en prévision d'un envoi prochain. Vous pouvez "
+ . "le modifier jusqu'à ce qu'il soit verrouillé pour l'envoi\n\n"
+ . "Le sujet du mail : $subject\n"
+ . "L'échéance d'envoi est fixée à $echeance.\n"
+ . "Le mail pourra néanmoins partir avant cette échéance si un administrateur de "
+ . "Polytechnique.org le valide.\n\n"
+ . "Pour modifier, valider ou annuler le mail :\n"
+ . "https://www.polytechnique.org/ax/edit\n"
+ . "-- \n"
+ . "Association Polytechnique.org\n");
+ $res = XDB::iterRow("SELECT IF(u.nom_usage != '', u.nom_usage, u.nom) AS nom,
+ u.prenom, a.alias AS bestalias
+ FROM axletter_rights AS ar
+ INNER JOIN auth_user_md5 AS u USING(user_id)
+ INNER JOIN aliases AS a ON (u.user_id = a.id
+ AND FIND_IN_SET('bestalias', a.flags))");
+ global $globals;
+ while (list($nom, $prenom, $alias) = $res->next()) {
+ $mailer->addTo("$nom $prenom <$alias@{$globals->mail->domain}>");
+ }
+ $mailer->send();
+ }
$saved = true;
$echeance_date = null;
$echeance_time = null;
@@ -169,23 +207,6 @@ class AXLetterModule extends PLModule
if (!$saved) {
$select = '';
- $time = time() + 3600 * 24 * 2;
- for ($i = 0 ; $i < 15 ; $i++) {
- $time += 3600 * 24;
- $p_stamp = date('Ymd', $time);
- $year = date('Y', $time);
- $month = date('m', $time);
- $day = date('d', $time);
-
- if ($p_stamp == $echeance_date) {
- $sel = ' selected="selected"';
- } else {
- $sel = '';
- }
- $select .= "\n";
- }
- $page->assign('echeance_date', $select);
- $select = '';
for ($i = 0 ; $i < 24 ; $i++) {
$stamp = sprintf('%02d:00:00', $i);
if ($stamp == $echeance_time) {
@@ -196,7 +217,7 @@ class AXLetterModule extends PLModule
$select .= "\n";
}
$page->assign('echeance_time', $select);
- }
+ }
}
function handler_cancel(&$page, $force = null)
@@ -211,18 +232,17 @@ class AXLetterModule extends PLModule
return PL_FORBIDDEN;
}
- $waiting = AXLetter::awaiting();
- if (!$waiting) {
+ $al = AXLetter::awaiting();
+ if (!$alg) {
$page->kill("Aucune lettre en attente");
return;
}
- $al = new AXLetter($waiting);
if (!$al->invalid()) {
$page->kill("Une erreur est survenue lors de l'annulation de l'envoi");
return;
}
- $page->kill("L'envoi de l'annonce {$al->title()} est annulé");
+ $page->kill("L'envoi de l'annonce {$al->title()} est annulé");
}
function handler_valid(&$page, $force = null)
@@ -237,12 +257,11 @@ class AXLetterModule extends PLModule
return PL_FORBIDDEN;
}
- $waiting = AXLetter::awaiting();
- if (!$waiting) {
+ $al = AXLetter::awaiting();
+ if (!$al) {
$page->kill("Aucune lettre en attente");
return;
}
- $al = new AXLetter($waiting);
if (!$al->valid()) {
$page->kill("Une erreur est survenue lors de la validation de l'envoi");
return;
@@ -268,6 +287,97 @@ class AXLetterModule extends PLModule
S::v('mail_fmt') != 'texte');
}
}
+
+ function handler_admin(&$page, $action = null, $uid = null)
+ {
+ require_once dirname(__FILE__) . '/axletter/axletter.inc.php';
+ if (Post::has('action')) {
+ $action = Post::v('action');
+ $uid = Post::v('uid');
+ }
+ if ($uid) {
+ $uids = preg_split('/ *[,;\: ] */', $uid);
+ foreach ($uids as $uid) {
+ switch ($action) {
+ case 'add':
+ $res = AXLetter::grantPerms($uid);
+ break;
+ case 'del';
+ $res = AXLetter::revokePerms($uid);
+ break;
+ }
+ if (!$res) {
+ $page->trig("Personne ne oorrespond à l'identifiant '$uid'");
+ }
+ }
+ }
+
+ $page->changeTpl('axletter/admin.tpl');
+ $res = XDB::iterator("SELECT IF(u.nom_usage != '', u.nom_usage, u.nom) AS nom,
+ u.prenom, u.promo, a.alias AS forlife
+ FROM axletter_rights AS ar
+ INNER JOIN auth_user_md5 AS u USING(user_id)
+ INNER JOIN aliases AS a ON (u.user_id = a.id AND a.type = 'a_vie')");
+ $page->assign('admins', $res);
+
+ $importer = new CSVImporter('axletter_ins');
+ $importer->registerFunction('user_id', 'email vers Id X.org', array($this, 'idFromMail'));
+ $importer->forceValue('hash', array($this, 'createHash'));
+ $importer->apply($page, "admin/axletter", array('user_id', 'email', 'prenom', 'nom', 'promo', 'flag', 'hash'));
+ }
+
+ function idFromMail($line, $key)
+ {
+ static $field;
+ global $globals;
+ if (!isset($field)) {
+ $field = array('email', 'mail', 'login', 'bestalias', 'forlife', 'flag');
+ foreach ($field as $fld) {
+ if (isset($line[$fld])) {
+ $field = $fld;
+ break;
+ }
+ }
+ }
+ $email = $line[$field];
+ if (strpos($email, '@') === false) {
+ $user = $email;
+ $domain = $globals->mail->domain2;
+ } else {
+ list($user, $domain) = explode('@', $email);
+ }
+ if ($domain != $globals->mail->domain && $domain != $globals->mail->domain2
+ && $domain != $globals->mail->alias_dom && $domain != $globals->mail->alias_dom2) {
+ $res = XDB::query("SELECT uid FROM emails WHERE email = {?}", $email);
+ if ($res->numRows() == 1) {
+ return $res->fetchOneCell();
+ }
+ return '0';
+ }
+ list($user) = explode('+', $user);
+ list($user) = explode('_', $user);
+ if ($domain == $globals->mail->alias_dom || $domain == $globals->mail->alias_dom2) {
+ $res = XDB::query("SELECT a.id
+ FROM virtual AS v
+ INNER JOIN virtual_redirect AS r USING(vid)
+ INNER JOIN aliases AS a ON (a.type = 'a_vie'
+ AND r.redirect = CONCAT(a.alias, '@{$globals->mail->domain2}'))
+ WHERE v.alias = CONCAT({?}, '@{$globals->mail->alias_dom}')", $user);
+ $id = $res->fetchOneCell();
+ return $id ? $id : '0';
+ }
+ $res = XDB::query("SELECT id FROM aliases WHERE alias = {?}", $user);
+ $id = $res->fetchOneCell();
+ return $id ? $id : '0';
+ }
+
+ function createHash($line, $key)
+ {
+ $hash = implode(time(), $line) . rand();
+ $hash = md5($hash);
+ return $hash;
+ }
}
+// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
?>