<?php

namespace dokuwiki\test\Parsing\ParserMode;

use dokuwiki\Parsing\ParserMode\Code;
use dokuwiki\Parsing\ParserMode\Eol;
use dokuwiki\Parsing\ParserMode\File;
use dokuwiki\Parsing\ParserMode\Header;
use dokuwiki\Parsing\ParserMode\Listblock;
use dokuwiki\Parsing\ParserMode\Preformatted;

class PreformattedTest extends ParserTestBase
{

    function testFile() {
        $this->P->addMode('file',new File());
        $this->P->parse('Foo <file>testing</file> Bar');
        $calls = [
            ['document_start',[]],
            ['p_open',[]],
            ['cdata',["\n".'Foo ']],
            ['p_close',[]],
            ['file',['testing',null,null]],
            ['p_open',[]],
            ['cdata',['Bar']],
            ['p_close',[]],
            ['document_end',[]],
        ];

        $this->assertCalls($calls, $this->H->calls);
    }

    function testCode() {
        $this->P->addMode('code',new Code());
        $this->P->parse('Foo <code>testing</code> Bar');
        $calls = [
            ['document_start',[]],
            ['p_open',[]],
            ['cdata',["\n".'Foo ']],
            ['p_close',[]],
            ['code',['testing', null, null]],
            ['p_open',[]],
            ['cdata',['Bar']],
            ['p_close',[]],
            ['document_end',[]],
        ];
        $this->assertCalls($calls, $this->H->calls);
    }

    function testCodeWhitespace() {
        $this->P->addMode('code',new Code());
        $this->P->parse("Foo <code \n>testing</code> Bar");
        $calls = [
            ['document_start',[]],
            ['p_open',[]],
            ['cdata',["\n".'Foo ']],
            ['p_close',[]],
            ['code',['testing', null, null]],
            ['p_open',[]],
            ['cdata',['Bar']],
            ['p_close',[]],
            ['document_end',[]],
        ];
        $this->assertCalls($calls, $this->H->calls);
    }

    function testCodeLang() {
        $this->P->addMode('code',new Code());
        $this->P->parse("Foo <code php>testing</code> Bar");
        $calls = [
            ['document_start',[]],
            ['p_open',[]],
            ['cdata',["\n".'Foo ']],
            ['p_close',[]],
            ['code',['testing', 'php', null]],
            ['p_open',[]],
            ['cdata',['Bar']],
            ['p_close',[]],
            ['document_end',[]],
        ];
        $this->assertCalls($calls, $this->H->calls);
    }

    function testPreformatted() {
        $this->P->addMode('preformatted',new Preformatted());
        $this->P->parse("F  oo\n  x  \n    y  \nBar\n");
        $calls = [
            ['document_start',[]],
            ['p_open',[]],
            ['cdata',["\nF  oo"]],
            ['p_close',[]],
            ['preformatted',["x  \n  y  "]],
            ['p_open',[]],
            ['cdata',["\nBar"]],
            ['p_close',[]],
            ['document_end',[]],
        ];
        $this->assertCalls($calls, $this->H->calls);
    }

    function testPreformattedWinEOL() {
        $this->P->addMode('preformatted',new Preformatted());
        $this->P->parse("F  oo\r\n  x  \r\n    y  \r\nBar\r\n");
        $calls = [
            ['document_start',[]],
            ['p_open',[]],
            ['cdata',["\nF  oo"]],
            ['p_close',[]],
            ['preformatted',["x  \n  y  "]],
            ['p_open',[]],
            ['cdata',["\nBar"]],
            ['p_close',[]],
            ['document_end',[]],
        ];
        $this->assertCalls($calls, $this->H->calls);
    }

    function testPreformattedTab() {
        $this->P->addMode('preformatted',new Preformatted());
        $this->P->parse("F  oo\n\tx\t\n\t\ty\t\nBar\n");
        $calls = [
            ['document_start',[]],
            ['p_open',[]],
            ['cdata',["\nF  oo"]],
            ['p_close',[]],
            ['preformatted',["x\t\n\ty\t"]],
            ['p_open',[]],
            ['cdata',["\nBar"]],
            ['p_close',[]],
            ['document_end',[]],
        ];
        $this->assertCalls($calls, $this->H->calls);
    }

    function testPreformattedTabWinEOL() {
        $this->P->addMode('preformatted',new Preformatted());
        $this->P->parse("F  oo\r\n\tx\t\r\n\t\ty\t\r\nBar\r\n");
        $calls = [
            ['document_start',[]],
            ['p_open',[]],
            ['cdata',["\nF  oo"]],
            ['p_close',[]],
            ['preformatted',["x\t\n\ty\t"]],
            ['p_open',[]],
            ['cdata',["\nBar"]],
            ['p_close',[]],
            ['document_end',[]],
        ];
        $this->assertCalls($calls, $this->H->calls);
    }

