'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('sqlerror', AUTH_COOKIE, 'admin'),
- 'get_rights' => $this->make_hook('get_rights', AUTH_MDP, 'admin'),
'wiki_help' => $this->make_hook('wiki_help', AUTH_PUBLIC),
'wiki_preview' => $this->make_hook('wiki_preview', AUTH_COOKIE, 'user', NO_AUTH),
function handler_robotstxt(&$page)
{
global $globals;
- if (!$globals->core->restricted_platal) {
- return PL_NOT_FOUND;
+
+ $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);
}
- header('Content-Type: text/plain');
- echo "User-agent: *\n";
- echo "Disallow: /\n";
- exit;
+ if (count($disallowed_uris) > 0) {
+ header('Content-Type: 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)
kill_sessions();
}
- function handler_get_rights(&$page, $level)
- {
- if (S::has('suid')) {
- $page->kill('Déjà en SUID');
- }
-
- if (isset($_SESSION['log'])) {
- if (S::user()) {
- S::logger()->log("suid_start", "login by " . S::user()->login());
- } else {
- // TODO(vzanotti): trash that code when support of forlife will be gone.
- S::logger()->log("suid_start", "login by ".S::v('forlife'));
- }
- }
- Platal::session()->startSUID(S::i('uid'));
- Platal::session()->makePerms($level);
-
- pl_redirect('/');
- }
-
function handler_bug(&$page)
{
global $globals;
if (Env::has('send') && trim(Env::v('detailed_desc'))) {
S::assert_xsrf_token();
- // TODO(vzanotti): trash the 'forlife' bit when support of forlife will be gone.
$body = wordwrap(Env::v('detailed_desc'), 78) . "\n\n"
. "----------------------------\n"
. "Page : " . Env::v('page') . "\n\n"
- . "Utilisateur : " . (S::user() ? S::user()->login() : S::v('forlife')) . "\n"
+ . "Utilisateur : " . S::user()->login() . "\n"
. "Navigateur : " . $_SERVER['HTTP_USER_AGENT'] . "\n"
. "Skin : " . S::v('skin') . "\n";
$page->assign('bug_sent', 1);
. ', 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();
- // TODO(vzanotti): trash the 'bestalias' bits when support of bestalias will be gone.
- if (S::user()) {
- $mymail->setFrom(sprintf('"%s" <%s>', S::user()->fullName(), S::user()->bestEmail()));
- $mymail->addCc(sprintf('"%s" <%s>', S::user()->fullName(), S::user()->bestEmail()));
- } else {
- $mymail->setFrom('"'.S::v('prenom').' '.S::v('nom').'" <'.S::v('bestalias').'@' . $globals->mail->domain . '>');
- $mymail->addCc('"'.S::v('prenom').' '.S::v('nom').'" <'.S::v('bestalias').'@' . $globals->mail->domain . '>');
- }
+ $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);