view mod_measure_message_length/mod_measure_message_length.lua @ 4994:cce12a660b98

mod_privilege: process entity IQs (credit to adx) and messages with a constructed entity session
author Nicoco <nicoco@nicoco.fr>
date Tue, 16 Aug 2022 13:10:39 +0200
parents 6e70d354b7d8
children
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);