+ $nl->sendTo(S::v('prenom'), S::v('nom'),
+ S::v('bestalias'), S::v('femme'),
+ S::v('mail_fmt') != 'texte');
+ }
+ }
+
+ function handler_nl_submit(&$page)
+ {
+ $page->changeTpl('newsletter/submit.tpl');
+
+ require_once 'newsletter.inc.php';
+
+ if (Post::has('see')) {
+ $art = new NLArticle(Post::v('title'), Post::v('body'), Post::v('append'));
+ $page->assign('art', $art);
+ } elseif (Post::has('valid')) {
+ require_once('validations.inc.php');
+ $art = new NLReq(S::v('uid'), Post::v('title'),
+ Post::v('body'), Post::v('append'));
+ $art->submit();
+ $page->assign('submited', true);
+ }
+ }
+
+ function handler_admin_events(&$page, $action = 'list', $eid = null)
+ {
+ $page->changeTpl('admin/evenements.tpl');
+ $page->assign('xorg_title','Polytechnique.org - Administration - Evenements');
+ $page->register_modifier('hde', 'html_entity_decode');
+
+ $arch = $action == 'archives';
+ $page->assign('action', $action);
+
+ if (Post::v('action') == "Proposer" && $eid) {
+ $promo_min = Post::i('promo_min');
+ $promo_max = Post::i('promo_max');
+ if ($promo_min > $promo_max ||
+ ($promo_min != 0 && ($promo_min <= 1900 || $promo_min >= 2020)) ||
+ ($promo_max != 0 && ($promo_max <= 1900 || $promo_max >= 2020)))
+ {
+ $page->trig("L'intervalle de promotions $promo_min -> $promo_max n'est pas valide");
+ $action = 'edit';
+ } else {
+ XDB::execute('UPDATE evenements
+ SET titre={?}, texte={?}, peremption={?}, promo_min={?}, promo_max={?}
+ WHERE id = {?}',
+ Post::v('titre'), Post::v('texte'), Post::v('peremption'),
+ Post::v('promo_min'), Post::v('promo_max'), $eid);
+ }
+ }
+
+ if ($action == 'edit') {
+ $res = XDB::query('SELECT titre, texte, peremption, promo_min, promo_max
+ FROM evenements
+ WHERE id={?}', $eid);
+ list($titre, $texte, $peremption, $promo_min, $promo_max) = $res->fetchOneRow();
+ $page->assign('titre',$titre);
+ $page->assign('texte',$texte);
+ $page->assign('promo_min',$promo_min);
+ $page->assign('promo_max',$promo_max);
+ $page->assign('peremption',$peremption);
+
+ $select = "";
+ for ($i = 1 ; $i < 30 ; $i++) {
+ $p_stamp=date("Ymd",time()+3600*24*$i);
+ $year=substr($p_stamp,0,4);
+ $month=substr($p_stamp,4,2);
+ $day=substr($p_stamp,6,2);
+
+ $select .= "<option value=\"$p_stamp\""
+ . (($p_stamp == strtr($peremption, array("-" => ""))) ? " selected" : "")
+ . "> $day / $month / $year</option>\n";
+ }
+ $page->assign('select',$select);
+ } else {
+ switch ($action) {
+ case 'delete':
+ XDB::execute('DELETE from evenements
+ WHERE id = {?}', $eid);
+ break;
+
+ case "archive":
+ XDB::execute('UPDATE evenements
+ SET creation_date = creation_date, flags = CONCAT(flags,",archive")
+ WHERE id = {?}', $eid);
+ break;
+
+ case "unarchive":
+ XDB::execute('UPDATE evenements
+ SET creation_date = creation_date, flags = REPLACE(flags,"archive","")
+ WHERE id = {?}', $eid);
+ $action = 'archives';
+ $arch = true;
+ break;
+
+ case "valid":
+ XDB::execute('UPDATE evenements
+ SET creation_date = creation_date, flags = CONCAT(flags,",valide")
+ WHERE id = {?}', $eid);
+ break;
+
+ case "unvalid":
+ XDB::execute('UPDATE evenements
+ SET creation_date = creation_date, flags = REPLACE(flags,"valide", "")
+ WHERE id = {?}', $eid);
+ break;
+ }
+
+ $pid = ($eid && $action == 'preview') ? $eid : -1;
+ $sql = "SELECT e.id, e.titre, e.texte,e.id = $pid AS preview,
+ DATE_FORMAT(e.creation_date,'%d/%m/%Y %T') AS creation_date,
+ DATE_FORMAT(e.peremption,'%d/%m/%Y') AS peremption,
+ e.promo_min, e.promo_max,
+ FIND_IN_SET('valide', e.flags) AS fvalide,
+ FIND_IN_SET('archive', e.flags) AS farch,
+ u.promo, u.nom, u.prenom, a.alias AS forlife
+ FROM evenements AS e
+ INNER JOIN auth_user_md5 AS u ON(e.user_id = u.user_id)
+ INNER JOIN aliases AS a ON (u.user_id = a.id AND a.type='a_vie')
+ WHERE ".($arch ? "" : "!")."FIND_IN_SET('archive',e.flags)
+ ORDER BY FIND_IN_SET('valide',e.flags), e.peremption DESC";
+ $page->assign('evs', XDB::iterator($sql));