<?php
/**
 * DokuWiki Plugin Bookcreator (Syntax Component)
 *
 * Copy from dw2pdf plugin
 *
 * @license    GPL 2 (http://www.gnu.org/licenses/gpl.html)
 * @author     Sam Wilson <sam@samwilson.id.au>
 */

use dokuwiki\File\PageResolver;

/**
 * Syntax for page specific directions for mpdf library
 */
class syntax_plugin_bookcreator_exportlink extends DokuWiki_Syntax_Plugin
{

    /**
     * Syntax Type
     *
     * Needs to return one of the mode types defined in $PARSER_MODES in parser.php
     *
     * @return string
     */
    public function getType()
    {
        return 'substition';
    }

    /**
     * Sort for applying this mode
     *
     * @return int
     */
    public function getSort()
    {
        return 41;
    }

    /**
     * @param string $mode
     */
    public function connectTo($mode)
    {
        $this->Lexer->addSpecialPattern('~~HTMLNS>(?:.*?)\|(?:.*?)~~', $mode, 'plugin_bookcreator_exportlink');
        $this->Lexer->addSpecialPattern('~~TEXTNS>(?:.*?)\|(?:.*?)~~', $mode, 'plugin_bookcreator_exportlink');
    }

    /**
     * Handler to prepare matched data for the rendering process
     *
     * @param string $match The text matched by the patterns
     * @param int $state The lexer state for the match
     * @param int $pos The character position of the matched text
     * @param Doku_Handler $handler The Doku_Handler object
     * @return  array Return an array with all data you want to use in render, false don't add an instruction
     */
    public function handle($match, $state, $pos, Doku_Handler $handler)
    {
        global $ID;
        $match = substr($match, 2, -2); //remove ~~
        [$type, $match] = array_pad(explode('>', $match, 2),2, '');

        $type = strtolower(substr($type, 0, -2)); //remove NS
        [$ns, $title] = array_pad(explode('|', $match, 2), 2, '');
        $id = $ns . ':start';
        $resolver = new PageResolver($ID);
        $page = $resolver->resolveId($id);
        $ns = getNS($page);
        $link = '?do=export_' . strtolower($type) . 'ns&book_ns=' . $ns . '&book_title=' . $title;

        // check if there is an ampersand in the title
        $amp = strpos($title, '&');
        if ($amp !== false) {
            $title = substr($title, 0, $amp);
        }

        return [
            'link' => $link,
            'title' => sprintf($this->getLang("export_{$type}ns"), $ns, $title),
            $state,
            $pos
        ];
    }

    /**
     * Handles the actual output creation.
     *
     * @param string $format output format being rendered
     * @param Doku_Renderer $renderer the current renderer object
     * @param array $data data created by handler()
     * @return  boolean                 rendered correctly? (however, returned value is not used at the moment)
     */
    public function render($format, Doku_Renderer $renderer, $data)
    {
        if ($format == 'xhtml' && !is_a($renderer, 'renderer_plugin_dw2pdf')) {
            $renderer->internallink($data['link'], $data['title']);
            return true;
        }
        return false;
    }

}