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