Source for file Smarty_Compiler.class.php

 

 

 

class Smarty_Compiler extends Smarty {

 

    // internal vars

    /**#@+

    var $_folded_blocks         =   array();    // keeps folded template blocks

    var $_current_file          =   null;       // the current template being compiled

    var $_current_line_no       =   1;          // line number for error messages

    var $_capture_stack         =   array();    // keeps track of nested capture buffers

    var $_plugin_info           =   array();    // keeps track of plugins to load

    var $_init_smarty_vars      =   false;

    var $_permitted_tokens      =   array('true','false','yes','no','on','off','null');

    var $_db_qstr_regexp        =   null;        // regexps are setup in the constructor

    var $_si_qstr_regexp        =   null;

    var $_qstr_regexp           =   null;

    var $_func_regexp           =   null;

    var $_reg_obj_regexp        =   null;

    var $_var_bracket_regexp    =   null;

    var $_num_const_regexp      =   null;

    var $_dvar_guts_regexp      =   null;

    var $_dvar_regexp           =   null;

    var $_cvar_regexp           =   null;

    var $_svar_regexp           =   null;

    var $_avar_regexp           =   null;

    var $_mod_regexp            =   null;

    var $_var_regexp            =   null;

    var $_parenth_param_regexp  =   null;

    var $_func_call_regexp      =   null;

    var $_obj_ext_regexp        =   null;

    var $_obj_start_regexp      =   null;

    var $_obj_params_regexp     =   null;

    var $_obj_call_regexp       =   null;

    var $_cacheable_state       =   0;

    var $_cache_attrs_count     =   0;

    var $_nocache_count         =   0;

    var $_cache_serial          =   null;

    var $_cache_include         =   null;

 

    var $_strip_depth           =   0;

    var $_additional_newline    =   "\n";

 

    /**#@-*/

