diff options
| author | chai <chaifix@163.com> | 2018-05-16 15:02:43 +0800 |
|---|---|---|
| committer | chai <chaifix@163.com> | 2018-05-16 15:02:43 +0800 |
| commit | fdaf0e7eb6b9d9bdd7d5ab5f814f4ebbf791ff67 (patch) | |
| tree | 6b9712381d6bce07554491acf900ec4b27e6ecb0 /src/lua | |
v0.1.0
Diffstat (limited to 'src/lua')
33 files changed, 2188 insertions, 0 deletions
diff --git a/src/lua/audio/luaopen_Sound.cpp b/src/lua/audio/luaopen_Sound.cpp new file mode 100644 index 0000000..0b494b8 --- /dev/null +++ b/src/lua/audio/luaopen_Sound.cpp @@ -0,0 +1,25 @@ +#include "libs/luax/luax.h" + +namespace jin +{ +namespace lua +{ + + static int l_play(lua_State* L) + { + + return 0; + } + + static const luaL_Reg f[] = { + {"play", l_play}, + {0, 0} + }; + + int luaopen_Sound(lua_State* L) + { + + return 1; + } +} +} diff --git a/src/lua/audio/luaopen_audio.cpp b/src/lua/audio/luaopen_audio.cpp new file mode 100644 index 0000000..1378f89 --- /dev/null +++ b/src/lua/audio/luaopen_audio.cpp @@ -0,0 +1,32 @@ +#include "libs/luax/luax.h" +#include "audio/audio.h" + +namespace jin +{ +namespace lua +{ + static int l_init(lua_State* L) + { + + return 0; + } + + static int l_newSound(lua_State* L) + { + + return 0; + } + + static const luaL_Reg f[] = { + {"init", l_init}, + {"Sound", l_newSound}, + {0, 0} + }; + + int luaopen_audio(lua_State* L) + { + + return 1; + } +} +}
\ No newline at end of file diff --git a/src/lua/core/luaopen_core.cpp b/src/lua/core/luaopen_core.cpp new file mode 100644 index 0000000..42de91b --- /dev/null +++ b/src/lua/core/luaopen_core.cpp @@ -0,0 +1,34 @@ +#include "libs/luax/luax.h" +#include "core/game.h" +using namespace jin::core; +namespace jin +{ +namespace lua +{ + static int l_running(lua_State* L) + { + bool r = Game::get()->running(); + luax_pushboolean(L, r); + return 1; + } + + static int l_quit(lua_State* L) + { + Game::get()->quit(); + return 0; + } + + static const luaL_Reg f[] = { + {"running", l_running}, + {"quit", l_quit}, + {0, 0} + }; + + int luaopen_core(lua_State* L) + { + luax_newlib(L, f); + + return 1; + } +} +}
\ No newline at end of file diff --git a/src/lua/debug/luaopen_debug.cpp b/src/lua/debug/luaopen_debug.cpp new file mode 100644 index 0000000..658899f --- /dev/null +++ b/src/lua/debug/luaopen_debug.cpp @@ -0,0 +1,9 @@ +namespace jin +{ +namespace debug +{ + + + +} +}
\ No newline at end of file diff --git a/src/lua/embed/boot.lua b/src/lua/embed/boot.lua new file mode 100644 index 0000000..6f846ae --- /dev/null +++ b/src/lua/embed/boot.lua @@ -0,0 +1,132 @@ +--[[ + program entry +]] + +local function _onEvent(e) + -- update keyboard status + if e.type == "keydown" then + jin.keyboard.set(e.key, true) + elseif e.type == "keyup" then + jin.keyboard.set(e.key, false) + end + + -- call user onEvent function + if jin.core.onEvent then + jin.core.onEvent(e) + end +end + +------------------------------------------------- +-- init file system +------------------------------------------------- +jin._argv[2] = jin._argv[2] or '.' +jin.filesystem.init() +jin.filesystem.mount(jin._argv[2]) + +-- config +local conf = {} +if jin.filesystem.exist("config.lua") then + conf = require "config" +end +conf.width = conf.width or 600 +conf.height = conf.height or 500 +conf.fps = conf.fps or 60 +conf.title = conf.title or ("jin v" .. jin.version()) + +-- init video subsystem +jin.graphics.init(conf.width,conf.height,conf.title) + +-- open debug mode, must after jin.graphics.init +if jin._argv[3] == '-d' then + jin.debug.init() +end + +function jin.core.run() + local now = jin.time.second() + local last = now + local fsec = 1/conf.fps + -- for loading resources + if jin.core.load then + jin.core.load() + end + local dt = 0 + while(jin.core.running()) do + -- frame controle + last = now + now = jin.time.second() + if (now - last) < fsec then + jin.time.sleep(fsec - now + last) + end + + -- handle events + for _, e in pairs(jin.event.poll()) do + if _onEvent then + _onEvent(e) + end + end + + -- update + dt = now - last + if dt < fsec then + dt = fsec + end + if jin.core.onUpdate then + jin.core.onUpdate(dt) + end + + -- bind to default render buffer + jin.graphics.bind() + jin.graphics.clear() + jin.graphics.color() + jin.graphics.study() + + -- custom drawing + if jin.core.onDraw then + jin.core.onDraw() + end + + -- render debug window + if jin.debug.status() then + jin.debug.render() + end + + -- swap window buffer + jin.graphics.present() + + end +end + +local function onError(msg) + local tab = ' ' + print("Error:\n" .. msg) + function jin.core.onEvent(e) + if e.type == 'quit' then + jin.core.quit() + end + end + local ww, wh = jin.graphics.size() + function jin.core.onDraw() + jin.graphics.write("Error: ", 10, 10, 30, 3, 30) + jin.graphics.write(msg, 10, 50) + end +end + +if jin.filesystem.exist("main.lua") then + -- require main game script + xpcall(function() require"main" end, onError) + jin.core.run() +else + -- no game + function jin.core.onEvent(e) + if e.type == 'quit' then + jin.core.quit() + end + end + function jin.core.onDraw() + jin.graphics.clear(111, 134, 125, 255) + local ww, wh = jin.graphics.size() + local fw, fh = jin.graphics.box("no game", 20, 1, 20) + jin.graphics.write("no game", ww /2 - fw / 2, wh * 2/3, 16, 1, 18) + end + jin.core.run() +end diff --git a/src/lua/embed/boot.lua.h b/src/lua/embed/boot.lua.h new file mode 100644 index 0000000..e1b8b34 --- /dev/null +++ b/src/lua/embed/boot.lua.h @@ -0,0 +1,143 @@ +/* boot.lua */ +static const char boot_lua[] = +{45,45,91,91,32,13,10,32,32,32,32,112,114,111,103,114,97,109,32,101,110,116, +114,121,13,10,93,93,32,32,13,10,13,10,108,111,99,97,108,32,102,117,110,99,116, +105,111,110,32,95,111,110,69,118,101,110,116,40,101,41,32,13,10,32,32,32,32, +45,45,32,117,112,100,97,116,101,32,107,101,121,98,111,97,114,100,32,115,116, +97,116,117,115,32,13,10,32,32,32,32,105,102,32,101,46,116,121,112,101,32,61, +61,32,34,107,101,121,100,111,119,110,34,32,116,104,101,110,32,13,10,32,32,32, +32,32,32,32,32,106,105,110,46,107,101,121,98,111,97,114,100,46,115,101,116,40, +101,46,107,101,121,44,32,116,114,117,101,41,32,13,10,32,32,32,32,101,108,115, +101,105,102,32,101,46,116,121,112,101,32,61,61,32,34,107,101,121,117,112,34, +32,116,104,101,110,32,13,10,32,32,32,32,32,32,32,32,106,105,110,46,107,101, +121,98,111,97,114,100,46,115,101,116,40,101,46,107,101,121,44,32,102,97,108, +115,101,41,13,10,32,32,32,32,101,110,100,32,13,10,13,10,32,32,32,32,45,45,32, +99,97,108,108,32,117,115,101,114,32,111,110,69,118,101,110,116,32,102,117,110, +99,116,105,111,110,32,13,10,32,32,32,32,105,102,32,106,105,110,46,99,111,114, +101,46,111,110,69,118,101,110,116,32,116,104,101,110,32,13,10,32,32,32,32,32, +32,32,32,106,105,110,46,99,111,114,101,46,111,110,69,118,101,110,116,40,101, +41,32,13,10,32,32,32,32,101,110,100,13,10,101,110,100,32,13,10,13,10,45,45,45, +45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45, +45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,13,10,45,45,32, +105,110,105,116,32,102,105,108,101,32,115,121,115,116,101,109,32,13,10,45,45, +45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45, +45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,13,10,106,105, +110,46,95,97,114,103,118,91,50,93,32,61,32,106,105,110,46,95,97,114,103,118, +91,50,93,32,111,114,32,39,46,39,13,10,106,105,110,46,102,105,108,101,115,121, +115,116,101,109,46,105,110,105,116,40,41,13,10,106,105,110,46,102,105,108,101, +115,121,115,116,101,109,46,109,111,117,110,116,40,106,105,110,46,95,97,114, +103,118,91,50,93,41,13,10,13,10,45,45,32,99,111,110,102,105,103,13,10,108,111, +99,97,108,32,99,111,110,102,32,61,32,123,125,32,13,10,105,102,32,106,105,110, +46,102,105,108,101,115,121,115,116,101,109,46,101,120,105,115,116,40,34,99, +111,110,102,105,103,46,108,117,97,34,41,32,116,104,101,110,32,13,10,9,99,111, +110,102,32,61,32,114,101,113,117,105,114,101,32,34,99,111,110,102,105,103,34, +9,13,10,101,110,100,32,13,10,99,111,110,102,46,119,105,100,116,104,32,61,32, +99,111,110,102,46,119,105,100,116,104,32,111,114,32,54,48,48,32,13,10,99,111, +110,102,46,104,101,105,103,104,116,32,61,32,99,111,110,102,46,104,101,105,103, +104,116,32,111,114,32,53,48,48,32,13,10,99,111,110,102,46,102,112,115,32,61, +32,99,111,110,102,46,102,112,115,32,111,114,32,54,48,13,10,99,111,110,102,46, +116,105,116,108,101,32,61,32,99,111,110,102,46,116,105,116,108,101,32,111,114, +32,40,34,106,105,110,32,118,34,32,46,46,32,106,105,110,46,118,101,114,115,105, +111,110,40,41,41,13,10,13,10,45,45,32,105,110,105,116,32,118,105,100,101,111, +32,115,117,98,115,121,115,116,101,109,32,13,10,106,105,110,46,103,114,97,112, +104,105,99,115,46,105,110,105,116,40,99,111,110,102,46,119,105,100,116,104,44, +99,111,110,102,46,104,101,105,103,104,116,44,99,111,110,102,46,116,105,116, +108,101,41,13,10,13,10,45,45,32,111,112,101,110,32,100,101,98,117,103,32,109, +111,100,101,44,32,109,117,115,116,32,97,102,116,101,114,32,106,105,110,46,103, +114,97,112,104,105,99,115,46,105,110,105,116,13,10,105,102,32,106,105,110,46, +95,97,114,103,118,91,51,93,32,61,61,32,39,45,100,39,32,116,104,101,110,32,13, +10,9,106,105,110,46,100,101,98,117,103,46,105,110,105,116,40,41,13,10,101,110, +100,13,10,13,10,102,117,110,99,116,105,111,110,32,106,105,110,46,99,111,114, +101,46,114,117,110,40,41,13,10,32,32,32,32,108,111,99,97,108,32,110,111,119, +32,61,32,106,105,110,46,116,105,109,101,46,115,101,99,111,110,100,40,41,13,10, +32,32,32,32,108,111,99,97,108,32,108,97,115,116,32,61,32,110,111,119,13,10,32, +32,32,32,108,111,99,97,108,32,102,115,101,99,32,61,32,49,47,99,111,110,102,46, +102,112,115,13,10,32,32,32,32,45,45,32,102,111,114,32,108,111,97,100,105,110, +103,32,114,101,115,111,117,114,99,101,115,13,10,32,32,32,32,105,102,32,106, +105,110,46,99,111,114,101,46,108,111,97,100,32,116,104,101,110,32,13,10,32,32, +32,32,32,32,32,32,106,105,110,46,99,111,114,101,46,108,111,97,100,40,41,32,13, +10,32,32,32,32,101,110,100,13,10,32,32,32,32,119,104,105,108,101,40,106,105, +110,46,99,111,114,101,46,114,117,110,110,105,110,103,40,41,41,32,100,111,13, +10,32,32,32,32,32,32,32,32,45,45,32,102,114,97,109,101,32,99,111,110,116,114, +111,108,101,13,10,32,32,32,32,32,32,32,32,108,97,115,116,32,61,32,110,111,119, +13,10,32,32,32,32,32,32,32,32,110,111,119,32,61,32,106,105,110,46,116,105,109, +101,46,115,101,99,111,110,100,40,41,13,10,32,32,32,32,32,32,32,32,105,102,32, +40,110,111,119,32,45,32,108,97,115,116,41,32,60,32,102,115,101,99,32,116,104, +101,110,32,13,10,32,32,32,32,32,32,32,32,32,32,32,32,106,105,110,46,116,105, +109,101,46,115,108,101,101,112,40,102,115,101,99,32,45,32,110,111,119,32,43, +32,108,97,115,116,41,13,10,32,32,32,32,32,32,32,32,101,110,100,13,10,13,10,32, +32,32,32,32,32,32,32,45,45,32,104,97,110,100,108,101,32,101,118,101,110,116, +115,32,32,32,32,32,13,10,32,32,32,32,32,32,32,32,102,111,114,32,95,44,32,101, +32,105,110,32,112,97,105,114,115,40,106,105,110,46,101,118,101,110,116,46,112, +111,108,108,40,41,41,32,100,111,32,13,10,32,32,32,32,32,32,32,32,32,32,32,32, +105,102,32,95,111,110,69,118,101,110,116,32,116,104,101,110,13,10,32,32,32,32, +32,32,32,32,32,32,32,32,32,32,32,32,95,111,110,69,118,101,110,116,40,101,41, +13,10,32,32,32,32,32,32,32,32,32,32,32,32,101,110,100,13,10,32,32,32,32,32,32, +32,32,101,110,100,13,10,13,10,32,32,32,32,32,32,32,32,45,45,32,117,112,100,97, +116,101,13,10,32,32,32,32,32,32,32,32,108,111,99,97,108,32,100,116,32,61,32, +110,111,119,32,45,32,108,97,115,116,13,10,32,32,32,32,32,32,32,32,105,102,32, +100,116,32,60,32,102,115,101,99,32,116,104,101,110,32,13,10,32,32,32,32,32,32, +32,32,32,32,32,32,100,116,32,61,32,102,115,101,99,32,13,10,32,32,32,32,32,32, +32,32,101,110,100,13,10,32,32,32,32,32,32,32,32,105,102,32,106,105,110,46,99, +111,114,101,46,111,110,85,112,100,97,116,101,32,116,104,101,110,13,10,32,32, +32,32,32,32,32,32,32,32,32,32,106,105,110,46,99,111,114,101,46,111,110,85,112, +100,97,116,101,40,100,116,41,13,10,32,32,32,32,32,32,32,32,101,110,100,13,10, +32,32,32,32,32,32,32,32,13,10,9,9,45,45,32,98,105,110,100,32,116,111,32,100, +101,102,97,117,108,116,32,114,101,110,100,101,114,32,98,117,102,102,101,114, +32,13,10,9,9,106,105,110,46,103,114,97,112,104,105,99,115,46,98,105,110,100, +40,41,32,13,10,9,9,106,105,110,46,103,114,97,112,104,105,99,115,46,99,108,101, +97,114,40,41,32,13,10,9,9,106,105,110,46,103,114,97,112,104,105,99,115,46,99, +111,108,111,114,40,41,13,10,9,9,106,105,110,46,103,114,97,112,104,105,99,115, +46,115,116,117,100,121,40,41,13,10,13,10,9,9,45,45,32,99,117,115,116,111,109, +32,100,114,97,119,105,110,103,13,10,9,9,105,102,32,106,105,110,46,99,111,114, +101,46,111,110,68,114,97,119,32,116,104,101,110,32,13,10,32,32,32,32,32,32,32, +32,32,32,32,32,106,105,110,46,99,111,114,101,46,111,110,68,114,97,119,40,41, +32,13,10,32,32,32,32,32,32,32,32,101,110,100,13,10,9,9,13,10,9,9,45,45,32,114, +101,110,100,101,114,32,100,101,98,117,103,32,119,105,110,100,111,119,13,10,9, +9,105,102,32,106,105,110,46,100,101,98,117,103,46,115,116,97,116,117,115,40, +41,32,116,104,101,110,32,13,10,9,9,9,106,105,110,46,100,101,98,117,103,46,114, +101,110,100,101,114,40,41,13,10,9,9,101,110,100,32,9,9,13,10,13,10,32,32,32, +32,32,32,32,32,45,45,32,115,119,97,112,32,119,105,110,100,111,119,32,98,117, +102,102,101,114,32,13,10,32,32,32,32,32,32,32,32,106,105,110,46,103,114,97, +112,104,105,99,115,46,112,114,101,115,101,110,116,40,41,13,10,13,10,32,32,32, +32,101,110,100,13,10,101,110,100,13,10,13,10,108,111,99,97,108,32,102,117,110, +99,116,105,111,110,32,111,110,69,114,114,111,114,40,109,115,103,41,32,13,10,9, +108,111,99,97,108,32,116,97,98,32,61,32,39,32,32,32,32,39,13,10,9,112,114,105, +110,116,40,34,69,114,114,111,114,58,92,110,34,32,46,46,32,109,115,103,41,13, +10,9,102,117,110,99,116,105,111,110,32,106,105,110,46,99,111,114,101,46,111, +110,69,118,101,110,116,40,101,41,32,13,10,9,9,105,102,32,101,46,116,121,112, +101,32,61,61,32,39,113,117,105,116,39,32,116,104,101,110,32,13,10,9,9,9,106, +105,110,46,99,111,114,101,46,113,117,105,116,40,41,13,10,9,9,101,110,100,13, +10,9,101,110,100,13,10,9,108,111,99,97,108,32,119,119,44,32,119,104,32,61,32, +106,105,110,46,103,114,97,112,104,105,99,115,46,115,105,122,101,40,41,32,13, +10,9,102,117,110,99,116,105,111,110,32,106,105,110,46,99,111,114,101,46,111, +110,68,114,97,119,40,41,32,13,10,9,9,106,105,110,46,103,114,97,112,104,105,99, +115,46,119,114,105,116,101,40,34,69,114,114,111,114,58,32,34,44,32,49,48,44, +32,49,48,44,32,51,48,44,32,51,44,32,51,48,41,13,10,9,9,106,105,110,46,103,114, +97,112,104,105,99,115,46,119,114,105,116,101,40,109,115,103,44,32,49,48,44,32, +53,48,41,32,13,10,9,101,110,100,13,10,101,110,100,13,10,13,10,105,102,32,106, +105,110,46,102,105,108,101,115,121,115,116,101,109,46,101,120,105,115,116,40, +34,109,97,105,110,46,108,117,97,34,41,32,116,104,101,110,32,13,10,9,45,45,32, +114,101,113,117,105,114,101,32,109,97,105,110,32,103,97,109,101,32,115,99,114, +105,112,116,13,10,9,120,112,99,97,108,108,40,102,117,110,99,116,105,111,110, +40,41,32,114,101,113,117,105,114,101,34,109,97,105,110,34,32,101,110,100,44, +32,111,110,69,114,114,111,114,41,13,10,9,106,105,110,46,99,111,114,101,46,114, +117,110,40,41,13,10,101,108,115,101,32,13,10,9,45,45,32,110,111,32,103,97,109, +101,32,13,10,9,102,117,110,99,116,105,111,110,32,106,105,110,46,99,111,114, +101,46,111,110,69,118,101,110,116,40,101,41,32,13,10,9,9,105,102,32,101,46, +116,121,112,101,32,61,61,32,39,113,117,105,116,39,32,116,104,101,110,32,13,10, +9,9,9,106,105,110,46,99,111,114,101,46,113,117,105,116,40,41,13,10,9,9,101, +110,100,13,10,9,101,110,100,13,10,9,102,117,110,99,116,105,111,110,32,106,105, +110,46,99,111,114,101,46,111,110,68,114,97,119,40,41,32,13,10,9,9,106,105,110, +46,103,114,97,112,104,105,99,115,46,99,108,101,97,114,40,49,49,49,44,32,49,51, +52,44,32,49,50,53,44,32,50,53,53,41,32,13,10,9,9,108,111,99,97,108,32,119,119, +44,32,119,104,32,61,32,106,105,110,46,103,114,97,112,104,105,99,115,46,115, +105,122,101,40,41,32,13,10,9,9,108,111,99,97,108,32,102,119,44,32,102,104,32, +61,32,106,105,110,46,103,114,97,112,104,105,99,115,46,98,111,120,40,34,110, +111,32,103,97,109,101,34,44,32,50,48,44,32,49,44,32,50,48,41,13,10,9,9,106, +105,110,46,103,114,97,112,104,105,99,115,46,119,114,105,116,101,40,34,110,111, +32,103,97,109,101,34,44,32,119,119,32,47,50,32,45,32,102,119,32,47,32,50,44, +32,119,104,32,42,32,50,47,51,44,32,49,54,44,32,49,44,32,49,56,41,13,10,9,101, +110,100,13,10,9,106,105,110,46,99,111,114,101,46,114,117,110,40,41,13,10,101, +110,100,13,10}; + diff --git a/src/lua/embed/debug.lua b/src/lua/embed/debug.lua new file mode 100644 index 0000000..fbf0967 --- /dev/null +++ b/src/lua/embed/debug.lua @@ -0,0 +1,128 @@ +--[[ + for debug purpose + +-------------------+ + |debug msg old | + |... | + |... | + |... | + |debug msg new | + +-------------------+ +]] + +jin.debug = jin.debug or {} + +-- render panel +local panel = nil + +local debug = false + +-- debug msg buffer +local buffer = {} + +-- configure +local bsize = 10 +local fsize = 15 +local lheight = 18 +local alpha = 220 +local margin = 10 + +-- refresh buffer or not +local refresh = true + +function jin.debug.init() + debug = true + panel = jin.graphics.Canvas(jin.graphics.size()) +end + +-- set buffer size +function jin.debug.size(c) + bsize = c +end + +function jin.debug.print(msg) + if not debug then return end + + msg = tostring(msg) + local tp = type(msg) + if tp ~= "string" and tp ~= "number" then + msg = string.format("print failed, expect string or number but get a %s", tp) + end + + -- remove the first one (old msg) + if #buffer >= bsize then + table.remove(buffer, 1) + end + + buffer[#buffer + 1] = msg + refresh = true +end + +-- clear debug buffer +function jin.debug.clear() + buffer = {} +end + +local function getStrHeight(str, lheight) + local h = lheight + if #str == 0 then + h = 0 + end + for i = 1, #str do + local c = string.sub(str, i, i) + if c == '\n' then + h = h + lheight + end + end + return h +end + +local function getBgQuad() + local width, height = 0, 0 + for i = 1, #buffer do + local w, h = jin.graphics.box( buffer[i], fsize, 1, lheight) + height = height + h + if width < w then + width = w + end + end + return width, height +end + +-- render to screen +function jin.debug.render() + if not debug then return end + + if refresh then + + jin.graphics.bind(panel) + + jin.graphics.clear(0, 0, 0, 0) + + jin.graphics.study() + + local ww, wh = jin.graphics.size() + local bgw, bgh = getBgQuad() + jin.graphics.color(0, 0, 0, alpha) + jin.graphics.rect("fill", 0, wh - bgh - margin, bgw + margin, bgh + margin) + + jin.graphics.color() + local y = wh + for i = #buffer, 1, -1 do + local msg = buffer[i] + local h = getStrHeight(msg, lheight) + y = y - h + jin.graphics.write(msg, margin / 2, y - margin/ 2, fsize, 1, lheight) + end + + jin.graphics.bind() + + refresh = false + end + + jin.graphics.color() + jin.graphics.draw(panel, 0, 0) +end + +function jin.debug.status() + return debug +end diff --git a/src/lua/embed/debug.lua.h b/src/lua/embed/debug.lua.h new file mode 100644 index 0000000..f3838a0 --- /dev/null +++ b/src/lua/embed/debug.lua.h @@ -0,0 +1,125 @@ +/* debug.lua */ +static const char debug_lua[] = +{45,45,91,91,32,13,10,32,32,32,32,102,111,114,32,100,101,98,117,103,32,112,117, +114,112,111,115,101,32,13,10,32,32,32,32,43,45,45,45,45,45,45,45,45,45,45,45, +45,45,45,45,45,45,45,45,43,13,10,32,32,32,32,124,100,101,98,117,103,32,109, +115,103,32,111,108,100,32,32,32,32,32,32,124,13,10,32,32,32,32,124,46,46,46, +32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,124,13,10,32,32,32,32,124,46, +46,46,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,124,13,10,32,32,32,32, +124,46,46,46,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,124,13,10,32,32, +32,32,124,100,101,98,117,103,32,109,115,103,32,110,101,119,32,32,32,32,32,32, +124,13,10,32,32,32,32,43,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45, +45,45,43,13,10,93,93,32,13,10,13,10,106,105,110,46,100,101,98,117,103,32,61, +32,106,105,110,46,100,101,98,117,103,32,111,114,32,123,125,32,13,10,13,10,45, +45,32,114,101,110,100,101,114,32,112,97,110,101,108,32,13,10,108,111,99,97, +108,32,112,97,110,101,108,32,61,32,110,105,108,32,13,10,13,10,108,111,99,97, +108,32,100,101,98,117,103,32,61,32,102,97,108,115,101,13,10,13,10,45,45,32, +100,101,98,117,103,32,109,115,103,32,98,117,102,102,101,114,32,13,10,108,111, +99,97,108,32,98,117,102,102,101,114,32,61,32,123,125,32,13,10,13,10,45,45,32, +99,111,110,102,105,103,117,114,101,32,13,10,108,111,99,97,108,32,98,115,105, +122,101,32,32,32,61,32,49,48,13,10,108,111,99,97,108,32,102,115,105,122,101, +32,32,32,61,32,49,53,13,10,108,111,99,97,108,32,108,104,101,105,103,104,116, +32,61,32,49,56,13,10,108,111,99,97,108,32,97,108,112,104,97,32,32,32,61,32,50, +50,48,13,10,108,111,99,97,108,32,109,97,114,103,105,110,32,32,61,32,49,48,13, +10,13,10,45,45,32,114,101,102,114,101,115,104,32,98,117,102,102,101,114,32, +111,114,32,110,111,116,32,13,10,108,111,99,97,108,32,114,101,102,114,101,115, +104,32,61,32,116,114,117,101,32,13,10,13,10,102,117,110,99,116,105,111,110,32, +106,105,110,46,100,101,98,117,103,46,105,110,105,116,40,41,13,10,32,32,32,32, +100,101,98,117,103,32,61,32,116,114,117,101,13,10,9,112,97,110,101,108,32,61, +32,106,105,110,46,103,114,97,112,104,105,99,115,46,67,97,110,118,97,115,40, +106,105,110,46,103,114,97,112,104,105,99,115,46,115,105,122,101,40,41,41,32, +13,10,101,110,100,13,10,13,10,45,45,32,115,101,116,32,98,117,102,102,101,114, +32,115,105,122,101,32,13,10,102,117,110,99,116,105,111,110,32,106,105,110,46, +100,101,98,117,103,46,115,105,122,101,40,99,41,13,10,9,98,115,105,122,101,32, +61,32,99,13,10,101,110,100,32,13,10,13,10,102,117,110,99,116,105,111,110,32, +106,105,110,46,100,101,98,117,103,46,112,114,105,110,116,40,109,115,103,41,13, +10,9,105,102,32,110,111,116,32,100,101,98,117,103,32,116,104,101,110,32,114, +101,116,117,114,110,32,101,110,100,32,13,10,13,10,9,109,115,103,32,61,32,116, +111,115,116,114,105,110,103,40,109,115,103,41,13,10,9,108,111,99,97,108,32, +116,112,32,61,32,116,121,112,101,40,109,115,103,41,13,10,9,105,102,32,116,112, +32,126,61,32,34,115,116,114,105,110,103,34,32,97,110,100,32,116,112,32,126,61, +32,34,110,117,109,98,101,114,34,32,116,104,101,110,32,13,10,9,9,109,115,103, +32,61,32,115,116,114,105,110,103,46,102,111,114,109,97,116,40,34,112,114,105, +110,116,32,102,97,105,108,101,100,44,32,101,120,112,101,99,116,32,115,116,114, +105,110,103,32,111,114,32,110,117,109,98,101,114,32,98,117,116,32,103,101,116, +32,97,32,37,115,34,44,32,116,112,41,13,10,9,101,110,100,13,10,9,13,10,32,32, +32,32,45,45,32,114,101,109,111,118,101,32,116,104,101,32,102,105,114,115,116, +32,111,110,101,32,40,111,108,100,32,109,115,103,41,13,10,9,105,102,32,35,98, +117,102,102,101,114,32,62,61,32,98,115,105,122,101,32,116,104,101,110,32,13, +10,9,9,116,97,98,108,101,46,114,101,109,111,118,101,40,98,117,102,102,101,114, +44,32,49,41,13,10,9,101,110,100,32,13,10,32,32,32,32,13,10,32,32,32,32,98,117, +102,102,101,114,91,35,98,117,102,102,101,114,32,43,32,49,93,32,61,32,109,115, +103,13,10,32,32,32,32,114,101,102,114,101,115,104,32,61,32,116,114,117,101,13, +10,101,110,100,13,10,13,10,45,45,32,99,108,101,97,114,32,100,101,98,117,103, +32,98,117,102,102,101,114,32,13,10,102,117,110,99,116,105,111,110,32,106,105, +110,46,100,101,98,117,103,46,99,108,101,97,114,40,41,13,10,9,98,117,102,102, +101,114,32,61,32,123,125,32,13,10,101,110,100,13,10,13,10,108,111,99,97,108, +32,102,117,110,99,116,105,111,110,32,103,101,116,83,116,114,72,101,105,103, +104,116,40,115,116,114,44,32,108,104,101,105,103,104,116,41,32,13,10,9,108, +111,99,97,108,32,104,32,61,32,108,104,101,105,103,104,116,13,10,9,105,102,32, +35,115,116,114,32,61,61,32,48,32,116,104,101,110,32,13,10,9,9,104,32,61,32,48, +13,10,9,101,110,100,32,13,10,9,102,111,114,32,105,32,61,32,49,44,32,35,115, +116,114,32,100,111,32,13,10,9,9,108,111,99,97,108,32,99,32,61,32,115,116,114, +105,110,103,46,115,117,98,40,115,116,114,44,32,105,44,32,105,41,13,10,9,9,105, +102,32,99,32,61,61,32,39,92,110,39,32,116,104,101,110,32,13,10,9,9,9,104,32, +61,32,104,32,43,32,108,104,101,105,103,104,116,13,10,9,9,101,110,100,32,13,10, +9,101,110,100,32,13,10,9,114,101,116,117,114,110,32,104,32,13,10,101,110,100, +13,10,13,10,108,111,99,97,108,32,32,102,117,110,99,116,105,111,110,32,103,101, +116,66,103,81,117,97,100,40,41,32,13,10,9,108,111,99,97,108,32,119,105,100, +116,104,44,32,104,101,105,103,104,116,32,61,32,48,44,32,48,32,9,13,10,9,102, +111,114,32,105,32,61,32,49,44,32,35,98,117,102,102,101,114,32,100,111,13,10,9, +9,108,111,99,97,108,32,119,44,32,104,32,61,32,106,105,110,46,103,114,97,112, +104,105,99,115,46,98,111,120,40,32,98,117,102,102,101,114,91,105,93,44,32,102, +115,105,122,101,44,32,49,44,32,108,104,101,105,103,104,116,41,13,10,9,9,104, +101,105,103,104,116,32,61,32,104,101,105,103,104,116,32,43,32,104,32,13,10,9, +9,105,102,32,119,105,100,116,104,32,60,32,119,32,116,104,101,110,13,10,9,9,9, +119,105,100,116,104,32,61,32,119,32,13,10,9,9,101,110,100,32,13,10,9,101,110, +100,9,13,10,9,114,101,116,117,114,110,32,119,105,100,116,104,44,32,104,101, +105,103,104,116,13,10,101,110,100,32,13,10,13,10,45,45,32,114,101,110,100,101, +114,32,116,111,32,115,99,114,101,101,110,13,10,102,117,110,99,116,105,111,110, +32,106,105,110,46,100,101,98,117,103,46,114,101,110,100,101,114,40,41,32,13, +10,32,32,32,32,105,102,32,110,111,116,32,100,101,98,117,103,32,116,104,101, +110,32,114,101,116,117,114,110,32,101,110,100,13,10,32,32,32,32,13,10,32,32, +32,32,105,102,32,114,101,102,114,101,115,104,32,116,104,101,110,32,13,10,32, +32,32,32,32,32,32,13,10,32,32,32,32,32,32,32,32,106,105,110,46,103,114,97,112, +104,105,99,115,46,98,105,110,100,40,112,97,110,101,108,41,13,10,13,10,32,32, +32,32,32,32,32,32,32,32,32,32,106,105,110,46,103,114,97,112,104,105,99,115,46, +99,108,101,97,114,40,48,44,32,48,44,32,48,44,32,48,41,13,10,32,32,32,32,32,32, +32,32,32,32,32,32,13,10,32,32,32,32,32,32,32,32,32,32,32,32,106,105,110,46, +103,114,97,112,104,105,99,115,46,115,116,117,100,121,40,41,13,10,32,32,32,32, +32,32,32,32,32,32,32,32,13,10,32,32,32,32,32,32,32,32,32,32,32,32,108,111,99, +97,108,32,119,119,44,32,119,104,32,61,32,106,105,110,46,103,114,97,112,104, +105,99,115,46,115,105,122,101,40,41,13,10,32,32,32,32,32,32,32,32,32,32,32,32, +108,111,99,97,108,32,98,103,119,44,32,98,103,104,32,61,32,103,101,116,66,103, +81,117,97,100,40,41,13,10,32,32,32,32,32,32,32,32,32,32,32,32,106,105,110,46, +103,114,97,112,104,105,99,115,46,99,111,108,111,114,40,48,44,32,48,44,32,48, +44,32,97,108,112,104,97,41,13,10,32,32,32,32,32,32,32,32,32,32,32,32,106,105, +110,46,103,114,97,112,104,105,99,115,46,114,101,99,116,40,34,102,105,108,108, +34,44,32,48,44,32,119,104,32,45,32,98,103,104,32,45,32,109,97,114,103,105,110, +44,32,98,103,119,32,43,32,109,97,114,103,105,110,44,32,98,103,104,32,43,32, +109,97,114,103,105,110,41,13,10,32,32,32,32,32,32,32,32,32,32,32,32,13,10,32, +32,32,32,32,32,32,32,32,32,32,32,106,105,110,46,103,114,97,112,104,105,99,115, +46,99,111,108,111,114,40,41,13,10,32,32,32,32,32,32,32,32,32,32,32,32,108,111, +99,97,108,32,121,32,61,32,119,104,32,13,10,32,32,32,32,32,32,32,32,32,32,32, +32,102,111,114,32,105,32,61,32,35,98,117,102,102,101,114,44,32,49,44,32,45,49, +32,100,111,13,10,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,108,111,99, +97,108,32,109,115,103,32,61,32,98,117,102,102,101,114,91,105,93,32,13,10,32, +32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,108,111,99,97,108,32,104,32,61, +32,103,101,116,83,116,114,72,101,105,103,104,116,40,109,115,103,44,32,108,104, +101,105,103,104,116,41,13,10,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32, +121,32,61,32,121,32,45,32,104,32,13,10,32,32,32,32,32,32,32,32,32,32,32,32,32, +32,32,32,106,105,110,46,103,114,97,112,104,105,99,115,46,119,114,105,116,101, +40,109,115,103,44,32,109,97,114,103,105,110,32,47,32,50,44,32,121,32,45,32, +109,97,114,103,105,110,47,32,50,44,32,102,115,105,122,101,44,32,49,44,32,108, +104,101,105,103,104,116,41,32,13,10,32,32,32,32,32,32,32,32,32,32,32,32,101, +110,100,13,10,9,13,10,32,32,32,32,32,32,32,32,106,105,110,46,103,114,97,112, +104,105,99,115,46,98,105,110,100,40,41,13,10,32,32,32,32,13,10,32,32,32,32,32, +32,32,32,114,101,102,114,101,115,104,32,61,32,102,97,108,115,101,13,10,32,32, +32,32,101,110,100,32,13,10,32,32,32,32,13,10,32,32,32,32,106,105,110,46,103, +114,97,112,104,105,99,115,46,99,111,108,111,114,40,41,13,10,32,32,32,32,106, +105,110,46,103,114,97,112,104,105,99,115,46,100,114,97,119,40,112,97,110,101, +108,44,32,48,44,32,48,41,13,10,101,110,100,13,10,13,10,102,117,110,99,116,105, +111,110,32,106,105,110,46,100,101,98,117,103,46,115,116,97,116,117,115,40,41, +32,13,10,9,114,101,116,117,114,110,32,100,101,98,117,103,32,13,10,101,110,100, +13,10}; + diff --git a/src/lua/embed/embed.h b/src/lua/embed/embed.h new file mode 100644 index 0000000..685355f --- /dev/null +++ b/src/lua/embed/embed.h @@ -0,0 +1,51 @@ +#ifndef __JIN_LUA_EMBED_H +#define __JIN_LUA_EMBED_H +#include <cstring> + +namespace jin +{ +namespace embed +{ + + /** + * embed lua script to context. + */ +#define embed(L, script, name) \ + if(luaL_loadbuffer(L, script, strlen(script), name) == 0)\ + lua_call(L, 0, 0); + + /** + * embed structure. + */ + struct jin_Embed + { + const char* fname, *source; + }; + + static void boot(lua_State* L) + { + // embed scripts + #include "graphics.lua.h" // graphics + #include "keyboard.lua.h" // keyboard + #include "mouse.lua.h" // mouse + #include "debug.lua.h" // debug + #include "boot.lua.h" // boot + + // embed scripts + const jin_Embed scripts[] = { + { "graphics.lua", graphics_lua }, + { "keyboard.lua", keyboard_lua }, + { "mouse.lua", mouse_lua }, + { "debug.lua", debug_lua}, + { "boot.lua", boot_lua }, + { 0, 0 } + }; + + // load all emebd lua scripts + for (int i = 0; scripts[i].fname; i++) + embed(L, scripts[i].source, scripts[i].fname); + } +} +} + +#endif
\ No newline at end of file diff --git a/src/lua/embed/graphics.lua b/src/lua/embed/graphics.lua new file mode 100644 index 0000000..03a891d --- /dev/null +++ b/src/lua/embed/graphics.lua @@ -0,0 +1,6 @@ +----------------- +-- jin.graphics +----------------- + +jin.graphics = jin.graphics or {} + diff --git a/src/lua/embed/graphics.lua.h b/src/lua/embed/graphics.lua.h new file mode 100644 index 0000000..0e10e97 --- /dev/null +++ b/src/lua/embed/graphics.lua.h @@ -0,0 +1,8 @@ +/* graphics.lua */ +static const char graphics_lua[] = +{45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,45,13,10,45,45,32,106,105,110, +46,103,114,97,112,104,105,99,115,32,13,10,45,45,45,45,45,45,45,45,45,45,45,45, +45,45,45,45,45,13,10,13,10,106,105,110,46,103,114,97,112,104,105,99,115,32,61, +32,106,105,110,46,103,114,97,112,104,105,99,115,32,111,114,32,123,125,32,13, +10,13,10}; + diff --git a/src/lua/embed/keyboard.lua b/src/lua/embed/keyboard.lua new file mode 100644 index 0000000..08214f8 --- /dev/null +++ b/src/lua/embed/keyboard.lua @@ -0,0 +1,16 @@ +--[[ + jin.keyboard extension +]] + +jin.keyboard = jin.keyboard or {} + +local keys = {} + +function jin.keyboard.isDown(k) + return keys[k] +end + +function jin.keyboard.set(k, status) + keys[k] = status +end + diff --git a/src/lua/embed/keyboard.lua.h b/src/lua/embed/keyboard.lua.h new file mode 100644 index 0000000..037c255 --- /dev/null +++ b/src/lua/embed/keyboard.lua.h @@ -0,0 +1,13 @@ + +static const char keyboard_lua[] = +{ 45,45,91,91,32,13,10,9,107,101,121,98,111,97,114,100,32,101,120,116,101,110, + 115,105,111,110,32,13,10,93,93,32,13,10,13,10,106,105,110,46,107,101,121,98, + 111,97,114,100,32,61,32,106,105,110,46,107,101,121,98,111,97,114,100,32,111, + 114,32,123,125,32,13,10,13,10,108,111,99,97,108,32,107,101,121,115,32,61,32, + 123,125,32,13,10,13,10,102,117,110,99,116,105,111,110,32,106,105,110,46,107, + 101,121,98,111,97,114,100,46,105,115,68,111,119,110,40,107,41,32,13,10,32,32, + 32,32,114,101,116,117,114,110,32,107,101,121,115,91,107,93,13,10,101,110,100, + 32,32,13,10,13,10,102,117,110,99,116,105,111,110,32,106,105,110,46,107,101, + 121,98,111,97,114,100,46,115,101,116,40,107,44,32,115,116,97,116,117,115,41, + 32,13,10,9,107,101,121,115,91,107,93,32,61,32,115,116,97,116,117,115,32,13,10, + 101,110,100,32,13,10 }; diff --git a/src/lua/embed/mouse.lua b/src/lua/embed/mouse.lua new file mode 100644 index 0000000..9dcd472 --- /dev/null +++ b/src/lua/embed/mouse.lua @@ -0,0 +1,15 @@ +--[[ + jin.mouse extension +]] + +jin.mouse = jin.mouse or {} + +local button = {} + +function jin.mouse.isDown(btn) + return button[btn] +end + +function jin.mouse.set(btn, status) + button[btn] = status +end diff --git a/src/lua/embed/mouse.lua.h b/src/lua/embed/mouse.lua.h new file mode 100644 index 0000000..eb5a3ad --- /dev/null +++ b/src/lua/embed/mouse.lua.h @@ -0,0 +1,11 @@ +static const char mouse_lua[] = +{45,45,91,91,32,13,10,9,109,111,117,115,101,32,101,120,116,101,110,115,105,111, +110,13,10,93,93,32,13,10,13,10,106,105,110,46,109,111,117,115,101,32,61,32, +106,105,110,46,109,111,117,115,101,32,111,114,32,123,125,32,13,10,13,10,108, +111,99,97,108,32,98,117,116,116,111,110,32,61,32,123,125,32,13,10,13,10,102, +117,110,99,116,105,111,110,32,106,105,110,46,109,111,117,115,101,46,105,115, +68,111,119,110,40,98,116,110,41,32,13,10,9,114,101,116,117,114,110,32,98,117, +116,116,111,110,91,98,116,110,93,13,10,101,110,100,32,13,10,13,10,102,117,110, +99,116,105,111,110,32,106,105,110,46,109,111,117,115,101,46,115,101,116,40,98, +116,110,44,32,115,116,97,116,117,115,41,32,13,10,9,98,117,116,116,111,110,91, +98,116,110,93,32,61,32,115,116,97,116,117,115,13,10,101,110,100,32,13,10}; diff --git a/src/lua/embed/path.lua b/src/lua/embed/path.lua new file mode 100644 index 0000000..5b99dd2 --- /dev/null +++ b/src/lua/embed/path.lua @@ -0,0 +1,15 @@ +--[[ + jin.path extension +]] + +jin.path = jin.path or {} + +-- game root directory +jin._root = nil + +-- return full path of a given path +function jin.path.full(path) + local root = jin._dir .. '/' .. jin._argv[2] + return root .. '/' .. path +end + diff --git a/src/lua/embed/path.lua.h b/src/lua/embed/path.lua.h new file mode 100644 index 0000000..8a2968a --- /dev/null +++ b/src/lua/embed/path.lua.h @@ -0,0 +1,21 @@ +/* path.lua */ +static const char path_lua[] = +{45,45,91,91,32,13,10,32,32,32,32,106,105,110,46,112,97,116,104,32,101,120,116, +101,110,115,105,111,110,13,10,93,93,32,13,10,13,10,106,105,110,46,112,97,116, +104,32,61,32,106,105,110,46,112,97,116,104,32,111,114,32,123,125,32,13,10,13, +10,45,45,32,103,97,109,101,32,114,111,111,116,32,100,105,114,101,99,116,111, +114,121,32,13,10,106,105,110,46,95,114,111,111,116,32,61,32,110,105,108,32,13, +10,13,10,108,111,99,97,108,32,102,117,110,99,116,105,111,110,32,105,115,102, +117,108,108,40,112,97,116,104,41,32,13,10,32,32,32,32,13,10,101,110,100,32,13, +10,13,10,45,45,32,109,101,114,103,101,32,115,117,98,32,112,97,116,104,32,105, +110,116,111,32,111,110,101,32,13,10,108,111,99,97,108,32,102,117,110,99,116, +105,111,110,32,109,101,114,103,101,40,46,46,46,41,32,13,10,32,32,32,32,13,10, +101,110,100,32,13,10,13,10,45,45,32,114,101,116,117,114,110,32,102,117,108, +108,32,112,97,116,104,32,111,102,32,97,32,103,105,118,101,110,32,112,97,116, +104,32,13,10,102,117,110,99,116,105,111,110,32,106,105,110,46,112,97,116,104, +46,102,117,108,108,40,112,97,116,104,41,13,10,32,32,32,32,108,111,99,97,108, +32,114,111,111,116,32,61,32,106,105,110,46,95,100,105,114,32,46,46,32,39,47, +39,32,46,46,32,106,105,110,46,95,97,114,103,118,91,50,93,13,10,32,32,32,32, +114,101,116,117,114,110,32,114,111,111,116,32,46,46,32,39,47,39,32,46,46,32, +112,97,116,104,32,13,10,101,110,100,13,10,13,10}; + diff --git a/src/lua/event/luaopen_event.cpp b/src/lua/event/luaopen_event.cpp new file mode 100644 index 0000000..c12a969 --- /dev/null +++ b/src/lua/event/luaopen_event.cpp @@ -0,0 +1,109 @@ +/** +* Event module +*/ +#include "input/event.h" +#include "libs/luax/luax.h" +#include "SDL2/SDL.h" +#include "input/event.h" +#include "input/mouse.h" +#include "input/keyboard.h" + +using namespace jin::input; + +namespace jin +{ +namespace lua +{ + /** + * Load event poll, return a iterator(a table). + */ + static int l_event_poll(lua_State *L) + { + // table to store events + luax_newtable(L); + SDL_Event e; + int i = 1; + poll: + while (SDL_PollEvent(&e)) + { + // each event is a table + luax_newtable(L); + switch (e.type) + { + case SDL_QUIT: + luax_setfield_string(L, "type", "quit"); + break; + + case SDL_KEYDOWN: + luax_setfield_string(L, "type", "keydown"); + luax_setfield_string(L, "key", SDL_GetKeyName(e.key.keysym.sym)); + break; + + case SDL_KEYUP: + luax_setfield_string(L, "type", "keyup"); + luax_setfield_string(L, "key", SDL_GetKeyName(e.key.keysym.sym)); + break; + + case SDL_MOUSEMOTION: + luax_setfield_string(L, "type", "mousemotion"); + luax_setfield_number(L, "x", e.motion.x); + luax_setfield_number(L, "y", e.motion.y); + break; + + case SDL_MOUSEBUTTONDOWN: + luax_setfield_string(L, "type", "mousebuttondown"); + luax_setfield_string(L, "button", buttonStr(e.button.button)); + luax_setfield_number(L, "x", e.button.x); + luax_setfield_number(L, "y", e.button.y); + break; + + case SDL_MOUSEBUTTONUP: + luax_setfield_string(L, "type", "mousebuttonup"); + luax_setfield_string(L, "button", buttonStr(e.button.button)); + luax_setfield_number(L, "x", e.button.x); + luax_setfield_number(L, "y", e.button.y); + break; + + case SDL_MOUSEWHEEL: + luax_setfield_string(L, "type", "wheel"); + if(e.wheel.x == -1) + luax_setfield_string(L, "x", "left"); + else if(e.wheel.x == 1) + luax_setfield_string(L, "x", "right"); + else + luax_setfield_string(L, "x", "none"); + + if (e.wheel.y == -1) + luax_setfield_string(L, "y", "near"); + else if (e.wheel.y == 1) + luax_setfield_string(L, "y", "far"); + else + luax_setfield_string(L, "y", "none"); + break; + + default: + /* ignore other events */ + luax_pop(L, 1); // pop table out + goto poll; + break; + } + luax_rawseti(L, -2, i++); + } + return 1; + } + + static const luaL_Reg f[] = { + {"poll", l_event_poll}, + {0 ,0 } + }; + + /** + * load event module + */ + int luaopen_event(lua_State* L) + { + luax_newlib(L, f); + return 1; + } +} +}
\ No newline at end of file diff --git a/src/lua/filesystem/luaopen_filesystem.cpp b/src/lua/filesystem/luaopen_filesystem.cpp new file mode 100644 index 0000000..bad293e --- /dev/null +++ b/src/lua/filesystem/luaopen_filesystem.cpp @@ -0,0 +1,142 @@ +#include "libs/luax/luax.h" +#include "fs/filesystem.h" +#include <string> + +using namespace jin::fs; + +namespace jin +{ +namespace lua +{ + + static struct + { + Filesystem* fs; + } context; + + static int l_init(lua_State* L) + { + context.fs = Filesystem::get(); + return 0; + } + + /** + * set current game root, like + * C:/jin/games/tank/ + */ + static int l_mount(lua_State* L) + { + const char* path = luax_checkstring(L, 1); + context.fs->mount(path); + return 0; + } + + /** + * + */ + static int l_isDir(lua_State *L) + { + const char* path = luax_checkstring(L, 1); + int r = context.fs->isDir(path); + luax_pushboolean(L, r); + return 1; + } + + /** + * + */ + static int l_exist(lua_State * L) + { + const char* path = luax_checkstring(L, 1); + int r = context.fs->exists(path); + luax_pushboolean(L, r); + return 1; + } + + static int l_isdir(lua_State* L) + { + const char* path = luax_checkstring(L, 1); + int r = context.fs->isDir(path); + luax_pushboolean(L, r); + return 1; + } + + // load but dont run it + static int loadf(lua_State* L) + { + const char* filename = lua_tostring(L, -1); + Buffer bf; + context.fs->read(filename, &bf); + luax_loadbuffer(L, (const char*)bf.data, bf.size, filename); + return 1; + } + + static int loader(lua_State* L) + { + const char * filename = lua_tostring(L, -1); + + std::string tmp(filename); + tmp += ".lua"; + + int size = tmp.size(); + + for (int i = 0; i<size - 4; i++) + { + if (tmp[i] == '.') + { + tmp[i] = '/'; + } + } + + // Check whether file exists. + if (context.fs->exists(tmp.c_str())) + { + lua_pop(L, 1); + lua_pushstring(L, tmp.c_str()); + // Ok, load it. + return loadf(L); + } + + tmp = filename; + size = tmp.size(); + for (int i = 0; i<size; i++) + { + if (tmp[i] == '.') + { + tmp[i] = '/'; + } + } + + if (context.fs->isDir(tmp.c_str())) + { + tmp += "/init.lua"; + if (context.fs->exists(tmp.c_str())) + { + lua_pop(L, 1); + lua_pushstring(L, tmp.c_str()); + // Ok, load it. + return loadf(L); + } + } + + lua_pushfstring(L, "\n\tno file \"%s\" in jin game directories.\n", (tmp + ".lua").c_str()); + return 1; + } + + static const luaL_Reg f[] = { + {"init", l_init}, + {"mount", l_mount}, + {"isdir", l_isDir}, + {"exist", l_exist}, + {0, 0} + }; + + int luaopen_filesystem(lua_State* L) + { + luax_newlib(L, f); + luax_register_searcher(L, loader, 1); + return 0; + } + +} +}
\ No newline at end of file diff --git a/src/lua/graphics/luaopen_Canvas.cpp b/src/lua/graphics/luaopen_Canvas.cpp new file mode 100644 index 0000000..edcd1ae --- /dev/null +++ b/src/lua/graphics/luaopen_Canvas.cpp @@ -0,0 +1,61 @@ +#include "libs/luax/luax.h" +#include "../luaopen_types.h" +#include "render/canvas.h" +using namespace jin::render; +namespace jin +{ +namespace lua +{ + static int l_getWidth(lua_State* L) + { + Canvas* c = (Canvas*)luax_checktype(L, 1, TYPE_CANVAS); + luax_pushnumber(L, c->getWidth()); + return 1; + } + + static int l_getHeight(lua_State* L) + { + Canvas* c = (Canvas*)luax_checktype(L, 1, TYPE_CANVAS); + luax_pushnumber(L, c->getHeight()); + return 1; + } + + static int l_getSize(lua_State* L) + { + Canvas* c = (Canvas*)luax_checktype(L, 1, TYPE_CANVAS); + luax_pushnumber(L, c->getWidth()); + luax_pushnumber(L, c->getHeight()); + return 2; + } + + static int l_setAnchor(lua_State* L) + { + Canvas* c = (Canvas*)luax_checktype(L, 1, TYPE_CANVAS); + int x = luax_checknumber(L, 1); + int y = luax_checknumber(L, 2); + c->setAnchor(x, y); + return 0; + } + + static int l_gc(lua_State* L) + { + + return 0; + } + + static const luaL_Reg f[] = { + {"__gc", l_gc}, + {"getWidth", l_getWidth}, + {"getHeight", l_getHeight}, + {"getSize", l_getSize}, + {"setAnchor", l_setAnchor}, + {0, 0 } + }; + + int luaopen_Canvas(lua_State* L) + { + luax_newtype(L, TYPE_CANVAS, f); + return 0; + } +} +}
\ No newline at end of file diff --git a/src/lua/graphics/luaopen_Font.cpp b/src/lua/graphics/luaopen_Font.cpp new file mode 100644 index 0000000..a4f1936 --- /dev/null +++ b/src/lua/graphics/luaopen_Font.cpp @@ -0,0 +1,45 @@ +#include "libs/luax/luax.h" +#include "../luaopen_types.h" +#include "render/font.h" + +using namespace jin::render; + +namespace jin +{ +namespace lua +{ + + static int l_gc(lua_State* L) + { + return 0; + } + + static int l_box(lua_State* L) + { + Font* font = (Font*)luax_checktype(L, 1, TYPE_FONT); + const char* text = luax_checkstring(L, 2); + int fheight = luax_checknumber(L, 3); + int spacing = luax_checknumber(L, 4); + int lheight = luax_checknumber(L, 5); + int w, h; + font->box(text, fheight, lheight, spacing, &w, &h); + luax_pushnumber(L, w); + luax_pushnumber(L, h); + return 2; + } + + static const luaL_Reg f[] = { + {"__gc", l_gc}, + {"box", l_box}, + {0, 0} + }; + + int luaopen_Font(lua_State* L) + { + luax_newtype(L, TYPE_FONT, f); + + return 0; + } + +} +}
\ No newline at end of file diff --git a/src/lua/graphics/luaopen_Image.cpp b/src/lua/graphics/luaopen_Image.cpp new file mode 100644 index 0000000..2637db9 --- /dev/null +++ b/src/lua/graphics/luaopen_Image.cpp @@ -0,0 +1,79 @@ +#include "libs/luax/luax.h" +#include "render/image.h" +#include "../luaopen_types.h" + +using namespace jin::render; + +namespace jin +{ +namespace lua +{ + + static int l_getWidth(lua_State* L) + { + Image* i = (Image*)luax_checktype(L, 1, TYPE_IMAGE); + luax_pushnumber(L, i->getWidth()); + return 1; + } + + static int l_getHeight(lua_State *L) + { + Image* i = (Image*)luax_checktype(L, 1, TYPE_IMAGE); + luax_pushnumber(L, i->getHeight()); + return 1; + } + + static int l_getPixel(lua_State* L) + { + Image* i = (Image*)luax_checktype(L, 1, TYPE_IMAGE); + int x = luax_checknumber(L, 2); + int y = luax_checknumber(L, 3); + color c = i->getPixel(x, y); + luax_pushnumber(L, c.rgba.r); + luax_pushnumber(L, c.rgba.g); + luax_pushnumber(L, c.rgba.b); + luax_pushnumber(L, c.rgba.a); + return 4; + } + + static int l_setAnchor(lua_State* L) + { + Image* i = (Image*)luax_checktype(L, 1, TYPE_IMAGE); + int x = luax_checknumber(L, 2); + int y = luax_checknumber(L, 3); + i->setAnchor(x, y); + return 0; + } + + static int l_getSize(lua_State* L) + { + Image* i = (Image*)luax_checktype(L, 1, TYPE_IMAGE); + luax_pushnumber(L, i->getWidth()); + luax_pushnumber(L, i->getHeight()); + return 2; + } + + static int l_gc(lua_State* L) + { + + return 0; + } + + static const luaL_Reg f[] = { + {"__gc", l_gc}, + {"getWidth", l_getWidth}, + {"getHeight", l_getHeight}, + {"getSize", l_getSize}, + {"getPixel", l_getPixel}, + {"setAnchor", l_setAnchor}, + {0, 0 } + }; + + int luaopen_Image(lua_State* L) + { + luax_newtype(L, TYPE_IMAGE, f); + return 0; + } + +}// graphics +}// jin
\ No newline at end of file diff --git a/src/lua/graphics/luaopen_JSL.cpp b/src/lua/graphics/luaopen_JSL.cpp new file mode 100644 index 0000000..19fa285 --- /dev/null +++ b/src/lua/graphics/luaopen_JSL.cpp @@ -0,0 +1,82 @@ +#include "libs/luax/luax.h" +#include "render/jsl.h" +#include "../luaopen_types.h" +namespace jin +{ +namespace lua +{ + using namespace render; + + enum VARIABLE_TYPE + { + INVALID = 0, + NUMBER , + IMAGE , + TEXEL + }; + + static VARIABLE_TYPE strtotype(const char* str) + { + std::string s = std::string(str); + if (s == "number") return NUMBER; + else if (s == "Image") return IMAGE; + else if (s == "Texel") return TEXEL; + else return INVALID; + } + + /** + * Use send function send variables to JSL program. + */ + static int l_send(lua_State* L) + { + JSLProgram* jsl = (JSLProgram*)luax_checktype(L, 1, TYPE_JSL); + // number Image Texel + const char* typestr = luax_checkstring(L, 2); + // variable name + const char* variable = luax_checkstring(L, 3); + if (typestr != nullptr) + { + int type = strtotype(typestr); + switch (type) + { + case NUMBER: + { + float number = luax_checknumber(L, 4); + jsl->sendFloat(variable, number); + break; + } + case IMAGE: + { + Image* img = (Image*)luax_checktype(L, 4, TYPE_IMAGE); + jsl->sendImage(variable, img); + break; + } + case TEXEL: + break; + } + } + return 1; + } + + static int l_gc(lua_State* L) + { + + return 0; + } + + static const luaL_Reg f[] = { + {"send", l_send}, + {"__gc", l_gc}, + {0, 0} + }; + + /** + * JSL program + */ + int luaopen_JSL(lua_State* L) + { + luax_newtype(L, TYPE_JSL, f); + return 0; + } +} +}
\ No newline at end of file diff --git a/src/lua/graphics/luaopen_Tilemap.cpp b/src/lua/graphics/luaopen_Tilemap.cpp new file mode 100644 index 0000000..983193e --- /dev/null +++ b/src/lua/graphics/luaopen_Tilemap.cpp @@ -0,0 +1,9 @@ +namespace jin +{ +namespace lua +{ + + + +} +} diff --git a/src/lua/graphics/luaopen_graphics.cpp b/src/lua/graphics/luaopen_graphics.cpp new file mode 100644 index 0000000..8772744 --- /dev/null +++ b/src/lua/graphics/luaopen_graphics.cpp @@ -0,0 +1,533 @@ +#include "libs/luax/luax.h" +#include "render/image.h" +#include "render/canvas.h" +#include "render/jsl.h" +#include "render/graphics.h" +#include "render/window.h" +#include "render/font.h" +#include "../luaopen_types.h" +#include "lua/embed/graphics.lua.h" +#include "libs/GLee/GLee.h" +#include "fs/filesystem.h" +#include <SDL2/SDL.h> + +using namespace jin::render; +using namespace jin::fs; + +namespace jin +{ +namespace lua +{ + + /** + * jin.graphics context, storge some module + * shared variables. + */ + static struct + { + // current render color + color curRenderColor; + + // currently used font + Font* curFont = 0; + + // default ingame font + Font* defaultFont = 0; + + } context; + + /** + * Init video system. + * jin.graphics.init(width, height, title) + */ + static int l_init(lua_State* L) + { + int w = luax_checknumber(L, 1); + int h = luax_checknumber(L, 2); + const char* t = luaL_checkstring(L, 3); + + // init video subsystem + if (SDL_Init(SDL_INIT_VIDEO) < 0) + { + luax_error(L, "could not init video"); + luax_pushboolean(L, false); + return 1; + } + + // init window system + Window* wnd = Window::get(); + wnd->init(w, h, t); + + // set default blend method + glEnable(GL_BLEND); + glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA); + + // init success + luax_pushboolean(L, true); + return 1; + } + + /** + * Get windows size. + */ + static int l_getSize(lua_State* L) + { + Window* wnd = Window::get(); + luax_pushnumber(L, wnd->getW()); + luax_pushnumber(L, wnd->getH()); + return 2; + } + + /** + * Create a image userdata and set metatable for it. + */ + static int l_newImage(lua_State* L) + { + Image* img = (Image*)luax_newinstance(L, TYPE_IMAGE, sizeof(Image)); + // pseudo constructor + img->init(); + Filesystem* fs = Filesystem::get(); + const char* f = luax_checkstring(L, 1); + if (!fs->exists(f)) + { + printf("Error: no such image %s\n", f); + exit(1); + } + Buffer b; + fs->read(f, &b); + img->loadb((const char*)b.data, b.size); + return 1; + } + + /** + * Create a new JSL program. + * graphics.Shader(program) + */ + static int l_newShader(lua_State* L) + { + JSLProgram* j = (JSLProgram*)luax_newinstance(L, TYPE_JSL, sizeof(JSLProgram)); + const char* modestr = luax_checkstring(L, 1); + j->init(modestr); + + return 1; + } + + /** + * Create a new Canvas, don't use it in loop, very slow. + * jin.graphics.newCanvas(w, h) + */ + static int l_newCanvas(lua_State* L) + { + Canvas* cvs = (Canvas*)luax_newinstance(L, TYPE_CANVAS, sizeof(Canvas)); + int w = luax_checknumber(L, 1); + int h = luax_checknumber(L, 2); + cvs->init(w, h); + return 1; + } + + static int l_clear(lua_State* L) + { + if (luax_gettop(L) == 0) + { + glClearColor(0, 0, 0, 1); + } + else + { + int r = luax_checknumber(L, 1); + int g = luax_checknumber(L, 2); + int b = luax_checknumber(L, 3); + int a = luax_checknumber(L, 4); + glClearColor(r / 255.f, g / 255.f, b / 255.f, a / 255.f); + } + glClear(GL_COLOR_BUFFER_BIT); + return 0; + } + + /** + * Swap render buffers, present current buffer to front. + */ + static int l_present(lua_State* L) + { + SDL_GL_SwapWindow(Window::get()->getWnd()); + return 0; + } + + // jin.graphics.draw(x, y, scalex, scaley, r) + static int l_draw(lua_State* L) + { + int x = luax_optnumber(L, 2, 0); + int y = luax_optnumber(L, 3, 0); + float sx = luax_optnumber(L, 4, 1); + float sy = luax_optnumber(L, 5, 1); + float r = luax_optnumber(L, 6, 0); + if (luax_istype(L, 1, TYPE_IMAGE)) + { + /* is image */ + Image* p = (Image*)luax_toudata(L, 1); + p->draw(x, y, sx, sy, r); + } + else if (luax_istype(L, 1, TYPE_CANVAS)) + { + /* is canvas */ + Canvas* p = (Canvas*)luax_toudata(L, 1); + p->draw(x, y, sx, sy, r); + } + else + { + /* wrong type */ + luax_typerror(L, 1, "image or canvas"); + } + return 0; + } + + static int l_setColor(lua_State* L) + { + // jin.graphics.color() to set back to default + // render color + if (luax_gettop(L) == 0) + { + glColor4f(1, 1, 1, 1); + return 0; + } + + context.curRenderColor.rgba.r = luax_checknumber(L, 1); + context.curRenderColor.rgba.g = luax_checknumber(L, 2); + context.curRenderColor.rgba.b = luax_checknumber(L, 3); + context.curRenderColor.rgba.a = luax_checknumber(L, 4); + + glColor4f(context.curRenderColor.rgba.r / 255.f, + context.curRenderColor.rgba.g / 255.f, + context.curRenderColor.rgba.b / 255.f, + context.curRenderColor.rgba.a / 255.f); + return 0; + } + + static int l_getColor(lua_State * L) + { + luax_pushnumber(L, context.curRenderColor.rgba.r); + luax_pushnumber(L, context.curRenderColor.rgba.g); + luax_pushnumber(L, context.curRenderColor.rgba.b); + luax_pushnumber(L, context.curRenderColor.rgba.a); + return 4; + } + + static int l_bindCanvas(lua_State* L) + { + if (luax_gettop(L) == 0) + { + // bind to default canvas + Canvas::unbind(); + return 0; + } + Canvas* c = (Canvas*)luax_checktype(L, 1, TYPE_CANVAS); + c->bind(); + return 0; + } + + static int l_useShader(lua_State* L) + { + if (luax_istype(L, 1, TYPE_JSL)) + { + /* is image */ + JSLProgram* jsl = (JSLProgram*)luax_toudata(L, 1); + jsl->use(); + + } + else + { + /* wrong type */ + luax_typerror(L, 1, "JSL shader"); + } + return 0; + } + + static int l_unuseShader(lua_State* L) + { + JSLProgram::unuse(); + return 0; + } + + static int l_setBlend(lua_State* L) + { + + return 0; + } + + static RENDER_MODE strtomode(const char* str) + { + std::string s = std::string(str); + if (s == "fill") return FILL; + else if (s == "line") return LINE; + else return NONE; + } + + /** + * draw pixel to screen + * jin.graphics.pixel(x, y) + */ + static int l_drawpoint(lua_State* L) + { + int x = luax_checknumber(L, 1); + int y = luax_checknumber(L, 2); + render::point(x, y); + + return 0; + } + + static int l_drawLine(lua_State* L) + { + int x1 = luax_checknumber(L, 1); + int y1 = luax_checknumber(L, 2); + int x2 = luax_checknumber(L, 3); + int y2 = luax_checknumber(L, 4); + render::line(x1, y1, x2, y2); + + return 0; + } + + static int l_drawRect(lua_State* L) + { + const char* modestr = luax_checkstring(L, 1); + RENDER_MODE mode = strtomode(modestr); + if (mode != NONE) + { + int x = luax_checknumber(L, 2); + int y = luax_checknumber(L, 3); + int w = luax_checknumber(L, 4); + int h = luax_checknumber(L, 5); + render::rect(mode, x, y, w, h); + } + else + { + luax_typerror(L, 1, "'fill' or 'line'"); + return 1; + } + + return 0; + } + + static int l_drawCircle(lua_State* L) + { + const char* modestr = luax_checkstring(L, 1); + RENDER_MODE mode = strtomode(modestr); + if (mode != NONE) + { + int x = luax_checknumber(L, 2); + int y = luax_checknumber(L, 3); + float r = luax_checknumber(L, 4); + render::circle(mode, x, y, r); + } + else + { + luax_typerror(L, 1, "'fill' or 'line'"); + return 1; + } + + return 0; + } + + static int l_drawTriangle(lua_State* L) + { + const char* modestr = luax_checkstring(L, 1); + RENDER_MODE mode = strtomode(modestr); + if (mode != NONE) + { + int x = luax_checknumber(L, 2); + int y = luax_checknumber(L, 3); + + int x2 = luax_checknumber(L, 3); + int y2 = luax_checknumber(L, 4); + + int x3 = luax_checknumber(L, 5); + int y3 = luax_checknumber(L, 6); + + render::triangle(mode, x, y, x2, y2, x3, y3); + } + else + { + luax_typerror(L, 1, "'fill' or 'line'"); + return 1; + } + + return 0; + } + + /** + * draw polygon. + * jin.graphics.polygon(mode, n, {{}, {}, {}...}) + */ + static int l_drawPolygon(lua_State* L) + { + const char* modestr = luax_checkstring(L, 1); + int n = luax_checknumber(L, 2); + RENDER_MODE mode = strtomode(modestr); + if (mode != NONE) + { + if (!luax_istable(L, 3)) + { + luax_typerror(L, 3, "table"); + return 1; + } + int tn = luax_tableidxlen(L, 3); + if (tn != n * 2) + { + static char emsg[] = + "number of polygon vertices doesn't match " + "provided n, expect %d numbers but get %d"; + luax_error(L, emsg, n * 2, tn); + return 1; + } + float* p = new float[2 * n]; + for (int i = 1; i <= 2 * n; i++) + p[i - 1] = luax_rawgetnumber(L, 3, i); + render::polygon(mode, p, n); + delete[] p; + } + else + { + luax_typerror(L, 1, "'fill' or 'line'"); + return 1; + } + + return 0; + } + + static int l_newFont(lua_State* L) + { + Font* font = (Font*)luax_newinstance(L, TYPE_FONT, sizeof(Font)); + const char* path = luax_checkstring(L, 1); + Filesystem* fs = Filesystem::get(); + Buffer b = {}; + if (!fs->exists(path)) + { + printf("Error: no such font %s\n", path); + exit(1); + } + fs->read(path, &b); + font->loadb((const unsigned char*)b.data); + + return 1; + } + + /** + * study font, 0 args for study default font. + */ + static int l_study(lua_State* L) + { + int n = luax_gettop(L); + if (n == 0) + { + if (context.defaultFont == 0) + { + #include "res/font.ttf.h" + // load default font + context.defaultFont = new Font(); + context.defaultFont->loadb(font_ttf); + } + context.curFont = context.defaultFont; + return 0; + } + Font* font = (Font*)luax_checktype(L, 1, TYPE_FONT); + context.curFont = font; + return 0; + } + + /** + * draw text with current font(after study). befor write, must + * study a font. + */ + static int l_write(lua_State* L) + { + if (context.curFont == 0) + return 0; + + const char* text = luax_checkstring(L, 1); + int x = luax_checknumber(L, 2); + int y = luax_checknumber(L, 3); + + int fh = luax_optnumber(L, 4, 15); + int spacing = luax_optnumber(L, 5, 1); + int lh = luax_optnumber(L, 6, 18); + + context.curFont->render(text, x, y, fh, spacing, lh); + + return 0; + } + + /** + * get text bound box + */ + static int l_box(lua_State* L) + { + const char* text = luax_checkstring(L, 1); + int fontheight = luax_checknumber(L, 2); + int spacing = luax_checknumber(L, 3); + int lineheight = luax_checknumber(L, 4); + int w, h; + context.curFont->box(text, fontheight, spacing, lineheight, &w, &h); + luax_pushnumber(L, w); + luax_pushnumber(L, h); + return 2; + } + + static const luaL_Reg f[] = { + {"init", l_init}, + {"size", l_getSize}, + {"Image", l_newImage}, + {"Shader", l_newShader}, + {"Canvas", l_newCanvas}, + {"Font", l_newFont}, + /** + * before using box and write + * must call study to set + * current font + */ + {"box", l_box}, + {"write", l_write}, + {"clear", l_clear}, + {"draw", l_draw}, + {"color", l_setColor}, + {"palette", l_getColor}, + {"present", l_present}, + //{"blend", l_setBlend}, + // study font + {"study", l_study}, + // bind canvas + {"bind", l_bindCanvas}, + // use shader + {"use", l_useShader}, + {"unuse", l_unuseShader}, + // draw shapes + {"point", l_drawpoint}, + {"line", l_drawLine}, + {"rect", l_drawRect}, + {"circle", l_drawCircle}, + {"triangle", l_drawTriangle}, + {"polygon", l_drawPolygon}, + {0, 0} + }; + + extern int luaopen_Image(lua_State* L); + + extern int luaopen_Font(lua_State* L); + + extern int luaopen_Canvas(lua_State* L); + + extern int luaopen_JSL(lua_State* L); + + int luaopen_graphics(lua_State* L) + { + // register types + luaopen_Image(L); + luaopen_Canvas(L); + luaopen_Font(L); + luaopen_JSL(L); + + // load whole lib + luax_newlib(L, f); + + return 1; + } + +} +} diff --git a/src/lua/keyboard/luaopen_keyboard.cpp b/src/lua/keyboard/luaopen_keyboard.cpp new file mode 100644 index 0000000..e905ce1 --- /dev/null +++ b/src/lua/keyboard/luaopen_keyboard.cpp @@ -0,0 +1,16 @@ +#include "libs/luax/luax.h" +#include "lua/embed/keyboard.lua.h" + +namespace jin +{ +namespace lua +{ + + int luaopen_keyboard(lua_State* L) + { + luax_newlib(L, 0); + return 1; + } + +} +}
\ No newline at end of file diff --git a/src/lua/luaopen_jin.cpp b/src/lua/luaopen_jin.cpp new file mode 100644 index 0000000..5c4edc8 --- /dev/null +++ b/src/lua/luaopen_jin.cpp @@ -0,0 +1,99 @@ +#include "luaopen_jin.h" +#include "libs/luax/luax.h" + +// embed all lua scripts +#include "embed/embed.h" + +namespace jin +{ +namespace lua +{ + /** + * sub modules + */ + extern int luaopen_core(lua_State* L); + extern int luaopen_graphics(lua_State* L); + extern int luaopen_audio(lua_State* L); + extern int luaopen_net(lua_State* L); + extern int luaopen_event(lua_State* L); + extern int luaopen_time(lua_State* L); + extern int luaopen_mouse(lua_State* L); + extern int luaopen_keyboard(lua_State* L); + extern int luaopen_filesystem(lua_State* L); + + static int l_getversion(lua_State* L) + { + luax_pushstring(L, VERSION); + return 1; + } + + static int l_getAuthor(lua_State* L) + { + luax_pushstring(L, AUTHOR); + return 1; + } + + static int l_getOS(lua_State* L) + { + #ifdef _WIN32 + luax_pushstring(L, "windows"); + #elif defined __unix__ + luax_pushstring(L, "unix"); + #elif defined __APPLE__ + luax_pushstring(L, "macos"); + #endif + return 1; + } + + static const luaL_Reg f[] = { + {"version", l_getversion}, + {"author", l_getAuthor}, + {"os", l_getOS}, + {0, 0} + }; + + // submodules + static const luaL_Reg mods[] = { + {"core", luaopen_core}, + {"event", luaopen_event}, + {"graphics", luaopen_graphics}, + {"time", luaopen_time}, + {"mouse", luaopen_mouse}, + {"keyboard", luaopen_keyboard}, + {"filesystem", luaopen_filesystem}, + {"net", luaopen_net}, + /* + {"audio", luaopen_audio} + */ + {0, 0} + }; + + int luaopen_jin(lua_State* L) + { + // jin module is on top of the stack + luax_newlib(L, f); + + // set to global field + luax_justglobal(L, -1, MODULE_NAME); + + // register submodules + for (int i = 0; mods[i].name; i++) + { + // open submodules + mods[i].func(L); + luax_setfield(L, -2, mods[i].name); + } + + return 1; + } + + /** + * boot jin + */ + void boot(lua_State* L) + { + jin::embed::boot(L); + } + +} +}
\ No newline at end of file diff --git a/src/lua/luaopen_jin.h b/src/lua/luaopen_jin.h new file mode 100644 index 0000000..0d2d584 --- /dev/null +++ b/src/lua/luaopen_jin.h @@ -0,0 +1,45 @@ +/** +* Copyright (C) 2016~2018 chai +* +* Permission is hereby granted, free of charge, to any person obtaining a copyof +* this software and associated documentation files (the "Software"), to deal in +* the Software without restriction, including without limitation the rights to use, +* copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the +* Software, and to permit persons to whom the Software is furnished to do so, +* subject to the following conditions: +* +* The above copyright notice and this permission notice shall be included in all +* copies or substantial portions of the Software. +* +* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, +* INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A +* PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT +* HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION +* OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE +* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. +*/ + +#ifndef __JIN_M_JIN_H +#define __JIN_M_JIN_H +#include "libs/luax/luax.h" + +#define MODULE_NAME "jin" +#define VERSION "0.1.0" +#define AUTHOR "chai" + +namespace jin +{ +namespace lua +{ + + /** + * open jin lib and boot + */ + int luaopen_jin(lua_State* L); + + void boot(lua_State* L); + +} +} + +#endif
\ No newline at end of file diff --git a/src/lua/luaopen_types.h b/src/lua/luaopen_types.h new file mode 100644 index 0000000..292d991 --- /dev/null +++ b/src/lua/luaopen_types.h @@ -0,0 +1,13 @@ +#ifndef __JIN_M_TYPES_H +#define __JIN_M_TYPES_H + +// graphics module +#define TYPE_IMAGE "Image" +#define TYPE_JSL "Shader" +#define TYPE_CANVAS "Canvas" +#define TYPE_FONT "Font" + +// audio module +#define TYPE_SOUND "Sound" + +#endif diff --git a/src/lua/mouse/luaopen_mouse.cpp b/src/lua/mouse/luaopen_mouse.cpp new file mode 100644 index 0000000..da80383 --- /dev/null +++ b/src/lua/mouse/luaopen_mouse.cpp @@ -0,0 +1,27 @@ +#include "libs/luax/luax.h" +#include "SDL2/SDL.h" +namespace jin +{ +namespace lua +{ + static int l_pos(lua_State* L) + { + int x, y; + SDL_GetMouseState(&x, &y); + luax_pushnumber(L, x); + luax_pushnumber(L, y); + return 2; + } + + static const luaL_Reg f[] = { + {"position", l_pos}, + {0, 0} + }; + + int luaopen_mouse(lua_State* L) + { + luax_newlib(L, f); + return 1; + } +} +}
\ No newline at end of file diff --git a/src/lua/net/luaopen_net.cpp b/src/lua/net/luaopen_net.cpp new file mode 100644 index 0000000..4cb7cea --- /dev/null +++ b/src/lua/net/luaopen_net.cpp @@ -0,0 +1,110 @@ +/** +* Notice: the net module is not finished yet. +*/ +#include "libs/luax/luax.h" +#include "libs/tekcos/tekcos.h" + +namespace jin +{ +namespace lua +{ + struct + { + tk_TCPsocket* sk; + }context; + + /** + * A table is needed. For example: + * local conf = { + * mode = "server", + * ip = "", + * port = 8000 + * } + */ + static int l_open(lua_State* L) + { + // init context.sk + context.sk = 0; + if (!luax_istable(L, 1)) + { + luax_typerror(L, 1, "table is needed"); + return 0; + } + luax_getfield(L, 1, "mode"); + if (luax_isnil(L, -1)) + {// no mode field + luax_error(L, "mode field is needed, but get nil"); + return 0; + } + const char* mode = luax_checkstring(L, -1); + if (strcmp(mode, "server") == 0 || strcmp(mode, "client") == 0) + { + + if (strcmp(mode, "server") == 0) + {// a server, ignore ip field + + } + else + { + + } + } + else + { + luax_error(L, "\"server\" or \"client\" is needed, but get %s", mode); + return 0; + } + return 1; + } + + static int l_accept(lua_State* L) + { + return 1; + } + + static int l_send(lua_State* L) + { + return 1; + } + + static int l_recv(lua_State* L) + { + return 1; + } + + static int l_close(lua_State* L) + { + return 1; + } + + static int l_nonblocking(lua_State* L) + { + return 1; + } + + // block mode by default + static int l_blocking(lua_State* L) + { + return 1; + } + + static const luaL_Reg f[] = { + {"open", l_open}, + {"accept", l_accept}, + {"send", l_send}, + {"recv", l_recv}, + {"close", l_close}, + {"blocking", l_blocking }, + {"nonblocking", l_nonblocking}, + {0, 0} + }; + + // only tcp + int luaopen_net(lua_State* L) + { + luax_newlib(L, f); + + return 1; + } +} +}
\ No newline at end of file diff --git a/src/lua/thread/luaopen_Thread.cpp b/src/lua/thread/luaopen_Thread.cpp new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/src/lua/thread/luaopen_Thread.cpp diff --git a/src/lua/time/luaopen_time.cpp b/src/lua/time/luaopen_time.cpp new file mode 100644 index 0000000..005f67d --- /dev/null +++ b/src/lua/time/luaopen_time.cpp @@ -0,0 +1,34 @@ +#include "libs/luax/luax.h" +#include <SDL2/SDL.h> +namespace jin +{ +namespace lua +{ + + static int l_sec(lua_State* L) + { + luax_pushnumber(L, SDL_GetTicks()/1000.f); + return 1; + } + + static int l_sleep(lua_State* L) + { + double sec = luax_checknumber(L, 1); + SDL_Delay(sec * 1000); + return 0; + } + + static const luaL_Reg f[] = { + {"second", l_sec}, + {"sleep", l_sleep}, + {0, 0}, + }; + + int luaopen_time(lua_State* L) + { + luax_newlib(L, f); + return 1; + } + +} +}
\ No newline at end of file |