mirror of
https://github.com/processone/ejabberd.git
synced 2024-12-02 16:37:52 +01:00
* src/web/ejabberd_http.erl (parse_auth): Allow password that
include colon character (EJAB-522) SVN Revision: 1322
This commit is contained in:
parent
d75577fa34
commit
a96cf33df3
@ -1,3 +1,8 @@
|
|||||||
|
2008-05-12 Badlop <badlop@process-one.net>
|
||||||
|
|
||||||
|
* src/web/ejabberd_http.erl (parse_auth): Allow password that
|
||||||
|
include colon character (EJAB-522)
|
||||||
|
|
||||||
2008-04-30 Christophe Romain <christophe.romain@process-one.net>
|
2008-04-30 Christophe Romain <christophe.romain@process-one.net>
|
||||||
|
|
||||||
* src/mod_caps.erl: XEP-0115 patch (EJAB-618)
|
* src/mod_caps.erl: XEP-0115 patch (EJAB-618)
|
||||||
|
@ -635,11 +635,14 @@ parse_auth(_Orig = "Basic " ++ Auth64) ->
|
|||||||
{error, _Err} ->
|
{error, _Err} ->
|
||||||
undefined;
|
undefined;
|
||||||
Auth ->
|
Auth ->
|
||||||
case string:tokens(Auth, ":") of
|
%% Auth should be a string with the format: user@server:password
|
||||||
[User, Pass] ->
|
%% Note that password can contain additional characters '@' and ':'
|
||||||
{User, Pass};
|
case string:chr(Auth, $:) of
|
||||||
_ ->
|
0 ->
|
||||||
undefined
|
undefined;
|
||||||
|
SplitIndex ->
|
||||||
|
{User, [$: | Pass]} = lists:split(SplitIndex-1, Auth),
|
||||||
|
{User, Pass}
|
||||||
end
|
end
|
||||||
end;
|
end;
|
||||||
parse_auth(_) ->
|
parse_auth(_) ->
|
||||||
|
Loading…
Reference in New Issue
Block a user