mirror of
https://github.com/kepler155c/opus
synced 2024-11-15 21:24:49 +00:00
378 lines
8.4 KiB
Lua
378 lines
8.4 KiB
Lua
local Blit = require('opus.ui.blit')
|
|
local Config = require('opus.config')
|
|
local Util = require('opus.util')
|
|
|
|
local colors = _G.colors
|
|
local fs = _G.fs
|
|
local kernel = _G.kernel
|
|
local keys = _G.keys
|
|
local os = _G.os
|
|
local printError = _G.printError
|
|
local window = _G.window
|
|
|
|
local parentTerm = _G.device.terminal
|
|
local w,h = parentTerm.getSize()
|
|
local overviewId
|
|
local tabsDirty = false
|
|
local closeInd = Util.getVersion() >= 1.76 and '\215' or '*'
|
|
local multishell = { }
|
|
|
|
_ENV.multishell = multishell
|
|
|
|
kernel.window.reposition(1, 2, w, h - 1)
|
|
|
|
local config = {
|
|
standard = {
|
|
textColor = colors.lightGray,
|
|
tabBarTextColor = colors.lightGray,
|
|
focusTextColor = colors.white,
|
|
backgroundColor = colors.gray,
|
|
tabBarBackgroundColor = colors.gray,
|
|
focusBackgroundColor = colors.gray,
|
|
errorColor = colors.black,
|
|
},
|
|
color = {
|
|
textColor = colors.lightGray,
|
|
tabBarTextColor = colors.lightGray,
|
|
focusTextColor = colors.white,
|
|
backgroundColor = colors.gray,
|
|
tabBarBackgroundColor = colors.gray,
|
|
focusBackgroundColor = colors.gray,
|
|
errorColor = colors.red,
|
|
},
|
|
}
|
|
Config.load('multishell', config)
|
|
|
|
local _colors = parentTerm.isColor() and config.color or config.standard
|
|
local palette = parentTerm.isColor() and Blit.colorPalette or Blit.grayscalePalette
|
|
|
|
local function redrawMenu()
|
|
if not tabsDirty then
|
|
os.queueEvent('multishell_redraw')
|
|
tabsDirty = true
|
|
end
|
|
end
|
|
|
|
function multishell.getFocus()
|
|
local currentTab = kernel.getFocused()
|
|
return currentTab.uid
|
|
end
|
|
|
|
function multishell.setFocus(tabId)
|
|
return kernel.raise(tabId)
|
|
end
|
|
|
|
function multishell.getTitle(tabId)
|
|
local tab = kernel.find(tabId)
|
|
return tab and tab.title
|
|
end
|
|
|
|
function multishell.setTitle(tabId, title)
|
|
local tab = kernel.find(tabId)
|
|
if tab then
|
|
tab.title = title
|
|
redrawMenu()
|
|
end
|
|
end
|
|
|
|
function multishell.getCurrent()
|
|
local runningTab = kernel.getCurrent()
|
|
return runningTab and runningTab.uid
|
|
end
|
|
|
|
function multishell.getTab(tabId)
|
|
return kernel.find(tabId)
|
|
end
|
|
|
|
function multishell.terminate(tabId)
|
|
os.queueEvent('multishell_terminate', tabId)
|
|
end
|
|
|
|
function multishell.getTabs()
|
|
return kernel.routines
|
|
end
|
|
|
|
function multishell.launch(env, path, ...)
|
|
-- backwards compatibility
|
|
return multishell.openTab(env, {
|
|
path = path,
|
|
args = { ... },
|
|
})
|
|
end
|
|
|
|
local function chain(orig, fn)
|
|
if not orig then
|
|
return fn
|
|
end
|
|
|
|
if type(orig) == 'table' then
|
|
table.insert(orig, fn)
|
|
return orig
|
|
end
|
|
|
|
return setmetatable({ orig, fn }, {
|
|
__call = function(self, ...)
|
|
for _,v in pairs(self) do
|
|
v(...)
|
|
end
|
|
end
|
|
})
|
|
end
|
|
|
|
function multishell.openTab(env, tab)
|
|
if not tab.title and tab.path then
|
|
tab.title = fs.getName(tab.path):match('([^%.]+)')
|
|
end
|
|
tab.title = tab.title or 'untitled'
|
|
tab.window = tab.window or window.create(parentTerm, 1, 2, w, h - 1, false)
|
|
-- require('opus.terminal').window(parentTerm, 1, 2, w, h - 1, false)
|
|
tab.onExit = chain(tab.onExit, function(self, result, err, stack)
|
|
if not result and err and err ~= 'Terminated' then
|
|
self.terminal.setTextColor(colors.white)
|
|
self.terminal.setCursorBlink(false)
|
|
print('\nThe program terminated with an error.\n')
|
|
if tonumber(err) then
|
|
printError('Process exited with error code: ' .. err)
|
|
elseif err then
|
|
printError(tostring(err))
|
|
end
|
|
if type(stack) == 'table' and #stack > 0 then
|
|
local _, cy = self.terminal.getCursorPos()
|
|
local _, th = self.terminal.getSize()
|
|
self.terminal.setTextColor(colors.white)
|
|
if cy < th - 4 then
|
|
print('\nstack traceback:')
|
|
for _, v in ipairs(stack or { }) do
|
|
_, cy = self.terminal.getCursorPos()
|
|
if cy > th - 3 then
|
|
print(' ...')
|
|
break
|
|
end
|
|
print(v)
|
|
end
|
|
end
|
|
end
|
|
self.terminal.setTextColor(parentTerm.isColor() and colors.yellow or colors.white)
|
|
_G.write('\nPress enter to close')
|
|
self.isDead = true
|
|
self.hidden = false
|
|
redrawMenu()
|
|
while true do
|
|
local e, code = os.pullEventRaw('key')
|
|
if e == 'terminate' or e == 'key' and code == keys.enter then
|
|
break
|
|
end
|
|
end
|
|
end
|
|
end)
|
|
|
|
local routine, message = kernel.run(env, tab)
|
|
|
|
if routine then
|
|
if tab.focused then
|
|
multishell.setFocus(routine.uid)
|
|
else
|
|
redrawMenu()
|
|
end
|
|
end
|
|
|
|
return routine and routine.uid, message
|
|
end
|
|
|
|
function multishell.hideTab(tabId)
|
|
local tab = kernel.find(tabId)
|
|
if tab then
|
|
tab.hidden = true
|
|
kernel.lower(tab.uid)
|
|
redrawMenu()
|
|
end
|
|
end
|
|
|
|
function multishell.unhideTab(tabId)
|
|
local tab = kernel.find(tabId)
|
|
if tab then
|
|
tab.hidden = false
|
|
redrawMenu()
|
|
end
|
|
end
|
|
|
|
function multishell.getCount()
|
|
return #kernel.routines
|
|
end
|
|
|
|
kernel.hook('kernel_focus', function()
|
|
redrawMenu()
|
|
end)
|
|
|
|
kernel.hook('multishell_terminate', function(_, eventData)
|
|
local tab = kernel.find(eventData[1])
|
|
if tab and not tab.isOverview then
|
|
if coroutine.status(tab.co) ~= 'dead' then
|
|
tab:resume("terminate")
|
|
end
|
|
end
|
|
return true
|
|
end)
|
|
|
|
kernel.hook('terminate', function()
|
|
return kernel.getFocused().isOverview
|
|
end)
|
|
|
|
kernel.hook('multishell_redraw', function()
|
|
tabsDirty = false
|
|
|
|
local blit = Blit(w, {
|
|
bg = _colors.tabBarBackgroundColor,
|
|
fg = _colors.textColor,
|
|
palette = palette,
|
|
})
|
|
|
|
local currentTab = kernel.getFocused()
|
|
|
|
for _,tab in pairs(kernel.routines) do
|
|
if tab.hidden and tab ~= currentTab then
|
|
tab.width = 0
|
|
else
|
|
tab.width = #tab.title + 1
|
|
end
|
|
end
|
|
|
|
local function width()
|
|
local tw = 0
|
|
Util.each(kernel.routines, function(t) tw = tw + t.width end)
|
|
return tw
|
|
end
|
|
|
|
while width() > w - 3 do
|
|
local tab = select(2,
|
|
Util.spairs(kernel.routines, function(a, b) return a.width > b.width end)())
|
|
tab.width = tab.width - 1
|
|
end
|
|
|
|
local function compareTab(a, b)
|
|
if a.hidden then return false end
|
|
return b.hidden or a.uid < b.uid
|
|
end
|
|
|
|
local tabX = 0
|
|
for _,tab in Util.spairs(kernel.routines, compareTab) do
|
|
if tab.width > 0 then
|
|
tab.sx = tabX + 1
|
|
tab.ex = tabX + tab.width
|
|
tabX = tabX + tab.width
|
|
if tab ~= currentTab then
|
|
local textColor = tab.isDead and _colors.errorColor or _colors.textColor
|
|
blit:write(tab.sx, tab.title:sub(1, tab.width - 1),
|
|
_colors.backgroundColor, textColor)
|
|
end
|
|
end
|
|
end
|
|
|
|
if currentTab then
|
|
if currentTab.sx then
|
|
local textColor = currentTab.isDead and _colors.errorColor or _colors.focusTextColor
|
|
blit:write(currentTab.sx - 1,
|
|
' ' .. currentTab.title:sub(1, currentTab.width - 1) .. ' ',
|
|
_colors.focusBackgroundColor, textColor)
|
|
end
|
|
if not currentTab.noTerminate then
|
|
blit:write(w, closeInd, nil, _colors.focusTextColor)
|
|
end
|
|
end
|
|
|
|
parentTerm.setCursorPos(1, 1)
|
|
parentTerm.blit(blit.text, blit.fg, blit.bg)
|
|
|
|
if currentTab and currentTab.window then
|
|
currentTab.window.restoreCursor()
|
|
end
|
|
|
|
return true
|
|
end)
|
|
|
|
kernel.hook('term_resize', function(_, eventData)
|
|
if not eventData[1] then --- TEST
|
|
w,h = parentTerm.getSize()
|
|
|
|
local windowHeight = h-1
|
|
|
|
for _,key in pairs(Util.keys(kernel.routines)) do
|
|
local tab = kernel.routines[key]
|
|
local x,y = tab.window.getCursorPos()
|
|
if y > windowHeight then
|
|
tab.window.scroll(y - windowHeight)
|
|
tab.window.setCursorPos(x, windowHeight)
|
|
end
|
|
tab.window.reposition(1, 2, w, windowHeight)
|
|
end
|
|
|
|
redrawMenu()
|
|
end
|
|
end)
|
|
|
|
kernel.hook('mouse_click', function(_, eventData)
|
|
if not eventData[4] then
|
|
local x, y = eventData[2], eventData[3]
|
|
|
|
if y == 1 then
|
|
if x == 1 then
|
|
multishell.setFocus(overviewId)
|
|
elseif x == w then
|
|
local currentTab = kernel.getFocused()
|
|
if currentTab then
|
|
multishell.terminate(currentTab.uid)
|
|
end
|
|
else
|
|
for _,tab in pairs(kernel.routines) do
|
|
if not tab.hidden and tab.sx then
|
|
if x >= tab.sx and x <= tab.ex then
|
|
multishell.setFocus(tab.uid)
|
|
break
|
|
end
|
|
end
|
|
end
|
|
end
|
|
return true
|
|
end
|
|
eventData[3] = eventData[3] - 1
|
|
end
|
|
end)
|
|
|
|
kernel.hook({ 'mouse_up', 'mouse_drag' }, function(_, eventData)
|
|
if not eventData[4] then
|
|
eventData[3] = eventData[3] - 1
|
|
end
|
|
end)
|
|
|
|
kernel.hook('mouse_scroll', function(_, eventData)
|
|
if not eventData[4] then
|
|
if eventData[3] == 1 then
|
|
return true
|
|
end
|
|
eventData[3] = eventData[3] - 1
|
|
end
|
|
end)
|
|
|
|
kernel.hook('kernel_ready', function()
|
|
overviewId = multishell.openTab(_ENV, {
|
|
path = 'sys/apps/shell.lua',
|
|
args = { config.launcher or 'sys/apps/Overview.lua' },
|
|
isOverview = true,
|
|
noTerminate = true,
|
|
focused = true,
|
|
title = '+',
|
|
onExit = function(_, s, m)
|
|
if not s then
|
|
kernel.halt(s, m)
|
|
end
|
|
end,
|
|
})
|
|
multishell.setTitle(overviewId, '+')
|
|
|
|
multishell.openTab(_ENV, {
|
|
path = 'sys/apps/shell.lua',
|
|
args = { 'sys/apps/autorun.lua' },
|
|
title = 'Autorun',
|
|
})
|
|
end)
|