package gudusoft.gsqlparser.parser;

import gudusoft.gsqlparser.EDbVendor;
import gudusoft.gsqlparser.TBaseType;
import gudusoft.gsqlparser.TCustomLexer;
import gudusoft.gsqlparser.TCustomParser;
import gudusoft.gsqlparser.TCustomSqlStatement;
import gudusoft.gsqlparser.TLexerGreenplum;
import gudusoft.gsqlparser.TParserGreenplum;
import gudusoft.gsqlparser.TSourceToken;
import gudusoft.gsqlparser.TSourceTokenList;
import gudusoft.gsqlparser.TStatementList;
import gudusoft.gsqlparser.TSyntaxError;
import gudusoft.gsqlparser.EFindSqlStateType;
import gudusoft.gsqlparser.ETokenType;
import gudusoft.gsqlparser.ETokenStatus;
import gudusoft.gsqlparser.ESqlStatementType;
import gudusoft.gsqlparser.EErrorType;
import gudusoft.gsqlparser.stmt.TUnknownSqlStatement;
import gudusoft.gsqlparser.stmt.greenplum.TSlashCommand;
import gudusoft.gsqlparser.stmt.TRoutine;
import gudusoft.gsqlparser.sqlcmds.ISqlCmds;
import gudusoft.gsqlparser.sqlcmds.SqlCmdsFactory;
import gudusoft.gsqlparser.compiler.TContext;
import gudusoft.gsqlparser.sqlenv.TSQLEnv;
import gudusoft.gsqlparser.compiler.TGlobalScope;
import gudusoft.gsqlparser.compiler.TFrame;
import gudusoft.gsqlparser.resolver.TSQLResolver;
import gudusoft.gsqlparser.TLog;
import gudusoft.gsqlparser.compiler.TASTEvaluator;

import java.io.BufferedReader;
import java.util.ArrayList;
import java.util.List;
import java.util.Stack;

/**
 * Greenplum database SQL parser implementation.
 *
 * <p>This parser handles Greenplum-specific SQL syntax including:
 * <ul>
 *   <li>PL/pgSQL blocks (procedures, functions, triggers)</li>
 *   <li>Dollar-quoted strings ($$ ... $$)</li>
 *   <li>Backslash meta commands (\d, \dt, etc.)</li>
 *   <li>PostgreSQL-compatible syntax extensions</li>
 *   <li>Special token handling (INNER, NOT DEFERRABLE, etc.)</li>
 * </ul>
 *
 * <p><b>Design Notes:</b>
 * <ul>
 *   <li>Extends {@link AbstractSqlParser} using the template method pattern</li>
 *   <li>Uses {@link TLexerGreenplum} for tokenization</li>
 *   <li>Uses {@link TParserGreenplum} for parsing</li>
 *   <li>Delimiter character: '/' for PL/pgSQL blocks</li>
 * </ul>
 *
 * <p><b>Usage Example:</b>
 * <pre>
 * // Get Greenplum parser from factory
 * SqlParser parser = SqlParserFactory.get(EDbVendor.dbvgreenplum);
 *
 * // Build context
 * ParserContext context = new ParserContext.Builder(EDbVendor.dbvgreenplum)
 *     .sqlText("SELECT * FROM employees WHERE dept_id = 10")
 *     .build();
 *
 * // Parse
 * SqlParseResult result = parser.parse(context);
 *
 * // Access statements
 * TStatementList statements = result.getSqlStatements();
 * </pre>
 *
 * @see SqlParser
 * @see AbstractSqlParser
 * @see TLexerGreenplum
 * @see TParserGreenplum
 * @since 3.3.1.0
 */
public class GreenplumSqlParser extends AbstractSqlParser {

    /**
     * Construct Greenplum SQL parser.
     * <p>
     * Configures the parser for Greenplum database with default delimiter (/).
     * <p>
     * Following the original TGSqlParser pattern, the lexer and parser are
     * created once in the constructor and reused for all parsing operations.
     */
    public GreenplumSqlParser() {
        super(EDbVendor.dbvgreenplum);
        this.delimiterChar = '/';
        this.defaultDelimiterStr = "/";

        // Create lexer once - will be reused for all parsing operations
        this.flexer = new TLexerGreenplum();
        this.flexer.delimiterchar = this.delimiterChar;
        this.flexer.defaultDelimiterStr = this.defaultDelimiterStr;

        // Set parent's lexer reference for shared tokenization logic
        this.lexer = this.flexer;

        // Create parser once - will be reused for all parsing operations
        this.fparser = new TParserGreenplum(null);
        this.fparser.lexer = this.flexer;
    }

