view mod_measure_message_length/mod_measure_message_length.lua @ 5283:cc89c97befe7

mod_http_admin_api: Tweak token session to please module:may() module:may() checks for type == "c2s", but mod_tokenauth does not currently include that or most common session properties. Fixes a traceback resulting from a different code path where module:may() tries to index event.stanza, which does not exist for http events.
author Kim Alvefur <zash@zash.se>
date Tue, 28 Mar 2023 20:45:11 +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);