107 lines
2.3 KiB
C
107 lines
2.3 KiB
C
|
#include "api.h"
|
||
|
|
#include "renderer.h"
|
||
|
|
#include "rencache.h"
|
||
|
|
|
||
|
|
|
||
|
|
static RenColor checkcolor(lua_State *L, int idx, int def) {
|
||
|
|
RenColor color;
|
||
|
|
if (lua_isnoneornil(L, idx)) {
|
||
|
|
return (RenColor) { def, def, def, 255 };
|
||
|
|
}
|
||
|
|
lua_rawgeti(L, idx, 1);
|
||
|
|
lua_rawgeti(L, idx, 2);
|
||
|
|
lua_rawgeti(L, idx, 3);
|
||
|
|
lua_rawgeti(L, idx, 4);
|
||
|
|
color.r = luaL_checknumber(L, -4);
|
||
|
|
color.g = luaL_checknumber(L, -3);
|
||
|
|
color.b = luaL_checknumber(L, -2);
|
||
|
|
color.a = luaL_optnumber(L, -1, 255);
|
||
|
|
lua_pop(L, 4);
|
||
|
|
return color;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static int f_show_debug(lua_State *L) {
|
||
|
|
luaL_checkany(L, 1);
|
||
|
|
rencache_show_debug(lua_toboolean(L, 1));
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static int f_get_size(lua_State *L) {
|
||
|
|
int w, h;
|
||
|
|
ren_get_size(&w, &h);
|
||
|
|
lua_pushnumber(L, w);
|
||
|
|
lua_pushnumber(L, h);
|
||
|
|
return 2;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static int f_begin_frame(lua_State *L) {
|
||
|
|
rencache_begin_frame();
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static int f_end_frame(lua_State *L) {
|
||
|
|
rencache_end_frame();
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static int f_set_clip_rect(lua_State *L) {
|
||
|
|
RenRect rect;
|
||
|
|
rect.x = luaL_checknumber(L, 1);
|
||
|
|
rect.y = luaL_checknumber(L, 2);
|
||
|
|
rect.width = luaL_checknumber(L, 3);
|
||
|
|
rect.height = luaL_checknumber(L, 4);
|
||
|
|
rencache_set_clip_rect(rect);
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static int f_draw_rect(lua_State *L) {
|
||
|
|
RenRect rect;
|
||
|
|
rect.x = luaL_checknumber(L, 1);
|
||
|
|
rect.y = luaL_checknumber(L, 2);
|
||
|
|
rect.width = luaL_checknumber(L, 3);
|
||
|
|
rect.height = luaL_checknumber(L, 4);
|
||
|
|
RenColor color = checkcolor(L, 5, 255);
|
||
|
|
rencache_draw_rect(rect, color);
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static int f_draw_text(lua_State *L) {
|
||
|
|
RenFont **font = luaL_checkudata(L, 1, API_TYPE_FONT);
|
||
|
|
const char *text = luaL_checkstring(L, 2);
|
||
|
|
int x = luaL_checknumber(L, 3);
|
||
|
|
int y = luaL_checknumber(L, 4);
|
||
|
|
RenColor color = checkcolor(L, 5, 255);
|
||
|
|
x = rencache_draw_text(*font, text, x, y, color);
|
||
|
|
lua_pushnumber(L, x);
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static const luaL_Reg lib[] = {
|
||
|
|
{ "show_debug", f_show_debug },
|
||
|
|
{ "get_size", f_get_size },
|
||
|
|
{ "begin_frame", f_begin_frame },
|
||
|
|
{ "end_frame", f_end_frame },
|
||
|
|
{ "set_clip_rect", f_set_clip_rect },
|
||
|
|
{ "draw_rect", f_draw_rect },
|
||
|
|
{ "draw_text", f_draw_text },
|
||
|
|
{ NULL, NULL }
|
||
|
|
};
|
||
|
|
|
||
|
|
|
||
|
|
int luaopen_renderer_font(lua_State *L);
|
||
|
|
|
||
|
|
int luaopen_renderer(lua_State *L) {
|
||
|
|
luaL_newlib(L, lib);
|
||
|
|
luaopen_renderer_font(L);
|
||
|
|
lua_setfield(L, -2, "font");
|
||
|
|
return 1;
|
||
|
|
}
|