Removes compatibility with non-hruid code (please use core-1.0.0 for non-hruid-compat...
[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 'sql_errors' => $this->make_hook('sqlerror', AUTH_COOKIE, 'admin'),
34 'get_rights' => $this->make_hook('get_rights', AUTH_MDP, 'admin'),
35
36 'wiki_help' => $this->make_hook('wiki_help', AUTH_PUBLIC),
37 'wiki_preview' => $this->make_hook('wiki_preview', AUTH_COOKIE, 'user', NO_AUTH),
38
39 'valid.html' => $this->make_hook('valid', AUTH_PUBLIC),
40 'favicon.ico' => $this->make_hook('favicon', AUTH_PUBLIC),
41 'robots.txt' => $this->make_hook('robotstxt', AUTH_PUBLIC, 'user', NO_HTTPS),
42 );
43 }
44
45 function handler_valid(&$page)
46 {
47 readfile($page->compile_dir.'/valid.html');
48 exit;
49 }
50
51 function handler_403(&$page)
52 {
53 global $globals;
54 header($_SERVER['SERVER_PROTOCOL'] . ' 403 Forbidden');
55 $page->trigError('Tu n\'as pas les permissions nécessaires pour accéder à cette page.');
56 $page->coreTpl('403.tpl');
57 }
58
59 function handler_404(&$page)
60 {
61 global $globals, $platal;
62 header($_SERVER['SERVER_PROTOCOL'] . ' 404 Not Found');
63 $page->coreTpl('404.tpl');
64 $page->assign('near', $platal->near_hook());
65 $page->trigError('Cette page n\'existe pas !!!');
66 }
67
68 function handler_login(&$page)
69 {
70 $allkeys = func_get_args();
71 unset($allkeys[0]);
72 $url = join('/',$allkeys);
73 pl_redirect($url);
74 }
75
76 function handler_favicon(&$page)
77 {
78 $data = file_get_contents(dirname(__FILE__).'/../htdocs/images/favicon.ico');
79 header('Content-Type: image/x-icon');
80 echo $data;
81 exit;
82 }
83
84 function handler_robotstxt(&$page)
85 {
86 global $globals;
87
88 $disallowed_uris = array();
89 if ($globals->core->restricted_platal) {
90 $disallowed_uris[] = '/';
91 } else if (!empty($globals->core->robotstxt_disallowed_uris)) {
92 $disallowed_uris = preg_split('/[\s,]+/',
93 $globals->core->robotstxt_disallowed_uris,
94 -1, PREG_SPLIT_NO_EMPTY);
95 }
96
97 if (count($disallowed_uris) > 0) {
98 header('Content-Type: text/plain');
99 echo "User-agent: *\n";
100 foreach ($disallowed_uris as $uri) {
101 echo "Disallow: $uri\n";
102 }
103 exit;
104 }
105 return PL_NOT_FOUND;
106 }
107
108 function handler_purge_cache(&$page)
109 {
110 S::assert_xsrf_token();
111
112 $page->clear_compiled_tpl();
113 PlWikiPage::clearCache();
114
115 http_redirect(empty($_SERVER['HTTP_REFERER']) ? './' : $_SERVER['HTTP_REFERER']);
116 }
117
118 function handler_kill_sessions(&$page)
119 {
120 kill_sessions();
121 }
122
123 function handler_get_rights(&$page, $level)
124 {
125 if (S::has('suid')) {
126 $page->kill('Déjà en SUID');
127 }
128
129 if (isset($_SESSION['log'])) {
130 S::logger()->log("suid_start", "login by " . S::user()->login());
131 }
132 Platal::session()->startSUID(S::i('uid'));
133 Platal::session()->makePerms($level);
134
135 pl_redirect('/');
136 }
137
138 function handler_bug(&$page)
139 {
140 global $globals;
141
142 if (empty($_SERVER['HTTP_REFERER'])) {
143 // We don't have a valid referer, we need to use the url
144 list($currentPage, $location) = explode('//', $_SERVER['REQUEST_URI'], 2);
145
146 $location = 'http'.(empty($_SERVER['HTTPS']) ? '' : 's').'://'.$_SERVER['SERVER_NAME'].'/'.$location;
147 } else {
148 $location = $_SERVER['HTTP_REFERER'];
149 }
150
151 $page->coreTpl('bug.tpl', SIMPLE);
152 $page->assign('location', $location);
153 $page->addJsLink('close_on_esc.js');
154
155 if (Env::has('send') && trim(Env::v('detailed_desc'))) {
156 S::assert_xsrf_token();
157
158 $body = wordwrap(Env::v('detailed_desc'), 78) . "\n\n"
159 . "----------------------------\n"
160 . "Page : " . Env::v('page') . "\n\n"
161 . "Utilisateur : " . S::user()->login() . "\n"
162 . "Navigateur : " . $_SERVER['HTTP_USER_AGENT'] . "\n"
163 . "Skin : " . S::v('skin') . "\n";
164 $page->assign('bug_sent', 1);
165 $page->trigSuccess('Ton message a bien été envoyé au support de ' . $globals->core->sitename
166 . ', tu devrais en recevoir une copie d\'ici quelques minutes. Nous allons '
167 . 'le traiter et y répondre dans les plus brefs délais.');
168 $mymail = new PlMailer();
169 $mymail->setFrom(sprintf('"%s" <%s>', S::user()->fullName(), S::user()->bestEmail()));
170 $mymail->addCc(sprintf('"%s" <%s>', S::user()->fullName(), S::user()->bestEmail()));
171 $mymail->addTo('support+platal@' . $globals->mail->domain);
172 $mymail->setSubject('Plat/al '.Env::v('task_type').' : '.Env::v('item_summary'));
173 $mymail->setTxtBody($body);
174 $mymail->send();
175 } elseif (Env::has('send')) {
176 $page->trigError("Merci de remplir une explication du problème rencontré.");
177 }
178 }
179
180 function handler_wiki_help(&$page, $action = 'title')
181 {
182 $page->coreTpl('wiki.help.tpl', SIMPLE);
183 $page->assign('wiki_help', MiniWiki::help($action == 'title'));
184 }
185
186 /// Shared handler for wiki syntax result preview
187 function handler_wiki_preview(&$page, $action = 'title')
188 {
189 header('Content-Type: text/html; charset=utf-8');
190 $text = Env::v('text');
191 echo MiniWiki::wikiToHtml($text, $action == 'title');
192 exit;
193 }
194
195 function handler_sqlerror(&$page, $clear = null) {
196 global $globals;
197 $file = @fopen($globals->spoolroot . '/spool/tmp/query_errors', 'r');
198 if ($file !== false) {
199 echo '<html><body>';
200 fpassthru($file);
201 fclose($file);
202 echo '</html></body>';
203 }
204 if ($clear == 'clear') {
205 @unlink($globals->spoolroot . '/spool/tmp/query_errors');
206 }
207 exit;
208 }
209 }
210
211 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
212 ?>