mirrors/prosody
1
0
Fork 0
mirror of https://github.com/bjc/prosody.git synced 2025-04-03 21:27:38 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

util.helpers: Add show_events(), to show the events and handlers in a util.events object

Browse source
This commit is contained in:
Matthew Wild 2012-04-24 18:54:34 +01:00
parent 97f896be36
commit cb0212542b
1 changed files with 29 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

29
util/helpers.lua
View file

@ -6,6 +6,8 @@
-- COPYING file in the source package for more information.
--
local debug = require "util.debug";
module("helpers", package.seeall);
-- Helper functions for debugging
@ -31,6 +33,33 @@ function revert_log_events(events)
events.fire_event, events[events.fire_event] = events[events.fire_event], nil; -- :))
end
function show_events(events)
local event_handlers = events._handlers;
local events_array = {};
local event_handler_arrays = {};
for event in pairs(events._event_map) do
local handlers = event_handlers[event];
table.insert(events_array, event);
local handler_strings = {};
for i, handler in ipairs(handlers) do
local upvals = debug.string_from_var_table(debug.get_upvalues_table(handler));
handler_strings[i] = " "..i..": "..tostring(handler)..(upvals and ("\n "..upvals) or "");
end
event_handler_arrays[event] = handler_strings;
end
table.sort(events_array);
local i = 1;
repeat
local handlers = event_handler_arrays[events_array[i]];
for j=#handlers, 1, -1 do
table.insert(events_array, i+1, handlers[j]);
end
if i > 1 then events_array[i] = "\n"..events_array[i]; end
i = i + #handlers + 1
until i == #events_array;
return table.concat(events_array, "\n");
end
function get_upvalue(f, get_name)
local i, name, value = 0;
repeat