    function testPreformattedList() {
        // Listblock (sort 10) must be added before Preformatted (sort 20) so
        // the resulting PCRE alternation matches the canonical mode order.
        // PCRE picks the first alternative that matches at a given position,
        // and an indented bullet line like "  - x" matches both modes at the
        // same offset; Listblock has to come first to win the tie.
        $this->P->addMode('listblock',new Listblock());
        $this->P->addMode('preformatted',new Preformatted());
        $this->P->parse("  - x \n  * y \nF  oo\n  x  \n    y  \n  -X\n  *Y\nBar\n");
        $calls = [
            ['document_start',[]],
            ['listo_open',[]],
            ['listitem_open',[1]],
            ['listcontent_open',[]],
            ['cdata',[" x "]],
            ['listcontent_close',[]],
            ['listitem_close',[]],
            ['listo_close',[]],
            ['listu_open',[]],
            ['listitem_open',[1]],
            ['listcontent_open',[]],
            ['cdata',[" y "]],
            ['listcontent_close',[]],
            ['listitem_close',[]],
            ['listu_close',[]],
            ['p_open',[]],
            ['cdata',["F  oo"]],
            ['p_close',[]],
            ['preformatted',["x  \n  y  \n-X\n*Y"]],
            ['p_open',[]],
            ['cdata',["\nBar"]],
            ['p_close',[]],
            ['document_end',[]],
        ];
        $this->assertCalls($calls, $this->H->calls);
    }


    function testMarkdownPreferredUsesFourSpaces() {
        // In `md` and `md+dw` settings the indent threshold is 4,
        // matching GFM's indented code block rule. Lines with only 2-3
        // leading spaces stay as paragraph text.
        global $conf;
        $conf['syntax'] = 'md';
        $this->P->addMode('preformatted', new Preformatted());
        $this->P->parse("F  oo\n    x  \n      y  \nBar\n");
        $calls = [
            ['document_start', []],
            ['p_open', []],
            ['cdata', ["\nF  oo"]],
            ['p_close', []],
            ['preformatted', ["x  \n  y  "]],
            ['p_open', []],
            ['cdata', ["\nBar"]],
            ['p_close', []],
            ['document_end', []],
        ];
        $this->assertCalls($calls, $this->H->calls);
    }

    function testMarkdownPreferredRejectsTwoSpaces() {
        // 2-space indent in MD-preferred mode does NOT trigger preformatted.
        global $conf;
        $conf['syntax'] = 'md';
        $this->P->addMode('preformatted', new Preformatted());
        $this->P->parse("F  oo\n  x\nBar\n");
        $modes = array_column($this->H->calls, 0);
        $this->assertNotContains('preformatted', $modes,
            '2-space indent must not trigger preformatted when Markdown is preferred');
    }

    function testMarkdownPreferredTabStillTriggers() {
        // Tab is a trigger regardless of the space threshold.
        global $conf;
        $conf['syntax'] = 'md';
        $this->P->addMode('preformatted', new Preformatted());
        $this->P->parse("F  oo\n\tx\nBar\n");
        $modes = array_column($this->H->calls, 0);
        $this->assertContains('preformatted', $modes,
            'A single tab must still trigger preformatted in MD-preferred mode');
    }

    function testStripsLeadingAndTrailingBlankIndentedLines() {
        // GFM example #87: leading and trailing blank-but-indented lines
        // should not appear in the preformatted body. The lexer's
        // continuation pattern eats their indents, leaving padding `\n`
        // runs in the rewriter buffer; the rewriter trims them so the
        // emitted text starts and ends on a non-blank line.
        global $conf;
        $conf['syntax'] = 'md';
        $this->P->addMode('preformatted', new Preformatted());
        $this->P->parse("\n    \n    foo\n    \n\n");
        $calls = [
            ['document_start', []],
            ['preformatted', ['foo']],
            ['document_end', []],
        ];
        $this->assertCalls($calls, $this->H->calls);
    }

    function testWhitespaceOnlyBlockIsSkipped() {
        // A run of only blank-but-indented lines must not emit a
        // preformatted call at all - the body would be pure whitespace
        // and visually meaningless.
        global $conf;
        $conf['syntax'] = 'md';
        $this->P->addMode('preformatted', new Preformatted());
        $this->P->parse("\n    \n    \n\n");
        $modes = array_column($this->H->calls, 0);
        $this->assertNotContains('preformatted', $modes);
    }

    function testPreformattedPlusHeaderAndEol() {
        // Note that EOL must come after preformatted!
        $this->P->addMode('preformatted',new Preformatted());
        $this->P->addMode('header',new Header());
        $this->P->addMode('eol',new Eol());
        $this->P->parse("F  oo\n  ==Test==\n    y  \nBar\n");
        $calls = [
            ['document_start',[]],
            ['p_open',[]],
            ['cdata',["F  oo"]],
            ['p_close',[]],
            ['preformatted',["==Test==\n  y  "]],
            ['p_open',[]],
            ['cdata',['Bar']],
            ['p_close',[]],
            ['document_end',[]],
        ];
        $this->assertCalls($calls, $this->H->calls);
    }
}