2003-06-09 20:23:40 +02:00
|
|
|
-----------------------------------------------------------------------------
|
|
|
|
-- UDP sample: echo protocol client
|
|
|
|
-- LuaSocket 1.5 sample files
|
|
|
|
-- Author: Diego Nehab
|
|
|
|
-- RCS ID: $Id$
|
|
|
|
-----------------------------------------------------------------------------
|
2001-01-25 22:59:39 +01:00
|
|
|
host = host or "localhost"
|
|
|
|
port = port or 7
|
|
|
|
if arg then
|
|
|
|
host = arg[1] or host
|
|
|
|
port = arg[2] or port
|
|
|
|
end
|
2003-03-28 22:08:50 +01:00
|
|
|
host = socket.toip(host)
|
|
|
|
udp, err = socket.udp()
|
2001-01-25 22:59:39 +01:00
|
|
|
if not udp then print(err) exit() end
|
2001-03-06 20:46:42 +01:00
|
|
|
err = udp:setpeername(host, port)
|
2001-01-25 22:59:39 +01:00
|
|
|
if err then print(err) exit() end
|
2001-03-06 20:46:42 +01:00
|
|
|
print("Using host '" ..host.. "' and port " .. port .. "...")
|
2001-01-25 22:59:39 +01:00
|
|
|
while 1 do
|
2003-03-28 22:08:50 +01:00
|
|
|
line = io.read()
|
|
|
|
if not line then os.exit() end
|
2001-03-06 20:46:42 +01:00
|
|
|
err = udp:send(line)
|
2003-03-28 22:08:50 +01:00
|
|
|
if err then print(err) os.exit() end
|
2001-03-06 20:46:42 +01:00
|
|
|
dgram, err = udp:receive()
|
2003-03-28 22:08:50 +01:00
|
|
|
if not dgram then print(err) os.exit() end
|
2001-01-25 22:59:39 +01:00
|
|
|
print(dgram)
|
|
|
|
end
|