actual initial commit smh

2026-06-20 21:21:19 +03:00
parent fff0e5ada5
commit 85978ee33d
219 changed files with 12350 additions and 1 deletions
@@ -0,0 +1,92 @@
+local loadfile, lz4 = ...
+local filesystem = assert(loadfile("/lib/filesystem.lua")(loadfile))
+_G._OSVERSION = "HALYDE VERSION" -- TODO: Put this in a separate config file
+_G._PUBLIC = {}
+_G._PUBLIC.unicode = assert(loadfile("/lib/unicode.lua")(loadfile))
+local component = assert(loadfile("/lib/component.lua")(loadfile))
+local gpu = component.gpu
+local screenAddress = component.list("screen")()
+
+_G.lz4 = lz4
+_G._PUBLIC.lz4 = lz4
+
+gpu.bind(screenAddress)
+gpu.setResolution(gpu.maxResolution())
+
+local log = assert(loadfile("/lib/log.lua")(loadfile))
+_G.profiler = assert(loadfile("/lib/profiler.lua")())
+
+log.kernel.info("Bound GPU to screen " .. tostring(screenAddress))
+
+_G.package = { ["preloaded"] = {} }
+
+function _G.reqgen(load)
+  return function(module, ...)
+    local args = table.pack(...)
+    if package.preloaded[module] then
+      return package.preloaded[module]
+    end
+    local modulepath
+    if filesystem.exists(module) and not filesystem.isDirectory(module) then
+      modulepath = module
+    elseif
+      filesystem.exists("/lib/" .. module .. ".lua") and not filesystem.isDirectory("/lib/" .. module .. ".lua")
+    then
+      modulepath = "/lib/" .. module .. ".lua"
+    elseif
+      shell
+      and shell.workingDirectory
+      and filesystem.exists(filesystem.concat(shell.workingDirectory, module .. ".lua"))
+      and not filesystem.isDirectory(filesystem.concat(shell.workingDirectory, module .. ".lua"))
+    then
+      modulepath = shell.workingDirectory .. module .. ".lua"
+    end
+    assert(modulepath, "Module not found\nPossible locations:\n/lib/" .. module .. ".lua") -- FIXME: When providing an absolute path, this spits out some weird stuff.
+    local handle, data, tmpdata = filesystem.open(modulepath), "", nil
+    repeat
+      tmpdata = handle:read(math.huge or math.maxinteger)
+      data = data .. (tmpdata or "")
+    until not tmpdata
+    handle:close()
+    return (assert(load(lz4(data), "=" .. modulepath))(table.unpack(args)))
+  end
+end
+
+_G.require = reqgen(_G.load)
+log.kernel.info("Generated userland require function")
+
+function _G.package.preload(module)
+  local handle, data, tmpdata = assert(filesystem.open("/lib/" .. module .. ".lua", "r")), "", nil
+  repeat
+    tmpdata = handle:read(math.huge or math.maxinteger)
+    data = data .. (tmpdata or "")
+  until not tmpdata
+  handle:close()
+  package.preloaded[module] = assert(load(lz4(data), "=" .. module))()
+  _G[module] = nil
+  log.kernel.info(string.format("Pre-loaded /lib/%s.lua", module))
+end
+
+require("/halyde/kernel/datatools.lua") -- If this is not imported BEFORE modload gets run, modload requires filesystem which requires computer which requires datatools. TODO: When VFS is implemented, make the pre-VFS loading of filesystem load a more basic version. And remove this.
+log.kernel.info("Loading modules")
+require("/halyde/kernel/modload.lua")
+
+local toPreload = { "component", "computer", "log", "event" }
+for _, p in pairs(toPreload) do
+  profiler.profile("pre-loading " .. p, package.preload, p)
+end
+
+local computer = require("computer")
+function wait(seconds)
+  local oldTime = computer.uptime()
+  while computer.uptime() < oldTime + seconds do
+    coroutine.yield()
+  end
+end
+
+if not filesystem.exists("/halyde/config/startupapps.json") then
+  filesystem.copy("/halyde/config/generate/startupapps.json", "/halyde/config/startupapps.json")
+end
+
+log.kernel.info("Starting tsched")
+require("/halyde/kernel/tsched.lua")