File

mod_measure_message_length/mod_measure_message_length.lua @ 4832:bfd4af4caddc

mod_password_policy: Support for additional policies provided by other modules E.g. check a password contains an uppercase character: module:provides("password-policy", { name = "contains_uppercase"; check_password = function (password, policy) return (policy ~= true) or (not not password:match("%u")); end; }) Config: password_policy = { contains_uppercase = true; }
author Matthew Wild <mwild1@gmail.com>
date Wed, 22 Dec 2021 14:48:46 +0000
parent 3430:6e70d354b7d8
line wrap: on
line source

local bytes = module:measure("bytes", "sizes");
local lines = module:measure("lines", "distribution");
local words = module:measure("words", "distribution");

local function measure_length(event)
	local body = event.stanza:get_child_text("body");
	if body then
		bytes(#body);
		lines(select(2, body:gsub("[^\n]+","")));
		words(select(2, body:gsub("%S+","")));
	end
end

module:hook("message/full", measure_length);
module:hook("message/bare", measure_length);
module:hook("message/host", measure_length);

module:hook("pre-message/full", measure_length);
module:hook("pre-message/bare", measure_length);
module:hook("pre-message/host", measure_length);