X-Git-Url: https://git.enpas.org/?a=blobdiff_plain;f=util%2Flogger.lua;h=26206d4d83379ff49b255372197c1fb891337f50;hb=a0dc04ad05a5a436c967383e9ba06d5cc11e2e88;hp=80b5bcd08416b9f02d0ebebb57f34470d40ef341;hpb=07f52e58dfe83a4066a213bc2d9a7cba50aaca0c;p=prosody.git diff --git a/util/logger.lua b/util/logger.lua index 80b5bcd0..26206d4d 100644 --- a/util/logger.lua +++ b/util/logger.lua @@ -13,14 +13,9 @@ local ipairs, pairs, setmetatable = ipairs, pairs, setmetatable; module "logger" -local name_sinks, level_sinks = {}, {}; -local name_patterns = {}; - --- Weak-keyed so that loggers are collected -local modify_hooks = setmetatable({}, { __mode = "k" }); +local level_sinks = {}; local make_logger; -local outfunction = nil; function init(name) local log_debug = make_logger(name, "debug"); @@ -28,11 +23,7 @@ function init(name) local log_warn = make_logger(name, "warn"); local log_error = make_logger(name, "error"); - --name = nil; -- While this line is not commented, will automatically fill in file/line number info - local namelen = #name; return function (level, message, ...) - if outfunction then return outfunction(name, level, message, ...); end - if level == "debug" then return log_debug(message, ...); elseif level == "info" then @@ -52,55 +43,22 @@ function make_logger(source_name, level) level_sinks[level] = level_handlers; end - local source_handlers = name_sinks[source_name]; - - -- All your premature optimisation is belong to me! - local num_level_handlers, num_source_handlers = #level_handlers, source_handlers and #source_handlers; - local logger = function (message, ...) - if source_handlers then - for i = 1,num_source_handlers do - if source_handlers[i](source_name, level, message, ...) == false then - return; - end - end - end - - for i = 1,num_level_handlers do + for i = 1,#level_handlers do level_handlers[i](source_name, level, message, ...); end end - -- To make sure our cached lengths stay in sync with reality - modify_hooks[logger] = function () num_level_handlers, num_source_handlers = #level_handlers, source_handlers and #source_handlers; end; - return logger; end -function setwriter(f) - local old_func = outfunction; - if not f then outfunction = nil; return true, old_func; end - local ok, ret = pcall(f, "logger", "info", "Switched logging output successfully"); - if ok then - outfunction = f; - ret = old_func; - end - return ok, ret; -end - function reset() - for k in pairs(name_sinks) do name_sinks[k] = nil; end for level, handler_list in pairs(level_sinks) do -- Clear all handlers for this level for i = 1, #handler_list do handler_list[i] = nil; end end - for k in pairs(name_patterns) do name_patterns[k] = nil; end - - for _, modify_hook in pairs(modify_hooks) do - modify_hook(); - end end function add_level_sink(level, sink_function) @@ -109,30 +67,6 @@ function add_level_sink(level, sink_function) else level_sinks[level][#level_sinks[level] + 1 ] = sink_function; end - - for _, modify_hook in pairs(modify_hooks) do - modify_hook(); - end -end - -function add_name_sink(name, sink_function, exclusive) - if not name_sinks[name] then - name_sinks[name] = { sink_function }; - else - name_sinks[name][#name_sinks[name] + 1] = sink_function; - end - - for _, modify_hook in pairs(modify_hooks) do - modify_hook(); - end -end - -function add_name_pattern_sink(name_pattern, sink_function, exclusive) - if not name_patterns[name_pattern] then - name_patterns[name_pattern] = { sink_function }; - else - name_patterns[name_pattern][#name_patterns[name_pattern] + 1] = sink_function; - end end _M.new = make_logger;