Do not cache empty wiki pages
[platal.git] / include / wiki / engine.php
1 <?php
2 /***************************************************************************
3 * Copyright (C) 2003-2007 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
22 require_once 'wiki.inc.php';
23
24 $n = wiki_pagename();
25 if (!$n) {
26 pl_redirect('');
27 }
28
29 new_skinned_page('core/wiki.tpl');
30 $perms = wiki_get_perms($n);
31
32 // Check user perms
33 switch (Env::v('action')) {
34 case '': case 'search':
35 break;
36
37 case 'edit':
38 wiki_apply_perms($perms[1]);
39 break;
40
41 default:
42 wiki_apply_perms('admin');
43 break;
44 }
45
46 if ($p = Post::v('setrperms')) {
47 wiki_apply_perms('admin');
48 if (wiki_set_perms($n, $p, $perms[1])) {
49 $perms = wiki_get_perms($n);
50 $page->trig('Permissions mises à jour');
51 }
52 }
53
54 if ($p = Post::v('setwperms')) {
55 wiki_apply_perms('admin');
56 if (wiki_set_perms($n, $perms[0], $p)) {
57 $perms = wiki_get_perms($n);
58 $page->trig('Permissions mises à jour');
59 }
60 }
61
62 // Generate cache even if we don't have access rights
63 $wiki_cache = wiki_work_dir().'/cache_'.wiki_filename($n).'.tpl';
64 $cache_exists = file_exists($wiki_cache);
65
66 if (Env::v('action') || !$cache_exists) {
67 if ($cache_exists) {
68 unlink($wiki_cache);
69 }
70
71 // we leave pmwiki do whatever it wants and store everything
72 ob_start();
73 require_once($globals->spoolroot.'/wiki/pmwiki.php');
74
75 $wikiAll = ob_get_clean();
76 // the pmwiki skin we are using (almost empty) has these keywords:
77 $i = strpos($wikiAll, "<!--/HeaderText-->");
78 $j = strpos($wikiAll, "<!--/PageLeftFmt-->", $i);
79 }
80
81 $wiki_exists = file_exists(wiki_work_dir() . '/' . wiki_filename($n));
82
83 if (Env::v('action')) {
84 $page->assign('xorg_extra_header', substr($wikiAll, 0, $i));
85 $wikiAll = substr($wikiAll, $j);
86 } else {
87 if (!$cache_exists && $wiki_exists) {
88 $wikiAll = substr($wikiAll, $j);
89 wiki_putfile($wiki_cache, $wikiAll);
90 } elseif ($cache_exists) {
91 $wikiAll = file_get_contents($wiki_cache);
92 } elseif (S::has_perms()) {
93 $wikiAll = "<p>La page de wiki $n n'existe pas. "
94 . "Il te suffit de <a href='" . str_replace('.', '/', $n) . "?action=edit'>l'éditer</a></p>";
95 } else {
96 $page->changeTpl('core/404.tpl');
97 }
98 }
99
100 // Check user perms
101 wiki_apply_perms($perms[0]);
102
103 $page->assign('perms', $perms);
104 $page->assign('perms_opts', wiki_perms_options());
105
106 $page->assign('canedit', wiki_may_have_perms($perms[1]));
107 $page->assign('has_perms', wiki_may_have_perms('admin'));
108
109 $page->assign('wikipage', str_replace('.', '/', $n));
110 if ($perms[1] == 'admin' && !Env::v('action') && $wiki_exists) {
111 $page->assign('pmwiki_cache', $wiki_cache);
112 } else {
113 $page->assign('pmwiki', $wikiAll);
114 $page->assign('text', true);
115 }
116 $page->addCssLink('wiki.css');
117 $page->addJsLink('wiki.js');
118
119 $page->run();
120
121 ?>