luaur_vm/functions/
lua_newuserdatadtor.rs

1use core::ffi::{c_int, c_void};
2
3use crate::enums::lua_type::lua_Type;
4use crate::functions::lua_concat::lua_c_threadbarrier_lapi;
5use crate::functions::lua_u_newudata::lua_u_newudata;
6use crate::macros::api_check::api_check;
7use crate::macros::api_incr_top::api_incr_top;
8use crate::macros::lua_c_check_gc::luaC_checkGC;
9use crate::macros::utag_idtor::UTAG_IDTOR;
10use crate::records::gc_object::GCObject;
11use crate::records::lua_state::lua_State;
12
13type UserdataDtor = Option<unsafe extern "C" fn(*mut c_void)>;
14
15#[allow(non_snake_case)]
16pub unsafe fn lua_newuserdatadtor(L: *mut lua_State, sz: usize, dtor: UserdataDtor) -> *mut c_void {
17    api_check!(L, dtor.is_some());
18    luaC_checkGC!(L);
19    lua_c_threadbarrier_lapi(L);
20
21    let dtor_size = core::mem::size_of::<UserdataDtor>();
22    let as_ = if sz < usize::MAX - dtor_size {
23        sz + dtor_size
24    } else {
25        usize::MAX
26    };
27
28    let u = lua_u_newudata(L, as_, UTAG_IDTOR);
29    core::ptr::copy_nonoverlapping(
30        (&dtor as *const UserdataDtor).cast::<u8>(),
31        (*u).data.as_mut_ptr().add(sz).cast::<u8>(),
32        dtor_size,
33    );
34
35    (*(*L).top).value.gc = u as *mut GCObject;
36    (*(*L).top).tt = lua_Type::LUA_TUSERDATA as c_int;
37    crate::macros::checkliveness::checkliveness!((*L).global, (*L).top);
38    api_incr_top!(L);
39
40    (*u).data.as_mut_ptr().cast()
41}
luaur_vm/functions/lua_newuserdatadtor.rs

luaur_vm/functions/
lua_newuserdatadtor.rs
