Merge commit 'origin/core-1.0.0' into core
[platal.git] / modules / core.php
CommitLineData
b62f8858 1<?php
2/***************************************************************************
a7f778a5 3 * Copyright (C) 2003-2009 Polytechnique.org *
b62f8858 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
22class CoreModule extends PLModule
23{
b62f8858 24 function handlers()
25 {
26 return array(
b631d803
SJ
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'),
05d5ce15 32 'kill_sessions' => $this->make_hook('kill_sessions', AUTH_COOKIE, 'admin'),
b631d803 33 'sql_errors' => $this->make_hook('sqlerror', AUTH_COOKIE, 'admin'),
fdbeba4f 34
b631d803
SJ
35 'wiki_help' => $this->make_hook('wiki_help', AUTH_PUBLIC),
36 'wiki_preview' => $this->make_hook('wiki_preview', AUTH_COOKIE, 'user', NO_AUTH),
7b14a2a0 37
b631d803
SJ
38 'valid.html' => $this->make_hook('valid', AUTH_PUBLIC),
39 'favicon.ico' => $this->make_hook('favicon', AUTH_PUBLIC),
40 'robots.txt' => $this->make_hook('robotstxt', AUTH_PUBLIC, 'user', NO_HTTPS),
b62f8858 41 );
42 }
43
7b14a2a0 44 function handler_valid(&$page)
45 {
46 readfile($page->compile_dir.'/valid.html');
47 exit;
48 }
49
b62f8858 50 function handler_403(&$page)
51 {
338a5934 52 global $globals;
94c63478 53 header($_SERVER['SERVER_PROTOCOL'] . ' 403 Forbidden');
2aad1481 54 $page->trigError('Tu n\'as pas les permissions nécessaires pour accéder à cette page.');
7cb40d85 55 $page->coreTpl('403.tpl');
b62f8858 56 }
57
58 function handler_404(&$page)
59 {
338a5934 60 global $globals, $platal;
94c63478 61 header($_SERVER['SERVER_PROTOCOL'] . ' 404 Not Found');
7cb40d85 62 $page->coreTpl('404.tpl');
6b8d257b 63 $page->assign('near', $platal->near_hook());
2aad1481 64 $page->trigError('Cette page n\'existe pas !!!');
b62f8858 65 }
0889eb33 66
bb7af3cd 67 function handler_login(&$page)
68 {
69 $allkeys = func_get_args();
70 unset($allkeys[0]);
71 $url = join('/',$allkeys);
72 pl_redirect($url);
73 }
74
dc41059a 75 function handler_favicon(&$page)
76 {
ce41a714 77 $data = file_get_contents(dirname(__FILE__).'/../htdocs/images/favicon.ico');
78 header('Content-Type: image/x-icon');
dc41059a 79 echo $data;
80 exit;
81 }
82
f8eb84b7
VZ
83 function handler_robotstxt(&$page)
84 {
85 global $globals;
a12a0ce3
VZ
86
87 $disallowed_uris = array();
88 if ($globals->core->restricted_platal) {
89 $disallowed_uris[] = '/';
90 } else if (!empty($globals->core->robotstxt_disallowed_uris)) {
91 $disallowed_uris = preg_split('/[\s,]+/',
92 $globals->core->robotstxt_disallowed_uris,
93 -1, PREG_SPLIT_NO_EMPTY);
f8eb84b7
VZ
94 }
95
a12a0ce3
VZ
96 if (count($disallowed_uris) > 0) {
97 header('Content-Type: text/plain');
98 echo "User-agent: *\n";
99 foreach ($disallowed_uris as $uri) {
100 echo "Disallow: $uri\n";
101 }
102 exit;
103 }
104 return PL_NOT_FOUND;
f8eb84b7
VZ
105 }
106
0889eb33 107 function handler_purge_cache(&$page)
108 {
40d428d8 109 S::assert_xsrf_token();
0889eb33 110
40d428d8 111 $page->clear_compiled_tpl();
1f16638f 112 PlWikiPage::clearCache();
0889eb33 113
40d428d8 114 http_redirect(empty($_SERVER['HTTP_REFERER']) ? './' : $_SERVER['HTTP_REFERER']);
0889eb33 115 }
e74411f7 116
05d5ce15
FB
117 function handler_kill_sessions(&$page)
118 {
119 kill_sessions();
120 }
121
8b1f8e12 122 function handler_bug(&$page)
123 {
97af9556 124 global $globals;
4d68bcde
FB
125
126 if (empty($_SERVER['HTTP_REFERER'])) {
127 // We don't have a valid referer, we need to use the url
128 list($currentPage, $location) = explode('//', $_SERVER['REQUEST_URI'], 2);
129
130 $location = 'http'.(empty($_SERVER['HTTPS']) ? '' : 's').'://'.$_SERVER['SERVER_NAME'].'/'.$location;
131 } else {
132 $location = $_SERVER['HTTP_REFERER'];
133 }
134
7cb40d85 135 $page->coreTpl('bug.tpl', SIMPLE);
4d68bcde 136 $page->assign('location', $location);
8b1f8e12 137 $page->addJsLink('close_on_esc.js');
4d68bcde 138
40d428d8
VZ
139 if (Env::has('send') && trim(Env::v('detailed_desc'))) {
140 S::assert_xsrf_token();
141
5486a0d3 142 $body = wordwrap(Env::v('detailed_desc'), 78) . "\n\n"
143 . "----------------------------\n"
144 . "Page : " . Env::v('page') . "\n\n"
30f983a1 145 . "Utilisateur : " . S::user()->login() . "\n"
5c50e351 146 . "Navigateur : " . $_SERVER['HTTP_USER_AGENT'] . "\n"
147 . "Skin : " . S::v('skin') . "\n";
2aad1481
SJ
148 $page->assign('bug_sent', 1);
149 $page->trigSuccess('Ton message a bien été envoyé au support de ' . $globals->core->sitename
150 . ', tu devrais en recevoir une copie d\'ici quelques minutes. Nous allons '
151 . 'le traiter et y répondre dans les plus brefs délais.');
8b1f8e12 152 $mymail = new PlMailer();
30f983a1
VZ
153 $mymail->setFrom(sprintf('"%s" <%s>', S::user()->fullName(), S::user()->bestEmail()));
154 $mymail->addCc(sprintf('"%s" <%s>', S::user()->fullName(), S::user()->bestEmail()));
1d55fe45 155 $mymail->addTo('support+platal@' . $globals->mail->domain);
8b1f8e12 156 $mymail->setSubject('Plat/al '.Env::v('task_type').' : '.Env::v('item_summary'));
5486a0d3 157 $mymail->setTxtBody($body);
8b1f8e12 158 $mymail->send();
e8dfa21c 159 } elseif (Env::has('send')) {
2aad1481 160 $page->trigError("Merci de remplir une explication du problème rencontré.");
8b1f8e12 161 }
162 }
72b2f8bb 163
164 function handler_wiki_help(&$page, $action = 'title')
165 {
7cb40d85 166 $page->coreTpl('wiki.help.tpl', SIMPLE);
72b2f8bb 167 $page->assign('wiki_help', MiniWiki::help($action == 'title'));
168 }
fdbeba4f 169
170 /// Shared handler for wiki syntax result preview
171 function handler_wiki_preview(&$page, $action = 'title')
172 {
173 header('Content-Type: text/html; charset=utf-8');
8b6e9f4e 174 $text = Env::v('text');
fdbeba4f 175 echo MiniWiki::wikiToHtml($text, $action == 'title');
176 exit;
177 }
f8eaef22 178
02c018dd 179 function handler_sqlerror(&$page) {
f8eaef22 180 global $globals;
02c018dd 181 $page->coreTpl('sql_errors.tpl');
f8eaef22
FB
182 $file = @fopen($globals->spoolroot . '/spool/tmp/query_errors', 'r');
183 if ($file !== false) {
02c018dd 184 $page->assign('errors', fpassthru($file));
f8eaef22 185 fclose($file);
f8eaef22 186 }
02c018dd 187 if (Post::has('clear')) {
f8eaef22 188 @unlink($globals->spoolroot . '/spool/tmp/query_errors');
02c018dd 189 $page->trigSuccess("Erreurs MySQL effacées.");
f8eaef22 190 }
f8eaef22 191 }
b62f8858 192}
193
a7de4ef7 194// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
b62f8858 195?>