util.filters: Fix inserting items so that higher priority filters run first
[prosody.git] / util / filters.lua
index 08e683c16c354ca69c8329a629e30ee6152bb8f5..d24bd33e06b0c74bba0462360757bb49733ce88c 100644 (file)
@@ -10,6 +10,8 @@ local t_insert, t_remove = table.insert, table.remove;
 
 module "filters"
 
+local new_filter_hooks = {};
+
 function initialize(session)
        if not session.filters then
                local filters = {};
@@ -19,13 +21,18 @@ function initialize(session)
                        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
 
@@ -45,7 +52,7 @@ function add_filter(session, type, callback, priority)
        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;
@@ -65,4 +72,16 @@ function remove_filter(session, type, callback)
        end
 end
 
+function add_filter_hook(callback)
+       t_insert(new_filter_hooks, callback);
+end
+
+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 _M;