50 lines
1.3 KiB
Erlang
50 lines
1.3 KiB
Erlang
-module(ggs_db_test).
|
|
%-compile({no_auto_import,[get/1,set/2]}).
|
|
-include_lib("eunit/include/eunit.hrl").
|
|
|
|
%ggs_db_test_() ->
|
|
% {spawn,
|
|
% {setup, fun setup/0, fun cleanup/1,[ fun ggs_db_test/0 ]}
|
|
% }.
|
|
|
|
|
|
%Key should be a tuple of two elements
|
|
getItem_setItem_test() ->
|
|
ggs_db:init(),
|
|
ggs_db:setItem("dbname","nsname","keyname1","Hello"),
|
|
ggs_db:setItem("dbname","nsname","keyname2","Hello"),
|
|
ggs_db:setItem("dbname","nsname","keyname3","Hello"),
|
|
%system:wait(2000),
|
|
ggs_db:getItem("dbname","nsname","keyname").
|
|
|
|
%length_test() ->
|
|
% ggs_db:setItem(1,1,2,"112"),
|
|
% ggs_db:setItem(1,2,2,"122"),
|
|
% ggs_db:setItem(1,1,3,"113"),
|
|
% ggs_db:setItem(1,1,4,"114"),
|
|
% ?assertEqual(ggs_db:length(1,1), 3).
|
|
|
|
%removeItem_test() ->
|
|
% ggs_db:removeItem(1,1,4),
|
|
% ?assertNot(ggs_db:getItem(1,1,4) =:= {atomic,"114"}).
|
|
|
|
%key_test() ->
|
|
% ?assert(ggs_db:key(1,1,2) =:= {1,1,3}).
|
|
|
|
%clear_test() ->
|
|
% ggs_db:clear(1,1),
|
|
% ?assert(ggs_db:length(1,1) =:= 0).
|
|
|
|
%clear_GameToken_test() ->
|
|
% ggs_db:clear(1),
|
|
% ?assert((ggs_db:length(1,1) + ggs_db:length(1,2)) =:= 0),
|
|
% ggs_db:stop().
|
|
|
|
%tests() ->
|
|
% ggs_db_test().
|
|
|
|
%ggs_db_test() ->
|
|
% ggs_db:set(0, "Hello"),
|
|
%io:format("~s",[Val]),
|
|
% ?assertMatch({atomic,"Hello"},ggs_db:get(0)).
|
|
|