fix(cluster-call): fix typo and add is_success/1 help function
This commit is contained in:
parent
24aaa5349b
commit
6bc7378e63
|
@ -85,7 +85,7 @@ multicall(M, F, A) ->
|
|||
TnxId :: pos_integer(),
|
||||
Timeout :: timeout(),
|
||||
Reason :: string().
|
||||
multicall(M, F, A, RequireNum, Timeout)when RequireNum >= 1 ->
|
||||
multicall(M, F, A, RequireNum, Timeout) when RequireNum =:= all orelse RequireNum >= 1 ->
|
||||
MFA = {initiate, {M, F, A}},
|
||||
Begin = erlang:monotonic_time(),
|
||||
InitRes =
|
||||
|
@ -102,7 +102,7 @@ multicall(M, F, A, RequireNum, Timeout)when RequireNum >= 1 ->
|
|||
end,
|
||||
End = erlang:monotonic_time(),
|
||||
MinDelay = erlang:convert_time_unit(Begin - End, native, millisecond) + 50,
|
||||
%% Failed after 3 attempts.
|
||||
%% Fail after 3 attempts.
|
||||
RetryTimeout = 3 * max(MinDelay, get_retry_ms()),
|
||||
OkOrFailed =
|
||||
case InitRes of
|
||||
|
@ -312,34 +312,31 @@ apply_mfa(TnxId, {M, F, A}) ->
|
|||
Res =
|
||||
try erlang:apply(M, F, A)
|
||||
catch
|
||||
C : E -> {crash, C, E}
|
||||
Class:Reason:Stacktrace ->
|
||||
{error, #{exception => Class, reason => Reason, stacktrace => Stacktrace}}
|
||||
end,
|
||||
Meta = #{tnx_id => TnxId, module => M, function => F, args => ?TO_BIN(A)},
|
||||
log_and_alarm(Res, Meta),
|
||||
Succeed = (Res =:= ok orelse (is_tuple(Res) andalso Res =/= {} andalso element(1, Res) =:= ok)),
|
||||
{Succeed, Res}.
|
||||
IsSuccess = is_success(Res),
|
||||
log_and_alarm(IsSuccess, Res, Meta),
|
||||
{IsSuccess, Res}.
|
||||
|
||||
log_and_alarm(ok, Meta) ->
|
||||
OkMeta = Meta#{msg => <<"succeeded to apply MFA">>, result => <<"ok">>},
|
||||
?SLOG(notice, OkMeta),
|
||||
emqx_alarm:deactivate(cluster_rpc_apply_failed, OkMeta);
|
||||
log_and_alarm({ok, _} = Res, Meta) ->
|
||||
OkMeta = Meta#{msg => <<"succeeded to apply MFA">>, result => ?TO_BIN(Res)},
|
||||
?SLOG(notice, OkMeta),
|
||||
emqx_alarm:deactivate(cluster_rpc_apply_failed, OkMeta);
|
||||
log_and_alarm({crash, C, E}, Meta) ->
|
||||
CrashMeta = Meta#{msg => <<"crash to apply MFA">>, exception => C, reason => ?TO_BIN(E)},
|
||||
?SLOG(critical, CrashMeta),
|
||||
emqx_alarm:activate(cluster_rpc_apply_failed, CrashMeta);
|
||||
log_and_alarm(Res, Meta) ->
|
||||
NotOkMeta = Meta#{msg => <<"failed to apply MFA">>, result => ?TO_BIN(Res)},
|
||||
is_success(ok) -> true;
|
||||
is_success({ok, _}) -> true;
|
||||
is_success(_) -> false.
|
||||
|
||||
log_and_alarm(true, Res, Meta) ->
|
||||
OkMeta = Meta#{msg => <<"succeeded to apply MFA">>, result => Res},
|
||||
?SLOG(debug, OkMeta),
|
||||
emqx_alarm:deactivate(cluster_rpc_apply_failed, OkMeta#{result => ?TO_BIN(Res)});
|
||||
log_and_alarm(false, Res, Meta) ->
|
||||
NotOkMeta = Meta#{msg => <<"failed to apply MFA">>, result => Res},
|
||||
?SLOG(error, NotOkMeta),
|
||||
emqx_alarm:activate(cluster_rpc_apply_failed, NotOkMeta).
|
||||
emqx_alarm:activate(cluster_rpc_apply_failed, NotOkMeta#{result => ?TO_BIN(Res)}).
|
||||
|
||||
wait_for_all_nodes_commit(TnxId, Delay, Remain) ->
|
||||
ok = timer:sleep(Delay),
|
||||
case legging_node(TnxId) of
|
||||
[_|_] when Remain > 0 ->
|
||||
case lagging_node(TnxId) of
|
||||
[_ | _] when Remain > 0 ->
|
||||
wait_for_all_nodes_commit(TnxId, Delay, Remain - Delay);
|
||||
[] -> ok;
|
||||
Nodes -> {error, Nodes}
|
||||
|
@ -352,13 +349,13 @@ wait_for_nodes_commit(RequiredNum, TnxId, Delay, Remain) ->
|
|||
false when Remain > 0 ->
|
||||
wait_for_nodes_commit(RequiredNum, TnxId, Delay, Remain - Delay);
|
||||
false ->
|
||||
case legging_node(TnxId) of
|
||||
case lagging_node(TnxId) of
|
||||
[] -> ok; %% All commit but The succeedNum > length(nodes()).
|
||||
Nodes -> {error, Nodes}
|
||||
end
|
||||
end.
|
||||
|
||||
legging_node(TnxId) ->
|
||||
lagging_node(TnxId) ->
|
||||
{atomic, Nodes} = transaction(fun commit_status_trans/2, ['<', TnxId]),
|
||||
Nodes.
|
||||
|
||||
|
|
Loading…
Reference in New Issue