Remove lots of info_msg
This commit is contained in:
parent
cdadb88ebf
commit
3118bd8c62
2 changed files with 11 additions and 11 deletions
|
@ -147,7 +147,7 @@ do_put(Key, Value, State=#state{ nursery=Tree }) ->
|
||||||
flush_nursery(State=#state{nursery=Tree, top=Top}) ->
|
flush_nursery(State=#state{nursery=Tree, top=Top}) ->
|
||||||
TreeSize = gb_trees:size( Tree ),
|
TreeSize = gb_trees:size( Tree ),
|
||||||
if TreeSize > 0 ->
|
if TreeSize > 0 ->
|
||||||
error_logger:info_msg("flushing to top=~p, alive=~p~n", [Top, erlang:is_process_alive(Top)]),
|
% error_logger:info_msg("flushing to top=~p, alive=~p~n", [Top, erlang:is_process_alive(Top)]),
|
||||||
FileName = filename:join(State#state.dir, "nursery.data"),
|
FileName = filename:join(State#state.dir, "nursery.data"),
|
||||||
{ok, BT} = fractal_btree_writer:open(FileName, (1 bsl ?TOP_LEVEL)),
|
{ok, BT} = fractal_btree_writer:open(FileName, (1 bsl ?TOP_LEVEL)),
|
||||||
lists:foreach( fun({Key2,Value2}) ->
|
lists:foreach( fun({Key2,Value2}) ->
|
||||||
|
|
|
@ -79,7 +79,7 @@ reply({PID,Ref}, Reply) ->
|
||||||
|
|
||||||
|
|
||||||
initialize(State) ->
|
initialize(State) ->
|
||||||
error_logger:info_msg("in ~p level=~p~n", [self(), State]),
|
% error_logger:info_msg("in ~p level=~p~n", [self(), State]),
|
||||||
|
|
||||||
|
|
||||||
AFileName = filename("A",State),
|
AFileName = filename("A",State),
|
||||||
|
@ -123,10 +123,10 @@ initialize(State) ->
|
||||||
|
|
||||||
main_loop0(State = #state{ a=undefined, b=undefined }) ->
|
main_loop0(State = #state{ a=undefined, b=undefined }) ->
|
||||||
Parent = plain_fsm:info(parent),
|
Parent = plain_fsm:info(parent),
|
||||||
error_logger:info_msg("in main_loop0~n", []),
|
% error_logger:info_msg("in main_loop0~n", []),
|
||||||
receive
|
receive
|
||||||
?REQ(From, {lookup, _})=Msg ->
|
?REQ(From, {lookup, _})=Msg ->
|
||||||
error_logger:info_msg("in main_loop0, msg=~p~n", [Msg]),
|
% error_logger:info_msg("in main_loop0, msg=~p~n", [Msg]),
|
||||||
case State#state.next of
|
case State#state.next of
|
||||||
undefined ->
|
undefined ->
|
||||||
reply(From, notfound);
|
reply(From, notfound);
|
||||||
|
@ -136,7 +136,7 @@ main_loop0(State = #state{ a=undefined, b=undefined }) ->
|
||||||
main_loop0(State);
|
main_loop0(State);
|
||||||
|
|
||||||
?REQ(From, {inject, FileName})=_Msg ->
|
?REQ(From, {inject, FileName})=_Msg ->
|
||||||
error_logger:info_msg("in main_loop0, msg=~p~n", [_Msg]),
|
% error_logger:info_msg("in main_loop0, msg=~p~n", [_Msg]),
|
||||||
AFileName = filename("A",State),
|
AFileName = filename("A",State),
|
||||||
ok = file:rename(FileName, AFileName),
|
ok = file:rename(FileName, AFileName),
|
||||||
{ok, BT} = fractal_btree_reader:open(AFileName),
|
{ok, BT} = fractal_btree_reader:open(AFileName),
|
||||||
|
@ -144,24 +144,24 @@ main_loop0(State = #state{ a=undefined, b=undefined }) ->
|
||||||
main_loop1(State#state{ a=BT });
|
main_loop1(State#state{ a=BT });
|
||||||
|
|
||||||
?REQ(From, close)=_Msg ->
|
?REQ(From, close)=_Msg ->
|
||||||
error_logger:info_msg("in main_loop0, msg=~p~n", [_Msg]),
|
% error_logger:info_msg("in main_loop0, msg=~p~n", [_Msg]),
|
||||||
reply(From, ok),
|
reply(From, ok),
|
||||||
ok;
|
ok;
|
||||||
|
|
||||||
%% gen_fsm handling
|
%% gen_fsm handling
|
||||||
{system, From, Req}=_Msg ->
|
{system, From, Req}=_Msg ->
|
||||||
error_logger:info_msg("in main_loop0, msg=~p~n", [_Msg]),
|
% error_logger:info_msg("in main_loop0, msg=~p~n", [_Msg]),
|
||||||
plain_fsm:handle_system_msg(
|
plain_fsm:handle_system_msg(
|
||||||
From, Req, State, fun(S1) -> main_loop0(S1) end);
|
From, Req, State, fun(S1) -> main_loop0(S1) end);
|
||||||
|
|
||||||
{'EXIT', Parent, Reason}=_Msg ->
|
{'EXIT', Parent, Reason}=_Msg ->
|
||||||
error_logger:info_msg("in main_loop0, msg=~p~n", [_Msg]),
|
% error_logger:info_msg("in main_loop0, msg=~p~n", [_Msg]),
|
||||||
plain_fsm:parent_EXIT(Reason, State)
|
plain_fsm:parent_EXIT(Reason, State)
|
||||||
end.
|
end.
|
||||||
|
|
||||||
main_loop1(State = #state{ a=BT1, b=undefined, next=Next }) ->
|
main_loop1(State = #state{ a=BT1, b=undefined, next=Next }) ->
|
||||||
Parent = plain_fsm:info(parent),
|
Parent = plain_fsm:info(parent),
|
||||||
error_logger:info_msg("in main_loop1~n", []),
|
% error_logger:info_msg("in main_loop1~n", []),
|
||||||
receive
|
receive
|
||||||
?REQ(From, {lookup, Key})=Req ->
|
?REQ(From, {lookup, Key})=Req ->
|
||||||
case fractal_btree_reader:lookup(BT1, Key) of
|
case fractal_btree_reader:lookup(BT1, Key) of
|
||||||
|
@ -199,7 +199,7 @@ main_loop1(State = #state{ a=BT1, b=undefined, next=Next }) ->
|
||||||
|
|
||||||
main_loop2(State = #state{ next=Next }) ->
|
main_loop2(State = #state{ next=Next }) ->
|
||||||
Parent = plain_fsm:info(parent),
|
Parent = plain_fsm:info(parent),
|
||||||
error_logger:info_msg("in main_loop2~n", []),
|
% error_logger:info_msg("in main_loop2~n", []),
|
||||||
receive
|
receive
|
||||||
?REQ(From, {lookup, Key})=Req ->
|
?REQ(From, {lookup, Key})=Req ->
|
||||||
case fractal_btree_reader:lookup(State#state.b, Key) of
|
case fractal_btree_reader:lookup(State#state.b, Key) of
|
||||||
|
@ -309,7 +309,7 @@ begin_merge(State) ->
|
||||||
{ok, OutCount} = fractal_btree_merger:merge(AFileName, BFileName, XFileName,
|
{ok, OutCount} = fractal_btree_merger:merge(AFileName, BFileName, XFileName,
|
||||||
State#state.level + 1),
|
State#state.level + 1),
|
||||||
|
|
||||||
error_logger:info_msg("merge done ~p,~p -> ~p~n", [AFileName, BFileName, XFileName]),
|
% error_logger:info_msg("merge done ~p,~p -> ~p~n", [AFileName, BFileName, XFileName]),
|
||||||
|
|
||||||
Owner ! {merge_done, OutCount, XFileName}
|
Owner ! {merge_done, OutCount, XFileName}
|
||||||
end),
|
end),
|
||||||
|
|
Loading…
Reference in a new issue