summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorTristan Sloughter <t@crashfast.com>2015-02-20 08:42:38 -0600
committerTristan Sloughter <t@crashfast.com>2015-02-22 10:57:57 -0600
commit633dafafc365331af94372bb667b376a42ae913e (patch)
tree35c3128b42c9a0c55ef49f070855bb9c637ebeb8 /test
parentbe6cacfe599702cf2c93b31fb2e38d5b456ee0fd (diff)
release and tar tests
Diffstat (limited to 'test')
-rw-r--r--test/rebar_release_SUITE.erl52
-rw-r--r--test/rebar_test_utils.erl24
2 files changed, 76 insertions, 0 deletions
diff --git a/test/rebar_release_SUITE.erl b/test/rebar_release_SUITE.erl
new file mode 100644
index 0000000..92219a5
--- /dev/null
+++ b/test/rebar_release_SUITE.erl
@@ -0,0 +1,52 @@
+-module(rebar_release_SUITE).
+-compile(export_all).
+-include_lib("common_test/include/ct.hrl").
+-include_lib("eunit/include/eunit.hrl").
+
+all() -> [release, tar].
+
+init_per_testcase(Case, Config0) ->
+ Config = rebar_test_utils:init_rebar_state(Config0),
+ Name = rebar_test_utils:create_random_name(atom_to_list(Case)),
+ AppDir = ?config(apps, Config),
+ application:load(rebar),
+
+ ok = ec_file:mkdir_p(AppDir),
+ State = rebar_state:new([{base_dir, filename:join([AppDir, "_build"])}]),
+
+ rebar_test_utils:create_app(AppDir, Name, "1.0.0", [kernel, stdlib]),
+ [{name, Name}, {apps, AppDir}, {state, State} | Config].
+
+end_per_testcase(_, Config) ->
+ meck:unload(),
+ Config.
+
+release(Config) ->
+ AppDir = ?config(apps, Config),
+ Name = ?config(name, Config),
+ Vsn = "1.0.0",
+ {ok, RebarConfig} =
+ file:consult(rebar_test_utils:create_config(AppDir,
+ [{relx, [{release, {list_to_atom(Name), Vsn},
+ [list_to_atom(Name)]},
+ {lib_dirs, [AppDir]}]}])),
+ rebar_test_utils:run_and_check(
+ Config, RebarConfig,
+ ["release"],
+ {ok, [{release, list_to_atom(Name), Vsn}]}
+ ).
+
+tar(Config) ->
+ AppDir = ?config(apps, Config),
+ Name = ?config(name, Config),
+ Vsn = "1.0.0",
+ {ok, RebarConfig} =
+ file:consult(rebar_test_utils:create_config(AppDir,
+ [{relx, [{release, {list_to_atom(Name), Vsn},
+ [list_to_atom(Name)]},
+ {lib_dirs, [AppDir]}]}])),
+ rebar_test_utils:run_and_check(
+ Config, RebarConfig,
+ ["tar"],
+ {ok, [{release, list_to_atom(Name), Vsn}, {tar, Name, Vsn}]}
+ ).
diff --git a/test/rebar_test_utils.erl b/test/rebar_test_utils.erl
index 96200a6..2198384 100644
--- a/test/rebar_test_utils.erl
+++ b/test/rebar_test_utils.erl
@@ -115,6 +115,7 @@ check_results(AppDir, Expected) ->
DepsNames = [{ec_cnv:to_list(rebar_app_info:name(App)), App} || App <- Deps],
Checkouts = rebar_app_discover:find_apps([CheckoutsDir], all),
CheckoutsNames = [{ec_cnv:to_list(rebar_app_info:name(App)), App} || App <- Checkouts],
+
lists:foreach(
fun({app, Name}) ->
ct:pal("Name: ~p", [Name]),
@@ -167,6 +168,29 @@ check_results(AppDir, Expected) ->
?assertEqual(iolist_to_binary(Vsn),
iolist_to_binary(LockVsn))
end
+ ; ({release, Name, Vsn}) ->
+ ct:pal("Release: ~p-~s", [Name, Vsn]),
+ {ok, Cwd} = file:get_cwd(),
+ try
+ file:set_cwd(AppDir),
+ ReleaseDir = filename:join([AppDir, "_build", "rel"]),
+ RelxState = rlx_state:new("", [], []),
+ RelxState1 = rlx_state:base_output_dir(RelxState, ReleaseDir),
+ {ok, RelxState2} = rlx_prv_app_discover:do(RelxState1),
+ {ok, RelxState3} = rlx_prv_rel_discover:do(RelxState2),
+
+ %% throws not_found if it doesn't exist
+ rlx_state:get_realized_release(RelxState3, Name, Vsn)
+ catch
+ _ ->
+ ct:fail(release_not_found)
+ after
+ file:set_cwd(Cwd)
+ end
+ ; ({tar, Name, Vsn}) ->
+ ct:pal("Tarball: ~s-~s", [Name, Vsn]),
+ TarballWildcard = filename:join([AppDir, "**", Name++"-"++Vsn++".tar.gz"]),
+ ?assertNotEqual([], filelib:wildcard(TarballWildcard))
end, Expected).
write_src_file(Dir, Name) ->