[platal.git] / modules / core.php

<?php
/***************************************************************************
 *  Copyright (C) 2003-2011 Polytechnique.org                              *
 *  http://opensource.polytechnique.org/                                   *
 *                                                                         *
 *  This program is free software; you can redistribute it and/or modify   *
 *  it under the terms of the GNU General Public License as published by   *
 *  the Free Software Foundation; either version 2 of the License, or      *
 *  (at your option) any later version.                                    *
 *                                                                         *
 *  This program is distributed in the hope that it will be useful,        *
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
 *  GNU General Public License for more details.                           *
 *                                                                         *
 *  You should have received a copy of the GNU General Public License      *
 *  along with this program; if not, write to the Free Software            *
 *  Foundation, Inc.,                                                      *
 *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
 ***************************************************************************/

class CoreModule extends PLModule
{
    function handlers()
    {
        return array(
            '400'           => $this->make_hook('400',           AUTH_PUBLIC),
            '403'           => $this->make_hook('403',           AUTH_PUBLIC),
            '404'           => $this->make_hook('404',           AUTH_PUBLIC),
            'login'         => $this->make_hook('login',         AUTH_COOKIE),
            'send_bug'      => $this->make_hook('bug',           AUTH_COOKIE),
            'purge_cache'   => $this->make_hook('purge_cache',   AUTH_COOKIE, 'admin'),
            'kill_sessions' => $this->make_hook('kill_sessions', AUTH_COOKIE, 'admin'),
            'sql_errors'    => $this->make_hook('siteerror',     AUTH_COOKIE, 'admin'),
            'assert_errors' => $this->make_hook('siteerror',     AUTH_COOKIE, 'admin'),
            'site_errors'   => $this->make_hook('siteerror',     AUTH_COOKIE, 'admin'),

            'embedded'      => $this->make_hook('embedded',      AUTH_PUBLIC),

            'wiki_help'     => $this->make_hook('wiki_help',     AUTH_PUBLIC),
            'wiki_preview'  => $this->make_hook('wiki_preview',  AUTH_COOKIE, 'user', NO_AUTH),

            'validator'     => $this->make_hook('validator',     AUTH_PUBLIC),
            'valid.html'    => $this->make_hook('valid',         AUTH_PUBLIC),
            'favicon.ico'   => $this->make_hook('favicon',       AUTH_PUBLIC),
            'robots.txt'    => $this->make_hook('robotstxt',     AUTH_PUBLIC, 'user', NO_HTTPS),
        );
    }

    function handler_valid($page)
    {
        readfile($page->compile_dir.'/valid.html');
        exit;
    }

    function handler_validator($page)
    {
        global $globals;
        exec($globals->spoolroot."/bin/devel/xhtml.validate.pl ".$page->compile_dir."/valid.html", $val);
        $url   = "<a href='http://validator.w3.org/check?uri={$globals->baseurl}/valid.html&amp;ss=1#result'>";
        $replc = '<span style="color: #080;">HTML OK</span>';
        foreach ($val as $h) {
            if (preg_match("/^X-W3C-Validator-Errors: (\d+)$/", $h, $m)) {
                if ($m[1]) {
                    $replc = "<span class='erreur'>$url{$m[1]} ERREUR(S) !!!</a></span>";
                }
                break;
            }
        }
        echo $replc;
        exit;
    }

    function handler_400(PlPage& $page)
    {
        header($_SERVER['SERVER_PROTOCOL'] . ' 400 Bad Request');
        $page->coreTpl('40x.tpl');
        $page->trigError('Ta requête est invalide.');
    }

    function handler_403(PlPage& $page)
    {
        header($_SERVER['SERVER_PROTOCOL'] . ' 403 Forbidden');
        $page->coreTpl('40x.tpl');
        $page->trigError('Tu n\'as pas les permissions nécessaires pour accéder à cette page.');
    }

    function handler_404(PlPage& $page)
    {
        global $platal;
        header($_SERVER['SERVER_PROTOCOL'] . ' 404 Not Found');
        $page->coreTpl('404.tpl');
        $page->assign('near', $platal->near_hook());
        $page->trigError('Cette page n\'existe pas !!!');
    }

