Add a generic hash capability to the newsletter.
[platal.git] / modules / core.php
1 <?php
2 /***************************************************************************
3 * Copyright (C) 2003-2008 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
5 * *
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. *
10 * *
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. *
15 * *
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 *
18 * Foundation, Inc., *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
21
22 class CoreModule extends PLModule
23 {
24 function handlers()
25 {
26 return array(
27 '403' => $this->make_hook('403', AUTH_PUBLIC),
28 '404' => $this->make_hook('404', AUTH_PUBLIC),
29 'login' => $this->make_hook('login', AUTH_COOKIE),
30 'send_bug' => $this->make_hook('bug', AUTH_COOKIE),
31 'purge_cache' => $this->make_hook('purge_cache', AUTH_COOKIE, 'admin'),
32 'kill_sessions' => $this->make_hook('kill_sessions', AUTH_COOKIE, 'admin'),
33 'get_rights' => $this->make_hook('get_rights', AUTH_MDP, 'admin'),
34
35 'wiki_help' => $this->make_hook('wiki_help', AUTH_PUBLIC),
36 'wiki_preview' => $this->make_hook('wiki_preview', AUTH_COOKIE, 'user', NO_AUTH),
37
38 'valid.html' => $this->make_hook('valid', AUTH_PUBLIC),
39 'favicon.ico' => $this->make_hook('favicon', AUTH_PUBLIC),
40 );
41 }
42
43 function handler_valid(&$page)
44 {
45 readfile($page->compile_dir.'/valid.html');
46 exit;
47 }
48
49 function handler_403(&$page)
50 {
51 global $globals;
52 header($_SERVER['SERVER_PROTOCOL'] . ' 403 Forbidden');
53 $page->changeTpl('core/403.tpl');
54 }
55
56 function handler_404(&$page)
57 {
58 global $globals, $platal;
59 header($_SERVER['SERVER_PROTOCOL'] . ' 404 Not Found');
60 $page->changeTpl('core/404.tpl');
61 $page->assign('near', $platal->near_hook());
62 }
63
64 function handler_login(&$page)
65 {
66 $allkeys = func_get_args();
67 unset($allkeys[0]);
68 $url = join('/',$allkeys);
69 pl_redirect($url);
70 }
71
72 function handler_favicon(&$page)
73 {
74 $data = file_get_contents(dirname(__FILE__).'/../htdocs/images/favicon.ico');
75 header('Content-Type: image/x-icon');
76 echo $data;
77 exit;
78 }
79
80 function handler_purge_cache(&$page)
81 {
82 require_once 'wiki.inc.php';
83
84 $page->clear_compiled_tpl();
85 wiki_clear_all_cache();
86
87 http_redirect(empty($_SERVER['HTTP_REFERER']) ? './' : $_SERVER['HTTP_REFERER']);
88 }
89
90 function handler_kill_sessions(&$page)
91 {
92 kill_sessions();
93 }
94
95 function handler_get_rights(&$page, $level)
96 {
97 if (S::has('suid')) {
98 $page->kill('Déjà en SUID');
99 }
100
101 if (isset($_SESSION['log'])) {
102 $_SESSION['log']->log("suid_start", "login by ".S::v('forlife'));
103 }
104 $_SESSION['suid'] = $_SESSION;
105 $_SESSION['perms'] =& XorgSession::make_perms($level);
106
107 pl_redirect('/');
108 }
109
110 function handler_bug(&$page)
111 {
112 global $globals;
113 $page->changeTpl('core/bug.tpl', SIMPLE);
114 $page->addJsLink('close_on_esc.js');
115 if (Env::has('send') && trim(Env::v('detailed_desc'))) {
116 $body = wordwrap(Env::v('detailed_desc'), 78) . "\n\n"
117 . "----------------------------\n"
118 . "Page : " . Env::v('page') . "\n\n"
119 . "Utilisateur : " . S::v('forlife') . "\n"
120 . "Navigateur : " . $_SERVER['HTTP_USER_AGENT'] . "\n"
121 . "Skin : " . S::v('skin') . "\n";
122 $page->assign('bug_sent',1);
123 $mymail = new PlMailer();
124 $mymail->setFrom('"'.S::v('prenom').' '.S::v('nom').'" <'.S::v('bestalias').'@' . $globals->mail->domain . '>');
125 $mymail->addTo('support+platal@' . $globals->mail->domain);
126 $mymail->addCc('"'.S::v('prenom').' '.S::v('nom').'" <'.S::v('bestalias').'@' . $globals->mail->domain . '>');
127 $mymail->setSubject('Plat/al '.Env::v('task_type').' : '.Env::v('item_summary'));
128 $mymail->setTxtBody($body);
129 $mymail->send();
130 } elseif (Env::has('send')) {
131 $page->trig("Merci de remplir une explication du problème rencontré");
132 }
133 }
134
135 function handler_wiki_help(&$page, $action = 'title')
136 {
137 $page->changeTpl('core/wiki.help.tpl', SIMPLE);
138 $page->assign('wiki_help', MiniWiki::help($action == 'title'));
139 }
140
141 /// Shared handler for wiki syntax result preview
142 function handler_wiki_preview(&$page, $action = 'title')
143 {
144 header('Content-Type: text/html; charset=utf-8');
145 $text = Get::v('text');
146 echo MiniWiki::wikiToHtml($text, $action == 'title');
147 exit;
148 }
149 }
150
151 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
152 ?>