    /**

    function Smarty_Compiler()

    {

        // matches double quoted strings:

        // "foobar"

        // "foo\"bar"

        $this->_db_qstr_regexp = '"[^"\\\\]*(?:\\\\.[^"\\\\]*)*"';

 

        // matches single quoted strings:

        // 'foobar'

        // 'foo\'bar'

        $this->_si_qstr_regexp = '\'[^\'\\\\]*(?:\\\\.[^\'\\\\]*)*\'';

 

        // matches single or double quoted strings

        $this->_qstr_regexp = '(?:' . $this->_db_qstr_regexp . '|' . $this->_si_qstr_regexp . ')';

 

        // matches bracket portion of vars

        // [0]

        // [foo]

        // [$bar]

        $this->_var_bracket_regexp = '\[\$?[\w\.]+\]';

 

        // matches numerical constants

        // 30

        // -12

        // 13.22

        $this->_num_const_regexp = '(?:\-?\d+(?:\.\d+)?)';

 

        // matches $ vars (not objects):

        // $foo

        // $foo.bar

        // $foo.bar.foobar

        // $foo[0]

        // $foo[$bar]

        // $foo[5][blah]

        // $foo[5].bar[$foobar][4]

        $this->_dvar_math_regexp = '(?:[\+\*\/\%]|(?:-(?!>)))';

        $this->_dvar_math_var_regexp = '[\$\w\.\+\-\*\/\%\d\>\[\]]';

        $this->_dvar_guts_regexp = '\w+(?:' . $this->_var_bracket_regexp

                . ')*(?:\.\$?\w+(?:' . $this->_var_bracket_regexp . ')*)*(?:' . $this->_dvar_math_regexp . '(?:' . $this->_num_const_regexp . '|' . $this->_dvar_math_var_regexp . ')*)?';

        $this->_dvar_regexp = '\$' . $this->_dvar_guts_regexp;

 

        // matches config vars:

        // #foo#

        // #foobar123_foo#

        $this->_cvar_regexp = '\#\w+\#';

 

        // matches section vars:

        // %foo.bar%

        $this->_svar_regexp = '\%\w+\.\w+\%';

 

        // matches all valid variables (no quotes, no modifiers)

        $this->_avar_regexp = '(?:' . $this->_dvar_regexp . '|'

           . $this->_cvar_regexp . '|' . $this->_svar_regexp . ')';

 

        // matches valid variable syntax:

        // $foo

        // $foo

        // #foo#

        // #foo#

        // "text"

        // "text"

        $this->_var_regexp = '(?:' . $this->_avar_regexp . '|' . $this->_qstr_regexp . ')';

 

        // matches valid object call (one level of object nesting allowed in parameters):

        // $foo->bar

        // $foo->bar()

        // $foo->bar("text")

        // $foo->bar($foo, $bar, "text")

        // $foo->bar($foo, "foo")

        // $foo->bar->foo()

        // $foo->bar->foo->bar()

        // $foo->bar($foo->bar)

        // $foo->bar($foo->bar())

        // $foo->bar($foo->bar($blah,$foo,44,"foo",$foo[0].bar))

        $this->_obj_ext_regexp = '\->(?:\$?' . $this->_dvar_guts_regexp . ')';

        $this->_obj_restricted_param_regexp = '(?:'

                . '(?:' . $this->_var_regexp . '|' . $this->_num_const_regexp . ')(?:' . $this->_obj_ext_regexp . '(?:\((?:(?:' . $this->_var_regexp . '|' . $this->_num_const_regexp . ')'

                . '(?:\s*,\s*(?:' . $this->_var_regexp . '|' . $this->_num_const_regexp . '))*)?\))?)*)';

        $this->_obj_single_param_regexp = '(?:\w+|' . $this->_obj_restricted_param_regexp . '(?:\s*,\s*(?:(?:\w+|'

                . $this->_var_regexp . $this->_obj_restricted_param_regexp . ')))*)';

        $this->_obj_params_regexp = '\((?:' . $this->_obj_single_param_regexp

                . '(?:\s*,\s*' . $this->_obj_single_param_regexp . ')*)?\)';

        $this->_obj_start_regexp = '(?:' . $this->_dvar_regexp . '(?:' . $this->_obj_ext_regexp . ')+)';

        $this->_obj_call_regexp = '(?:' . $this->_obj_start_regexp . '(?:' . $this->_obj_params_regexp . ')?(?:' . $this->_dvar_math_regexp . '(?:' . $this->_num_const_regexp . '|' . $this->_dvar_math_var_regexp . ')*)?)';

        

        // matches valid modifier syntax:

        // |foo

        // |@foo

        // |foo:"bar"

        // |foo:$bar

        // |foo:"bar":$foobar

        // |foo|bar

        // |foo:$foo->bar

        $this->_mod_regexp = '(?:\|@?\w+(?::(?:\w+|' . $this->_num_const_regexp . '|'

           . $this->_obj_call_regexp . '|' . $this->_avar_regexp . '|' . $this->_qstr_regexp .'))*)';

 

        // matches valid function name:

        // foo123

        // _foo_bar

        $this->_func_regexp = '[a-zA-Z_]\w*';

 

        // matches valid registered object:

        // foo->bar

        $this->_reg_obj_regexp = '[a-zA-Z_]\w*->[a-zA-Z_]\w*';

 

        // matches valid parameter values:

        // true

        // $foo

        // $foo|bar

        // #foo#

        // #foo#|bar

        // "text"

        // "text"|bar

        // $foo->bar

        $this->_param_regexp = '(?:\s*(?:' . $this->_obj_call_regexp . '|'

           . $this->_var_regexp . '|' . $this->_num_const_regexp  . '|\w+)(?>' . $this->_mod_regexp . '*)\s*)';

 

        // matches valid parenthesised function parameters:

        //

        // "text"

        //    $foo, $bar, "text"

        // $foo|bar, "foo"|bar, $foo->bar($foo)|bar

        $this->_parenth_param_regexp = '(?:\((?:\w+|'

                . $this->_param_regexp . '(?:\s*,\s*(?:(?:\w+|'

                . $this->_param_regexp . ')))*)?\))';

 

        // matches valid function call:

        // foo()

        // foo_bar($foo)

        // _foo_bar($foo,"bar")

        // foo123($foo,$foo->bar(),"foo")

        $this->_func_call_regexp = '(?:' . $this->_func_regexp . '\s*(?:'

           . $this->_parenth_param_regexp . '))';

    }

 

    /**

    function _compile_file($resource_name, $source_content, &$compiled_content)

    {

 

        if ($this->security) {

            // do not allow php syntax to be executed unless specified

            if ($this->php_handling == SMARTY_PHP_ALLOW &&

                !$this->security_settings['PHP_HANDLING']) {

                $this->php_handling = SMARTY_PHP_PASSTHRU;

            }

        }

 

        $this->_load_filters();

 

        $this->_current_file = $resource_name;

        $this->_current_line_no = 1;

        $ldq = preg_quote($this->left_delimiter, '~');

        $rdq = preg_quote($this->right_delimiter, '~');

 

        // run template source through prefilter functions

        if (count($this->_plugins['prefilter']) > 0) {

            foreach ($this->_plugins['prefilter'] as $filter_name => $prefilter) {

                if ($prefilter === false) continue;

                if ($prefilter[3] || is_callable($prefilter[0])) {

                    $source_content = call_user_func_array($prefilter[0],

                                                            array($source_content, &$this));

                    $this->_plugins['prefilter'][$filter_name][3] = true;

                } else {

                    $this->_trigger_fatal_error("[plugin] prefilter '$filter_name' is not implemented");

                }

            }

        }

 

        /* fetch all special blocks */

        $search = "~{$ldq}\*(.*?)\*{$rdq}|{$ldq}\s*literal\s*{$rdq}(.*?){$ldq}\s*/literal\s*{$rdq}|{$ldq}\s*php\s*{$rdq}(.*?){$ldq}\s*/php\s*{$rdq}~s";

 

        preg_match_all($search, $source_content, $match,  PREG_SET_ORDER);

        $this->_folded_blocks = $match;

        reset($this->_folded_blocks);

 

        /* replace special blocks by "{php}" */

