boot.lua

os.pullEvent=os.pullEventRaw
local API_DIRECTORY = "/nekOS/api/"

function table.combine(t,o) for i,v in ipairs(o) do table.insert(t,v) end return t end
function table.merge(t,o) for k,v in pairs(o) do t[k]=v end return t end
function table.keys(t) local r={} for k in pairs(t) do r[#r+1]=k end return r end
function table.values(t) local r={} for _,v in pairs(t) do r[#r+1]=v end return r end
function table.filter(t,f) local r={} for k,v in pairs(t) do r[k]=f(v,k,t) and v or nil end return r end
function table.isArray(t) local m=0 for k,v in pairs(t) do if type(k) ~= "number" then return false end m=math.max(m,k) end return m==#t end
function string.startsWith(s,d) return string.sub(s,1,string.len(d)) == d end
function _G.spairs(t,o) local k=table.keys(t) table.sort(k,not o and nil or function(a,b) return o(t[a],t[b]) end) local i = 0 return function() i = i + 1 if k[i] then return k[i],t[k[i]] end end end

local api = {}
for i,f in ipairs(fs.list(API_DIRECTORY)) do local n=string.match(fs.getName(f),"([^\.]+)") api[n]=require(API_DIRECTORY..n) end
for n,a in spairs(api,function(a,b) return a.LoadOrder > b.LoadOrder end) do _G[n]=a.Build() end

local m = system:getManifest()

for k,v in pairs(m.Settings) do settings.define(k,v) end

local c,t,w,h=0,#table.keys(system:getFileUpdates()),term.getSize()
local l="///nekOS///"
local function progress(m) local p=c/t local j,s=math.floor(p*w),tostring(math.floor(p*1000)/10).."%" term.setCursorPos(1,h-1) term.clearLine() term.write(m) term.setCursorPos(w-string.len(s)+1,h-1) term.write(s) term.setCursorPos(1,h) term.clearLine() for i=1,j do term.blit("#","8","7") end end

term.setTextColor(system.getTextColor())
term.setBackgroundColor(system.getBackgroundColor())
term.clear()

local p = peripheral.find("modem")
local v = os.getComputerID()
if not p or not p.isWireless() then
  local l = "Please attach a wireless modem."
  term.setCursorPos(math.floor((w-string.len(l))/2),math.floor(h/2))
  term.clearLine()
  term.write(l)
  sleep(3)
  os.shutdown()
end
if not p.isOpen(v) then p.open(v) end
if not p.isOpen(65535) then p.open(65535) end

term.setCursorPos(math.floor((w-string.len(l))/2),math.floor(h/2))
for i=1,string.len(l) do term.blit(string.sub(l,i,i),string.sub("edb00000bde",i,i),"7") sleep(1/5) end
sleep(1)

if settings.get("nekos.auto_update") then
  for k,v in system:gupdate() do
    progress("Downloading "..k.."...")
    local s,e=pastebin:get(v.Code,k,true)
    if not s then progress(e) sleep(1) end
    sleep(1/t)
    c=c+1
    u=true
  end

  c,t = 0,#table.keys(system:getLegacyFiles())
  for k in system:glegacy() do
    progress("Removing "..k.."...")
    fs.delete(k)
    c=c+1
    u=true
    sleep(1/t)
  end

  if u then
    system:getUpdate():save("main.manifest")
    os.reboot()
  end
end

term.clear()
term.setCursorPos(1,1)

local user = system:getUser()
app:execute("nekos",user)