Software /
code /
prosody-modules
Comparison
mod_muc_moderation/mod_muc_moderation.lua @ 5618:06fad22672e1
mod_muc_moderation: Copy XEP-0421 occupant-id from retracted message
Lets clients correlate the sender of whatever was retracted by
moderators. Behavior limited to Prosody 0.12, otherwise there are no
assurances of the origin of the occupant-id tag.
Ref #1816
author | Kim Alvefur <zash@zash.se> |
---|---|
date | Thu, 20 Jul 2023 10:37:27 +0200 |
parent | 5170:4d6af8950016 |
child | 5619:2e30af180da5 |
comparison
equal
deleted
inserted
replaced
5617:67f7df9892bb | 5618:06fad22672e1 |
---|---|
25 end | 25 end |
26 | 26 |
27 -- Namespaces | 27 -- Namespaces |
28 local xmlns_fasten = "urn:xmpp:fasten:0"; | 28 local xmlns_fasten = "urn:xmpp:fasten:0"; |
29 local xmlns_moderate = "urn:xmpp:message-moderate:0"; | 29 local xmlns_moderate = "urn:xmpp:message-moderate:0"; |
30 local xmlns_occupant_id = "urn:xmpp:occupant-id:0"; | |
30 local xmlns_retract = "urn:xmpp:message-retract:0"; | 31 local xmlns_retract = "urn:xmpp:message-retract:0"; |
31 | 32 |
32 -- Discovering support | 33 -- Discovering support |
33 module:hook("muc-disco#info", function (event) | 34 module:hook("muc-disco#info", function (event) |
34 event.reply:tag("feature", { var = xmlns_moderate }):up(); | 35 event.reply:tag("feature", { var = xmlns_moderate }):up(); |
93 | 94 |
94 if reason then | 95 if reason then |
95 announcement:text_tag("reason", reason); | 96 announcement:text_tag("reason", reason); |
96 end | 97 end |
97 | 98 |
99 local moderated_occupant_id = original:get_child("occupant-id", xmlns_occupant_id); | |
100 if room.get_occupant_id and moderated_occupant_id then | |
101 announcement:add_direct_child(moderated_occupant_id); | |
102 end | |
103 | |
98 if muc_log_archive.set and retract then | 104 if muc_log_archive.set and retract then |
99 local tombstone = st.message({ from = original.attr.from, type = "groupchat", id = original.attr.id }) | 105 local tombstone = st.message({ from = original.attr.from, type = "groupchat", id = original.attr.id }) |
100 :tag("moderated", { xmlns = xmlns_moderate, by = actor_nick }) | 106 :tag("moderated", { xmlns = xmlns_moderate, by = actor_nick }) |
101 :tag("retracted", { xmlns = xmlns_retract, stamp = dt.datetime() }):up(); | 107 :tag("retracted", { xmlns = xmlns_retract, stamp = dt.datetime() }):up(); |
108 | |
109 if room.get_occupant_id and moderated_occupant_id then | |
110 -- Copy occupant id from moderated message | |
111 tombstone:add_child(moderated_occupant_id); | |
112 end | |
102 | 113 |
103 if reason then | 114 if reason then |
104 tombstone:text_tag("reason", reason); | 115 tombstone:text_tag("reason", reason); |
105 end | 116 end |
106 tombstone:reset(); | 117 tombstone:reset(); |