mirror of
https://github.com/lunarmodules/luasocket.git
synced 2024-07-01 10:59:46 +02:00
29 lines
843 B
Lua
29 lines
843 B
Lua
-----------------------------------------------------------------------------
|
|
-- UDP sample: echo protocol server
|
|
-- LuaSocket sample files
|
|
-- Author: Diego Nehab
|
|
-- RCS ID: $Id$
|
|
-----------------------------------------------------------------------------
|
|
host = host or "127.0.0.1"
|
|
port = port or 7
|
|
if arg then
|
|
host = arg[1] or host
|
|
port = arg[2] or port
|
|
end
|
|
print("Binding to host '" ..host.. "' and port " ..port.. "...")
|
|
udp, err = socket.udp()
|
|
if not udp then print(err) os.exit() end
|
|
err = udp:setsockname(host, port)
|
|
if err then print(err) os.exit() end
|
|
udp:timeout(5)
|
|
ip, port = udp:getsockname()
|
|
print("Waiting packets on " .. ip .. ":" .. port .. "...")
|
|
while 1 do
|
|
dgram, ip, port = udp:receivefrom()
|
|
if not dgram then print(ip)
|
|
else
|
|
print("Echoing from " .. ip .. ":" .. port)
|
|
udp:sendto(dgram, ip, port)
|
|
end
|
|
end
|