luaur_vm/functions/
luau_f_writeinteger.rs

1use luaur_common::macros::luau_big_endian::LUAU_BIG_ENDIAN;
2
3use crate::macros::bufvalue::bufvalue;
4use crate::macros::checkoutofbounds::checkoutofbounds;
5use crate::macros::luai_num_2_int::luai_num2int;
6use crate::macros::luai_num_2_unsigned::luai_num2unsigned;
7use crate::macros::nvalue::nvalue;
8use crate::macros::ttisbuffer::ttisbuffer;
9use crate::macros::ttisnumber::ttisnumber;
10use crate::type_aliases::lua_state::LuaState;
11use crate::type_aliases::stk_id::StkId;
12use crate::type_aliases::t_value::TValue;
13
14#[allow(non_snake_case)]
15pub unsafe fn luauF_writeinteger<T: Copy>(
16    _L: *mut LuaState,
17    _res: StkId,
18    arg0: *mut TValue,
19    nresults: core::ffi::c_int,
20    args: StkId,
21    nparams: core::ffi::c_int,
22) -> core::ffi::c_int {
23    if !LUAU_BIG_ENDIAN
24        && nparams >= 3
25        && nresults <= 0
26        && ttisbuffer!(arg0)
27        && ttisnumber!(args)
28        && ttisnumber!(args.add(1))
29    {
30        let mut offset: core::ffi::c_int = 0;
31        luai_num2int!(offset, nvalue!(args));
32
33        let len = (*bufvalue!(arg0)).len as usize;
34        let access_size = core::mem::size_of::<T>() as usize;
35        if checkoutofbounds(offset, len, access_size) {
36            return -1;
37        }
38
39        let mut value: u32 = 0;
40        let incoming = nvalue!(args.add(1));
41        luai_num2unsigned(&mut value, incoming);
42
43        let val: T = core::mem::transmute_copy::<u32, T>(&value);
44
45        let dst = (*bufvalue!(arg0)).data.as_ptr().add(offset as usize) as *mut u8;
46        core::ptr::copy_nonoverlapping(
47            &val as *const T as *const u8,
48            dst,
49            core::mem::size_of::<T>(),
50        );
51        return 0;
52    }
53
54    -1
55}
luaur_vm/functions/luau_f_writeinteger.rs

luaur_vm/functions/
luau_f_writeinteger.rs
