bridge.lua

Sat, 10 Dec 2011 05:46:27 +0000

author
Matthew Wild <mwild1@gmail.com>
date
Sat, 10 Dec 2011 05:46:27 +0000
changeset 0
4e2dfd73265e
permissions
-rw-r--r--

Initial commit

0
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
1 local module_name;
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
2
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
3 local verse = require "verse".init("component");
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
4
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
5 local conn = verse.new();
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
6
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
7 local origin = {
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
8 send = function (stanza)
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
9 conn:send(stanza);
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
10 end;
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
11 };
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
12
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
13 local module_env = {};
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
14
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
15 function handle_connect()
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
16 local _log = logger.init(module_name);
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
17 module_env.module = setmetatable({
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
18 name = module_name;
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
19 path = module_path
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
20 host = conn.host;
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
21 _log = _log;
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
22 log = function (self, ...) return _log(...); end;
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
23 }, { __index = api });
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
24 end
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
25
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
26 function handle_stanza(stanza)
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
27
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
28 end
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
29
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
30 conn:hook("stanza", handle_stanza);
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
31
4e2dfd73265e Initial commit
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
32 conn:connect_component("localhost");

mercurial