<?php
/**
 * Zend Framework
 *
 * LICENSE
 *
 * This source file is subject to the new BSD license that is bundled
 * with this package in the file LICENSE.txt.
 * It is also available through the world-wide-web at this URL:
 * http://framework.zend.com/license/new-bsd
 * If you did not receive a copy of the license and are unable to
 * obtain it through the world-wide-web, please send an email
 * to license@zend.com so we can send you a copy immediately.
 *
 * @category   Zend
 * @package    Zend_Markup
 * @subpackage Renderer
 * @copyright  Copyright (c) 2005-2010 Zend Technologies USA Inc. (http://www.zend.com)
 * @license    http://framework.zend.com/license/new-bsd     New BSD License
 * @version    $Id$
 */

/**
 * Defines the basic rendering functionality
 *
 * @category   Zend
 * @package    Zend_Markup
 * @subpackage Renderer
 * @copyright  Copyright (c) 2005-2010 Zend Technologies USA Inc. (http://www.zend.com)
 * @license    http://framework.zend.com/license/new-bsd     New BSD License
 */
abstract class Zend_Markup_Renderer_RendererAbstract
{
    const TAG_SINGLE    = 1;
    const TAG_NORMAL    = 2;

    const TYPE_CALLBACK = 4;
    const TYPE_REPLACE  = 8;
    const TYPE_ALIAS    = 16;

    /**
     * Tag info
     *
     * @var array
     */
    protected $_tags = array();

    /**
     * Parser
     *
     * @var Zend_Markup_Parser_ParserInterface
     */
    protected $_parser;

    /**
     * Use the filter or not
     *
     * @var bool
     */
    protected $_filter = true;

    /**
     * The current group
     *
     * @var string
     */
    protected $_group;

    /**
     * Groups definition
     *
     * @var array
     */
    protected $_groups = array();


    /**
     * Constructor
     *
     * @param  array $options
     * @return void
     */
    public function __construct(array $options = array())
    {
        if (isset($options['parser'])) {
            $this->setParser($options['parser']);
        }
    }

    /**
     * Set the parser
     *
     * @param  Zend_Markup_Parser_ParserInterface $parser
     * @return Zend_Markup_Renderer_RendererAbstract
     */
    public function setParser(Zend_Markup_Parser_ParserInterface $parser)
    {
        $this->_parser = $parser;
        return $this;
    }

    /**
     * Get the parser
     *
     * @return Zend_Markup_Parser_ParserInterface
     */
    public function getParser()
    {
        return $this->_parser;
    }

    /**
     * Add a new tag
     *
     * @param  string $name
     * @param  string $type
     * @param  array $info
     * @return Zend_Markup_Renderer_RendererAbstract
     */
    public function addTag($name, $type, array $info)
    {
        if (!isset($info['group']) && ($type ^ self::TYPE_ALIAS)) {
            require_once 'Zend/Markup/Renderer/Exception.php';
            throw new Zend_Markup_Renderer_Exception("There is no render group defined.");
        }

        if (isset($info['filter'])) {
            $filter = (boolean) $info['filter'];
        } else {
            $filter = true;
        }

        // check the type
        if ($type & self::TYPE_CALLBACK) {
            // add a callback tag
            if (!isset($info['callback']) || !is_callable($info['callback'])) {
                require_once 'Zend/Markup/Renderer/Exception.php';
                throw new Zend_Markup_Renderer_Exception("No valid callback defined for tag '$name'.");
            }

            $info['type'] = $type;
            $info['filter'] = $filter;

            $this->_tags[$name] = $info;
        } elseif ($type & self::TYPE_ALIAS) {
            // add an alias
            if (empty($info['name'])) {
                require_once 'Zend/Markup/Renderer/Exception.php';
                throw new Zend_Markup_Renderer_Exception(
                        'No alias was provided but tag was defined as such');
            }

            $this->_tags[$name] = array(
                'type' => self::TYPE_ALIAS,
                'name' => $info['name']
            );
        } else {
            if ($type & self::TAG_SINGLE) {
                // add a single replace tag
                $info['type']   = $type;
                $info['filter'] = $filter;

                $this->_tags[$name] = $info;
            } else {
                // add a replace tag
                $info['type']   = $type;
                $info['filter'] = $filter;

                $this->_tags[$name] = $info;
            }
        }
        return $this;
    }

