From be2da842fe0396a9e7908f4a2f0b86bea009fea6 Mon Sep 17 00:00:00 2001 From: Brian Cully Date: Thu, 9 Feb 2012 23:11:19 -0500 Subject: Move transaction tests to their own suite. --- test/mysqlerl_readquery_SUITE.erl | 16 +---- test/mysqlerl_transaction_SUITE.erl | 130 ++++++++++++++++++++++++++++++++++++ 2 files changed, 131 insertions(+), 15 deletions(-) create mode 100644 test/mysqlerl_transaction_SUITE.erl diff --git a/test/mysqlerl_readquery_SUITE.erl b/test/mysqlerl_readquery_SUITE.erl index d940db6..1276a71 100644 --- a/test/mysqlerl_readquery_SUITE.erl +++ b/test/mysqlerl_readquery_SUITE.erl @@ -117,8 +117,6 @@ groups() -> next_after_first, next_after_last, prev_after_first, prev_after_last, next_all, prev_all, next_prev_next, prev_next_prev, select_next, select_relative, select_absolute]}, - {trans, [sequence], - [commit, rollback]}, {errors, [shuffle], [select_no_results, first_no_results, last_no_results, next_no_results, prev_no_results]}]. @@ -132,7 +130,7 @@ groups() -> %% @end %%-------------------------------------------------------------------- all() -> - [{group, read_queries}, {group, cursor}, {group, trans}, {group, errors}]. + [{group, read_queries}, {group, cursor}, {group, errors}]. %%-------------------------------------------------------------------- %% @spec TestCase(Config0) -> @@ -288,18 +286,6 @@ prev_next_prev(Config) -> {selected, ?COLS, [{"siobain", _}]} = mysqlerl:next(?config(db_ref, Config)), {selected, ?COLS, [{"bjc", _}]} = mysqlerl:prev(?config(db_ref, Config)). -commit(doc) -> - ["Tests that commit/1 with commit commits pending transactions."]; -commit(Config) -> - {updated, 0} = mysqlerl:commit(?config(db_ref, Config), commit), - {skip, "Not implemented"}. - -rollback(doc) -> - ["Tests that rollback/1 with rollback undoes pending transactions."]; -rollback(Config) -> - {updated, 0} = mysqlerl:commit(?config(db_ref, Config), rollback), - {skip, "Not implemented"}. - describe_no_table(doc) -> ["Test that describe_table/2 fails properly when no table exists."]; describe_no_table(Config) -> diff --git a/test/mysqlerl_transaction_SUITE.erl b/test/mysqlerl_transaction_SUITE.erl new file mode 100644 index 0000000..e42b928 --- /dev/null +++ b/test/mysqlerl_transaction_SUITE.erl @@ -0,0 +1,130 @@ +%%%------------------------------------------------------------------- +%%% @author Brian Cully +%%% @copyright (C) 2012, Brian Cully +%%% @doc +%%% +%%% @end +%%% Created : 9 Feb 2012 by Brian Cully +%%%------------------------------------------------------------------- +-module(mysqlerl_transaction_SUITE). + +-compile(export_all). + +-include_lib("common_test/include/ct.hrl"). + +%%-------------------------------------------------------------------- +%% @spec suite() -> Info +%% Info = [tuple()] +%% @end +%%-------------------------------------------------------------------- +suite() -> + [{timetrap,{seconds,30}}]. + +%%-------------------------------------------------------------------- +%% @spec init_per_suite(Config0) -> +%% Config1 | {skip,Reason} | {skip_and_save,Reason,Config1} +%% Config0 = Config1 = [tuple()] +%% Reason = term() +%% @end +%%-------------------------------------------------------------------- +init_per_suite(Config) -> + {skip, "Transaction tests not implemented yet."}. + +%%-------------------------------------------------------------------- +%% @spec end_per_suite(Config0) -> void() | {save_config,Config1} +%% Config0 = Config1 = [tuple()] +%% @end +%%-------------------------------------------------------------------- +end_per_suite(_Config) -> + ok. + +%%-------------------------------------------------------------------- +%% @spec init_per_group(GroupName, Config0) -> +%% Config1 | {skip,Reason} | {skip_and_save,Reason,Config1} +%% GroupName = atom() +%% Config0 = Config1 = [tuple()] +%% Reason = term() +%% @end +%%-------------------------------------------------------------------- +init_per_group(_GroupName, Config) -> + Config. + +%%-------------------------------------------------------------------- +%% @spec end_per_group(GroupName, Config0) -> +%% void() | {save_config,Config1} +%% GroupName = atom() +%% Config0 = Config1 = [tuple()] +%% @end +%%-------------------------------------------------------------------- +end_per_group(_GroupName, _Config) -> + ok. + +%%-------------------------------------------------------------------- +%% @spec init_per_testcase(TestCase, Config0) -> +%% Config1 | {skip,Reason} | {skip_and_save,Reason,Config1} +%% TestCase = atom() +%% Config0 = Config1 = [tuple()] +%% Reason = term() +%% @end +%%-------------------------------------------------------------------- +init_per_testcase(_TestCase, Config) -> + Config. + +%%-------------------------------------------------------------------- +%% @spec end_per_testcase(TestCase, Config0) -> +%% void() | {save_config,Config1} | {fail,Reason} +%% TestCase = atom() +%% Config0 = Config1 = [tuple()] +%% Reason = term() +%% @end +%%-------------------------------------------------------------------- +end_per_testcase(_TestCase, _Config) -> + ok. + +%%-------------------------------------------------------------------- +%% @spec groups() -> [Group] +%% Group = {GroupName,Properties,GroupsAndTestCases} +%% GroupName = atom() +%% Properties = [parallel | sequence | Shuffle | {RepeatType,N}] +%% GroupsAndTestCases = [Group | {group,GroupName} | TestCase] +%% TestCase = atom() +%% Shuffle = shuffle | {shuffle,{integer(),integer(),integer()}} +%% RepeatType = repeat | repeat_until_all_ok | repeat_until_all_fail | +%% repeat_until_any_ok | repeat_until_any_fail +%% N = integer() | forever +%% @end +%%-------------------------------------------------------------------- +groups() -> + []. + +%%-------------------------------------------------------------------- +%% @spec all() -> GroupsAndTestCases | {skip,Reason} +%% GroupsAndTestCases = [{group,GroupName} | TestCase] +%% GroupName = atom() +%% TestCase = atom() +%% Reason = term() +%% @end +%%-------------------------------------------------------------------- +all() -> + [commit, rollback]. + +%%-------------------------------------------------------------------- +%% @spec TestCase(Config0) -> +%% ok | exit() | {skip,Reason} | {comment,Comment} | +%% {save_config,Config1} | {skip_and_save,Reason,Config1} +%% Config0 = Config1 = [tuple()] +%% Reason = term() +%% Comment = term() +%% @end +%%-------------------------------------------------------------------- +commit(doc) -> + ["Tests that commit/1 with commit commits pending transactions."]; +commit(Config) -> + {updated, 0} = mysqlerl:commit(?config(db_ref, Config), commit), + {skip, "Not implemented"}. + +rollback(doc) -> + ["Tests that rollback/1 with rollback undoes pending transactions."]; +rollback(Config) -> + {updated, 0} = mysqlerl:commit(?config(db_ref, Config), rollback), + {skip, "Not implemented"}. -- cgit v1.2.3