add command completion to console

modules/console/console.lua

@@ -30,6 +30,57 @@ local function navigateCommand(step)
   end
 end
 
+local function completeCommand()
+  local cursorPos = commandLineEdit:getCursorPos()
+  if cursorPos == 0 then return end
+
+  local commandBegin = string.sub(commandLineEdit:getText(), 1, cursorPos)
+  local possibleCommands = {}
+
+  -- create a list containing all globals
+  local allVars = table.copy(_G)
+  table.merge(allVars, commandEnv)
+
+  -- match commands
+  for k,v in pairs(allVars) do
+    if string.sub(k, 1, cursorPos) == commandBegin then
+      table.insert(possibleCommands, k)
+    end
+  end
+
+  -- complete command with one match
+  if #possibleCommands == 1 then
+    commandLineEdit:setText(possibleCommands[1])
+  -- show command matches
+  elseif #possibleCommands > 0 then
+    print('>> ' .. commandBegin)
+
+    -- expand command
+    local expandedComplete = commandBegin
+    local done = false
+    while not done do
+      cursorPos = #commandBegin+1
+      if #possibleCommands[1] < cursorPos then
+        break
+      end
+      expandedComplete = commandBegin .. string.sub(possibleCommands[1], cursorPos, cursorPos)
+      for i,v in ipairs(possibleCommands) do
+        if string.sub(v, 1, #expandedComplete) ~= expandedComplete then
+          done = true
+        end
+      end
+      if not done then
+        commandBegin = expandedComplete
+      end
+    end
+    commandLineEdit:setText(commandBegin)
+
+    for i,v in ipairs(possibleCommands) do
+      print(v)
+    end
+  end
+end
+
 local function onKeyPress(widget, keyCode, keyChar, keyboardModifiers)
   if keyboardModifiers == KeyboardNoModifier then
     -- execute current command
@@ -46,6 +97,10 @@ local function onKeyPress(widget, keyCode, keyChar, keyboardModifiers)
     elseif keyCode == KeyDown then
       navigateCommand(-1)
       return true
+    -- complete command
+    elseif keyCode == KeyTab then
+      completeCommand()
+      return true
     end
   end
   return false
@@ -102,6 +157,18 @@ function Console.addLine(text, color)
 end
 
 function Console.executeCommand(command)
+  -- detect and convert commands with simple syntax
+  local realCommand
+  if commandEnv[command] then
+    if type(commandEnv[command]) == "function" then
+      realCommand = command .. '()'
+    else
+      realCommand = 'print(' .. command .. ')'
+    end
+  else
+    realCommand = command
+  end
+
   -- reset current history index
   currentHistoryIndex = 0
 
@@ -112,7 +179,7 @@ function Console.executeCommand(command)
   Console.addLine(">> " .. command, "#ffffff")
 
   -- load command buffer
-  local func, err = loadstring(command, "@")
+  local func, err = loadstring(realCommand, "@")
 
   -- check for syntax errors
   if not func then

modules/console/console.otui

@@ -33,4 +33,5 @@ RectPanel
     anchors.bottom: parent.bottom
     anchors.left: commandSymbolLabel.right
     anchors.right: parent.right
+    margin.left: 5
     font: terminus-14px-bold

modules/core/core.otmod

@@ -10,6 +10,8 @@ Module
     - core_ui
 
   onLoad: |
+    require 'ext/table'
+    require 'ext/string'
     require 'constants'
     require 'util'
     require 'widget'

modules/core/messagebox/messagebox.lua

@@ -19,7 +19,7 @@ function MessageBox.create(title, text, flags)
   label:resizeToText()
 
   -- set window size based on label size
-  window:setWidth(label:getWidth() + 48)
+  window:setWidth(math.max(label:getWidth() + 48, 120))
   window:setHeight(label:getHeight() + 64)
   window:updateParentLayout()
 

modules/core/util.lua

@@ -24,3 +24,9 @@ function connect(object, signalsAndSlots)
     end
   end
 end
+
+function dumpWidgets()
+  for i=1,UI.root:getChildCount() do
+    print(UI.root:getChildByIndex(i):getId())
+  end
+end

modules/core_ui/styles/panels.otui

@@ -8,9 +8,9 @@ FlatPanel < Panel
 
 TopPanel < Panel
   height: 34
-  border-image:
+  image:
     source: /core_ui/images/top_panel.png
-    border-bottom: 3
+    repeated: true
 
 RoundedPanel < Panel
   background-color: #ffffffdd

modules/mainmenu/ui/mainmenu.otui

@@ -14,4 +14,5 @@ Panel
   anchors.left: parent.left
   anchors.right: parent.right
   anchors.bottom: parent.bottom
+  margin.top: 1
   focusable: false

modules/topmenu/topmenu.otui

@@ -34,17 +34,6 @@ TopPanel
     margin.top: 3
     margin.right: 6
 
-    UIWidget
-      size: 16 16
-      image: /core_ui/icons/exit.png
-      anchors.centerIn: parent
-      phantom: true
-
-  TopButton
-    anchors.top: prev.top
-    anchors.right: prev.left
-    margin.right: 6
-
     UIWidget
       size: 16 16
       image: /core_ui/icons/logout.png