diff --git a/apps/emqx_auth_http/src/emqx_auth_http_app.erl b/apps/emqx_auth_http/src/emqx_auth_http_app.erl index 9b6b265d4..2988dac78 100644 --- a/apps/emqx_auth_http/src/emqx_auth_http_app.erl +++ b/apps/emqx_auth_http/src/emqx_auth_http_app.erl @@ -106,7 +106,7 @@ load_hooks() -> ok = emqx_auth_http:register_metrics(), PoolOpts = proplists:get_value(pool_opts, AuthReq), PoolName = proplists:get_value(pool_name, AuthReq), - ehttpc_sup:start_pool(PoolName, PoolOpts), + {ok, _} = ehttpc_sup:start_pool(PoolName, PoolOpts), case application:get_env(?APP, super_req) of undefined -> emqx:hook('client.authenticate', {emqx_auth_http, check, [#{auth => maps:from_list(AuthReq), @@ -114,7 +114,7 @@ load_hooks() -> {ok, SuperReq} -> PoolOpts1 = proplists:get_value(pool_opts, SuperReq), PoolName1 = proplists:get_value(pool_name, SuperReq), - ehttpc_sup:start_pool(PoolName1, PoolOpts1), + {ok, _} = ehttpc_sup:start_pool(PoolName1, PoolOpts1), emqx:hook('client.authenticate', {emqx_auth_http, check, [#{auth => maps:from_list(AuthReq), super => maps:from_list(SuperReq)}]}) end @@ -125,7 +125,7 @@ load_hooks() -> ok = emqx_acl_http:register_metrics(), PoolOpts2 = proplists:get_value(pool_opts, ACLReq), PoolName2 = proplists:get_value(pool_name, ACLReq), - ehttpc_sup:start_pool(PoolName2, PoolOpts2), + {ok, _} = ehttpc_sup:start_pool(PoolName2, PoolOpts2), emqx:hook('client.check_acl', {emqx_acl_http, check_acl, [#{acl => maps:from_list(ACLReq)}]}) end, ok. @@ -133,9 +133,9 @@ load_hooks() -> unload_hooks() -> emqx:unhook('client.authenticate', {emqx_auth_http, check}), emqx:unhook('client.check_acl', {emqx_acl_http, check_acl}), - ehttpc_sup:stop_pool('emqx_auth_http/auth_req'), - ehttpc_sup:stop_pool('emqx_auth_http/super_req'), - ehttpc_sup:stop_pool('emqx_auth_http/acl_req'), + _ = ehttpc_sup:stop_pool('emqx_auth_http/auth_req'), + _ = ehttpc_sup:stop_pool('emqx_auth_http/super_req'), + _ = ehttpc_sup:stop_pool('emqx_auth_http/acl_req'), ok. parse_host(Host) -> diff --git a/apps/emqx_auth_mnesia/src/emqx_acl_mnesia_api.erl b/apps/emqx_auth_mnesia/src/emqx_acl_mnesia_api.erl index 38087135f..efc2d2fbb 100644 --- a/apps/emqx_auth_mnesia/src/emqx_acl_mnesia_api.erl +++ b/apps/emqx_auth_mnesia/src/emqx_acl_mnesia_api.erl @@ -129,7 +129,7 @@ add(_Bindings, Params) -> case Re of #{result := ok} -> return({ok, Re}); #{result := <<"ok">>} -> return({ok, Re}); - _ -> return({error, Re}) + _ -> return({error, {add, Re}}) end end. diff --git a/apps/emqx_auth_mnesia/src/emqx_auth_mnesia_cli.erl b/apps/emqx_auth_mnesia/src/emqx_auth_mnesia_cli.erl index e7c9d982b..adefa704b 100644 --- a/apps/emqx_auth_mnesia/src/emqx_auth_mnesia_cli.erl +++ b/apps/emqx_auth_mnesia/src/emqx_auth_mnesia_cli.erl @@ -59,12 +59,12 @@ insert_user(User = #emqx_user{login = Login}) -> %% @doc Update User -spec(update_user(tuple(), binary()) -> ok | {error, any()}). update_user(Login, NewPassword) -> - User = #emqx_user{login = Login, password = encrypted_data(NewPassword)}, - ret(mnesia:transaction(fun do_update_user/1, [User])). + ret(mnesia:transaction(fun do_update_user/2, [Login, encrypted_data(NewPassword)])). -do_update_user(User = #emqx_user{login = Login}) -> +do_update_user(Login, NewPassword) -> case mnesia:read(?TABLE, Login) of - [{?TABLE, Login, _, CreateAt}] -> mnesia:write(User#emqx_user{created_at = CreateAt}); + [#emqx_user{} = User] -> + mnesia:write(User#emqx_user{password = NewPassword}); [] -> mnesia:abort(noexisted) end. @@ -119,7 +119,7 @@ hash(Password, SaltBin, HashType) -> emqx_passwd:hash(HashType, <>). salt() -> - rand:seed(exsplus, erlang:timestamp()), + {_AlgHandler, _AlgState} = rand:seed(exsplus, erlang:timestamp()), Salt = rand:uniform(16#ffffffff), <>. %%--------------------------------------------------------------------