aboutsummaryrefslogtreecommitdiffstats
path: root/lib/common_test
diff options
context:
space:
mode:
authorPeter Andersson <[email protected]>2012-03-13 17:05:08 +0100
committerPeter Andersson <[email protected]>2012-03-13 17:05:08 +0100
commitccdee0c96757252c63f4e4d2f3d21c628e0c4025 (patch)
tree9708d5bdb8bd9110d8c16082aa9370d497752c29 /lib/common_test
parent83b3156388ee6773fddd82e5395bdfe2c8eedc19 (diff)
downloadotp-ccdee0c96757252c63f4e4d2f3d21c628e0c4025.tar.gz
otp-ccdee0c96757252c63f4e4d2f3d21c628e0c4025.tar.bz2
otp-ccdee0c96757252c63f4e4d2f3d21c628e0c4025.zip
Change the option name 'unique_priv_dir' to 'create_priv_dir'
The new values for create_priv_dir are: auto_per_run, auto_per_tc, manual_per_tc
Diffstat (limited to 'lib/common_test')
-rw-r--r--lib/common_test/src/ct.erl6
-rw-r--r--lib/common_test/src/ct_run.erl50
-rw-r--r--lib/common_test/src/ct_testspec.erl26
-rw-r--r--lib/common_test/src/ct_util.hrl2
-rw-r--r--lib/common_test/test/ct_priv_dir_SUITE.erl96
-rw-r--r--lib/common_test/test/ct_priv_dir_SUITE_data/auto_per_run.spec5
-rw-r--r--lib/common_test/test/ct_priv_dir_SUITE_data/auto_per_tc.spec5
-rw-r--r--lib/common_test/test/ct_priv_dir_SUITE_data/manual_per_tc.spec5
-rw-r--r--lib/common_test/test/ct_priv_dir_SUITE_data/priv_dir_SUITE.erl4
-rw-r--r--lib/common_test/test/ct_priv_dir_SUITE_data/unique_auto.spec5
-rw-r--r--lib/common_test/test/ct_priv_dir_SUITE_data/unique_manual.spec5
11 files changed, 118 insertions, 91 deletions
diff --git a/lib/common_test/src/ct.erl b/lib/common_test/src/ct.erl
index 83ed0a66d7..63a8adbc63 100644
--- a/lib/common_test/src/ct.erl
+++ b/lib/common_test/src/ct.erl
@@ -676,9 +676,9 @@ send_html_comment(Comment) ->
%%%-----------------------------------------------------------------
%%% @spec make_priv_dir() -> ok | {error,Reason}
%%% Reason = term()
-%%% @doc If the test has been started with the unique_priv_dir
-%%% option set to manual, in order for the test case to use the
-%%% private directory, it must first create it by calling
+%%% @doc If the test has been started with the create_priv_dir
+%%% option set to manual_per_tc, in order for the test case to use
+%%% the private directory, it must first create it by calling
%%% this function.
make_priv_dir() ->
test_server:make_priv_dir().
diff --git a/lib/common_test/src/ct_run.erl b/lib/common_test/src/ct_run.erl
index 19afb4b9f6..ef3e1b6a32 100644
--- a/lib/common_test/src/ct_run.erl
+++ b/lib/common_test/src/ct_run.erl
@@ -63,7 +63,7 @@
stylesheet,
multiply_timetraps = 1,
scale_timetraps = false,
- unique_priv_dir,
+ create_priv_dir,
testspecs = [],
tests}).
@@ -179,9 +179,9 @@ script_start1(Parent, Args) ->
fun([CT]) -> list_to_atom(CT);
([]) -> true
end, false, Args),
- UniquePrivDir = get_start_opt(unique_priv_dir,
- fun([UPD]) -> list_to_atom(UPD);
- ([]) -> auto
+ CreatePrivDir = get_start_opt(create_priv_dir,
+ fun([PD]) -> list_to_atom(PD);
+ ([]) -> auto_per_tc
end, Args),
EvHandlers = event_handler_args2opts(Args),
CTHooks = ct_hooks_args2opts(Args),
@@ -261,7 +261,7 @@ script_start1(Parent, Args) ->
stylesheet = Stylesheet,
multiply_timetraps = MultTT,
scale_timetraps = ScaleTT,
- unique_priv_dir = UniquePrivDir},
+ create_priv_dir = CreatePrivDir},
%% check if log files should be refreshed or go on to run tests...
Result = run_or_refresh(StartOpts, Args),
@@ -335,9 +335,9 @@ script_start2(StartOpts = #opts{vts = undefined,
choose_val(StartOpts#opts.scale_timetraps,
SpecStartOpts#opts.scale_timetraps),
- UniquePrivDir =
- choose_val(StartOpts#opts.unique_priv_dir,
- SpecStartOpts#opts.unique_priv_dir),
+ CreatePrivDir =
+ choose_val(StartOpts#opts.create_priv_dir,
+ SpecStartOpts#opts.create_priv_dir),
AllEvHs =
merge_vals([StartOpts#opts.event_handlers,
@@ -370,7 +370,7 @@ script_start2(StartOpts = #opts{vts = undefined,
include = AllInclude,
multiply_timetraps = MultTT,
scale_timetraps = ScaleTT,
- unique_priv_dir = UniquePrivDir}}
+ create_priv_dir = CreatePrivDir}}
end;
_ ->
{undefined,StartOpts}
@@ -583,7 +583,7 @@ script_usage() ->
"\n\t[-no_auto_compile]"
"\n\t[-multiply_timetraps N]"
"\n\t[-scale_timetraps]"
- "\n\t[-unique_priv_dir [auto | manual]]"
+ "\n\t[-create_priv_dir auto_per_run | auto_per_tc | manual_per_tc]"
"\n\t[-basic_html]\n\n"),
io:format("Run tests from command line:\n\n"
"\tct_run [-dir TestDir1 TestDir2 .. TestDirN] |"
@@ -603,7 +603,7 @@ script_usage() ->
"\n\t[-no_auto_compile]"
"\n\t[-multiply_timetraps N]"
"\n\t[-scale_timetraps]"
- "\n\t[-unique_priv_dir [auto | manual]]"
+ "\n\t[-create_priv_dir auto_per_run | auto_per_tc | manual_per_tc]"
"\n\t[-basic_html]"
"\n\t[-repeat N [-force_stop]] |"
"\n\t[-duration HHMMSS [-force_stop]] |"
@@ -624,7 +624,7 @@ script_usage() ->
"\n\t[-no_auto_compile]"
"\n\t[-multiply_timetraps N]"
"\n\t[-scale_timetraps]"
- "\n\t[-unique_priv_dir [auto | manual]]"
+ "\n\t[-create_priv_dir auto_per_run | auto_per_tc | manual_per_tc]"
"\n\t[-basic_html]"
"\n\t[-repeat N [-force_stop]] |"
"\n\t[-duration HHMMSS [-force_stop]] |"
@@ -802,7 +802,7 @@ run_test2(StartOpts) ->
ScaleTT = get_start_opt(scale_timetraps, value, false, StartOpts),
%% create unique priv dir names
- UniquePrivDir = get_start_opt(unique_priv_dir, value, StartOpts),
+ CreatePrivDir = get_start_opt(create_priv_dir, value, StartOpts),
%% auto compile & include files
Include =
@@ -865,7 +865,7 @@ run_test2(StartOpts) ->
stylesheet = Stylesheet,
multiply_timetraps = MultiplyTT,
scale_timetraps = ScaleTT,
- unique_priv_dir = UniquePrivDir},
+ create_priv_dir = CreatePrivDir},
%% test specification
case proplists:get_value(spec, StartOpts) of
@@ -912,8 +912,8 @@ run_spec_file(Relaxed,
SpecOpts#opts.multiply_timetraps),
ScaleTT = choose_val(Opts#opts.scale_timetraps,
SpecOpts#opts.scale_timetraps),
- UniquePrivDir = choose_val(Opts#opts.unique_priv_dir,
- SpecOpts#opts.unique_priv_dir),
+ CreatePrivDir = choose_val(Opts#opts.create_priv_dir,
+ SpecOpts#opts.create_priv_dir),
AllEvHs = merge_vals([Opts#opts.event_handlers,
SpecOpts#opts.event_handlers]),
AllInclude = merge_vals([Opts#opts.include,
@@ -937,7 +937,7 @@ run_spec_file(Relaxed,
testspecs = AbsSpecs,
multiply_timetraps = MultTT,
scale_timetraps = ScaleTT,
- unique_priv_dir = UniquePrivDir,
+ create_priv_dir = CreatePrivDir,
ct_hooks = AllCTHooks,
enable_builtin_hooks = EnableBuiltinHooks
},
@@ -1197,7 +1197,7 @@ get_data_for_node(#testspec{label = Labels,
include = Incl,
multiply_timetraps = MTs,
scale_timetraps = STs,
- unique_priv_dir = UPDs}, Node) ->
+ create_priv_dir = PDs}, Node) ->
Label = proplists:get_value(Node, Labels),
Profile = proplists:get_value(Node, Profiles),
LogDir = case proplists:get_value(Node, LogDirs) of
@@ -1211,7 +1211,7 @@ get_data_for_node(#testspec{label = Labels,
Cover = proplists:get_value(Node, CoverFs),
MT = proplists:get_value(Node, MTs),
ST = proplists:get_value(Node, STs),
- UniquePrivDir = proplists:get_value(Node, UPDs),
+ CreatePrivDir = proplists:get_value(Node, PDs),
ConfigFiles = [{?ct_config_txt,F} || {N,F} <- Cfgs, N==Node] ++
[CBF || {N,CBF} <- UsrCfgs, N==Node],
EvHandlers = [{H,A} || {N,H,A} <- EvHs, N==Node],
@@ -1229,7 +1229,7 @@ get_data_for_node(#testspec{label = Labels,
include = Include,
multiply_timetraps = MT,
scale_timetraps = ST,
- unique_priv_dir = UniquePrivDir}.
+ create_priv_dir = CreatePrivDir}.
refresh_logs(LogDir) ->
{ok,Cwd} = file:get_cwd(),
@@ -1871,8 +1871,8 @@ do_run_test(Tests, Skip, Opts) ->
test_server_ctrl:multiply_timetraps(Opts#opts.multiply_timetraps),
test_server_ctrl:scale_timetraps(Opts#opts.scale_timetraps),
- test_server_ctrl:unique_priv_dir(choose_val(Opts#opts.unique_priv_dir,
- false)),
+ test_server_ctrl:create_priv_dir(choose_val(Opts#opts.create_priv_dir,
+ auto_per_run)),
ct_event:notify(#event{name=start_info,
node=node(),
data={NoOfTests,NoOfSuites,NoOfCases}}),
@@ -2450,10 +2450,10 @@ opts2args(EnvStartOpts) ->
[{scale_timetraps,[]}];
({scale_timetraps,false}) ->
[];
- ({unique_priv_dir,false}) ->
+ ({create_priv_dir,auto_per_run}) ->
[];
- ({unique_priv_dir,UPD}) when is_atom(UPD) ->
- [{unique_priv_dir,[atom_to_list(UPD)]}];
+ ({create_priv_dir,PD}) when is_atom(PD) ->
+ [{create_priv_dir,[atom_to_list(PD)]}];
({force_stop,true}) ->
[{force_stop,[]}];
({force_stop,false}) ->
diff --git a/lib/common_test/src/ct_testspec.erl b/lib/common_test/src/ct_testspec.erl
index 9e8065c636..5b197c0c81 100644
--- a/lib/common_test/src/ct_testspec.erl
+++ b/lib/common_test/src/ct_testspec.erl
@@ -568,20 +568,20 @@ add_tests([{scale_timetraps,Node,ST}|Ts],Spec) ->
add_tests([{scale_timetraps,ST}|Ts],Spec) ->
add_tests([{scale_timetraps,all_nodes,ST}|Ts],Spec);
-%% --- unique_priv_dir ---
-add_tests([{unique_priv_dir,all_nodes,UPD}|Ts],Spec) ->
- Tests = lists:map(fun(N) -> {unique_priv_dir,N,UPD} end, list_nodes(Spec)),
+%% --- create_priv_dir ---
+add_tests([{create_priv_dir,all_nodes,PD}|Ts],Spec) ->
+ Tests = lists:map(fun(N) -> {create_priv_dir,N,PD} end, list_nodes(Spec)),
add_tests(Tests++Ts,Spec);
-add_tests([{unique_priv_dir,Nodes,UPD}|Ts],Spec) when is_list(Nodes) ->
- Ts1 = separate(Nodes,unique_priv_dir,[UPD],Ts,Spec#testspec.nodes),
+add_tests([{create_priv_dir,Nodes,PD}|Ts],Spec) when is_list(Nodes) ->
+ Ts1 = separate(Nodes,create_priv_dir,[PD],Ts,Spec#testspec.nodes),
add_tests(Ts1,Spec);
-add_tests([{unique_priv_dir,Node,UPD}|Ts],Spec) ->
- UPDs = Spec#testspec.unique_priv_dir,
- UPDs1 = [{ref2node(Node,Spec#testspec.nodes),UPD} |
- lists:keydelete(ref2node(Node,Spec#testspec.nodes),1,UPDs)],
- add_tests(Ts,Spec#testspec{unique_priv_dir=UPDs1});
-add_tests([{unique_priv_dir,UPD}|Ts],Spec) ->
- add_tests([{unique_priv_dir,all_nodes,UPD}|Ts],Spec);
+add_tests([{create_priv_dir,Node,PD}|Ts],Spec) ->
+ PDs = Spec#testspec.create_priv_dir,
+ PDs1 = [{ref2node(Node,Spec#testspec.nodes),PD} |
+ lists:keydelete(ref2node(Node,Spec#testspec.nodes),1,PDs)],
+ add_tests(Ts,Spec#testspec{create_priv_dir=PDs1});
+add_tests([{create_priv_dir,PD}|Ts],Spec) ->
+ add_tests([{create_priv_dir,all_nodes,PD}|Ts],Spec);
%% --- config ---
add_tests([{config,all_nodes,Files}|Ts],Spec) ->
@@ -1174,7 +1174,7 @@ valid_terms() ->
{skip_groups,7},
{skip_cases,5},
{skip_cases,6},
- {unique_priv_dir,2}
+ {create_priv_dir,2}
].
%% this function "guesses" if the user has misspelled a term name
diff --git a/lib/common_test/src/ct_util.hrl b/lib/common_test/src/ct_util.hrl
index da96743732..082599a9c6 100644
--- a/lib/common_test/src/ct_util.hrl
+++ b/lib/common_test/src/ct_util.hrl
@@ -43,7 +43,7 @@
include=[],
multiply_timetraps=[],
scale_timetraps=[],
- unique_priv_dir=[],
+ create_priv_dir=[],
alias=[],
tests=[],
merge_tests=true}).
diff --git a/lib/common_test/test/ct_priv_dir_SUITE.erl b/lib/common_test/test/ct_priv_dir_SUITE.erl
index bfc579d7f1..f6942d59bf 100644
--- a/lib/common_test/test/ct_priv_dir_SUITE.erl
+++ b/lib/common_test/test/ct_priv_dir_SUITE.erl
@@ -21,7 +21,7 @@
%%% File: ct_priv_dir_SUITE
%%%
%%% Description:
-%%% Test that it works to use the unique_priv_dir option.
+%%% Test that it works to use the create_priv_dir option.
%%%
%%%-------------------------------------------------------------------
-module(ct_priv_dir_SUITE).
@@ -60,11 +60,13 @@ suite() -> [{ct_hooks,[ts_install_cth]}].
all() ->
[
default,
- unique_auto,
- unique_manual,
+ auto_per_run,
+ auto_per_tc,
+ manual_per_tc,
spec_default,
- spec_unique_auto,
- spec_unique_manual
+ spec_auto_per_run,
+ spec_auto_per_run,
+ spec_manual_per_tc
].
%%--------------------------------------------------------------------
@@ -82,23 +84,33 @@ default(Config) when is_list(Config) ->
%%%-----------------------------------------------------------------
%%%
-unique_auto(Config) when is_list(Config) ->
+auto_per_run(Config) when is_list(Config) ->
DataDir = ?config(data_dir, Config),
Suite = filename:join(DataDir, "priv_dir_SUITE"),
- {Opts,ERPid} = setup([{suite,Suite},{testcase,unique_auto},
- {label,unique_auto},
- {unique_priv_dir,auto}], Config),
- ok = execute(unique_auto, Opts, ERPid, Config).
+ {Opts,ERPid} = setup([{suite,Suite},{testcase,default},
+ {label,auto_per_run},
+ {create_priv_dir,auto_per_run}], Config),
+ ok = execute(auto_per_run, Opts, ERPid, Config).
+
+%%%-----------------------------------------------------------------
+%%%
+auto_per_tc(Config) when is_list(Config) ->
+ DataDir = ?config(data_dir, Config),
+ Suite = filename:join(DataDir, "priv_dir_SUITE"),
+ {Opts,ERPid} = setup([{suite,Suite},{testcase,auto_per_tc},
+ {label,auto_per_tc},
+ {create_priv_dir,auto_per_tc}], Config),
+ ok = execute(auto_per_tc, Opts, ERPid, Config).
%%%-----------------------------------------------------------------
%%%
-unique_manual(Config) when is_list(Config) ->
+manual_per_tc(Config) when is_list(Config) ->
DataDir = ?config(data_dir, Config),
Suite = filename:join(DataDir, "priv_dir_SUITE"),
- {Opts,ERPid} = setup([{suite,Suite},{testcase,unique_manual},
- {label,unique_manual},
- {unique_priv_dir,manual}], Config),
- ok = execute(unique_manual, Opts, ERPid, Config).
+ {Opts,ERPid} = setup([{suite,Suite},{testcase,manual_per_tc},
+ {label,manual_per_tc},
+ {create_priv_dir,manual_per_tc}], Config),
+ ok = execute(manual_per_tc, Opts, ERPid, Config).
%%%-----------------------------------------------------------------
%%%
@@ -111,21 +123,30 @@ spec_default(Config) when is_list(Config) ->
%%%-----------------------------------------------------------------
%%%
-spec_unique_auto(Config) when is_list(Config) ->
+spec_auto_per_run(Config) when is_list(Config) ->
+ DataDir = ?config(data_dir, Config),
+ Spec = filename:join(DataDir, "auto_per_run.spec"),
+ {Opts,ERPid} = setup([{spec,Spec},
+ {label,spec_auto_per_run}], Config),
+ ok = execute(spec_auto_per_run, Opts, ERPid, Config).
+
+%%%-----------------------------------------------------------------
+%%%
+spec_auto_per_tc(Config) when is_list(Config) ->
DataDir = ?config(data_dir, Config),
- Spec = filename:join(DataDir, "unique_auto.spec"),
+ Spec = filename:join(DataDir, "auto_per_tc.spec"),
{Opts,ERPid} = setup([{spec,Spec},
- {label,spec_unique_auto}], Config),
- ok = execute(spec_unique_auto, Opts, ERPid, Config).
+ {label,spec_auto_per_tc}], Config),
+ ok = execute(spec_auto_per_tc, Opts, ERPid, Config).
%%%-----------------------------------------------------------------
%%%
-spec_unique_manual(Config) when is_list(Config) ->
+spec_manual_per_tc(Config) when is_list(Config) ->
DataDir = ?config(data_dir, Config),
- Spec = filename:join(DataDir, "unique_manual.spec"),
+ Spec = filename:join(DataDir, "manual_per_tc.spec"),
{Opts,ERPid} = setup([{spec,Spec},
- {label,spec_unique_manual}], Config),
- ok = execute(spec_unique_manual, Opts, ERPid, Config).
+ {label,spec_manual_per_tc}], Config),
+ ok = execute(spec_manual_per_tc, Opts, ERPid, Config).
%%%-----------------------------------------------------------------
@@ -168,7 +189,7 @@ events_to_check(Test, N) ->
test_events(Test) ++ events_to_check(Test, N-1).
-test_events(default) ->
+test_events(DEF) when DEF == default ; DEF == auto_per_run ->
[
{?eh,start_logging,{'DEF','RUNDIR'}},
{?eh,test_start,{'DEF',{'START_TIME','LOGDIR'}}},
@@ -183,35 +204,36 @@ test_events(default) ->
{?eh,test_done,{'DEF','STOP_TIME'}},
{?eh,stop_logging,[]}];
-test_events(unique_auto) ->
+test_events(auto_per_tc) ->
[{?eh,start_logging,{'DEF','RUNDIR'}},
{?eh,test_start,{'DEF',{'START_TIME','LOGDIR'}}},
{?eh,start_info,{1,1,1}},
{?eh,tc_start,{priv_dir_SUITE,init_per_suite}},
{?eh,tc_done,{priv_dir_SUITE,init_per_suite,ok}},
- {?eh,tc_start,{priv_dir_SUITE,unique_auto}},
- {?eh,tc_done,{priv_dir_SUITE,unique_auto,ok}},
+ {?eh,tc_start,{priv_dir_SUITE,auto_per_tc}},
+ {?eh,tc_done,{priv_dir_SUITE,auto_per_tc,ok}},
{?eh,test_stats,{1,0,{0,0}}},
{?eh,tc_start,{priv_dir_SUITE,end_per_suite}},
{?eh,tc_done,{priv_dir_SUITE,end_per_suite,ok}},
{?eh,test_done,{'DEF','STOP_TIME'}},
{?eh,stop_logging,[]}];
-test_events(unique_manual) ->
+test_events(manual_per_tc) ->
[{?eh,start_logging,{'DEF','RUNDIR'}},
{?eh,test_start,{'DEF',{'START_TIME','LOGDIR'}}},
{?eh,start_info,{1,1,1}},
{?eh,tc_start,{priv_dir_SUITE,init_per_suite}},
{?eh,tc_done,{priv_dir_SUITE,init_per_suite,ok}},
- {?eh,tc_start,{priv_dir_SUITE,unique_manual}},
- {?eh,tc_done,{priv_dir_SUITE,unique_manual,ok}},
+ {?eh,tc_start,{priv_dir_SUITE,manual_per_tc}},
+ {?eh,tc_done,{priv_dir_SUITE,manual_per_tc,ok}},
{?eh,test_stats,{1,0,{0,0}}},
{?eh,tc_start,{priv_dir_SUITE,end_per_suite}},
{?eh,tc_done,{priv_dir_SUITE,end_per_suite,ok}},
{?eh,test_done,{'DEF','STOP_TIME'}},
{?eh,stop_logging,[]}];
-test_events(spec_default) ->
+test_events(SPECDEF) when SPECDEF == spec_default ;
+ SPECDEF == spec_auto_per_run ->
[{?eh,start_logging,{'DEF','RUNDIR'}},
{?eh,test_start,{'DEF',{'START_TIME','LOGDIR'}}},
{?eh,start_info,{1,1,1}},
@@ -225,28 +247,28 @@ test_events(spec_default) ->
{?eh,test_done,{'DEF','STOP_TIME'}},
{?eh,stop_logging,[]}];
-test_events(spec_unique_auto) ->
+test_events(spec_auto_per_tc) ->
[{?eh,start_logging,{'DEF','RUNDIR'}},
{?eh,test_start,{'DEF',{'START_TIME','LOGDIR'}}},
{?eh,start_info,{1,1,1}},
{?eh,tc_start,{priv_dir_SUITE,init_per_suite}},
{?eh,tc_done,{priv_dir_SUITE,init_per_suite,ok}},
- {?eh,tc_start,{priv_dir_SUITE,unique_auto}},
- {?eh,tc_done,{priv_dir_SUITE,unique_auto,ok}},
+ {?eh,tc_start,{priv_dir_SUITE,auto_per_tc}},
+ {?eh,tc_done,{priv_dir_SUITE,auto_per_tc,ok}},
{?eh,test_stats,{1,0,{0,0}}},
{?eh,tc_start,{priv_dir_SUITE,end_per_suite}},
{?eh,tc_done,{priv_dir_SUITE,end_per_suite,ok}},
{?eh,test_done,{'DEF','STOP_TIME'}},
{?eh,stop_logging,[]}];
-test_events(spec_unique_manual) ->
+test_events(spec_manual_per_tc) ->
[{?eh,start_logging,{'DEF','RUNDIR'}},
{?eh,test_start,{'DEF',{'START_TIME','LOGDIR'}}},
{?eh,start_info,{1,1,1}},
{?eh,tc_start,{priv_dir_SUITE,init_per_suite}},
{?eh,tc_done,{priv_dir_SUITE,init_per_suite,ok}},
- {?eh,tc_start,{priv_dir_SUITE,unique_manual}},
- {?eh,tc_done,{priv_dir_SUITE,unique_manual,ok}},
+ {?eh,tc_start,{priv_dir_SUITE,manual_per_tc}},
+ {?eh,tc_done,{priv_dir_SUITE,manual_per_tc,ok}},
{?eh,test_stats,{1,0,{0,0}}},
{?eh,tc_start,{priv_dir_SUITE,end_per_suite}},
{?eh,tc_done,{priv_dir_SUITE,end_per_suite,ok}},
diff --git a/lib/common_test/test/ct_priv_dir_SUITE_data/auto_per_run.spec b/lib/common_test/test/ct_priv_dir_SUITE_data/auto_per_run.spec
new file mode 100644
index 0000000000..4dde0ed1f4
--- /dev/null
+++ b/lib/common_test/test/ct_priv_dir_SUITE_data/auto_per_run.spec
@@ -0,0 +1,5 @@
+{create_priv_dir, auto_per_run}.
+
+{alias, curr, "./"}.
+
+{cases, curr, priv_dir_SUITE, default}. \ No newline at end of file
diff --git a/lib/common_test/test/ct_priv_dir_SUITE_data/auto_per_tc.spec b/lib/common_test/test/ct_priv_dir_SUITE_data/auto_per_tc.spec
new file mode 100644
index 0000000000..c265500865
--- /dev/null
+++ b/lib/common_test/test/ct_priv_dir_SUITE_data/auto_per_tc.spec
@@ -0,0 +1,5 @@
+{create_priv_dir, auto_per_tc}.
+
+{alias, curr, "./"}.
+
+{cases, curr, priv_dir_SUITE, auto_per_tc}. \ No newline at end of file
diff --git a/lib/common_test/test/ct_priv_dir_SUITE_data/manual_per_tc.spec b/lib/common_test/test/ct_priv_dir_SUITE_data/manual_per_tc.spec
new file mode 100644
index 0000000000..4f98734d5f
--- /dev/null
+++ b/lib/common_test/test/ct_priv_dir_SUITE_data/manual_per_tc.spec
@@ -0,0 +1,5 @@
+{create_priv_dir, manual_per_tc}.
+
+{alias, curr, "./"}.
+
+{cases, curr, priv_dir_SUITE, manual_per_tc}. \ No newline at end of file
diff --git a/lib/common_test/test/ct_priv_dir_SUITE_data/priv_dir_SUITE.erl b/lib/common_test/test/ct_priv_dir_SUITE_data/priv_dir_SUITE.erl
index 0fe337135b..423cb2999b 100644
--- a/lib/common_test/test/ct_priv_dir_SUITE_data/priv_dir_SUITE.erl
+++ b/lib/common_test/test/ct_priv_dir_SUITE_data/priv_dir_SUITE.erl
@@ -113,12 +113,12 @@ default(Config) ->
"log_private" = filename:basename(PrivDir),
{ok,_} = file:list_dir(PrivDir).
-unique_auto(Config) ->
+auto_per_tc(Config) ->
PrivDir = proplists:get_value(priv_dir, Config),
["log_private",_] = string:tokens(filename:basename(PrivDir), "."),
{ok,_} = file:list_dir(PrivDir).
-unique_manual(Config) ->
+manual_per_tc(Config) ->
PrivDir = proplists:get_value(priv_dir, Config),
["log_private",_] = string:tokens(filename:basename(PrivDir), "."),
{error,_} = file:list_dir(PrivDir),
diff --git a/lib/common_test/test/ct_priv_dir_SUITE_data/unique_auto.spec b/lib/common_test/test/ct_priv_dir_SUITE_data/unique_auto.spec
deleted file mode 100644
index a64a09ecf0..0000000000
--- a/lib/common_test/test/ct_priv_dir_SUITE_data/unique_auto.spec
+++ /dev/null
@@ -1,5 +0,0 @@
-{unique_priv_dir, auto}.
-
-{alias, curr, "./"}.
-
-{cases, curr, priv_dir_SUITE, unique_auto}. \ No newline at end of file
diff --git a/lib/common_test/test/ct_priv_dir_SUITE_data/unique_manual.spec b/lib/common_test/test/ct_priv_dir_SUITE_data/unique_manual.spec
deleted file mode 100644
index 9af9197c18..0000000000
--- a/lib/common_test/test/ct_priv_dir_SUITE_data/unique_manual.spec
+++ /dev/null
@@ -1,5 +0,0 @@
-{unique_priv_dir, manual}.
-
-{alias, curr, "./"}.
-
-{cases, curr, priv_dir_SUITE, unique_manual}. \ No newline at end of file