luaur_vm/functions/
luau_f_readinteger.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::nvalue::nvalue;
7use crate::macros::setnvalue::setnvalue;
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_readinteger<T>(
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
23where
24    T: Copy + Into<f64>,
25{
26    if !LUAU_BIG_ENDIAN && nparams >= 2 && nresults <= 1 && ttisbuffer!(arg0) && ttisnumber!(args) {
27        let mut offset: core::ffi::c_int = 0;
28        luai_num2int!(offset, nvalue!(args));
29
30        let len = (*bufvalue!(arg0)).len as usize;
31        if checkoutofbounds(offset, len, core::mem::size_of::<T>()) {
32            return -1;
33        }
34
35        let val: T = {
36            let src = (*bufvalue!(arg0)).data.as_ptr().add(offset as usize) as *const T;
37            core::ptr::read_unaligned(src)
38        };
39
40        setnvalue!(res, val.into());
41        return 1;
42    }
43
44    -1
45}
luaur_vm/functions/luau_f_readinteger.rs

luaur_vm/functions/
luau_f_readinteger.rs