        $source_content = preg_replace($search.'e', "'"

                                       . $this->_quote_replace($this->left_delimiter) . 'php'

                                       . "' . str_repeat(\"\n\", substr_count('\\0', \"\n\")) .'"

                                       . $this->_quote_replace($this->right_delimiter)

                                       . "'"

                                       , $source_content);

 

        /* Gather all template tags. */

        preg_match_all("~{$ldq}\s*(.*?)\s*{$rdq}~s", $source_content, $_match);

        $template_tags = $_match[1];

        /* Split content by template tags to obtain non-template content. */

        $text_blocks = preg_split("~{$ldq}.*?{$rdq}~s", $source_content);

 

        /* loop through text blocks */

        for ($curr_tb = 0, $for_max = count($text_blocks); $curr_tb < $for_max; $curr_tb++) {

            /* match anything resembling php tags */

            if (preg_match_all('~(<\?(?:\w+|=)?|\?>|language\s*=\s*[\"\']?\s*php\s*[\"\']?)~is', $text_blocks[$curr_tb], $sp_match)) {

                /* replace tags with placeholders to prevent recursive replacements */

                $sp_match[1] = array_unique($sp_match[1]);

                usort($sp_match[1], '_smarty_sort_length');

                for ($curr_sp = 0, $for_max2 = count($sp_match[1]); $curr_sp < $for_max2; $curr_sp++) {

                    $text_blocks[$curr_tb] = str_replace($sp_match[1][$curr_sp],'%%%SMARTYSP'.$curr_sp.'%%%',$text_blocks[$curr_tb]);

                }

                /* process each one */

                for ($curr_sp = 0, $for_max2 = count($sp_match[1]); $curr_sp < $for_max2; $curr_sp++) {

                    if ($this->php_handling == SMARTY_PHP_PASSTHRU) {

                        /* echo php contents */

                        $text_blocks[$curr_tb] = str_replace('%%%SMARTYSP'.$curr_sp.'%%%', '<?php echo \''.str_replace("'", "\'", $sp_match[1][$curr_sp]).'\'; ?>'."\n", $text_blocks[$curr_tb]);

                    } else if ($this->php_handling == SMARTY_PHP_QUOTE) {

                        /* quote php tags */

                        $text_blocks[$curr_tb] = str_replace('%%%SMARTYSP'.$curr_sp.'%%%', htmlspecialchars($sp_match[1][$curr_sp]), $text_blocks[$curr_tb]);

                    } else if ($this->php_handling == SMARTY_PHP_REMOVE) {

                        /* remove php tags */

                        $text_blocks[$curr_tb] = str_replace('%%%SMARTYSP'.$curr_sp.'%%%', '', $text_blocks[$curr_tb]);

                    } else {

                        /* SMARTY_PHP_ALLOW, but echo non php starting tags */

                        $sp_match[1][$curr_sp] = preg_replace('~(<\?(?!php|=|$))~i', '<?php echo \'\\1\'?>'."\n", $sp_match[1][$curr_sp]);

                        $text_blocks[$curr_tb] = str_replace('%%%SMARTYSP'.$curr_sp.'%%%', $sp_match[1][$curr_sp], $text_blocks[$curr_tb]);

                    }

                }

            }

        }

 

        /* Compile the template tags into PHP code. */

        $compiled_tags = array();

        for ($i = 0, $for_max = count($template_tags); $i < $for_max; $i++) {

            $this->_current_line_no += substr_count($text_blocks[$i], "\n");

            $compiled_tags[] = $this->_compile_tag($template_tags[$i]);

            $this->_current_line_no += substr_count($template_tags[$i], "\n");

        }

        if (count($this->_tag_stack)>0) {

            list($_open_tag, $_line_no) = end($this->_tag_stack);

            $this->_syntax_error("unclosed tag \{$_open_tag} (opened line $_line_no).", E_USER_ERROR, __FILE__, __LINE__);

            return;

        }

 

        /* Reformat $text_blocks between 'strip' and '/strip' tags,

        $strip = false;

        for ($i = 0, $for_max = count($compiled_tags); $i < $for_max; $i++) {

            if ($compiled_tags[$i] == '{strip}') {

                $compiled_tags[$i] = '';

                $strip = true;

                /* remove leading whitespaces */

