X-Git-Url: https://git.enpas.org/?a=blobdiff_plain;f=util%2Ffilters.lua;h=f405c0bdd91f70a47a51fa3e2a11d0cba8f93b97;hb=79a152bb61900a86c486b62d59be60fa845f8afc;hp=0ac4cb56c20535261ccaf9961588919930546389;hpb=b855f435635e02516edaf32b98e96c084ff75af9;p=prosody.git

diff --git a/util/filters.lua b/util/filters.lua
index 0ac4cb56..f405c0bd 100644
--- a/util/filters.lua
+++ b/util/filters.lua
@@ -1,57 +1,66 @@
 -- Prosody IM
 -- Copyright (C) 2008-2010 Matthew Wild
 -- Copyright (C) 2008-2010 Waqas Hussain
--- 
+--
 -- This project is MIT/X11 licensed. Please see the
 -- COPYING file in the source package for more information.
 --
 
 local t_insert, t_remove = table.insert, table.remove;
 
-module "filters"
+local _ENV = nil;
+
+local new_filter_hooks = {};
 
-function initialize(session)
+local function initialize(session)
 	if not session.filters then
 		local filters = {};
 		session.filters = filters;
-		
+
 		function session.filter(type, data)
 			local filter_list = filters[type];
 			if filter_list then
 				for i = 1, #filter_list do
-					data = filter_list[i](data);
+					data = filter_list[i](data, session);
 					if data == nil then break; end
 				end
 			end
 			return data;
 		end
 	end
+
+	for i=1,#new_filter_hooks do
+		new_filter_hooks[i](session);
+	end
+
 	return session.filter;
 end
 
-function add_filter(session, type, callback, priority)
+local function add_filter(session, type, callback, priority)
 	if not session.filters then
 		initialize(session);
 	end
-	
+
 	local filter_list = session.filters[type];
 	if not filter_list then
 		filter_list = {};
 		session.filters[type] = filter_list;
+	elseif filter_list[callback] then
+		return; -- Filter already added
 	end
-	
+
 	priority = priority or 0;
-	
+
 	local i = 0;
 	repeat
 		i = i + 1;
-	until not filter_list[i] or filter_list[filter_list[i]] >= priority;
-	
+	until not filter_list[i] or filter_list[filter_list[i]] < priority;
+
 	t_insert(filter_list, i, callback);
 	filter_list[callback] = priority;
 end
 
-function remove_filter(session, type, callback)
+local function remove_filter(session, type, callback)
 	if not session.filters then return; end
 	local filter_list = session.filters[type];
 	if filter_list and filter_list[callback] then
@@ -65,4 +74,22 @@ function remove_filter(session, type, callback)
 	end
 end
 
-return _M;
\ No newline at end of file
+local function add_filter_hook(callback)
+	t_insert(new_filter_hooks, callback);
+end
+
+local function remove_filter_hook(callback)
+	for i=1,#new_filter_hooks do
+		if new_filter_hooks[i] == callback then
+			t_remove(new_filter_hooks, i);
+		end
+	end
+end
+
+return {
+	initialize = initialize;
+	add_filter = add_filter;
+	remove_filter = remove_filter;
+	add_filter_hook = add_filter_hook;
+	remove_filter_hook = remove_filter_hook;
+};