Compare commits
3 Commits
054f58609b
...
ab604c84f7
Author | SHA1 | Date | |
---|---|---|---|
ab604c84f7 | |||
15a6151748 | |||
ba0320fcdc |
17
exec/ping.lua
Normal file
17
exec/ping.lua
Normal file
@ -0,0 +1,17 @@
|
|||||||
|
local minitel = require "minitel"
|
||||||
|
local event = require "event"
|
||||||
|
local tArgs = {...}
|
||||||
|
local addr = tArgs[1]
|
||||||
|
local times = tonumber(tArgs[2]) or 5
|
||||||
|
local timeout = tonumber(tArgs[3]) or 30
|
||||||
|
for i = 1, times do
|
||||||
|
local ipt = computer.uptime()
|
||||||
|
local pid = minitel.genPacketID()
|
||||||
|
computer.pushSignal("net_send",1,addr,0,"ping",pid)
|
||||||
|
local t,a = event.pull(timeout,"net_ack")
|
||||||
|
if t == "net_ack" and a == pid then
|
||||||
|
print("Ping reply: "..tostring(computer.uptime()-ipt).." seconds.")
|
||||||
|
else
|
||||||
|
print("Timed out.")
|
||||||
|
end
|
||||||
|
end
|
@ -7,6 +7,7 @@ function shenv.quit()
|
|||||||
end
|
end
|
||||||
shenv.cd = os.chdir
|
shenv.cd = os.chdir
|
||||||
shenv.mkdir = fs.makeDirectory
|
shenv.mkdir = fs.makeDirectory
|
||||||
|
shenv.cp = fs.copy
|
||||||
local function findPath(name)
|
local function findPath(name)
|
||||||
path = os.getenv("PATH") or "/boot/exec"
|
path = os.getenv("PATH") or "/boot/exec"
|
||||||
for l in path:gmatch("[^\n]+") do
|
for l in path:gmatch("[^\n]+") do
|
||||||
|
@ -47,5 +47,6 @@ while true do
|
|||||||
until rsize <= 1
|
until rsize <= 1
|
||||||
end
|
end
|
||||||
print(fsize)
|
print(fsize)
|
||||||
|
coroutine.yield()
|
||||||
end
|
end
|
||||||
fi:close()
|
fi:close()
|
||||||
|
Loading…
Reference in New Issue
Block a user