// Copyright (C) 2015-2026 The Neo Project.
//
// ExecutionEngine.cs file belongs to the neo project and is free
// software distributed under the MIT software license, see the
// accompanying file LICENSE in the main directory of the
// repository or http://www.opensource.org/licenses/mit-license.php
// for more details.
//
// Redistribution and use in source and binary forms with or without
// modifications are permitted.

using Neo.VM.Types;
using System;
using System.Collections.Generic;
using System.Runtime.CompilerServices;

namespace Neo.VM;

/// <summary>
/// Represents the VM used to execute the script.
/// </summary>
public class ExecutionEngine : IDisposable
{
    private VMState _state = VMState.BREAK;

    internal bool isJumping = false;

    public JumpTable JumpTable { get; }

    /// <summary>
    /// Restrictions on the VM.
    /// </summary>
    public ExecutionEngineLimits Limits { get; }

    /// <summary>
    /// Used for reference counting of objects in the VM.
    /// </summary>
    public IReferenceCounter ReferenceCounter { get; }

    /// <summary>
    /// The invocation stack of the VM.
    /// </summary>
    public Stack<ExecutionContext> InvocationStack { get; } = new();

    /// <summary>
    /// The top frame of the invocation stack.
    /// </summary>
    public ExecutionContext? CurrentContext { get; private set; }

    /// <summary>
    /// The bottom frame of the invocation stack.
    /// </summary>
    public ExecutionContext? EntryContext { get; private set; }

    /// <summary>
    /// The stack to store the return values.
    /// </summary>
    public EvaluationStack ResultStack { get; }

    /// <summary>
    /// The VM object representing the uncaught exception.
    /// </summary>
    public StackItem? UncaughtException { get; internal set; }

    /// <summary>
    /// The current state of the VM.
    /// </summary>
    public VMState State
    {
        get
        {
            return _state;
        }
        protected internal set
        {
            if (_state != value)
            {
                _state = value;
                OnStateChanged();
            }
        }
    }

    /// <summary>
    /// Initializes a new instance of the <see cref="ExecutionEngine"/> class.
    /// </summary>
    /// <param name="jumpTable">The jump table to be used.</param>
    public ExecutionEngine(JumpTable? jumpTable = null)
        : this(jumpTable, new ReferenceCounter(), ExecutionEngineLimits.Default) { }

    /// <summary>
    /// Initializes a new instance of the <see cref="ExecutionEngine"/> class
    /// with the specified <see cref="VM.IReferenceCounter"/> and <see cref="ExecutionEngineLimits"/>.
    /// </summary>
    /// <param name="jumpTable">The jump table to be used.</param>
    /// <param name="referenceCounter">The reference counter to be used.</param>
    /// <param name="limits">Restrictions on the VM.</param>
    internal ExecutionEngine(JumpTable? jumpTable, IReferenceCounter referenceCounter, ExecutionEngineLimits limits)
    {
        JumpTable = jumpTable ?? JumpTable.Default;
        Limits = limits;
        ReferenceCounter = referenceCounter;
        ResultStack = new(referenceCounter);
    }

    public void Dispose()
    {
        Dispose(true);
        GC.SuppressFinalize(this);
    }

    protected virtual void Dispose(bool disposing)
    {
        if (disposing)
        {
            InvocationStack.Clear();
        }
    }

    /// <summary>
    /// Start execution of the VM.
    /// </summary>
    /// <returns></returns>
    public virtual VMState Execute()
    {
        if (State == VMState.BREAK)
            State = VMState.NONE;
        while (State != VMState.HALT && State != VMState.FAULT)
            ExecuteNext();
        return State;
    }

    /// <summary>
    /// Execute the next instruction.
    /// </summary>
    protected internal void ExecuteNext()
    {
        if (InvocationStack.Count == 0)
        {
            State = VMState.HALT;
        }
        else
        {
            try
            {
                ExecutionContext context = CurrentContext!;
                Instruction? currentInstruction = context.CurrentInstruction;
                Instruction instruction = currentInstruction ?? Instruction.RET;
                RunStats runStats = default;
                PreExecuteInstruction(instruction);
#if VMPERF
                Console.WriteLine("op:["
                                  + this.CurrentContext.InstructionPointer.ToString("X04")
                                  + "]"
                                  + this.CurrentContext.CurrentInstruction?.OpCode
                                  + " "
                                  + this.CurrentContext.EvaluationStack);
#endif
                try
                {
                    JumpTable[instruction.OpCode](this, instruction, ref runStats);
                }
                finally
                {
                    PostExecuteInstruction(currentInstruction, runStats);
                }
                if (!isJumping && currentInstruction != null)
                    context.InstructionPointer += instruction.Size;
                isJumping = false;
            }
            catch (Exception e)
            {
                OnFault(e);
            }
        }
    }

    /// <summary>
    /// Loads the specified context into the invocation stack.
    /// </summary>
    /// <param name="context">The context to load.</param>
    public virtual void LoadContext(ExecutionContext context)
    {
        if (InvocationStack.Count >= Limits.MaxInvocationStackSize)
            throw new InvalidOperationException($"MaxInvocationStackSize exceed: {InvocationStack.Count}");
        InvocationStack.Push(context);
        EntryContext ??= context;
        CurrentContext = context;
    }