    // ========== Parser Components ==========

    /** The Greenplum lexer used for tokenization */
    public TLexerGreenplum flexer;

    /** SQL parser (for Greenplum statements) */
    private TParserGreenplum fparser;

    /** Current statement being built during extraction */
    private TCustomSqlStatement gcurrentsqlstatement;

    // Note: Global context and frame stack fields inherited from AbstractSqlParser:
    // - protected TContext globalContext
    // - protected TSQLEnv sqlEnv
    // - protected Stack<TFrame> frameStack
    // - protected TFrame globalFrame

    // ========== AbstractSqlParser Abstract Methods Implementation ==========

    /**
     * Return the Greenplum lexer instance.
     */
    @Override
    protected TCustomLexer getLexer(ParserContext context) {
        return this.flexer;
    }

    /**
     * Return the Greenplum SQL parser instance with updated token list.
     */
    @Override
    protected TCustomParser getParser(ParserContext context, TSourceTokenList tokens) {
        this.fparser.sourcetokenlist = tokens;
        return this.fparser;
    }

    /**
     * Greenplum doesn't use secondary parser (unlike Oracle with PL/SQL parser).
     */
    @Override
    protected TCustomParser getSecondaryParser(ParserContext context, TSourceTokenList tokens) {
        return null;
    }

    /**
     * Call Greenplum-specific tokenization logic.
     * <p>
     * Delegates to dogreenplumtexttotokenlist which handles Greenplum's
     * tokenization including backslash commands, dollar-quoted strings, and
     * PostgreSQL-compatible syntax.
     */
    @Override
    protected void tokenizeVendorSql() {
        dogreenplumtexttotokenlist();
    }

    /**
     * Setup vendor parsers before raw statement extraction.
     * <p>
     * Injects sqlcmds and sourcetokenlist into the Greenplum parser.
     */
    @Override
    protected void setupVendorParsersForExtraction() {
        this.fparser.sqlcmds = this.sqlcmds;
        this.fparser.sourcetokenlist = this.sourcetokenlist;
    }

    /**
     * Call Greenplum-specific raw statement extraction.
     * <p>
     * Delegates to dogreenplumgetrawsqlstatements which handles:
     * - PL/pgSQL block boundaries (dollar-quoted strings)
     * - Backslash meta commands
     * - Semicolon-separated statements
     */
    @Override
    protected void extractVendorRawStatements(SqlParseResult.Builder builder) {
        dogreenplumgetrawsqlstatements(builder);
    }

    /**
     * Parse all statements in the statement list.
     * <p>
     * This is the main parsing loop that processes each raw statement
     * and converts it into a fully parsed AST.
     */
    @Override
    protected TStatementList performParsing(ParserContext context,
                                           TCustomParser mainParser,
                                           TCustomParser secondaryParser,
                                           TSourceTokenList tokens,
                                           TStatementList rawStatements) {
        // Store references
        this.fparser = (TParserGreenplum) mainParser;
        this.sourcetokenlist = tokens;
        this.parserContext = context;

        // Initialize sqlcmds for this parsing session
        this.sqlcmds = SqlCmdsFactory.get(vendor);
        this.fparser.sqlcmds = this.sqlcmds;

        // Initialize global context and frame stack
        initializeGlobalContext();

        // Parse each statement
        for (int i = 0; i < rawStatements.size(); i++) {
            TCustomSqlStatement stmt = rawStatements.getRawSql(i);
            try {
                stmt.setFrameStack(frameStack);
                int parseResult = stmt.parsestatement(null, false, context.isOnlyNeedRawParseTree());

                // Vendor-specific post-processing (if needed)
                afterStatementParsed(stmt);

                // Error recovery for CREATE TABLE statements
                boolean doRecover = TBaseType.ENABLE_ERROR_RECOVER_IN_CREATE_TABLE;
                if (doRecover && ((parseResult != 0) || (stmt.getErrorCount() > 0))) {
                    handleCreateTableErrorRecovery(stmt);
                }

                // Collect syntax errors from the statement
                if ((parseResult != 0) || (stmt.getErrorCount() > 0)) {
                    copyErrorsFromStatement(stmt);
                }
            } catch (Exception ex) {
                // Use inherited exception handler
                handleStatementParsingException(stmt, i, ex);
                continue;
            }
        }

        // Clean up frame stack
        if (globalFrame != null) {
            globalFrame.popMeFromStack(frameStack);
        }

        return rawStatements;
    }

