Bug feioso no UDP e possivelmente no TCP também.

1 files changed, 10 insertions, 11 deletions

diff --git a/samples/echosrvr.lua b/samples/echosrvr.lua
index a7ed03c..9d99506 100644
--- a/samples/echosrvr.lua
+++ b/samples/echosrvr.lua
@@ -4,6 +4,7 @@
 -- Author: Diego Nehab
 -- RCS ID: $Id$
 -----------------------------------------------------------------------------
+require"luasocket"
 host = host or "127.0.0.1"
 port = port or 7
 if arg then
@@ -11,19 +12,17 @@ if arg then
     port = arg[2] or port
 end
 print("Binding to host '" ..host.. "' and port " ..port.. "...")
-udp, err = socket.udp()
-assert(udp, err)
-ret, err = udp:setsockname(host, port)
-assert(ret, err) 
-udp:settimeout(5)
-ip, port = udp:getsockname()
-assert(ip, port)
+udp = socket.try(socket.udp())
+socket.try(udp:setsockname(host, port))
+socket.try(udp:settimeout(5))
+ip, port = socket.try(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)
+        if dgram then 
+                print("Echoing '" .. dgram .. "' to " .. ip .. ":" .. port)
                 udp:sendto(dgram, ip, port)
-        end
+        else 
+        print(ip) 
+    end
 end