Added lua vm and execution

Updated tstl to 0.10.0

Author: lolleko

package-lock.json

@@ -30,8 +30,8 @@
   },
   "dependencies": {
     "@types/url-parse": "^1.4.1",
-    "fengari": "^0.1.2",
+    "fengari-web": "^0.1.2",
     "monaco-editor": "^0.14.3",
-    "typescript-to-lua": "file:../typescript-to-lua-0.9.0.tgz"
+    "typescript-to-lua": "^0.10.0"
   }
 }

package.json

@@ -13,3 +13,5 @@ interface FSDummy {
 interface Window {
     fs: FSDummy
 }
+
+declare module 'fengari-web';

src/custom.d.ts

@@ -1,5 +1,53 @@
-//import {lauxlib, lua, lualib, to_jsstring, to_luastring } from "fengari";
+import {lauxlib, lua, lualib, to_jsstring, to_luastring, interop } from "fengari-web";
+
+declare var self: any;
+
+function executeLua(luaStr: string): any {
+    // clear print buffer and patch lua print
+    self.printStream = "";
+    const printToGlobal = `
+local js = require "js"
+local oldPrint = print
+_G.print = function(...)
+    local elements = table.pack(...)
+    for i = 1, elements.n do
+      js.global.printStream = js.global.printStream .. tostring(elements[i]) .. "\\t"
+    end
+    js.global.printStream = js.global.printStream .. "\\n"
+end
+`;
+
+    luaStr = printToGlobal + luaStr;
+
+    const L = lauxlib.luaL_newstate();
+    lualib.luaL_openlibs(L);
+    lauxlib.luaL_requiref(L, to_luastring("js"), interop.luaopen_js, 1);
+    lua.lua_pop(L, 1);
+    const status = lauxlib.luaL_dostring(L, to_luastring(luaStr));
+
+    if (status === lua.LUA_OK) {
+        // Read the return value from stack depending on its type.
+        if (lua.lua_isboolean(L, -1)) {
+            return lua.lua_toboolean(L, -1);
+        } else if (lua.lua_isnil(L, -1)) {
+            return null;
+        } else if (lua.lua_isnumber(L, -1)) {
+            return lua.lua_tonumber(L, -1);
+        } else if (lua.lua_isstring(L, -1)) {
+            return lua.lua_tojsstring(L, -1);
+        } else {
+            throw new Error("Unsupported lua return type: " + to_jsstring(lua.lua_typename(L, lua.lua_type(L, -1))));
+        }
+    } else {
+        // If the lua VM did not terminate with status code LUA_OK an error occurred.
+        // Throw a JS error with the message, retrieved by reading a string from the stack.
+
+        // Filter control characters out of string which are in there because ????
+        throw new Error("LUA ERROR: " + to_jsstring(lua.lua_tostring(L, -1).filter((c: number) => c >= 20)));
+    }
+}
 
 onmessage = (event: MessageEvent) => {
-    //postMessage({luaStr: transpileString(event.data.tsStr)});
+    executeLua(event.data.luaStr);
+    postMessage({luaPrint: self.printStream});
 };

src/fengariWorker.ts

@@ -4,8 +4,11 @@ import {editor} from 'monaco-editor/esm/vs/editor/editor.api';
 
 import TSTLWorker = require('worker-loader!./tstlWorker');
 
+import FengariWorker = require('worker-loader!./fengariWorker');
+
 document.addEventListener('DOMContentLoaded', () => {
   const container = document.getElementById('example-ts');
+  const output = document.getElementById('example-output');
   const exampleLua = document.getElementById('example-lua');
 
   let example = `// Declare exposed API
@@ -87,8 +90,17 @@ document.addEventListener('DOMContentLoaded', () => {
       }
     }
 
+    const fengariWorker = new (FengariWorker as any)();
+
     tstlWorker.onmessage = (event: MessageEvent) => {
       luaEditor.setValue(event.data.luaStr);
+      fengariWorker.postMessage({luaStr: event.data.luaStr});
+    }
+
+    fengariWorker.onmessage = (event: MessageEvent) => {
+      if (output) {
+        output.innerText = event.data.luaPrint;
+      }
     }
   }
 });