Mercurial > prosody-modules
annotate mod_measure_message_length/mod_measure_message_length.lua @ 3677:90f88a643973
mod_bookmarks2: Add new module.
This is the result of hacking during the Stockholm XMPP Sprint, for
compatibility with older clients only doing Private XML XEP-0048. This module
shouldn’t be loaded at the same time as mod_bookmarks, as both implement
Private XML to achieve their conversion.
author | Emmanuel Gil Peyrot <linkmauve@linkmauve.fr> |
---|---|
date | Sat, 28 Sep 2019 14:27:13 +0200 |
parents | 6e70d354b7d8 |
children |
rev | line source |
---|---|
2372
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
1 local bytes = module:measure("bytes", "sizes"); |
3430
6e70d354b7d8
mod_measure_message_length: Use measure type that actually exists
Kim Alvefur <zash@zash.se>
parents:
2372
diff
changeset
|
2 local lines = module:measure("lines", "distribution"); |
6e70d354b7d8
mod_measure_message_length: Use measure type that actually exists
Kim Alvefur <zash@zash.se>
parents:
2372
diff
changeset
|
3 local words = module:measure("words", "distribution"); |
2372
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
4 |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
5 local function measure_length(event) |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
6 local body = event.stanza:get_child_text("body"); |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
7 if body then |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
8 bytes(#body); |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
9 lines(select(2, body:gsub("[^\n]+",""))); |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
10 words(select(2, body:gsub("%S+",""))); |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
11 end |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
12 end |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
13 |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
14 module:hook("message/full", measure_length); |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
15 module:hook("message/bare", measure_length); |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
16 module:hook("message/host", measure_length); |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
17 |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
18 module:hook("pre-message/full", measure_length); |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
19 module:hook("pre-message/bare", measure_length); |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
20 module:hook("pre-message/host", measure_length); |
b1b120e654ff
mod_measure_message_length: Collect statistics on number of bytes, words and lines in messages
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
21 |