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