riak_test/tests/mapred_verify_rt.erl

27 lines
779 B
Erlang

%% @doc Runs the mapred_verify tests from
%% http://github.com/basho/mapred_verify
-module(mapred_verify_rt).
-export([confirm/0]).
-define(NODE_COUNT, 3).
confirm() ->
lager:info("Build ~b node cluster", [?NODE_COUNT]),
Nodes = rt:build_cluster(?NODE_COUNT),
PrivDir = code:priv_dir(mapred_verify),
MRVProps = [{node, hd(Nodes)},
%% don't need 'path' because riak_test does that for us
{keycount, 1000},
{bodysize, 1},
{populate, true},
{runjobs, true},
{testdef, filename:join(PrivDir, "tests.def")}],
lager:info("Run mapred_verify"),
0 = mapred_verify:do_verification(MRVProps),
lager:info("~s: PASS", [atom_to_list(?MODULE)]),
pass.