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