000690e7f2efbfa99bcfabd367d8ffa3cf3fbb86
2 /***************************************************************************
3 * Copyright (C) 2003-2006 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
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. *
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. *
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 *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
22 function wiki_pagename() {
27 $words = explode('/', trim(Get
::get('n'), '/'));
28 if (count($words) == 2) {
29 return join('.', $words);
32 array_unshift($words, $words[0]);
33 $b = array_pop($words);
34 $a = array_pop($words);
36 pl_redirect($a.'/'.$b);
39 function wiki_work_dir() {
41 return $globals->spoolroot
.'/spool/wiki.d';
44 function wiki_clear_all_cache()
46 system('rm -f '.wiki_work_dir().'/cache_*');
49 function get_perms($n)
51 $file = wiki_work_dir().'/'.str_replace('/', '.', $n);
52 $lines = explode("\n", file_get_contents($file));
53 foreach ($lines as $line) {
54 list($k, $v) = explode('=', $line, 2);
55 if ($k == 'platal_perms') {
56 return explode(':', $v);
59 return array('logged', 'admin');
62 function wiki_apply_perms($perm) {
63 global $page, $platal;
70 if (!XorgSession
::doAuthCookie()) {
71 $platal = new Platal();
72 $platal->force_login($page);
77 if (!XorgSession
::doAuth()) {
78 $platal = new Platal();
79 $platal->force_login($page);
81 if ($perm == 'admin') {