    /**
     * Perform semantic analysis on parsed statements.
     * <p>
     * This runs the TSQLResolver to resolve column-to-table relationships,
     * data flow analysis, and other semantic checks.
     */
    @Override
    protected void performSemanticAnalysis(ParserContext context, TStatementList statements) {
        if (TBaseType.isEnableResolver() && getSyntaxErrors().isEmpty()) {
            TSQLResolver resolver = new TSQLResolver(globalContext, statements);
            resolver.resolve();
        }
    }


    // ========== Greenplum-Specific Tokenization ==========

    /**
     * Tokenize Greenplum SQL text into tokens.
     * <p>
     * This method handles Greenplum-specific tokenization including:
     * - Backslash meta commands (\d, \dt, etc.)
     * - Forward slash as SQL*Plus-like command delimiter
     * - INNER keyword disambiguation
     * - NOT DEFERRABLE keyword combination
     * - Special operators (%, ROWTYPE, etc.)
     */
    private void dogreenplumtexttotokenlist() {
        boolean insqlpluscmd = false;
        boolean isvalidplace = true;
        boolean waitingreturnforfloatdiv = false;
        boolean waitingreturnforsemicolon = false;
        boolean continuesqlplusatnewline = false;

        TSourceToken lct = null, prevst = null;

        TSourceToken asourcetoken, lcprevst;
        int yychar;

        asourcetoken = getanewsourcetoken();
        if (asourcetoken == null) return;
        yychar = asourcetoken.tokencode;

        while (yychar > 0) {
            sourcetokenlist.add(asourcetoken);
            switch (yychar) {
                case TBaseType.cmtdoublehyphen:
                case TBaseType.cmtslashstar:
                case TBaseType.lexspace: {
                    if (insqlpluscmd) {
                        asourcetoken.insqlpluscmd = true;
                    }
                    break;
                }
                case TBaseType.lexnewline: {
                    if (insqlpluscmd) {
                        insqlpluscmd = false;
                        isvalidplace = true;

                        if (continuesqlplusatnewline) {
                            insqlpluscmd = true;
                            isvalidplace = false;
                            asourcetoken.insqlpluscmd = true;
                        }
                    }

                    if (waitingreturnforsemicolon) {
                        isvalidplace = true;
                    }
                    if (waitingreturnforfloatdiv) {
                        isvalidplace = true;
                        lct.tokencode = TBaseType.sqlpluscmd;
                        if (lct.tokentype != ETokenType.ttslash) {
                            lct.tokentype = ETokenType.ttsqlpluscmd;
                        }
                    }
                    flexer.insqlpluscmd = insqlpluscmd;
                    break;
                } //case newline
                default: {
                    //solid token
                    continuesqlplusatnewline = false;
                    waitingreturnforsemicolon = false;
                    waitingreturnforfloatdiv = false;
                    if (insqlpluscmd) {
                        asourcetoken.insqlpluscmd = true;
                        if (asourcetoken.toString().equalsIgnoreCase("-")) {
                            continuesqlplusatnewline = true;
                        }
                    } else {
                        if (asourcetoken.tokentype == ETokenType.ttsemicolon) {
                            waitingreturnforsemicolon = true;
                        }
                        if ((asourcetoken.tokentype == ETokenType.ttslash)
                                && (isvalidplace || (IsValidPlaceForDivToSqlplusCmd(sourcetokenlist, asourcetoken.posinlist)))) {
                            lct = asourcetoken;
                            waitingreturnforfloatdiv = true;
                        }
                        if ((isvalidplace) && isvalidsqlpluscmdInPostgresql(asourcetoken.toString())) {
                            asourcetoken.tokencode = TBaseType.sqlpluscmd;
                            if (asourcetoken.tokentype != ETokenType.ttslash) {
                                asourcetoken.tokentype = ETokenType.ttsqlpluscmd;
                            }
                            insqlpluscmd = true;
                            flexer.insqlpluscmd = insqlpluscmd;
                        }
                    }
                    isvalidplace = false;

                    // the inner keyword token should be convert to ident when
                    // next solid token is not join

                    if (prevst != null) {
                        if (prevst.tokencode == TBaseType.rrw_inner) {
                            if (asourcetoken.tokencode != flexer.getkeywordvalue("JOIN")) {
                                prevst.tokencode = TBaseType.ident;
                            }
                        }

                        if ((prevst.tokencode == TBaseType.rrw_not)
                                && (asourcetoken.tokencode == flexer.getkeywordvalue("DEFERRABLE"))) {
                            prevst.tokencode = flexer.getkeywordvalue("NOT_DEFERRABLE");
                        }
                    }

                    if (asourcetoken.tokencode == TBaseType.rrw_inner) {
                        prevst = asourcetoken;
                    } else if (asourcetoken.tokencode == TBaseType.rrw_not) {
                        prevst = asourcetoken;
                    } else {
                        prevst = null;
                    }

                    if ((asourcetoken.tokencode == flexer.getkeywordvalue("DIRECT_LOAD"))
                            || (asourcetoken.tokencode == flexer.getkeywordvalue("ALL"))) {
                        // RW_COMPRESS RW_FOR RW_ALL RW_OPERATIONS
                        // RW_COMPRESS RW_FOR RW_DIRECT_LOAD RW_OPERATIONS
                        // change rw_for to rw_for1, it conflicts with compress for update in create materialized view

                        lcprevst = getprevsolidtoken(asourcetoken);
                        if (lcprevst != null) {
                            if (lcprevst.tokencode == TBaseType.rrw_for)
                                lcprevst.tokencode = TBaseType.rw_for1;
                        }
                    }

                    if (asourcetoken.tokencode == TBaseType.rrw_dense_rank) {
                        //keep keyword can be column alias, make keep in keep_denserankclause as a different token code
                        TSourceToken stKeep = asourcetoken.searchToken(TBaseType.rrw_keep, -2);
                        if (stKeep != null) {
                            stKeep.tokencode = TBaseType.rrw_keep_before_dense_rank;
                        }
                    }

                    if (asourcetoken.tokencode == TBaseType.rrw_greenplum_rowtype) {
                        TSourceToken stPercent = asourcetoken.searchToken('%', -1);
                        if (stPercent != null) {
                            stPercent.tokencode = TBaseType.rowtype_operator;
                        }
                    }

                }
            }

            //flexer.yylexwrap(asourcetoken);
            asourcetoken = getanewsourcetoken();
            if (asourcetoken != null) {
                yychar = asourcetoken.tokencode;
            } else {
                yychar = 0;

                if (waitingreturnforfloatdiv) { // / at the end of line treat as sqlplus command
                    //isvalidplace = true;
                    lct.tokencode = TBaseType.sqlpluscmd;
                    if (lct.tokentype != ETokenType.ttslash) {
                        lct.tokentype = ETokenType.ttsqlpluscmd;
                    }
                }

            }

            if ((yychar == 0) && (prevst != null)) {
                if (prevst.tokencode == TBaseType.rrw_inner) {
                    prevst.tokencode = TBaseType.ident;
                }
            }

        }
    }

