Allow {include wiki=Xorg.Machin} in templates to include a wiki page
[platal.git] / classes / platalpage.php
CommitLineData
0337d704 1<?php
2/***************************************************************************
5ddeb07c 3 * Copyright (C) 2003-2007 Polytechnique.org *
0337d704 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
f12af8ad 22require_once 'smarty/libs/Smarty.class.php';
0337d704 23
1490093c 24abstract class PlatalPage extends Smarty
0337d704 25{
2b1ee50b 26 private $_page_type;
27 private $_tpl;
28 private $_errors;
29 private $_failure;
4a8a1e0a 30 private $_jsonVars;
0337d704 31
0337d704 32 // {{{ function PlatalPage()
33
2b1ee50b 34 public function __construct($tpl, $type = SKINNED)
0337d704 35 {
2b1ee50b 36 parent::Smarty();
0337d704 37
2b1ee50b 38 global $globals;
796aea34 39
abe7e055 40 $this->caching = false;
41 $this->config_overwrite = false;
42 $this->use_sub_dirs = false;
0337d704 43 $this->template_dir = $globals->spoolroot."/templates/";
7faf6e6a 44 $this->compile_dir = $globals->spoolroot."/spool/templates_c/";
0337d704 45 array_unshift($this->plugins_dir, $globals->spoolroot."/plugins/");
46 $this->config_dir = $globals->spoolroot."/configs/";
47
48 $this->compile_check = !empty($globals->debug);
49
1490093c 50 $this->changeTpl($tpl, $type);
860fdaec 51 $this->_errors = array();
4a8a1e0a 52 $this->_jsonVars = array();
860fdaec 53 $this->_failure = false;
0337d704 54
0337d704 55 $this->register_prefilter('at_to_globals');
60979eb7 56 $this->addJsLink('xorg.js');
0337d704 57 }
58
59 // }}}
60 // {{{ function changeTpl()
61
2b1ee50b 62 public function changeTpl($tpl, $type = SKINNED)
0337d704 63 {
8a105df2 64 $this->_tpl = $tpl;
65 $this->_page_type = $type;
66 $this->assign('xorg_tpl', $tpl);
0337d704 67 }
68
69 // }}}
e654517d 70 // {{{ function raw()
71
72 public function raw()
73 {
74 global $globals;
75 $this->assign('globals', $globals);
76 return $this->fetch($this->_tpl);
77 }
78
79 // }}}
0337d704 80 // {{{ function _run()
81
2b1ee50b 82 protected function _run($skin)
0337d704 83 {
84 global $globals, $TIME_BEGIN;
36f114ef 85
86 session_write_close();
87
e654517d 88 $this->register_prefilter('trimwhitespace');
89 $this->register_prefilter('form_force_encodings');
7a3f546b 90 $this->register_prefilter('wiki_include');
6995a9b9 91 $this->assign('xorg_errors', $this->_errors);
92 $this->assign('xorg_failure', $this->_failure);
d083f500 93 $this->assign('globals', $globals);
a3a049fc 94
4a8a1e0a 95 if (Env::has('json') && count($this->_jsonVars)) {
96 return $this->jsonDisplay();
97 }
98
8a105df2 99 if (Env::v('display') == 'light') {
100 $this->_page_type = SIMPLE;
101 } elseif (Env::v('display') == 'raw') {
102 $this->_page_type = NO_SKIN;
103 } elseif (Env::v('display') == 'full') {
104 $this->_page_typ = SKINNED;
105 }
106
62a66dfc 107 switch ($this->_page_type) {
108 case NO_SKIN:
6995a9b9 109 error_reporting(0);
0337d704 110 $this->display($this->_tpl);
111 exit;
62a66dfc 112
113 case SIMPLE:
c6db254a 114 $this->assign('simple', true);
bf2e1ab0 115
62a66dfc 116 case SKINNED:
bf2e1ab0 117 $this->register_modifier('escape_html', 'escape_html');
118 $this->default_modifiers = Array('@escape_html');
0337d704 119 }
bf2e1ab0 120 $this->register_outputfilter('hide_emails');
121 $this->addJsLink('wiki.js');
493b6abe 122 header("Accept-Charset: utf-8");
4a8a1e0a 123 if (Env::v('forceXml')) {
124 header("Content-Type: text/xml; charset=utf-8");
125 }
b4315e15 126
127 if (!$globals->debug) {
6995a9b9 128 error_reporting(0);
b4315e15 129 $this->display($skin);
130 exit;
131 }
a3a049fc 132
b4315e15 133 if ($globals->debug & 1) {
d3f26be9 134 PlBacktrace::clean();
135 $this->assign_by_ref('backtraces', PlBacktrace::$bt);
b4315e15 136 }
0337d704 137
7da8ef90 138 $this->assign('validate', true);
90ccb062 139 error_reporting(0);
b4315e15 140 $result = $this->fetch($skin);
9b2e77de 141 $ttime = sprintf('Temps total: %.02fs - Mémoire totale : %dKo<br />', microtime(true) - $TIME_BEGIN
c895e7a4 142 , memory_get_peak_usage(true) / 1024);
b4315e15 143 $replc = "<span class='erreur'>VALIDATION HTML INACTIVE</span><br />";
0337d704 144
b4315e15 145 if ($globals->debug & 2) {
b4315e15 146 $fd = fopen($this->compile_dir."/valid.html","w");
147 fwrite($fd, $result);
148 fclose($fd);
a3a049fc 149
b4315e15 150 exec($globals->spoolroot."/bin/devel/xhtml.validate.pl ".$this->compile_dir."/valid.html", $val);
151 foreach ($val as $h) {
152 if (preg_match("/^X-W3C-Validator-Errors: (\d+)$/", $h, $m)) {
153 $replc = '<span style="color: #080;">HTML OK</span><br />';
154 if ($m[1]) {
155 $replc = "<span class='erreur'><a href='http://validator.w3.org/check?uri={$globals->baseurl}"
156 ."/valid.html&amp;ss=1#result'>{$m[1]} ERREUR(S) !!!</a></span><br />";
0337d704 157 }
b4315e15 158 break;
0337d704 159 }
160 }
0337d704 161 }
162
b4315e15 163 echo str_replace("@HOOK@", $ttime.$replc, $result);
0337d704 164 exit;
165 }
166
1490093c 167 abstract public function run();
168
0337d704 169 // }}}
0337d704 170 // {{{ function nb_errs()
171
2b1ee50b 172 public function nb_errs()
0337d704 173 {
860fdaec 174 return count($this->_errors);
0337d704 175 }
176
177 // }}}
178 // {{{ function trig()
179
2b1ee50b 180 public function trig($msg)
0337d704 181 {
860fdaec 182 $this->_errors[] = $msg;
0337d704 183 }
184
185 // }}}
0337d704 186 // {{{ function kill()
187
2b1ee50b 188 public function kill($msg)
0337d704 189 {
90eba1aa 190 global $platal;
191
192 $this->assign('platal', $platal);
0fcbe8d0 193 $this->trig($msg);
194 $this->_failure = true;
0337d704 195 $this->run();
196 }
197
198 // }}}
0337d704 199 // {{{ function addJsLink
200
2b1ee50b 201 public function addJsLink($path)
0337d704 202 {
203 $this->append('xorg_js', $path);
204 }
205
206 // }}}
207 // {{{ function addCssLink
208
2b1ee50b 209 public function addCssLink($path)
0337d704 210 {
211 $this->append('xorg_css', $path);
212 }
213
214 // }}}
ea626742 215 // {{{ function addCssInline
216
2b1ee50b 217 public function addCssInline($css)
ea626742 218 {
219 if (!empty($css)) {
220 $this->append('xorg_inline_css', $css);
221 }
222 }
223
224 // }}}
162370e7 225 // {{{ function setRssLink
226
2b1ee50b 227 public function setRssLink($title, $path)
162370e7 228 {
229 $this->assign('xorg_rss', array('title' => $title, 'href' => $path));
230 }
231
232 // }}}
4a8a1e0a 233 // {{{ function jsonDisplay
234 protected function jsonDisplay()
235 {
236 header("Content-type: text/javascript; charset=utf-8");
237 array_walk_recursive($this->_jsonVars, "escape_xorgDB");
238 $jsonbegin = Env::v('jsonBegin');
239 $jsonend = Env::v('jsonEnd');
240 if (Env::has('jsonVar')) {
241 $jsonbegin = Env::v('jsonVar').' = ';
242 $jsonend = ';';
243 } elseif (Env::has('jsonFunc')) {
244 $jsonbegin = Env::v('jsonFunc').'(';
245 $jsonend = ');';
246 }
247 echo $jsonbegin, json_encode($this->_jsonVars), $jsonend;
248 exit;
249 }
250 // }}}
251 // {{{ function jsonAssign
252 public function jsonAssign($var, $value)
253 {
254 $this->_jsonVars[$var] = $value;
255 }
fba760d2 256
257 // }}}
4a8a1e0a 258}
259
260function escape_xorgDB(&$item, $key)
261{
262 if (is_a($item, 'XOrgDBIterator')) {
263 $expanded = array();
264 while ($a = $item->next()) {
265 $expanded[] = $a;
266 }
267 $item = $expanded;
268 }
0337d704 269}
270
b76f0797 271// {{{ function escape_html ()
272
273/**
274 * default smarty plugin, used to auto-escape dangerous html.
275 *
276 * < --> &lt;
277 * > --> &gt;
278 * " --> &quot;
279 * & not followed by some entity --> &amp;
280 */
281function escape_html($string)
282{
283 if (is_string($string)) {
b16476f7 284 $transtbl = Array('<' => '&lt;', '>' => '&gt;', '"' => '&quot;', '\'' => '&#39;');
285 return strtr($string, $transtbl);
b76f0797 286 } else {
b16476f7 287 return $string;
b76f0797 288 }
289}
290
291// }}}
292// {{{ function at_to_globals()
293
294/**
295 * helper
296 */
297
298function _to_globals($s) {
299 global $globals;
300 $t = explode('.',$s);
301 if (count($t) == 1) {
302 return var_export($globals->$t[0],true);
303 } else {
304 return var_export($globals->$t[0]->$t[1],true);
305 }
306}
307
308/**
309 * compilation plugin used to import $globals confing through #globals.foo.bar# directives
310 */
311
312function at_to_globals($tpl_source, &$smarty)
313{
314 return preg_replace('/#globals\.([a-zA-Z0-9_.]+?)#/e', '_to_globals(\'\\1\')', $tpl_source);
315}
316
317// }}}
318// {{{ function trimwhitespace
319
320function trimwhitespace($source, &$smarty)
321{
120bd636 322 $tags = '(script|pre|textarea)';
abe7e055 323 preg_match_all("!<$tags.*?>.*?</(\\1)>!ius", $source, $tagsmatches);
324 $source = preg_replace("!<$tags.*?>.*?</(\\1)>!ius", "&&&tags&&&", $source);
b76f0797 325
326 // remove all leading spaces, tabs and carriage returns NOT
327 // preceeded by a php close tag.
328 $source = preg_replace('/((?<!\?>)\n)[\s]+/m', '\1', $source);
120bd636 329 $source = preg_replace("!&&&tags&&&!e", 'array_shift($tagsmatches[0])', $source);
b76f0797 330
331 return $source;
332}
333
334// }}}
7a3f546b 335// {{{ function wiki_include
336
337function wiki_include($source, &$smarty)
338{
339 return preg_replace('/\{include( [^}]*)? wiki=([^} ]+)(.*?)\}/ui',
340 '{include\1 file="../spool/wiki.d/cache_\2.tpl"\3 included=1}',
341 $source);
342}
343
344// }}}
edc636b8 345// {{{
346
347function form_force_encodings($source, &$smarty)
348{
349 return preg_replace('/<form[^\w]/',
a7de4ef7 350 '\0 accept-charset="utf-8" ',
edc636b8 351 $source);
352}
353
354// }}}
bf2e1ab0 355// {{{ function hide_emails
356
357function _hide_email($source)
358{
1bd2bc7e 359 $source = str_replace("\n", '', $source);
6b8d257b 360 return '<script type="text/javascript">//<![CDATA[' . "\n" .
361 'Nix.decode("' . addslashes(str_rot13($source)) . '");' . "\n" .
362 '//]]></script>';
bf2e1ab0 363}
364
365function hide_emails($source, &$smarty)
366{
367 //prevent email replacement in <script> and <textarea>
120bd636 368 $tags = '(script|textarea|select)';
abe7e055 369 preg_match_all("!<$tags.*?>.*?</(\\1)>!ius", $source, $tagsmatches);
370 $source = preg_replace("!<$tags.*?>.*?</(\\1)>!ius", "&&&tags&&&", $source);
bf2e1ab0 371
372 //catch all emails in <a href="mailto:...">
a14159bf 373 preg_match_all("!<a[^>]+href=[\"'][^\"']*[-a-z0-9+_.]+@[-a-z0-9_.]+[^\"']*[\"'].*?>.*?</a>!ius", $source, $ahref);
374 $source = preg_replace("!<a[^>]+href=[\"'][^\"']*[-a-z0-9+_.]+@[-a-z0-9_.]+[^\"']*[\"'].*?>.*?</a>!ius", '&&&ahref&&&', $source);
bf2e1ab0 375
376 //prevant replacement in tag attributes
abe7e055 377 preg_match_all("!<[^>]+[-a-z0-9_+.]+@[-a-z0-9_.]+.+?>!ius", $source, $misc);
378 $source = preg_replace("!<[^>]+[-a-z0-9_+.]+@[-a-z0-9_.]+.+?>!ius", '&&&misc&&&', $source);
bf2e1ab0 379
380 //catch !
abe7e055 381 $source = preg_replace('!([-a-z0-9_+.]+@[-a-z0-9_.]+)!iue', '_hide_email("\1")', $source);
bf2e1ab0 382 $source = preg_replace('!&&&ahref&&&!e', '_hide_email(array_shift($ahref[0]))', $source);
bf2e1ab0 383
384 // restore data
2456ea61 385 $source = preg_replace('!&&&misc&&&!e', 'array_shift($misc[0])', $source);
120bd636 386 $source = preg_replace("!&&&tags&&&!e", 'array_shift($tagsmatches[0])', $source);
bf2e1ab0 387
388 return $source;
389}
390
391// }}}
b76f0797 392
a7de4ef7 393// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
0337d704 394?>