    /// <summary>
    /// Called when a context is unloaded.
    /// </summary>
    /// <param name="context">The context being unloaded.</param>
    internal protected virtual void ContextUnloaded(ExecutionContext context)
    {
        if (InvocationStack.Count == 0)
        {
            CurrentContext = null;
            EntryContext = null;
        }
        else
        {
            CurrentContext = InvocationStack.Peek();
        }
        if (context.StaticFields != null && context.StaticFields != CurrentContext?.StaticFields)
        {
            context.StaticFields.ClearReferences();
        }
        context.LocalVariables?.ClearReferences();
        context.Arguments?.ClearReferences();
    }

    /// <summary>
    /// Create a new context with the specified script without loading.
    /// </summary>
    /// <param name="script">The script used to create the context.</param>
    /// <param name="rvcount">The number of values that the context should return when it is unloaded.</param>
    /// <param name="initialPosition">The pointer indicating the current instruction.</param>
    /// <returns>The created context.</returns>
    [MethodImpl(MethodImplOptions.AggressiveInlining)]
    protected ExecutionContext CreateContext(Script script, int rvcount, int initialPosition)
    {
        return new ExecutionContext(script, rvcount, ReferenceCounter)
        {
            InstructionPointer = initialPosition
        };
    }

    /// <summary>
    /// Create a new context with the specified script and load it.
    /// </summary>
    /// <param name="script">The script used to create the context.</param>
    /// <param name="rvcount">The number of values that the context should return when it is unloaded.</param>
    /// <param name="initialPosition">The pointer indicating the current instruction.</param>
    /// <returns>The created context.</returns>
    public ExecutionContext LoadScript(Script script, int rvcount = -1, int initialPosition = 0)
    {
        var context = CreateContext(script, rvcount, initialPosition);
        LoadContext(context);
        return context;
    }

    /// <summary>
    /// Called when an exception that cannot be caught by the VM is thrown.
    /// </summary>
    /// <param name="ex">The exception that caused the <see cref="VMState.FAULT"/> state.</param>
    protected virtual void OnFault(Exception ex)
    {
        State = VMState.FAULT;

#if VMPERF
        if (ex != null)
        {
            Console.Error.WriteLine(ex);
        }
#endif
    }

    /// <summary>
    /// Called when the state of the VM changed.
    /// </summary>
    protected virtual void OnStateChanged()
    {
    }

    /// <summary>
    /// Returns the item at the specified index from the top of the current stack without removing it.
    /// </summary>
    /// <param name="index">The index of the object from the top of the stack.</param>
    /// <returns>The item at the specified index.</returns>
    [MethodImpl(MethodImplOptions.AggressiveInlining)]
    public StackItem Peek(int index = 0)
    {
        return CurrentContext!.EvaluationStack.Peek(index);
    }

    /// <summary>
    /// Removes and returns the item at the top of the current stack.
    /// </summary>
    /// <returns>The item removed from the top of the stack.</returns>
    [MethodImpl(MethodImplOptions.AggressiveInlining)]
    public StackItem Pop()
    {
        return CurrentContext!.EvaluationStack.Pop();
    }

    /// <summary>
    /// Removes and returns the item at the top of the current stack without reference counting.
    /// </summary>
    /// <returns>The item removed from the top of the stack.</returns>
    [MethodImpl(MethodImplOptions.AggressiveInlining)]
    internal StackItem PopNoRef()
    {
        return CurrentContext!.EvaluationStack.PopNoRef();
    }

    /// <summary>
    /// Removes and returns the item at the top of the current stack and convert it to the specified type.
    /// </summary>
    /// <typeparam name="T">The type to convert to.</typeparam>
    /// <returns>The item removed from the top of the stack.</returns>
    [MethodImpl(MethodImplOptions.AggressiveInlining)]
    public T Pop<T>() where T : StackItem
    {
        return CurrentContext!.EvaluationStack.Pop<T>();
    }

    /// <summary>
    /// Removes and returns the item at the top of the current stack and convert it to the specified type
    /// without reference counting.
    /// </summary>
    /// <typeparam name="T">The type to convert to.</typeparam>
    /// <returns>The item removed from the top of the stack.</returns>
    [MethodImpl(MethodImplOptions.AggressiveInlining)]
    internal T PopNoRef<T>() where T : StackItem
    {
        return CurrentContext!.EvaluationStack.PopNoRef<T>();
    }

    /// <summary>
    /// Called after an instruction is executed.
    /// </summary>
    protected virtual void PostExecuteInstruction(Instruction? instruction, RunStats runStats)
    {
        ReferenceCounter.PostExecuteInstruction();
    }

    /// <summary>
    /// Called before an instruction is executed.
    /// </summary>
    protected virtual void PreExecuteInstruction(Instruction instruction) { }

    /// <summary>
    /// Pushes an item onto the top of the current stack.
    /// </summary>
    /// <param name="item">The item to be pushed.</param>
    [MethodImpl(MethodImplOptions.AggressiveInlining)]
    public void Push(StackItem item)
    {
        CurrentContext!.EvaluationStack.Push(item);
    }

    /// <summary>
    /// Pushes item to the stack and adds exactly the specified
    /// value to the reference counter. It's a perfect method to ruin the counter,
    /// so use carefully.
    /// </summary>
    /// <param name="item">The item to be pushed.</param>
    /// <param name="count">The value by which the reference counter increases.</param>s
    [MethodImpl(MethodImplOptions.AggressiveInlining)]
    internal void PushItemCounted(StackItem item, int count)
    {
        CurrentContext!.EvaluationStack.PushItemCounted(item, count);
    }
}