Example #1
0
 /**
  *  Load
  *
  *  Load template. If the template is already compiled, just the compiled
  *  PHP file will be included an used. If the template is new, or it 
  *  had changed, the Haanga compiler is loaded in memory, and the template
  *  is compiled.
  *
  *
  *  @param string $file
  *  @param array  $vars 
  *  @param bool   $return
  *  @param array  $blocks   
  *
  *  @return string|NULL
  */
 public static function Load($file, $vars = array(), $return = FALSE, $blocks = array())
 {
     if (empty(self::$cache_dir)) {
         throw new Haanga_Exception("Cache dir or template dir is missing");
     }
     self::$has_compiled = FALSE;
     $tpl = self::$templates_dir . '/' . $file;
     $fnc = sha1($tpl);
     $callback = "haanga_" . $fnc;
     if (is_callable($callback)) {
         return $callback($vars, $return, $blocks);
     }
     $php = self::$hash_filename ? $fnc : $file;
     $php = self::$cache_dir . '/' . $php . '.php';
     $check = TRUE;
     if (self::$check_ttl && self::$check_get && self::$check_set) {
         /* */
         if (call_user_func(self::$check_get, $callback)) {
             /* disable checking for the next $check_ttl seconds */
             $check = FALSE;
         } else {
             $result = call_user_func(self::$check_set, $callback, TRUE, self::$check_ttl);
         }
     }
     if (!is_file($php) || $check && filemtime($tpl) > filemtime($php)) {
         if (!is_file($tpl)) {
             /* There is no template nor compiled file */
             throw new Exception("View {$file} doesn't exists");
         }
         if (!is_dir(dirname($php))) {
             $old = umask(0);
             mkdir(dirname($php), 0777, TRUE);
             umask($old);
         }
         $fp = fopen($php, "a+");
         /* try to block PHP file */
         if (!flock($fp, LOCK_EX | LOCK_NB)) {
             /* couldn't block, another process is already compiling */
             fclose($fp);
             if (is_file($php)) {
                 /*
                  ** if there is an old version of the cache 
                  ** load it 
                  */
                 require $php;
                 if (is_callable($callback)) {
                     return $callback($vars, $return, $blocks);
                 }
             }
             /*
              ** no luck, probably the template is new
              ** the compilation will be done, but we won't
              ** save it (we'll use eval instead)
              */
             unset($fp);
         }
         /* recompile */
         $compiler = self::getCompiler();
         if (self::$debug) {
             $compiler->setDebug($php . ".dump");
         }
         try {
             $code = $compiler->compile_file($tpl, FALSE, $vars);
         } catch (Exception $e) {
             if (isset($fp)) {
                 /*
                  ** set the $php file as old (to force future
                  ** recompilation)
                  */
                 touch($php, 300, 300);
                 chmod($php, 0777);
             }
             /* re-throw exception */
             throw $e;
         }
         if (isset($fp)) {
             ftruncate($fp, 0);
             // truncate file
             fwrite($fp, "<?php" . $code);
             flock($fp, LOCK_UN);
             // release the lock
             fclose($fp);
         } else {
             /* local eval */
             eval($code);
         }
         self::$has_compiled = TRUE;
     }
     if (!is_callable($callback)) {
         /* Load the cached PHP file */
         require $php;
         if (!is_callable($callback)) {
             /* 
               really weird case ($php is empty, another process is compiling
               the $tpl for the first time), so create a lambda function
               for the template
             */
             $lambda = self::compile(file_get_contents($tpl), $vars);
             return $lambda($vars, $return, $blocks);
         }
     }
     if (!isset($HAANGA_VERSION) || $HAANGA_VERSION != HAANGA_VERSION) {
         touch($php, 300, 300);
         chmod($php, 0777);
     }
     return $callback($vars, $return, $blocks);
 }
