public function init($test_file, &$expected)
{
if ($test_file == 'assert_templates/strip_whitespace.tpl') {
Haanga_Compiler::setOption('strip_whitespace', TRUE);
$expected = rtrim($expected) . ' ';
/* weird output */
} else {
Haanga_Compiler::setOption('strip_whitespace', FALSE);
}
}
/**
* @dataProvider tplProvider
*
*/
public function testInvalidTemplates($tpl)
{
Haanga_Compiler::setOption('allow_exec', FALSE);
try {
Haanga::Load($tpl);
$this->assertTrue(FALSE);
} catch (Haanga_Compiler_Exception $e) {
$i = preg_match("/in.*:[0-9]+/", $e->getMessage());
$this->assertEquals(1, $i);
}
}
static final function main_cli()
{
$argv = $GLOBALS['argv'];
$haanga = new Haanga_Compiler();
$code = $haanga->compile_file($argv[1], TRUE);
if (!isset($argv[2]) || $argv[2] != '--notags') {
$code = "<?php\n\n{$code}";
}
echo $code;
}
/**
* Return an echo of an stmt
*
* @return string
*/
protected function php_print($op)
{
$output = $this->php_generate_stmt($op, Haanga_Compiler::getOption('echo_concat'));
if ($output == "' '" && Haanga_Compiler::getOption('strip_whitespace')) {
return;
/* ignore this */
}
return 'echo ' . $output . ';';
}
/**
* This function is a singleton for the Haanga_Compiler_Runtime class.
* The instance is already set up properly and resetted.
*
*
* @param bool $checkdir TRUE
*
* @return Haanga_Compiler_Runtime
*/
protected static function getCompiler($checkdir = TRUE)
{
static $compiler;
static $has_checkdir = FALSE;
if (!$compiler) {
/* 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/Tokenizer.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);
}
}
}
if ($checkdir && !$has_checkdir) {
self::checkCacheDir();
$has_checkdir = TRUE;
}
$compiler->reset();
return $compiler;
}
function yy_r29()
{
if (!is_file($this->yystack[$this->yyidx + 0]->minor) || !Haanga_Compiler::getOption('enable_load')) {
$this->error($this->yystack[$this->yyidx + 0]->minor . " is not a valid file");
}
require_once $this->yystack[$this->yyidx + 0]->minor;
}
function yy_r29()
{
if (is_file(dirname($this->file) . '/' . $this->yystack[$this->yyidx + 0]->minor)) {
$this->yystack[$this->yyidx + 0]->minor = dirname($this->file) . '/' . $this->yystack[$this->yyidx + 0]->minor;
} else {
if (is_file(getcwd() . '/' . $this->yystack[$this->yyidx + 0]->minor)) {
$this->yystack[$this->yyidx + 0]->minor = getcwd() . '/' . $this->yystack[$this->yyidx + 0]->minor;
}
}
if (!is_file($this->yystack[$this->yyidx + 0]->minor) || !Haanga_Compiler::getOption('enable_load')) {
$this->error($this->yystack[$this->yyidx + 0]->minor . " is not a valid file");
}
require_once $this->yystack[$this->yyidx + 0]->minor;
}
/**
* 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);
}
#!/usr/bin/php <?php require dirname(__FILE__) . "/lib/Haanga.php"; Haanga::registerAutoload(); Haanga_Compiler::main_cli();
