Fix some layout issues
[platal.git] / htdocs / xorg.php
CommitLineData
b62f8858 1<?php
2/***************************************************************************
3 * Copyright (C) 2003-2006 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
bf6f6356 22// $GLOBALS['IS_XNET_SITE'] = true;
23
f1ca33de 24require_once dirname(__FILE__).'/../classes/XDB.php';
b62f8858 25require_once dirname(__FILE__).'/../classes/Platal.php';
26require_once dirname(__FILE__).'/../classes/PLModule.php';
c4271d38 27require_once dirname(__FILE__).'/../classes/CoreLogger.php';
28
e9e9306b 29require_once dirname(__FILE__).'/../include/xorg.inc.php';
b62f8858 30
b647fb5f 31if (!($path = Env::v('n')) || ($path{0} < 'A' || $path{0} > 'Z')) {
27472b85 32
33 $platal = new Platal('auth', 'banana', 'carnet', 'email', 'events',
34 'geoloc', 'lists', 'marketing', 'payment', 'platal',
35 'profile', 'register', 'search', 'stats', 'admin');
36 $platal->run();
37
38 exit;
39}
40
41/*** WIKI CODE ***/
42
43require_once 'wiki.inc.php';
44
45$n = wiki_pagename();
46if (!$n) {
47 pl_redirect('');
48}
49
50new_skinned_page('wiki.tpl');
51$perms = wiki_get_perms($n);
52
fbc1199f 53if (Env::v('display') == 'light') {
54 $page->assign('simple', true);
55}
56
27472b85 57switch (Env::v('action')) {
58 case '':
59 wiki_apply_perms($perms[0]);
60 break;
61
62 case 'edit':
63 wiki_apply_perms($perms[1]);
64 break;
65
66 default:
67 wiki_apply_perms('admin');
68 break;
69}
70
71if ($p = Post::v('setrperms')) {
72 wiki_apply_perms('admin');
73 if (wiki_set_perms($n, $p, $perms[1])) {
74 $perms = wiki_get_perms($n);
f517fe56 75 $page->trig('Permissions mises à jour');
27472b85 76 }
77}
78
79if ($p = Post::v('setwperms')) {
80 wiki_apply_perms('admin');
81 if (wiki_set_perms($n, $perms[0], $p)) {
82 $perms = wiki_get_perms($n);
f517fe56 83 $page->trig('Permissions mises à jour');
27472b85 84 }
85}
86
87$wiki_cache = wiki_work_dir().'/cache_'.$n.'.tpl';
88$cache_exists = file_exists($wiki_cache);
89
90if (Env::v('action') || !$cache_exists) {
91 @unlink($wiki_cache);
92
93 // we leave pmwiki do whatever it wants and store everything
94 ob_start();
95 require_once($globals->spoolroot.'/wiki/pmwiki.php');
96
97 $wikiAll = ob_get_clean();
98 // the pmwiki skin we are using (almost empty) has these keywords:
99 $i = strpos($wikiAll, "<!--/HeaderText-->");
100 $j = strpos($wikiAll, "<!--/PageLeftFmt-->", $i);
101}
102
103if (Env::v('action')) {
104 $page->assign('xorg_extra_header', substr($wikiAll, 0, $i));
105 $wikiAll = substr($wikiAll, $j);
106} else {
107 if (!$cache_exists) {
108 $wikiAll = substr($wikiAll, $j);
109 wiki_putfile($wiki_cache, $wikiAll);
110 } else {
111 $wikiAll = file_get_contents($wiki_cache);
112 }
113}
114
115$page->assign('perms', $perms);
116$page->assign('perms_opts', wiki_perms_options());
117
118$page->assign('canedit', wiki_may_have_perms($perms[1]));
119$page->assign('has_perms', wiki_may_have_perms('admin'));
120
121$page->assign('wikipage', str_replace('.', '/', $n));
122$page->assign('pmwiki', $wikiAll);
123
c99ef281 124$page->addCssLink('wiki.css');
125$page->addJsLink('wiki.js');
27472b85 126
127$page->run();
b62f8858 128
129?>