    function handler_login($page)
    {
        $allkeys = func_get_args();
        unset($allkeys[0]);
        $url = join('/',$allkeys);
        pl_redirect($url);
    }

    function handler_favicon($page)
    {
        global $globals;
        pl_cached_content_headers("image/x-icon");
        readfile($globals->spoolroot . '/htdocs/images/favicon.ico');
        exit;
    }

    function handler_robotstxt($page)
    {
        global $globals;

        $disallowed_uris = array();
        if ($globals->core->restricted_platal) {
            $disallowed_uris[] = '/';
        } else if (!empty($globals->core->robotstxt_disallowed_uris)) {
            $disallowed_uris = preg_split('/[\s,]+/',
                                          $globals->core->robotstxt_disallowed_uris,
                                          -1, PREG_SPLIT_NO_EMPTY);
        }

        if (count($disallowed_uris) > 0) {
            pl_cached_content_headers("text/plain");
            echo "User-agent: *\n";
            foreach ($disallowed_uris as $uri) {
                echo "Disallow: $uri\n";
            }
            exit;
        }
        return PL_NOT_FOUND;
    }

    function handler_purge_cache($page)
    {
        S::assert_xsrf_token();

        $page->clear_compiled_tpl();
        PlWikiPage::clearCache();
        PlCache::clearAll();

        http_redirect(empty($_SERVER['HTTP_REFERER']) ? './' : $_SERVER['HTTP_REFERER']);
    }

    function handler_kill_sessions($page)
    {
        kill_sessions();
    }

    function handler_bug($page)
    {
        global $globals;

        if (empty($_SERVER['HTTP_REFERER'])) {
            // We don't have a valid referer, we need to use the url
            list($currentPage, $location) = explode('//', $_SERVER['REQUEST_URI'], 2);

            $location = 'http'.(empty($_SERVER['HTTPS']) ? '' : 's').'://'.$_SERVER['SERVER_NAME'].'/'.$location;
        } else {
            $location = $_SERVER['HTTP_REFERER'];
        }

        $page->coreTpl('bug.tpl', SIMPLE);
        $page->assign('location', $location);
        $page->addJsLink('close_on_esc.js');

        if (Env::has('send') && trim(Env::v('detailed_desc'))) {
            S::assert_xsrf_token();

            $body = wordwrap(Env::v('detailed_desc'), 78) . "\n\n"
                  . "----------------------------\n"
                  . "Page        : " . Env::v('page') . "\n\n"
                  . "Utilisateur : " . S::user()->login() . "\n"
                  . "Navigateur  : " . $_SERVER['HTTP_USER_AGENT'] . "\n"
                  . "Skin        : " . S::v('skin') . "\n";
            $page->assign('bug_sent', 1);
            $page->trigSuccess('Ton message a bien été envoyé au support de ' . $globals->core->sitename
                             . ', tu devrais en recevoir une copie d\'ici quelques minutes. Nous allons '
                             . 'le traiter et y répondre dans les plus brefs délais.');
            $mymail = new PlMailer();
            $mymail->setFrom(sprintf('"%s" <%s>', S::user()->fullName(), S::user()->bestEmail()));
            $mymail->addCc(sprintf('"%s" <%s>', S::user()->fullName(), S::user()->bestEmail()));
            $mymail->addTo('support+platal@' . $globals->mail->domain);
            $mymail->setSubject('Plat/al '.Env::v('task_type').' : '.Env::v('item_summary'));
            $mymail->setTxtBody($body);
            $mymail->send();
        } elseif (Env::has('send')) {
            $page->trigError("Merci de remplir une explication du problème rencontré.");
        }
    }

    function handler_wiki_help($page, $action = 'title')
    {
        $page->coreTpl('wiki.help.tpl', SIMPLE);
        $page->assign('wiki_help', MiniWiki::help($action == 'title'));
    }

