util.pluginloader: Initial commit - a plugin resource loader

diff --git a/util/pluginloader.lua b/util/pluginloader.lua
new file mode 100644 (file)
index 0000000..1bf22f6
--- /dev/null
+++ b/util/pluginloader.lua
@@ -0,0 +1,33 @@
+
+local plugin_dir = CFG_PLUGINDIR or "./plugins/";
+
+local io_open = io.open;
+local loadstring = loadstring;
+
+module "pluginloader"
+
+local function load_file(name)
+       local file, err = io_open(plugin_dir..name);
+       if not file then return file, err; end
+       local content = file:read("*a");
+       file:close();
+       return content, name;
+end
+
+function load_resource(plugin, resource)
+       if not resource then
+               resource = "mod_"..plugin..".lua";
+       end
+       local content, err = load_file(plugin.."/"..resource);
+       if not content then content, err = load_file(resource); end
+       -- TODO add support for packed plugins
+       return content, err;
+end
+
+function load_code(plugin, resource)
+       local content, err = load_resource(plugin, resource);
+       if not content then return content, err; end
+       return loadstring(content, err), err;
+end
+
+return _M;