Skip to main content

luaur_vm/functions/
lua_rawgetfield.rs

1use 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_h_getstr::lua_h_getstr;
6use crate::macros::api_check::api_check;
7use crate::macros::api_incr_top::api_incr_top;
8use crate::macros::hvalue::hvalue;
9use crate::macros::lua_s_new::luaS_new;
10use crate::macros::setobj_2_s::setobj2s;
11use crate::macros::setsvalue::setsvalue;
12use crate::macros::tsvalue::tsvalue;
13use crate::macros::ttistable::ttistable;
14use crate::macros::ttype::ttype;
15use crate::records::lua_state::lua_State;
16use crate::type_aliases::stk_id::StkId;
17use crate::type_aliases::t_value::TValue;
18
19#[allow(non_snake_case)]
20pub unsafe fn lua_rawgetfield(L: *mut lua_State, idx: c_int, k: *const c_char) -> c_int {
21    lua_c_threadbarrier_lapi(L);
22
23    let t: StkId = index2addr(L, idx);
24    api_check!(L, ttistable!(t));
25
26    let mut key = TValue::default();
27    setsvalue!(L, &mut key, luaS_new(L, k));
28    setobj2s!(
29        L,
30        (*L).top,
31        lua_h_getstr(hvalue!(t), tsvalue!(&key) as *mut _)
32    );
33    api_incr_top!(L);
34
35    ttype!((*L).top.sub(1))
36}