    /// Shared handler for wiki syntax result preview
    function handler_wiki_preview($page, $action = 'title')
    {
        pl_content_headers("text/html");
        $text = Env::v('text');
        echo MiniWiki::wikiToHtml($text, $action == 'title');
        exit;
    }

    function handler_siteerror($page) {
        global $globals;
        $page->coreTpl('site_errors.tpl');
        if (Post::has('clear')) {
            PlErrorReport::clear();
            $page->trigSuccess("Erreurs effacées.");
        }
        $page->assign('errors', PlErrorReport::iterate());
    }

    function handler_embedded($page)
    {
        global $platal, $globals;
        $allkeys = func_get_args();
        $mode = $allkeys[1];
        unset($allkeys[0]);
        unset($allkeys[1]);
        $_REQUEST['display'] = $mode;
        $globals->baseurl .= '/embedded/' . $mode;
        $platal->path = join('/', $allkeys);
        $platal->run();
    }
}

// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
?>
Commit	Line	Data
b62f8858	1	<?php
b62f8858	2	/***************************************************************************
e92ecb8c	3	* Copyright (C) 2003-2011 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
	22	class CoreModule extends PLModule
	23	{
b62f8858	24	function handlers()
	25	{
	26	return array(
1547b0f6	27	'400' => $this->make_hook('400', AUTH_PUBLIC),
b631d803 SJ	28	'403' => $this->make_hook('403', AUTH_PUBLIC),
	29	'404' => $this->make_hook('404', AUTH_PUBLIC),
	30	'login' => $this->make_hook('login', AUTH_COOKIE),
	31	'send_bug' => $this->make_hook('bug', AUTH_COOKIE),
	32	'purge_cache' => $this->make_hook('purge_cache', AUTH_COOKIE, 'admin'),
05d5ce15	33	'kill_sessions' => $this->make_hook('kill_sessions', AUTH_COOKIE, 'admin'),
7f6d1063 FB	34	'sql_errors' => $this->make_hook('siteerror', AUTH_COOKIE, 'admin'),
	35	'assert_errors' => $this->make_hook('siteerror', AUTH_COOKIE, 'admin'),
	36	'site_errors' => $this->make_hook('siteerror', AUTH_COOKIE, 'admin'),
fdbeba4f	37
7299bfce FB	38	'embedded' => $this->make_hook('embedded', AUTH_PUBLIC),
7299bfce FB	39
b631d803 SJ	40	'wiki_help' => $this->make_hook('wiki_help', AUTH_PUBLIC),
b631d803 SJ	41	'wiki_preview' => $this->make_hook('wiki_preview', AUTH_COOKIE, 'user', NO_AUTH),
7b14a2a0	42
d1bdef74	43	'validator' => $this->make_hook('validator', AUTH_PUBLIC),
b631d803 SJ	44	'valid.html' => $this->make_hook('valid', AUTH_PUBLIC),
	45	'favicon.ico' => $this->make_hook('favicon', AUTH_PUBLIC),
	46	'robots.txt' => $this->make_hook('robotstxt', AUTH_PUBLIC, 'user', NO_HTTPS),
b62f8858	47	);
	48	}
	49
9e394323	50	function handler_valid($page)
7b14a2a0	51	{
	52	readfile($page->compile_dir.'/valid.html');
	53	exit;
	54	}
	55
d1bdef74 FB	56	function handler_validator($page)
	57	{
	58	global $globals;
	59	exec($globals->spoolroot."/bin/devel/xhtml.validate.pl ".$page->compile_dir."/valid.html", $val);
	60	$url = "<a href='http://validator.w3.org/check?uri={$globals->baseurl}/valid.html&ss=1#result'>";
	61	$replc = '<span style="color: #080;">HTML OK</span>';
	62	foreach ($val as $h) {
	63	if (preg_match("/^X-W3C-Validator-Errors: (\d+)$/", $h, $m)) {
	64	if ($m[1]) {
	65	$replc = "<span class='erreur'>$url{$m[1]} ERREUR(S) !!!</a></span>";
	66	}
	67	break;
	68	}
	69	}
	70	echo $replc;
	71	exit;
	72	}
	73
1547b0f6 VZ	74	function handler_400(PlPage& $page)
	75	{
	76	header($_SERVER['SERVER_PROTOCOL'] . ' 400 Bad Request');
	77	$page->coreTpl('40x.tpl');
	78	$page->trigError('Ta requête est invalide.');
	79	}
	80
	81	function handler_403(PlPage& $page)
b62f8858	82	{
94c63478	83	header($_SERVER['SERVER_PROTOCOL'] . ' 403 Forbidden');
1547b0f6	84	$page->coreTpl('40x.tpl');
2aad1481	85	$page->trigError('Tu n\'as pas les permissions nécessaires pour accéder à cette page.');
b62f8858	86	}
b62f8858	87
1547b0f6	88	function handler_404(PlPage& $page)
b62f8858	89	{
1547b0f6	90	global $platal;
94c63478	91	header($_SERVER['SERVER_PROTOCOL'] . ' 404 Not Found');
7cb40d85	92	$page->coreTpl('404.tpl');
6b8d257b	93	$page->assign('near', $platal->near_hook());
2aad1481	94	$page->trigError('Cette page n\'existe pas !!!');
b62f8858	95	}
0889eb33	96
9e394323	97	function handler_login($page)
bb7af3cd	98	{
	99	$allkeys = func_get_args();
	100	unset($allkeys[0]);
	101	$url = join('/',$allkeys);
	102	pl_redirect($url);
	103	}
	104
9e394323	105	function handler_favicon($page)
dc41059a	106	{
2b1ac5ab	107	global $globals;
a286fc7a VZ	108	pl_cached_content_headers("image/x-icon");
a286fc7a VZ	109	readfile($globals->spoolroot . '/htdocs/images/favicon.ico');
dc41059a	110	exit;
	111	}
	112
9e394323	113	function handler_robotstxt($page)
f8eb84b7 VZ	114	{
f8eb84b7 VZ	115	global $globals;
a12a0ce3 VZ	116
	117	$disallowed_uris = array();
	118	if ($globals->core->restricted_platal) {
	119	$disallowed_uris[] = '/';
	120	} else if (!empty($globals->core->robotstxt_disallowed_uris)) {
	121	$disallowed_uris = preg_split('/[\s,]+/',
	122	$globals->core->robotstxt_disallowed_uris,
	123	-1, PREG_SPLIT_NO_EMPTY);
f8eb84b7 VZ	124	}
f8eb84b7 VZ	125
a12a0ce3	126	if (count($disallowed_uris) > 0) {
a286fc7a	127	pl_cached_content_headers("text/plain");
a12a0ce3 VZ	128	echo "User-agent: *\n";
	129	foreach ($disallowed_uris as $uri) {
	130	echo "Disallow: $uri\n";
	131	}
	132	exit;
	133	}
	134	return PL_NOT_FOUND;
f8eb84b7 VZ	135	}
f8eb84b7 VZ	136
9e394323	137	function handler_purge_cache($page)
0889eb33	138	{
40d428d8	139	S::assert_xsrf_token();
0889eb33	140
40d428d8	141	$page->clear_compiled_tpl();
1f16638f	142	PlWikiPage::clearCache();
c426670b	143	PlCache::clearAll();
0889eb33	144
40d428d8	145	http_redirect(empty($_SERVER['HTTP_REFERER']) ? './' : $_SERVER['HTTP_REFERER']);
0889eb33	146	}
e74411f7	147
9e394323	148	function handler_kill_sessions($page)
05d5ce15 FB	149	{
	150	kill_sessions();
	151	}
	152
9e394323	153	function handler_bug($page)
8b1f8e12	154	{
97af9556	155	global $globals;
4d68bcde FB	156
	157	if (empty($_SERVER['HTTP_REFERER'])) {
	158	// We don't have a valid referer, we need to use the url
	159	list($currentPage, $location) = explode('//', $_SERVER['REQUEST_URI'], 2);
	160
	161	$location = 'http'.(empty($_SERVER['HTTPS']) ? '' : 's').'://'.$_SERVER['SERVER_NAME'].'/'.$location;
	162	} else {
	163	$location = $_SERVER['HTTP_REFERER'];
	164	}
	165
7cb40d85	166	$page->coreTpl('bug.tpl', SIMPLE);
4d68bcde	167	$page->assign('location', $location);
8b1f8e12	168	$page->addJsLink('close_on_esc.js');
4d68bcde	169
40d428d8 VZ	170	if (Env::has('send') && trim(Env::v('detailed_desc'))) {
	171	S::assert_xsrf_token();
	172
5486a0d3	173	$body = wordwrap(Env::v('detailed_desc'), 78) . "\n\n"
	174	. "----------------------------\n"
	175	. "Page : " . Env::v('page') . "\n\n"
30f983a1	176	. "Utilisateur : " . S::user()->login() . "\n"
5c50e351	177	. "Navigateur : " . $_SERVER['HTTP_USER_AGENT'] . "\n"
5c50e351	178	. "Skin : " . S::v('skin') . "\n";
2aad1481 SJ	179	$page->assign('bug_sent', 1);
	180	$page->trigSuccess('Ton message a bien été envoyé au support de ' . $globals->core->sitename
	181	. ', tu devrais en recevoir une copie d\'ici quelques minutes. Nous allons '
	182	. 'le traiter et y répondre dans les plus brefs délais.');
8b1f8e12	183	$mymail = new PlMailer();
30f983a1 VZ	184	$mymail->setFrom(sprintf('"%s" <%s>', S::user()->fullName(), S::user()->bestEmail()));
30f983a1 VZ	185	$mymail->addCc(sprintf('"%s" <%s>', S::user()->fullName(), S::user()->bestEmail()));
1d55fe45	186	$mymail->addTo('support+platal@' . $globals->mail->domain);
8b1f8e12	187	$mymail->setSubject('Plat/al '.Env::v('task_type').' : '.Env::v('item_summary'));
5486a0d3	188	$mymail->setTxtBody($body);
8b1f8e12	189	$mymail->send();
e8dfa21c	190	} elseif (Env::has('send')) {
2aad1481	191	$page->trigError("Merci de remplir une explication du problème rencontré.");
8b1f8e12	192	}
8b1f8e12	193	}
72b2f8bb	194
9e394323	195	function handler_wiki_help($page, $action = 'title')
72b2f8bb	196	{
7cb40d85	197	$page->coreTpl('wiki.help.tpl', SIMPLE);
72b2f8bb	198	$page->assign('wiki_help', MiniWiki::help($action == 'title'));
72b2f8bb	199	}
fdbeba4f	200
fdbeba4f	201	/// Shared handler for wiki syntax result preview
9e394323	202	function handler_wiki_preview($page, $action = 'title')
fdbeba4f	203	{
a286fc7a	204	pl_content_headers("text/html");
8b6e9f4e	205	$text = Env::v('text');
fdbeba4f	206	echo MiniWiki::wikiToHtml($text, $action == 'title');
	207	exit;
	208	}
f8eaef22	209
9e394323	210	function handler_siteerror($page) {
f8eaef22	211	global $globals;
7f6d1063	212	$page->coreTpl('site_errors.tpl');
02c018dd	213	if (Post::has('clear')) {
40b79bfc	214	PlErrorReport::clear();
7f6d1063	215	$page->trigSuccess("Erreurs effacées.");
ec60dba7	216	}
71c1196e	217	$page->assign('errors', PlErrorReport::iterate());
ec60dba7	218	}
7299bfce FB	219
	220	function handler_embedded($page)
	221	{
	222	global $platal, $globals;
	223	$allkeys = func_get_args();
	224	$mode = $allkeys[1];
	225	unset($allkeys[0]);
	226	unset($allkeys[1]);
	227	$_REQUEST['display'] = $mode;
	228	$globals->baseurl .= '/embedded/' . $mode;
	229	$platal->path = join('/', $allkeys);
	230	$platal->run();
	231	}
b62f8858	232	}
b62f8858	233
a7de4ef7	234	// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
b62f8858	235	?>