3 files changed, 139 insertions, 0 deletions
diff --git a/src/sysbin/lx/lxinit.c b/src/sysbin/lx/lxinit.c
index 948659b..8170f0c 100644
--- a/src/sysbin/lx/lxinit.c
+++ b/src/sysbin/lx/lxinit.c
@@ -37,6 +37,7 @@ static const luaL_Reg loadedlibs[] = {
   {LX_MSGLIBNAME, lx_open_msg},
   {LX_IOCTLLIBNAME, lx_open_ioctl},
   {LX_DRAWLIBNAME, lx_open_draw},
+  {LX_KBDLIBNAME, lx_open_kbd},
   {NULL, NULL}
 };
 
diff --git a/src/sysbin/lx/lxkbdlib.c b/src/sysbin/lx/lxkbdlib.c
new file mode 100644
index 0000000..e5257b8
--- /dev/null
+++ b/src/sysbin/lx/lxkbdlib.c
@@ -0,0 +1,135 @@
+/*
+** Lua eXtended keyboard library
+*/
+
+#define lxkbdlib_c
+#define LUA_LIB
+
+#include <lua/lprefix.h>
+
+
+#include <errno.h>
+#include <locale.h>
+#include <stdlib.h>
+#include <string.h>
+#include <time.h>
+
+#include <lua/lua.h>
+
+#include <lua/lauxlib.h>
+#include <lua/lualib.h>
+
+#include <kogata/keyboard.h>
+
+#include "lxlib.h"
+
+
+typedef struct {
+  keyboard_t *kbd;
+} kbdlib_t;
+
+#define KEYBOARD "lx.kbd.keyboard"
+
+// ====================================================================
+//                            FONTS
+
+static int kbd_init(lua_State *L) {
+  keyboard_t *kbd = init_keyboard();
+  if (kbd == NULL)
+    luaL_error(L, "Could not initialize keyboard_t");
+
+  kbdlib_t *k = (kbdlib_t*)lua_newuserdata(L, sizeof(kbdlib_t));
+  luaL_getmetatable(L, KEYBOARD);
+  lua_setmetatable(L, -2);
+
+  k->kbd = kbd;
+
+  return 1;
+}
+
+static int kbd_gc(lua_State *L) {
+  kbdlib_t *k = (kbdlib_t*)luaL_checkudata(L, 1, KEYBOARD);
+
+  if(k->kbd == NULL) {
+    luaL_error(L, "k->kbd == NULL ?");
+  }
+  free_keyboard(k->kbd);
+  k->kbd = NULL;
+
+  return 0;
+}
+
+static int kbd_load_keymap(lua_State *L) {
+  kbdlib_t *k = (kbdlib_t*)luaL_checkudata(L, 1, KEYBOARD);
+  const char* name = luaL_checkstring(L, 2);
+
+  bool ret = load_keymap(k->kbd, name);
+  lua_pushboolean(L, ret);
+
+  return 1;
+}
+
+static int kbd_press(lua_State *L) {
+  kbdlib_t *k = (kbdlib_t*)luaL_checkudata(L, 1, KEYBOARD);
+  int scancode = luaL_checkinteger(L, 2);
+
+  key_t key = keyboard_press(k->kbd, scancode);
+
+  lua_createtable(L, 0, 2);
+  setintfield(L, "flags", key.flags);
+  if (key.flags & KBD_CHAR)
+    setintfield(L, "chr", key.chr);
+  else
+    setintfield(L, "key", key.key);
+
+  return 1;
+}
+
+static int kbd_release(lua_State *L) {
+  kbdlib_t *k = (kbdlib_t*)luaL_checkudata(L, 1, KEYBOARD);
+  int scancode = luaL_checkinteger(L, 2);
+
+  key_t key = keyboard_release(k->kbd, scancode);
+
+  lua_createtable(L, 0, 2);
+  setintfield(L, "flags", key.flags);
+  if (key.flags & KBD_CHAR)
+    setintfield(L, "chr", key.chr);
+  else
+    setintfield(L, "key", key.key);
+
+  return 1;
+}
+
+
+/* }====================================================== */
+
+static const luaL_Reg kbdlib[] = {
+  {"init",         kbd_init},
+  {NULL, NULL}
+};
+
+
+static const luaL_Reg keyboard_meta[] = {
+  {"load_keymap", kbd_load_keymap},
+  {"press",       kbd_press},
+  {"release",     kbd_release},
+  {"__gc",        kbd_gc},
+  {NULL, NULL}
+};
+
+
+LUAMOD_API int lx_open_kbd (lua_State *L) {
+  luaL_newlib(L, kbdlib);
+
+  luaL_newmetatable(L, KEYBOARD);
+  luaL_setfuncs(L, keyboard_meta, 0);
+  lua_pushvalue(L, -1);
+  lua_setfield(L, -2, "__index");
+  lua_pop(L, 1);
+
+  return 1;
+}
+
+
+/* vim: set sts=2 ts=2 sw=2 tw=0 et :*/
diff --git a/src/sysbin/lx/lxlib.h b/src/sysbin/lx/lxlib.h
index 643d5c8..dd31ffb 100644
--- a/src/sysbin/lx/lxlib.h
+++ b/src/sysbin/lx/lxlib.h
@@ -28,6 +28,9 @@ LUAMOD_API int (luaopen_cmsgpack) (lua_State *L);
 #define LX_DRAWLIBNAME "lx.draw"
 LUAMOD_API int (lx_open_draw) (lua_State *L);
 
+#define LX_KBDLIBNAME "lx.kbd"
+LUAMOD_API int (lx_open_kbd) (lua_State *L);
+
 /* open all previous libraries */
 LUALIB_API void (lx_openlibs) (lua_State *L);