Skip to main content

luaur_vm/functions/
buffer_writestring.rs

1use crate::functions::lua_l_checkbuffer::lua_l_checkbuffer;
2use crate::functions::lua_l_checkinteger::lua_l_checkinteger;
3use crate::functions::lua_l_checklstring::lua_l_checklstring;
4use crate::functions::lua_l_optinteger::lua_l_optinteger;
5use crate::macros::isoutofbounds::isoutofbounds;
6use crate::macros::lua_l_argcheck::luaL_argcheck;
7use crate::macros::lua_l_error::luaL_error;
8use crate::type_aliases::lua_state::lua_State;
9use core::ffi::c_int;
10
11pub unsafe fn buffer_writestring(L: *mut lua_State) -> c_int {
12    let mut len: usize = 0;
13    let buf = lua_l_checkbuffer(L, 1, &mut len);
14    let offset = lua_l_checkinteger(L, 2);
15
16    let mut size: usize = 0;
17    let val = lua_l_checklstring(L, 3, &mut size);
18    let count = lua_l_optinteger(L, 4, size as c_int);
19
20    luaL_argcheck!(L, count >= 0, 4, "count");
21
22    if count as usize > size {
23        luaL_error!(L, "string length overflow");
24    }
25
26    if isoutofbounds(offset, len, count as usize) {
27        luaL_error!(L, "buffer access out of bounds");
28    }
29
30    core::ptr::copy_nonoverlapping(
31        val,
32        (buf as *mut core::ffi::c_char).add(offset as usize),
33        count as usize,
34    );
35
36    0
37}