|
|
- %% -*- erlang-indent-level: 4;indent-tabs-mode: nil -*-
- %% ex: ts=4 sw=4 et
-
- -module(rebar_plugins).
-
- -export([install/1]).
-
- -include("rebar.hrl").
-
- %% ===================================================================
- %% Public API
- %% ===================================================================
-
- install(State) ->
- State1 = rebar_state:set(State, deps_dir, ?DEFAULT_PLUGINS_DIR),
-
- Plugins = rebar_state:get(State1, plugins, []),
- {ok, State2} = rebar_prv_install_deps:handle_deps(State1, Plugins),
-
- Apps = rebar_state:get(State2, all_deps, []),
- ToBuild = lists:dropwhile(fun rebar_app_info:valid/1, Apps),
- lists:foreach(fun(AppInfo) ->
- C = rebar_config:consult(rebar_app_info:dir(AppInfo)),
- S = rebar_state:new(rebar_state:new(), C, rebar_app_info:dir(AppInfo)),
- rebar_prv_compile:build(S, AppInfo)
- end, ToBuild),
-
- PluginProviders = plugin_providers(Plugins),
- {ok, PluginProviders, rebar_state:set(State2, deps_dir, ?DEFAULT_DEPS_DIR)}.
-
- plugin_providers(Plugins) ->
- lists:map(fun({Plugin, _, _}) when is_atom(Plugin) ->
- Plugin;
- ({Plugin, _}) when is_atom(Plugin) ->
- Plugin;
- (Plugin) when is_atom(Plugin) ->
- Plugin
- end, Plugins).
|