From c8a52134628d2cbc0ded3e422e757579a6cd6c01 Mon Sep 17 00:00:00 2001 From: Waqas Hussain Date: Fri, 9 Jan 2009 23:01:21 +0500 Subject: modulemanager: Per-host event hooks for plugins - solves issue 41 --- core/modulemanager.lua | 18 +++++++++++++++++- 1 file changed, 17 insertions(+), 1 deletion(-) diff --git a/core/modulemanager.lua b/core/modulemanager.lua index 4d654ae0..7c1bc0d8 100644 --- a/core/modulemanager.lua +++ b/core/modulemanager.lua @@ -55,6 +55,9 @@ local modulehelpers = setmetatable({}, { __index = _G }); local features_table = multitable_new(); local handler_table = multitable_new(); +local hooked = multitable_new(); +local event_hooks = multitable_new(); + local NULL = {}; -- Load modules when a host is activated @@ -151,6 +154,7 @@ function unload(host, name, ...) handler_info[handlers[1]] = nil; stanza_handlers:remove(param[1], param[2], param[3], param[4]); end + event_hooks:remove(host, name); return true; end @@ -234,7 +238,19 @@ function api:add_feature(xmlns) features_table:set(self.host, self.name, xmlns, true); end -function api:add_event_hook (...) return eventmanager.add_event_hook(...); end +local event_hook = function(host, mod_name, event_name, ...) + if type((...)) == "table" and (...).host and (...).host ~= host then return; end + for handler in pairs(event_hooks:get(host, mod_name, event_name) or NULL) do + handler(...); + end +end; +function api:add_event_hook(name, handler) + if not hooked:get(self.host, self.name, name) then + eventmanager.add_event_hook(name, function(...) event_hook(self.host, self.name, name, ...); end); + hooked:set(self.host, self.name, name, true); + end + event_hooks:set(self.host, self.name, name, handler, true); +end -------------------------------------------------------------------- -- cgit v1.2.3