diff options
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 d89d17563..045bf2726 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 %%%---------------------------------------------------------------------- |