aboutsummaryrefslogtreecommitdiff
path: root/ejabberd-1.1.2/src/cyrsasl_anonymous.erl
diff options
context:
space:
mode:
Diffstat (limited to 'ejabberd-1.1.2/src/cyrsasl_anonymous.erl')
-rw-r--r--ejabberd-1.1.2/src/cyrsasl_anonymous.erl39
1 files changed, 0 insertions, 39 deletions
diff --git a/ejabberd-1.1.2/src/cyrsasl_anonymous.erl b/ejabberd-1.1.2/src/cyrsasl_anonymous.erl
deleted file mode 100644
index 6f05be9d1..000000000
--- a/ejabberd-1.1.2/src/cyrsasl_anonymous.erl
+++ /dev/null
@@ -1,39 +0,0 @@
-%%%----------------------------------------------------------------------
-%%% File : cyrsasl_anonymous.erl
-%%% Author : Magnus Henoch <henoch@dtek.chalmers.se>
-%%% Purpose : ANONYMOUS SASL mechanism
-%%% Created : 23 Aug 2005 by Magnus Henoch <henoch@dtek.chalmers.se>
-%%% Id : $Id$
-%%%----------------------------------------------------------------------
-
-%% See http://www.ietf.org/internet-drafts/draft-ietf-sasl-anon-05.txt
-
--module(cyrsasl_anonymous).
--vsn('$Revision$').
-
--export([start/1, stop/0, mech_new/3, mech_step/2]).
-
--behaviour(cyrsasl).
-
--record(state, {server}).
-
-start(_Opts) ->
- cyrsasl:register_mechanism("ANONYMOUS", ?MODULE, false),
- ok.
-
-stop() ->
- ok.
-
-mech_new(Host, _GetPassword, _CheckPassword) ->
- {ok, #state{server = Host}}.
-
-mech_step(State, _ClientIn) ->
- %% We generate a random username:
- User = lists:concat([randoms:get_string() | tuple_to_list(now())]),
- Server = State#state.server,
-
- %% Checks that the username is available
- case ejabberd_auth:is_user_exists(User, Server) of
- true -> {error, "not-authorized"};
- false -> {ok, [{username, User}]}
- end.