moved nsh stuff to the net dir

This commit is contained in:
Izaya 2017-06-26 12:10:12 +00:00
parent 9efeaa1aea
commit 1a1c7e9bd6
10 changed files with 158 additions and 12 deletions

View File

@ -6,6 +6,8 @@ library/print.lua
library/fs-min.lua library/fs-min.lua
library/fs-std.lua library/fs-std.lua
library/fs-util.lua library/fs-util.lua
library/buffer.lua
library/io.lua
util/fs-automount.lua util/fs-automount.lua
drivers/tty.lua drivers/tty.lua
drivers/kbd.lua drivers/kbd.lua
@ -17,10 +19,11 @@ library/base64.lua
library/chauth.lua library/chauth.lua
library/fs-ext.lua library/fs-ext.lua
library/readline.lua library/readline.lua
applications/nshd.lua net/nshd.lua
applications/nshc.lua net/nshc.lua
applications/nshd-auth.lua net/nshd-auth.lua
applications/nshc-auth.lua net/nshc-auth.lua
applications/inshc.lua
applications/shutil.lua applications/shutil.lua
applications/skex2.lua applications/skex2.lua
applications/luash.lua applications/luash.lua

View File

@ -15,10 +15,10 @@ library/base64.lua
library/chauth.lua library/chauth.lua
library/fs-ext.lua library/fs-ext.lua
library/readline.lua library/readline.lua
applications/nshd.lua net/nshd.lua
applications/nshc.lua net/nshc.lua
applications/nshd-auth.lua net/nshd-auth.lua
applications/nshc-auth.lua net/nshc-auth.lua
applications/shutil.lua applications/shutil.lua
applications/skex2.lua applications/skex2.lua
applications/luash.lua applications/luash.lua

View File

@ -13,8 +13,8 @@ net/ping.lua
library/base64.lua library/base64.lua
library/fs-ext.lua library/fs-ext.lua
library/readline.lua library/readline.lua
applications/nshd.lua net/nshd.lua
applications/nshc.lua net/nshc.lua
applications/shutil.lua applications/shutil.lua
applications/skex2.lua applications/skex2.lua
applications/luash.lua applications/luash.lua

View File

@ -2,7 +2,7 @@ base/header.lua
library/print.lua library/print.lua
library/net.lua library/net.lua
library/readline.lua library/readline.lua
applications/nshd.lua net/nshd.lua
applications/luash.lua applications/luash.lua
applications/shutil.lua applications/shutil.lua
library/fs-min.lua library/fs-min.lua

View File

@ -5,7 +5,7 @@ drivers/kbd.lua
util/autogpu.lua util/autogpu.lua
library/net.lua library/net.lua
library/readline.lua library/readline.lua
applications/nshc.lua net/nshc.lua
applications/luash.lua applications/luash.lua
applications/autoluash.lua applications/autoluash.lua
util/loadeeprom.lua util/loadeeprom.lua

3
configs/virt.lua Normal file
View File

@ -0,0 +1,3 @@
base/header.lua
base/virt.lua
base/footer.lua

33
modules/net/nshc-auth.lua Normal file
View File

@ -0,0 +1,33 @@
function nshcs_w(evPP,nid,pW)
local sI = E().sI or 1
chauthc(nid,evPP,pW)
while true do
if ev[1] == "net_msg" then
local V,msg=false,tostring(ev[4])
if ev[3] == evPP and ev[2] == nid then
if msg:sub(1,3) == "dis" then
write(msg:sub(4))
end
end
elseif ev[1] == "key" and ev[2] == sI and ev[3] == 29 and ev[4] == 27 then
break
elseif ev[1] == "key" and ev[2] == sI then
ns(nid,evPP,"key"..tostring(ev[3]))
end
C.yield()
end
ns(nid,evPP,"exit")
end
function nshcs(P,nid,pW)
ns(nid,P,"initnsh")
while true do
if ev[1] == "net_msg" and ev[2] == nid and ev[3] == P then
break
elseif ev[1] == "key" and ev[2] == sI and ev[3] == 29 and ev[4] == 27 then
break
end
C.yield()
end
nshcs_w(ev[4],nid,pW)
end

32
modules/net/nshc.lua Normal file
View File

@ -0,0 +1,32 @@
function nshc_w(evPP,nid)
local sI = E().sI or 1
while true do
if ev[1] == "net_msg" then
local V,msg=false,tostring(ev[4])
if ev[3] == evPP and ev[2] == nid then
if msg:sub(1,3) == "dis" then
write(msg:sub(4))
end
end
elseif ev[1] == "key" and ev[2] == sI and ev[3] == 29 and ev[4] == 27 then
break
elseif ev[1] == "key" and ev[2] == sI then
ns(nid,evPP,"key"..tostring(ev[3]))
end
C.yield()
end
ns(nid,evPP,"exit")
end
function nshc(P,nid)
ns(nid,P,"initnsh")
while true do
if ev[1] == "net_msg" and ev[2] == nid and ev[3] == P then
break
elseif ev[1] == "key" and ev[2] == sI and ev[3] == 29 and ev[4] == 27 then
break
end
C.yield()
end
nshc_w(ev[4],nid)
end

38
modules/net/nshd-auth.lua Normal file
View File

@ -0,0 +1,38 @@
function nshds_w(evPP,cA,sI,pW)
s("nshds - "..tostring(sI),function()
chauths(cA,evPP,pW)
luash({["sI"]=sI})
while true do
if ev[1] == "net_msg" then
local msg=tostring(ev[4])
if ev[3] == evPP and ev[2] == cA then
if msg:sub(1,3) == "key" then
h("key",tT[cT][3].sI,tonumber(msg:sub(4)),0)
elseif msg == "exit" then pcall(killsession,sI) break
end
end
elseif ev[1] == "display" and ev[3] == tT[cT][3].sI then
ns(cA,evPP,"dis"..tostring(ev[2]))
end
C.yield()
end
end,{["sI"]=sI})
end
function nshds(P,pW)
s("nshds",function()
local Cc=1
while true do
if ev[1] == "net_msg" and ev[3] == P then
if ev[4] == "initnsh" then
nnID="nsh-"..tostring(Cc)
Cc=Cc+1
ns(ev[2],P,nnID)
nshds_w(nnID,ev[2],nnID,pW)
print("[nshds]Spawned "..nnID.." for "..tostring(ev[2]))
end
end
C.yield()
end
end,{["sI"]="log"})
end

37
modules/net/nshd.lua Normal file
View File

@ -0,0 +1,37 @@
function nshd_w(evPP,cA,sI)
s("nshd - "..tostring(sI),function()
luash({["sI"]=sI})
while true do
if ev[1] == "net_msg" then
local msg=tostring(ev[4])
if ev[3] == evPP and ev[2] == cA then
if msg:sub(1,3) == "key" then
h("key",tT[cT][3].sI,tonumber(msg:sub(4)),0)
elseif msg == "exit" then pcall(killsession,sI) break
end
end
elseif ev[1] == "display" and ev[3] == tT[cT][3].sI then
ns(cA,evPP,"dis"..tostring(ev[2]))
end
C.yield()
end
end,{["sI"]=sI})
end
function nshd(P)
s("nshd",function()
local Cc=1
while true do
if ev[1] == "net_msg" and ev[3] == P then
if ev[4] == "initnsh" then
nnID="nsh-"..tostring(Cc)
Cc=Cc+1
ns(ev[2],P,nnID)
nshd_w(nnID,ev[2],nnID)
print("[nshd]Spawned "..nnID.." for "..tostring(ev[2]))
end
end
C.yield()
end
end,{["sI"]="log"})
end