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