Fix cache_dir() problem, made it configurable
This commit is contained in:
+23
-3
@@ -1,9 +1,12 @@
|
||||
-module(gmhc_eureka).
|
||||
-vsn("0.6.1").
|
||||
-vsn("0.8.3").
|
||||
|
||||
-export([get_pool_address/0]).
|
||||
-export([cache_good_address/1,
|
||||
invalidate_cache/0]).
|
||||
invalidate_cache/0,
|
||||
cached_address/0,
|
||||
cache_filename/0,
|
||||
cache_dir/0]).
|
||||
|
||||
-include_lib("kernel/include/logger.hrl").
|
||||
-include("gmhc_events.hrl").
|
||||
@@ -99,10 +102,27 @@ cache_filename() ->
|
||||
cache_filename(cache_info()).
|
||||
|
||||
cache_filename(#{network := Network, pubkey := Pubkey}) ->
|
||||
Path = filename:join(setup:data_dir(), Network),
|
||||
Path = filename:join(cache_dir(), Network),
|
||||
<<"ak_", PKShort:8/binary, _/binary>> = Pubkey,
|
||||
filename:join(Path, "gmhc_eureka." ++ binary_to_list(PKShort) ++ ".cache").
|
||||
|
||||
cache_dir() ->
|
||||
case gmconfig:find_config([<<"cache_dir">>]) of
|
||||
{ok, D} ->
|
||||
D;
|
||||
undefined ->
|
||||
case setup_zomp:is_zomp_context() of
|
||||
true ->
|
||||
cache_dir_zomp();
|
||||
false ->
|
||||
filename:join(setup:data_dir(), "gmhive.cache")
|
||||
end
|
||||
end.
|
||||
|
||||
cache_dir_zomp() ->
|
||||
#{package_id := {Realm, App, _}} = zx_daemon:meta(),
|
||||
filename:join(zx_lib:ppath(var, {Realm, App}), "gmhive.cache").
|
||||
|
||||
get_pool_address_() ->
|
||||
case gmconfig:find_config([<<"pool_admin">>, <<"url">>], [user_config]) of
|
||||
{ok, URL0} ->
|
||||
|
||||
Reference in New Issue
Block a user