luaur_vm/functions/
lua_tolstring.rs1use core::ffi::{c_char, c_int};
2
3use crate::functions::index_2_addr::index2addr;
4use crate::functions::lua_concat::lua_c_threadbarrier_lapi;
5use crate::functions::lua_v_tostring::lua_v_tostring;
6use crate::macros::lua_c_check_gc::luaC_checkGC;
7use crate::macros::svalue::svalue;
8use crate::macros::tsvalue::tsvalue;
9use crate::macros::ttisstring::ttisstring;
10use crate::records::lua_state::lua_State;
11use crate::type_aliases::stk_id::StkId;
12
13#[allow(non_snake_case)]
14pub unsafe fn lua_tolstring(L: *mut lua_State, idx: c_int, len: *mut usize) -> *const c_char {
15 let mut o: StkId = index2addr(L, idx);
16
17 if !ttisstring!(o) {
18 lua_c_threadbarrier_lapi(L);
19 if lua_v_tostring(L, o) == 0 {
20 if !len.is_null() {
21 *len = 0;
22 }
23 return core::ptr::null();
24 }
25 luaC_checkGC!(L);
26 o = index2addr(L, idx);
27 }
28
29 if !len.is_null() {
30 *len = (*tsvalue!(o)).len as usize;
31 }
32
33 svalue!(o)
34}