Add memory usage in the devel banner
[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 class PlatalPage extends Smarty
25 {
26 var $_page_type;
27 var $_tpl;
28 var $_errors;
29 var $_failure;
30
31 // defaults
32 var $caching = false;
33 var $config_overwrite = false;
34 var $use_sub_dirs = false;
35
36 // {{{ function PlatalPage()
37
38 function PlatalPage($tpl, $type = SKINNED)
39 {
40 global $globals;
41
42 $this->Smarty();
43
44 $this->template_dir = $globals->spoolroot."/templates/";
45 $this->compile_dir = $globals->spoolroot."/spool/templates_c/";
46 array_unshift($this->plugins_dir, $globals->spoolroot."/plugins/");
47 $this->config_dir = $globals->spoolroot."/configs/";
48
49 $this->compile_check = !empty($globals->debug);
50
51 $this->_page_type = $type;
52 $this->_tpl = $tpl;
53 $this->_errors = array();
54 $this->_failure = false;
55
56 $this->register_prefilter('at_to_globals');
57 $this->register_prefilter('trimwhitespace');
58 $this->register_prefilter('form_force_encodings');
59 $this->addJsLink('xorg.js');
60 }
61
62 // }}}
63 // {{{ function changeTpl()
64
65 function changeTpl($tpl, $type = SKINNED)
66 {
67 $this->_tpl = $tpl;
68 $this->_page_type = $type;
69 $this->assign('xorg_tpl', $tpl);
70 }
71
72 // }}}
73 // {{{ function _run()
74
75 function _run($skin)
76 {
77 global $globals, $TIME_BEGIN;
78
79 session_write_close();
80
81 $this->assign('xorg_errors', $this->_errors);
82 $this->assign('xorg_failure', $this->_failure);
83 $this->assign('globals', $globals);
84
85 if (Env::v('display') == 'light') {
86 $this->_page_type = SIMPLE;
87 } elseif (Env::v('display') == 'raw') {
88 $this->_page_type = NO_SKIN;
89 } elseif (Env::v('display') == 'full') {
90 $this->_page_typ = SKINNED;
91 }
92
93 switch ($this->_page_type) {
94 case NO_SKIN:
95 error_reporting(0);
96 $this->display($this->_tpl);
97 exit;
98
99 case SIMPLE:
100 $this->assign('simple', true);
101
102 case SKINNED:
103 $this->register_modifier('escape_html', 'escape_html');
104 $this->default_modifiers = Array('@escape_html');
105 }
106 $this->register_outputfilter('hide_emails');
107 $this->addJsLink('wiki.js');
108 header("Accept-Charset: utf-8");
109
110 if (!$globals->debug) {
111 error_reporting(0);
112 $this->display($skin);
113 exit;
114 }
115
116 if ($globals->debug & 1) {
117 PlBacktrace::clean();
118 $this->assign_by_ref('backtraces', PlBacktrace::$bt);
119 }
120
121 $this->assign('validate', true);
122 error_reporting(0);
123 $result = $this->fetch($skin);
124 $ttime = sprintf('Temps total: %.02fs - Mémoire totale : %.02fKo<br />', microtime(true) - $TIME_BEGIN
125 , memory_get_peak_usage(true) / 1024);
126 $replc = "<span class='erreur'>VALIDATION HTML INACTIVE</span><br />";
127
128 if ($globals->debug & 2) {
129 $fd = fopen($this->compile_dir."/valid.html","w");
130 fwrite($fd, $result);
131 fclose($fd);
132
133 exec($globals->spoolroot."/bin/devel/xhtml.validate.pl ".$this->compile_dir."/valid.html", $val);
134 foreach ($val as $h) {
135 if (preg_match("/^X-W3C-Validator-Errors: (\d+)$/", $h, $m)) {
136 $replc = '<span style="color: #080;">HTML OK</span><br />';
137 if ($m[1]) {
138 $replc = "<span class='erreur'><a href='http://validator.w3.org/check?uri={$globals->baseurl}"
139 ."/valid.html&amp;ss=1#result'>{$m[1]} ERREUR(S) !!!</a></span><br />";
140 }
141 break;
142 }
143 }
144 }
145
146 echo str_replace("@HOOK@", $ttime.$replc, $result);
147 exit;
148 }
149
150 // }}}
151 // {{{ function nb_errs()
152
153 function nb_errs()
154 {
155 return count($this->_errors);
156 }
157
158 // }}}
159 // {{{ function trig()
160
161 function trig($msg)
162 {
163 $this->_errors[] = $msg;
164 }
165
166 // }}}
167 // {{{ function kill()
168
169 function kill($msg)
170 {
171 global $platal;
172
173 $this->assign('platal', $platal);
174 $this->trig($msg);
175 $this->_failure = true;
176 $this->run();
177 }
178
179 // }}}
180 // {{{ function addJsLink
181
182 function addJsLink($path)
183 {
184 $this->append('xorg_js', $path);
185 }
186
187 // }}}
188 // {{{ function addCssLink
189
190 function addCssLink($path)
191 {
192 $this->append('xorg_css', $path);
193 }
194
195 // }}}
196 // {{{ function addCssInline
197
198 function addCssInline($css)
199 {
200 if (!empty($css)) {
201 $this->append('xorg_inline_css', $css);
202 }
203 }
204
205 // }}}
206 // {{{ function setRssLink
207
208 function setRssLink($title, $path)
209 {
210 $this->assign('xorg_rss', array('title' => $title, 'href' => $path));
211 }
212
213 // }}}
214 }
215
216 // {{{ function escape_html ()
217
218 /**
219 * default smarty plugin, used to auto-escape dangerous html.
220 *
221 * < --> &lt;
222 * > --> &gt;
223 * " --> &quot;
224 * & not followed by some entity --> &amp;
225 */
226 function escape_html($string)
227 {
228 if (is_string($string)) {
229 $transtbl = Array('<' => '&lt;', '>' => '&gt;', '"' => '&quot;', '\'' => '&#39;');
230 return preg_replace("/&(?![A-Za-z]{0,4}\w{2,3};|#[0-9]{2,4};)/", "&amp;" , strtr($string, $transtbl));
231 } else {
232 return $string;
233 }
234 }
235
236 // }}}
237 // {{{ function at_to_globals()
238
239 /**
240 * helper
241 */
242
243 function _to_globals($s) {
244 global $globals;
245 $t = explode('.',$s);
246 if (count($t) == 1) {
247 return var_export($globals->$t[0],true);
248 } else {
249 return var_export($globals->$t[0]->$t[1],true);
250 }
251 }
252
253 /**
254 * compilation plugin used to import $globals confing through #globals.foo.bar# directives
255 */
256
257 function at_to_globals($tpl_source, &$smarty)
258 {
259 return preg_replace('/#globals\.([a-zA-Z0-9_.]+?)#/e', '_to_globals(\'\\1\')', $tpl_source);
260 }
261
262 // }}}
263 // {{{ function trimwhitespace
264
265 function trimwhitespace($source, &$smarty)
266 {
267 $tags = '(script|pre|textarea)';
268 preg_match_all("!<$tags.*?>.*?</$tags>!ius", $source, $tagsmatches);
269 $source = preg_replace("!<$tags.*?>.*?</$tags>!ius", "&&&tags&&&", $source);
270
271 // remove all leading spaces, tabs and carriage returns NOT
272 // preceeded by a php close tag.
273 $source = preg_replace('/((?<!\?>)\n)[\s]+/m', '\1', $source);
274 $source = preg_replace("!&&&tags&&&!e", 'array_shift($tagsmatches[0])', $source);
275
276 return $source;
277 }
278
279 // }}}
280 // {{{
281
282 function form_force_encodings($source, &$smarty)
283 {
284 return preg_replace('/<form[^\w]/',
285 '\0 accept-charset="utf-8" ',
286 $source);
287 }
288
289 // }}}
290 // {{{ function hide_emails
291
292 function _hide_email($source)
293 {
294 $source = str_replace("\n", '', $source);
295 return '<script type="text/javascript">//<![CDATA[' . "\n" .
296 'Nix.decode("' . addslashes(str_rot13($source)) . '");' . "\n" .
297 '//]]></script>';
298 }
299
300 function hide_emails($source, &$smarty)
301 {
302 //prevent email replacement in <script> and <textarea>
303 $tags = '(script|textarea|select)';
304 preg_match_all("!<$tags.*?>.*?</$tags>!ius", $source, $tagsmatches);
305 $source = preg_replace("!<$tags.*?>.*?</$tags>!ius", "&&&tags&&&", $source);
306
307 //catch all emails in <a href="mailto:...">
308 preg_match_all("!<a[^>]+href=[\"'][^\"']*[-a-z0-9+_.]+@[-a-z0-9_.]+[^\"']*[\"'].*?>.*?</a>!ius", $source, $ahref);
309 $source = preg_replace("!<a[^>]+href=[\"'][^\"']*[-a-z0-9+_.]+@[-a-z0-9_.]+[^\"']*[\"'].*?>.*?</a>!ius", '&&&ahref&&&', $source);
310
311 //prevant replacement in tag attributes
312 preg_match_all("!<[^>]+[-a-z0-9_+.]+@[-a-z0-9_.]+.+?>!is", $source, $misc);
313 $source = preg_replace("!<[^>]+[-a-z0-9_+.]+@[-a-z0-9_.]+.+?>!is", '&&&misc&&&', $source);
314
315 //catch !
316 $source = preg_replace('!([-a-z0-9_+.]+@[-a-z0-9_.]+)!ie', '_hide_email("\1")', $source);
317 $source = preg_replace('!&&&ahref&&&!e', '_hide_email(array_shift($ahref[0]))', $source);
318
319 // restore data
320 $source = preg_replace('!&&&misc&&&!e', 'array_shift($misc[0])', $source);
321 $source = preg_replace("!&&&tags&&&!e", 'array_shift($tagsmatches[0])', $source);
322
323 return $source;
324 }
325
326 // }}}
327
328 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
329 ?>