XCTreeLang-XCFramework/XCTreeLang/Statements/XCTLLessthanStatement.swift

//
//  XCTLLessthanStatement.swift
//  notebook
//
//  Created by 邢铖 on 2023/5/25.
//

import Foundation

internal class XCTLLessthanStatement : XCTLStatement {
    
    var type: XCTLStatementType { .typeLessthan }
    
    var holdingObject: XCTLRuntimeVariable { .void }
    
    var compareValueStmt: XCTLStatement!
    var childrenStmt: XCTLStatement = XCTLListStatement()
    
    weak var condStmt: XCTLConditionParentStatement?
    
    weak var parent: XCTLStatement?
    
    func matchSelfStatement(lex: XCTLLexer) throws -> XCTLStatement? {
        if try lex.next().type == .typeLessthan {
            return XCTLLessthanStatement()
        }
        return nil
    }
    
    func parseStatement(fromLexerToSelf lex: XCTLLexer, fromParent: XCTLStatement?) throws {
        if fromParent == nil {
            throw XCTLCompileTimeError.unexpectParentStatementType(expect: "any", butGot: "none")
        }
        guard let parent = fromParent as? XCTLListStatementProtocol,
              let condStmt = parent.conditionParent else {
            throw XCTLCompileTimeError.unexpectParentStatementType(expect: "any-cond-stmt", butGot: "\(fromParent?.type.rawValue ?? "void")")
        }
        self.parent = fromParent
        self.condStmt = condStmt
        try lex.next()
        self.compareValueStmt = try self.parseNextStatement(forLexer: lex)
        try self.childrenStmt.parseStatement(fromLexerToSelf: lex, fromParent: self)
    }
    
    func evaluate(inContext context: XCTLRuntimeAbstractContext) throws -> XCTLRuntimeVariable {
        guard let condFrame = context.findConditionFrame() else {
            throw XCTLRuntimeError.invalidConditionFrame
        }
        guard let originalValue = self.parent?.holdingObject,
              originalValue.type != .typeVoid else {
            throw XCTLRuntimeError.parentNoHoldingObject
        }
        if condFrame.doNext {
            condFrame.doNext = false
            condFrame.doElse = false
            return try self.childrenStmt.evaluate(inContext: context)
        }
        let compareValue = try self.compareValueStmt.evaluate(inContext: context)
        if compareValue.type == .typeVoid {
            throw XCTLRuntimeError.unexpectedVariableType(expect: "any", butGot: "void")
        }
        if compareValue.type != .typeNumber || originalValue.type != .typeNumber {
            throw XCTLRuntimeError.unexpectedVariableType(expect: "number", butGot: compareValue.type.rawValue)
        }
        if compareValue.doubleValue > originalValue.doubleValue {
            condFrame.doElse = false
            return try self.childrenStmt.evaluate(inContext: context)
        }
        return .void
    }
    
}