File

plugins/mod_watchregistrations.lua @ 4801:83cedf648b46

modulemanager: Hide deprecation warning for modules loaded on '*' directly (e.g. prosodyctl mod_<command>) (thanks Zash)
author Matthew Wild <mwild1@gmail.com>
date Sun, 29 Apr 2012 19:36:11 +0100
parent 4453:7dc743378e1e
child 4909:01bfb9a76660
line wrap: on
line source

-- Prosody IM
-- Copyright (C) 2008-2010 Matthew Wild
-- Copyright (C) 2008-2010 Waqas Hussain
-- 
-- This project is MIT/X11 licensed. Please see the
-- COPYING file in the source package for more information.
--


local host = module:get_host();

local registration_watchers = module:get_option("registration_watchers", module:get_option("admins", {}));
local registration_notification = module:get_option("registration_notification", "User $username just registered on $host from $ip");

local st = require "util.stanza";

module:hook("user-registered", function (user)
	module:log("debug", "Notifying of new registration");
	local message = st.message{ type = "chat", from = host }
		:tag("body")
			:text(registration_notification:gsub("%$(%w+)", function (v)
				return user[v] or user.session and user.session[v] or nil;
			end));
	for _, jid in ipairs(registration_watchers) do
		module:log("debug", "Notifying %s", jid);
		message.attr.to = jid;
		core_route_stanza(hosts[host], message);
	end
end);