fix: release eq
This commit is contained in:
@@ -1,193 +1,85 @@
|
||||
use std::alloc::Layout;
|
||||
use std::alloc::alloc;
|
||||
use core::ptr::NonNull;
|
||||
use core::{slice, str};
|
||||
|
||||
use cranelift::codegen::ir::ArgumentExtension;
|
||||
use cranelift::codegen::ir::ArgumentPurpose;
|
||||
use cranelift::prelude::*;
|
||||
use cranelift_module::FuncId;
|
||||
use cranelift_module::Linkage;
|
||||
use cranelift_module::Module;
|
||||
use std::mem::MaybeUninit;
|
||||
use std::ptr::NonNull;
|
||||
|
||||
use crate::env::Env;
|
||||
use crate::eval::Engine;
|
||||
use crate::ty::internal::Value;
|
||||
|
||||
use super::{JITContext, JITValue, JITValueData, ValueTag};
|
||||
|
||||
pub struct Helpers {
|
||||
pub int_type: Type,
|
||||
pub float_type: Type,
|
||||
pub bool_type: Type,
|
||||
pub ptr_int_type: Type,
|
||||
pub ptr_type: Type,
|
||||
pub value_type: Type,
|
||||
pub func_sig: Signature,
|
||||
|
||||
|
||||
pub call: FuncId,
|
||||
pub lookup_arg: FuncId,
|
||||
pub lookup: FuncId,
|
||||
pub force: FuncId,
|
||||
|
||||
pub alloc_array: FuncId,
|
||||
}
|
||||
|
||||
impl Helpers {
|
||||
pub fn new(
|
||||
ctx: &codegen::Context,
|
||||
module: &mut dyn Module,
|
||||
) -> Self {
|
||||
let int_type = types::I64;
|
||||
let float_type = types::F64;
|
||||
let bool_type = types::I8;
|
||||
// let ptr_type = ctx.ptr_type(AddressSpace::default());
|
||||
let ptr_type = module.target_config().pointer_type();
|
||||
let ptr_int_type = ptr_type;
|
||||
let value_type = types::I128;
|
||||
// let func_sig = ctx.void_type().fn_type(&[ptr_type.into(), ptr_type.into(), ptr_type.into()], false);
|
||||
let mut func_sig = Signature::new(isa::CallConv::SystemV);
|
||||
func_sig.params.push(AbiParam { value_type: ptr_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
func_sig.params.push(AbiParam { value_type: ptr_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
func_sig.returns.push(AbiParam { value_type, purpose: ArgumentPurpose::StructReturn, extension: ArgumentExtension::None });
|
||||
|
||||
let mut call_sig = Signature::new(isa::CallConv::SystemV);
|
||||
call_sig.params.push(AbiParam { value_type, purpose: ArgumentPurpose::StructArgument(24), extension: ArgumentExtension::None });
|
||||
call_sig.params.push(AbiParam { value_type: ptr_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
call_sig.params.push(AbiParam { value_type: ptr_int_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
call_sig.params.push(AbiParam { value_type: ptr_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
call_sig.params.push(AbiParam { value_type: ptr_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
let call = module.declare_function("helper_call", Linkage::Import, &call_sig).unwrap();
|
||||
|
||||
let mut lookup_arg_sig = Signature::new(isa::CallConv::SystemV);
|
||||
lookup_arg_sig.params.push(AbiParam { value_type: ptr_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
lookup_arg_sig.params.push(AbiParam { value_type: ptr_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
let lookup_arg = module.declare_function("helper_lookup_arg", Linkage::Import, &call_sig).unwrap();
|
||||
|
||||
let mut lookup_sig = Signature::new(isa::CallConv::SystemV);
|
||||
lookup_sig.params.push(AbiParam { value_type: ptr_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
lookup_sig.params.push(AbiParam { value_type: ptr_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
lookup_sig.params.push(AbiParam { value_type: ptr_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
lookup_sig.params.push(AbiParam { value_type: ptr_int_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
let lookup = module.declare_function("helper_lookup", Linkage::Import, &call_sig).unwrap();
|
||||
|
||||
let mut force_sig = Signature::new(isa::CallConv::SystemV);
|
||||
force_sig.params.push(AbiParam { value_type, purpose: ArgumentPurpose::StructArgument(24), extension: ArgumentExtension::None });
|
||||
force_sig.params.push(AbiParam { value_type: ptr_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
force_sig.params.push(AbiParam { value_type: ptr_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
let force = module.declare_function("helper_force", Linkage::Import, &call_sig).unwrap();
|
||||
|
||||
let mut alloc_array_sig = Signature::new(isa::CallConv::SystemV);
|
||||
alloc_array_sig.params.push(AbiParam { value_type: ptr_int_type, purpose: ArgumentPurpose::Normal, extension: ArgumentExtension::None });
|
||||
let alloc_array = module.declare_function("helper_alloc_array", Linkage::Import, &call_sig).unwrap();
|
||||
|
||||
Helpers {
|
||||
int_type,
|
||||
float_type,
|
||||
bool_type,
|
||||
ptr_int_type,
|
||||
ptr_type,
|
||||
value_type,
|
||||
func_sig,
|
||||
|
||||
call,
|
||||
lookup_arg,
|
||||
lookup,
|
||||
force,
|
||||
|
||||
alloc_array,
|
||||
}
|
||||
}
|
||||
|
||||
pub fn new_value(&self, tag: ValueTag, data: BasicValueEnum) -> StructValue {
|
||||
self.value_type.const_named_struct(&[
|
||||
self.const_int(tag as i64).into(),
|
||||
data,
|
||||
self.int_type.const_zero().into(),
|
||||
])
|
||||
}
|
||||
|
||||
pub fn const_ptr_int(&self, int: usize) -> IntValue {
|
||||
self.ptr_int_type.const_int(int as _, false)
|
||||
}
|
||||
|
||||
pub fn const_int(&self, int: i64) -> IntValue {
|
||||
self.int_type.const_int(int as _, false)
|
||||
}
|
||||
|
||||
pub fn new_int(&self, int: i64) -> StructValue {
|
||||
self.new_value(ValueTag::Int, self.const_int(int).into())
|
||||
}
|
||||
|
||||
pub fn const_float(&self, float: f64) -> FloatValue {
|
||||
self.float_type.const_float(float)
|
||||
}
|
||||
|
||||
pub fn new_float(&self, float: f64) -> StructValue {
|
||||
self.new_value(ValueTag::Float, self.const_float(float).into())
|
||||
}
|
||||
|
||||
pub fn const_bool(&self, bool: bool) -> IntValue {
|
||||
self.bool_type.const_int(bool as _, false)
|
||||
}
|
||||
|
||||
pub fn new_bool(&self, bool: bool) -> StructValue {
|
||||
self.new_value(ValueTag::Bool, self.const_bool(bool).into())
|
||||
}
|
||||
|
||||
pub fn new_null(&self) -> StructValue {
|
||||
self.new_value(ValueTag::Null, self.int_type.const_zero().into())
|
||||
}
|
||||
}
|
||||
|
||||
extern "C" fn helper_call(
|
||||
func: JITValue,
|
||||
args: *mut JITValue,
|
||||
len: usize,
|
||||
mut engine: NonNull<Engine>,
|
||||
mut env: NonNull<Env>,
|
||||
) -> JITValue {
|
||||
let mut func = Value::from(func);
|
||||
pub extern "C" fn helper_call(
|
||||
func: &mut Value,
|
||||
args_ptr: *mut Value,
|
||||
args_len: usize,
|
||||
engine: &mut Engine,
|
||||
env: &mut Env,
|
||||
) {
|
||||
// TODO: Error Handling
|
||||
let args = core::ptr::slice_from_raw_parts_mut(args, len);
|
||||
let args = core::ptr::slice_from_raw_parts_mut(args_ptr, args_len);
|
||||
let args = unsafe { Box::from_raw(args) };
|
||||
func.call(
|
||||
args.into_iter().map(Value::from).collect(),
|
||||
unsafe { engine.as_mut() },
|
||||
unsafe { env.as_mut() },
|
||||
engine,
|
||||
env
|
||||
)
|
||||
.unwrap();
|
||||
func.into()
|
||||
}
|
||||
|
||||
extern "C" fn helper_lookup_arg(env: NonNull<Env>, level: u64) -> JITValue {
|
||||
let env_ref = unsafe { env.as_ref() };
|
||||
env_ref.lookup_arg(level as usize).into()
|
||||
pub extern "C" fn helper_lookup_arg(env: &Env, level: usize, ret: &mut MaybeUninit<Value>) {
|
||||
ret.write(env.lookup_arg(level as usize));
|
||||
}
|
||||
|
||||
extern "C" fn helper_lookup(env: NonNull<Env>, ptr: *const u8, len: usize) -> JITValue {
|
||||
let env = unsafe { env.as_ref() };
|
||||
pub extern "C" fn helper_lookup(env: &Env, sym_ptr: *const u8, sym_len: usize, ret: &mut MaybeUninit<Value>) {
|
||||
// TODO: Error Handling
|
||||
let val: JITValue = env
|
||||
.lookup_with(unsafe { str::from_utf8_unchecked(slice::from_raw_parts(ptr, len)) })
|
||||
.unwrap()
|
||||
.clone()
|
||||
.into();
|
||||
val
|
||||
}
|
||||
|
||||
extern "C" fn helper_force(
|
||||
thunk: JITValue,
|
||||
vm: NonNull<Engine>,
|
||||
jit: *const JITContext,
|
||||
) -> JITValue {
|
||||
if !matches!(thunk.tag, ValueTag::Thunk) {
|
||||
return thunk;
|
||||
unsafe {
|
||||
ret.write(env
|
||||
.lookup_with(str::from_utf8_unchecked(slice::from_raw_parts(sym_ptr, sym_len)))
|
||||
.unwrap());
|
||||
}
|
||||
todo!()
|
||||
}
|
||||
|
||||
unsafe extern "C" fn helper_alloc_array(len: usize) -> *mut u8 {
|
||||
unsafe { alloc(Layout::array::<JITValue>(len).unwrap()) }
|
||||
pub extern "C" fn helper_select(val: &mut Value, path_ptr: *mut Value, path_len: usize, engine: &mut Engine, env: &mut Env) {
|
||||
let path = core::ptr::slice_from_raw_parts_mut(path_ptr, path_len);
|
||||
let path = unsafe { Box::from_raw(path) };
|
||||
val.select(path.into_iter().map(|mut val| {
|
||||
val.force(engine, env)?.coerce_to_string();
|
||||
Ok(val.unwrap_string())
|
||||
})).unwrap();
|
||||
}
|
||||
|
||||
pub extern "C" fn helper_select_with_default(val: &mut Value, path_ptr: *mut Value, path_len: usize, default: NonNull<Value>, engine: &mut Engine, env: &mut Env) {
|
||||
let path = core::ptr::slice_from_raw_parts_mut(path_ptr, path_len);
|
||||
let path = unsafe { Box::from_raw(path) };
|
||||
val.select_with_default(path.into_iter().map(|mut val| {
|
||||
val.force(engine, env)?.coerce_to_string();
|
||||
Ok(val.unwrap_string())
|
||||
}), unsafe { default.read() }).unwrap();
|
||||
}
|
||||
|
||||
pub extern "C" fn helper_force(
|
||||
thunk: &mut Value,
|
||||
engine: &mut Engine,
|
||||
env: &mut Env,
|
||||
) {
|
||||
thunk.force(engine, env).unwrap();
|
||||
}
|
||||
|
||||
pub extern "C" fn helper_eq(lhs: &mut Value, rhs: &Value) {
|
||||
lhs.eq(rhs);
|
||||
}
|
||||
|
||||
pub unsafe extern "C" fn helper_create_string(ptr: *const u8, len: usize, ret: &mut MaybeUninit<Value>) {
|
||||
unsafe {
|
||||
ret.write(Value::String(str::from_utf8_unchecked(slice::from_raw_parts(ptr, len)).to_string()));
|
||||
}
|
||||
}
|
||||
|
||||
pub unsafe extern "C" fn helper_alloc_array(len: usize) -> *mut u8 {
|
||||
unsafe { alloc(Layout::array::<Value>(len).unwrap()) }
|
||||
}
|
||||
|
||||
pub extern "C" fn helper_dbg(value: &Value) {
|
||||
// dbg!(value);
|
||||
println!("{value:?}")
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user