Halyde/halyde/shell/shell.lua

local fs = require("filesystem")
local json = require("json")
if not fs.exists("/halyde/config/shell.json") then -- Auto-generate configs
  fs.copy("/halyde/config/generate/shell.json", "/halyde/config/shell.json")
end
local handle, data, tmpdata = fs.open("/halyde/config/shell.json", "r"), "", nil
repeat
  tmpdata = handle:read(math.huge)
  data = data .. (tmpdata or "")
until not tmpdata
handle:close()
local shellcfg = json.decode(data)
local component = require("component")
local gpu = component.gpu

local workingDirectory = shellcfg["defaultWorkingDirectory"]
local aliases = shellcfg["aliases"]

_G.shell = {}

function _G.shell.getWorkingDirectory()
  return workingDirectory
end

function _G.shell.setWorkingDirectory(dir)
  checkArg(1, dir, "string")
  workingDirectory = dir
end

function _G.shell.getAliases()
  return table.copy(aliases)
end

function _G.shell.addAlias(executable, aliasName)
  checkArg(1, executable, "string")
  checkArg(2, aliasName, "string")
  aliases[aliasName] = executable
end

function _G.shell.removeAlias(aliasName)
  checkArg(1, aliasName, "string")
  aliases[aliasName] = nil
end

local function runAsTask(path, ...)
  --ocelot.log("running " .. path .. " as coroutine")
  tsched.runAsTask(path, ...)
  local pid = tsched.getTasks()[#tsched.getTasks()].id
  while true do
    local foundTask = false
    for _, task in pairs(tsched.getTasks()) do
      if task.id == pid then
        foundTask = true
        break
      end
    end
    if foundTask then
      coroutine.yield()
    else
      break
    end
  end
end

function _G.shell.run(command)
  checkArg(1, command, "string")
  if aliases[command:match("[^ ]+")] then
    local _, cmdend = command:find("[^ ]+")
    command = aliases[command:match("[^ ]+")] .. command:sub(cmdend + 1)
  end
  local gm, result, args, trimmedCommand = command:gmatch("[^ ]+"), nil, {}, command
  while true do
    result = gm()
    if not result then
      break
    end
    if result:find('"') then
      local location = trimmedCommand:find('"')
      local argBefore = result:sub(1, result:find('"') - 1) -- edge case where there is no space before the quote, get the argument there
      if argBefore and argBefore ~= "" then
        table.insert(args, argBefore)
      end
      trimmedCommand = trimmedCommand:sub(location + 1)
      if trimmedCommand:find('"') then
        table.insert(args, trimmedCommand:sub(1, trimmedCommand:find('"') - 1))
        trimmedCommand = trimmedCommand:sub(trimmedCommand:find('"') + 1)
        gm = trimmedCommand:gmatch("[^ ]+")
      else
        print("\27[91mmalformed shell command")
        return
      end
    else
      table.insert(args, result)
    end
  end
  -- execute the program
  local PATH = table.copy(shellcfg.path)
  table.insert(PATH, workingDirectory)
  if not args[1] then
    return
  end
  if fs.exists(args[1]) and not fs.isDirectory(args[1]) then
    local path = args[1]
    table.remove(args, 1)
    runAsTask(path, table.unpack(args))
    return
  end
  for _, item in pairs(PATH) do
    if fs.exists(item .. args[1]) and not fs.isDirectory(item .. args[1]) then
      local path = fs.concat(item, args[1])
      table.remove(args, 1)
      runAsTask(path, table.unpack(args))
      return
    else -- try to look for it without the file extension
      local files = fs.list(item) or {}
      for _, file in pairs(files) do
        -- previous pattern: (.+)%.[^%.]+$
        if args[1] == file:match("(.+)%.[^%.]+$") and not fs.isDirectory(item .. file) then
          table.remove(args, 1)
          runAsTask(item .. file, table.unpack(args))
          return
        end
      end
    end
  end
  print("No such file or command: " .. args[1])
end

local shareTable = ipc.shareWithAll()
shareTable.shell = _G.shell

terminal.clear()

print(shellcfg["startupMessage"]:format(_OSVERSION, shellcfg.splashMessages[math.random(1, #shellcfg.splashMessages)]))
while true do
  coroutine.yield()
  -- print(shell.workingDirectory .. " >")
  --print(shellcfg["prompt"]:format(shell.workingDirectory),false)
  -- termlib.cursorPosX = #(shell.workingDirectory .. " >  ")
  -- termlib.cursorPosY = termlib.cursorPosY - 1
  if workingDirectory:sub(-1, -1) ~= "/" then
    workingDirectory = workingDirectory .. "/"
  end
  local shellCommand = terminal.read("shell", shellcfg.prompt:format(workingDirectory))
  shell.run(shellCommand)
  gpu.freeAllBuffers()
end