fix: dialyzer checks

This commit is contained in:
Shawn 2024-07-19 14:19:50 +08:00
parent 5c2a7dfdfa
commit 4d25f28bb2
1 changed files with 10 additions and 10 deletions

View File

@ -535,7 +535,7 @@ get_upgrade_status() ->
call_emqx_relup_main(Fun, Args, Default) -> call_emqx_relup_main(Fun, Args, Default) ->
case erlang:function_exported(emqx_relup_main, Fun, length(Args)) of case erlang:function_exported(emqx_relup_main, Fun, length(Args)) of
true -> true ->
apply(emqx_relup_main, Fun, Args); erlang:apply(emqx_relup_main, Fun, Args);
false -> false ->
%% relup package is not installed %% relup package is not installed
Default Default
@ -567,7 +567,8 @@ run_upgrade_on_nodes(Nodes, TargetVsn) ->
end. end.
run_upgrade(TargetVsn) -> run_upgrade(TargetVsn) ->
case emqx_relup_main:upgrade(TargetVsn) of case call_emqx_relup_main(upgrade, [TargetVsn], no_pkg_installed) of
no_pkg_installed -> return_bad_request(<<"No relup package is installed">>);
ok -> {204}; ok -> {204};
{error, Reason} -> upgrade_return(Reason) {error, Reason} -> upgrade_return(Reason)
end. end.
@ -592,8 +593,8 @@ get_installed_packages() ->
target_vsn_from_rel_vsn(Vsn) -> target_vsn_from_rel_vsn(Vsn) ->
case string:split(binary_to_list(Vsn), "-") of case string:split(binary_to_list(Vsn), "-") of
[VsnStr | _] -> VsnStr; [_] -> throw({invalid_vsn, Vsn});
_ -> throw({invalid_vsn, Vsn}) [VsnStr | _] -> VsnStr
end. end.
delete_installed_packages() -> delete_installed_packages() ->
@ -608,7 +609,10 @@ delete_installed_packages() ->
format_package_info(PluginInfo) when is_map(PluginInfo) -> format_package_info(PluginInfo) when is_map(PluginInfo) ->
Vsn = maps_get(rel_vsn, PluginInfo), Vsn = maps_get(rel_vsn, PluginInfo),
case emqx_relup_main:get_package_info(target_vsn_from_rel_vsn(Vsn)) of TargetVsn = target_vsn_from_rel_vsn(Vsn),
case call_emqx_relup_main(get_package_info, [TargetVsn], no_pkg_installed) of
no_pkg_installed ->
throw({get_pkg_info_failed, <<"No relup package is installed">>});
{error, Reason} -> {error, Reason} ->
throw({get_pkg_info_failed, Reason}); throw({get_pkg_info_failed, Reason});
{ok, #{base_vsns := BaseVsns, change_logs := ChangeLogs}} -> {ok, #{base_vsns := BaseVsns, change_logs := ChangeLogs}} ->
@ -656,8 +660,4 @@ return_internal_error(Reason) ->
}}. }}.
name_vsn(Name, Vsn) -> name_vsn(Name, Vsn) ->
bin([Name, "-", Vsn]). iolist_to_binary([Name, "-", Vsn]).
bin(A) when is_atom(A) -> atom_to_binary(A, utf8);
bin(L) when is_list(L) -> unicode:characters_to_binary(L, utf8);
bin(B) when is_binary(B) -> B.