Initial commit

1 files changed, 43 insertions, 0 deletions

diff --git a/src/main.c b/src/main.c
new file mode 100644
index 0000000..7b3bd26
--- /dev/null
+++ b/src/main.c
@@ -0,0 +1,43 @@
+#include <stdio.h>
+#include <stdlib.h>
+
+#include <lua.h>
+#include <lauxlib.h>
+#include <lualib.h>
+
+int luaopen_hpdf(lua_State *L);
+
+extern const char mkpdf_lua[];
+extern const unsigned long mkpdf_lua_size;
+
+int main(int argc, char **argv)
+{
+    lua_State *L;
+    int rc = 0;
+
+    L = luaL_newstate();
+
+    luaL_openlibs(L);
+
+    lua_getglobal(L, "package");
+    lua_getfield(L, -1, "preload");
+    lua_pushcfunction(L, luaopen_hpdf);
+    lua_setfield(L, -2, "hpdf");
+    lua_pop(L, 2);
+
+    if (luaL_dostring(L, mkpdf_lua))
+    {
+        fprintf(stderr, "%s\n", lua_tostring(L, -1));
+        rc = 1;
+    }
+
+    if (luaL_dofile(L, argv[1]))
+    {
+        fprintf(stderr, "%s\n", lua_tostring(L, -1));
+        rc = 1;
+    }
+
+    lua_close(L);
+
+    return rc;
+}