From 91fc4a6fbb7a7c0ceaeac9d44f85493cab473f0a Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Wed, 27 Jul 2011 12:42:12 +0200
Subject: [PATCH] Verify username provided in registration web form

---
 src/web/mod_register_web.erl | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/web/mod_register_web.erl b/src/web/mod_register_web.erl
index 59a2a5ab0..b4805367d 100644
--- a/src/web/mod_register_web.erl
+++ b/src/web/mod_register_web.erl
@@ -516,6 +516,12 @@ form_del_get(Host, Lang) ->
 %%                                    {error, not_allowed} |
 %%                                    {error, invalid_jid}
 register_account(Username, Host, Password) ->
+    try exmpp_jid:make(Username, Host) of
+	_ -> register_account2(Username, Host, Password)
+    catch
+	_ -> {error, invalid_jid}
+    end.
+register_account2(Username, Host, Password) ->
     case ejabberd_auth:try_register(Username, Host, Password) of
 	{atomic, Res} ->
 	    {success, Res, {Username, Host, Password}};