nyah :3

src/boot.lua

@@ -1,50 +0,0 @@
--- keycardOS "bootloader", has no access to basalt
--- intended for checking for updates, and automatically updating basalt if it is missing
-
-LAST_USED = os.time()
-
-local function checkForUpdate()
-    current_time = os.time()
-    difference = math.abs(current_time - LAST_USED)
-    print("Checking for update... difference: " .. tostring(difference))
-    --its been considerable time since the keypad was interacted with 
-    --therefore it's time to force an update down the users throat (microsoft moment)
-    -- if difference > 4 then
-    if difference > .5 then
-        --logic for updating
-    end
-
-end
-
-function updateChecker()
-    while true do
-        checkForUpdate()
-        sleep(1)
-    end
-end
-
-local function getBasalt() 
-    if fs.exists("basalt.lua") then
-        mPrint("Basalt found!")
-    else
-        mPrint("Download basalt...")
-        basalt_code = http.get("https://raw.githubusercontent.com/Pyroxenium/Basalt/master/docs/versions/latest.lua").readAll()
-        mPrint("Install basalt...")
-        local file = fs.open("basalt.lua", "w")
-        file.write(basalt_code)
-        file.close()
-        mPrint("Rebooting...")
-        os.reboot()
-    end
-end
-
-KEYPADOS_VERSION = "3.0"
-MONITOR = peripheral.find("monitor")
-
-local function boot()
-    mon_reset(0.5); 
-    mPrint("keypadOS v" .. KEYPADOS_VERSION)
-    mon_reset(1); 
-end
-
-boot()

src/config.lua

@@ -1 +1,3 @@
-correctPin = "42169"
+return {
+    correctPin = "42169"
+}

src/init.lua

@@ -1,8 +0,0 @@
-local basalt = require("basalt")
-local monitor = peripheral.find("monitor")
-local drive   = peripheral.find("drive") 
-local main = basalt.addMonitor()
-main:setMonitor(monitor)
-btnX = 1
-btnY = 3
-pin = ""

src/main.lua

@@ -1,30 +1,23 @@
-pinLabel = main:addLabel()
-    :setText("")
-    :setFontSize(1)
+-- keycardOS "bootloader", has no access to basalt
+-- intended for checking for updates, and automatically updating basalt if it is missing
+local utils = require("utils.lua")
+local updater = require("updater.lua")
+local ui = require("ui.lua")
 
-enterButton = main:addButton()
-    :setText(">>>>")
-    :setBackground(colors.blue)
-    :setPosition(6,3)
-    :setSize(1.5,3.2)
-    :onClick(unlockDoor)
 
-for i = 1, 9 do
-    local button = main:addButton()
-        :setPosition(btnX,btnY)
-        :setText(tostring(i))
-        :setSize(2,1)
-        :onClick(
-            function()
-                addToPin(i)
-            end)
-    btnX = btnX + 2
-    
-    if btnX >= 6 then
-        btnY = btnY + 1
-        btnX = 1
-    end
-    
+
+KEYPADOS_VERSION = "3.0"
+
+function Main()
+    utils.MonPrint(0.5)
+    updater.getBasalt()
+    utils.MonPrint("keypadOS v" .. KEYPADOS_VERSION)
+    utils.MonPrint(1)
+    ui.InitUi()
 end
 
-parallel.waitForAll(basalt.autoUpdate, updateChecker)
+
+return {
+    Main
+}
+

src/ui.lua

@@ -0,0 +1,126 @@
+local basalt = require("basalt")
+local config = require("config.lua")
+local updater = require("updater.lua")
+--- @type Monitor
+local monitor = Cast(peripheral.find("monitor"))
+--- @type drive
+local drive = Cast(peripheral.find("drive"))
+
+--- @class Ui
+--- @field pin string
+--- @field main any
+--- @field pinLabel any
+--- @field enterButton any
+--- @field resetEverything function
+--- @field unlockDoor function
+--- @field addToPin function
+
+--- @param ui Ui
+local function unlockDoor(ui)
+    if drive.isDiskPresent() then
+        if drive.getDiskLabel() == config.correctPin then
+            ui.pin = config.correctPin
+            drive:ejectDisk()
+        end
+    end
+
+    basalt.debug("test")
+    if ui.pin == config.correctPin then
+        ui.enterButton:setBackground(colors.green)
+        ui.pinLabel:setText("Welcome")
+        redstone.setOutput("front", true)
+
+        if drive.isDiskPresent() then
+            if drive.getDiskLabel() == nil then
+                drive.setDiskLabel(config.correctPin)
+                ui.pinLabel:setText("Crd set")
+                drive:ejectDisk()
+            end
+        end
+    else
+        ui.pinLabel:setText("Wrong")
+        ui.enterButton:setBackground(colors.red)
+    end
+    ui.main:addThread()
+        :start(ui.resetEverything)
+end
+
+--- @param ui Ui
+local function resetEverything(ui)
+    sleep(2)
+    ui.pin = ""
+    ui.pinLabel:setText("")
+    redstone.setOutput("front", false)
+    ui.enterButton:setBackground(colors.blue)
+end
+
+--- @param ui Ui
+local function addToPin(ui, i)
+
+    if #ui.pin >= 5 then
+        return
+    end
+
+    ui.pin = ui.pin .. tostring(i)
+    ui.pinLabel:setText(ui.pin)
+end
+
+function InitUi()
+    local ui = {
+        resetEverything,
+        unlockDoor,
+        addToPin,
+        main = basalt.addMonitor(monitor),
+    }
+
+    ui.main:setMonitor(monitor)
+    -- local pinLabel = 
+    ui.pinLabel = ui.main:addLabel()
+        :setText("")
+        :setFontSize(1)
+
+    -- local enterButton = 
+    ui.enterButton = ui.main:addButton()
+        :setText(">>>>")
+        :setBackground(colors.blue)
+        :setPosition(6,3)
+        :setSize(1.5,3.2)
+        :onClick(function()
+            unlockDoor(ui)
+        end)
+
+    local btnX = 1
+    local btnY = 3
+
+    for i = 1, 9 do
+        ui.main:addButton()
+            :setPosition(btnX, btnY)
+            :setText(tostring(i))
+            :setSize(2,1)
+            :onClick(function()
+                addToPin(ui, i)
+            end)
+        btnX = btnX + 2
+        if btnX >= 6 then
+            btnY = btnY + 1
+            btnX = 1
+        end
+
+    end
+
+    local status, _ = pcall(function ()
+        parallel.waitForAll(basalt.autoUpdate, updater.updateChecker)
+    end)
+
+    if not status then
+        monitor.clear()
+        fs.delete("basalt.lua")
+        fs.delete("startup.lua")
+        fs.copy("backup.lua", "startup.lua")
+        os.reboot()
+    end
+end
+
+return {
+    InitUi,
+}

