%%%----------------------------------------------------------------------
%%% File     : gproc_init.erl
%%% Purpose  : GPROC init utilities
%%%----------------------------------------------------------------------

-module(gproc_init).

%% API
-export([
         %% soft reset
         soft_reset/0
         %% hard reset
         , hard_reset/0
        ]).

%%====================================================================
%% API
%%====================================================================

%% types

%% soft_reset
-spec soft_reset() -> ok.

%% hard_reset
-spec hard_reset() -> ok.


%%--------------------------------------------------------------------
%% soft_reset

soft_reset() ->
    ok = hard_reset(), %% soft reset isn't enough
    ok.

%%--------------------------------------------------------------------
%% hard_reset

hard_reset() ->
    ok = supervisor:terminate_child(gproc_sup, gproc),
    [ ets:delete(Tab) || Tab <- ets:all(), Tab =:= gproc ],
    {ok,_} = supervisor:restart_child(gproc_sup, gproc),
    ok.


%%====================================================================
%% Internal functions
%%====================================================================