                $text_blocks[$i + 1] = ltrim($text_blocks[$i + 1]);

            }

            if ($strip) {

                /* strip all $text_blocks before the next '/strip' */

                for ($j = $i + 1; $j < $for_max; $j++) {

                    /* remove leading and trailing whitespaces of each line */

                    $text_blocks[$j] = preg_replace('![\t ]*[\r\n]+[\t ]*!', '', $text_blocks[$j]);

                    if ($compiled_tags[$j] == '{/strip}') {                       

                        /* remove trailing whitespaces from the last text_block */

                        $text_blocks[$j] = rtrim($text_blocks[$j]);

                    }

                    $text_blocks[$j] = "<?php echo '" . strtr($text_blocks[$j], array("'"=>"\'", "\\"=>"\\\\")) . "'; ?>";

                    if ($compiled_tags[$j] == '{/strip}') {

                        $compiled_tags[$j] = "\n"; /* slurped by php, but necessary

                        $strip = false;

                        $i = $j;

                        break;

                    }

                }

            }

        }

        $compiled_content = '';

        

        $tag_guard = '%%%SMARTYOTG' . md5(uniqid(rand(), true)) . '%%%';

        

        /* Interleave the compiled contents and text blocks to get the final result. */

        for ($i = 0, $for_max = count($compiled_tags); $i < $for_max; $i++) {

            if ($compiled_tags[$i] == '') {

                // tag result empty, remove first newline from following text block

                $text_blocks[$i+1] = preg_replace('~^(\r\n|\r|\n)~', '', $text_blocks[$i+1]);

            }

            // replace legit PHP tags with placeholder

            $text_blocks[$i] = str_replace('<?', $tag_guard, $text_blocks[$i]);

            $compiled_tags[$i] = str_replace('<?', $tag_guard, $compiled_tags[$i]);

            

            $compiled_content .= $text_blocks[$i] . $compiled_tags[$i];

        }

        $compiled_content .= str_replace('<?', $tag_guard, $text_blocks[$i]);

 

        // escape php tags created by interleaving

        $compiled_content = str_replace('<?', "<?php echo '<?' ?>\n", $compiled_content);

        $compiled_content = preg_replace("~(?<!')language\s*=\s*[\"\']?\s*php\s*[\"\']?~", "<?php echo 'language=php' ?>\n", $compiled_content);

 

        // recover legit tags

        $compiled_content = str_replace($tag_guard, '<?', $compiled_content); 

        

        // remove \n from the end of the file, if any

        if (strlen($compiled_content) && (substr($compiled_content, -1) == "\n") ) {

            $compiled_content = substr($compiled_content, 0, -1);

        }

 

        if (!empty($this->_cache_serial)) {

            $compiled_content = "<?php \$this->_cache_serials['".$this->_cache_include."'] = '".$this->_cache_serial."'; ?>" . $compiled_content;

        }

 

        // run compiled template through postfilter functions

        if (count($this->_plugins['postfilter']) > 0) {

            foreach ($this->_plugins['postfilter'] as $filter_name => $postfilter) {

                if ($postfilter === false) continue;

                if ($postfilter[3] || is_callable($postfilter[0])) {

                    $compiled_content = call_user_func_array($postfilter[0],

                                                              array($compiled_content, &$this));

                    $this->_plugins['postfilter'][$filter_name][3] = true;

                } else {

                    $this->_trigger_fatal_error("Smarty plugin error: postfilter '$filter_name' is not implemented");

                }

            }

        }

 

        // put header at the top of the compiled template

        $template_header = "<?php /* Smarty version ".$this->_version.", created on ".strftime("%Y-%m-%d %H:%M:%S")."\n";

        $template_header .= "         compiled from ".strtr(urlencode($resource_name), array('%2F'=>'/', '%3A'=>':'))." */ ?>\n";

 

        /* Emit code to load needed plugins. */

        $this->_plugins_code = '';

        if (count($this->_plugin_info)) {

            $_plugins_params = "array('plugins' => array(";

            foreach ($this->_plugin_info as $plugin_type => $plugins) {

                foreach ($plugins as $plugin_name => $plugin_info) {

                    $_plugins_params .= "array('$plugin_type', '$plugin_name', '" . strtr($plugin_info[0], array("'" => "\\'", "\\" => "\\\\")) . "', $plugin_info[1], ";

                    $_plugins_params .= $plugin_info[2] ? 'true),' : 'false),';

                }

            }

            $_plugins_params .= '))';

            $plugins_code = "<?php require_once(SMARTY_CORE_DIR . 'core.load_plugins.php');\nsmarty_core_load_plugins($_plugins_params, \$this); ?>\n";

            $template_header .= $plugins_code;

            $this->_plugin_info = array();

            $this->_plugins_code = $plugins_code;

        }

 

        if ($this->_init_smarty_vars) {

            $template_header .= "<?php require_once(SMARTY_CORE_DIR . 'core.assign_smarty_interface.php');\nsmarty_core_assign_smarty_interface(null, \$this); ?>\n";

            $this->_init_smarty_vars = false;

        }

 

        $compiled_content = $template_header . $compiled_content;

        return true;

    }

 

    /**

    function _compile_tag($template_tag)

    {

        /* Matched comment. */

        if (substr($template_tag, 0, 1) == '*' && substr($template_tag, -1) == '*')

            return '';

        

        /* Split tag into two three parts: command, command modifiers and the arguments. */

        if(! preg_match('~^(?:(' . $this->_num_const_regexp . '|' . $this->_obj_call_regexp . '|' . $this->_var_regexp

                . '|\/?' . $this->_reg_obj_regexp . '|\/?' . $this->_func_regexp . ')(' . $this->_mod_regexp . '*))

            $this->_syntax_error("unrecognized tag: $template_tag", E_USER_ERROR, __FILE__, __LINE__);

        }

        

        $tag_command = $match[1];

        $tag_modifier = isset($match[2]) ? $match[2] : null;

        $tag_args = isset($match[3]) ? $match[3] : null;

 

        if (preg_match('~^' . $this->_num_const_regexp . '|' . $this->_obj_call_regexp . '|' . $this->_var_regexp . '$~', $tag_command)) {

            /* tag name is a variable or object */

            $_return = $this->_parse_var_props($tag_command . $tag_modifier);

            return "<?php echo $_return; ?>" . $this->_additional_newline;

        }

 

        /* If the tag name is a registered object, we process it. */

        if (preg_match('~^\/?' . $this->_reg_obj_regexp . '$~', $tag_command)) {

            return $this->_compile_registered_object_tag($tag_command, $this->_parse_attrs($tag_args), $tag_modifier);

        }

 

        switch ($tag_command) {

            case 'include':

                return $this->_compile_include_tag($tag_args);

 

            case 'include_php':

                return $this->_compile_include_php_tag($tag_args);

 

            case 'if':

                $this->_push_tag('if');

                return $this->_compile_if_tag($tag_args);

 

            case 'else':

                list($_open_tag) = end($this->_tag_stack);

                if ($_open_tag != 'if' && $_open_tag != 'elseif')

                    $this->_syntax_error('unexpected {else}', E_USER_ERROR, __FILE__, __LINE__);

                else

                    $this->_push_tag('else');

                return '<?php else: ?>';

 

            case 'elseif':

                list($_open_tag) = end($this->_tag_stack);

                if ($_open_tag != 'if' && $_open_tag != 'elseif')

                    $this->_syntax_error('unexpected {elseif}', E_USER_ERROR, __FILE__, __LINE__);

                if ($_open_tag == 'if')

                    $this->_push_tag('elseif');

                return $this->_compile_if_tag($tag_args, true);

 

            case '/if':

                $this->_pop_tag('if');

                return '<?php endif; ?>';

 

            case 'capture':

                return $this->_compile_capture_tag(true, $tag_args);

 

            case '/capture':

                return $this->_compile_capture_tag(false);

 

            case 'ldelim':

                return $this->left_delimiter;

 

            case 'rdelim':

                return $this->right_delimiter;

 

            case 'section':

                $this->_push_tag('section');

                return $this->_compile_section_start($tag_args);

 

            case 'sectionelse':

                $this->_push_tag('sectionelse');

                return "<?php endfor; else: ?>";

                break;

 

            case '/section':

                $_open_tag = $this->_pop_tag('section');

                if ($_open_tag == 'sectionelse')

                    return "<?php endif; ?>";

                else

                    return "<?php endfor; endif; ?>";

 

            case 'foreach':

                $this->_push_tag('foreach');

                return $this->_compile_foreach_start($tag_args);

                break;

 

            case 'foreachelse':

                $this->_push_tag('foreachelse');

                return "<?php endforeach; else: ?>";

 

            case '/foreach':

                $_open_tag = $this->_pop_tag('foreach');

                if ($_open_tag == 'foreachelse')

                    return "<?php endif; unset(\$_from); ?>";

                else

                    return "<?php endforeach; endif; unset(\$_from); ?>";

                break;

 

            case 'strip':

            case '/strip':

                if (substr($tag_command, 0, 1)=='/') {

                    $this->_pop_tag('strip');

                    if (--$this->_strip_depth==0) { /* outermost closing {/strip} */

                        $this->_additional_newline = "\n";

                        return '{' . $tag_command . '}';

                    }

                } else {

                    $this->_push_tag('strip');

                    if ($this->_strip_depth++==0) { /* outermost opening {strip} */

                        $this->_additional_newline = "";

                        return '{' . $tag_command . '}';

                    }

                }

                return '';

 

            case 'php':

                /* handle folded tags replaced by {php} */

                list(, $block) = each($this->_folded_blocks);

                $this->_current_line_no += substr_count($block[0], "\n");

                /* the number of matched elements in the regexp in _compile_file()

                switch (count($block)) {

                    case 2: /* comment */

                        return '';

 

                    case 3: /* literal */

                        return "<?php echo '" . strtr($block[2], array("'"=>"\'", "\\"=>"\\\\")) . "'; ?>" . $this->_additional_newline;

 

                    case 4: /* php */

                        if ($this->security && !$this->security_settings['PHP_TAGS']) {

                            $this->_syntax_error("(secure mode) php tags not permitted", E_USER_WARNING, __FILE__, __LINE__);

                            return;

                        }

                        return '<?php ' . $block[3] .' ?>';

                }

                break;

 

            case 'insert':

                return $this->_compile_insert_tag($tag_args);

 

            default:

                if ($this->_compile_compiler_tag($tag_command, $tag_args, $output)) {

                    return $output;

                } else if ($this->_compile_block_tag($tag_command, $tag_args, $tag_modifier, $output)) {

                    return $output;

                } else if ($this->_compile_custom_tag($tag_command, $tag_args, $tag_modifier, $output)) {

                    return $output;                    

                } else {

                    $this->_syntax_error("unrecognized tag '$tag_command'", E_USER_ERROR, __FILE__, __LINE__);

                }

 

        }

    }

 

 

    /**

    function _compile_compiler_tag($tag_command, $tag_args, &$output)

    {

        $found = false;

        $have_function = true;

 

        /*

        if (isset($this->_plugins['compiler'][$tag_command])) {

            $found = true;

            $plugin_func = $this->_plugins['compiler'][$tag_command][0];

            if (!is_callable($plugin_func)) {

                $message = "compiler function '$tag_command' is not implemented";

                $have_function = false;

            }

        }

        /*

        else if ($plugin_file = $this->_get_plugin_filepath('compiler', $tag_command)) {

            $found = true;

 

            include_once $plugin_file;

 

            $plugin_func = 'smarty_compiler_' . $tag_command;

            if (!is_callable($plugin_func)) {

                $message = "plugin function $plugin_func() not found in $plugin_file\n";

                $have_function = false;

            } else {

                $this->_plugins['compiler'][$tag_command] = array($plugin_func, null, null, null, true);

            }

        }

 

        /*

        if ($found) {

            if ($have_function) {

                $output = call_user_func_array($plugin_func, array($tag_args, &$this));

                if($output != '') {

                $output = '<?php ' . $this->_push_cacheable_state('compiler', $tag_command)

                                   . $output

                                   . $this->_pop_cacheable_state('compiler', $tag_command) . ' ?>';

                }

            } else {

                $this->_syntax_error($message, E_USER_WARNING, __FILE__, __LINE__);

            }

            return true;

        } else {

            return false;

        }

    }

 

 

    /**

    function _compile_block_tag($tag_command, $tag_args, $tag_modifier, &$output)

    {

        if (substr($tag_command, 0, 1) == '/') {

            $start_tag = false;

            $tag_command = substr($tag_command, 1);

        } else

            $start_tag = true;

 

        $found = false;

        $have_function = true;

 

        /*

        if (isset($this->_plugins['block'][$tag_command])) {

            $found = true;

            $plugin_func = $this->_plugins['block'][$tag_command][0];

            if (!is_callable($plugin_func)) {

                $message = "block function '$tag_command' is not implemented";

                $have_function = false;

            }

        }

        /*

        else if ($plugin_file = $this->_get_plugin_filepath('block', $tag_command)) {

            $found = true;

 

            include_once $plugin_file;

 

            $plugin_func = 'smarty_block_' . $tag_command;

            if (!function_exists($plugin_func)) {

                $message = "plugin function $plugin_func() not found in $plugin_file\n";

                $have_function = false;

            } else {

                $this->_plugins['block'][$tag_command] = array($plugin_func, null, null, null, true);

 

            }

        }

 

        if (!$found) {

            return false;

        } else if (!$have_function) {

            $this->_syntax_error($message, E_USER_WARNING, __FILE__, __LINE__);

            return true;

        }

 

        /*

        $this->_add_plugin('block', $tag_command);

 

        if ($start_tag)

            $this->_push_tag($tag_command);

        else

            $this->_pop_tag($tag_command);

 

        if ($start_tag) {

            $output = '<?php ' . $this->_push_cacheable_state('block', $tag_command);

            $attrs = $this->_parse_attrs($tag_args);

            $_cache_attrs='';

            $arg_list = $this->_compile_arg_list('block', $tag_command, $attrs, $_cache_attrs);

            $output .= "$_cache_attrs\$this->_tag_stack[] = array('$tag_command', array(".implode(',', $arg_list).')); ';

            $output .= '$_block_repeat=true;' . $this->_compile_plugin_call('block', $tag_command).'($this->_tag_stack[count($this->_tag_stack)-1][1], null, $this, $_block_repeat);';

            $output .= 'while ($_block_repeat) { ob_start(); ?>';

        } else {

            $output = '<?php $_block_content = ob_get_contents(); ob_end_clean(); ';

            $_out_tag_text = $this->_compile_plugin_call('block', $tag_command).'($this->_tag_stack[count($this->_tag_stack)-1][1], $_block_content, $this, $_block_repeat)';

            if ($tag_modifier != '') {

                $this->_parse_modifiers($_out_tag_text, $tag_modifier);

            }

            $output .= '$_block_repeat=false;echo ' . $_out_tag_text . '; } ';

            $output .= " array_pop(\$this->_tag_stack); " . $this->_pop_cacheable_state('block', $tag_command) . '?>';

        }

 

        return true;

    }

 

 

    /**

    function _compile_custom_tag($tag_command, $tag_args, $tag_modifier, &$output)

    {

        $found = false;

        $have_function = true;

 

        /*

        if (isset($this->_plugins['function'][$tag_command])) {

            $found = true;

            $plugin_func = $this->_plugins['function'][$tag_command][0];

            if (!is_callable($plugin_func)) {

                $message = "custom function '$tag_command' is not implemented";

                $have_function = false;

            }

        }

        /*

        else if ($plugin_file = $this->_get_plugin_filepath('function', $tag_command)) {

            $found = true;

 

            include_once $plugin_file;

 

            $plugin_func = 'smarty_function_' . $tag_command;

            if (!function_exists($plugin_func)) {

                $message = "plugin function $plugin_func() not found in $plugin_file\n";

                $have_function = false;

            } else {

                $this->_plugins['function'][$tag_command] = array($plugin_func, null, null, null, true);

 

            }

        }

 

        if (!$found) {

            return false;

        } else if (!$have_function) {

            $this->_syntax_error($message, E_USER_WARNING, __FILE__, __LINE__);

            return true;

        }

 

        /* declare plugin to be loaded on display of the template that

        $this->_add_plugin('function', $tag_command);

 

        $_cacheable_state = $this->_push_cacheable_state('function', $tag_command);

        $attrs = $this->_parse_attrs($tag_args);

        $_cache_attrs = '';

        $arg_list = $this->_compile_arg_list('function', $tag_command, $attrs, $_cache_attrs);

 

        $output = $this->_compile_plugin_call('function', $tag_command).'(array('.implode(',', $arg_list)."), \$this)";

        if($tag_modifier != '') {

            $this->_parse_modifiers($output, $tag_modifier);

        }

 

        if($output != '') {

            $output =  '<?php ' . $_cacheable_state . $_cache_attrs . 'echo ' . $output . ';'

                . $this->_pop_cacheable_state('function', $tag_command) . "?>" . $this->_additional_newline;

        }

 

        return true;

    }

 

    /**

    function _compile_registered_object_tag($tag_command, $attrs, $tag_modifier)

    {

        if (substr($tag_command, 0, 1) == '/') {

            $start_tag = false;

            $tag_command = substr($tag_command, 1);

        } else {

            $start_tag = true;

        }

 

        list($object, $obj_comp) = explode('->', $tag_command);

 

        $arg_list = array();

        if(count($attrs)) {

            $_assign_var = false;

            foreach ($attrs as $arg_name => $arg_value) {

                if($arg_name == 'assign') {

                    $_assign_var = $arg_value;

                    unset($attrs['assign']);

                    continue;

                }

                if (is_bool($arg_value))

                    $arg_value = $arg_value ? 'true' : 'false';

                $arg_list[] = "'$arg_name' => $arg_value";

            }

        }

 

        if($this->_reg_objects[$object][2]) {

            // smarty object argument format

            $args = "array(".implode(',', (array)$arg_list)."), \$this";

        } else {

            // traditional argument format

            $args = implode(',', array_values($attrs));

            if (empty($args)) {

                $args = '';

            }

        }

 

        $prefix = '';

        $postfix = '';

        $newline = '';

        if(!is_object($this->_reg_objects[$object][0])) {

            $this->_trigger_fatal_error("registered '$object' is not an object" , $this->_current_file, $this->_current_line_no, __FILE__, __LINE__);

        } elseif(!empty($this->_reg_objects[$object][1]) && !in_array($obj_comp, $this->_reg_objects[$object][1])) {

            $this->_trigger_fatal_error("'$obj_comp' is not a registered component of object '$object'", $this->_current_file, $this->_current_line_no, __FILE__, __LINE__);

        } elseif(method_exists($this->_reg_objects[$object][0], $obj_comp)) {

            // method

            if(in_array($obj_comp, $this->_reg_objects[$object][3])) {

                // block method

                if ($start_tag) {

                    $prefix = "\$this->_tag_stack[] = array('$obj_comp', $args); ";

                    $prefix .= "\$_block_repeat=true; \$this->_reg_objects['$object'][0]->$obj_comp(\$this->_tag_stack[count(\$this->_tag_stack)-1][1], null, \$this, \$_block_repeat); ";

                    $prefix .= "while (\$_block_repeat) { ob_start();";

                    $return = null;

                    $postfix = '';

                } else {

                    $prefix = "\$_obj_block_content = ob_get_contents(); ob_end_clean(); \$_block_repeat=false;";

                    $return = "\$this->_reg_objects['$object'][0]->$obj_comp(\$this->_tag_stack[count(\$this->_tag_stack)-1][1], \$_obj_block_content, \$this, \$_block_repeat)";

                    $postfix = "} array_pop(\$this->_tag_stack);";

                }

            } else {

                // non-block method

                $return = "\$this->_reg_objects['$object'][0]->$obj_comp($args)";

            }

        } else {

            // property

            $return = "\$this->_reg_objects['$object'][0]->$obj_comp";

        }

 

        if($return != null) {

            if($tag_modifier != '') {

                $this->_parse_modifiers($return, $tag_modifier);

            }

 

            if(!empty($_assign_var)) {

                $output = "\$this->assign('" . $this->_dequote($_assign_var) ."',  $return);";

            } else {

                $output = 'echo ' . $return . ';';

                $newline = $this->_additional_newline;

            }

        } else {

            $output = '';

        }

 

        return '<?php ' . $prefix . $output . $postfix . "?>" . $newline;

    }

 

    /**

    function _compile_insert_tag($tag_args)

    {

        $attrs = $this->_parse_attrs($tag_args);

        $name = $this->_dequote($attrs['name']);

 

        if (empty($name)) {

            return $this->_syntax_error("missing insert name", E_USER_ERROR, __FILE__, __LINE__);

        }

        

        if (!preg_match('~^\w+$~', $name)) {

            return $this->_syntax_error("'insert: 'name' must be an insert function name", E_USER_ERROR, __FILE__, __LINE__);

        }

 

        if (!empty($attrs['script'])) {

            $delayed_loading = true;

        } else {

            $delayed_loading = false;

        }

 

        foreach ($attrs as $arg_name => $arg_value) {

            if (is_bool($arg_value))

                $arg_value = $arg_value ? 'true' : 'false';

            $arg_list[] = "'$arg_name' => $arg_value";

        }

 

        $this->_add_plugin('insert', $name, $delayed_loading);

 

        $_params = "array('args' => array(".implode(', ', (array)$arg_list)."))";

 

        return "<?php require_once(SMARTY_CORE_DIR . 'core.run_insert_handler.php');\necho smarty_core_run_insert_handler($_params, \$this); ?>" . $this->_additional_newline;

    }

 

    /**

    function _compile_include_tag($tag_args)

    {

        $attrs = $this->_parse_attrs($tag_args);

        $arg_list = array();

 

        if (empty($attrs['file'])) {

            $this->_syntax_error("missing 'file' attribute in include tag", E_USER_ERROR, __FILE__, __LINE__);

        }

 

        foreach ($attrs as $arg_name => $arg_value) {

            if ($arg_name == 'file') {

                $include_file = $arg_value;

                continue;

            } else if ($arg_name == 'assign') {

                $assign_var = $arg_value;

                continue;

            }

            if (is_bool($arg_value))

                $arg_value = $arg_value ? 'true' : 'false';

            $arg_list[] = "'$arg_name' => $arg_value";

        }

 

        $output = '<?php ';

 

        if (isset($assign_var)) {

            $output .= "ob_start();\n";

        }

 

        $output .=

            "\$_smarty_tpl_vars = \$this->_tpl_vars;\n";

 

 

        $_params = "array('smarty_include_tpl_file' => " . $include_file . ", 'smarty_include_vars' => array(".implode(',', (array)$arg_list)."))";

        $output .= "\$this->_smarty_include($_params);\n" .

        "\$this->_tpl_vars = \$_smarty_tpl_vars;\n" .

        "unset(\$_smarty_tpl_vars);\n";

 

        if (isset($assign_var)) {

            $output .= "\$this->assign(" . $assign_var . ", ob_get_contents()); ob_end_clean();\n";

        }

 

        $output .= ' ?>';

 

        return $output;

 

    }

 

    /**

    function _compile_include_php_tag($tag_args)

    {

        $attrs = $this->_parse_attrs($tag_args);

 

        if (empty($attrs['file'])) {

            $this->_syntax_error("missing 'file' attribute in include_php tag", E_USER_ERROR, __FILE__, __LINE__);

        }

 

        $assign_var = (empty($attrs['assign'])) ? '' : $this->_dequote($attrs['assign']);

        $once_var = (empty($attrs['once']) || $attrs['once']=='false') ? 'false' : 'true';

 

        $arg_list = array();

        foreach($attrs as $arg_name => $arg_value) {

            if($arg_name != 'file' AND $arg_name != 'once' AND $arg_name != 'assign') {

                if(is_bool($arg_value))

                    $arg_value = $arg_value ? 'true' : 'false';

                $arg_list[] = "'$arg_name' => $arg_value";

            }

        }

 

        $_params = "array('smarty_file' => " . $attrs['file'] . ", 'smarty_assign' => '$assign_var', 'smarty_once' => $once_var, 'smarty_include_vars' => array(".implode(',', $arg_list)."))";

 

        return "<?php require_once(SMARTY_CORE_DIR . 'core.smarty_include_php.php');\nsmarty_core_smarty_include_php($_params, \$this); ?>" . $this->_additional_newline;

    }

 

 

    /**

    function _compile_section_start($tag_args)

    {

        $attrs = $this->_parse_attrs($tag_args);

        $arg_list = array();

 

        $output = '<?php ';

        $section_name = $attrs['name'];

        if (empty($section_name)) {

            $this->_syntax_error("missing section name", E_USER_ERROR, __FILE__, __LINE__);

        }

 

        $output .= "unset(\$this->_sections[$section_name]);\n";

        $section_props = "\$this->_sections[$section_name]";

 

        foreach ($attrs as $attr_name => $attr_value) {

            switch ($attr_name) {

                case 'loop':

                    $output .= "{$section_props}['loop'] = is_array(\$_loop=$attr_value) ? count(\$_loop) : max(0, (int)\$_loop); unset(\$_loop);\n";

                    break;

 

                case 'show':

                    if (is_bool($attr_value))

                        $show_attr_value = $attr_value ? 'true' : 'false';