49 lines
1.1 KiB
Lua
49 lines
1.1 KiB
Lua
print(pcall(function()
|
|
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
|
|
return function(...)
|
|
local tA = {...}
|
|
local pid = os.spawn(function() loadfile("/boot/exec/"..k..".lua")(table.unpack(tA)) end,"/boot/exec/"..k..".lua")
|
|
repeat
|
|
coroutine.yield()
|
|
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).."> ")
|
|
tResult = {pcall(load(io.read(),"shell","t",shenv))}
|
|
if tResult[1] == true then table.remove(tResult,1) end
|
|
for k,v in pairs(tResult) do
|
|
print(v)
|
|
end
|
|
end
|
|
end))
|