    /**
     * Render function
     *
     * @param  Zend_Markup_TokenList|string $tokenList
     * @return string
     */
    public function render($value)
    {
        if ($value instanceof Zend_Markup_TokenList) {
            $tokenList = $value;
        } else {
            $tokenList = $this->getParser()->parse($value);
        }

        $root = $tokenList->current();

        return $this->_render($root);
    }

    /**
     * Render a single token
     *
     * @param  Zend_Markup_Token $token
     * @return string
     */
    protected function _render(Zend_Markup_Token $token)
    {
        $return    = '';
        $oldFilter = $this->_filter;
        $oldGroup  = $this->_group;

        // check filter and group usage in this tag
        if (isset($this->_tags[$token->getName()])) {
            if (isset($this->_tags[$token->getName()]['filter'])
                && $this->_tags[$token->getName()]['filter']
            ) {
                $this->_filter = true;
            } else {
                $this->_filter = false;
            }

            if ($group = $this->_getGroup($token)) {
                $this->_group = $group;
            }
        }

        // if this tag has children, execute them
        if ($token->hasChildren()) {
            foreach ($token->getChildren() as $child) {
                $return .= $this->_execute($child);
            }
        }

        $this->_filter = $oldFilter;
        $this->_group  = $oldGroup;

        return $return;
    }

    /**
     * Get the group of a token
     *
     * @param  Zend_Markup_Token $token
     * @return string|bool
     */
    protected function _getGroup(Zend_Markup_Token $token)
    {
        if (!isset($this->_tags[$token->getName()])) {
            return false;
        }

        $tag = $this->_tags[$token->getName()];

        // alias processing
        while ($tag['type'] & self::TYPE_ALIAS) {
            $tag = $this->_tags[$tag['name']];
        }

        return isset($tag['group']) ? $tag['group'] : false;
    }

    /**
     * Execute the token
     *
     * @param  Zend_Markup_Token $token
     * @return string
     */
    protected function _execute(Zend_Markup_Token $token)
    {
        // first return the normal text tags
        if ($token->getType() == Zend_Markup_Token::TYPE_NONE) {
            return $this->_filter($token->getTag());
        }

        // if the token doesn't have a notation, return the plain text
        if (!isset($this->_tags[$token->getName()])) {
            return $this->_filter($token->getTag()) . $this->_render($token) . $token->getStopper();
        }

        $tag = $this->_tags[$token->getName()];

        // alias processing
        while ($tag['type'] & self::TYPE_ALIAS) {
            $tag = $this->_tags[$tag['name']];
        }

        // check if the tag has content
        if (($tag['type'] & self::TAG_NORMAL) && !$token->hasChildren()) {
            return '';
        }

        // check for the context
        if (!in_array($tag['group'], $this->_groups[$this->_group])) {
            return $this->_filter($token->getTag()) . $this->_render($token) . $token->getStopper();
        }

        // callback
        if ($tag['type'] & self::TYPE_CALLBACK) {
            if ($tag['type'] & self::TAG_NORMAL) {
                return call_user_func_array($tag['callback'], array($token, $this->_render($token)));
            }
            return call_user_func_array($tag['callback'], array($token));
        }
        // replace
        if ($tag['type'] & self::TAG_NORMAL) {
            return $this->_executeReplace($token, $tag);
        }
        return $this->_executeSingleReplace($token, $tag);
    }

    // methods that will probably be interhited by subclasses

    /**
     * Execute a replace token
     *
     * @param  Zend_Markup_Token $token
     * @param  array $tag
     * @return string
     */
    protected function _executeReplace(Zend_Markup_Token $token, $tag)
    {
        return $tag['start'] . $this->_render($token) . $tag['end'];
    }

    /**
     * Execute a single replace token
     *
     * @param  Zend_Markup_Token $token
     * @param  array $tag
     * @return string
     */
    protected function _executeSingleReplace(Zend_Markup_Token $token, $tag)
    {
        return $tag['replace'];
    }

    /**
     * Abstract filter method
     *
     * @param  string $value
     * @return string
     */
    abstract protected function _filter($value);
}