File: echoclnt.lua

package info (click to toggle)
luasocket 2.0-alpha-2
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 452 kB
  • ctags: 437
  • sloc: ansic: 2,015; makefile: 107
file content (27 lines) | stat: -rw-r--r-- 830 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
-----------------------------------------------------------------------------
-- UDP sample: echo protocol client
-- LuaSocket sample files
-- Author: Diego Nehab
-- RCS ID: $Id: echoclnt.lua,v 1.6 2003/08/16 00:06:04 diego Exp $
-----------------------------------------------------------------------------
host = host or "localhost"
port = port or 7
if arg then
    host = arg[1] or host
    port = arg[2] or port
end
host = socket.dns.toip(host)
udp, err = socket.udp()
assert(udp, err) 
ret, err = udp:setpeername(host, port)
assert(ret, err) 
print("Using host '" ..host.. "' and port " .. port .. "...")
while 1 do
	line = io.read()
	if not line then os.exit() end
	ret, err = udp:send(line)
	if not ret then print(err) os.exit() end
	dgram, err = udp:receive()
	if not dgram then print(err) os.exit() end
	print(dgram)
end