require.lua

goldfiction

Aug 10th, 2023

661

Never

Add comment

Not a member of Pastebin yet? Sign Up, it unlocks many cool features!

Lua 3.43 KB | None | 0 0

raw download clone embed print report

-- -*- coding: utf8 -*-
-- License: MIT - http://opensource.org/licenses/MIT
-- Filename: require.lua
_G.package = {}
_G.package.cpath = ""
_G.package.loaded = {}
_G.package.loadlib = function() error("NotImplemented: package.loadlib") end
_G.package.path = table.concat({
"?",
"?.lua",
"?/init.lua",
"/lib/?",
"/lib/?.lua",
"/lib/?/init.lua",
"/rom/apis/?",
"/rom/apis/?.lua",
"/rom/apis/?/init.lua",
"/rom/apis/turtle/?",
"/rom/apis/turtle/?.lua",
"/rom/apis/turtle/?/init.lua",
"/rom/apis/command/?",
"/rom/apis/command/?.lua",
"/rom/apis/command/?/init.lua",
}, ";")
_G.package.preload = {}
_G.package.seeall = function(module) error("NotImplemented: package.seeall") end
_G.module = function(m) error("NotImplemented: module") end
local _package_path_loader = function(name)
local fname = name:gsub("%.", "/")
for pattern in package.path:gmatch("[^;]+") do
local fpath = pattern:gsub("%?", fname)
if fs.exists(fpath) and not fs.isDir(fpath) then
local apienv = {}
setmetatable(apienv, {__index = _G})
local apifunc, err = loadfile(fpath)
local ok
if apifunc then
setfenv(apifunc, apienv)
ok, err = pcall(apifunc)
end
if not apifunc or not ok then
error("error loading module '" .. name .. "' from file '" .. fpath .. "'\n\t" .. err)
end
local api = {}
if type(err) == "table" then
api = err
end
for k,v in pairs( apienv ) do
api[k] = v
end
return api
end
end
end
_G.package.loaders = {
function(name)
if package.preload[name] then
return package.preload[name]
else
return "\tno field package.preload['" .. name .. "']"
end
end,
function(name)
local _errors = {}
local fname = name:gsub("%.", "/")
for pattern in package.path:gmatch("[^;]+") do
local fpath = pattern:gsub("%?", fname)
if fs.exists(fpath) and not fs.isDir(fpath) then
return _package_path_loader
else
table.insert(_errors, "\tno file '" .. fpath .. "'")
end
end
return table.concat(_errors, "\n")
end
}
_G.require = function(name)
if package.loaded[name] then
return package.loaded[name]
end
local _errors = {}
for _, searcher in pairs(package.loaders) do
local loader = searcher(name)
if type(loader) == "function" then
local res = loader(name)
if res ~= nil then
package.loaded[name] = res
end
if package.loaded[name] == nil then
package.loaded[name] = true
end
return package.loaded[name]
elseif type(loader) == "string" then
table.insert(_errors, loader)
end
end
error("module '" .. name .. "' not found:\n" .. table.concat(_errors, "\n"))
end

Add Comment

Please, Sign In to add comment