cc-mek-scada/pocket/ui/main.lua

--
-- Pocket GUI Root
--

local util         = require("scada-common.util")

local iocontrol    = require("pocket.iocontrol")
local pocket       = require("pocket.pocket")

local diag_apps    = require("pocket.ui.apps.diag_apps")
local dummy_app    = require("pocket.ui.apps.dummy_app")
local guide_app    = require("pocket.ui.apps.guide")
local loader_app   = require("pocket.ui.apps.loader")
local sys_apps     = require("pocket.ui.apps.sys_apps")
local unit_app     = require("pocket.ui.apps.unit")

local home_page    = require("pocket.ui.pages.home_page")

local style        = require("pocket.ui.style")

local core         = require("graphics.core")

local Div          = require("graphics.elements.div")
local MultiPane    = require("graphics.elements.multipane")
local TextBox      = require("graphics.elements.textbox")

local PushButton   = require("graphics.elements.controls.push_button")
local Sidebar      = require("graphics.elements.controls.sidebar")

local SignalBar    = require("graphics.elements.indicators.signal")

local ALIGN = core.ALIGN
local cpair = core.cpair

local APP_ID = pocket.APP_ID

-- create new main view
---@param main graphics_element main displaybox
local function init(main)
    local db = iocontrol.get_db()

    local main_pane = Div{parent=main,x=1,y=2}

    -- window header message and connection status
    TextBox{parent=main,y=1,text="EARLY ACCESS ALPHA S   C  ",alignment=ALIGN.LEFT,height=1,fg_bg=style.header}
    local svr_conn = SignalBar{parent=main,y=1,x=22,compact=true,colors_low_med=cpair(colors.red,colors.yellow),disconnect_color=colors.lightGray,fg_bg=cpair(colors.green,colors.gray)}
    local crd_conn = SignalBar{parent=main,y=1,x=26,compact=true,colors_low_med=cpair(colors.red,colors.yellow),disconnect_color=colors.lightGray,fg_bg=cpair(colors.green,colors.gray)}

    db.ps.subscribe("svr_conn_quality", svr_conn.set_value)
    db.ps.subscribe("crd_conn_quality", crd_conn.set_value)

    local page_div = Div{parent=main_pane,x=4,y=1}

    -- create all the apps & pages
    home_page(page_div)
    unit_app(page_div)
    guide_app(page_div)
    loader_app(page_div)
    sys_apps(page_div)
    diag_apps(page_div)
    dummy_app(page_div)

    -- verify all apps were created
    assert(util.table_len(db.nav.get_containers()) == APP_ID.NUM_APPS, "app IDs were not sequential or some apps weren't registered")

    db.nav.set_pane(MultiPane{parent=page_div,x=1,y=1,panes=db.nav.get_containers()})
    db.nav.set_sidebar(Sidebar{parent=main_pane,x=1,y=1,height=18,fg_bg=cpair(colors.white,colors.gray)})

    PushButton{parent=main_pane,x=1,y=19,text="\x1b",min_width=3,fg_bg=cpair(colors.white,colors.gray),active_fg_bg=cpair(colors.gray,colors.black),callback=db.nav.nav_up}

    db.nav.open_app(APP_ID.ROOT)
end

return init