    // ========== Greenplum-Specific Raw Statement Extraction ==========

    /**
     * Extract raw SQL statements from token list.
     * <p>
     * This method handles Greenplum-specific statement boundaries:
     * - Semicolon (;) for regular SQL statements
     * - Dollar-quoted strings ($$ ... $$) for PL/pgSQL function bodies
     * - Backslash commands (\d, \dt, etc.)
     * - BEGIN/END blocks for stored procedures
     */
    private int dogreenplumgetrawsqlstatements(SqlParseResult.Builder builder) {
        int waitingEnd = 0;
        boolean foundEnd = false, enterDeclare = false;

        if (TBaseType.assigned(sqlstatements)) sqlstatements.clear();
        if (!TBaseType.assigned(sourcetokenlist)) return -1;

        gcurrentsqlstatement = null;
        EFindSqlStateType gst = EFindSqlStateType.stnormal;
        TSourceToken lcprevsolidtoken = null, ast = null;
        TSourceToken dollarStringToken = null;

        for (int i = 0; i < sourcetokenlist.size(); i++) {

            if ((ast != null) && (ast.issolidtoken()))
                lcprevsolidtoken = ast;

            ast = sourcetokenlist.get(i);
            sourcetokenlist.curpos = i;

            // Special token adjustments
            if (ast.tokencode == TBaseType.rrw_date) {
                TSourceToken st1 = ast.nextSolidToken();
                if (st1 != null) {
                    if (st1.tokencode == '(') {
                        ast.tokencode = TBaseType.rrw_greenplum_DATE_FUNCTION;
                    }
                }
            } else if (ast.tokencode == TBaseType.rrw_greenplum_POSITION) {
                TSourceToken st1 = ast.nextSolidToken();
                if (st1 != null) {
                    if (st1.tokencode == '(') {
                        ast.tokencode = TBaseType.rrw_greenplum_POSITION_FUNCTION;
                    }
                }
            } else if (ast.tokencode == TBaseType.rrw_greenplum_filter) {
                TSourceToken st1 = ast.nextSolidToken();
                if (st1 != null) {
                    if (st1.tokencode == '(') {

                    } else {
                        ast.tokencode = TBaseType.ident;
                    }
                }
            } else if (ast.tokencode == TBaseType.rrw_values) {
                TSourceToken stParen = ast.searchToken('(', 1);
                if (stParen != null) {
                    TSourceToken stInsert = ast.searchToken(TBaseType.rrw_insert, -ast.posinlist);
                    if (stInsert != null) {
                        TSourceToken stSemiColon = ast.searchToken(';', -ast.posinlist);
                        if ((stSemiColon != null) && (stSemiColon.posinlist > stInsert.posinlist)) {
//                            INSERT INTO test values (16,1), (8,2), (4,4), (2,0), (97, 16);
//                            VALUES (1);
                            // don't treat values(1) as insert values

                        } else {
                            TSourceToken stFrom = ast.searchToken(TBaseType.rrw_from, -ast.posinlist);
                            if (stFrom != null) {
                                // don't treat values after from keyword as a insert values
                                // insert into inserttest values(10, 20, '40'), (-1, 2, DEFAULT),  ((select 2), (select i from (values(3) ) as foo (i)), 'values are fun!');

                            } else {
                                ast.tokencode = TBaseType.rrw_greenplum_values_insert;
                            }

                        }

                    }
                }
            }

            switch (gst) {
                case sterror: {
                    if (ast.tokentype == ETokenType.ttsemicolon) {
                        gcurrentsqlstatement.sourcetokenlist.add(ast);
                        onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);
                        gst = EFindSqlStateType.stnormal;
                    } else {
                        gcurrentsqlstatement.sourcetokenlist.add(ast);
                    }
                    break;
                } //sterror

                case stnormal: {
                    if ((ast.tokencode == TBaseType.cmtdoublehyphen)
                            || (ast.tokencode == TBaseType.cmtslashstar)
                            || (ast.tokencode == TBaseType.lexspace)
                            || (ast.tokencode == TBaseType.lexnewline)
                            || (ast.tokentype == ETokenType.ttsemicolon)) {
                        if (gcurrentsqlstatement != null) {
                            gcurrentsqlstatement.sourcetokenlist.add(ast);
                        }

                        if ((lcprevsolidtoken != null) && (ast.tokentype == ETokenType.ttsemicolon)) {
                            if (lcprevsolidtoken.tokentype == ETokenType.ttsemicolon) {
                                // ;;;; continuous semicolon,treat it as comment
                                ast.tokentype = ETokenType.ttsimplecomment;
                                ast.tokencode = TBaseType.cmtdoublehyphen;
                            }
                        }

                        continue;
                    }

                    if (ast.tokencode == '\\') {
                        gst = EFindSqlStateType.stsqlplus;
                        gcurrentsqlstatement = new TSlashCommand(vendor);
                        gcurrentsqlstatement.sourcetokenlist.add(ast);
                        continue;
                    }

                    // find a token to start sql or plsql mode
                    gcurrentsqlstatement = sqlcmds.issql(ast, gst, gcurrentsqlstatement);

                    if (gcurrentsqlstatement != null) {
                        if (gcurrentsqlstatement.isgreeplumplsql()) {
                            gst = EFindSqlStateType.ststoredprocedure;
                            gcurrentsqlstatement.sourcetokenlist.add(ast);
                            foundEnd = false;
                            if ((ast.tokencode == TBaseType.rrw_begin)
                                    || (ast.tokencode == TBaseType.rrw_package)
                                    || (ast.searchToken(TBaseType.rrw_package, 4) != null)) {
                                waitingEnd = 1;
                            } else if (ast.tokencode == TBaseType.rrw_declare) {
                                enterDeclare = true;
                            }
                        } else {
                            gst = EFindSqlStateType.stsql;
                            gcurrentsqlstatement.sourcetokenlist.add(ast);
                        }
                    } else {
                        //error token found

                        this.syntaxErrors.add(new TSyntaxError(ast.getAstext(), ast.lineNo, (ast.columnNo < 0 ? 0 : ast.columnNo)
                                , "Error when tokenlize", EErrorType.spwarning, TBaseType.MSG_WARNING_ERROR_WHEN_TOKENIZE, null, ast.posinlist));

                        ast.tokentype = ETokenType.tttokenlizererrortoken;
                        gst = EFindSqlStateType.sterror;

                        gcurrentsqlstatement = new TUnknownSqlStatement(vendor);
                        gcurrentsqlstatement.sqlstatementtype = ESqlStatementType.sstinvalid;
                        gcurrentsqlstatement.sourcetokenlist.add(ast);

                    }

                    break;
                } // stnormal

                case stsqlplus: {
                    if (ast.tokencode == TBaseType.lexnewline) {
                        gst = EFindSqlStateType.stnormal; //this token must be newline,
                        gcurrentsqlstatement.sourcetokenlist.add(ast); // so add it here
                        onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);
                    }
                    if (ast.tokencode == '\\') {
                        TSourceToken nextst = ast.searchToken('\\', 1);
                        if (nextst != null) {
                            gst = EFindSqlStateType.stnormal;
                            gcurrentsqlstatement.sourcetokenlist.add(ast);
                            onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);
                        } else {
                            gst = EFindSqlStateType.stsqlplus;
                            gcurrentsqlstatement = new TSlashCommand(vendor);
                            gcurrentsqlstatement.sourcetokenlist.add(ast);
                            continue;
                        }
                    } else {
                        {
                            gcurrentsqlstatement.sourcetokenlist.add(ast);
                        }
                    }

                    break;
                }//case greenplum meta command