Example #2
0
 /**
  *  Load
  *
  *  Load template. If the template is already compiled, just the compiled
  *  PHP file will be included an used. If the template is new, or it 
  *  had changed, the Haanga compiler is loaded in memory, and the template
  *  is compiled.
  *
  *
  *  @param string $file
  *  @param array  $vars 
  *  @param bool   $return
  *  @param array  $blocks   
  *
  *  @return string|NULL
  */
 public static function Load($file, $vars = array(), $return = FALSE, $blocks = array())
 {
     static $compiler;
     if (empty(self::$cache_dir)) {
         throw new Haanga_Exception("Cache dir or template dir is missing");
     }
     self::$has_compiled = FALSE;
     $tpl = self::$templates_dir . '/' . $file;
     $fnc = sha1($tpl);
     $callback = "haanga_" . $fnc;
     if (is_callable($callback)) {
         return $callback($vars, $return, $blocks);
     }
     $php = self::$hash_filename ? $fnc : $file;
     $php = self::$cache_dir . '/' . $php . '.php';
     $check = TRUE;
     if (self::$check_ttl && self::$check_get && self::$check_set) {
         /* */
         if (call_user_func(self::$check_get, $callback)) {
             /* disable checking for the next $check_ttl seconds */
             $check = FALSE;
         } else {
             $result = call_user_func(self::$check_set, $callback, TRUE, self::$check_ttl);
         }
     }
     if (!is_file($php) || $check && filemtime($tpl) > filemtime($php)) {
         if (!is_file($tpl)) {
             /* There is no template nor compiled file */
             throw new Exception("View {$file} doesn't exists");
         }
         if (!is_dir(dirname($php))) {
             $old = umask(0);
             mkdir(dirname($php), 0777, TRUE);
             umask($old);
         }
         $fp = fopen($php, "a+");
         /* try to block PHP file */
         if (!flock($fp, LOCK_EX | LOCK_NB)) {
             /* couldn't block, another process is already compiling */
             fclose($fp);
             if (is_file($php)) {
                 /*
                  ** if there is an old version of the cache 
                  ** load it 
                  */
                 require $php;
                 return $callback($vars, $return, $blocks);
             }
             /*
              ** no luck, probably the template is new
              ** the compilation will be done, but we won't
              ** save
              */
             unset($fp);
         }
         /* recompile */
         if (!$compiler) {
             self::checkCacheDir();
             /* Load needed files (to avoid autoload as much as possible) */
             $dir = dirname(__FILE__);
             require_once "{$dir}/Haanga/AST.php";
             require_once "{$dir}/Haanga/Compiler.php";
             require_once "{$dir}/Haanga/Compiler/Runtime.php";
             require_once "{$dir}/Haanga/Compiler/Parser.php";
             require_once "{$dir}/Haanga/Compiler/Lexer.php";
             require_once "{$dir}/Haanga/Generator/PHP.php";
             require_once "{$dir}/Haanga/Extension.php";
             require_once "{$dir}/Haanga/Extension/Filter.php";
             require_once "{$dir}/Haanga/Extension/Tag.php";
             /* load compiler (done just once) */
             if (self::$use_autoload) {
                 spl_autoload_register(array(__CLASS__, 'AutoLoad'));
             }
             $compiler = new Haanga_Compiler_Runtime();
             if (self::$bootstrap) {
                 /* call bootstrap hook, just the first time */
                 call_user_func(self::$bootstrap);
             }
             if (count(self::$compiler) != 0) {
                 foreach (self::$compiler as $opt => $value) {
                     Haanga_Compiler::setOption($opt, $value);
                 }
             }
         }
         $compiler->reset();
         if (self::$debug) {
             $compiler->setDebug($php . ".dump");
         }
         $code = $compiler->compile_file($tpl, FALSE, $vars);
         if (isset($fp)) {
             ftruncate($fp, 0);
             // truncate file
             fwrite($fp, "<?php" . $code);
             flock($fp, LOCK_UN);
             // release the lock
             fclose($fp);
         } else {
             /* local eval */
             eval($code);
         }
         self::$has_compiled = TRUE;
     }
     if (!is_callable($callback)) {
         require $php;
     }
     if (!isset($HAANGA_VERSION) || $HAANGA_VERSION != HAANGA_VERSION) {
         touch($php, 300, 300);
         chmod($php, 0777);
     }
     return $callback($vars, $return, $blocks);
 }