summaryrefslogtreecommitdiff
path: root/test/rebar_escriptize_SUITE.erl
blob: a6901f9b5ff3a9e8a7021edd6c80dc6c8c6f5130 (plain)
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
75
76
77
78
79
80
81
82
83
84
-module(rebar_escriptize_SUITE).

-export([suite/0,
         init_per_suite/1,
         end_per_suite/1,
         init_per_testcase/2,
         all/0,
         escriptize_with_name/1,
         escriptize_with_bad_name/1,
         build_and_clean_app/1,
         escriptize_with_ebin_subdir/1]).

-include_lib("common_test/include/ct.hrl").
-include_lib("eunit/include/eunit.hrl").
-include_lib("kernel/include/file.hrl").

suite() ->
    [].

init_per_suite(Config) ->
    Config.

end_per_suite(_Config) ->
    ok.

init_per_testcase(_, Config) ->
    rebar_test_utils:init_rebar_state(Config).

all() ->
    [
     build_and_clean_app,
     escriptize_with_name,
     escriptize_with_bad_name,
     escriptize_with_ebin_subdir
    ].

%% Test escriptize builds and runs the app's escript
build_and_clean_app(Config) ->
    AppDir = ?config(apps, Config),

    Name = rebar_test_utils:create_random_name("app1_"),
    Vsn = rebar_test_utils:create_random_vsn(),
    rebar_test_utils:create_app(AppDir, Name, Vsn, [kernel, stdlib]),
    rebar_test_utils:run_and_check(Config, [], ["escriptize"],
                                   {ok, [{app, Name, valid}]}).

escriptize_with_name(Config) ->
    AppDir = ?config(apps, Config),

    Name = rebar_test_utils:create_random_name("app1_"),
    Vsn = rebar_test_utils:create_random_vsn(),
    rebar_test_utils:create_app(AppDir, Name, Vsn, [kernel, stdlib]),
    rebar_test_utils:run_and_check(Config, [{escript_main_app, Name}], ["escriptize"],
                                   {ok, [{app, Name, valid}]}).

escriptize_with_bad_name(Config) ->
    AppDir = ?config(apps, Config),

    Name = rebar_test_utils:create_random_name("app1_"),
    Vsn = rebar_test_utils:create_random_vsn(),
    rebar_test_utils:create_app(AppDir, Name, Vsn, [kernel, stdlib]),
    rebar_test_utils:run_and_check(Config, [{escript_main_app, boogers}], ["escriptize"],
                                   {error,{rebar_prv_escriptize, {bad_name, boogers}}}).

escriptize_with_ebin_subdir(Config) ->
    AppDir = ?config(apps, Config),
    Name = rebar_test_utils:create_random_name("app1_"),
    Vsn = rebar_test_utils:create_random_vsn(),

    rebar_test_utils:create_app(AppDir, Name, Vsn, [kernel, stdlib]),

    filelib:ensure_dir(filename:join([AppDir, "ebin", "subdir", "subdirfile"])),

    %% To work, this test must run from the AppDir itself. To avoid breaking
    %% other tests, be careful with cwd
    Cwd = file:get_cwd(),
    try
        file:set_cwd(AppDir),
        {ok, _} = rebar3:run(rebar_state:new(?config(state,Config), [], AppDir),
                             ["escriptize"])
    after
        file:set_cwd(Cwd) % reset always
    end,
    ok.