Mercurial > prosody-modules

comparison mod_muclogging/mod_muclogging.lua @ 47:99ff520519fe

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
mod_muclogging: initial checkin
author Thilo Cestonaro <thilo@cestona.ro>
date Fri, 16 Oct 2009 23:46:29 +0200
parents
children a96d3f37d845
comparison
equal deleted inserted replaced
46:ea756d96584f 47:99ff520519fe
1 -- Copyright (C) 2009 Thilo Cestonaro
2 --
3 -- This project is MIT/X11 licensed. Please see the
4 -- COPYING file in the source package for more information.
5 --
6 local prosody = prosody;
7 local splitJid = require "util.jid".split;
8 local bareJid = require "util.jid".bare;
9 local config_get = require "core.configmanager".get;
10
11 function logIfNeeded(e)
12 local stanza, origin = e.stanza, e.origin;
13 if (stanza.name == "presence") or
14 (stanza.name == "message" and tostring(stanza.attr.type) == "groupchat")
15 then
16 local node, host, resource = splitJid(stanza.attr.to);
17 if node ~= nil and host ~= nil then
18 local bare = node .. "@" .. host;
19 if prosody.hosts[host] ~= nil and prosody.hosts[host].muc ~= nil and prosody.hosts[host].muc.rooms[bare] ~= nil then
20 local room = prosody.hosts[host].muc.rooms[bare]
21 local logFolder = config_get(host, "core", "logFolder");
22 if logFolder ~= nil then
23 local today = os.date("%y%m%d");
24 local now = os.date("%X")
25 local fn = logFolder .. "/" .. today .. "_" .. bare .. ".log";
26 local mucFrom = nil;
27
28 if stanza.name == "presence" and stanza.attr.type == nil then
29 mucFrom = stanza.attr.to;
30 else
31 for jid, nick in pairs(room._jid_nick) do
32 if jid == stanza.attr.from then
33 mucFrom = nick;
34 end
35 end
36 end
37
38 if mucFrom ~= nil then
39 module:log("debug", "try to open room log: %s", fn);
40 local f = assert(io.open(fn, "a"));
41 local realFrom = stanza.attr.from;
42 local realTo = stanza.attr.to;
43 stanza.attr.from = mucFrom;
44 stanza.attr.to = nil;
45 f:write("<stanza time=\"".. now .. "\">" .. tostring(stanza) .. "</stanza>\n");
46 stanza.attr.from = realFrom;
47 stanza.attr.to = realTo;
48 f:close()
49 end
50 end
51 end
52 end
53 end
54 return;
55 end
56
57 module:hook("pre-message/bare", logIfNeeded, 500);
58 module:hook("pre-presence/full", logIfNeeded, 500);
59
60 module:log("debug", "loaded ...");