|
|
@ -656,7 +656,7 @@ reloadChangedMod([Module | LeftMod], SwSyncNode, OnSyncFun, Acc) -> |
|
|
|
end. |
|
|
|
|
|
|
|
getNodes() -> |
|
|
|
lists:usort(lists:flatten(nodes() ++ [rpc:call(X, erlang, nodes, []) || X <- nodes()])) -- [node()]. |
|
|
|
lists:usort(lists:flatten(nodes() ++ [erpc:call(X, erlang, nodes, []) || X <- nodes()])) -- [node()]. |
|
|
|
|
|
|
|
syncLoadModOnAllNodes(false, _Module, _Binary, _Reason) -> |
|
|
|
ignore; |
|
|
@ -667,14 +667,14 @@ syncLoadModOnAllNodes(true, Module, Binary, Reason) -> |
|
|
|
[ |
|
|
|
begin |
|
|
|
esUtils:logSuccess("Do Reloading '~s' on ~p", [Module, Node]), |
|
|
|
rpc:call(Node, code, ensure_loaded, [Module]), |
|
|
|
case rpc:call(Node, code, which, [Module]) of |
|
|
|
erpc:call(Node, code, ensure_loaded, [Module]), |
|
|
|
case erpc:call(Node, code, which, [Module]) of |
|
|
|
Filename when is_binary(Filename) orelse is_list(Filename) -> |
|
|
|
%% File exists, overwrite and load into VM. |
|
|
|
ok = rpc:call(Node, file, write_file, [Filename, Binary]), |
|
|
|
rpc:call(Node, code, purge, [Module]), |
|
|
|
ok = erpc:call(Node, file, write_file, [Filename, Binary]), |
|
|
|
erpc:call(Node, code, purge, [Module]), |
|
|
|
|
|
|
|
case rpc:call(Node, code, load_file, [Module]) of |
|
|
|
case erpc:call(Node, code, load_file, [Module]) of |
|
|
|
{module, Module} -> |
|
|
|
esUtils:logSuccess("Reloaded(Beam ~p) Mod:~s and write Success on node:~p", [Reason, Module, Node]); |
|
|
|
{error, What} -> |
|
|
@ -682,7 +682,7 @@ syncLoadModOnAllNodes(true, Module, Binary, Reason) -> |
|
|
|
end; |
|
|
|
_ -> |
|
|
|
%% File doesn't exist, just load into VM. |
|
|
|
case rpc:call(Node, code, load_binary, [Module, undefined, Binary]) of |
|
|
|
case erpc:call(Node, code, load_binary, [Module, undefined, Binary]) of |
|
|
|
{module, Module} -> |
|
|
|
esUtils:logSuccess("Reloaded(Beam ~p) Mod:~s Success on node:~p", [Reason, Module, Node]); |
|
|
|
{error, What} -> |
|
|
|