<?php
/*
    MiniSkel - Flexible content-template parser
    Based on SPIP Skeletons, see http://www.spip.net/
    Developed by BohwaZ - http://bohwaz.net/

    This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program.  If not, see <http://www.gnu.org/licenses/>.
*/

// This is a simple example of a compiler (generates PHP code from templates), like in smarty

require '../class.miniskel.php';

class skelCompiler extends miniSkel
{
    private function buildArray($values)
    {
        if (empty($values))
            return 'array()';

        $out = 'array(';

        foreach ($values as $key=>$value)
        {
            if (is_object($value))
                continue;

            $out .= (is_int($key) ? $key : '"'.addslashes($key).'"') . ' => ';

            if (is_array($value))
                $out .= $this->buildArray($value);
            elseif (is_bool($value))
                $out .= $value ? 'true' : 'false';
            elseif (is_int($value))
                $out .= $value;
            else
                $out .= '"'.addslashes($value).'"';

            $out .= ", ";
        }

        $out .= ')';
        return $out;
    }

    protected function processLoop($loopName, $loopType, $loopCriterias, $loopContent, $preContent, $postContent, $altContent)
    {
        $method_name = 'processLoopType_' . $loopType;

        $out  = "\n<?php /* Loop ".$loopName." of type ".$loopType." */\n"
            .   '$loopCriterias = '.$this->buildArray($loopCriterias).";\n"
            .   '$loopElements = $skelMethods->'.$method_name.'($loopCriterias);'
            .   "\n\n" . 'if (!empty($loopElements)): ?>';

        if ($preContent)
        {
            $out .= $this->parse($preContent, $loopName, miniSkel::PRE_CONTENT);
        }

        $out .= "\n" . '<?php foreach ($loopElements as $row): ?>' . "\n";
        $loopContent = $this->parseVariables($loopContent, array(), miniSkel::CONTEXT_IN_LOOP);
        $out .= $this->parse($loopContent, $loopName, miniSkel::LOOP_CONTENT);
        $out .= "\n" . '<?php endforeach; ?>' . "\n";

        if ($postContent)
        {
            $out .= $this->parse($postContent, $loopName, self::POST_CONTENT);
        }

        if ($altContent)
        {
            $out .= "\n" . '<?php else: ?>' . "\n";
            $out .= $this->parse($altContent, $loopName, self::ALT_CONTENT);
        }

        $out .= "\n" . '<?php endif; ?>' . "\n";

        return $out;
    }

    protected function processVariable($name, $value, $applyDefault, $modifiers, $pre, $post, $context)
    {
        if ($context == miniSkel::CONTEXT_GLOBAL)
            $var = '$variables["'.$name.'"]';
        else
            $var = '$row["'.$name.'"]';

        $out =  "\n<?php "
            .   'if (!empty('.$var.')): ?>' . "\n";

        if ($pre)
            $out .= $this->parseVariables($pre, false, $context);

        $out .= '<?php echo ';

        if ($applyDefault)
        {
            $var = '$skelMethods->callModifier("default", '.$var.')';
        }

        foreach ($modifiers as &$modifier)
        {
            $var = '$skelMethods->callModifier("'.$modifier['name'].'", '.$var.', '.$this->buildArray($modifier['args']).')';
        }

        $out .= $var."; ?>\n";

        if ($post)
            $out .= $this->parseVariables($post, false, $context);

        $out .= "\n<?php endif; ?>\n";

        return $out;
    }

    public function fetch($template)
    {
        $content = '<?php require_once "compiler_methods.php"; ?>' . "\n";
        $content .= parent::fetch($template);
        return $content;
    }
}

$skel = new skelCompiler;

// Generate the code
$code = $skel->fetch('compiler_example.tpl');

// run it
eval('?>'.$code);

?>