%%
%% %CopyrightBegin%
%%
%% Copyright Ericsson AB 2018. All Rights Reserved.
%%
%% Licensed under the Apache License, Version 2.0 (the "License");
%% you may not use this file except in compliance with the License.
%% You may obtain a copy of the License at
%%
%%     http://www.apache.org/licenses/LICENSE-2.0
%%
%% Unless required by applicable law or agreed to in writing, software
%% distributed under the License is distributed on an "AS IS" BASIS,
%% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
%% See the License for the specific language governing permissions and
%% limitations under the License.
%%
%% %CopyrightEnd%
%%
-module(logger_olp_SUITE).

-compile(export_all).

-include_lib("kernel/src/logger_olp.hrl").

suite() ->
    [{timetrap,{seconds,30}}].

init_per_suite(Config) ->
    Config.

end_per_suite(_Config) ->
    ok.

init_per_group(_Group, Config) ->
    Config.

end_per_group(_Group, _Config) ->
    ok.

init_per_testcase(_TestCase, Config) ->
    Config.

end_per_testcase(Case, Config) ->
    try apply(?MODULE,Case,[cleanup,Config])
    catch error:undef -> ok
    end,
    ok.

groups() ->
    [].

all() -> 
    [idle_timer].

%%%-----------------------------------------------------------------
%%% Test cases
idle_timer(_Config) ->
    {ok,_Pid,Olp} = logger_olp:start_link(?MODULE,?MODULE,self(),#{}),
    [logger_olp:load(Olp,{msg,N}) || N<-lists:seq(1,3)],
    timer:sleep(?IDLE_DETECT_TIME*2),
    [{load,{msg,1}},
     {load,{msg,2}},
     {load,{msg,3}},
     {notify,idle}] = test_server:messages_get(),
    logger_olp:cast(Olp,hello),
    timer:sleep(?IDLE_DETECT_TIME*2),
    [{cast,hello}] = test_server:messages_get(),
    ok.
idle_timer(cleanup,_Config) ->
    logger_olp:stop(?MODULE),
    ok.

%%%-----------------------------------------------------------------
%%% Olp callbacks
init(P) ->
    {ok,P}.

handle_load(M,P) ->
    P ! {load,M},
    P.

handle_cast(M,P) ->
    P ! {cast,M},
    {noreply,P}.

notify(N,P) ->
    P ! {notify,N},
    P.