luaevent/test/test.lua

changeset 13
3e2ea1e7b2e8
parent 12
a9b590350c03
child 14
2bc0eb496976
--- a/luaevent/test/test.lua	Tue Aug 28 17:50:26 2007 -0400
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,34 +0,0 @@
--- Tests Copas with a simple Echo server
---
--- Run the test file and the connect to the server by telnet on the used port
--- to stop the test just send the command "quit"
-
-require"luaevent"
-require"socket"
-local oldPrint = print
-print = function(...)
-	oldPrint("SRV", ...)
-end
-
-local function echoHandler(skt)
-  while true do
-    local data,ret = luaevent.receive(skt, 10)
-    --print("GOT: ", data, ret)
-    if data == "quit" or ret == 'closed' then
-      break
-    end
-    luaevent.send(skt, data)
-    collectgarbage()
-  end
-  skt:close()
-  --print("DONE")
-end
-local server = assert(socket.bind("localhost", 20000))
-server:settimeout(0)
-local coro = coroutine.create
-coroutine.create = function(...)
-	local ret = coro(...)
-	return ret
-end
-luaevent.addserver(server, echoHandler)
-luaevent.loop()

mercurial