Mercurial > luaevent-prosody / annotate
test/testClient.lua@1a093a31059d (annotated)
test/testClient.lua
Sat, 01 Sep 2007 00:24:11 -0400
- author
- Thomas Harning Jr <harningt@gmail.com>
- date
- Sat, 01 Sep 2007 00:24:11 -0400
- changeset 17
- 1a093a31059d
- parent 13
- 3e2ea1e7b2e8
- permissions
- -rw-r--r--
Refactored luaevent.lua (unlearned borked fairness, collapsing useless code).
luaevent.lua:
* Unlearned fairness since it was likely to be broken...
fairness will need to be implemented at app-level where it should be.
* Collapsed duplicate code into a local function
testClient.lua:
* Added a completion message (since the test was so quick I thought it was broken)
|
13
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
1 | require"luaevent" |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
2 | require"socket" |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
3 | local oldPrint = print |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
4 | print = function(...) |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
5 | oldPrint("CLT", ...) |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
6 | end |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
7 | |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
8 | local function func() |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
9 | print("ACTIVATED") |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
10 | local sock = socket.tcp() |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
11 | --sock: |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
12 | sock = luaevent.wrap(sock) |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
13 | print(assert(sock:connect("localhost", 20000))) |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
14 | for i = 1, 100 do assert(sock:send("Greet me ")) assert(sock:receive(10)) collectgarbage() end |
|
17
1a093a31059d
Refactored luaevent.lua (unlearned borked fairness, collapsing useless code).
Thomas Harning Jr <harningt@gmail.com>
parents:
13
diff
changeset
|
15 | print("COMPLETE") |
|
13
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
16 | end |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
17 | |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
18 | luaevent.addthread(func) |
|
3e2ea1e7b2e8
Reformed project layout from 'luaevent/*' -> '*'
Thomas Harning Jr <harningt@gmail.com>
parents:
diff
changeset
|
19 | |
|
17
1a093a31059d
Refactored luaevent.lua (unlearned borked fairness, collapsing useless code).
Thomas Harning Jr <harningt@gmail.com>
parents:
13
diff
changeset
|
20 | luaevent.loop() |
