opus/sys/apps/system/cloud.lua

local Ansi   = require('opus.ansi')
local Config = require('opus.config')
local UI     = require('opus.ui')

local colors = _G.colors

-- -t80x30

if _G.http.websocket then
	local config = Config.load('cloud')

	local tab = UI.Tab {
		tabTitle = 'Cloud',
		description = 'Cloud Catcher options',
		key = UI.TextEntry {
			x = 3, ex = -3, y = 2,
			limit = 32,
			value = config.key,
			shadowText = 'Cloud key',
			accelerators = {
				enter = 'update_key',
			},
		},
		button = UI.Button {
			x = 3, y = 4,
			text = 'Update',
			event = 'update_key',
		},
		labelText = UI.TextArea {
			x = 3, ex = -3, y = 6,
			textColor = colors.yellow,
			marginLeft = 0, marginRight = 0,
			value = string.format(
[[Use a non-changing cloud key. Note that only a single computer can use this session at one time.
To obtain a key, visit:
%shttps://cloud-catcher.squiddev.cc%s then bookmark:
%shttps://cloud-catcher.squiddev.cc/?id=KEY
		]],
			Ansi.white, Ansi.reset, Ansi.white),
		},
	}

	function tab:eventHandler(event)
		if event.type == 'update_key' then
			if #self.key.value > 0 then
				config.key = self.key.value
			else
				config.key = nil
			end
			Config.update('cloud', config)
			self:emit({ type = 'success_message', message = 'Updated' })
		end
	end

	return tab
end