diff options
author | Mickael Remond <mremond@process-one.net> | 2019-05-03 14:59:24 +0200 |
---|---|---|
committer | Mickael Remond <mremond@process-one.net> | 2019-05-03 14:59:24 +0200 |
commit | 7a8de9cfcff293f58ba6db6d9c133f54305e5fdd (patch) | |
tree | 1cd708cdaac9a869eb45b56eaeb6efd6e3b83151 /src/ejabberd_admin.erl | |
parent | Fix bug that appears when importing privacy from Prosody (#2872) (diff) |
Make some standard admin command to get Mnesia info
Diffstat (limited to 'src/ejabberd_admin.erl')
-rw-r--r-- | src/ejabberd_admin.erl | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/src/ejabberd_admin.erl b/src/ejabberd_admin.erl index 82c35e40..d044f127 100644 --- a/src/ejabberd_admin.erl +++ b/src/ejabberd_admin.erl @@ -50,6 +50,7 @@ set_master/1, backup_mnesia/1, restore_mnesia/1, dump_mnesia/1, dump_table/2, load_mnesia/1, + mnesia_info/0, mnesia_table_info/1, install_fallback_mnesia/1, dump_to_textfile/1, dump_to_textfile/2, mnesia_change_nodename/4, @@ -357,6 +358,16 @@ get_commands_spec() -> args_desc = ["Full path to the text file"], args_example = ["/var/lib/ejabberd/database.txt"], args = [{file, string}], result = {res, restuple}}, + #ejabberd_commands{name = mnesia_info, tags = [mnesia], + desc = "Dump info on global Mnesia state", + module = ?MODULE, function = mnesia_info, + args = [], result = {res, string}}, + #ejabberd_commands{name = mnesia_table_info, tags = [mnesia], + desc = "Dump info on Mnesia table state", + module = ?MODULE, function = mnesia_table_info, + args_desc = ["Mnesia table name"], + args_example = ["roster"], + args = [{table, string}], result = {res, string}}, #ejabberd_commands{name = install_fallback, tags = [mnesia], desc = "Install the database from a fallback file", module = ?MODULE, function = install_fallback_mnesia, @@ -716,6 +727,13 @@ load_mnesia(Path) -> {cannot_load, String} end. +mnesia_info() -> + lists:flatten(io_lib:format("~p", [mnesia:system_info(all)])). + +mnesia_table_info(Table) -> + ATable = list_to_atom(Table), + lists:flatten(io_lib:format("~p", [mnesia:table_info(ATable, all)])). + install_fallback_mnesia(Path) -> case mnesia:install_fallback(Path) of ok -> |