<?php

// implementation of
// https://developer.mozilla.org/en-US/docs/Web/HTML/Element/cite

// must be run within Dokuwiki
use ComboStrap\LinkUtility;
use ComboStrap\StringUtility;
use ComboStrap\Tag;
use ComboStrap\PluginUtility;

require_once(__DIR__ . '/../class/StringUtility.php');

if (!defined('DOKU_INC')) die();


class syntax_plugin_combo_cite extends DokuWiki_Syntax_Plugin
{
    const TAG = "cite";


    function getType()
    {
        return 'container';
    }

    /**
     * How Dokuwiki will add P element
     *
     * * 'normal' - The plugin can be used inside paragraphs
     *  * 'block'  - Open paragraphs need to be closed before plugin output - block should not be inside paragraphs
     *  * 'stack'  - Special case. Plugin wraps other paragraphs. - Stacks can contain paragraphs
     *
     * @see DokuWiki_Syntax_Plugin::getPType()
     */
    function getPType()
    {
        return 'normal';
    }

    /**
     * @return array
     * Allow which kind of plugin inside
     *
     * No one of array('baseonly','container', 'formatting', 'substition', 'protected', 'disabled', 'paragraphs')
     * because we manage self the content and we call self the parser
     *
     * Return an array of one or more of the mode types {@link $PARSER_MODES} in Parser.php
     */
    function getAllowedTypes()
    {
        return array('baseonly', 'container', 'formatting', 'substition', 'protected', 'disabled', 'paragraphs');
    }

    function getSort()
    {
        /**
         * Should be less than the cite syntax plugin
         **/
        return 200;
    }


    function connectTo($mode)
    {

        $pattern = PluginUtility::getContainerTagPattern(self::TAG);
        $this->Lexer->addEntryPattern($pattern, $mode, PluginUtility::getModeForComponent($this->getPluginComponent()));

    }


    function postConnect()
    {

        $this->Lexer->addExitPattern('</' . syntax_plugin_combo_cite::TAG . '>', PluginUtility::getModeForComponent($this->getPluginComponent()));

    }

    /**
     *
     * The handle function goal is to parse the matched syntax through the pattern function
     * and to return the result for use in the renderer
     * This result is always cached until the page is modified.
     * @param string $match
     * @param int $state
     * @param int $pos - byte position in the original source file
     * @param Doku_Handler $handler
     * @return array|bool
     * @see DokuWiki_Syntax_Plugin::handle()
     *
     */
    function handle($match, $state, $pos, Doku_Handler $handler)
    {

        switch ($state) {

            case DOKU_LEXER_ENTER :
                $tagAttributes = PluginUtility::getTagAttributes($match);
                $node = new Tag(self::TAG, $tagAttributes, $state, $handler);
                $parent = "";
                if ($node->hasParent()) {
                    $parent = $node->getParent()->getName();
                }
                return array(
                    PluginUtility::STATE => $state,
                    PluginUtility::ATTRIBUTES => $tagAttributes,
                    PluginUtility::CONTEXT => $parent);

            case DOKU_LEXER_UNMATCHED :
                return PluginUtility::handleAndReturnUnmatchedData(self::TAG, $match, $handler);

            case DOKU_LEXER_EXIT :
                // Important otherwise we don't get an exit in the render
                $node = new Tag(self::TAG, array(), $state, $handler);
                $context = "";
                if ($node->hasParent()) {
                    $parent = $node->getParent();
                    $context = $parent->getName();
                    if ($context == syntax_plugin_combo_blockquote::TAG) {
                        $link = $node->getOpeningTag()->getDescendant(syntax_plugin_combo_link::TAG);
                        if (!empty($link)) {
                            $ref = $link->getAttribute(LinkUtility::ATTRIBUTE_REF);
                            if (StringUtility::match($ref, "https:\/\/twitter.com\/[^\/]*\/status\/.*")) {
                                $context = syntax_plugin_combo_blockquote::TWEET;
                                $parent->setType($context);
                                $parent->setContext($context);
                                $node->getOpeningTag()->setContext($context);
                            }
                        }
                    }
                }
                return array(
                    PluginUtility::STATE => $state,
                    PluginUtility::CONTEXT => $context);


        }
        return array();

    }

    /**
     * Render the output
     * @param string $format
     * @param Doku_Renderer $renderer
     * @param array $data - what the function handle() return'ed
     * @return boolean - rendered correctly? (however, returned value is not used at the moment)
     * @see DokuWiki_Syntax_Plugin::render()
     *
     *
     */
    function render($format, Doku_Renderer $renderer, $data)
    {

        if ($format == 'xhtml') {

            /** @var Doku_Renderer_xhtml $renderer */
            $state = $data [PluginUtility::STATE];
            switch ($state) {
                case DOKU_LEXER_ENTER :

                    $attributes = $data[PluginUtility::ATTRIBUTES];
                    $context = $data[PluginUtility::CONTEXT];
                    switch ($context) {

                        case syntax_plugin_combo_blockquote::TAG:
                            StringUtility::addEolCharacterIfNotPresent($renderer->doc);
                            $renderer->doc .= "<footer class=\"blockquote-footer\"><cite";
                            if (sizeof($attributes) > 0) {
                                $inlineAttributes = PluginUtility::array2HTMLAttributes($attributes);
                                $renderer->doc .= " $inlineAttributes>";
                            } else {
                                $renderer->doc .= '>';
                            }
                            break;
                        case syntax_plugin_combo_blockquote::TWEET:
                            $renderer->doc .= '</p>';
                            break;
                        default:
                            $renderer->doc .= "<cite";
                            if (sizeof($attributes) > 0) {
                                $inlineAttributes = PluginUtility::array2HTMLAttributes($attributes);
                                $renderer->doc .= " $inlineAttributes";
                            }
                            $renderer->doc .= ">";
                    }
                    break;

                case DOKU_LEXER_UNMATCHED :
                    $renderer->doc .= PluginUtility::renderUnmatched($data);
                    break;

                case DOKU_LEXER_EXIT :

                    $context = $data[PluginUtility::CONTEXT];
                    switch ($context) {
                        case syntax_plugin_combo_card::TAG:
                        case syntax_plugin_combo_blockquote::TAG:
                            $renderer->doc .= '</cite>';
                            $renderer->doc .= '</footer>' . DOKU_LF;
                            break;
                        case syntax_plugin_combo_blockquote::TWEET:
                            // There is no element
                            break;
                        default:
                            $renderer->doc .= '</cite>' . DOKU_LF;

                    }
                    break;

            }
            return true;
        }

        // unsupported $mode
        return false;
    }


}