aboutsummaryrefslogtreecommitdiff
path: root/test/ejabberd_admin_test.exs
diff options
context:
space:
mode:
Diffstat (limited to 'test/ejabberd_admin_test.exs')
-rw-r--r--test/ejabberd_admin_test.exs41
1 files changed, 24 insertions, 17 deletions
diff --git a/test/ejabberd_admin_test.exs b/test/ejabberd_admin_test.exs
index effcbc579..aa3c2ee41 100644
--- a/test/ejabberd_admin_test.exs
+++ b/test/ejabberd_admin_test.exs
@@ -25,12 +25,15 @@ defmodule EjabberdAdminTest do
setup_all do
:mnesia.start
+ :ejabberd_mnesia.start
# For some myterious reason, :ejabberd_commands.init mays
# sometimes fails if module is not loaded before
{:module, :ejabberd_commands} = Code.ensure_loaded(:ejabberd_commands)
+ :ejabberd_hooks.start_link
+ {:ok, _} = :acl.start_link
{:ok, _} = :ejabberd_access_permissions.start_link()
- :ejabberd_commands.init
- :ejabberd_admin.start
+ :ejabberd_commands.start_link
+ :ejabberd_admin.start_link
:ok
end
@@ -41,40 +44,44 @@ defmodule EjabberdAdminTest do
test "Logvel can be set and retrieved" do
:ejabberd_logger.start()
- assert :lager == :ejabberd_commands.execute_command(:set_loglevel, [1])
+ assert :lager == call_command(:set_loglevel, [1])
assert {1, :critical, 'Critical'} ==
- :ejabberd_commands.execute_command(:get_loglevel, [])
+ call_command(:get_loglevel, [])
- assert :lager == :ejabberd_commands.execute_command(:set_loglevel, [2])
+ assert :lager == call_command(:set_loglevel, [2])
assert {2, :error, 'Error'} ==
- :ejabberd_commands.execute_command(:get_loglevel, [])
+ call_command(:get_loglevel, [])
- assert :lager == :ejabberd_commands.execute_command(:set_loglevel, [3])
+ assert :lager == call_command(:set_loglevel, [3])
assert {3, :warning, 'Warning'} ==
- :ejabberd_commands.execute_command(:get_loglevel, [])
+ call_command(:get_loglevel, [])
assert {:wrong_loglevel, 6} ==
- catch_throw :ejabberd_commands.execute_command(:set_loglevel, [6])
+ catch_throw call_command(:set_loglevel, [6])
assert {3, :warning, 'Warning'} ==
- :ejabberd_commands.execute_command(:get_loglevel, [])
+ call_command(:get_loglevel, [])
- assert :lager == :ejabberd_commands.execute_command(:set_loglevel, [4])
+ assert :lager == call_command(:set_loglevel, [4])
assert {4, :info, 'Info'} ==
- :ejabberd_commands.execute_command(:get_loglevel, [])
+ call_command(:get_loglevel, [])
- assert :lager == :ejabberd_commands.execute_command(:set_loglevel, [5])
+ assert :lager == call_command(:set_loglevel, [5])
assert {5, :debug, 'Debug'} ==
- :ejabberd_commands.execute_command(:get_loglevel, [])
+ call_command(:get_loglevel, [])
- assert :lager == :ejabberd_commands.execute_command(:set_loglevel, [0])
+ assert :lager == call_command(:set_loglevel, [0])
assert {0, :no_log, 'No log'} ==
- :ejabberd_commands.execute_command(:get_loglevel, [])
+ call_command(:get_loglevel, [])
end
+ defp call_command(name, args) do
+ :ejabberd_commands.execute_command2(name, args, %{:caller_module => :ejabberd_ctl})
+ end
+
test "command status works with ejabberd stopped" do
assert :ejabberd_not_running ==
- elem(:ejabberd_commands.execute_command(:status, []), 0)
+ elem(call_command(:status, []), 0)
end
end