4
%% Copyright Ericsson AB 2003-2009. All Rights Reserved.
4
%% Copyright Ericsson AB 2003-2010. All Rights Reserved.
6
6
%% The contents of this file are subject to the Erlang Public License,
7
7
%% Version 1.1, (the "License"); you may not use this file except in
26
26
%%----------------------------------------------------------------------
28
28
%%----------------------------------------------------------------------
29
-include("test_server.hrl").
29
-include_lib("test_server/include/test_server.hrl").
30
30
-include("snmp_test_lib.hrl").
31
31
-include_lib("snmp/include/snmp_types.hrl").
32
32
-include_lib("snmp/include/SNMP-COMMUNITY-MIB.hrl").
39
39
%% External exports
40
40
%%----------------------------------------------------------------------
43
init_per_testcase/2, fin_per_testcase/2,
44
init_all/1, finish_all/1,
42
all/0,groups/0,init_per_group/2,end_per_group/2,
43
init_per_testcase/2, end_per_testcase/2,
44
init_per_suite/1, end_per_suite/1,
50
50
size_check_mnesia/1,
100
98
init_per_testcase(_Case, Config) when is_list(Config) ->
103
fin_per_testcase(size_check_dets, Config) when is_list(Config) ->
101
end_per_testcase(size_check_dets, Config) when is_list(Config) ->
104
102
Dir = ?config(dets_dir, Config),
105
103
?line ok = ?DEL_DIR(Dir),
106
104
lists:keydelete(dets_dir, 1, Config);
107
fin_per_testcase(size_check_mnesia, Config) when is_list(Config) ->
105
end_per_testcase(size_check_mnesia, Config) when is_list(Config) ->
109
107
Dir = ?config(mnesia_dir, Config),
110
108
?line ok = ?DEL_DIR(Dir),
111
109
lists:keydelete(mnesia_dir, 1, Config);
112
fin_per_testcase(cache_test, Config) when is_list(Config) ->
110
end_per_testcase(cache_test, Config) when is_list(Config) ->
113
111
Dog = ?config(watchdog, Config),
114
112
test_server:timetrap_cancel(Dog),
116
fin_per_testcase(_Case, Config) when is_list(Config) ->
114
end_per_testcase(_Case, Config) when is_list(Config) ->
121
119
%% Test case definitions
122
120
%%======================================================================
125
{conf, init_all, cases(), finish_all}.
137
init_all(Config) when is_list(Config) ->
127
[size_check_ets, size_check_dets, size_check_mnesia]}].
129
init_per_group(_GroupName, Config) ->
132
end_per_group(_GroupName, Config) ->
137
[start_and_stop, load_unload, {group, size_check},
138
me_lookup, which_mib, cache_test].
140
init_per_suite(Config) when is_list(Config) ->
138
141
%% Data dir points wrong
139
142
DataDir0 = ?config(data_dir, Config),
140
143
DataDir1 = filename:split(filename:absname(DataDir0)),
142
145
DataDir = filename:join(lists:reverse(DataDir2) ++ [?snmp_test_data]),
143
146
[{snmp_data_dir, DataDir ++ "/"}|Config].
145
finish_all(Config) when is_list(Config) ->
148
end_per_suite(Config) when is_list(Config) ->
146
149
lists:keydelete(snmp_data_dir, 1, Config).