Mercurial > luaevent-prosody / annotate
test/testClient.lua@f5369fe8f107 (annotated)
test/testClient.lua
Wed, 03 Mar 2010 18:19:20 -0600
- author
- James Snyder <jbsnyder@fanplastic.org>
- date
- Wed, 03 Mar 2010 18:19:20 -0600
- changeset 101
- f5369fe8f107
- parent 17
- 1a093a31059d
- permissions
- -rw-r--r--
Changes to compile on OS X.
- BSD version of install doesn't have -D flag
- stdlib.h should include malloc defs (malloc.h is obsolete)
|
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() |
