From c1a8b0ae9fcab23214636d14d1b139148c025429 Mon Sep 17 00:00:00 2001
From: Matthew Wild <mwild1@gmail.com>
Date: Tue, 19 May 2009 11:56:52 +0100
Subject: mod_welcome: New plugin to welcome users who register on the server

---
 plugins/mod_welcome.lua | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100644 plugins/mod_welcome.lua

diff --git a/plugins/mod_welcome.lua b/plugins/mod_welcome.lua
new file mode 100644
index 00000000..491acb8f
--- /dev/null
+++ b/plugins/mod_welcome.lua
@@ -0,0 +1,23 @@
+-- Prosody IM v0.4
+-- 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 config = require "core.configmanager";
+
+local host = module:get_host();
+local welcome_text = config.get("*", "core", "welcome_message") or "Hello $user, welcome to the $host IM server!";
+
+local st = require "util.stanza";
+
+module:add_event_hook("user-registered", 
+	function (user)
+		local welcome_stanza = 
+			st.message({ to = user.username.."@"..user.host, from = host })
+				:tag("body"):text(welcome_text:gsub("$(%w+)", user));
+		core_route_stanza(hosts[host], welcome_stanza);
+		module:log("debug", "Welcomed user %s@%s", user.username, user.host);
+	end);
-- 
cgit v1.2.3