diff options
Diffstat (limited to 'scripts/rabbitmq-rel')
-rwxr-xr-x | scripts/rabbitmq-rel | 58 |
1 files changed, 0 insertions, 58 deletions
diff --git a/scripts/rabbitmq-rel b/scripts/rabbitmq-rel deleted file mode 100755 index a96ec78764..0000000000 --- a/scripts/rabbitmq-rel +++ /dev/null @@ -1,58 +0,0 @@ -#!/usr/bin/env escript -%% vim:ft=erlang:sw=2:et: - -main(["show-rel"]) -> - Rel = get_rel(), - io:format("~p.~n", [Rel]); -main(["gen-boot"]) -> - generate_rel(), - generate_boot(). - -get_rel() -> - ok = application:load(rabbit), - Apps0 = get_apps(rabbit), - Apps1 = lists:sort( - fun - (_, rabbitmq_prelaunch) -> false; - (rabbitmq_prelaunch, _) -> true; - (_, mnesia) -> true; - (mnesia, _) -> false; - (A, B) -> A =< B - end, Apps0), - Apps = [{App, get_vsn(App)} || App <- Apps1], - - ERTSVersion = erlang:system_info(version), - RabbitVersion = get_vsn(rabbit), - - {release, - {"RabbitMQ", RabbitVersion}, - {erts, ERTSVersion}, - Apps}. - -get_apps(App) -> - ok = load_app(App), - {ok, DirectDeps} = application:get_key(App, applications), - lists:umerge( - [lists:usort(get_apps(Dep)) || Dep <- DirectDeps] ++ - [lists:usort([kernel, stdlib, sasl, App, mnesia])]). - -load_app(App) -> - case application:load(App) of - ok -> ok; - {error, {already_loaded, App}} -> ok - end. - -generate_rel() -> - Rel = get_rel(), - io:format("~p.~n", [Rel]), - Output = io_lib:format("~p.~n", [Rel]), - ok = file:write_file("rabbit.rel", Output). - -generate_boot() -> - Options = [local, {path, code:get_path()}], - ok = systools:make_script("rabbit", Options). - -get_vsn(App) -> - load_app(App), - {ok, Vsn} = application:get_key(App, vsn), - Vsn. |