146 lines
9.2 KiB
C++
146 lines
9.2 KiB
C++
/*!
|
|
@file src/VM/VM.hpp
|
|
@brief 虚拟机核心执行引擎实现
|
|
@author PuqiAR (im@puqiar.top)
|
|
@date 2026-02-19
|
|
*/
|
|
|
|
#include <VM/VM.hpp>
|
|
|
|
#define BINARY_ARITHMETIC_OP(opCode, op) \
|
|
case OpCode::opCode: { \
|
|
std::uint8_t b = decodeB(inst); \
|
|
std::uint8_t c = decodeC(inst); \
|
|
Value lhs = registers[b]; \
|
|
Value rhs = registers[c]; \
|
|
if (lhs.IsInt() && rhs.IsInt()) [[likely]] \
|
|
{ \
|
|
registers[a] = Value::FromInt(lhs.AsInt() op rhs.AsInt()); \
|
|
} \
|
|
else if (lhs.IsDouble() && rhs.IsDouble()) [[likely]] \
|
|
{ \
|
|
registers[a] = Value::FromDouble(lhs.AsDouble() op rhs.AsDouble()); \
|
|
} \
|
|
/* 隐式类型提升：Int 与 Double 混合运算 */ \
|
|
else if (lhs.IsInt() && rhs.IsDouble()) [[likely]] \
|
|
{ \
|
|
registers[a] = Value::FromDouble(lhs.AsInt() op rhs.AsDouble()); \
|
|
} \
|
|
else if (lhs.IsDouble() && rhs.IsInt()) [[likely]] \
|
|
{ \
|
|
registers[a] = Value::FromDouble(lhs.AsDouble() op rhs.AsInt()); \
|
|
} \
|
|
else \
|
|
{ \
|
|
assert(false && "VM Runtime Error: Unsupported types for arithmetic operation"); \
|
|
} \
|
|
break; \
|
|
}
|
|
|
|
#define BINARY_COMPARE_OP(opCode, op) \
|
|
case OpCode::opCode: { \
|
|
std::uint8_t b = decodeB(inst); \
|
|
std::uint8_t c = decodeC(inst); \
|
|
Value lhs = registers[b]; \
|
|
Value rhs = registers[c]; \
|
|
if (lhs.IsInt() && rhs.IsInt()) [[likely]] \
|
|
{ \
|
|
registers[a] = (lhs.AsInt() op rhs.AsInt()) ? Value::GetTrueInstance() : Value::GetFalseInstance(); \
|
|
} \
|
|
else if (lhs.IsDouble() && rhs.IsDouble()) [[likely]] \
|
|
{ \
|
|
registers[a] = (lhs.AsDouble() op rhs.AsDouble()) ? Value::GetTrueInstance() : Value::GetFalseInstance(); \
|
|
} \
|
|
else if (lhs.IsInt() && rhs.IsDouble()) [[likely]] \
|
|
{ \
|
|
registers[a] = (lhs.AsInt() op rhs.AsDouble()) ? Value::GetTrueInstance() : Value::GetFalseInstance(); \
|
|
} \
|
|
else if (lhs.IsDouble() && rhs.IsInt()) [[likely]] \
|
|
{ \
|
|
registers[a] = (lhs.AsDouble() op rhs.AsInt()) ? Value::GetTrueInstance() : Value::GetFalseInstance(); \
|
|
} \
|
|
else \
|
|
{ \
|
|
/* TODO: 非数字比较 */ \
|
|
assert(false && "VM Runtime Error: Unsupported types for comparison"); \
|
|
} \
|
|
break; \
|
|
}
|
|
|
|
namespace Fig
|
|
{
|
|
Result<Value, Error> VM::Execute(Proto *proto)
|
|
{
|
|
// 指令指针 (Instruction Pointer / PC) 和 常量池指针
|
|
const Instruction *ip = proto->code.data();
|
|
const Value *k = proto->constants.data();
|
|
|
|
// 核心解释器循环 (The Dispatch Loop)
|
|
while (true)
|
|
{
|
|
// 取指并递增指针
|
|
Instruction inst = *ip++;
|
|
|
|
// 解码 OpCode 和 A 操作数
|
|
OpCode op = decodeOpCode(inst);
|
|
std::uint8_t a = decodeA(inst);
|
|
switch (op)
|
|
{
|
|
case OpCode::Exit: {
|
|
return Value::GetNullInstance();
|
|
}
|
|
|
|
case OpCode::LoadK: {
|
|
std::uint16_t bx = decodeBx(inst);
|
|
registers[a] = k[bx]; // constants
|
|
break;
|
|
}
|
|
|
|
case OpCode::Return: {
|
|
return registers[a];
|
|
}
|
|
|
|
case OpCode::Jmp: {
|
|
std::int16_t sbx = decodeSBx(inst);
|
|
ip += sbx;
|
|
break;
|
|
}
|
|
|
|
case OpCode::JmpIfFalse: {
|
|
Value &v = registers[a];
|
|
bool cond = v.AsBool(); // 条件类型 Compiler检查
|
|
if (!cond)
|
|
{
|
|
std::int16_t sbx = decodeSBx(inst);
|
|
ip += sbx;
|
|
}
|
|
break;
|
|
}
|
|
|
|
case OpCode::Mov: {
|
|
std::uint16_t bx = decodeBx(inst);
|
|
registers[a] = registers[bx];
|
|
break;
|
|
}
|
|
|
|
BINARY_ARITHMETIC_OP(Add, +);
|
|
BINARY_ARITHMETIC_OP(Sub, -);
|
|
BINARY_ARITHMETIC_OP(Mul, *);
|
|
BINARY_ARITHMETIC_OP(Div, /);
|
|
|
|
BINARY_COMPARE_OP(Equal, ==);
|
|
BINARY_COMPARE_OP(NotEqual, !=);
|
|
BINARY_COMPARE_OP(Greater, >);
|
|
BINARY_COMPARE_OP(Less, <);
|
|
BINARY_COMPARE_OP(GreaterEqual, >=);
|
|
BINARY_COMPARE_OP(LessEqual, <=);
|
|
|
|
|
|
default: {
|
|
assert(false && "VM: Unknown OpCode encountered!");
|
|
}
|
|
}
|
|
}
|
|
return Value::GetNullInstance();
|
|
}
|
|
}; // namespace Fig
|