use super::invoke_wasm_and_catch_traps;
use crate::prelude::*;
use crate::runtime::vm::VMFuncRef;
use crate::store::{AutoAssertNoGc, StoreOpaque};
use crate::{
AsContext, AsContextMut, Engine, Func, FuncType, HeapType, NoFunc, RefType, StoreContextMut,
ValRaw, ValType,
};
use core::ffi::c_void;
use core::marker;
use core::mem::{self, MaybeUninit};
use core::ptr::{self, NonNull};
use wasmtime_environ::VMSharedTypeIndex;
pub struct TypedFunc<Params, Results> {
_a: marker::PhantomData<fn(Params) -> Results>,
ty: FuncType,
func: Func,
}
impl<Params, Results> Clone for TypedFunc<Params, Results> {
fn clone(&self) -> TypedFunc<Params, Results> {
Self {
_a: marker::PhantomData,
ty: self.ty.clone(),
func: self.func,
}
}
}
impl<Params, Results> TypedFunc<Params, Results>
where
Params: WasmParams,
Results: WasmResults,
{
pub unsafe fn new_unchecked(store: impl AsContext, func: Func) -> TypedFunc<Params, Results> {
let store = store.as_context().0;
unsafe { Self::_new_unchecked(store, func) }
}
pub(crate) unsafe fn _new_unchecked(
store: &StoreOpaque,
func: Func,
) -> TypedFunc<Params, Results> {
let ty = func.load_ty(store);
TypedFunc {
_a: marker::PhantomData,
ty,
func,
}
}
pub fn func(&self) -> &Func {
&self.func
}
#[inline]
pub fn call(&self, mut store: impl AsContextMut, params: Params) -> Result<Results> {
let mut store = store.as_context_mut();
store.0.validate_sync_call()?;
let func = self.func.vm_func_ref(store.0);
unsafe { Self::call_raw(&mut store, &self.ty, func, params) }
}
#[cfg(feature = "async")]
pub async fn call_async(
&self,
mut store: impl AsContextMut<Data: Send>,
params: Params,
) -> Result<Results>
where
Params: Sync,
Results: Sync,
{
let mut store = store.as_context_mut();
store
.on_fiber(|store| {
let func = self.func.vm_func_ref(store.0);
unsafe { Self::call_raw(store, &self.ty, func, params) }
})
.await?
}
pub(crate) unsafe fn call_raw<T>(
store: &mut StoreContextMut<'_, T>,
ty: &FuncType,
func: ptr::NonNull<VMFuncRef>,
params: Params,
) -> Result<Results> {
unsafe {
if cfg!(debug_assertions) {
Self::debug_typecheck(store.0, func.as_ref().type_index);
}
}
union Storage<T: Copy, U: Copy> {
params: MaybeUninit<T>,
results: U,
}
let mut storage = Storage::<Params::ValRawStorage, Results::ValRawStorage> {
params: MaybeUninit::uninit(),
};
{
let mut store = AutoAssertNoGc::new(store.0);
let dst: &mut MaybeUninit<_> = unsafe { &mut storage.params };
params.store(&mut store, ty, dst)?;
}
let mut captures = (func, storage);
let result = invoke_wasm_and_catch_traps(store, |caller, vm| {
let (func_ref, storage) = &mut captures;
let storage_len = mem::size_of_val::<Storage<_, _>>(storage) / mem::size_of::<ValRaw>();
let storage: *mut Storage<_, _> = storage;
let storage = storage.cast::<ValRaw>();
let storage = core::ptr::slice_from_raw_parts_mut(storage, storage_len);
let storage = NonNull::new(storage).unwrap();
unsafe { VMFuncRef::array_call(*func_ref, vm, caller, storage) }
});
let (_, storage) = captures;
result?;
let mut store = AutoAssertNoGc::new(store.0);
unsafe { Ok(Results::load(&mut store, &storage.results)) }
}
fn debug_typecheck(store: &StoreOpaque, func: VMSharedTypeIndex) {
let ty = FuncType::from_shared_type_index(store.engine(), func);
Params::typecheck(store.engine(), ty.params(), TypeCheckPosition::Param)
.expect("params should match");
Results::typecheck(store.engine(), ty.results(), TypeCheckPosition::Result)
.expect("results should match");
}
}
#[doc(hidden)]
#[derive(Copy, Clone)]
pub enum TypeCheckPosition {
Param,
Result,
}
pub unsafe trait WasmTy: Send {
#[doc(hidden)]
#[inline]
fn typecheck(engine: &Engine, actual: ValType, position: TypeCheckPosition) -> Result<()> {
let expected = Self::valtype();
debug_assert!(expected.comes_from_same_engine(engine));
debug_assert!(actual.comes_from_same_engine(engine));
match position {
TypeCheckPosition::Result => actual.ensure_matches(engine, &expected),
TypeCheckPosition::Param => match (expected.as_ref(), actual.as_ref()) {
(Some(expected_ref), Some(actual_ref)) if actual_ref.heap_type().is_concrete() => {
expected_ref
.heap_type()
.top()
.ensure_matches(engine, &actual_ref.heap_type().top())
}
_ => expected.ensure_matches(engine, &actual),
},
}
}
#[doc(hidden)]
fn valtype() -> ValType;
#[doc(hidden)]
fn may_gc() -> bool {
match Self::valtype() {
ValType::Ref(_) => true,
ValType::I32 | ValType::I64 | ValType::F32 | ValType::F64 | ValType::V128 => false,
}
}
#[doc(hidden)]
fn compatible_with_store(&self, store: &StoreOpaque) -> bool;
#[doc(hidden)]
fn dynamic_concrete_type_check(
&self,
store: &StoreOpaque,
nullable: bool,
actual: &HeapType,
) -> Result<()>;
#[doc(hidden)]
#[inline]
fn is_vmgcref_and_points_to_object(&self) -> bool {
Self::valtype().is_vmgcref_type_and_points_to_object()
}
#[doc(hidden)]
fn store(self, store: &mut AutoAssertNoGc<'_>, ptr: &mut MaybeUninit<ValRaw>) -> Result<()>;
#[doc(hidden)]
unsafe fn load(store: &mut AutoAssertNoGc<'_>, ptr: &ValRaw) -> Self;
}
macro_rules! integers {
($($primitive:ident/$get_primitive:ident => $ty:ident)*) => ($(
unsafe impl WasmTy for $primitive {
#[inline]
fn valtype() -> ValType {
ValType::$ty
}
#[inline]
fn compatible_with_store(&self, _: &StoreOpaque) -> bool {
true
}
#[inline]
fn dynamic_concrete_type_check(&self, _: &StoreOpaque, _: bool, _: &HeapType) -> Result<()> {
unreachable!()
}
#[inline]
fn store(self, _store: &mut AutoAssertNoGc<'_>, ptr: &mut MaybeUninit<ValRaw>) -> Result<()> {
ptr.write(ValRaw::$primitive(self));
Ok(())
}
#[inline]
unsafe fn load(_store: &mut AutoAssertNoGc<'_>, ptr: &ValRaw) -> Self {
ptr.$get_primitive()
}
}
)*)
}
integers! {
i32/get_i32 => I32
i64/get_i64 => I64
u32/get_u32 => I32
u64/get_u64 => I64
}
macro_rules! floats {
($($float:ident/$int:ident/$get_float:ident => $ty:ident)*) => ($(
unsafe impl WasmTy for $float {
#[inline]
fn valtype() -> ValType {
ValType::$ty
}
#[inline]
fn compatible_with_store(&self, _: &StoreOpaque) -> bool {
true
}
#[inline]
fn dynamic_concrete_type_check(&self, _: &StoreOpaque, _: bool, _: &HeapType) -> Result<()> {
unreachable!()
}
#[inline]
fn store(self, _store: &mut AutoAssertNoGc<'_>, ptr: &mut MaybeUninit<ValRaw>) -> Result<()> {
ptr.write(ValRaw::$float(self.to_bits()));
Ok(())
}
#[inline]
unsafe fn load(_store: &mut AutoAssertNoGc<'_>, ptr: &ValRaw) -> Self {
$float::from_bits(ptr.$get_float())
}
}
)*)
}
floats! {
f32/u32/get_f32 => F32
f64/u64/get_f64 => F64
}
unsafe impl WasmTy for NoFunc {
#[inline]
fn valtype() -> ValType {
ValType::Ref(RefType::new(false, HeapType::NoFunc))
}
#[inline]
fn compatible_with_store(&self, _store: &StoreOpaque) -> bool {
match self._inner {}
}
#[inline]
fn dynamic_concrete_type_check(&self, _: &StoreOpaque, _: bool, _: &HeapType) -> Result<()> {
match self._inner {}
}
#[inline]
fn is_vmgcref_and_points_to_object(&self) -> bool {
match self._inner {}
}
#[inline]
fn store(self, _store: &mut AutoAssertNoGc<'_>, _ptr: &mut MaybeUninit<ValRaw>) -> Result<()> {
match self._inner {}
}
#[inline]
unsafe fn load(_store: &mut AutoAssertNoGc<'_>, _ptr: &ValRaw) -> Self {
unreachable!("NoFunc is uninhabited")
}
}
unsafe impl WasmTy for Option<NoFunc> {
#[inline]
fn valtype() -> ValType {
ValType::Ref(RefType::new(true, HeapType::NoFunc))
}
#[inline]
fn compatible_with_store(&self, _store: &StoreOpaque) -> bool {
true
}
#[inline]
fn dynamic_concrete_type_check(
&self,
_: &StoreOpaque,
nullable: bool,
ty: &HeapType,
) -> Result<()> {
if nullable {
Ok(())
} else {
bail!("argument type mismatch: expected non-nullable (ref {ty}), found null reference")
}
}
#[inline]
fn store(self, _store: &mut AutoAssertNoGc<'_>, ptr: &mut MaybeUninit<ValRaw>) -> Result<()> {
ptr.write(ValRaw::funcref(ptr::null_mut()));
Ok(())
}
#[inline]
unsafe fn load(_store: &mut AutoAssertNoGc<'_>, _ptr: &ValRaw) -> Self {
None
}
}
unsafe impl WasmTy for Func {
#[inline]
fn valtype() -> ValType {
ValType::Ref(RefType::new(false, HeapType::Func))
}
#[inline]
fn compatible_with_store(&self, store: &StoreOpaque) -> bool {
self.store == store.id()
}
#[inline]
fn dynamic_concrete_type_check(
&self,
store: &StoreOpaque,
_nullable: bool,
expected: &HeapType,
) -> Result<()> {
let expected = expected.unwrap_concrete_func();
self.ensure_matches_ty(store, expected)
.context("argument type mismatch for reference to concrete type")
}
#[inline]
fn store(self, store: &mut AutoAssertNoGc<'_>, ptr: &mut MaybeUninit<ValRaw>) -> Result<()> {
let abi = self.vm_func_ref(store);
ptr.write(ValRaw::funcref(abi.cast::<c_void>().as_ptr()));
Ok(())
}
#[inline]
unsafe fn load(store: &mut AutoAssertNoGc<'_>, ptr: &ValRaw) -> Self {
let p = NonNull::new(ptr.get_funcref()).unwrap().cast();
unsafe { Func::from_vm_func_ref(store.id(), p) }
}
}
unsafe impl WasmTy for Option<Func> {
#[inline]
fn valtype() -> ValType {
ValType::FUNCREF
}
#[inline]
fn compatible_with_store(&self, store: &StoreOpaque) -> bool {
if let Some(f) = self {
f.compatible_with_store(store)
} else {
true
}
}
fn dynamic_concrete_type_check(
&self,
store: &StoreOpaque,
nullable: bool,
expected: &HeapType,
) -> Result<()> {
if let Some(f) = self {
let expected = expected.unwrap_concrete_func();
f.ensure_matches_ty(store, expected)
.context("argument type mismatch for reference to concrete type")
} else if nullable {
Ok(())
} else {
bail!(
"argument type mismatch: expected non-nullable (ref {expected}), found null reference"
)
}
}
#[inline]
fn store(self, store: &mut AutoAssertNoGc<'_>, ptr: &mut MaybeUninit<ValRaw>) -> Result<()> {
let raw = if let Some(f) = self {
f.vm_func_ref(store).as_ptr()
} else {
ptr::null_mut()
};
ptr.write(ValRaw::funcref(raw.cast::<c_void>()));
Ok(())
}
#[inline]
unsafe fn load(store: &mut AutoAssertNoGc<'_>, ptr: &ValRaw) -> Self {
let ptr = NonNull::new(ptr.get_funcref())?.cast();
unsafe { Some(Func::from_vm_func_ref(store.id(), ptr)) }
}
}
pub unsafe trait WasmParams: Send {
#[doc(hidden)]
type ValRawStorage: Copy;
#[doc(hidden)]
fn typecheck(
engine: &Engine,
params: impl ExactSizeIterator<Item = crate::ValType>,
position: TypeCheckPosition,
) -> Result<()>;
#[doc(hidden)]
fn vmgcref_pointing_to_object_count(&self) -> usize;
#[doc(hidden)]
fn store(
self,
store: &mut AutoAssertNoGc<'_>,
func_ty: &FuncType,
dst: &mut MaybeUninit<Self::ValRawStorage>,
) -> Result<()>;
}
unsafe impl<T> WasmParams for T
where
T: WasmTy,
{
type ValRawStorage = <(T,) as WasmParams>::ValRawStorage;
fn typecheck(
engine: &Engine,
params: impl ExactSizeIterator<Item = crate::ValType>,
position: TypeCheckPosition,
) -> Result<()> {
<(T,) as WasmParams>::typecheck(engine, params, position)
}
#[inline]
fn vmgcref_pointing_to_object_count(&self) -> usize {
T::is_vmgcref_and_points_to_object(self) as usize
}
#[inline]
fn store(
self,
store: &mut AutoAssertNoGc<'_>,
func_ty: &FuncType,
dst: &mut MaybeUninit<Self::ValRawStorage>,
) -> Result<()> {
<(T,) as WasmParams>::store((self,), store, func_ty, dst)
}
}
macro_rules! impl_wasm_params {
($n:tt $($t:ident)*) => {
#[allow(non_snake_case, reason = "macro-generated code")]
unsafe impl<$($t: WasmTy,)*> WasmParams for ($($t,)*) {
type ValRawStorage = [ValRaw; $n];
fn typecheck(
_engine: &Engine,
mut params: impl ExactSizeIterator<Item = crate::ValType>,
_position: TypeCheckPosition,
) -> Result<()> {
let mut _n = 0;
$(
match params.next() {
Some(t) => {
_n += 1;
$t::typecheck(_engine, t, _position)?
},
None => bail!("expected {} types, found {}", $n, params.len() + _n),
}
)*
match params.next() {
None => Ok(()),
Some(_) => {
_n += 1;
bail!("expected {} types, found {}", $n, params.len() + _n)
},
}
}
#[inline]
fn vmgcref_pointing_to_object_count(&self) -> usize {
let ($($t,)*) = self;
0 $(
+ $t.is_vmgcref_and_points_to_object() as usize
)*
}
#[inline]
fn store(
self,
_store: &mut AutoAssertNoGc<'_>,
_func_ty: &FuncType,
_ptr: &mut MaybeUninit<Self::ValRawStorage>,
) -> Result<()> {
let ($($t,)*) = self;
let mut _i = 0;
$(
if !$t.compatible_with_store(_store) {
bail!("attempt to pass cross-`Store` value to Wasm as function argument");
}
if $t::valtype().is_ref() {
let param_ty = _func_ty.param(_i).unwrap();
let ref_ty = param_ty.unwrap_ref();
let heap_ty = ref_ty.heap_type();
if heap_ty.is_concrete() {
$t.dynamic_concrete_type_check(_store, ref_ty.is_nullable(), heap_ty)?;
}
}
let dst = map_maybe_uninit!(_ptr[_i]);
$t.store(_store, dst)?;
_i += 1;
)*
Ok(())
}
}
};
}
for_each_function_signature!(impl_wasm_params);
pub unsafe trait WasmResults: WasmParams {
#[doc(hidden)]
unsafe fn load(store: &mut AutoAssertNoGc<'_>, abi: &Self::ValRawStorage) -> Self;
}
unsafe impl<T: WasmTy> WasmResults for T {
unsafe fn load(store: &mut AutoAssertNoGc<'_>, abi: &Self::ValRawStorage) -> Self {
unsafe { <(T,) as WasmResults>::load(store, abi).0 }
}
}
macro_rules! impl_wasm_results {
($n:tt $($t:ident)*) => {
#[allow(non_snake_case, reason = "macro-generated code")]
unsafe impl<$($t: WasmTy,)*> WasmResults for ($($t,)*) {
unsafe fn load(_store: &mut AutoAssertNoGc<'_>, abi: &Self::ValRawStorage) -> Self {
let [$($t,)*] = abi;
(
$(unsafe { $t::load(_store, $t) },)*
)
}
}
};
}
for_each_function_signature!(impl_wasm_results);