diff options
Diffstat (limited to 'lib/ssh/src/ssh_tcpip_forward_acceptor_sup.erl')
-rw-r--r-- | lib/ssh/src/ssh_tcpip_forward_acceptor_sup.erl | 62 |
1 files changed, 62 insertions, 0 deletions
diff --git a/lib/ssh/src/ssh_tcpip_forward_acceptor_sup.erl b/lib/ssh/src/ssh_tcpip_forward_acceptor_sup.erl new file mode 100644 index 0000000000..522ce650ff --- /dev/null +++ b/lib/ssh/src/ssh_tcpip_forward_acceptor_sup.erl @@ -0,0 +1,62 @@ +%% +%% %CopyrightBegin% +%% +%% Copyright Ericsson AB 2008-2018. All Rights Reserved. +%% +%% Licensed under the Apache License, Version 2.0 (the "License"); +%% you may not use this file except in compliance with the License. +%% You may obtain a copy of the License at +%% +%% http://www.apache.org/licenses/LICENSE-2.0 +%% +%% Unless required by applicable law or agreed to in writing, software +%% distributed under the License is distributed on an "AS IS" BASIS, +%% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +%% See the License for the specific language governing permissions and +%% limitations under the License. +%% +%% %CopyrightEnd% +%% + +%% +%%---------------------------------------------------------------------- +%% Purpose: The supervisor for tcpip-forwarding acceptor +%%---------------------------------------------------------------------- + +-module(ssh_tcpip_forward_acceptor_sup). +-behaviour(supervisor). + +-include("ssh.hrl"). + +-export([start_link/0, start_child/7]). + +%% Supervisor callback +-export([init/1]). + +%%%========================================================================= +%%% API +%%%========================================================================= +start_link() -> + supervisor:start_link(?MODULE, []). + +start_child(Sup, LSock, ListenAddr, ConnectToAddr, ChanType, ChanCB, ConnPid) -> + Args = [LSock, ListenAddr, ConnectToAddr, ChanType, ChanCB, ConnPid], + supervisor:start_child(Sup, Args). + +%%%========================================================================= +%%% Supervisor callback +%%%========================================================================= +init([]) -> + SupFlags = #{strategy => simple_one_for_one, + intensity => 10, + period => 3600 + }, + ChildSpecs = [#{id => undefined, % As simple_one_for_one is used. + start => {ssh_tcpip_forward_acceptor, start_link, []} + } + ], + {ok, {SupFlags,ChildSpecs}}. + +%%%========================================================================= +%%% Internal functions +%%%========================================================================= |