src/unlock_door.lua

@@ -1,49 +0,0 @@
-function unlockDoor()
-
-    if drive.isDiskPresent() then
-        if drive.getDiskLabel() == correctPin then
-            pin = correctPin
-            drive:ejectDisk()
-        end
-    end
-
-    basalt.debug("test")
-    if pin == correctPin then
-        enterButton:setBackground(colors.green)
-        pinLabel:setText("Welcome")
-        redstone.setOutput("front", true)
-        
-        if drive.isDiskPresent() then
-            if drive.getDiskLabel() == nil then
-                drive.setDiskLabel(correctPin)
-                pinLabel:setText("Crd set")
-                drive:ejectDisk()
-            end
-        end
-        
-    else
-        pinLabel:setText("Wrong")
-        enterButton:setBackground(colors.red)
-    end
-    local thread = main:addThread()
-        :start(resetEverything)
-
-end
-
-function resetEverything()
-    sleep(2)
-    pin = ""
-    pinLabel:setText("")
-    redstone.setOutput("front", false)
-    enterButton:setBackground(colors.blue)
-end
-
-function addToPin(i)
-
-    if #pin >= 5 then
-        return
-    end
-
-    pin = pin .. tostring(i)
-    pinLabel:setText(pin)
-end

src/updater.lua

@@ -0,0 +1,64 @@
+local utils = require("utils.lua")
+
+local LAST_USED = os.time()
+
+local function checkForUpdate()
+    local current_time = os.time()
+    local difference = math.abs(current_time - LAST_USED)
+    print("Checking for update... difference: " .. tostring(difference))
+    --its been considerable time since the keypad was interacted with
+    --therefore it's time to force an update down the users throat (microsoft moment)
+    if difference > .5 then
+        local update_code_request = http.get("https://git.mcorangehq.xyz/xomf/keypadOS/raw/branch/main/keypadOS.lua")
+        if update_code_request then
+            local update_code_text = update_code_request.readAll()
+            if update_code_text then
+                if string.find(update_code_text, "^local __BUNDLER_FILES = {}") then
+                    --make backup
+                    fs.copy("startup.lua","backup.lua")
+
+                    --install update
+                    local file = fs.open("startup.lua", "w")
+                    file.write(update_code_text)
+                    file.close()
+                    os.reboot()
+                end
+            end
+        end
+    end
+end
+
+function UpdateChecker()
+    while true do
+        checkForUpdate()
+        sleep(1)
+    end
+end
+
+function GetBasalt()
+    if fs.exists("basalt.lua") then
+        utils.MonPrint("Basalt found!")
+    else
+        utils.MonPrint("Downloading basalt...")
+        local basalt_code = http.get("https://raw.githubusercontent.com/Pyroxenium/Basalt/master/docs/versions/latest.lua").readAll()
+        utils.MonPrint("Installing basalt...")
+
+        local file = fs.open("basalt.lua", "w")
+        if not file then
+            utils.MonPrint("failed to get basalt")
+            sleep(60)
+            os.reboot()
+        end
+
+        file.write(Cast(basalt_code))
+        file.close()
+
+        utils.MonPrint("Rebooting...")
+        os.reboot()
+    end
+end
+
+return {
+    UpdateChecker,
+    GetBasalt
+}

src/utils.lua

@@ -1,11 +1,27 @@
-MONITOR_Y = 1
-function mPrint(text)
-    MONITOR.setCursorPos(1,y)
+--- @type Monitor
+local MONITOR = Cast(peripheral.find("monitor"))
+local MONITOR_Y = 1
+function MonPrint(text)
+    MONITOR.setCursorPos(1,MONITOR_Y)
     MONITOR.write(text)
     MONITOR_Y = MONITOR_Y + 1
 end
 
-function mon_reset(scale) 
+function MonReset(scale)
     MONITOR.clear()
     MONITOR.setTextScale(scale)
 end
+
+-- Type coersion for lsp
+---@generic T
+---@param object any
+---@return T
+function Cast(object)
+    return object
+end
+
+return {
+    MonPrint,
+    MonReset,
+    Cast,
+}