2
%% <year>2008-2008</year>
3
%% <holder>Ericsson AB, All Rights Reserved</holder>
6
%% The contents of this file are subject to the Erlang Public License,
7
%% Version 1.1, (the "License"); you may not use this file except in
8
%% compliance with the License. You should have received a copy of the
9
%% Erlang Public License along with this software. If not, it can be
10
%% retrieved online at http://www.erlang.org/.
12
%% Software distributed under the License is distributed on an "AS IS"
13
%% basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
14
%% the License for the specific language governing rights and limitations
17
%% The Initial Developer of the Original Code is Ericsson AB.
20
%%----------------------------------------------------------------------
21
%% Purpose: The ssh client subsystem supervisor
22
%%----------------------------------------------------------------------
26
-behaviour(supervisor).
28
-export([start_link/1, start_child/1]).
30
%% Supervisor callback
33
%%%=========================================================================
35
%%%=========================================================================
37
supervisor:start_link({local, ?MODULE}, ?MODULE, [Args]).
40
supervisor:start_child(?MODULE, Args).
42
%%%=========================================================================
43
%%% Supervisor callback
44
%%%=========================================================================
46
RestartStrategy = simple_one_for_one,
49
{ok, {{RestartStrategy, MaxR, MaxT}, [child_spec(Args)]}}.
51
%%%=========================================================================
52
%%% Internal functions
53
%%%=========================================================================
55
Name = undefined, % As simple_one_for_one is used.
56
StartFunc = {ssh_connection_sup, start_link, []},
59
Modules = [ssh_connection_sup],
61
{Name, StartFunc, Restart, Shutdown, Type, Modules}.