                case stsql: {
                    if (ast.tokentype == ETokenType.ttsemicolon) {
                        gst = EFindSqlStateType.stnormal;
                        gcurrentsqlstatement.sourcetokenlist.add(ast);
                        gcurrentsqlstatement.semicolonended = ast;
                        onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);
                        continue;
                    }

                    if (sourcetokenlist.sqlplusaftercurtoken()) //most probably is / cmd
                    {
                        gst = EFindSqlStateType.stnormal;
                        gcurrentsqlstatement.sourcetokenlist.add(ast);
                        onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);
                        continue;
                    }
                    gcurrentsqlstatement.sourcetokenlist.add(ast);
                    break;
                }//case stsql

                case ststoredprocedure: {
                    if (ast.tokencode == TBaseType.rrw_greenplum_function_delimiter) {
                        gcurrentsqlstatement.sourcetokenlist.add(ast);
                        gst = EFindSqlStateType.ststoredprocedurePgStartBody;
                        dollarStringToken = ast;
                        continue;
                    }

                    if (ast.tokencode == TBaseType.rrw_greenplum_language) {
                        // check next token which is the language used by this stored procedure
                        TSourceToken nextSt = ast.nextSolidToken();
                        if (nextSt != null) {
                            if (gcurrentsqlstatement instanceof TRoutine) {  // can be TCreateProcedureStmt or TCreateFunctionStmt
                                TRoutine p = (TRoutine) gcurrentsqlstatement;
                                p.setRoutineLanguage(nextSt.toString());
                            }
                        }
                    }

                    if ((ast.tokentype == ETokenType.ttsemicolon) && (waitingEnd == 0) && (!enterDeclare)) {
                        gst = EFindSqlStateType.stnormal;
                        gcurrentsqlstatement.sourcetokenlist.add(ast);
                        gcurrentsqlstatement.semicolonended = ast;
                        onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);
                        continue;
                    }


                    if ((ast.tokencode == TBaseType.rrw_begin)) {
                        waitingEnd++;
                        enterDeclare = false;
                    } else if ((ast.tokencode == TBaseType.rrw_declare)) {
                        enterDeclare = true;
                    } else if ((ast.tokencode == TBaseType.rrw_if)) {
                        if (ast.searchToken(TBaseType.rrw_end, -1) == null) {
                            //this is not if after END
                            if (!((ast.searchToken(TBaseType.rrw_greenplum_exits, 1) != null)
                                    || (ast.searchToken(TBaseType.rrw_greenplum_exits, 2) != null))) // if not exists, if exists is not a real if statement, so skip those
                            {
                                waitingEnd++;
                            }
                        }
                    } else if ((ast.tokencode == TBaseType.rrw_case)) {
                        if (ast.searchToken(TBaseType.rrw_end, -1) == null) {
                            //this is not case after END
                            waitingEnd++;
                        }
                    } else if ((ast.tokencode == TBaseType.rrw_loop)) {
                        if (ast.searchToken(TBaseType.rrw_end, -1) == null) {
                            //this is not loop after END
                            waitingEnd++;
                        }
                    } else if (ast.tokencode == TBaseType.rrw_end) {
                        foundEnd = true;
                        waitingEnd--;
                        if (waitingEnd < 0) {
                            waitingEnd = 0;
                        }
                    }

                    if ((ast.tokentype == ETokenType.ttslash) && (ast.tokencode == TBaseType.sqlpluscmd)) //and (prevst.NewlineIsLastTokenInTailerToken)) then
                    {
                        // TPlsqlStatementParse(asqlstatement).TerminatorToken := ast;
                        ast.tokenstatus = ETokenStatus.tsignorebyyacc;
                        gst = EFindSqlStateType.stnormal;
                        onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);

                        //make / a sqlplus cmd
                        gcurrentsqlstatement = new gudusoft.gsqlparser.stmt.oracle.TSqlplusCmdStatement(vendor);
                        gcurrentsqlstatement.sourcetokenlist.add(ast);
                        onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);
                    } else if ((ast.tokentype == ETokenType.ttperiod) && (sourcetokenlist.returnaftercurtoken(false)) && (sourcetokenlist.returnbeforecurtoken(false))) {    // single dot at a separate line
                        ast.tokenstatus = ETokenStatus.tsignorebyyacc;
                        gst = EFindSqlStateType.stnormal;
                        onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);

                        //make ttperiod a sqlplus cmd
                        gcurrentsqlstatement = new gudusoft.gsqlparser.stmt.oracle.TSqlplusCmdStatement(vendor);
                        gcurrentsqlstatement.sourcetokenlist.add(ast);
                        onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);
                    } else if ((ast.tokencode == TBaseType.rrw_declare) && (waitingEnd == 0)) {
                        i--;
                        onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);
                        gst = EFindSqlStateType.stnormal;
                    } else {
                        gcurrentsqlstatement.sourcetokenlist.add(ast);
                        if ((ast.tokentype == ETokenType.ttsemicolon) && (waitingEnd == 0) && (foundEnd) && (gcurrentsqlstatement.OracleStatementCanBeSeparatedByBeginEndPair())) {
                            gst = EFindSqlStateType.stnormal;
                            onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);
                        }
                    }

                    if (ast.tokencode == TBaseType.sqlpluscmd) {
                        //change tokencode back to keyword or ident, because sqlplus cmd
                        //in a sql statement(almost is plsql block) is not really a sqlplus cmd
                        int m = flexer.getkeywordvalue(ast.getAstext());
                        if (m != 0) {
                            ast.tokencode = m;
                        } else {
                            ast.tokencode = TBaseType.ident;
                        }
                    }

                    break;
                } //ststoredprocedure

                case ststoredprocedurePgStartBody: {
                    gcurrentsqlstatement.sourcetokenlist.add(ast);

                    if (ast.tokencode == TBaseType.rrw_greenplum_function_delimiter) {
                        if (dollarStringToken.toString().equalsIgnoreCase(ast.toString())) {
                            // must match the $$ token
                            gst = EFindSqlStateType.ststoredprocedurePgEndBody;
                            continue;
                        }
                    }

                    break;
                }

                case ststoredprocedurePgEndBody: {

                    if (ast.tokentype == ETokenType.ttsemicolon) {
                        gst = EFindSqlStateType.stnormal;
                        gcurrentsqlstatement.sourcetokenlist.add(ast);
                        gcurrentsqlstatement.semicolonended = ast;
                        onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);
                        continue;
                    } else if (ast.tokencode == TBaseType.cmtdoublehyphen) {
                        if (ast.toString().trim().endsWith(TBaseType.sqlflow_stmt_delimiter_str)) { // -- sqlflow-delimiter
                            gst = EFindSqlStateType.stnormal;
                            onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, false, builder);
                            continue;
                        }
                    }

                    gcurrentsqlstatement.sourcetokenlist.add(ast);

                    if (ast.tokencode == TBaseType.rrw_greenplum_language) {
                        // check next token which is the language used by this stored procedure
                        TSourceToken nextSt = ast.nextSolidToken();
                        if (nextSt != null) {
                            if (gcurrentsqlstatement instanceof TRoutine) {  // can be TCreateProcedureStmt or TCreateFunctionStmt
                                TRoutine p = (TRoutine) gcurrentsqlstatement;
                                p.setRoutineLanguage(nextSt.toString());
                            }
                        }
                    }

                    break;
                }

            } //switch
        }//for

        //last statement
        if ((gcurrentsqlstatement != null) &&
                ((gst == EFindSqlStateType.stsqlplus) || (gst == EFindSqlStateType.stsql)
                        || (gst == EFindSqlStateType.ststoredprocedure) || (gst == EFindSqlStateType.ststoredprocedurePgEndBody)
                        || (gst == EFindSqlStateType.sterror))) {
            onRawStatementComplete(parserContext, gcurrentsqlstatement, fparser, null, sqlstatements, true, builder);
        }

        // Set results in builder
        builder.sqlStatements(this.sqlstatements);
        builder.errorCode(0);
        builder.errorMessage("");

        return 0;
    }

    // ========== Helper Methods ==========

    /**
     * Get previous solid token (non-whitespace, non-comment).
     */
    private TSourceToken getprevsolidtoken(TSourceToken asourcetoken) {
        int i = asourcetoken.posinlist;
        TSourceToken st;
        for (i = i - 1; i >= 0; i--) {
            st = sourcetokenlist.get(i);
            if (st.issolidtoken()) return st;
        }
        return null;
    }

    /**
     * Placeholder function for PostgreSQL-style meta command validation.
     * Always returns false - Greenplum doesn't use SQL*Plus commands.
     */
    private boolean isvalidsqlpluscmdInPostgresql(String astr) {
        return false;
    }

    /**
     * Check if forward slash (/) is in a valid position to be treated as a SQL*Plus command.
     */
    private boolean IsValidPlaceForDivToSqlplusCmd(TSourceTokenList tokenList, int pos) {
        // Implementation similar to TSourceTokenList.TokenBeforeCurToken
        // This checks if there's a newline before the current token
        if (pos <= 0) return false;
        for (int i = pos - 1; i >= 0; i--) {
            TSourceToken st = tokenList.get(i);
            if (st.tokencode == TBaseType.lexnewline) {
                return true;
            }
            if (st.issolidtoken()) {
                return false;
            }
        }
        return false;
    }

    /**
     * Hook method called after each statement is parsed.
     * <p>
     * Greenplum doesn't need special post-processing, so this is a no-op.
     */
    @Override
    protected void afterStatementParsed(TCustomSqlStatement stmt) {
        // No special post-processing needed for Greenplum
    }

    /**
     * Handle error recovery for CREATE TABLE statements.
     * <p>
     * This attempts to recover from syntax errors in table properties
     * by marking unparseable tokens as SQL*Plus commands and retrying.
     * <p>
     * Migrated from TGSqlParser.doparse() lines 16914-16971
     */
    private void handleCreateTableErrorRecovery(TCustomSqlStatement stmt) {
        // Only handle CREATE TABLE and CREATE INDEX (but not for Couchbase)
        if (!((stmt.sqlstatementtype == ESqlStatementType.sstcreatetable)
                || ((stmt.sqlstatementtype == ESqlStatementType.sstcreateindex) && (vendor != EDbVendor.dbvcouchbase)))) {
            return;
        }

        // Don't recover if strict parsing is enabled
        if (TBaseType.c_createTableStrictParsing) {
            return;
        }

        // only parse main body of create table,
        // ignore vendor-specific table properties after closing parenthesis
        TCustomSqlStatement errorSqlStatement = stmt;

        int nested = 0;
        boolean isIgnore = false, isFoundIgnoreToken = false;
        TSourceToken firstIgnoreToken = null;

        for (int k = 0; k < errorSqlStatement.sourcetokenlist.size(); k++) {
            TSourceToken st = errorSqlStatement.sourcetokenlist.get(k);

            if (isIgnore) {
                if (st.issolidtoken() && (st.tokencode != ';')) {
                    isFoundIgnoreToken = true;
                    if (firstIgnoreToken == null) {
                        firstIgnoreToken = st;
                    }
                }
                if (st.tokencode != ';') {
                    st.tokencode = TBaseType.sqlpluscmd;
                }
                continue;
            }

            if (st.tokencode == (int) ')') {
                nested--;
                if (nested == 0) {
                    //let's check if next token is: AS ( SELECT
                    boolean isSelect = false;
                    TSourceToken st1 = st.searchToken(TBaseType.rrw_as, 1);
                    if (st1 != null) {
                        TSourceToken st2 = st.searchToken((int) '(', 2);
                        if (st2 != null) {
                            TSourceToken st3 = st.searchToken(TBaseType.rrw_select, 3);
                            isSelect = (st3 != null);
                        }
                    }
                    if (!isSelect) isIgnore = true;
                }
            }

            if ((st.tokencode == (int) '(') || (st.tokencode == TBaseType.left_parenthesis_2)) {
                nested++;
            }
        }

        // For Oracle, check if the first ignored token is a valid table property
        if ((vendor == EDbVendor.dbvoracle) && ((firstIgnoreToken != null) && (!TBaseType.searchOracleTablePros(firstIgnoreToken.toString())))) {
            // if it is not a valid Oracle table properties option, let raise the error.
            isFoundIgnoreToken = false;
        }

        if (isFoundIgnoreToken) {
            errorSqlStatement.clearError();
            stmt.parsestatement(null, false, parserContext.isOnlyNeedRawParseTree());
        }
    }
}