You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

72 rivejä
3.3 KiB

  1. -module(rebar_env).
  2. -export([create_env/1,
  3. create_env/2]).
  4. -include("rebar.hrl").
  5. %% @doc The following environment variables are exported when running
  6. %% a hook (absolute paths):
  7. %%
  8. %% REBAR_DEPS_DIR = rebar_dir:deps_dir/1
  9. %% REBAR_BUILD_DIR = rebar_dir:base_dir/1
  10. %% REBAR_ROOT_DIR = rebar_dir:root_dir/1
  11. %% REBAR_CHECKOUTS_DIR = rebar_dir:checkouts_dir/1
  12. %% REBAR_PLUGINS_DIR = rebar_dir:plugins_dir/1
  13. %% REBAR_GLOBAL_CONFIG_DIR = rebar_dir:global_config_dir/1
  14. %% REBAR_GLOBAL_CACHE_DIR = rebar_dir:global_cache_dir/1
  15. %% REBAR_TEMPLATE_DIR = rebar_dir:template_dir/1
  16. %% REBAR_APP_DIRS = rebar_dir:lib_dirs/1
  17. %% REBAR_SRC_DIRS = rebar_dir:src_dirs/1
  18. %%
  19. %% autoconf compatible variables
  20. %% (see: http://www.gnu.org/software/autoconf/manual/autoconf.html#Erlang-Libraries):
  21. %% ERLANG_ERTS_VER = erlang:system_info(version)
  22. %% ERLANG_ROOT_DIR = code:root_dir/0
  23. %% ERLANG_LIB_DIR_erl_interface = code:lib_dir(erl_interface)
  24. %% ERLANG_LIB_VER_erl_interface = version part of path returned by code:lib_dir(erl_interface)
  25. %% ERL = ERLANG_ROOT_DIR/bin/erl
  26. %% ERLC = ERLANG_ROOT_DIR/bin/erl
  27. %%
  28. -spec create_env(rebar_state:t()) -> proplists:proplist().
  29. create_env(State) ->
  30. Opts = rebar_state:opts(State),
  31. create_env(State, Opts).
  32. -spec create_env(rebar_state:t(), rebar_dict()) -> proplists:proplist().
  33. create_env(State, Opts) ->
  34. BaseDir = rebar_dir:base_dir(State),
  35. [
  36. {"REBAR_DEPS_DIR", filename:absname(rebar_dir:deps_dir(State))},
  37. {"REBAR_BUILD_DIR", filename:absname(rebar_dir:base_dir(State))},
  38. {"REBAR_ROOT_DIR", filename:absname(rebar_dir:root_dir(State))},
  39. {"REBAR_CHECKOUTS_DIR", filename:absname(rebar_dir:checkouts_dir(State))},
  40. {"REBAR_PLUGINS_DIR", filename:absname(rebar_dir:plugins_dir(State))},
  41. {"REBAR_GLOBAL_CONFIG_DIR", filename:absname(rebar_dir:global_config_dir(State))},
  42. {"REBAR_GLOBAL_CACHE_DIR", filename:absname(rebar_dir:global_cache_dir(Opts))},
  43. {"REBAR_TEMPLATE_DIR", filename:absname(rebar_dir:template_dir(State))},
  44. {"REBAR_APP_DIRS", join_dirs(BaseDir, rebar_dir:lib_dirs(State))},
  45. {"REBAR_SRC_DIRS", join_dirs(BaseDir, rebar_dir:all_src_dirs(Opts))},
  46. {"ERLANG_ERTS_VER", erlang:system_info(version)},
  47. {"ERLANG_ROOT_DIR", code:root_dir()},
  48. {"ERLANG_LIB_DIR_erl_interface", code:lib_dir(erl_interface)},
  49. {"ERLANG_LIB_VER_erl_interface", re_version(code:lib_dir(erl_interface))},
  50. {"ERL", filename:join([code:root_dir(), "bin", "erl"])},
  51. {"ERLC", filename:join([code:root_dir(), "bin", "erlc"])},
  52. {"ERLANG_ARCH" , rebar_api:wordsize()},
  53. {"ERLANG_TARGET", rebar_api:get_arch()}
  54. ].
  55. %% ====================================================================
  56. %% Internal functions
  57. %% ====================================================================
  58. join_dirs(BaseDir, Dirs) ->
  59. rebar_string:join([filename:join(BaseDir, Dir) || Dir <- Dirs], ":").
  60. re_version(Path) ->
  61. case re:run(Path, "^.*-(?<VER>[^/-]*)$", [{capture,[1],list}, unicode]) of
  62. nomatch -> "";
  63. {match, [Ver]} -> Ver
  64. end.