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