1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
-- Prosody IM v0.1
-- Copyright (C) 2008 Matthew Wild
-- Copyright (C) 2008 Waqas Hussain
--
-- This program is free software; you can redistribute it and/or
-- modify it under the terms of the GNU General Public License
-- as published by the Free Software Foundation; either version 2
-- of the License, or (at your option) any later version.
--
-- This program is distributed in the hope that it will be useful,
-- but WITHOUT ANY WARRANTY; without even the implied warranty of
-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-- GNU General Public License for more details.
--
-- You should have received a copy of the GNU General Public License
-- along with this program; if not, write to the Free Software
-- Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
--
local listeners_dir = (CFG_SOURCEDIR or ".").."/net/";
local server_add = require "net.server".add;
local log = require "util.logger".init("connlisteners");
local dofile, pcall, error =
dofile, pcall, error
module "connlisteners"
local listeners = {};
function register(name, listener)
if listeners[name] and listeners[name] ~= listener then
log("warning", "Listener %s is already registered, not registering any more", name);
return false;
end
listeners[name] = listener;
log("info", "Registered connection listener %s", name);
return true;
end
function deregister(name)
listeners[name] = nil;
end
function get(name)
local h = listeners[name];
if not h then
pcall(dofile, listeners_dir..name:gsub("[^%w%-]", "_").."_listener.lua");
h = listeners[name];
end
return h;
end
function start(name, udata)
local h = get(name);
if not h then
error("No such connection module: "..name, 0);
end
return server_add(h,
(udata and udata.port) or h.default_port or error("Can't start listener "..name.." because no port was specified, and it has no default port", 0),
(udata and udata.interface) or "*", (udata and udata.mode) or h.default_mode or 1, (udata and udata.ssl) or nil );
end
return _M;
|
