OC-PsychOS2/exec/shell.lua

58 lines
1.3 KiB
Lua
Raw Normal View History

2019-07-14 20:52:56 +10:00
print(pcall(function()
2018-11-03 03:05:41 +11:00
local shenv = {}
function shenv.quit()
os.setenv("run",nil)
end
function shenv.cd(p)
if p:sub(1,1) == "/" then
if fs.list(p) then
os.setenv("PWD",p)
else
print("no such directory: "..p)
end
else
local np = {}
for k,v in pairs(fs.segments(os.getenv("PWD").."/"..p)) do
if v == ".." then
np[#np] = nil
else
np[#np+1] = v
end
end
os.setenv("PWD","/"..table.concat(np,"/"))
end
end
setmetatable(shenv,{__index=function(_,k)
if _G[k] then
return _G[k]
elseif fs.exists("/boot/exec/"..k..".lua") then
local rqid = string.format("shell-%d",math.random(1,99999))
return function(...)
local tA = {...}
local pid = os.spawn(function() computer.pushSignal(rqid,pcall(loadfile("/boot/exec/"..k..".lua"),table.unpack(tA))) end,"/boot/exec/"..k..".lua")
local tE = {}
repeat
tE = {coroutine.yield()}
if tE[1] == rqid then
table.remove(tE,1)
if tE[1] == true then
table.remove(tE,1)
end
return table.unpack(tE)
end
until tTasks[pid] == nil
end
end
end})
print(_VERSION)
os.setenv("run",true)
while os.getenv("run") do
io.write((os.getenv("PWD") or _VERSION).."> ")
2018-11-03 03:05:41 +11:00
tResult = {pcall(load(io.read(),"shell","t",shenv))}
if tResult[1] == true then table.remove(tResult,1) end
2018-11-03 03:05:41 +11:00
for k,v in pairs(tResult) do
print(v)
end
end
2019-07-14 20:52:56 +10:00
end))