diff --git a/deps/rabbitmq_auth_backend_cache/Makefile b/deps/rabbitmq_auth_backend_cache/Makefile index 913e9aef4d..e4359e74ce 100644 --- a/deps/rabbitmq_auth_backend_cache/Makefile +++ b/deps/rabbitmq_auth_backend_cache/Makefile @@ -1,6 +1,6 @@ PROJECT = rabbitmq_auth_backend_cache -DEPS = rabbit_common +DEPS = rabbit_common rabbit TEST_DEPS += rabbit rabbitmq_ct_helpers rabbitmq_ct_client_helpers DEP_EARLY_PLUGINS = rabbit_common/mk/rabbitmq-early-plugin.mk diff --git a/deps/rabbitmq_auth_backend_cache/src/rabbit_auth_cache.erl b/deps/rabbitmq_auth_backend_cache/src/rabbit_auth_cache.erl index d75ee592e3..6c6458eda6 100644 --- a/deps/rabbitmq_auth_backend_cache/src/rabbit_auth_cache.erl +++ b/deps/rabbitmq_auth_backend_cache/src/rabbit_auth_cache.erl @@ -38,7 +38,7 @@ behaviour_info(_Other) -> -endif. expiration(TTL) -> - erlang:system_time(milli_seconds) + TTL. + time_compat:erlang_system_time(milli_seconds) + TTL. expired(Exp) -> - erlang:system_time(milli_seconds) > Exp. + time_compat:erlang_system_time(milli_seconds) > Exp. diff --git a/deps/rabbitmq_auth_backend_cache/src/rabbit_auth_cache_ets_segmented_stateless.erl b/deps/rabbitmq_auth_backend_cache/src/rabbit_auth_cache_ets_segmented_stateless.erl index e6a50ed3f8..c89152c4ca 100644 --- a/deps/rabbitmq_auth_backend_cache/src/rabbit_auth_cache_ets_segmented_stateless.erl +++ b/deps/rabbitmq_auth_backend_cache/src/rabbit_auth_cache_ets_segmented_stateless.erl @@ -78,7 +78,7 @@ handle_cast(_, State = #state{}) -> {noreply, State}. handle_info(gc, State = #state{}) -> - Now = erlang:system_time(milli_seconds), + Now = time_compat:erlang_system_time(milli_seconds), MatchSpec = [{{'$1', '$2'}, [{'<', '$1', {const, Now}}], ['$2']}], Expired = ets:select(?SEGMENT_TABLE, MatchSpec), [ets:delete(Table) || Table <- Expired], @@ -110,7 +110,7 @@ do_add_segment(Segment) -> end. get_segment_tables() -> - Now = erlang:system_time(milli_seconds), + Now = time_compat:erlang_system_time(milli_seconds), MatchSpec = [{{'$1', '$2'}, [{'>', '$1', {const, Now}}], ['$_']}], [V || {K, V} <- ets:select(?SEGMENT_TABLE, MatchSpec), K =/= segment_size]. diff --git a/deps/rabbitmq_auth_backend_cache/test/src/rabbit_auth_cache_SUITE.erl b/deps/rabbitmq_auth_backend_cache/test/src/rabbit_auth_cache_SUITE.erl index dc79eb4f9d..1ab29f86bb 100644 --- a/deps/rabbitmq_auth_backend_cache/test/src/rabbit_auth_cache_SUITE.erl +++ b/deps/rabbitmq_auth_backend_cache/test/src/rabbit_auth_cache_SUITE.erl @@ -75,7 +75,9 @@ init_per_testcase0(_, Config) -> Config. end_per_testcase(Test, Config) -> AuthCacheModule = ?config(auth_cache_module, Config), - gen_server:stop(AuthCacheModule), + % gen_server:stop(AuthCacheModule), + Pid = whereis(AuthCacheModule), + exit(Pid, normal), end_per_testcase0(Test, Config). end_per_testcase0(get_expired, Config) ->