Mercurial > luasocket
comparison samples/echosrvr.lua @ 0:4b915342e2a8
LuaSocket 2.0.2 + CMake build description.
author | Eric Wing <ewing . public |-at-| gmail . com> |
---|---|
date | Tue, 26 Aug 2008 18:40:01 -0700 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:4b915342e2a8 |
---|---|
1 ----------------------------------------------------------------------------- | |
2 -- UDP sample: echo protocol server | |
3 -- LuaSocket sample files | |
4 -- Author: Diego Nehab | |
5 -- RCS ID: $Id: echosrvr.lua,v 1.12 2005/11/22 08:33:29 diego Exp $ | |
6 ----------------------------------------------------------------------------- | |
7 local socket = require("socket") | |
8 host = host or "127.0.0.1" | |
9 port = port or 7 | |
10 if arg then | |
11 host = arg[1] or host | |
12 port = arg[2] or port | |
13 end | |
14 print("Binding to host '" ..host.. "' and port " ..port.. "...") | |
15 udp = assert(socket.udp()) | |
16 assert(udp:setsockname(host, port)) | |
17 assert(udp:settimeout(5)) | |
18 ip, port = udp:getsockname() | |
19 assert(ip, port) | |
20 print("Waiting packets on " .. ip .. ":" .. port .. "...") | |
21 while 1 do | |
22 dgram, ip, port = udp:receivefrom() | |
23 if dgram then | |
24 print("Echoing '" .. dgram .. "' to " .. ip .. ":" .. port) | |
25 udp:sendto(dgram, ip, port) | |
26 else | |
27 print(ip) | |
28 end | |
29 end |