diff options
Diffstat (limited to 'src/rebar_pkg_resource.erl')
-rw-r--r-- | src/rebar_pkg_resource.erl | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/src/rebar_pkg_resource.erl b/src/rebar_pkg_resource.erl new file mode 100644 index 0000000..5cd6fc8 --- /dev/null +++ b/src/rebar_pkg_resource.erl @@ -0,0 +1,32 @@ +%% -*- erlang-indent-level: 4;indent-tabs-mode: nil -*- +%% ex: ts=4 sw=4 et +-module(rebar_pkg_resource). + +-behaviour(rebar_resource). + +-export([lock/2 + ,download/2 + ,needs_update/2 + ,make_vsn/1]). + +-include("rebar.hrl"). + +lock(_AppDir, Source) -> + Source. + +needs_update(Dir, {pkg, _Name, Vsn, _Url}) -> + [AppInfo] = rebar_app_discover:find_apps([Dir], all), + case rebar_app_info:original_vsn(AppInfo) =:= ec_cnv:to_list(Vsn) of + true -> + false; + false -> + true + end. + +download(Dir, {pkg, _Name, _Vsn, Url}) -> + TmpFile = filename:join(Dir, "package.tar.gz"), + {ok, saved_to_file} = httpc:request(get, {binary_to_list(Url), []}, [], [{stream, TmpFile}]), + {tarball, TmpFile}. + +make_vsn(_) -> + {error, "Replacing version of type pkg not supported."}. |