From 10ce504e5defe8411f089c796dea370e9e14d014 Mon Sep 17 00:00:00 2001
From: Benoit Giannangeli <giann008@gmail.com>
Date: Wed, 9 Aug 2017 10:35:45 +0200
Subject: luaL_loadfile will load via xhr in the browser

---
 src/loadlib.js | 18 +++++++++++++++++-
 1 file changed, 17 insertions(+), 1 deletion(-)

(limited to 'src/loadlib.js')

diff --git a/src/loadlib.js b/src/loadlib.js
index e448381..9400bb0 100644
--- a/src/loadlib.js
+++ b/src/loadlib.js
@@ -34,7 +34,7 @@ const AUXMARK       = [1];
 ** Returns the library; in case of error, returns NULL plus an
 ** error string in the stack.
 */
-const lsys_load = function(L, path) {
+let lsys_load = function(L, path) {
     try {
         path = lua.to_jsstring(path);
 
@@ -65,6 +65,22 @@ const lsys_sym = function(L, lib, sym) {
     }
 };
 
+if (WEB) {
+    lsys_load = function(L, path) {
+        let xhr = new XMLHttpRequest();
+        xhr.open("GET", lua.to_jsstring(path), false);
+        xhr.send();
+        /* TODO: subresource integrity check? */
+
+        if (xhr.status === 200) {
+            return eval(xhr.response);
+        } else {
+            lua.lua_pushstring(L, lua.to_luastring(`${xhr.status}: ${xhr.statusText}`));
+            return null;
+        }
+    };
+}
+
 /*
 ** return registry.LUA_NOENV as a boolean
 */
-- 
cgit v1.2.3-54-g00ecf