mirror of
https://github.com/valitydev/riak_test.git
synced 2024-11-06 16:45:29 +00:00
52 lines
1.9 KiB
Erlang
52 lines
1.9 KiB
Erlang
|
%% -------------------------------------------------------------------
|
||
|
|
%%
|
||
|
|
%% Copyright (c) 2013 Basho Technologies, Inc.
|
||
|
|
%%
|
||
|
|
%% This file is provided to you 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.
|
||
|
|
%%
|
||
|
|
%% -------------------------------------------------------------------
|
||
|
|
-module(verify_2i_timeout).
|
||
|
|
-behavior(riak_test).
|
||
|
|
-export([confirm/0]).
|
||
|
|
-include_lib("eunit/include/eunit.hrl").
|
||
|
|
-import(secondary_index_tests, [put_an_object/2, put_an_object/4, int_to_key/1,
|
||
|
|
stream_pb/3]).
|
||
|
|
-define(BUCKET, <<"2ibucket">>).
|
||
|
|
-define(FOO, <<"foo">>).
|
||
|
|
|
||
|
|
confirm() ->
|
||
|
|
inets:start(),
|
||
|
|
Config = [{riak_kv, [{secondary_index_timeout, 5}]}], %% ludicrously short, should fail always
|
||
|
|
Nodes = rt:build_cluster([{current, Config}, {current, Config}, {current, Config}]),
|
||
|
|
?assertEqual(ok, (rt:wait_until_nodes_ready(Nodes))),
|
||
|
|
|
||
|
|
PBPid = rt:pbc(hd(Nodes)),
|
||
|
|
|
||
|
|
[put_an_object(PBPid, N) || N <- lists:seq(0, 100)],
|
||
|
|
[put_an_object(PBPid, int_to_key(N), N, ?FOO) || N <- lists:seq(101, 200)],
|
||
|
|
|
||
|
|
ExpectedKeys = lists:sort([int_to_key(N) || N <- lists:seq(0, 200)]),
|
||
|
|
Query = {<<"$bucket">>, ?BUCKET},
|
||
|
|
%% Verifies that the app.config param was used
|
||
|
|
?assertEqual({error, timeout}, stream_pb(PBPid, Query, [])),
|
||
|
|
|
||
|
|
%% Override app.config
|
||
|
|
{ok, Res} = stream_pb(PBPid, Query, [{timeout, 5000}]),
|
||
|
|
?assertEqual(ExpectedKeys, proplists:get_value(keys, Res, [])),
|
||
|
|
riakc_pb_socket:stop(PBPid),
|
||
|
|
pass.
|
||
|
|
|
||
|
|
|