summaryrefslogtreecommitdiff
path: root/Userland/Libraries/LibWasm/AbstractMachine
diff options
context:
space:
mode:
authorSahan Fernando <sahan.h.fernando@gmail.com>2021-06-04 21:54:20 +1000
committerAli Mohammad Pur <Ali.mpfard@gmail.com>2021-06-05 14:31:54 +0430
commitd02e7b38119107a8bc42af8e23d8e6d491b18c78 (patch)
treee1b798474f16ca4dfe2011d50d0d88c4985754e7 /Userland/Libraries/LibWasm/AbstractMachine
parent94551149d1b5b468f5d8779386178ba9ee9207fe (diff)
downloadserenity-d02e7b38119107a8bc42af8e23d8e6d491b18c78.zip
LibWasm: Move Wasm::BytecodeInterpreter into its own header
Diffstat (limited to 'Userland/Libraries/LibWasm/AbstractMachine')
-rw-r--r--Userland/Libraries/LibWasm/AbstractMachine/AbstractMachine.cpp3
-rw-r--r--Userland/Libraries/LibWasm/AbstractMachine/BytecodeInterpreter.cpp999
-rw-r--r--Userland/Libraries/LibWasm/AbstractMachine/BytecodeInterpreter.h70
-rw-r--r--Userland/Libraries/LibWasm/AbstractMachine/Interpreter.cpp990
-rw-r--r--Userland/Libraries/LibWasm/AbstractMachine/Interpreter.h56
5 files changed, 1071 insertions, 1047 deletions
diff --git a/Userland/Libraries/LibWasm/AbstractMachine/AbstractMachine.cpp b/Userland/Libraries/LibWasm/AbstractMachine/AbstractMachine.cpp
index bb7315afd8..80ec5a619c 100644
--- a/Userland/Libraries/LibWasm/AbstractMachine/AbstractMachine.cpp
+++ b/Userland/Libraries/LibWasm/AbstractMachine/AbstractMachine.cpp
@@ -4,9 +4,10 @@
* SPDX-License-Identifier: BSD-2-Clause
*/
-#include "Interpreter.h"
#include <LibWasm/AbstractMachine/AbstractMachine.h>
+#include <LibWasm/AbstractMachine/BytecodeInterpreter.h>
#include <LibWasm/AbstractMachine/Configuration.h>
+#include <LibWasm/AbstractMachine/Interpreter.h>
#include <LibWasm/Types.h>
namespace Wasm {
diff --git a/Userland/Libraries/LibWasm/AbstractMachine/BytecodeInterpreter.cpp b/Userland/Libraries/LibWasm/AbstractMachine/BytecodeInterpreter.cpp
new file mode 100644
index 0000000000..699aed649a
--- /dev/null
+++ b/Userland/Libraries/LibWasm/AbstractMachine/BytecodeInterpreter.cpp
@@ -0,0 +1,999 @@
+/*
+ * Copyright (c) 2021, Ali Mohammad Pur <mpfard@serenityos.org>
+ *
+ * SPDX-License-Identifier: BSD-2-Clause
+ */
+
+#include <AK/Debug.h>
+#include <LibWasm/AbstractMachine/AbstractMachine.h>
+#include <LibWasm/AbstractMachine/BytecodeInterpreter.h>
+#include <LibWasm/AbstractMachine/Configuration.h>
+#include <LibWasm/Opcode.h>
+#include <LibWasm/Printer/Printer.h>
+#include <limits.h>
+#include <math.h>
+
+namespace Wasm {
+
+#define TRAP_IF_NOT(x) \
+ do { \
+ if (trap_if_not(x)) { \
+ dbgln_if(WASM_TRACE_DEBUG, "Trapped because {} failed, at line {}", #x, __LINE__); \
+ return; \
+ } \
+ } while (false)
+
+#define TRAP_IF_NOT_NORETURN(x) \
+ do { \
+ if (trap_if_not(x)) { \
+ dbgln_if(WASM_TRACE_DEBUG, "Trapped because {} failed, at line {}", #x, __LINE__); \
+ } \
+ } while (false)
+
+void BytecodeInterpreter::interpret(Configuration& configuration)
+{
+ m_do_trap = false;
+ auto& instructions = configuration.frame().expression().instructions();
+ auto max_ip_value = InstructionPointer { instructions.size() };
+ auto& current_ip_value = configuration.ip();
+
+ while (current_ip_value < max_ip_value) {
+ auto& instruction = instructions[current_ip_value.value()];
+ auto old_ip = current_ip_value;
+ interpret(configuration, current_ip_value, instruction);
+ if (m_do_trap)
+ return;
+ if (current_ip_value == old_ip) // If no jump occurred
+ ++current_ip_value;
+ }
+}
+
+void BytecodeInterpreter::branch_to_label(Configuration& configuration, LabelIndex index)
+{
+ dbgln_if(WASM_TRACE_DEBUG, "Branch to label with index {}...", index.value());
+ auto label = configuration.nth_label(index.value());
+ TRAP_IF_NOT(label.has_value());
+ dbgln_if(WASM_TRACE_DEBUG, "...which is actually IP {}, and has {} result(s)", label->continuation().value(), label->arity());
+ auto results = pop_values(configuration, label->arity());
+
+ size_t drop_count = index.value() + 1;
+ for (; !configuration.stack().is_empty();) {
+ auto& entry = configuration.stack().peek();
+ if (entry.has<Label>()) {
+ if (--drop_count == 0)
+ break;
+ }
+ configuration.stack().pop();
+ }
+
+ for (auto& result : results)
+ configuration.stack().push(move(result));
+
+ configuration.ip() = label->continuation();
+}
+
+template<typename ReadType, typename PushType>
+void BytecodeInterpreter::load_and_push(Configuration& configuration, Instruction const& instruction)
+{
+ auto& address = configuration.frame().module().memories().first();
+ auto memory = configuration.store().get(address);
+ if (!memory) {
+ m_do_trap = true;
+ return;
+ }
+ auto& arg = instruction.arguments().get<Instruction::MemoryArgument>();
+ auto base = configuration.stack().peek().get<Value>().to<i32>();
+ if (!base.has_value()) {
+ m_do_trap = true;
+ return;
+ }
+ auto instance_address = base.value() + static_cast<i64>(arg.offset);
+ if (instance_address < 0 || static_cast<u64>(instance_address + sizeof(ReadType)) > memory->size()) {
+ m_do_trap = true;
+ dbgln("LibWasm: Memory access out of bounds (expected 0 <= {} and {} <= {})", instance_address, instance_address + sizeof(ReadType), memory->size());
+ return;
+ }
+ dbgln_if(WASM_TRACE_DEBUG, "load({} : {}) -> stack", instance_address, sizeof(ReadType));
+ auto slice = memory->data().bytes().slice(instance_address, sizeof(ReadType));
+ configuration.stack().peek() = Value(static_cast<PushType>(read_value<ReadType>(slice)));
+}
+
+void BytecodeInterpreter::store_to_memory(Configuration& configuration, Instruction const& instruction, ReadonlyBytes data)
+{
+ auto& address = configuration.frame().module().memories().first();
+ auto memory = configuration.store().get(address);
+ TRAP_IF_NOT(memory);
+ auto& arg = instruction.arguments().get<Instruction::MemoryArgument>();
+ auto base = configuration.stack().pop().get<Value>().to<i32>();
+ TRAP_IF_NOT(base.has_value());
+ auto instance_address = base.value() + static_cast<i64>(arg.offset);
+ if (instance_address < 0 || static_cast<u64>(instance_address + data.size()) > memory->size()) {
+ m_do_trap = true;
+ dbgln("LibWasm: Memory access out of bounds (expected 0 <= {} and {} <= {})", instance_address, instance_address + data.size(), memory->size());
+ return;
+ }
+ dbgln_if(WASM_TRACE_DEBUG, "tempoaray({}b) -> store({})", data.size(), instance_address);
+ data.copy_to(memory->data().bytes().slice(instance_address, data.size()));
+}
+
+void BytecodeInterpreter::call_address(Configuration& configuration, FunctionAddress address)
+{
+ auto instance = configuration.store().get(address);
+ TRAP_IF_NOT(instance);
+ FunctionType const* type { nullptr };
+ instance->visit([&](auto const& function) { type = &function.type(); });
+ TRAP_IF_NOT(type);
+ TRAP_IF_NOT(configuration.stack().entries().size() > type->parameters().size());
+ Vector<Value> args;
+ args.ensure_capacity(type->parameters().size());
+ auto span = configuration.stack().entries().span().slice_from_end(type->parameters().size());
+ for (auto& entry : span) {
+ auto* ptr = entry.get_pointer<Value>();
+ TRAP_IF_NOT(ptr != nullptr);
+ args.unchecked_append(*ptr);
+ }
+
+ configuration.stack().entries().remove(configuration.stack().size() - span.size(), span.size());
+
+ Result result { Trap {} };
+ {
+ CallFrameHandle handle { *this, configuration };
+ result = configuration.call(*this, address, move(args));
+ }
+
+ if (result.is_trap()) {
+ m_do_trap = true;
+ return;
+ }
+
+ configuration.stack().entries().ensure_capacity(configuration.stack().size() + result.values().size());
+ for (auto& entry : result.values())
+ configuration.stack().entries().unchecked_append(move(entry));
+}
+
+#define BINARY_NUMERIC_OPERATION(type, operator, cast, ...) \
+ do { \
+ auto rhs = configuration.stack().pop().get<Value>().to<type>(); \
+ auto lhs = configuration.stack().peek().get<Value>().to<type>(); \
+ TRAP_IF_NOT(lhs.has_value()); \
+ TRAP_IF_NOT(rhs.has_value()); \
+ __VA_ARGS__; \
+ auto result = lhs.value() operator rhs.value(); \
+ dbgln_if(WASM_TRACE_DEBUG, "{} {} {} = {}", lhs.value(), #operator, rhs.value(), result); \
+ configuration.stack().peek() = Value(cast(result)); \
+ return; \
+ } while (false)
+
+#define OVF_CHECKED_BINARY_NUMERIC_OPERATION(type, operator, cast, ...) \
+ do { \
+ auto rhs = configuration.stack().pop().get<Value>().to<type>(); \
+ auto ulhs = configuration.stack().peek().get<Value>().to<type>(); \
+ TRAP_IF_NOT(ulhs.has_value()); \
+ TRAP_IF_NOT(rhs.has_value()); \
+ dbgln_if(WASM_TRACE_DEBUG, "{} {} {} = ??", ulhs.value(), #operator, rhs.value()); \
+ __VA_ARGS__; \
+ Checked lhs = ulhs.value(); \
+ lhs operator##= rhs.value(); \
+ TRAP_IF_NOT(!lhs.has_overflow()); \
+ auto result = lhs.value(); \
+ dbgln_if(WASM_TRACE_DEBUG, "{} {} {} = {}", ulhs.value(), #operator, rhs.value(), result); \
+ configuration.stack().peek() = Value(cast(result)); \
+ return; \
+ } while (false)
+
+#define BINARY_PREFIX_NUMERIC_OPERATION(type, operation, cast, ...) \
+ do { \
+ auto rhs = configuration.stack().pop().get<Value>().to<type>(); \
+ auto lhs = configuration.stack().peek().get<Value>().to<type>(); \
+ TRAP_IF_NOT(lhs.has_value()); \
+ TRAP_IF_NOT(rhs.has_value()); \
+ auto result = operation(lhs.value(), rhs.value()); \
+ dbgln_if(WASM_TRACE_DEBUG, "{}({} {}) = {}", #operation, lhs.value(), rhs.value(), result); \
+ configuration.stack().peek() = Value(cast(result)); \
+ return; \
+ } while (false)
+
+#define UNARY_MAP(pop_type, operation, ...) \
+ do { \
+ auto value = configuration.stack().peek().get<Value>().to<pop_type>(); \
+ TRAP_IF_NOT(value.has_value()); \
+ auto result = operation(value.value()); \
+ dbgln_if(WASM_TRACE_DEBUG, "map({}) {} = {}", #operation, value.value(), result); \
+ configuration.stack().peek() = Value(__VA_ARGS__(result)); \
+ return; \
+ } while (false)
+
+#define UNARY_NUMERIC_OPERATION(type, operation) \
+ UNARY_MAP(type, operation, type)
+
+#define LOAD_AND_PUSH(read_type, push_type) \
+ do { \
+ return load_and_push<read_type, push_type>(configuration, instruction); \
+ } while (false)
+
+#define POP_AND_STORE(pop_type, store_type) \
+ do { \
+ auto value = ConvertToRaw<store_type> {}(*configuration.stack().pop().get<Value>().to<pop_type>()); \
+ dbgln_if(WASM_TRACE_DEBUG, "stack({}) -> temporary({}b)", value, sizeof(store_type)); \
+ store_to_memory(configuration, instruction, { &value, sizeof(store_type) }); \
+ return; \
+ } while (false)
+
+template<typename T>
+T BytecodeInterpreter::read_value(ReadonlyBytes data)
+{
+ LittleEndian<T> value;
+ InputMemoryStream stream { data };
+ stream >> value;
+ if (stream.handle_any_error()) {
+ dbgln("Read from {} failed", data.data());
+ m_do_trap = true;
+ }
+ return value;
+}
+
+template<>
+float BytecodeInterpreter::read_value<float>(ReadonlyBytes data)
+{
+ InputMemoryStream stream { data };
+ LittleEndian<u32> raw_value;
+ stream >> raw_value;
+ if (stream.handle_any_error())
+ m_do_trap = true;
+ return bit_cast<float>(static_cast<u32>(raw_value));
+}
+
+template<>
+double BytecodeInterpreter::read_value<double>(ReadonlyBytes data)
+{
+ InputMemoryStream stream { data };
+ LittleEndian<u64> raw_value;
+ stream >> raw_value;
+ if (stream.handle_any_error())
+ m_do_trap = true;
+ return bit_cast<double>(static_cast<u64>(raw_value));
+}
+
+template<typename T>
+struct ConvertToRaw {
+ T operator()(T value)
+ {
+ return LittleEndian<T>(value);
+ }
+};
+
+template<>
+struct ConvertToRaw<float> {
+ u32 operator()(float value)
+ {
+ LittleEndian<u32> res;
+ ReadonlyBytes bytes { &value, sizeof(float) };
+ InputMemoryStream stream { bytes };
+ stream >> res;
+ VERIFY(!stream.has_any_error());
+ return static_cast<u32>(res);
+ }
+};
+
+template<>
+struct ConvertToRaw<double> {
+ u64 operator()(double value)
+ {
+ LittleEndian<u64> res;
+ ReadonlyBytes bytes { &value, sizeof(double) };
+ InputMemoryStream stream { bytes };
+ stream >> res;
+ VERIFY(!stream.has_any_error());
+ return static_cast<u64>(res);
+ }
+};
+
+template<typename V, typename T>
+MakeSigned<T> BytecodeInterpreter::checked_signed_truncate(V value)
+{
+ if (isnan(value) || isinf(value)) { // "undefined", let's just trap.
+ m_do_trap = true;
+ return 0;
+ }
+
+ double truncated;
+ if constexpr (IsSame<float, V>)
+ truncated = truncf(value);
+ else
+ truncated = trunc(value);
+
+ using SignedT = MakeSigned<T>;
+ if (NumericLimits<SignedT>::min() <= truncated && static_cast<double>(NumericLimits<SignedT>::max()) >= truncated)
+ return static_cast<SignedT>(truncated);
+
+ dbgln_if(WASM_TRACE_DEBUG, "Truncate out of range error");
+ m_do_trap = true;
+ return true;
+}
+
+template<typename V, typename T>
+MakeUnsigned<T> BytecodeInterpreter::checked_unsigned_truncate(V value)
+{
+ if (isnan(value) || isinf(value)) { // "undefined", let's just trap.
+ m_do_trap = true;
+ return 0;
+ }
+ double truncated;
+ if constexpr (IsSame<float, V>)
+ truncated = truncf(value);
+ else
+ truncated = trunc(value);
+
+ using UnsignedT = MakeUnsigned<T>;
+ if (NumericLimits<UnsignedT>::min() <= truncated && static_cast<double>(NumericLimits<UnsignedT>::max()) >= truncated)
+ return static_cast<UnsignedT>(truncated);
+
+ dbgln_if(WASM_TRACE_DEBUG, "Truncate out of range error");
+ m_do_trap = true;
+ return true;
+}
+
+Vector<Value> BytecodeInterpreter::pop_values(Configuration& configuration, size_t count)
+{
+ Vector<Value> results;
+ results.resize(count);
+
+ for (size_t i = 0; i < count; ++i) {
+ auto top_of_stack = configuration.stack().pop();
+ if (auto value = top_of_stack.get_pointer<Value>())
+ results[i] = move(*value);
+ else
+ TRAP_IF_NOT_NORETURN(value);
+ }
+ return results;
+}
+
+template<typename T, typename R>
+ALWAYS_INLINE static T rotl(T value, R shift)
+{
+ // generates a single 'rol' instruction if shift is positive
+ // otherwise generate a `ror`
+ auto const mask = CHAR_BIT * sizeof(T) - 1;
+ shift &= mask;
+ return (value << shift) | (value >> ((-shift) & mask));
+}
+
+template<typename T, typename R>
+ALWAYS_INLINE static T rotr(T value, R shift)
+{
+ // generates a single 'ror' instruction if shift is positive
+ // otherwise generate a `rol`
+ auto const mask = CHAR_BIT * sizeof(T) - 1;
+ shift &= mask;
+ return (value >> shift) | (value << ((-shift) & mask));
+}
+
+template<typename T>
+ALWAYS_INLINE static i32 clz(T value)
+{
+ if (value == 0)
+ return sizeof(T) * CHAR_BIT;
+
+ if constexpr (sizeof(T) == 4)
+ return __builtin_clz(value);
+ else if constexpr (sizeof(T) == 8)
+ return __builtin_clzll(value);
+ else
+ VERIFY_NOT_REACHED();
+}
+
+template<typename T>
+ALWAYS_INLINE static i32 ctz(T value)
+{
+ if (value == 0)
+ return sizeof(T) * CHAR_BIT;
+
+ if constexpr (sizeof(T) == 4)
+ return __builtin_ctz(value);
+ else if constexpr (sizeof(T) == 8)
+ return __builtin_ctzll(value);
+ else
+ VERIFY_NOT_REACHED();
+}
+
+void BytecodeInterpreter::interpret(Configuration& configuration, InstructionPointer& ip, Instruction const& instruction)
+{
+ dbgln_if(WASM_TRACE_DEBUG, "Executing instruction {} at ip {}", instruction_name(instruction.opcode()), ip.value());
+
+ switch (instruction.opcode().value()) {
+ case Instructions::unreachable.value():
+ m_do_trap = true;
+ return;
+ case Instructions::nop.value():
+ return;
+ case Instructions::local_get.value():
+ configuration.stack().push(Value(configuration.frame().locals()[instruction.arguments().get<LocalIndex>().value()]));
+ return;
+ case Instructions::local_set.value(): {
+ auto entry = configuration.stack().pop();
+ configuration.frame().locals()[instruction.arguments().get<LocalIndex>().value()] = move(entry.get<Value>());
+ return;
+ }
+ case Instructions::i32_const.value():
+ configuration.stack().push(Value(ValueType { ValueType::I32 }, static_cast<i64>(instruction.arguments().get<i32>())));
+ return;
+ case Instructions::i64_const.value():
+ configuration.stack().push(Value(ValueType { ValueType::I64 }, instruction.arguments().get<i64>()));
+ return;
+ case Instructions::f32_const.value():
+ configuration.stack().push(Value(ValueType { ValueType::F32 }, static_cast<double>(instruction.arguments().get<float>())));
+ return;
+ case Instructions::f64_const.value():
+ configuration.stack().push(Value(ValueType { ValueType::F64 }, instruction.arguments().get<double>()));
+ return;
+ case Instructions::block.value(): {
+ size_t arity = 0;
+ auto& args = instruction.arguments().get<Instruction::StructuredInstructionArgs>();
+ if (args.block_type.kind() != BlockType::Empty)
+ arity = 1;
+ configuration.stack().push(Label(arity, args.end_ip));
+ return;
+ }
+ case Instructions::loop.value(): {
+ size_t arity = 0;
+ auto& args = instruction.arguments().get<Instruction::StructuredInstructionArgs>();
+ if (args.block_type.kind() != BlockType::Empty)
+ arity = 1;
+ configuration.stack().push(Label(arity, ip.value() + 1));
+ return;
+ }
+ case Instructions::if_.value(): {
+ size_t arity = 0;
+ auto& args = instruction.arguments().get<Instruction::StructuredInstructionArgs>();
+ if (args.block_type.kind() != BlockType::Empty)
+ arity = 1;
+
+ auto entry = configuration.stack().pop();
+ auto value = entry.get<Value>().to<i32>();
+ TRAP_IF_NOT(value.has_value());
+ auto end_label = Label(arity, args.end_ip.value());
+ if (value.value() == 0) {
+ if (args.else_ip.has_value()) {
+ configuration.ip() = args.else_ip.value();
+ configuration.stack().push(move(end_label));
+ } else {
+ configuration.ip() = args.end_ip.value() + 1;
+ }
+ } else {
+ configuration.stack().push(move(end_label));
+ }
+ return;
+ }
+ case Instructions::structured_end.value():
+ case Instructions::structured_else.value(): {
+ auto label = configuration.nth_label(0);
+ TRAP_IF_NOT(label.has_value());
+ size_t end = configuration.stack().size() - label->arity() - 1;
+ size_t start = end;
+ while (start > 0 && start < configuration.stack().size() && !configuration.stack().entries()[start].has<Label>())
+ --start;
+
+ configuration.stack().entries().remove(start, end - start + 1);
+
+ if (instruction.opcode() == Instructions::structured_end)
+ return;
+
+ // Jump to the end label
+ configuration.ip() = label->continuation();
+ return;
+ }
+ case Instructions::return_.value(): {
+ auto& frame = configuration.frame();
+ size_t end = configuration.stack().size() - frame.arity();
+ size_t start = end;
+ for (; start + 1 > 0 && start < configuration.stack().size(); --start) {
+ auto& entry = configuration.stack().entries()[start];
+ if (entry.has<Frame>()) {
+ // Leave the frame, _and_ its label.
+ start += 2;
+ break;
+ }
+ }
+
+ configuration.stack().entries().remove(start, end - start);
+
+ // Jump past the call/indirect instruction
+ configuration.ip() = configuration.frame().expression().instructions().size();
+ return;
+ }
+ case Instructions::br.value():
+ return branch_to_label(configuration, instruction.arguments().get<LabelIndex>());
+ case Instructions::br_if.value(): {
+ if (configuration.stack().pop().get<Value>().to<i32>().value_or(0) == 0)
+ return;
+ return branch_to_label(configuration, instruction.arguments().get<LabelIndex>());
+ }
+ case Instructions::br_table.value(): {
+ auto& arguments = instruction.arguments().get<Instruction::TableBranchArgs>();
+ auto entry = configuration.stack().pop();
+ TRAP_IF_NOT(entry.has<Value>());
+ auto maybe_i = entry.get<Value>().to<i32>();
+ TRAP_IF_NOT(maybe_i.has_value());
+ TRAP_IF_NOT(maybe_i.value() >= 0);
+ size_t i = *maybe_i;
+ if (i < arguments.labels.size())
+ return branch_to_label(configuration, arguments.labels[i]);
+ return branch_to_label(configuration, arguments.default_);
+ }
+ case Instructions::call.value(): {
+ auto index = instruction.arguments().get<FunctionIndex>();
+ TRAP_IF_NOT(index.value() < configuration.frame().module().functions().size());
+ auto address = configuration.frame().module().functions()[index.value()];
+ dbgln_if(WASM_TRACE_DEBUG, "call({})", address.value());
+ call_address(configuration, address);
+ return;
+ }
+ case Instructions::call_indirect.value(): {
+ auto& args = instruction.arguments().get<Instruction::IndirectCallArgs>();
+ TRAP_IF_NOT(args.table.value() < configuration.frame().module().tables().size());
+ auto table_address = configuration.frame().module().tables()[args.table.value()];
+ auto table_instance = configuration.store().get(table_address);
+ auto index = configuration.stack().pop().get<Value>().to<i32>();
+ TRAP_IF_NOT(index.has_value());
+ TRAP_IF_NOT(index.value() >= 0);
+ TRAP_IF_NOT(static_cast<size_t>(index.value()) < table_instance->elements().size());
+ auto element = table_instance->elements()[index.value()];
+ TRAP_IF_NOT(element.has_value());
+ TRAP_IF_NOT(element->ref().has<Reference::Func>());
+ auto address = element->ref().get<Reference::Func>().address;
+ dbgln_if(WASM_TRACE_DEBUG, "call_indirect({} -> {})", index.value(), address.value());
+ call_address(configuration, address);
+ return;
+ }
+ case Instructions::i32_load.value():
+ LOAD_AND_PUSH(i32, i32);
+ case Instructions::i64_load.value():
+ LOAD_AND_PUSH(i64, i64);
+ case Instructions::f32_load.value():
+ LOAD_AND_PUSH(float, float);
+ case Instructions::f64_load.value():
+ LOAD_AND_PUSH(double, double);
+ case Instructions::i32_load8_s.value():
+ LOAD_AND_PUSH(i8, i32);
+ case Instructions::i32_load8_u.value():
+ LOAD_AND_PUSH(u8, i32);
+ case Instructions::i32_load16_s.value():
+ LOAD_AND_PUSH(i16, i32);
+ case Instructions::i32_load16_u.value():
+ LOAD_AND_PUSH(u16, i32);
+ case Instructions::i64_load8_s.value():
+ LOAD_AND_PUSH(i8, i64);
+ case Instructions::i64_load8_u.value():
+ LOAD_AND_PUSH(u8, i64);
+ case Instructions::i64_load16_s.value():
+ LOAD_AND_PUSH(i16, i64);
+ case Instructions::i64_load16_u.value():
+ LOAD_AND_PUSH(u16, i64);
+ case Instructions::i64_load32_s.value():
+ LOAD_AND_PUSH(i32, i64);
+ case Instructions::i64_load32_u.value():
+ LOAD_AND_PUSH(u32, i64);
+ case Instructions::i32_store.value():
+ POP_AND_STORE(i32, i32);
+ case Instructions::i64_store.value():
+ POP_AND_STORE(i64, i64);
+ case Instructions::f32_store.value():
+ POP_AND_STORE(float, float);
+ case Instructions::f64_store.value():
+ POP_AND_STORE(double, double);
+ case Instructions::i32_store8.value():
+ POP_AND_STORE(i32, i8);
+ case Instructions::i32_store16.value():
+ POP_AND_STORE(i32, i16);
+ case Instructions::i64_store8.value():
+ POP_AND_STORE(i64, i8);
+ case Instructions::i64_store16.value():
+ POP_AND_STORE(i64, i16);
+ case Instructions::i64_store32.value():
+ POP_AND_STORE(i64, i32);
+ case Instructions::local_tee.value(): {
+ auto value = configuration.stack().peek().get<Value>();
+ auto local_index = instruction.arguments().get<LocalIndex>();
+ TRAP_IF_NOT(configuration.frame().locals().size() > local_index.value());
+ dbgln_if(WASM_TRACE_DEBUG, "stack:peek -> locals({})", local_index.value());
+ configuration.frame().locals()[local_index.value()] = move(value);
+ return;
+ }
+ case Instructions::global_get.value(): {
+ auto global_index = instruction.arguments().get<GlobalIndex>();
+ TRAP_IF_NOT(configuration.frame().module().globals().size() > global_index.value());
+ auto address = configuration.frame().module().globals()[global_index.value()];
+ dbgln_if(WASM_TRACE_DEBUG, "global({}) -> stack", address.value());
+ auto global = configuration.store().get(address);
+ configuration.stack().push(Value(global->value()));
+ return;
+ }
+ case Instructions::global_set.value(): {
+ auto global_index = instruction.arguments().get<GlobalIndex>();
+ TRAP_IF_NOT(configuration.frame().module().globals().size() > global_index.value());
+ auto address = configuration.frame().module().globals()[global_index.value()];
+ auto value = configuration.stack().pop().get<Value>();
+ dbgln_if(WASM_TRACE_DEBUG, "stack -> global({})", address.value());
+ auto global = configuration.store().get(address);
+ global->set_value(move(value));
+ return;
+ }
+ case Instructions::memory_size.value(): {
+ TRAP_IF_NOT(configuration.frame().module().memories().size() > 0);
+ auto address = configuration.frame().module().memories()[0];
+ auto instance = configuration.store().get(address);
+ auto pages = instance->size() / Constants::page_size;
+ dbgln_if(WASM_TRACE_DEBUG, "memory.size -> stack({})", pages);
+ configuration.stack().push(Value((i32)pages));
+ return;
+ }
+ case Instructions::memory_grow.value(): {
+ TRAP_IF_NOT(configuration.frame().module().memories().size() > 0);
+ auto address = configuration.frame().module().memories()[0];
+ auto instance = configuration.store().get(address);
+ i32 old_pages = instance->size() / Constants::page_size;
+ auto new_pages = configuration.stack().peek().get<Value>().to<i32>();
+ TRAP_IF_NOT(new_pages.has_value());
+ dbgln_if(WASM_TRACE_DEBUG, "memory.grow({}), previously {} pages...", *new_pages, old_pages);
+ if (instance->grow(new_pages.value() * Constants::page_size))
+ configuration.stack().peek() = Value((i32)old_pages);
+ else
+ configuration.stack().peek() = Value((i32)-1);
+ return;
+ }
+ case Instructions::table_get.value():
+ case Instructions::table_set.value():
+ goto unimplemented;
+ case Instructions::ref_null.value(): {
+ auto type = instruction.arguments().get<ValueType>();
+ TRAP_IF_NOT(type.is_reference());
+ configuration.stack().push(Value(Reference(Reference::Null { type })));
+ return;
+ };
+ case Instructions::ref_func.value(): {
+ auto index = instruction.arguments().get<FunctionIndex>().value();
+ auto& functions = configuration.frame().module().functions();
+ TRAP_IF_NOT(functions.size() > index);
+ auto address = functions[index];
+ configuration.stack().push(Value(ValueType(ValueType::FunctionReference), address.value()));
+ return;
+ }
+ case Instructions::ref_is_null.value(): {
+ auto top = configuration.stack().peek().get_pointer<Value>();
+ TRAP_IF_NOT(top);
+ TRAP_IF_NOT(top->type().is_reference());
+ auto is_null = top->to<Reference::Null>().has_value();
+ configuration.stack().peek() = Value(ValueType(ValueType::I32), static_cast<u64>(is_null ? 1 : 0));
+ return;
+ }
+ case Instructions::drop.value():
+ configuration.stack().pop();
+ return;
+ case Instructions::select.value():
+ case Instructions::select_typed.value(): {
+ // Note: The type seems to only be used for validation.
+ auto value = configuration.stack().pop().get<Value>().to<i32>();
+ TRAP_IF_NOT(value.has_value());
+ dbgln_if(WASM_TRACE_DEBUG, "select({})", value.value());
+ auto rhs = move(configuration.stack().pop().get<Value>());
+ auto lhs = move(configuration.stack().peek().get<Value>());
+ configuration.stack().peek() = value.value() != 0 ? move(lhs) : move(rhs);
+ return;
+ }
+ case Instructions::i32_eqz.value():
+ UNARY_NUMERIC_OPERATION(i32, 0 ==);
+ case Instructions::i32_eq.value():
+ BINARY_NUMERIC_OPERATION(i32, ==, i32);
+ case Instructions::i32_ne.value():
+ BINARY_NUMERIC_OPERATION(i32, !=, i32);
+ case Instructions::i32_lts.value():
+ BINARY_NUMERIC_OPERATION(i32, <, i32);
+ case Instructions::i32_ltu.value():
+ BINARY_NUMERIC_OPERATION(u32, <, i32);
+ case Instructions::i32_gts.value():
+ BINARY_NUMERIC_OPERATION(i32, >, i32);
+ case Instructions::i32_gtu.value():
+ BINARY_NUMERIC_OPERATION(u32, >, i32);
+ case Instructions::i32_les.value():
+ BINARY_NUMERIC_OPERATION(i32, <=, i32);
+ case Instructions::i32_leu.value():
+ BINARY_NUMERIC_OPERATION(u32, <=, i32);
+ case Instructions::i32_ges.value():
+ BINARY_NUMERIC_OPERATION(i32, >=, i32);
+ case Instructions::i32_geu.value():
+ BINARY_NUMERIC_OPERATION(u32, >=, i32);
+ case Instructions::i64_eqz.value():
+ UNARY_NUMERIC_OPERATION(i64, 0ull ==);
+ case Instructions::i64_eq.value():
+ BINARY_NUMERIC_OPERATION(i64, ==, i32);
+ case Instructions::i64_ne.value():
+ BINARY_NUMERIC_OPERATION(i64, !=, i32);
+ case Instructions::i64_lts.value():
+ BINARY_NUMERIC_OPERATION(i64, <, i32);
+ case Instructions::i64_ltu.value():
+ BINARY_NUMERIC_OPERATION(u64, <, i32);
+ case Instructions::i64_gts.value():
+ BINARY_NUMERIC_OPERATION(i64, >, i32);
+ case Instructions::i64_gtu.value():
+ BINARY_NUMERIC_OPERATION(u64, >, i32);
+ case Instructions::i64_les.value():
+ BINARY_NUMERIC_OPERATION(i64, <=, i32);
+ case Instructions::i64_leu.value():
+ BINARY_NUMERIC_OPERATION(u64, <=, i32);
+ case Instructions::i64_ges.value():
+ BINARY_NUMERIC_OPERATION(i64, >=, i32);
+ case Instructions::i64_geu.value():
+ BINARY_NUMERIC_OPERATION(u64, >=, i32);
+ case Instructions::f32_eq.value():
+ BINARY_NUMERIC_OPERATION(float, ==, i32);
+ case Instructions::f32_ne.value():
+ BINARY_NUMERIC_OPERATION(float, !=, i32);
+ case Instructions::f32_lt.value():
+ BINARY_NUMERIC_OPERATION(float, <, i32);
+ case Instructions::f32_gt.value():
+ BINARY_NUMERIC_OPERATION(float, >, i32);
+ case Instructions::f32_le.value():
+ BINARY_NUMERIC_OPERATION(float, <=, i32);
+ case Instructions::f32_ge.value():
+ BINARY_NUMERIC_OPERATION(float, >=, i32);
+ case Instructions::f64_eq.value():
+ BINARY_NUMERIC_OPERATION(double, ==, i32);
+ case Instructions::f64_ne.value():
+ BINARY_NUMERIC_OPERATION(double, !=, i32);
+ case Instructions::f64_lt.value():
+ BINARY_NUMERIC_OPERATION(double, <, i32);
+ case Instructions::f64_gt.value():
+ BINARY_NUMERIC_OPERATION(double, >, i32);
+ case Instructions::f64_le.value():
+ BINARY_NUMERIC_OPERATION(double, <=, i32);
+ case Instructions::f64_ge.value():
+ BINARY_NUMERIC_OPERATION(double, >, i32);
+ case Instructions::i32_clz.value():
+ UNARY_NUMERIC_OPERATION(i32, clz);
+ case Instructions::i32_ctz.value():
+ UNARY_NUMERIC_OPERATION(i32, ctz);
+ case Instructions::i32_popcnt.value():
+ UNARY_NUMERIC_OPERATION(i32, __builtin_popcount);
+ case Instructions::i32_add.value():
+ BINARY_NUMERIC_OPERATION(i32, +, i32);
+ case Instructions::i32_sub.value():
+ BINARY_NUMERIC_OPERATION(i32, -, i32);
+ case Instructions::i32_mul.value():
+ BINARY_NUMERIC_OPERATION(i32, *, i32);
+ case Instructions::i32_divs.value():
+ BINARY_NUMERIC_OPERATION(i32, /, i32, TRAP_IF_NOT(!(Checked<i32>(lhs.value()) /= rhs.value()).has_overflow()));
+ case Instructions::i32_divu.value():
+ BINARY_NUMERIC_OPERATION(u32, /, i32, TRAP_IF_NOT(rhs.value() != 0));
+ case Instructions::i32_rems.value():
+ BINARY_NUMERIC_OPERATION(i32, %, i32, TRAP_IF_NOT(!(Checked<i32>(lhs.value()) /= rhs.value()).has_overflow()));
+ case Instructions::i32_remu.value():
+ BINARY_NUMERIC_OPERATION(u32, %, i32, TRAP_IF_NOT(rhs.value() != 0));
+ case Instructions::i32_and.value():
+ BINARY_NUMERIC_OPERATION(i32, &, i32);
+ case Instructions::i32_or.value():
+ BINARY_NUMERIC_OPERATION(i32, |, i32);
+ case Instructions::i32_xor.value():
+ BINARY_NUMERIC_OPERATION(i32, ^, i32);
+ case Instructions::i32_shl.value():
+ BINARY_NUMERIC_OPERATION(i32, <<, i32);
+ case Instructions::i32_shrs.value():
+ BINARY_NUMERIC_OPERATION(i32, >>, i32);
+ case Instructions::i32_shru.value():
+ BINARY_NUMERIC_OPERATION(u32, >>, i32);
+ case Instructions::i32_rotl.value():
+ BINARY_PREFIX_NUMERIC_OPERATION(u32, rotl, i32);
+ case Instructions::i32_rotr.value():
+ BINARY_PREFIX_NUMERIC_OPERATION(u32, rotr, i32);
+ case Instructions::i64_clz.value():
+ UNARY_NUMERIC_OPERATION(i64, clz);
+ case Instructions::i64_ctz.value():
+ UNARY_NUMERIC_OPERATION(i64, ctz);
+ case Instructions::i64_popcnt.value():
+ UNARY_NUMERIC_OPERATION(i64, __builtin_popcountll);
+ case Instructions::i64_add.value():
+ OVF_CHECKED_BINARY_NUMERIC_OPERATION(i64, +, i64);
+ case Instructions::i64_sub.value():
+ OVF_CHECKED_BINARY_NUMERIC_OPERATION(i64, -, i64);
+ case Instructions::i64_mul.value():
+ OVF_CHECKED_BINARY_NUMERIC_OPERATION(i64, *, i64);
+ case Instructions::i64_divs.value():
+ OVF_CHECKED_BINARY_NUMERIC_OPERATION(i64, /, i64, TRAP_IF_NOT(rhs.value() != 0));
+ case Instructions::i64_divu.value():
+ OVF_CHECKED_BINARY_NUMERIC_OPERATION(u64, /, i64, TRAP_IF_NOT(rhs.value() != 0));
+ case Instructions::i64_rems.value():
+ BINARY_NUMERIC_OPERATION(i64, %, i64, TRAP_IF_NOT(!(Checked<i32>(lhs.value()) /= rhs.value()).has_overflow()));
+ case Instructions::i64_remu.value():
+ BINARY_NUMERIC_OPERATION(u64, %, i64, TRAP_IF_NOT(rhs.value() != 0));
+ case Instructions::i64_and.value():
+ BINARY_NUMERIC_OPERATION(i64, &, i64);
+ case Instructions::i64_or.value():
+ BINARY_NUMERIC_OPERATION(i64, |, i64);
+ case Instructions::i64_xor.value():
+ BINARY_NUMERIC_OPERATION(i64, ^, i64);
+ case Instructions::i64_shl.value():
+ BINARY_NUMERIC_OPERATION(i64, <<, i64);
+ case Instructions::i64_shrs.value():
+ BINARY_NUMERIC_OPERATION(i64, >>, i64);
+ case Instructions::i64_shru.value():
+ BINARY_NUMERIC_OPERATION(u64, >>, i64);
+ case Instructions::i64_rotl.value():
+ BINARY_PREFIX_NUMERIC_OPERATION(u64, rotl, i64);
+ case Instructions::i64_rotr.value():
+ BINARY_PREFIX_NUMERIC_OPERATION(u64, rotr, i64);
+ case Instructions::f32_abs.value():
+ UNARY_NUMERIC_OPERATION(float, fabsf);
+ case Instructions::f32_neg.value():
+ UNARY_NUMERIC_OPERATION(float, -);
+ case Instructions::f32_ceil.value():
+ UNARY_NUMERIC_OPERATION(float, ceilf);
+ case Instructions::f32_floor.value():
+ UNARY_NUMERIC_OPERATION(float, floorf);
+ case Instructions::f32_trunc.value():
+ UNARY_NUMERIC_OPERATION(float, truncf);
+ case Instructions::f32_nearest.value():
+ UNARY_NUMERIC_OPERATION(float, roundf);
+ case Instructions::f32_sqrt.value():
+ UNARY_NUMERIC_OPERATION(float, sqrtf);
+ case Instructions::f32_add.value():
+ BINARY_NUMERIC_OPERATION(float, +, float);
+ case Instructions::f32_sub.value():
+ BINARY_NUMERIC_OPERATION(float, -, float);
+ case Instructions::f32_mul.value():
+ BINARY_NUMERIC_OPERATION(float, *, float);
+ case Instructions::f32_div.value():
+ BINARY_NUMERIC_OPERATION(float, /, float);
+ case Instructions::f32_min.value():
+ BINARY_PREFIX_NUMERIC_OPERATION(float, min, float);
+ case Instructions::f32_max.value():
+ BINARY_PREFIX_NUMERIC_OPERATION(float, max, float);
+ case Instructions::f32_copysign.value():
+ BINARY_PREFIX_NUMERIC_OPERATION(float, copysignf, float);
+ case Instructions::f64_abs.value():
+ UNARY_NUMERIC_OPERATION(double, fabs);
+ case Instructions::f64_neg.value():
+ UNARY_NUMERIC_OPERATION(double, -);
+ case Instructions::f64_ceil.value():
+ UNARY_NUMERIC_OPERATION(double, ceil);
+ case Instructions::f64_floor.value():
+ UNARY_NUMERIC_OPERATION(double, floor);
+ case Instructions::f64_trunc.value():
+ UNARY_NUMERIC_OPERATION(double, trunc);
+ case Instructions::f64_nearest.value():
+ UNARY_NUMERIC_OPERATION(double, round);
+ case Instructions::f64_sqrt.value():
+ UNARY_NUMERIC_OPERATION(double, sqrt);
+ case Instructions::f64_add.value():
+ BINARY_NUMERIC_OPERATION(double, +, double);
+ case Instructions::f64_sub.value():
+ BINARY_NUMERIC_OPERATION(double, -, double);
+ case Instructions::f64_mul.value():
+ BINARY_NUMERIC_OPERATION(double, *, double);
+ case Instructions::f64_div.value():
+ BINARY_NUMERIC_OPERATION(double, /, double);
+ case Instructions::f64_min.value():
+ BINARY_PREFIX_NUMERIC_OPERATION(double, min, double);
+ case Instructions::f64_max.value():
+ BINARY_PREFIX_NUMERIC_OPERATION(double, max, double);
+ case Instructions::f64_copysign.value():
+ BINARY_PREFIX_NUMERIC_OPERATION(double, copysign, double);
+ case Instructions::i32_wrap_i64.value():
+ UNARY_MAP(i64, i32, i32);
+ case Instructions::i32_trunc_sf32.value(): {
+ auto fn = [this](auto& v) { return checked_signed_truncate<float, i32>(v); };
+ UNARY_MAP(float, fn, i32);
+ }
+ case Instructions::i32_trunc_uf32.value(): {
+ auto fn = [this](auto& value) { return checked_unsigned_truncate<float, i32>(value); };
+ UNARY_MAP(float, fn, i32);
+ }
+ case Instructions::i32_trunc_sf64.value(): {
+ auto fn = [this](auto& value) { return checked_signed_truncate<double, i32>(value); };
+ UNARY_MAP(double, fn, i32);
+ }
+ case Instructions::i32_trunc_uf64.value(): {
+ auto fn = [this](auto& value) { return checked_unsigned_truncate<double, i32>(value); };
+ UNARY_MAP(double, fn, i32);
+ }
+ case Instructions::i64_trunc_sf32.value(): {
+ auto fn = [this](auto& value) { return checked_signed_truncate<float, i64>(value); };
+ UNARY_MAP(float, fn, i64);
+ }
+ case Instructions::i64_trunc_uf32.value(): {
+ auto fn = [this](auto& value) { return checked_unsigned_truncate<float, i64>(value); };
+ UNARY_MAP(float, fn, i64);
+ }
+ case Instructions::i64_trunc_sf64.value(): {
+ auto fn = [this](auto& value) { return checked_signed_truncate<double, i64>(value); };
+ UNARY_MAP(double, fn, i64);
+ }
+ case Instructions::i64_trunc_uf64.value(): {
+ auto fn = [this](auto& value) { return checked_unsigned_truncate<double, i64>(value); };
+ UNARY_MAP(double, fn, i64);
+ }
+ case Instructions::i64_extend_si32.value():
+ UNARY_MAP(i32, i64, i64);
+ case Instructions::i64_extend_ui32.value():
+ UNARY_MAP(u32, i64, i64);
+ case Instructions::f32_convert_si32.value():
+ UNARY_MAP(i32, float, float);
+ case Instructions::f32_convert_ui32.value():
+ UNARY_MAP(u32, float, float);
+ case Instructions::f32_convert_si64.value():
+ UNARY_MAP(i64, float, float);
+ case Instructions::f32_convert_ui64.value():
+ UNARY_MAP(u32, float, float);
+ case Instructions::f32_demote_f64.value():
+ UNARY_MAP(double, float, float);
+ case Instructions::f64_convert_si32.value():
+ UNARY_MAP(i32, double, double);
+ case Instructions::f64_convert_ui32.value():
+ UNARY_MAP(u32, double, double);
+ case Instructions::f64_convert_si64.value():
+ UNARY_MAP(i64, double, double);
+ case Instructions::f64_convert_ui64.value():
+ UNARY_MAP(u64, double, double);
+ case Instructions::f64_promote_f32.value():
+ UNARY_MAP(float, double, double);
+ case Instructions::i32_reinterpret_f32.value():
+ UNARY_MAP(float, bit_cast<i32>, i32);
+ case Instructions::i64_reinterpret_f64.value():
+ UNARY_MAP(double, bit_cast<i64>, i64);
+ case Instructions::f32_reinterpret_i32.value():
+ UNARY_MAP(i32, bit_cast<float>, float);
+ case Instructions::f64_reinterpret_i64.value():
+ UNARY_MAP(i64, bit_cast<double>, double);
+ case Instructions::i32_trunc_sat_f32_s.value():
+ case Instructions::i32_trunc_sat_f32_u.value():
+ case Instructions::i32_trunc_sat_f64_s.value():
+ case Instructions::i32_trunc_sat_f64_u.value():
+ case Instructions::i64_trunc_sat_f32_s.value():
+ case Instructions::i64_trunc_sat_f32_u.value():
+ case Instructions::i64_trunc_sat_f64_s.value():
+ case Instructions::i64_trunc_sat_f64_u.value():
+ case Instructions::memory_init.value():
+ case Instructions::data_drop.value():
+ case Instructions::memory_copy.value():
+ case Instructions::memory_fill.value():
+ case Instructions::table_init.value():
+ case Instructions::elem_drop.value():
+ case Instructions::table_copy.value():
+ case Instructions::table_grow.value():
+ case Instructions::table_size.value():
+ case Instructions::table_fill.value():
+ case Instructions::i32_extend8_s.value():
+ case Instructions::i32_extend16_s.value():
+ case Instructions::i64_extend8_s.value():
+ case Instructions::i64_extend16_s.value():
+ case Instructions::i64_extend32_s.value():
+ default:
+ unimplemented:;
+ dbgln("Instruction '{}' not implemented", instruction_name(instruction.opcode()));
+ m_do_trap = true;
+ return;
+ }
+}
+
+void DebuggerBytecodeInterpreter::interpret(Configuration& configuration, InstructionPointer& ip, Instruction const& instruction)
+{
+ if (pre_interpret_hook) {
+ auto result = pre_interpret_hook(configuration, ip, instruction);
+ if (!result) {
+ m_do_trap = true;
+ return;
+ }
+ }
+
+ ScopeGuard guard { [&] {
+ if (post_interpret_hook) {
+ auto result = post_interpret_hook(configuration, ip, instruction, *this);
+ if (!result) {
+ m_do_trap = true;
+ return;
+ }
+ }
+ } };
+
+ BytecodeInterpreter::interpret(configuration, ip, instruction);
+}
+
+}
diff --git a/Userland/Libraries/LibWasm/AbstractMachine/BytecodeInterpreter.h b/Userland/Libraries/LibWasm/AbstractMachine/BytecodeInterpreter.h
new file mode 100644
index 0000000000..d494511cfe
--- /dev/null
+++ b/Userland/Libraries/LibWasm/AbstractMachine/BytecodeInterpreter.h
@@ -0,0 +1,70 @@
+/*
+ * Copyright (c) 2021, Ali Mohammad Pur <mpfard@serenityos.org>
+ *
+ * SPDX-License-Identifier: BSD-2-Clause
+ */
+
+#pragma once
+
+#include <LibWasm/AbstractMachine/Configuration.h>
+#include <LibWasm/AbstractMachine/Interpreter.h>
+
+namespace Wasm {
+
+struct BytecodeInterpreter : public Interpreter {
+ virtual void interpret(Configuration&) override;
+ virtual ~BytecodeInterpreter() override = default;
+ virtual bool did_trap() const override { return m_do_trap; }
+ virtual void clear_trap() override { m_do_trap = false; }
+
+ struct CallFrameHandle {
+ explicit CallFrameHandle(BytecodeInterpreter& interpreter, Configuration& configuration)
+ : m_configuration_handle(configuration)
+ , m_interpreter(interpreter)
+ {
+ }
+
+ ~CallFrameHandle() = default;
+
+ Configuration::CallFrameHandle m_configuration_handle;
+ BytecodeInterpreter& m_interpreter;
+ };
+
+protected:
+ virtual void interpret(Configuration&, InstructionPointer&, Instruction const&);
+ void branch_to_label(Configuration&, LabelIndex);
+ template<typename ReadT, typename PushT>
+ void load_and_push(Configuration&, Instruction const&);
+ void store_to_memory(Configuration&, Instruction const&, ReadonlyBytes data);
+ void call_address(Configuration&, FunctionAddress);
+
+ template<typename V, typename T>
+ MakeUnsigned<T> checked_unsigned_truncate(V);
+
+ template<typename V, typename T>
+ MakeSigned<T> checked_signed_truncate(V);
+
+ template<typename T>
+ T read_value(ReadonlyBytes data);
+
+ Vector<Value> pop_values(Configuration& configuration, size_t count);
+ bool trap_if_not(bool value)
+ {
+ if (!value)
+ m_do_trap = true;
+ return m_do_trap;
+ }
+ bool m_do_trap { false };
+};
+
+struct DebuggerBytecodeInterpreter : public BytecodeInterpreter {
+ virtual ~DebuggerBytecodeInterpreter() override = default;
+
+ Function<bool(Configuration&, InstructionPointer&, Instruction const&)> pre_interpret_hook;
+ Function<bool(Configuration&, InstructionPointer&, Instruction const&, Interpreter const&)> post_interpret_hook;
+
+private:
+ virtual void interpret(Configuration&, InstructionPointer&, Instruction const&) override;
+};
+
+}
diff --git a/Userland/Libraries/LibWasm/AbstractMachine/Interpreter.cpp b/Userland/Libraries/LibWasm/AbstractMachine/Interpreter.cpp
index 5e5a1b5455..c67dea472a 100644
--- a/Userland/Libraries/LibWasm/AbstractMachine/Interpreter.cpp
+++ b/Userland/Libraries/LibWasm/AbstractMachine/Interpreter.cpp
@@ -4,996 +4,6 @@
* SPDX-License-Identifier: BSD-2-Clause
*/
-#include <AK/Debug.h>
-#include <LibWasm/AbstractMachine/AbstractMachine.h>
-#include <LibWasm/AbstractMachine/Configuration.h>
-#include <LibWasm/AbstractMachine/Interpreter.h>
-#include <LibWasm/Opcode.h>
-#include <LibWasm/Printer/Printer.h>
-#include <limits.h>
-#include <math.h>
-
namespace Wasm {
-#define TRAP_IF_NOT(x) \
- do { \
- if (trap_if_not(x)) { \
- dbgln_if(WASM_TRACE_DEBUG, "Trapped because {} failed, at line {}", #x, __LINE__); \
- return; \
- } \
- } while (false)
-
-#define TRAP_IF_NOT_NORETURN(x) \
- do { \
- if (trap_if_not(x)) { \
- dbgln_if(WASM_TRACE_DEBUG, "Trapped because {} failed, at line {}", #x, __LINE__); \
- } \
- } while (false)
-
-void BytecodeInterpreter::interpret(Configuration& configuration)
-{
- m_do_trap = false;
- auto& instructions = configuration.frame().expression().instructions();
- auto max_ip_value = InstructionPointer { instructions.size() };
- auto& current_ip_value = configuration.ip();
-
- while (current_ip_value < max_ip_value) {
- auto& instruction = instructions[current_ip_value.value()];
- auto old_ip = current_ip_value;
- interpret(configuration, current_ip_value, instruction);
- if (m_do_trap)
- return;
- if (current_ip_value == old_ip) // If no jump occurred
- ++current_ip_value;
- }
-}
-
-void BytecodeInterpreter::branch_to_label(Configuration& configuration, LabelIndex index)
-{
- dbgln_if(WASM_TRACE_DEBUG, "Branch to label with index {}...", index.value());
- auto label = configuration.nth_label(index.value());
- TRAP_IF_NOT(label.has_value());
- dbgln_if(WASM_TRACE_DEBUG, "...which is actually IP {}, and has {} result(s)", label->continuation().value(), label->arity());
- auto results = pop_values(configuration, label->arity());
-
- size_t drop_count = index.value() + 1;
- for (; !configuration.stack().is_empty();) {
- auto& entry = configuration.stack().peek();
- if (entry.has<Label>()) {
- if (--drop_count == 0)
- break;
- }
- configuration.stack().pop();
- }
-
- for (auto& result : results)
- configuration.stack().push(move(result));
-
- configuration.ip() = label->continuation();
-}
-
-template<typename ReadType, typename PushType>
-void BytecodeInterpreter::load_and_push(Configuration& configuration, Instruction const& instruction)
-{
- auto& address = configuration.frame().module().memories().first();
- auto memory = configuration.store().get(address);
- if (!memory) {
- m_do_trap = true;
- return;
- }
- auto& arg = instruction.arguments().get<Instruction::MemoryArgument>();
- auto base = configuration.stack().peek().get<Value>().to<i32>();
- if (!base.has_value()) {
- m_do_trap = true;
- return;
- }
- auto instance_address = base.value() + static_cast<i64>(arg.offset);
- if (instance_address < 0 || static_cast<u64>(instance_address + sizeof(ReadType)) > memory->size()) {
- m_do_trap = true;
- dbgln("LibWasm: Memory access out of bounds (expected 0 <= {} and {} <= {})", instance_address, instance_address + sizeof(ReadType), memory->size());
- return;
- }
- dbgln_if(WASM_TRACE_DEBUG, "load({} : {}) -> stack", instance_address, sizeof(ReadType));
- auto slice = memory->data().bytes().slice(instance_address, sizeof(ReadType));
- configuration.stack().peek() = Value(static_cast<PushType>(read_value<ReadType>(slice)));
-}
-
-void BytecodeInterpreter::store_to_memory(Configuration& configuration, Instruction const& instruction, ReadonlyBytes data)
-{
- auto& address = configuration.frame().module().memories().first();
- auto memory = configuration.store().get(address);
- TRAP_IF_NOT(memory);
- auto& arg = instruction.arguments().get<Instruction::MemoryArgument>();
- auto base = configuration.stack().pop().get<Value>().to<i32>();
- TRAP_IF_NOT(base.has_value());
- auto instance_address = base.value() + static_cast<i64>(arg.offset);
- if (instance_address < 0 || static_cast<u64>(instance_address + data.size()) > memory->size()) {
- m_do_trap = true;
- dbgln("LibWasm: Memory access out of bounds (expected 0 <= {} and {} <= {})", instance_address, instance_address + data.size(), memory->size());
- return;
- }
- dbgln_if(WASM_TRACE_DEBUG, "tempoaray({}b) -> store({})", data.size(), instance_address);
- data.copy_to(memory->data().bytes().slice(instance_address, data.size()));
-}
-
-void BytecodeInterpreter::call_address(Configuration& configuration, FunctionAddress address)
-{
- auto instance = configuration.store().get(address);
- TRAP_IF_NOT(instance);
- FunctionType const* type { nullptr };
- instance->visit([&](auto const& function) { type = &function.type(); });
- TRAP_IF_NOT(type);
- TRAP_IF_NOT(configuration.stack().entries().size() > type->parameters().size());
- Vector<Value> args;
- args.ensure_capacity(type->parameters().size());
- auto span = configuration.stack().entries().span().slice_from_end(type->parameters().size());
- for (auto& entry : span) {
- auto* ptr = entry.get_pointer<Value>();
- TRAP_IF_NOT(ptr != nullptr);
- args.unchecked_append(*ptr);
- }
-
- configuration.stack().entries().remove(configuration.stack().size() - span.size(), span.size());
-
- Result result { Trap {} };
- {
- CallFrameHandle handle { *this, configuration };
- result = configuration.call(*this, address, move(args));
- }
-
- if (result.is_trap()) {
- m_do_trap = true;
- return;
- }
-
- configuration.stack().entries().ensure_capacity(configuration.stack().size() + result.values().size());
- for (auto& entry : result.values())
- configuration.stack().entries().unchecked_append(move(entry));
-}
-
-#define BINARY_NUMERIC_OPERATION(type, operator, cast, ...) \
- do { \
- auto rhs = configuration.stack().pop().get<Value>().to<type>(); \
- auto lhs = configuration.stack().peek().get<Value>().to<type>(); \
- TRAP_IF_NOT(lhs.has_value()); \
- TRAP_IF_NOT(rhs.has_value()); \
- __VA_ARGS__; \
- auto result = lhs.value() operator rhs.value(); \
- dbgln_if(WASM_TRACE_DEBUG, "{} {} {} = {}", lhs.value(), #operator, rhs.value(), result); \
- configuration.stack().peek() = Value(cast(result)); \
- return; \
- } while (false)
-
-#define OVF_CHECKED_BINARY_NUMERIC_OPERATION(type, operator, cast, ...) \
- do { \
- auto rhs = configuration.stack().pop().get<Value>().to<type>(); \
- auto ulhs = configuration.stack().peek().get<Value>().to<type>(); \
- TRAP_IF_NOT(ulhs.has_value()); \
- TRAP_IF_NOT(rhs.has_value()); \
- dbgln_if(WASM_TRACE_DEBUG, "{} {} {} = ??", ulhs.value(), #operator, rhs.value()); \
- __VA_ARGS__; \
- Checked lhs = ulhs.value(); \
- lhs operator##= rhs.value(); \
- TRAP_IF_NOT(!lhs.has_overflow()); \
- auto result = lhs.value(); \
- dbgln_if(WASM_TRACE_DEBUG, "{} {} {} = {}", ulhs.value(), #operator, rhs.value(), result); \
- configuration.stack().peek() = Value(cast(result)); \
- return; \
- } while (false)
-
-#define BINARY_PREFIX_NUMERIC_OPERATION(type, operation, cast, ...) \
- do { \
- auto rhs = configuration.stack().pop().get<Value>().to<type>(); \
- auto lhs = configuration.stack().peek().get<Value>().to<type>(); \
- TRAP_IF_NOT(lhs.has_value()); \
- TRAP_IF_NOT(rhs.has_value()); \
- auto result = operation(lhs.value(), rhs.value()); \
- dbgln_if(WASM_TRACE_DEBUG, "{}({} {}) = {}", #operation, lhs.value(), rhs.value(), result); \
- configuration.stack().peek() = Value(cast(result)); \
- return; \
- } while (false)
-
-#define UNARY_MAP(pop_type, operation, ...) \
- do { \
- auto value = configuration.stack().peek().get<Value>().to<pop_type>(); \
- TRAP_IF_NOT(value.has_value()); \
- auto result = operation(value.value()); \
- dbgln_if(WASM_TRACE_DEBUG, "map({}) {} = {}", #operation, value.value(), result); \
- configuration.stack().peek() = Value(__VA_ARGS__(result)); \
- return; \
- } while (false)
-
-#define UNARY_NUMERIC_OPERATION(type, operation) \
- UNARY_MAP(type, operation, type)
-
-#define LOAD_AND_PUSH(read_type, push_type) \
- do { \
- return load_and_push<read_type, push_type>(configuration, instruction); \
- } while (false)
-
-#define POP_AND_STORE(pop_type, store_type) \
- do { \
- auto value = ConvertToRaw<store_type> {}(*configuration.stack().pop().get<Value>().to<pop_type>()); \
- dbgln_if(WASM_TRACE_DEBUG, "stack({}) -> temporary({}b)", value, sizeof(store_type)); \
- store_to_memory(configuration, instruction, { &value, sizeof(store_type) }); \
- return; \
- } while (false)
-
-template<typename T>
-T BytecodeInterpreter::read_value(ReadonlyBytes data)
-{
- LittleEndian<T> value;
- InputMemoryStream stream { data };
- stream >> value;
- if (stream.handle_any_error()) {
- dbgln("Read from {} failed", data.data());
- m_do_trap = true;
- }
- return value;
-}
-
-template<>
-float BytecodeInterpreter::read_value<float>(ReadonlyBytes data)
-{
- InputMemoryStream stream { data };
- LittleEndian<u32> raw_value;
- stream >> raw_value;
- if (stream.handle_any_error())
- m_do_trap = true;
- return bit_cast<float>(static_cast<u32>(raw_value));
-}
-
-template<>
-double BytecodeInterpreter::read_value<double>(ReadonlyBytes data)
-{
- InputMemoryStream stream { data };
- LittleEndian<u64> raw_value;
- stream >> raw_value;
- if (stream.handle_any_error())
- m_do_trap = true;
- return bit_cast<double>(static_cast<u64>(raw_value));
-}
-
-template<typename T>
-struct ConvertToRaw {
- T operator()(T value)
- {
- return LittleEndian<T>(value);
- }
-};
-
-template<>
-struct ConvertToRaw<float> {
- u32 operator()(float value)
- {
- LittleEndian<u32> res;
- ReadonlyBytes bytes { &value, sizeof(float) };
- InputMemoryStream stream { bytes };
- stream >> res;
- VERIFY(!stream.has_any_error());
- return static_cast<u32>(res);
- }
-};
-
-template<>
-struct ConvertToRaw<double> {
- u64 operator()(double value)
- {
- LittleEndian<u64> res;
- ReadonlyBytes bytes { &value, sizeof(double) };
- InputMemoryStream stream { bytes };
- stream >> res;
- VERIFY(!stream.has_any_error());
- return static_cast<u64>(res);
- }
-};
-
-template<typename V, typename T>
-MakeSigned<T> BytecodeInterpreter::checked_signed_truncate(V value)
-{
- if (isnan(value) || isinf(value)) { // "undefined", let's just trap.
- m_do_trap = true;
- return 0;
- }
-
- double truncated;
- if constexpr (IsSame<float, V>)
- truncated = truncf(value);
- else
- truncated = trunc(value);
-
- using SignedT = MakeSigned<T>;
- if (NumericLimits<SignedT>::min() <= truncated && static_cast<double>(NumericLimits<SignedT>::max()) >= truncated)
- return static_cast<SignedT>(truncated);
-
- dbgln_if(WASM_TRACE_DEBUG, "Truncate out of range error");
- m_do_trap = true;
- return true;
-}
-
-template<typename V, typename T>
-MakeUnsigned<T> BytecodeInterpreter::checked_unsigned_truncate(V value)
-{
- if (isnan(value) || isinf(value)) { // "undefined", let's just trap.
- m_do_trap = true;
- return 0;
- }
- double truncated;
- if constexpr (IsSame<float, V>)
- truncated = truncf(value);
- else
- truncated = trunc(value);
-
- using UnsignedT = MakeUnsigned<T>;
- if (NumericLimits<UnsignedT>::min() <= truncated && static_cast<double>(NumericLimits<UnsignedT>::max()) >= truncated)
- return static_cast<UnsignedT>(truncated);
-
- dbgln_if(WASM_TRACE_DEBUG, "Truncate out of range error");
- m_do_trap = true;
- return true;
-}
-
-Vector<Value> BytecodeInterpreter::pop_values(Configuration& configuration, size_t count)
-{
- Vector<Value> results;
- results.resize(count);
-
- for (size_t i = 0; i < count; ++i) {
- auto top_of_stack = configuration.stack().pop();
- if (auto value = top_of_stack.get_pointer<Value>())
- results[i] = move(*value);
- else
- TRAP_IF_NOT_NORETURN(value);
- }
- return results;
-}
-
-template<typename T, typename R>
-ALWAYS_INLINE static T rotl(T value, R shift)
-{
- // generates a single 'rol' instruction if shift is positive
- // otherwise generate a `ror`
- auto const mask = CHAR_BIT * sizeof(T) - 1;
- shift &= mask;
- return (value << shift) | (value >> ((-shift) & mask));
-}
-
-template<typename T, typename R>
-ALWAYS_INLINE static T rotr(T value, R shift)
-{
- // generates a single 'ror' instruction if shift is positive
- // otherwise generate a `rol`
- auto const mask = CHAR_BIT * sizeof(T) - 1;
- shift &= mask;
- return (value >> shift) | (value << ((-shift) & mask));
-}
-
-template<typename T>
-ALWAYS_INLINE static i32 clz(T value)
-{
- if (value == 0)
- return sizeof(T) * CHAR_BIT;
-
- if constexpr (sizeof(T) == 4)
- return __builtin_clz(value);
- else if constexpr (sizeof(T) == 8)
- return __builtin_clzll(value);
- else
- VERIFY_NOT_REACHED();
-}
-
-template<typename T>
-ALWAYS_INLINE static i32 ctz(T value)
-{
- if (value == 0)
- return sizeof(T) * CHAR_BIT;
-
- if constexpr (sizeof(T) == 4)
- return __builtin_ctz(value);
- else if constexpr (sizeof(T) == 8)
- return __builtin_ctzll(value);
- else
- VERIFY_NOT_REACHED();
-}
-
-void BytecodeInterpreter::interpret(Configuration& configuration, InstructionPointer& ip, Instruction const& instruction)
-{
- dbgln_if(WASM_TRACE_DEBUG, "Executing instruction {} at ip {}", instruction_name(instruction.opcode()), ip.value());
-
- switch (instruction.opcode().value()) {
- case Instructions::unreachable.value():
- m_do_trap = true;
- return;
- case Instructions::nop.value():
- return;
- case Instructions::local_get.value():
- configuration.stack().push(Value(configuration.frame().locals()[instruction.arguments().get<LocalIndex>().value()]));
- return;
- case Instructions::local_set.value(): {
- auto entry = configuration.stack().pop();
- configuration.frame().locals()[instruction.arguments().get<LocalIndex>().value()] = move(entry.get<Value>());
- return;
- }
- case Instructions::i32_const.value():
- configuration.stack().push(Value(ValueType { ValueType::I32 }, static_cast<i64>(instruction.arguments().get<i32>())));
- return;
- case Instructions::i64_const.value():
- configuration.stack().push(Value(ValueType { ValueType::I64 }, instruction.arguments().get<i64>()));
- return;
- case Instructions::f32_const.value():
- configuration.stack().push(Value(ValueType { ValueType::F32 }, static_cast<double>(instruction.arguments().get<float>())));
- return;
- case Instructions::f64_const.value():
- configuration.stack().push(Value(ValueType { ValueType::F64 }, instruction.arguments().get<double>()));
- return;
- case Instructions::block.value(): {
- size_t arity = 0;
- auto& args = instruction.arguments().get<Instruction::StructuredInstructionArgs>();
- if (args.block_type.kind() != BlockType::Empty)
- arity = 1;
- configuration.stack().push(Label(arity, args.end_ip));
- return;
- }
- case Instructions::loop.value(): {
- size_t arity = 0;
- auto& args = instruction.arguments().get<Instruction::StructuredInstructionArgs>();
- if (args.block_type.kind() != BlockType::Empty)
- arity = 1;
- configuration.stack().push(Label(arity, ip.value() + 1));
- return;
- }
- case Instructions::if_.value(): {
- size_t arity = 0;
- auto& args = instruction.arguments().get<Instruction::StructuredInstructionArgs>();
- if (args.block_type.kind() != BlockType::Empty)
- arity = 1;
-
- auto entry = configuration.stack().pop();
- auto value = entry.get<Value>().to<i32>();
- TRAP_IF_NOT(value.has_value());
- auto end_label = Label(arity, args.end_ip.value());
- if (value.value() == 0) {
- if (args.else_ip.has_value()) {
- configuration.ip() = args.else_ip.value();
- configuration.stack().push(move(end_label));
- } else {
- configuration.ip() = args.end_ip.value() + 1;
- }
- } else {
- configuration.stack().push(move(end_label));
- }
- return;
- }
- case Instructions::structured_end.value():
- case Instructions::structured_else.value(): {
- auto label = configuration.nth_label(0);
- TRAP_IF_NOT(label.has_value());
- size_t end = configuration.stack().size() - label->arity() - 1;
- size_t start = end;
- while (start > 0 && start < configuration.stack().size() && !configuration.stack().entries()[start].has<Label>())
- --start;
-
- configuration.stack().entries().remove(start, end - start + 1);
-
- if (instruction.opcode() == Instructions::structured_end)
- return;
-
- // Jump to the end label
- configuration.ip() = label->continuation();
- return;
- }
- case Instructions::return_.value(): {
- auto& frame = configuration.frame();
- size_t end = configuration.stack().size() - frame.arity();
- size_t start = end;
- for (; start + 1 > 0 && start < configuration.stack().size(); --start) {
- auto& entry = configuration.stack().entries()[start];
- if (entry.has<Frame>()) {
- // Leave the frame, _and_ its label.
- start += 2;
- break;
- }
- }
-
- configuration.stack().entries().remove(start, end - start);
-
- // Jump past the call/indirect instruction
- configuration.ip() = configuration.frame().expression().instructions().size();
- return;
- }
- case Instructions::br.value():
- return branch_to_label(configuration, instruction.arguments().get<LabelIndex>());
- case Instructions::br_if.value(): {
- if (configuration.stack().pop().get<Value>().to<i32>().value_or(0) == 0)
- return;
- return branch_to_label(configuration, instruction.arguments().get<LabelIndex>());
- }
- case Instructions::br_table.value(): {
- auto& arguments = instruction.arguments().get<Instruction::TableBranchArgs>();
- auto entry = configuration.stack().pop();
- TRAP_IF_NOT(entry.has<Value>());
- auto maybe_i = entry.get<Value>().to<i32>();
- TRAP_IF_NOT(maybe_i.has_value());
- TRAP_IF_NOT(maybe_i.value() >= 0);
- size_t i = *maybe_i;
- if (i < arguments.labels.size())
- return branch_to_label(configuration, arguments.labels[i]);
- return branch_to_label(configuration, arguments.default_);
- }
- case Instructions::call.value(): {
- auto index = instruction.arguments().get<FunctionIndex>();
- TRAP_IF_NOT(index.value() < configuration.frame().module().functions().size());
- auto address = configuration.frame().module().functions()[index.value()];
- dbgln_if(WASM_TRACE_DEBUG, "call({})", address.value());
- call_address(configuration, address);
- return;
- }
- case Instructions::call_indirect.value(): {
- auto& args = instruction.arguments().get<Instruction::IndirectCallArgs>();
- TRAP_IF_NOT(args.table.value() < configuration.frame().module().tables().size());
- auto table_address = configuration.frame().module().tables()[args.table.value()];
- auto table_instance = configuration.store().get(table_address);
- auto index = configuration.stack().pop().get<Value>().to<i32>();
- TRAP_IF_NOT(index.has_value());
- TRAP_IF_NOT(index.value() >= 0);
- TRAP_IF_NOT(static_cast<size_t>(index.value()) < table_instance->elements().size());
- auto element = table_instance->elements()[index.value()];
- TRAP_IF_NOT(element.has_value());
- TRAP_IF_NOT(element->ref().has<Reference::Func>());
- auto address = element->ref().get<Reference::Func>().address;
- dbgln_if(WASM_TRACE_DEBUG, "call_indirect({} -> {})", index.value(), address.value());
- call_address(configuration, address);
- return;
- }
- case Instructions::i32_load.value():
- LOAD_AND_PUSH(i32, i32);
- case Instructions::i64_load.value():
- LOAD_AND_PUSH(i64, i64);
- case Instructions::f32_load.value():
- LOAD_AND_PUSH(float, float);
- case Instructions::f64_load.value():
- LOAD_AND_PUSH(double, double);
- case Instructions::i32_load8_s.value():
- LOAD_AND_PUSH(i8, i32);
- case Instructions::i32_load8_u.value():
- LOAD_AND_PUSH(u8, i32);
- case Instructions::i32_load16_s.value():
- LOAD_AND_PUSH(i16, i32);
- case Instructions::i32_load16_u.value():
- LOAD_AND_PUSH(u16, i32);
- case Instructions::i64_load8_s.value():
- LOAD_AND_PUSH(i8, i64);
- case Instructions::i64_load8_u.value():
- LOAD_AND_PUSH(u8, i64);
- case Instructions::i64_load16_s.value():
- LOAD_AND_PUSH(i16, i64);
- case Instructions::i64_load16_u.value():
- LOAD_AND_PUSH(u16, i64);
- case Instructions::i64_load32_s.value():
- LOAD_AND_PUSH(i32, i64);
- case Instructions::i64_load32_u.value():
- LOAD_AND_PUSH(u32, i64);
- case Instructions::i32_store.value():
- POP_AND_STORE(i32, i32);
- case Instructions::i64_store.value():
- POP_AND_STORE(i64, i64);
- case Instructions::f32_store.value():
- POP_AND_STORE(float, float);
- case Instructions::f64_store.value():
- POP_AND_STORE(double, double);
- case Instructions::i32_store8.value():
- POP_AND_STORE(i32, i8);
- case Instructions::i32_store16.value():
- POP_AND_STORE(i32, i16);
- case Instructions::i64_store8.value():
- POP_AND_STORE(i64, i8);
- case Instructions::i64_store16.value():
- POP_AND_STORE(i64, i16);
- case Instructions::i64_store32.value():
- POP_AND_STORE(i64, i32);
- case Instructions::local_tee.value(): {
- auto value = configuration.stack().peek().get<Value>();
- auto local_index = instruction.arguments().get<LocalIndex>();
- TRAP_IF_NOT(configuration.frame().locals().size() > local_index.value());
- dbgln_if(WASM_TRACE_DEBUG, "stack:peek -> locals({})", local_index.value());
- configuration.frame().locals()[local_index.value()] = move(value);
- return;
- }
- case Instructions::global_get.value(): {
- auto global_index = instruction.arguments().get<GlobalIndex>();
- TRAP_IF_NOT(configuration.frame().module().globals().size() > global_index.value());
- auto address = configuration.frame().module().globals()[global_index.value()];
- dbgln_if(WASM_TRACE_DEBUG, "global({}) -> stack", address.value());
- auto global = configuration.store().get(address);
- configuration.stack().push(Value(global->value()));
- return;
- }
- case Instructions::global_set.value(): {
- auto global_index = instruction.arguments().get<GlobalIndex>();
- TRAP_IF_NOT(configuration.frame().module().globals().size() > global_index.value());
- auto address = configuration.frame().module().globals()[global_index.value()];
- auto value = configuration.stack().pop().get<Value>();
- dbgln_if(WASM_TRACE_DEBUG, "stack -> global({})", address.value());
- auto global = configuration.store().get(address);
- global->set_value(move(value));
- return;
- }
- case Instructions::memory_size.value(): {
- TRAP_IF_NOT(configuration.frame().module().memories().size() > 0);
- auto address = configuration.frame().module().memories()[0];
- auto instance = configuration.store().get(address);
- auto pages = instance->size() / Constants::page_size;
- dbgln_if(WASM_TRACE_DEBUG, "memory.size -> stack({})", pages);
- configuration.stack().push(Value((i32)pages));
- return;
- }
- case Instructions::memory_grow.value(): {
- TRAP_IF_NOT(configuration.frame().module().memories().size() > 0);
- auto address = configuration.frame().module().memories()[0];
- auto instance = configuration.store().get(address);
- i32 old_pages = instance->size() / Constants::page_size;
- auto new_pages = configuration.stack().peek().get<Value>().to<i32>();
- TRAP_IF_NOT(new_pages.has_value());
- dbgln_if(WASM_TRACE_DEBUG, "memory.grow({}), previously {} pages...", *new_pages, old_pages);
- if (instance->grow(new_pages.value() * Constants::page_size))
- configuration.stack().peek() = Value((i32)old_pages);
- else
- configuration.stack().peek() = Value((i32)-1);
- return;
- }
- case Instructions::table_get.value():
- case Instructions::table_set.value():
- goto unimplemented;
- case Instructions::ref_null.value(): {
- auto type = instruction.arguments().get<ValueType>();
- TRAP_IF_NOT(type.is_reference());
- configuration.stack().push(Value(Reference(Reference::Null { type })));
- return;
- };
- case Instructions::ref_func.value(): {
- auto index = instruction.arguments().get<FunctionIndex>().value();
- auto& functions = configuration.frame().module().functions();
- TRAP_IF_NOT(functions.size() > index);
- auto address = functions[index];
- configuration.stack().push(Value(ValueType(ValueType::FunctionReference), address.value()));
- return;
- }
- case Instructions::ref_is_null.value(): {
- auto top = configuration.stack().peek().get_pointer<Value>();
- TRAP_IF_NOT(top);
- TRAP_IF_NOT(top->type().is_reference());
- auto is_null = top->to<Reference::Null>().has_value();
- configuration.stack().peek() = Value(ValueType(ValueType::I32), static_cast<u64>(is_null ? 1 : 0));
- return;
- }
- case Instructions::drop.value():
- configuration.stack().pop();
- return;
- case Instructions::select.value():
- case Instructions::select_typed.value(): {
- // Note: The type seems to only be used for validation.
- auto value = configuration.stack().pop().get<Value>().to<i32>();
- TRAP_IF_NOT(value.has_value());
- dbgln_if(WASM_TRACE_DEBUG, "select({})", value.value());
- auto rhs = move(configuration.stack().pop().get<Value>());
- auto lhs = move(configuration.stack().peek().get<Value>());
- configuration.stack().peek() = value.value() != 0 ? move(lhs) : move(rhs);
- return;
- }
- case Instructions::i32_eqz.value():
- UNARY_NUMERIC_OPERATION(i32, 0 ==);
- case Instructions::i32_eq.value():
- BINARY_NUMERIC_OPERATION(i32, ==, i32);
- case Instructions::i32_ne.value():
- BINARY_NUMERIC_OPERATION(i32, !=, i32);
- case Instructions::i32_lts.value():
- BINARY_NUMERIC_OPERATION(i32, <, i32);
- case Instructions::i32_ltu.value():
- BINARY_NUMERIC_OPERATION(u32, <, i32);
- case Instructions::i32_gts.value():
- BINARY_NUMERIC_OPERATION(i32, >, i32);
- case Instructions::i32_gtu.value():
- BINARY_NUMERIC_OPERATION(u32, >, i32);
- case Instructions::i32_les.value():
- BINARY_NUMERIC_OPERATION(i32, <=, i32);
- case Instructions::i32_leu.value():
- BINARY_NUMERIC_OPERATION(u32, <=, i32);
- case Instructions::i32_ges.value():
- BINARY_NUMERIC_OPERATION(i32, >=, i32);
- case Instructions::i32_geu.value():
- BINARY_NUMERIC_OPERATION(u32, >=, i32);
- case Instructions::i64_eqz.value():
- UNARY_NUMERIC_OPERATION(i64, 0ull ==);
- case Instructions::i64_eq.value():
- BINARY_NUMERIC_OPERATION(i64, ==, i32);
- case Instructions::i64_ne.value():
- BINARY_NUMERIC_OPERATION(i64, !=, i32);
- case Instructions::i64_lts.value():
- BINARY_NUMERIC_OPERATION(i64, <, i32);
- case Instructions::i64_ltu.value():
- BINARY_NUMERIC_OPERATION(u64, <, i32);
- case Instructions::i64_gts.value():
- BINARY_NUMERIC_OPERATION(i64, >, i32);
- case Instructions::i64_gtu.value():
- BINARY_NUMERIC_OPERATION(u64, >, i32);
- case Instructions::i64_les.value():
- BINARY_NUMERIC_OPERATION(i64, <=, i32);
- case Instructions::i64_leu.value():
- BINARY_NUMERIC_OPERATION(u64, <=, i32);
- case Instructions::i64_ges.value():
- BINARY_NUMERIC_OPERATION(i64, >=, i32);
- case Instructions::i64_geu.value():
- BINARY_NUMERIC_OPERATION(u64, >=, i32);
- case Instructions::f32_eq.value():
- BINARY_NUMERIC_OPERATION(float, ==, i32);
- case Instructions::f32_ne.value():
- BINARY_NUMERIC_OPERATION(float, !=, i32);
- case Instructions::f32_lt.value():
- BINARY_NUMERIC_OPERATION(float, <, i32);
- case Instructions::f32_gt.value():
- BINARY_NUMERIC_OPERATION(float, >, i32);
- case Instructions::f32_le.value():
- BINARY_NUMERIC_OPERATION(float, <=, i32);
- case Instructions::f32_ge.value():
- BINARY_NUMERIC_OPERATION(float, >=, i32);
- case Instructions::f64_eq.value():
- BINARY_NUMERIC_OPERATION(double, ==, i32);
- case Instructions::f64_ne.value():
- BINARY_NUMERIC_OPERATION(double, !=, i32);
- case Instructions::f64_lt.value():
- BINARY_NUMERIC_OPERATION(double, <, i32);
- case Instructions::f64_gt.value():
- BINARY_NUMERIC_OPERATION(double, >, i32);
- case Instructions::f64_le.value():
- BINARY_NUMERIC_OPERATION(double, <=, i32);
- case Instructions::f64_ge.value():
- BINARY_NUMERIC_OPERATION(double, >, i32);
- case Instructions::i32_clz.value():
- UNARY_NUMERIC_OPERATION(i32, clz);
- case Instructions::i32_ctz.value():
- UNARY_NUMERIC_OPERATION(i32, ctz);
- case Instructions::i32_popcnt.value():
- UNARY_NUMERIC_OPERATION(i32, __builtin_popcount);
- case Instructions::i32_add.value():
- BINARY_NUMERIC_OPERATION(i32, +, i32);
- case Instructions::i32_sub.value():
- BINARY_NUMERIC_OPERATION(i32, -, i32);
- case Instructions::i32_mul.value():
- BINARY_NUMERIC_OPERATION(i32, *, i32);
- case Instructions::i32_divs.value():
- BINARY_NUMERIC_OPERATION(i32, /, i32, TRAP_IF_NOT(!(Checked<i32>(lhs.value()) /= rhs.value()).has_overflow()));
- case Instructions::i32_divu.value():
- BINARY_NUMERIC_OPERATION(u32, /, i32, TRAP_IF_NOT(rhs.value() != 0));
- case Instructions::i32_rems.value():
- BINARY_NUMERIC_OPERATION(i32, %, i32, TRAP_IF_NOT(!(Checked<i32>(lhs.value()) /= rhs.value()).has_overflow()));
- case Instructions::i32_remu.value():
- BINARY_NUMERIC_OPERATION(u32, %, i32, TRAP_IF_NOT(rhs.value() != 0));
- case Instructions::i32_and.value():
- BINARY_NUMERIC_OPERATION(i32, &, i32);
- case Instructions::i32_or.value():
- BINARY_NUMERIC_OPERATION(i32, |, i32);
- case Instructions::i32_xor.value():
- BINARY_NUMERIC_OPERATION(i32, ^, i32);
- case Instructions::i32_shl.value():
- BINARY_NUMERIC_OPERATION(i32, <<, i32);
- case Instructions::i32_shrs.value():
- BINARY_NUMERIC_OPERATION(i32, >>, i32);
- case Instructions::i32_shru.value():
- BINARY_NUMERIC_OPERATION(u32, >>, i32);
- case Instructions::i32_rotl.value():
- BINARY_PREFIX_NUMERIC_OPERATION(u32, rotl, i32);
- case Instructions::i32_rotr.value():
- BINARY_PREFIX_NUMERIC_OPERATION(u32, rotr, i32);
- case Instructions::i64_clz.value():
- UNARY_NUMERIC_OPERATION(i64, clz);
- case Instructions::i64_ctz.value():
- UNARY_NUMERIC_OPERATION(i64, ctz);
- case Instructions::i64_popcnt.value():
- UNARY_NUMERIC_OPERATION(i64, __builtin_popcountll);
- case Instructions::i64_add.value():
- OVF_CHECKED_BINARY_NUMERIC_OPERATION(i64, +, i64);
- case Instructions::i64_sub.value():
- OVF_CHECKED_BINARY_NUMERIC_OPERATION(i64, -, i64);
- case Instructions::i64_mul.value():
- OVF_CHECKED_BINARY_NUMERIC_OPERATION(i64, *, i64);
- case Instructions::i64_divs.value():
- OVF_CHECKED_BINARY_NUMERIC_OPERATION(i64, /, i64, TRAP_IF_NOT(rhs.value() != 0));
- case Instructions::i64_divu.value():
- OVF_CHECKED_BINARY_NUMERIC_OPERATION(u64, /, i64, TRAP_IF_NOT(rhs.value() != 0));
- case Instructions::i64_rems.value():
- BINARY_NUMERIC_OPERATION(i64, %, i64, TRAP_IF_NOT(!(Checked<i32>(lhs.value()) /= rhs.value()).has_overflow()));
- case Instructions::i64_remu.value():
- BINARY_NUMERIC_OPERATION(u64, %, i64, TRAP_IF_NOT(rhs.value() != 0));
- case Instructions::i64_and.value():
- BINARY_NUMERIC_OPERATION(i64, &, i64);
- case Instructions::i64_or.value():
- BINARY_NUMERIC_OPERATION(i64, |, i64);
- case Instructions::i64_xor.value():
- BINARY_NUMERIC_OPERATION(i64, ^, i64);
- case Instructions::i64_shl.value():
- BINARY_NUMERIC_OPERATION(i64, <<, i64);
- case Instructions::i64_shrs.value():
- BINARY_NUMERIC_OPERATION(i64, >>, i64);
- case Instructions::i64_shru.value():
- BINARY_NUMERIC_OPERATION(u64, >>, i64);
- case Instructions::i64_rotl.value():
- BINARY_PREFIX_NUMERIC_OPERATION(u64, rotl, i64);
- case Instructions::i64_rotr.value():
- BINARY_PREFIX_NUMERIC_OPERATION(u64, rotr, i64);
- case Instructions::f32_abs.value():
- UNARY_NUMERIC_OPERATION(float, fabsf);
- case Instructions::f32_neg.value():
- UNARY_NUMERIC_OPERATION(float, -);
- case Instructions::f32_ceil.value():
- UNARY_NUMERIC_OPERATION(float, ceilf);
- case Instructions::f32_floor.value():
- UNARY_NUMERIC_OPERATION(float, floorf);
- case Instructions::f32_trunc.value():
- UNARY_NUMERIC_OPERATION(float, truncf);
- case Instructions::f32_nearest.value():
- UNARY_NUMERIC_OPERATION(float, roundf);
- case Instructions::f32_sqrt.value():
- UNARY_NUMERIC_OPERATION(float, sqrtf);
- case Instructions::f32_add.value():
- BINARY_NUMERIC_OPERATION(float, +, float);
- case Instructions::f32_sub.value():
- BINARY_NUMERIC_OPERATION(float, -, float);
- case Instructions::f32_mul.value():
- BINARY_NUMERIC_OPERATION(float, *, float);
- case Instructions::f32_div.value():
- BINARY_NUMERIC_OPERATION(float, /, float);
- case Instructions::f32_min.value():
- BINARY_PREFIX_NUMERIC_OPERATION(float, min, float);
- case Instructions::f32_max.value():
- BINARY_PREFIX_NUMERIC_OPERATION(float, max, float);
- case Instructions::f32_copysign.value():
- BINARY_PREFIX_NUMERIC_OPERATION(float, copysignf, float);
- case Instructions::f64_abs.value():
- UNARY_NUMERIC_OPERATION(double, fabs);
- case Instructions::f64_neg.value():
- UNARY_NUMERIC_OPERATION(double, -);
- case Instructions::f64_ceil.value():
- UNARY_NUMERIC_OPERATION(double, ceil);
- case Instructions::f64_floor.value():
- UNARY_NUMERIC_OPERATION(double, floor);
- case Instructions::f64_trunc.value():
- UNARY_NUMERIC_OPERATION(double, trunc);
- case Instructions::f64_nearest.value():
- UNARY_NUMERIC_OPERATION(double, round);
- case Instructions::f64_sqrt.value():
- UNARY_NUMERIC_OPERATION(double, sqrt);
- case Instructions::f64_add.value():
- BINARY_NUMERIC_OPERATION(double, +, double);
- case Instructions::f64_sub.value():
- BINARY_NUMERIC_OPERATION(double, -, double);
- case Instructions::f64_mul.value():
- BINARY_NUMERIC_OPERATION(double, *, double);
- case Instructions::f64_div.value():
- BINARY_NUMERIC_OPERATION(double, /, double);
- case Instructions::f64_min.value():
- BINARY_PREFIX_NUMERIC_OPERATION(double, min, double);
- case Instructions::f64_max.value():
- BINARY_PREFIX_NUMERIC_OPERATION(double, max, double);
- case Instructions::f64_copysign.value():
- BINARY_PREFIX_NUMERIC_OPERATION(double, copysign, double);
- case Instructions::i32_wrap_i64.value():
- UNARY_MAP(i64, i32, i32);
- case Instructions::i32_trunc_sf32.value(): {
- auto fn = [this](auto& v) { return checked_signed_truncate<float, i32>(v); };
- UNARY_MAP(float, fn, i32);
- }
- case Instructions::i32_trunc_uf32.value(): {
- auto fn = [this](auto& value) { return checked_unsigned_truncate<float, i32>(value); };
- UNARY_MAP(float, fn, i32);
- }
- case Instructions::i32_trunc_sf64.value(): {
- auto fn = [this](auto& value) { return checked_signed_truncate<double, i32>(value); };
- UNARY_MAP(double, fn, i32);
- }
- case Instructions::i32_trunc_uf64.value(): {
- auto fn = [this](auto& value) { return checked_unsigned_truncate<double, i32>(value); };
- UNARY_MAP(double, fn, i32);
- }
- case Instructions::i64_trunc_sf32.value(): {
- auto fn = [this](auto& value) { return checked_signed_truncate<float, i64>(value); };
- UNARY_MAP(float, fn, i64);
- }
- case Instructions::i64_trunc_uf32.value(): {
- auto fn = [this](auto& value) { return checked_unsigned_truncate<float, i64>(value); };
- UNARY_MAP(float, fn, i64);
- }
- case Instructions::i64_trunc_sf64.value(): {
- auto fn = [this](auto& value) { return checked_signed_truncate<double, i64>(value); };
- UNARY_MAP(double, fn, i64);
- }
- case Instructions::i64_trunc_uf64.value(): {
- auto fn = [this](auto& value) { return checked_unsigned_truncate<double, i64>(value); };
- UNARY_MAP(double, fn, i64);
- }
- case Instructions::i64_extend_si32.value():
- UNARY_MAP(i32, i64, i64);
- case Instructions::i64_extend_ui32.value():
- UNARY_MAP(u32, i64, i64);
- case Instructions::f32_convert_si32.value():
- UNARY_MAP(i32, float, float);
- case Instructions::f32_convert_ui32.value():
- UNARY_MAP(u32, float, float);
- case Instructions::f32_convert_si64.value():
- UNARY_MAP(i64, float, float);
- case Instructions::f32_convert_ui64.value():
- UNARY_MAP(u32, float, float);
- case Instructions::f32_demote_f64.value():
- UNARY_MAP(double, float, float);
- case Instructions::f64_convert_si32.value():
- UNARY_MAP(i32, double, double);
- case Instructions::f64_convert_ui32.value():
- UNARY_MAP(u32, double, double);
- case Instructions::f64_convert_si64.value():
- UNARY_MAP(i64, double, double);
- case Instructions::f64_convert_ui64.value():
- UNARY_MAP(u64, double, double);
- case Instructions::f64_promote_f32.value():
- UNARY_MAP(float, double, double);
- case Instructions::i32_reinterpret_f32.value():
- UNARY_MAP(float, bit_cast<i32>, i32);
- case Instructions::i64_reinterpret_f64.value():
- UNARY_MAP(double, bit_cast<i64>, i64);
- case Instructions::f32_reinterpret_i32.value():
- UNARY_MAP(i32, bit_cast<float>, float);
- case Instructions::f64_reinterpret_i64.value():
- UNARY_MAP(i64, bit_cast<double>, double);
- case Instructions::i32_trunc_sat_f32_s.value():
- case Instructions::i32_trunc_sat_f32_u.value():
- case Instructions::i32_trunc_sat_f64_s.value():
- case Instructions::i32_trunc_sat_f64_u.value():
- case Instructions::i64_trunc_sat_f32_s.value():
- case Instructions::i64_trunc_sat_f32_u.value():
- case Instructions::i64_trunc_sat_f64_s.value():
- case Instructions::i64_trunc_sat_f64_u.value():
- case Instructions::memory_init.value():
- case Instructions::data_drop.value():
- case Instructions::memory_copy.value():
- case Instructions::memory_fill.value():
- case Instructions::table_init.value():
- case Instructions::elem_drop.value():
- case Instructions::table_copy.value():
- case Instructions::table_grow.value():
- case Instructions::table_size.value():
- case Instructions::table_fill.value():
- case Instructions::i32_extend8_s.value():
- case Instructions::i32_extend16_s.value():
- case Instructions::i64_extend8_s.value():
- case Instructions::i64_extend16_s.value():
- case Instructions::i64_extend32_s.value():
- default:
- unimplemented:;
- dbgln("Instruction '{}' not implemented", instruction_name(instruction.opcode()));
- m_do_trap = true;
- return;
- }
-}
-
-void DebuggerBytecodeInterpreter::interpret(Configuration& configuration, InstructionPointer& ip, Instruction const& instruction)
-{
- if (pre_interpret_hook) {
- auto result = pre_interpret_hook(configuration, ip, instruction);
- if (!result) {
- m_do_trap = true;
- return;
- }
- }
-
- ScopeGuard guard { [&] {
- if (post_interpret_hook) {
- auto result = post_interpret_hook(configuration, ip, instruction, *this);
- if (!result) {
- m_do_trap = true;
- return;
- }
- }
- } };
-
- BytecodeInterpreter::interpret(configuration, ip, instruction);
-}
-
}
diff --git a/Userland/Libraries/LibWasm/AbstractMachine/Interpreter.h b/Userland/Libraries/LibWasm/AbstractMachine/Interpreter.h
index 8b71016c2f..0f17d4f1bf 100644
--- a/Userland/Libraries/LibWasm/AbstractMachine/Interpreter.h
+++ b/Userland/Libraries/LibWasm/AbstractMachine/Interpreter.h
@@ -17,60 +17,4 @@ struct Interpreter {
virtual void clear_trap() = 0;
};
-struct BytecodeInterpreter : public Interpreter {
- virtual void interpret(Configuration&) override;
- virtual ~BytecodeInterpreter() override = default;
- virtual bool did_trap() const override { return m_do_trap; }
- virtual void clear_trap() override { m_do_trap = false; }
-
- struct CallFrameHandle {
- explicit CallFrameHandle(BytecodeInterpreter& interpreter, Configuration& configuration)
- : m_configuration_handle(configuration)
- , m_interpreter(interpreter)
- {
- }
-
- ~CallFrameHandle() = default;
-
- Configuration::CallFrameHandle m_configuration_handle;
- BytecodeInterpreter& m_interpreter;
- };
-
-protected:
- virtual void interpret(Configuration&, InstructionPointer&, Instruction const&);
- void branch_to_label(Configuration&, LabelIndex);
- template<typename ReadT, typename PushT>
- void load_and_push(Configuration&, Instruction const&);
- void store_to_memory(Configuration&, Instruction const&, ReadonlyBytes data);
- void call_address(Configuration&, FunctionAddress);
-
- template<typename V, typename T>
- MakeUnsigned<T> checked_unsigned_truncate(V);
-
- template<typename V, typename T>
- MakeSigned<T> checked_signed_truncate(V);
-
- template<typename T>
- T read_value(ReadonlyBytes data);
-
- Vector<Value> pop_values(Configuration& configuration, size_t count);
- bool trap_if_not(bool value)
- {
- if (!value)
- m_do_trap = true;
- return m_do_trap;
- }
- bool m_do_trap { false };
-};
-
-struct DebuggerBytecodeInterpreter : public BytecodeInterpreter {
- virtual ~DebuggerBytecodeInterpreter() override = default;
-
- Function<bool(Configuration&, InstructionPointer&, Instruction const&)> pre_interpret_hook;
- Function<bool(Configuration&, InstructionPointer&, Instruction const&, Interpreter const&)> post_interpret_hook;
-
-private:
- virtual void interpret(Configuration&, InstructionPointer&, Instruction const&) override;
-};
-
}