breakhack/src/map_lua.c

162 lines
3.1 KiB
C
Raw Normal View History

2017-12-02 23:32:40 +01:00
#include <stdio.h>
2017-12-05 08:13:28 +01:00
#include <stdbool.h>
2017-12-02 23:32:40 +01:00
#include <lua.h>
#include <lualib.h>
#include <lauxlib.h>
#include "map_lua.h"
#include "util.h"
static
lua_State* load_lua_state()
{
lua_State *L = luaL_newstate();
luaL_openlibs(L);
return L;
}
static
int l_create_map(lua_State *L)
{
Map *map = map_create();
lua_pushlightuserdata(L, map);
return 1;
}
static
Map* luaL_checkmap(lua_State *L, int index)
{
Map *map;
if (!lua_islightuserdata(L, index))
fatal("in luaL_checkmap(), pointer lost in lua script");
map = lua_touserdata(L, index);
if (map == NULL)
fatal("in luaL_checkmap(), bad map pointer");
return map;
}
static
SDL_Renderer* luaL_checksdlrenderer(lua_State *L)
{
SDL_Renderer *renderer;
lua_getglobal(L, "_sdl_renderer");
if (!lua_islightuserdata(L, -1))
fatal("in luaL_checksdlrenderer(), pointer lost in lua script");
renderer = lua_touserdata(L, -1);
if (renderer == NULL)
fatal("in luaL_checksdlrenderer(), bad SDL_Renderer pointer");
return renderer;
}
2017-12-05 08:13:28 +01:00
static
int l_map_set_current_room(lua_State *L)
{
Map *map;
unsigned int room_x, room_y;
map = luaL_checkmap(L, 1);
room_x = luaL_checkinteger(L, 2);
room_y = luaL_checkinteger(L, 3);
map->currentRoom = (Position) { room_x, room_y };
2017-12-05 08:13:28 +01:00
return 0;
}
2017-12-02 23:32:40 +01:00
static
int l_add_texture(lua_State *L)
{
Map *map;
const char *path;
int index;
map = luaL_checkmap(L, 1);
path = luaL_checkstring(L, 2);
SDL_Renderer *renderer = luaL_checksdlrenderer(L);
index = map_add_texture(map, path, renderer);
lua_pushinteger(L, index);
return 1;
}
static
int l_add_tile(lua_State *L)
{
Map *map;
2017-12-05 08:13:28 +01:00
int tile_x, tile_y;
2017-12-02 23:32:40 +01:00
int texture_index, tile_clip_x, tile_clip_y;
2017-12-05 08:13:28 +01:00
bool collider;
2017-12-02 23:32:40 +01:00
map = luaL_checkmap(L, 1);
2017-12-05 08:13:28 +01:00
tile_x = luaL_checkinteger(L, 2);
tile_y = luaL_checkinteger(L, 3);
texture_index = luaL_checkinteger(L, 4);
tile_clip_x = luaL_checkinteger(L, 5);
tile_clip_y = luaL_checkinteger(L, 6);
collider = lua_toboolean(L, 7);
2017-12-02 23:32:40 +01:00
Position tilePos = (Position) { tile_x, tile_y };
SDL_Rect clip = (SDL_Rect) { tile_clip_x, tile_clip_y, 16, 16 };
MapTile *tile = malloc(sizeof(MapTile));
2017-12-05 08:13:28 +01:00
*tile = (MapTile) { texture_index, clip, collider };
2017-12-02 23:32:40 +01:00
2017-12-05 08:13:28 +01:00
map_add_tile(map, &tilePos, tile);
2017-12-02 23:32:40 +01:00
return 0;
}
Map* map_lua_generator_run(SDL_Renderer *renderer)
{
int status, result;
char file[] = "data/mapgen.lua";
printf("[**] Running lua script: %s\n", file);
lua_State *L = load_lua_state();
status = luaL_loadfile(L, file);
if (status) {
fprintf(stderr, "[!!] Couldn't load file: %s\n", lua_tostring(L, -1));
exit(-1);
}
// Present stuff to lua
lua_pushlightuserdata(L, renderer);
lua_setglobal(L, "_sdl_renderer");
lua_pushcfunction(L, l_create_map);
lua_setglobal(L, "create_map");
lua_pushcfunction(L, l_add_tile);
lua_setglobal(L, "add_tile");
lua_pushcfunction(L, l_add_texture);
lua_setglobal(L, "add_texture");
2017-12-05 08:13:28 +01:00
lua_pushcfunction(L, l_map_set_current_room);
lua_setglobal(L, "set_current_room");
2017-12-02 23:32:40 +01:00
result = lua_pcall(L, 0, LUA_MULTRET, 0);
if (result) {
2017-12-06 17:00:51 +01:00
fprintf(stderr, "[!!] Failed to run script: %s\n",
lua_tostring(L, -1));
2017-12-02 23:32:40 +01:00
exit(-1);
}
lua_getglobal(L, "map");
Map *map = lua_touserdata(L, 1);
lua_close(L);
printf("[**] Done\n");
return map;
}