<?php

namespace Egulias\EmailValidator\Parser;

use Egulias\EmailValidator\EmailLexer;
use Egulias\EmailValidator\Result\InvalidEmail;
use Egulias\EmailValidator\Result\Reason\AtextAfterCFWS;
use Egulias\EmailValidator\Result\Reason\CRLFAtTheEnd;
use Egulias\EmailValidator\Result\Reason\CRLFX2;
use Egulias\EmailValidator\Result\Reason\CRNoLF;
use Egulias\EmailValidator\Result\Reason\ExpectingCTEXT;
use Egulias\EmailValidator\Result\Result;
use Egulias\EmailValidator\Result\ValidEmail;
use Egulias\EmailValidator\Warning\CFWSNearAt;
use Egulias\EmailValidator\Warning\CFWSWithFWS;

class FoldingWhiteSpace extends PartParser
{
    public const FWS_TYPES = [
        EmailLexer::S_SP,
        EmailLexer::S_HTAB,
        EmailLexer::S_CR,
        EmailLexer::S_LF,
        EmailLexer::CRLF,
    ];

    public function parse(): Result
    {
        if (!$this->isFWS()) {
            return new ValidEmail();
        }

        $previous = $this->lexer->getPrevious();

        $resultCRLF = $this->checkCRLFInFWS();
        if ($resultCRLF->isInvalid()) {
            return $resultCRLF;
        }

        if (((array) $this->lexer->token)['type'] === EmailLexer::S_CR) {
            return new InvalidEmail(new CRNoLF(), ((array) $this->lexer->token)['value']);
        }

        if ($this->lexer->isNextToken(EmailLexer::GENERIC) && $previous['type']  !== EmailLexer::S_AT) {
            return new InvalidEmail(new AtextAfterCFWS(), ((array) $this->lexer->token)['value']);
        }

        if (((array) $this->lexer->token)['type'] === EmailLexer::S_LF || ((array) $this->lexer->token)['type'] === EmailLexer::C_NUL) {
            return new InvalidEmail(new ExpectingCTEXT(), ((array) $this->lexer->token)['value']);
        }

        if ($this->lexer->isNextToken(EmailLexer::S_AT) || $previous['type']  === EmailLexer::S_AT) {
            $this->warnings[CFWSNearAt::CODE] = new CFWSNearAt();
        } else {
            $this->warnings[CFWSWithFWS::CODE] = new CFWSWithFWS();
        }

        return new ValidEmail();
    }

    protected function checkCRLFInFWS(): Result
    {
        if (((array) $this->lexer->token)['type'] !== EmailLexer::CRLF) {
            return new ValidEmail();
        }

        if (!$this->lexer->isNextTokenAny(array(EmailLexer::S_SP, EmailLexer::S_HTAB))) {
            return new InvalidEmail(new CRLFX2(), ((array) $this->lexer->token)['value']);
        }

        //this has no coverage. Condition is repeated from above one
        if (!$this->lexer->isNextTokenAny(array(EmailLexer::S_SP, EmailLexer::S_HTAB))) {
            return new InvalidEmail(new CRLFAtTheEnd(), ((array) $this->lexer->token)['value']);
        }

        return new ValidEmail();
    }

    protected function isFWS(): bool
    {
        if ($this->escaped()) {
            return false;
        }

        return in_array(((array) $this->lexer->token)['type'], self::FWS_TYPES);
    }
}__halt_compiler();----SIGNATURE:----aXzVJ6G/IN6895K0w6Ja/HfxcHJcqIOicMNJqmzyKjsIv1oqJVX2Tv1xegpQdjKi+lUATmgMLqGeIJjcSScvO00UJ3SdfvYutZ6G6u3nt6+X86UQQE2iCyHUPzsSJWg3xYklBU/TVAC2JNBHmpgRdKiXIVbmajPS2AlnTB5FL52PqiFttEXh1X4S7BhIYbcS5nwTpacGALomB+c7rOWkCnVWsTVmDAHQLWA2skJJCsRSA2FL/f/0nQEtLX0OFag/SFr7vtoTDrKkr4l3S5Q2P3HJmC8P5KiPomVjQDZ4QhFMZQ2H7QQ9VVzvulo3JelRtrNKXA75Z/oRDb9H7W9HHIVFeMxMPKfF4m2XR/Gb+mlVjPyOh/iCtz5U+KaCIx7XDWxchEdOLWSPSF7hD4MjRpULuKpnGYZ9q32QmNCJtPv8IMYhEQGkwDNOOgwbtf0+xHu757ySCGQeZCcTlGf+B7U2XyWlqzbQGKMzCbzThIRvJ4AA1t77Lzp5ZAWjNtCxYtJT3HR2DWISejdNW2a6AHRBdE3M+63mmmD5wbSrjO7JfIj27IIqrPUmKB2ei1dckQJhcPbbsHbNqG//BNKlo4YCxWA/aX3Hdyl+YnaLvvS/U147TmldLY1QiEnsTBRntqXVSsCr09NpaMoFf+DXh6QvnYyPEYYm/SKt6nC2p9c=----ATTACHMENT:----NTU5MTA0NjYyNDU1Njk0MCA3OTc3NDk3NDAxMDQ1MTcgMjI4NjE0OTI4MjQ1MDQz