Skip to main content

luaur_vm/functions/
buffer_writeinteger.rs

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