Chapril/xmpp.chapril.org-ejabberd
25
1
Fork 0
mirror of https://github.com/processone/ejabberd.git synced 2024-11-26 16:26:24 +01:00
Code Releases Activity

* src/ejabberd_sm.erl: Optimized check_max_sessions (thanks to

Browse Source 
Christophe Romain)

SVN Revision: 975
This commit is contained in:
Alexey Shchepin 2007-11-25 15:35:20 +00:00
parent 1415fa4b1c
commit 65a7bb7d2a
2 changed files with 14 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ChangeLog
View File

@ -1,3 +1,8 @@
2007-11-25 Alexey Shchepin <alexey@process-one.net>
* src/ejabberd_sm.erl: Optimized check_max_sessions (thanks to
Christophe Romain)
2007-11-22 Mickael Remond <mremond@process-one.net> 2007-11-22 Mickael Remond <mremond@process-one.net>
* src/ejabberd_config.erl: Improved error message when ejabberd * src/ejabberd_config.erl: Improved error message when ejabberd

9
src/ejabberd_sm.erl
View File

@ -542,10 +542,13 @@ check_max_sessions(LUser, LServer) ->
%% first one %% first one
SIDs = mnesia:dirty_select( SIDs = mnesia:dirty_select(
session, session,
[{#session{sid = '$1', usr = {LUser, LServer, '_'}, _ = '_'}, [], ['$1']}]), [{#session{us = {LUser, LServer}, _ = '_'}, [], [[]]}]),
MaxSessions = get_max_user_sessions(LUser, LServer), MaxSessions = get_max_user_sessions(LUser, LServer),
if length(SIDs) =< MaxSessions -> ok; if
true -> {_, Pid} = lists:min(SIDs), length(SIDs) =< MaxSessions ->
ok;
true ->
{_, Pid} = lists:min(SIDs),
Pid ! replaced Pid ! replaced
end. end.