luaur_vm/functions/
lua_getmetatable.rs

1use core::ffi::c_int;
2
3use crate::enums::lua_type::lua_Type;
4use crate::functions::index_2_addr::index2addr;
5use crate::functions::lua_concat::lua_c_threadbarrier_lapi;
6use crate::macros::api_incr_top::api_incr_top;
7use crate::macros::hvalue::hvalue;
8use crate::macros::objectvalue::objectvalue;
9use crate::macros::sethvalue::sethvalue;
10use crate::macros::ttype::ttype;
11use crate::macros::uvalue::uvalue;
12use crate::records::lua_state::lua_State;
13use crate::records::lua_table::LuaTable;
14use crate::type_aliases::stk_id::StkId;
15
16#[allow(non_snake_case)]
17pub unsafe fn lua_getmetatable(L: *mut lua_State, objindex: c_int) -> c_int {
18    lua_c_threadbarrier_lapi(L);
19
20    let mut mt: *mut LuaTable = core::ptr::null_mut();
21    let obj: StkId = index2addr(L, objindex);
22
23    match ttype!(obj) {
24        x if x == lua_Type::LUA_TTABLE as c_int => {
25            mt = (*hvalue!(obj)).metatable;
26        }
27        x if x == lua_Type::LUA_TUSERDATA as c_int => {
28            mt = (*uvalue!(obj)).metatable;
29        }
30        x if x == lua_Type::LUA_TOBJECT as c_int => {
31            mt = (*(*objectvalue!(obj)).lclass).instancemetatable;
32        }
33        _ => {
34            mt = (*(*L).global).mt[ttype!(obj) as usize];
35        }
36    }
37
38    if !mt.is_null() {
39        sethvalue!(L, (*L).top, mt);
40        api_incr_top!(L);
41    }
42
43    (!mt.is_null()) as c_int
44}
luaur_vm/functions/lua_getmetatable.rs

luaur_vm/functions/
lua_getmetatable.rs
