瀏覽代碼

Update nodetool in upgrade_project

pull/3/head
Tuncer Ayaz 14 年之前
父節點
當前提交
1ee21c523f
共有 1 個檔案被更改,包括 22 行新增0 行删除
  1. +22
    -0
      test/upgrade_project/rel/files/nodetool

+ 22
- 0
test/upgrade_project/rel/files/nodetool 查看文件

@ -7,6 +7,7 @@
%% -------------------------------------------------------------------
main(Args) ->
ok = start_epmd(),
%% Extract the args
{RestArgs, TargetNode} = process_args(Args, [], undefined),
@ -73,6 +74,27 @@ process_args([Arg | Rest], Acc, Opts) ->
process_args(Rest, [Arg | Acc], Opts).
start_epmd() ->
[] = os:cmd(epmd_path() ++ " -daemon"),
ok.
epmd_path() ->
ErtsBinDir = filename:dirname(escript:script_name()),
Name = "epmd",
case os:find_executable(Name, ErtsBinDir) of
false ->
case os:find_executable(Name) of
false ->
io:format("Could not find epmd.~n"),
halt(1);
GlobalEpmd ->
GlobalEpmd
end;
Epmd ->
Epmd
end.
nodename(Name) ->
case string:tokens(Name, "@") of
[_Node, _Host] ->

Loading…
取消
儲存