diff options
author | Stu Tomlinson <stu@nosnilmot.com> | 2020-09-21 12:51:31 +0100 |
---|---|---|
committer | GitHub <noreply@github.com> | 2020-09-21 13:51:31 +0200 |
commit | 385af01587b85b20bb2def6743ea10f12a94f5f2 (patch) | |
tree | 91eeeb22e5b5807ee47f7c5672234bfd0465d2b4 /_checkouts/configure_deps/src/configure_deps_prv.erl | |
parent | Add 'gitonly_deps' list to rebar config/script (#3391) (diff) |
rebar3 plugin to support configure-deps command (#3392)
* rebar3 plugin to support configure-deps command
To allow running configure on dependencies prior to compilation, add a
rebar3 plugin to support the 'configure-deps' command introduced for
rebar2 in a7639fd4
* Fix compatibility with OTP < 23
binary_to_atom/1 is new to OTP 23
Diffstat (limited to '')
-rw-r--r-- | _checkouts/configure_deps/src/configure_deps_prv.erl | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/_checkouts/configure_deps/src/configure_deps_prv.erl b/_checkouts/configure_deps/src/configure_deps_prv.erl new file mode 100644 index 000000000..0f18eedcb --- /dev/null +++ b/_checkouts/configure_deps/src/configure_deps_prv.erl @@ -0,0 +1,55 @@ +-module(configure_deps_prv). + +-export([init/1, do/1, format_error/1]). + +-define(PROVIDER, 'configure-deps'). +-define(DEPS, [install_deps]). + +%% =================================================================== +%% Public API +%% =================================================================== +-spec init(rebar_state:t()) -> {ok, rebar_state:t()}. +init(State) -> + Provider = providers:create([ + {namespace, default}, + {name, ?PROVIDER}, % The 'user friendly' name of the task + {module, ?MODULE}, % The module implementation of the task + {bare, true}, % The task can be run by the user, always true + {deps, ?DEPS}, % The list of dependencies + {example, "rebar3 configure-deps"}, % How to use the plugin + {opts, []}, % list of options understood by the plugin + {short_desc, "Explicitly run ./configure for dependencies"}, + {desc, "A rebar plugin to allow explicitly running ./configure on depdendencies. Useful if dependencies might change prior to compilation when configure is run."} + ]), + {ok, rebar_state:add_provider(State, Provider)}. + + +-spec do(rebar_state:t()) -> {ok, rebar_state:t()} | {error, string()}. +do(State) -> + Apps = rebar_state:project_apps(State) ++ lists:usort(rebar_state:all_deps(State)), + lists:foreach(fun do_app/1, Apps), + {ok, State}. + +exec_configure({'configure-deps', Cmd}, Dir) -> + c:cd(Dir), + os:cmd(Cmd); +exec_configure(_, Acc) -> Acc. + +parse_pre_hooks({pre_hooks, PreHooks}, Acc) -> + lists:foldl(fun exec_configure/2, Acc, PreHooks); +parse_pre_hooks(_, Acc) -> Acc. + +parse_additions({add, App, Additions}, {MyApp, Dir}) when App == MyApp -> + lists:foldl(fun parse_pre_hooks/2, Dir, Additions), + {MyApp, Dir}; +parse_additions(_, Acc) -> Acc. + +do_app(App) -> + Dir = rebar_app_info:dir(App), + Opts = rebar_app_info:opts(App), + Overrides = rebar_opts:get(Opts, overrides), + lists:foldl(fun parse_additions/2, {binary_to_atom(rebar_app_info:name(App), utf8), Dir}, Overrides). + +-spec format_error(any()) -> iolist(). +format_error(Reason) -> + io_lib:format("~p", [Reason]). |