-- Lua version check if _VERSION then -- TODO get rid of this string version checking if _VERSION < "Lua 5" then error("Outdated Lua version! modlib requires Lua 5 or greater.") end if _VERSION > "Lua 5.1" then -- not throwing error("Too new Lua version! modlib requires Lua 5.1 or smaller.") anymore unpack = unpack or table.unpack -- unpack was moved to table.unpack in Lua 5.2 loadstring = loadstring or load setfenv = setfenv or function(fn, env) local i = 1 while true do local name = debug.getupvalue(fn, i) if name == "_ENV" then debug.setupvalue(fn, i, env) break elseif not name then break end end return fn end getfenv = getfenv or function(fn) local i = 1 local name, val repeat name, val = debug.getupvalue(fn, i) if name == "_ENV" then return val end i = i + 1 until not name end end end local modules = {} for _, file in pairs{ "schema", "file", "func", "math", "table", "text", "vector", "quaternion", "trie", "kdtree", "hashlist", "hashheap", "heap", "ranked_set", "binary", "b3d", "json", "luon", "bluon", "persistence", "debug", "web" } do modules[file] = file end if minetest then modules.minetest = "minetest" end -- aliases -- more aliases are implemented below: -- modlib.[mod|log|conf|player] are aliases of modlib.minetest.[mod|log|conf|player] respectively modules.string = "text" modules.number = "math" local parent_dir if not minetest then local init_path = arg and arg[0] parent_dir = init_path and init_path:match"^.[/\\]" or "" end local dir_delim = rawget(_G, "DIR_DELIM") or (rawget(_G, "package") and package.config and assert(package.config:match("^(.-)[\r\n]"))) or "/" local function concat_path(path) return table.concat(path, dir_delim) end -- only used if Minetest is available local function get_resource(modname, resource, ...) if not resource then resource = modname modname = minetest.get_current_modname() end return concat_path{minetest.get_modpath(modname), resource, ...} end local function load_module(self, module_name_or_alias) local module_name = modules[module_name_or_alias] if not module_name then -- Handle modlib.[log|player] aliases for the minetest.[log|player] modules if module_name_or_alias == "log" or module_name_or_alias == "player" then return modlib.minetest[module_name_or_alias] end -- no such module return end local environment if module_name ~= module_name_or_alias then -- alias handling environment = self[module_name] else environment = dofile(minetest and get_resource(self.modname, module_name .. ".lua") or (parent_dir .. module_name .. ".lua")) end self[module_name_or_alias] = environment return environment end local rawget, rawset = rawget, rawset modlib = setmetatable({ -- TODO bump on release version = 89, modname = minetest and minetest.get_current_modname(), _RG = setmetatable({}, { __index = function(_, index) return rawget(_G, index) end, __newindex = function(_, index, value) return rawset(_G, index, value) end }), assertdump = minetest and function(v, value) if not v then error(dump(value), 2) end end }, { __index = load_module }) -- Force load file module to pass dir_delim & to set concat_path modlib.file = assert(loadfile(get_resource"file.lua"))(dir_delim) modlib.file.concat_path = concat_path if minetest then -- Force-loading of the minetest, mod and conf modules. -- Also sets modlib.[mod|conf] -> modlib.minetest.[mod|conf] aliases. local ml_mt = modlib.minetest ml_mt.mod.get_resource = get_resource modlib.mod = ml_mt.mod ml_mt.conf.build_setting_tree() modlib.conf = ml_mt.conf -- HACK force load minetest/gametime.lua to ensure that the globalstep is registered earlier than globalsteps of mods depending on modlib dofile(get_resource(modlib.modname, "minetest", "gametime.lua")) local ie = minetest.request_insecure_environment() if ie then -- Force load persistence namespace to pass insecure require -- TODO currently no need to set _G.require, lsqlite3 loads no dependencies that way modlib.persistence = assert(loadfile(get_resource"persistence.lua"))(ie.require) end end -- Run build scripts -- dofile(modlib.mod.get_resource("modlib", "build", "html_entities.lua")) --[[ --modlib.mod.include"test.lua" ]] -- TODO verify localizations suffice return modlib