# HG changeset patch
# User Matthew Wild <mwild1@gmail.com>
# Date 1243309865 -3600
# Node ID 9d5c1b2cf89c792ed800dc42d88ab95b8eebe554
# Parent  57a72472e1bca1751fc84025b5387fd9ad959fa9
mod_watchregistrations: New plugin to send a message to admins when a new user registers

diff -r 57a72472e1bc -r 9d5c1b2cf89c plugins/mod_watchregistrations.lua
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/plugins/mod_watchregistrations.lua	Tue May 26 04:51:05 2009 +0100
@@ -0,0 +1,25 @@
+
+local host = module:get_host();
+
+local config = require "core.configmanager";
+
+local registration_watchers = config.get(host, "core", "registration_watchers") 
+	or config.get(host, "core", "admin") 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:add_event_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);