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