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