1use std::os::raw::{c_char, c_int, c_void};
4use std::ptr;
5
6use super::lua::{self, lua_CFunction, lua_Integer, lua_Number, lua_State};
7
8pub const LUA_ERRFILE: c_int = lua::LUA_ERRERR + 1;
10
11#[repr(C)]
12pub struct luaL_Reg {
13 pub name: *const c_char,
14 pub func: lua_CFunction,
15}
16
17extern "C" {
18 pub fn luaL_register(L: *mut lua_State, libname: *const c_char, l: *const luaL_Reg);
19 #[link_name = "luaL_getmetafield"]
20 pub fn luaL_getmetafield_(L: *mut lua_State, obj: c_int, e: *const c_char) -> c_int;
21 pub fn luaL_callmeta(L: *mut lua_State, obj: c_int, e: *const c_char) -> c_int;
22 pub fn luaL_typerror(L: *mut lua_State, narg: c_int, tname: *const c_char) -> c_int;
23 pub fn luaL_argerror(L: *mut lua_State, narg: c_int, extramsg: *const c_char) -> c_int;
24 pub fn luaL_checklstring(L: *mut lua_State, narg: c_int, l: *mut usize) -> *const c_char;
25 pub fn luaL_optlstring(
26 L: *mut lua_State,
27 narg: c_int,
28 def: *const c_char,
29 l: *mut usize,
30 ) -> *const c_char;
31 pub fn luaL_checknumber(L: *mut lua_State, narg: c_int) -> lua_Number;
32 pub fn luaL_optnumber(L: *mut lua_State, narg: c_int, def: lua_Number) -> lua_Number;
33 pub fn luaL_checkinteger(L: *mut lua_State, narg: c_int) -> lua_Integer;
34 pub fn luaL_optinteger(L: *mut lua_State, narg: c_int, def: lua_Integer) -> lua_Integer;
35 #[link_name = "luaL_checkstack"]
36 pub fn luaL_checkstack_(L: *mut lua_State, sz: c_int, msg: *const c_char);
37 pub fn luaL_checktype(L: *mut lua_State, narg: c_int, t: c_int);
38 pub fn luaL_checkany(L: *mut lua_State, narg: c_int);
39
40 #[link_name = "luaL_newmetatable"]
41 pub fn luaL_newmetatable_(L: *mut lua_State, tname: *const c_char) -> c_int;
42 pub fn luaL_checkudata(L: *mut lua_State, ud: c_int, tname: *const c_char) -> *mut c_void;
43
44 pub fn luaL_where(L: *mut lua_State, lvl: c_int);
45 pub fn luaL_error(L: *mut lua_State, fmt: *const c_char, ...) -> !;
46
47 pub fn luaL_checkoption(
48 L: *mut lua_State,
49 narg: c_int,
50 def: *const c_char,
51 lst: *const *const c_char,
52 ) -> c_int;
53}
54
55pub const LUA_NOREF: c_int = -2;
57pub const LUA_REFNIL: c_int = -1;
58
59extern "C" {
60 pub fn luaL_ref(L: *mut lua_State, t: c_int) -> c_int;
61 pub fn luaL_unref(L: *mut lua_State, t: c_int, r#ref: c_int);
62
63 pub fn luaL_loadfile(L: *mut lua_State, filename: *const c_char) -> c_int;
64 pub fn luaL_loadbuffer(
65 L: *mut lua_State,
66 buff: *const c_char,
67 sz: usize,
68 name: *const c_char,
69 ) -> c_int;
70 pub fn luaL_loadstring(L: *mut lua_State, s: *const c_char) -> c_int;
71
72 pub fn luaL_newstate() -> *mut lua_State;
73
74 pub fn luaL_gsub(
75 L: *mut lua_State,
76 s: *const c_char,
77 p: *const c_char,
78 r: *const c_char,
79 ) -> *const c_char;
80
81 pub fn luaL_findtable(
82 L: *mut lua_State,
83 idx: c_int,
84 fname: *const c_char,
85 szhint: c_int,
86 ) -> *const c_char;
87}
88
89#[inline(always)]
94pub unsafe fn luaL_argcheck(L: *mut lua_State, cond: c_int, narg: c_int, extramsg: *const c_char) {
95 if cond == 0 {
96 luaL_argerror(L, narg, extramsg);
97 }
98}
99
100#[inline(always)]
101pub unsafe fn luaL_checkstring(L: *mut lua_State, n: c_int) -> *const c_char {
102 luaL_checklstring(L, n, ptr::null_mut())
103}
104
105#[inline(always)]
106pub unsafe fn luaL_optstring(L: *mut lua_State, n: c_int, d: *const c_char) -> *const c_char {
107 luaL_optlstring(L, n, d, ptr::null_mut())
108}
109
110#[inline(always)]
113pub unsafe fn luaL_typename(L: *mut lua_State, i: c_int) -> *const c_char {
114 lua::lua_typename(L, lua::lua_type(L, i))
115}
116
117pub unsafe fn luaL_dofile(L: *mut lua_State, filename: *const c_char) -> c_int {
118 let status = luaL_loadfile(L, filename);
119 if status == 0 {
120 lua::lua_pcall(L, 0, lua::LUA_MULTRET, 0)
121 } else {
122 status
123 }
124}
125
126#[inline(always)]
127pub unsafe fn luaL_dostring(L: *mut lua_State, s: *const c_char) -> c_int {
128 let status = luaL_loadstring(L, s);
129 if status == 0 {
130 lua::lua_pcall(L, 0, lua::LUA_MULTRET, 0)
131 } else {
132 status
133 }
134}
135
136#[inline(always)]
137pub unsafe fn luaL_getmetatable(L: *mut lua_State, n: *const c_char) {
138 lua::lua_getfield_(L, lua::LUA_REGISTRYINDEX, n);
139}
140
141