1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
|
%%% This suite currently only tests for options parsing since we do
%%% not know if epmd will be running to actually boot nodes.
-module(rebar_dist_utils_SUITE).
-include_lib("common_test/include/ct.hrl").
-include_lib("eunit/include/eunit.hrl").
-compile(export_all).
all() -> [from_config, from_cli, overlap, from_config_profile].
init_per_testcase(_, Config0) ->
Config = rebar_test_utils:init_rebar_state(Config0),
AppDir = ?config(apps, Config),
Name = rebar_test_utils:create_random_name("app_"),
Vsn = rebar_test_utils:create_random_vsn(),
rebar_test_utils:create_app(filename:join([AppDir,"apps",Name]), Name, Vsn, [kernel, stdlib]),
Config.
end_per_testcase(_, _) ->
ok.
from_config(Config) ->
ShortConfig = [{dist_node, [{sname, 'a@localhost'}, {setcookie, abc}]}],
LongConfig = [{dist_node, [{name, 'a@localhost.x'}, {setcookie, abc}]}],
BothConfig = [{dist_node, [{sname, 'a@localhost'}, {name, 'a@localhost.x'}, {setcookie,abc}]}],
NoConfig = [],
CookieConfig = [{dist_node, [{setcookie, def}]}],
NoCookie = [{dist_node, [{sname, 'a@localhost'}]}],
{ok, State0} = rebar_test_utils:run_and_check(Config, ShortConfig, ["version"], return),
{undefined, 'a@localhost', [{setcookie, abc}]} = rebar_dist_utils:find_options(State0),
{ok, State1} = rebar_test_utils:run_and_check(Config, LongConfig, ["version"], return),
{'a@localhost.x', undefined, [{setcookie, abc}]} = rebar_dist_utils:find_options(State1),
%% only support the first name found, side-effect of wanting profile support
{ok, State2} = rebar_test_utils:run_and_check(Config, BothConfig, ["version"], return),
{undefined, 'a@localhost', [{setcookie, abc}]} = rebar_dist_utils:find_options(State2),
{ok, State3} = rebar_test_utils:run_and_check(Config, NoConfig, ["version"], return),
{undefined, undefined, []} = rebar_dist_utils:find_options(State3),
{ok, State4} = rebar_test_utils:run_and_check(Config, CookieConfig, ["version"], return),
{undefined, undefined, [{setcookie, def}]} = rebar_dist_utils:find_options(State4),
{ok, State5} = rebar_test_utils:run_and_check(Config, NoCookie, ["version"], return),
{undefined, 'a@localhost', []} = rebar_dist_utils:find_options(State5),
ok.
from_cli(Config) ->
{ok, State0} = rebar_test_utils:run_and_check(Config, [], ["version"], return),
{undefined, undefined, []} = rebar_dist_utils:find_options(State0),
State1 = rebar_state:command_parsed_args(State0, {[{sname, 'a@localhost'}, {setcookie,abc}], []}),
{undefined, 'a@localhost', [{setcookie, abc}]} = rebar_dist_utils:find_options(State1),
State2 = rebar_state:command_parsed_args(State0, {[{name, 'a@localhost.x'}, {setcookie,abc}], []}),
{'a@localhost.x', undefined, [{setcookie, abc}]} = rebar_dist_utils:find_options(State2),
State3 = rebar_state:command_parsed_args(State0, {[{sname, 'a@localhost'}, {name, 'a@localhost.x'}, {setcookie,abc}], []}),
{'a@localhost.x', 'a@localhost', [{setcookie, abc}]} = rebar_dist_utils:find_options(State3),
State4 = rebar_state:command_parsed_args(State0, {[{setcookie,def}], []}),
{undefined, undefined, [{setcookie, def}]} = rebar_dist_utils:find_options(State4),
State5 = rebar_state:command_parsed_args(State0, {[{sname, 'a@localhost'}], []}),
{undefined, 'a@localhost', []} = rebar_dist_utils:find_options(State5),
ok.
overlap(Config) ->
%% Make sure that CLI config takes over rebar config without clash for names, though
%% cookies can pass through
RebarConfig = [{dist_node, [{sname, 'a@localhost'}, {setcookie, abc}]}],
{ok, State0} = rebar_test_utils:run_and_check(Config, RebarConfig, ["version"], return),
State1 = rebar_state:command_parsed_args(State0, {[{name, 'b@localhost.x'}], []}),
{'b@localhost.x', undefined, [{setcookie, abc}]} = rebar_dist_utils:find_options(State1),
ok.
from_config_profile(Config) ->
%% running as a profile does not create name clashes
RebarConfig = [{dist_node, [{sname, 'a@localhost'}, {setcookie, abc}]},
{profiles, [ {fake, [{dist_node, [{name, 'a@localhost.x'}]}]} ]}],
{ok, State0} = rebar_test_utils:run_and_check(Config, RebarConfig, ["as","fake","version"], return),
{'a@localhost.x', undefined, [{setcookie, abc}]} = rebar_dist_utils:find_options(State0),
ok.
|
