mirror of
https://github.com/correl/rebar.git
synced 2024-11-14 19:19:30 +00:00
Add support for embedding git version; make sure to always rebuild rebar_core so that the VCS_INFO constant gets updated
This commit is contained in:
parent
370d8df02f
commit
27f638b45e
1 changed files with 15 additions and 3 deletions
18
bootstrap
18
bootstrap
|
@ -6,8 +6,9 @@ main(Args) ->
|
|||
%% Get a string repr of build time
|
||||
Built = build_time(),
|
||||
|
||||
%% Get a string repr of hg changeset
|
||||
HgInfo = "hg " ++ string:strip(os:cmd("hg identify -i"), both, $\n),
|
||||
%% Get a string repr of first matching VCS changeset
|
||||
VcsInfo = vcs_info([{hg, ".hg", "hg identify -i"},
|
||||
{git, ".git", "git describe --always"}]),
|
||||
|
||||
%% Check for force=1 flag to force a rebuild
|
||||
case lists:member("force=1", Args) of
|
||||
|
@ -15,13 +16,14 @@ main(Args) ->
|
|||
[] = os:cmd("rm -rf ebin/*.beam"),
|
||||
ok;
|
||||
false ->
|
||||
os:cmd("rm -f ebin/rebar_core.beam"),
|
||||
ok
|
||||
end,
|
||||
|
||||
%% Compile all src/*.erl to ebin
|
||||
case make:files(filelib:wildcard("src/*.erl"), [{outdir, "ebin"}, {i, "include"},
|
||||
{d, 'BUILD_TIME', Built},
|
||||
{d, 'VCS_INFO', HgInfo}]) of
|
||||
{d, 'VCS_INFO', VcsInfo}]) of
|
||||
up_to_date ->
|
||||
ok;
|
||||
error ->
|
||||
|
@ -86,3 +88,13 @@ load_files(Wildcard, Dir) ->
|
|||
read_file(Filename, Dir) ->
|
||||
{ok, Bin} = file:read_file(filename:join(Dir, Filename)),
|
||||
{Filename, Bin}.
|
||||
|
||||
vcs_info([]) ->
|
||||
"No VCS info available.";
|
||||
vcs_info([{Id, Dir, Cmd} | Rest]) ->
|
||||
case filelib:is_dir(Dir) of
|
||||
true ->
|
||||
lists:concat([Id, " ", string:strip(os:cmd(Cmd), both, $\n)]);
|
||||
false ->
|
||||
vcs_info(Rest)
|
||||
end.
|
||||
|
|
Loading…
Reference in a new issue