1%%
2%% %CopyrightBegin%
3%%
4%% Copyright Ericsson AB 2002-2019. All Rights Reserved.
5%%
6%% Licensed under the Apache License, Version 2.0 (the "License");
7%% you may not use this file except in compliance with the License.
8%% You may obtain a copy of the License at
9%%
10%%     http://www.apache.org/licenses/LICENSE-2.0
11%%
12%% Unless required by applicable law or agreed to in writing, software
13%% distributed under the License is distributed on an "AS IS" BASIS,
14%% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
15%% See the License for the specific language governing permissions and
16%% limitations under the License.
17%%
18%% %CopyrightEnd%
19%%
20%%----------------------------------------------------------------------
21%% Purpose: Verify the application specifics of the Megaco application
22%%----------------------------------------------------------------------
23
24-module(megaco_app_SUITE).
25
26-export([
27         suite/0, all/0,
28         init_per_suite/1,    end_per_suite/1,
29         init_per_group/2,    end_per_group/2,
30         init_per_testcase/2, end_per_testcase/2,
31
32         app/0,   app/1,
33         appup/0, appup/1
34        ]).
35
36-include_lib("common_test/include/ct.hrl").
37-include("megaco_test_lib.hrl").
38
39
40%%--------------------------------------------------------------------
41%% Common Test interface functions -----------------------------------
42%%--------------------------------------------------------------------
43
44suite() ->
45    [{ct_hooks, [ts_install_cth]}].
46
47all() ->
48    [
49     app,
50     appup
51    ].
52
53
54%%
55%% -----
56%%
57
58init_per_suite(Config) when is_list(Config) ->
59    ?ANNOUNCE_SUITE_INIT(),
60    Config.
61
62end_per_suite(Config) when is_list(Config) ->
63    Config.
64
65
66
67%%
68%% -----
69%%
70
71init_per_group(_GroupName, Config) ->
72    Config.
73
74end_per_group(_GroupName, Config) ->
75    Config.
76
77
78%%
79%% -----
80%%
81
82init_per_testcase(_Case, Config) when is_list(Config) ->
83    Config.
84
85end_per_testcase(_Case, Config) when is_list(Config) ->
86    Config.
87
88
89
90%%--------------------------------------------------------------------
91%% Test Cases --------------------------------------------------------
92%%--------------------------------------------------------------------
93
94app() ->
95    [{doc, "Test that the megaco app file is ok"}].
96app(Config) when is_list(Config) ->
97    ok = test_server:app_test(megaco).
98
99
100%%--------------------------------------------------------------------
101
102appup() ->
103    [{doc, "Test that the megaco appup file is ok"}].
104appup(Config) when is_list(Config) ->
105    ok = test_server:appup_test(megaco).
106