anchor.diff:  	[radius_log_auth_event, diameter_log_auth_event,
   			radius_log_acct_event, diameter_log_acct_event,
   			ipdr_log, get_range, get_last, auth_query, acct_query_radius,
  -			acct_query_diameter, abmf_log_event, abmf_query, start_binary_tree].
  +			acct_query_diameter, abmf_log_event, abmf_query, binary_tree_before,
  +			binary_tree_after, binary_tree_backward, binary_tree_forward,
  +			binary_tree_last, binary_tree_first, binary_tree_half].
   
   %%---------------------------------------------------------------------
   %%  Test cases
  
positive.code: 	Events = Fget(Fget, ocs_log:acct_query(start, Start, End, diameter, '_', MatchSpec), []),
  	3 = length(Events).
  
  start_binary_tree() ->
     [{userdata, [{doc, "Ensure that start_binary_tree works perfectly"}]}].
  
  start_binary_tree(_Config) ->
  	ocs_log:acct_open(),
  	disk_log:change_notify(ocs_acct, self(), true),
  	ok = fill_acct(),
  %% {continuation,<0.169.0>,{19,64427},1407}
  	Cont = ocs_log:start_binary_tree(ocs_acct, 1, erlang:system_time(?MILLISECOND)),
  erlang:display({?MODULE, ?LINE, Cont}),
  	4 = size(Cont).
  
  abmf_log_event() ->
     [{userdata, [{doc, "Log a balance actvity event"}]}].
  
  abmf_log_event(_Config) ->
  	ok = ocs_log:abmf_open(),
  
negative.code: 	fill_auth(N - 1).
  
  fill_acct() ->
  	ok = fill_acct(10, diameter),
  	receive
  		{disk_log, _Node, ocs_acct, {wrap, 0}} ->
  			fill_acct();
  		{disk_log, _Node, ocs_acct, {wrap, N}} when N > 0 ->
  			LogInfo = disk_log:info(ocs_acct),
  			{items, Items} = lists:keyfind(items, 1, LogInfo),
  			fill_acct(Items div 4, diameter);
  		_Other ->
  			fill_acct()
  	after
  		0 ->
  			fill_acct()
  	end.
  fill_acct(N) ->
  	ok = fill_acct(10, diameter),
  	receive
  		{disk_log, _Node, ocs_acct, {wrap, 0}} ->
  			LogInfo = disk_log:info(ocs_acct),
  			{current_file, File} = lists:keyfind(current_file, 1, LogInfo),
  			case N > File of
  				true ->
  					fill_acct(N);
  				false ->
  					ok
  			end;
  		_Other ->
  			fill_acct(N)
  	after
  		0 ->
  			fill_acct(N)
  	end.
  fill_acct(0, _Protocal) ->
  	ok;
  