2 -- Copyright (C) 2008-2010 Matthew Wild
3 -- Copyright (C) 2008-2010 Waqas Hussain
4 -- Copyright (C) 2010 Jeff Mitchell
6 -- This project is MIT/X11 licensed. Please see the
7 -- COPYING file in the source package for more information.
10 local host
= module
:get_host();
11 local motd_text
= module
:get_option_string("motd_text");
12 local motd_jid
= module
:get_option_string("motd_jid", host
);
14 if not motd_text
then return; end
16 local st
= require
"util.stanza";
18 motd_text
= motd_text
:gsub("^%s*(.-)%s*$", "%1"):gsub("\n[ \t]+", "\n"); -- Strip indentation from the config
20 module
:hook("presence/initial", function (event
)
21 local session
, stanza
= event
.origin
, event
.stanza
;
22 if not stanza
.attr
.type and not stanza
.attr
.to
then
24 st
.message({ to
= session
.full_jid
, from
= motd_jid
})
25 :tag("body"):text(motd_text
);
26 module
:send(motd_stanza
);
27 module
:log("debug", "MOTD send to user %s", session
.full_jid
);