test(conf_app): fix test after common test helpers changes
This commit is contained in:
parent
97a9bb484a
commit
2c97ee1b3f
|
@ -734,6 +734,7 @@ start_slave(Name, Opts) when is_map(Opts) ->
|
||||||
fun() ->
|
fun() ->
|
||||||
case SlaveMod of
|
case SlaveMod of
|
||||||
ct_slave ->
|
ct_slave ->
|
||||||
|
ct:pal("~p: node data dir: ~s", [Node, NodeDataDir]),
|
||||||
ct_slave:start(
|
ct_slave:start(
|
||||||
Node,
|
Node,
|
||||||
[
|
[
|
||||||
|
@ -852,8 +853,10 @@ setup_node(Node, Opts) when is_map(Opts) ->
|
||||||
]),
|
]),
|
||||||
case erpc:call(Node, application, get_env, [mnesia, dir, undefined]) of
|
case erpc:call(Node, application, get_env, [mnesia, dir, undefined]) of
|
||||||
undefined ->
|
undefined ->
|
||||||
|
ct:pal("~p: setting mnesia dir: ~p", [Node, MnesiaDataDir]),
|
||||||
erpc:call(Node, application, set_env, [mnesia, dir, MnesiaDataDir]);
|
erpc:call(Node, application, set_env, [mnesia, dir, MnesiaDataDir]);
|
||||||
_ ->
|
PreviousMnesiaDir ->
|
||||||
|
ct:pal("~p: mnesia dir already set: ~p", [Node, PreviousMnesiaDir]),
|
||||||
ok
|
ok
|
||||||
end,
|
end,
|
||||||
|
|
||||||
|
@ -944,7 +947,7 @@ set_env_once(Var, Value) ->
|
||||||
case os:getenv(Var) of
|
case os:getenv(Var) of
|
||||||
false ->
|
false ->
|
||||||
os:putenv(Var, Value);
|
os:putenv(Var, Value);
|
||||||
_ ->
|
_OldValue ->
|
||||||
ok
|
ok
|
||||||
end,
|
end,
|
||||||
ok.
|
ok.
|
||||||
|
|
|
@ -20,14 +20,17 @@
|
||||||
-compile(nowarn_export_all).
|
-compile(nowarn_export_all).
|
||||||
|
|
||||||
-include_lib("eunit/include/eunit.hrl").
|
-include_lib("eunit/include/eunit.hrl").
|
||||||
|
-include_lib("common_test/include/ct.hrl").
|
||||||
|
|
||||||
all() ->
|
all() ->
|
||||||
emqx_common_test_helpers:all(?MODULE).
|
emqx_common_test_helpers:all(?MODULE).
|
||||||
|
|
||||||
t_copy_conf_override_on_restarts(_Config) ->
|
t_copy_conf_override_on_restarts(Config) ->
|
||||||
ct:timetrap({seconds, 120}),
|
ct:timetrap({seconds, 120}),
|
||||||
snabbkaffe:fix_ct_logging(),
|
snabbkaffe:fix_ct_logging(),
|
||||||
Cluster = cluster([cluster_spec({core, 1}), cluster_spec({core, 2}), cluster_spec({core, 3})]),
|
Cluster = cluster(
|
||||||
|
[cluster_spec({core, 1}), cluster_spec({core, 2}), cluster_spec({core, 3})], Config
|
||||||
|
),
|
||||||
|
|
||||||
%% 1. Start all nodes
|
%% 1. Start all nodes
|
||||||
Nodes = start_cluster(Cluster),
|
Nodes = start_cluster(Cluster),
|
||||||
|
@ -50,16 +53,19 @@ t_copy_conf_override_on_restarts(_Config) ->
|
||||||
stop_cluster(Nodes)
|
stop_cluster(Nodes)
|
||||||
end.
|
end.
|
||||||
|
|
||||||
t_copy_new_data_dir(_Config) ->
|
t_copy_new_data_dir(Config) ->
|
||||||
net_kernel:start(['master1@127.0.0.1', longnames]),
|
net_kernel:start(['master1@127.0.0.1', longnames]),
|
||||||
ct:timetrap({seconds, 120}),
|
ct:timetrap({seconds, 120}),
|
||||||
snabbkaffe:fix_ct_logging(),
|
snabbkaffe:fix_ct_logging(),
|
||||||
Cluster = cluster([cluster_spec({core, 4}), cluster_spec({core, 5}), cluster_spec({core, 6})]),
|
Cluster = cluster(
|
||||||
|
[cluster_spec({core, 4}), cluster_spec({core, 5}), cluster_spec({core, 6})], Config
|
||||||
|
),
|
||||||
|
|
||||||
%% 1. Start all nodes
|
%% 1. Start all nodes
|
||||||
[First | Rest] = Nodes = start_cluster(Cluster),
|
[First | Rest] = Nodes = start_cluster(Cluster),
|
||||||
try
|
try
|
||||||
File = "/configs/cluster.hocon",
|
NodeDataDir = erpc:call(First, emqx, data_dir, []),
|
||||||
|
File = NodeDataDir ++ "/configs/cluster.hocon",
|
||||||
assert_config_load_done(Nodes),
|
assert_config_load_done(Nodes),
|
||||||
rpc:call(First, ?MODULE, create_data_dir, [File]),
|
rpc:call(First, ?MODULE, create_data_dir, [File]),
|
||||||
{[ok, ok, ok], []} = rpc:multicall(Nodes, application, stop, [emqx_conf]),
|
{[ok, ok, ok], []} = rpc:multicall(Nodes, application, stop, [emqx_conf]),
|
||||||
|
@ -74,16 +80,19 @@ t_copy_new_data_dir(_Config) ->
|
||||||
stop_cluster(Nodes)
|
stop_cluster(Nodes)
|
||||||
end.
|
end.
|
||||||
|
|
||||||
t_copy_deprecated_data_dir(_Config) ->
|
t_copy_deprecated_data_dir(Config) ->
|
||||||
net_kernel:start(['master2@127.0.0.1', longnames]),
|
net_kernel:start(['master2@127.0.0.1', longnames]),
|
||||||
ct:timetrap({seconds, 120}),
|
ct:timetrap({seconds, 120}),
|
||||||
snabbkaffe:fix_ct_logging(),
|
snabbkaffe:fix_ct_logging(),
|
||||||
Cluster = cluster([cluster_spec({core, 7}), cluster_spec({core, 8}), cluster_spec({core, 9})]),
|
Cluster = cluster(
|
||||||
|
[cluster_spec({core, 7}), cluster_spec({core, 8}), cluster_spec({core, 9})], Config
|
||||||
|
),
|
||||||
|
|
||||||
%% 1. Start all nodes
|
%% 1. Start all nodes
|
||||||
[First | Rest] = Nodes = start_cluster(Cluster),
|
[First | Rest] = Nodes = start_cluster(Cluster),
|
||||||
try
|
try
|
||||||
File = "/configs/cluster-override.conf",
|
NodeDataDir = erpc:call(First, emqx, data_dir, []),
|
||||||
|
File = NodeDataDir ++ "/configs/cluster-override.conf",
|
||||||
assert_config_load_done(Nodes),
|
assert_config_load_done(Nodes),
|
||||||
rpc:call(First, ?MODULE, create_data_dir, [File]),
|
rpc:call(First, ?MODULE, create_data_dir, [File]),
|
||||||
{[ok, ok, ok], []} = rpc:multicall(Nodes, application, stop, [emqx_conf]),
|
{[ok, ok, ok], []} = rpc:multicall(Nodes, application, stop, [emqx_conf]),
|
||||||
|
@ -103,56 +112,60 @@ t_copy_deprecated_data_dir(_Config) ->
|
||||||
%%------------------------------------------------------------------------------
|
%%------------------------------------------------------------------------------
|
||||||
|
|
||||||
create_data_dir(File) ->
|
create_data_dir(File) ->
|
||||||
Node = atom_to_list(node()),
|
NodeDataDir = emqx:data_dir(),
|
||||||
ok = filelib:ensure_dir(Node ++ "/certs/"),
|
ok = filelib:ensure_dir(NodeDataDir ++ "/certs/"),
|
||||||
ok = filelib:ensure_dir(Node ++ "/authz/"),
|
ok = filelib:ensure_dir(NodeDataDir ++ "/authz/"),
|
||||||
ok = filelib:ensure_dir(Node ++ "/configs/"),
|
ok = filelib:ensure_dir(NodeDataDir ++ "/configs/"),
|
||||||
ok = file:write_file(Node ++ "/certs/fake-cert", list_to_binary(Node)),
|
ok = file:write_file(NodeDataDir ++ "/certs/fake-cert", list_to_binary(NodeDataDir)),
|
||||||
ok = file:write_file(Node ++ "/authz/fake-authz", list_to_binary(Node)),
|
ok = file:write_file(NodeDataDir ++ "/authz/fake-authz", list_to_binary(NodeDataDir)),
|
||||||
Telemetry = <<"telemetry.enable = false">>,
|
Telemetry = <<"telemetry.enable = false">>,
|
||||||
ok = file:write_file(Node ++ File, Telemetry).
|
ok = file:write_file(File, Telemetry).
|
||||||
|
|
||||||
set_data_dir_env() ->
|
set_data_dir_env() ->
|
||||||
Node = atom_to_list(node()),
|
NodeDataDir = emqx:data_dir(),
|
||||||
|
NodeStr = atom_to_list(node()),
|
||||||
%% will create certs and authz dir
|
%% will create certs and authz dir
|
||||||
ok = filelib:ensure_dir(Node ++ "/configs/"),
|
ok = filelib:ensure_dir(NodeDataDir ++ "/configs/"),
|
||||||
{ok, [ConfigFile]} = application:get_env(emqx, config_files),
|
{ok, [ConfigFile]} = application:get_env(emqx, config_files),
|
||||||
NewConfigFile = ConfigFile ++ "." ++ Node,
|
NewConfigFile = ConfigFile ++ "." ++ NodeStr,
|
||||||
|
ok = filelib:ensure_dir(NewConfigFile),
|
||||||
{ok, _} = file:copy(ConfigFile, NewConfigFile),
|
{ok, _} = file:copy(ConfigFile, NewConfigFile),
|
||||||
Bin = iolist_to_binary(io_lib:format("node.config_files = [~p]~n", [NewConfigFile])),
|
Bin = iolist_to_binary(io_lib:format("node.config_files = [~p]~n", [NewConfigFile])),
|
||||||
ok = file:write_file(NewConfigFile, Bin, [append]),
|
ok = file:write_file(NewConfigFile, Bin, [append]),
|
||||||
DataDir = iolist_to_binary(io_lib:format("node.data_dir = ~p~n", [Node])),
|
DataDir = iolist_to_binary(io_lib:format("node.data_dir = ~p~n", [NodeDataDir])),
|
||||||
ok = file:write_file(NewConfigFile, DataDir, [append]),
|
ok = file:write_file(NewConfigFile, DataDir, [append]),
|
||||||
application:set_env(emqx, config_files, [NewConfigFile]),
|
application:set_env(emqx, config_files, [NewConfigFile]),
|
||||||
application:set_env(emqx, data_dir, Node),
|
%% application:set_env(emqx, data_dir, Node),
|
||||||
%% We set env both cluster.hocon and cluster-override.conf, but only one will be used
|
%% We set env both cluster.hocon and cluster-override.conf, but only one will be used
|
||||||
application:set_env(emqx, cluster_hocon_file, Node ++ "/configs/cluster.hocon"),
|
application:set_env(emqx, cluster_hocon_file, NodeDataDir ++ "/configs/cluster.hocon"),
|
||||||
application:set_env(emqx, cluster_override_conf_file, Node ++ "/configs/cluster-override.conf"),
|
application:set_env(
|
||||||
|
emqx, cluster_override_conf_file, NodeDataDir ++ "/configs/cluster-override.conf"
|
||||||
|
),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
assert_data_copy_done([First0 | Rest], File) ->
|
assert_data_copy_done([_First | Rest], File) ->
|
||||||
First = atom_to_list(First0),
|
FirstDataDir = filename:dirname(filename:dirname(File)),
|
||||||
{ok, FakeCertFile} = file:read_file(First ++ "/certs/fake-cert"),
|
{ok, FakeCertFile} = file:read_file(FirstDataDir ++ "/certs/fake-cert"),
|
||||||
{ok, FakeAuthzFile} = file:read_file(First ++ "/authz/fake-authz"),
|
{ok, FakeAuthzFile} = file:read_file(FirstDataDir ++ "/authz/fake-authz"),
|
||||||
{ok, FakeOverrideFile} = file:read_file(First ++ File),
|
{ok, FakeOverrideFile} = file:read_file(File),
|
||||||
{ok, ExpectFake} = hocon:binary(FakeOverrideFile),
|
{ok, ExpectFake} = hocon:binary(FakeOverrideFile),
|
||||||
lists:foreach(
|
lists:foreach(
|
||||||
fun(Node0) ->
|
fun(Node0) ->
|
||||||
Node = atom_to_list(Node0),
|
NodeDataDir = erpc:call(Node0, emqx, data_dir, []),
|
||||||
?assertEqual(
|
?assertEqual(
|
||||||
{ok, FakeCertFile},
|
{ok, FakeCertFile},
|
||||||
file:read_file(Node ++ "/certs/fake-cert"),
|
file:read_file(NodeDataDir ++ "/certs/fake-cert"),
|
||||||
#{node => Node}
|
#{node => Node0}
|
||||||
),
|
),
|
||||||
?assertEqual(
|
?assertEqual(
|
||||||
{ok, ExpectFake},
|
{ok, ExpectFake},
|
||||||
hocon:files([Node ++ File]),
|
hocon:files([File]),
|
||||||
#{node => Node}
|
#{node => Node0}
|
||||||
),
|
),
|
||||||
?assertEqual(
|
?assertEqual(
|
||||||
{ok, FakeAuthzFile},
|
{ok, FakeAuthzFile},
|
||||||
file:read_file(Node ++ "/authz/fake-authz"),
|
file:read_file(NodeDataDir ++ "/authz/fake-authz"),
|
||||||
#{node => Node}
|
#{node => Node0}
|
||||||
)
|
)
|
||||||
end,
|
end,
|
||||||
Rest
|
Rest
|
||||||
|
@ -168,7 +181,7 @@ assert_config_load_done(Nodes) ->
|
||||||
).
|
).
|
||||||
|
|
||||||
stop_cluster(Nodes) ->
|
stop_cluster(Nodes) ->
|
||||||
[emqx_common_test_helpers:stop_slave(Node) || Node <- Nodes].
|
emqx_utils:pmap(fun emqx_common_test_helpers:stop_slave/1, Nodes).
|
||||||
|
|
||||||
start_cluster(Specs) ->
|
start_cluster(Specs) ->
|
||||||
[emqx_common_test_helpers:start_slave(Name, Opts) || {Name, Opts} <- Specs].
|
[emqx_common_test_helpers:start_slave(Name, Opts) || {Name, Opts} <- Specs].
|
||||||
|
@ -183,7 +196,8 @@ start_cluster_async(Specs) ->
|
||||||
|| {Name, Opts} <- Specs
|
|| {Name, Opts} <- Specs
|
||||||
].
|
].
|
||||||
|
|
||||||
cluster(Specs) ->
|
cluster(Specs, Config) ->
|
||||||
|
PrivDataDir = ?config(priv_dir, Config),
|
||||||
Env = [
|
Env = [
|
||||||
{emqx, init_config_load_done, false},
|
{emqx, init_config_load_done, false},
|
||||||
{emqx, boot_modules, []}
|
{emqx, boot_modules, []}
|
||||||
|
@ -193,6 +207,7 @@ cluster(Specs) ->
|
||||||
{apps, [emqx_conf]},
|
{apps, [emqx_conf]},
|
||||||
{load_schema, false},
|
{load_schema, false},
|
||||||
{join_to, true},
|
{join_to, true},
|
||||||
|
{priv_data_dir, PrivDataDir},
|
||||||
{env_handler, fun
|
{env_handler, fun
|
||||||
(emqx) ->
|
(emqx) ->
|
||||||
application:set_env(emqx, boot_modules, []),
|
application:set_env(emqx, boot_modules, []),
|
||||||
|
|
Loading…
Reference in New Issue