diff options
| author | Alexey Shchepin <alexey@process-one.net> | 2006-02-20 04:07:42 +0000 |
|---|---|---|
| committer | Alexey Shchepin <alexey@process-one.net> | 2006-02-20 04:07:42 +0000 |
| commit | 80181dc618818a2a76dae76387e457d0dbbaa13d (patch) | |
| tree | 421cbf1371634a1825d706b6bfb1a085f10458f7 /src/ejabberd_auth.erl | |
| parent | * src/mod_irc/mod_irc_connection.erl: Added handling for "%", "&" (diff) | |
* src/ejabberd_ctl.erl: Added API for virtual host specific
commands, removed registered-users command
* src/ejabberd_auth.erl: Added processing of registered-users
command
* src/ejabberd_auth_internal.erl: Likewise
* src/ejabberd_auth_ldap.erl: Likewise
* src/ejabberd_auth_odbc.erl: Likewise
* src/ejabberd_app.erl: Added inititalization of ejabberd_ctl
* src/ejabberd_sm.erl: Minor update
SVN Revision: 510
Diffstat (limited to 'src/ejabberd_auth.erl')
| -rw-r--r-- | src/ejabberd_auth.erl | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/src/ejabberd_auth.erl b/src/ejabberd_auth.erl index d89d1756..045bf272 100644 --- a/src/ejabberd_auth.erl +++ b/src/ejabberd_auth.erl @@ -23,10 +23,12 @@ is_user_exists/2, remove_user/2, remove_user/3, - plain_password_required/1 + plain_password_required/1, + ctl_process_get_registered/3 ]). -include("ejabberd.hrl"). +-include("ejabberd_ctl.hrl"). %%%---------------------------------------------------------------------- %%% API @@ -77,6 +79,17 @@ remove_user(User, Server) -> remove_user(User, Server, Password) -> (auth_module(Server)):remove_user(User, Server, Password). + +ctl_process_get_registered(_Val, Host, ["registered-users"]) -> + Users = ejabberd_auth:get_vh_registered_users(Host), + NewLine = io_lib:format("~n", []), + SUsers = lists:sort(Users), + FUsers = lists:map(fun({U, _S}) -> [U, NewLine] end, SUsers), + io:format("~s", [FUsers]), + {stop, ?STATUS_SUCCESS}; +ctl_process_get_registered(Val, _Host, _Args) -> + Val. + %%%---------------------------------------------------------------------- %%% Internal functions %%%---------------------------------------------------------------------- |