File

plugins/mod_watchregistrations.lua @ 1544:c7f0938bc33e

net.server: Fix copyright header line endings and text
author Matthew Wild <mwild1@gmail.com>
date Sun, 12 Jul 2009 20:32:38 +0100
parent 1522:569d58d21612
child 1654:0ae73e3d306f
line wrap: on
line source

-- Prosody IM
-- Copyright (C) 2008-2009 Matthew Wild
-- Copyright (C) 2008-2009 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 config = require "core.configmanager";

local registration_watchers = config.get(host, "core", "registration_watchers") 
	or config.get(host, "core", "admins") or {};

local registration_alert = config.get(host, "core", "registration_notification") or "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_alert: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);