riak_test/tests/ts_simple_select_double_in_key.erl
John R. Daily 4744eecd47 Faster/cleaner remove_last/1 per Andrei
converting ts_util calls to new ts library calls

modified ts_setup:create_bucket_type

more test updating

Replace ts_util with ts_setup, ts_ops and ts_data
2016-11-04 16:19:30 -06:00

59 lines
2.1 KiB
Erlang

%% -------------------------------------------------------------------
%%
%% Copyright (c) 2015-2016 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(ts_simple_select_double_in_key).
-behavior(riak_test).
-include_lib("eunit/include/eunit.hrl").
-export([confirm/0]).
%%
confirm() ->
TableDef =
"CREATE TABLE GeoCheckin ("
" myfamily double not null,"
" myseries varchar not null,"
" time timestamp not null,"
" PRIMARY KEY ((myfamily, myseries, quantum(time, 15, 'm')), "
" myfamily, myseries, time))",
Query =
"SELECT * FROM GeoCheckin "
"WHERE time >= 1 AND time <= 10 "
"AND myseries = 'series' "
"AND myfamily = 13.777744543543500002342342342342342340000000017777445435435000023423423423423423400000000177774454354350000234234234234234234000000001",
Table = ts_data:get_default_bucket(),
Data = input_data(),
Expected = {ok, {[<<"myfamily">>, <<"myseries">>, <<"time">>], input_data()}},
Cluster = ts_setup:start_cluster(1),
ts_setup:create_bucket_type(Cluster, TableDef, Table),
ts_setup:activate_bucket_type(Cluster, Table),
ts_ops:put(Cluster, Table, Data),
Got = ts_ops:query(Cluster, Query),
?assertEqual(Expected, Got),
pass.
%%
input_data() ->
Times = lists:seq(1, 10),
[{13.777744543543500002342342342342342340000000017777445435435000023423423423423423400000000177774454354350000234234234234234234000000001, <<"series">>, T} || T <- Times].