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