luaur_vm/functions/
buffer_readlong.rs

1use crate::functions::lua_l_checkbuffer::lua_l_checkbuffer;
2use crate::functions::lua_l_checkinteger::lua_l_checkinteger;
3use crate::functions::lua_pushinteger_64::lua_pushinteger_64;
4use crate::macros::isoutofbounds::isoutofbounds;
5use crate::macros::lua_l_error::luaL_error;
6use crate::type_aliases::lua_state::lua_State;
7use luaur_common::macros::luau_big_endian::LUAU_BIG_ENDIAN;
8
9use crate::functions::buffer_swapbe::buffer_swapbe;
10
11#[allow(non_snake_case)]
12pub unsafe fn buffer_readlong(L: *mut lua_State) -> core::ffi::c_int {
13    let mut len: usize = 0;
14    let buf = lua_l_checkbuffer(L, 1, &mut len);
15    let offset = lua_l_checkinteger(L, 2);
16
17    if isoutofbounds(offset, len, core::mem::size_of::<u64>()) {
18        luaL_error!(L, "buffer access out of bounds");
19    }
20
21    let mut val: u64 = 0;
22    core::ptr::copy_nonoverlapping(
23        (buf as *const u8).add(offset as usize),
24        &mut val as *mut u64 as *mut u8,
25        core::mem::size_of::<u64>(),
26    );
27
28    if LUAU_BIG_ENDIAN {
29        val = buffer_swapbe(val);
30    }
31
32    lua_pushinteger_64(L, val as i64);
33    1
34}
luaur_vm/functions/buffer_readlong.rs

luaur_vm/functions/
buffer_readlong.rs
