Software /
code /
prosody-modules
Comparison
mod_mam/mod_mam.lua @ 1187:d677d1807bb0
mod_mam: Stamp outgoing messages with <archived> as well, but remove it after they should have passed through mod_carbons
author | Kim Alvefur <zash@zash.se> |
---|---|
date | Thu, 05 Sep 2013 15:48:37 +0200 |
parent | 1186:a172e7389cf6 |
child | 1324:853a382c9bd6 |
comparison
equal
deleted
inserted
replaced
1186:a172e7389cf6 | 1187:d677d1807bb0 |
---|---|
200 if shall_store(store_user, with) then | 200 if shall_store(store_user, with) then |
201 module:log("debug", "Archiving stanza: %s", stanza:top_tag()); | 201 module:log("debug", "Archiving stanza: %s", stanza:top_tag()); |
202 | 202 |
203 -- And stash it | 203 -- And stash it |
204 local ok, id = archive:append(store_user, time_now(), with, stanza); | 204 local ok, id = archive:append(store_user, time_now(), with, stanza); |
205 if ok and not c2s then | 205 if ok then |
206 stanza:tag("archived", { xmlns = xmlns_mam, by = store_user.."@"..host, id = id }):up(); | 206 stanza:tag("archived", { xmlns = xmlns_mam, by = store_user.."@"..host, id = id }):up(); |
207 end | 207 end |
208 else | 208 else |
209 module:log("debug", "Not archiving stanza: %s (prefs)", stanza:top_tag()); | 209 module:log("debug", "Not archiving stanza: %s (prefs)", stanza:top_tag()); |
210 end | 210 end |
219 module:hook("pre-message/full", c2s_message_handler, 2); | 219 module:hook("pre-message/full", c2s_message_handler, 2); |
220 -- Stanszas to local clients | 220 -- Stanszas to local clients |
221 module:hook("message/bare", message_handler, 2); | 221 module:hook("message/bare", message_handler, 2); |
222 module:hook("message/full", message_handler, 2); | 222 module:hook("message/full", message_handler, 2); |
223 | 223 |
224 local function post_carbons_handler(event) | |
225 event.stanza:maptags(function(tag) | |
226 if not ( tag.attr.xmlns == xmlns_mam and tag.name == "archived" ) then | |
227 return tag; | |
228 end | |
229 end); | |
230 end | |
231 | |
232 module:hook("pre-message/bare", post_carbons_handler, 0.9); | |
233 module:hook("pre-message/full", post_carbons_handler, 0.9); | |
234 | |
224 module:add_feature(xmlns_mam); | 235 module:add_feature(xmlns_mam); |
225 | 236 |