aboutsummaryrefslogtreecommitdiffstats
path: root/lib/ssh/src/ssh_subsystem_sup.erl
diff options
context:
space:
mode:
authorIngela Anderton Andin <[email protected]>2012-02-28 10:30:17 +0100
committerIngela Anderton Andin <[email protected]>2012-02-28 10:30:17 +0100
commit06add1440f977f4c392040d41350268610fd4faf (patch)
tree6aa7edc3be25b677e02b556d4781bade4e5ca12c /lib/ssh/src/ssh_subsystem_sup.erl
parent583585888569522b2380652c5cd4b7197f09523c (diff)
parentbc50e697fbf392c99842d823eb67a564e1759376 (diff)
downloadotp-06add1440f977f4c392040d41350268610fd4faf.tar.gz
otp-06add1440f977f4c392040d41350268610fd4faf.tar.bz2
otp-06add1440f977f4c392040d41350268610fd4faf.zip
Merge remote branch 'upstream/maint'
* upstream/maint: Prevent client hanging. (OTP-8111) Added checks of API input Improve check so that we will not try to read ssh packet length indicator if not sure we have enough data. Improved error handling
Diffstat (limited to 'lib/ssh/src/ssh_subsystem_sup.erl')
-rw-r--r--lib/ssh/src/ssh_subsystem_sup.erl14
1 files changed, 6 insertions, 8 deletions
diff --git a/lib/ssh/src/ssh_subsystem_sup.erl b/lib/ssh/src/ssh_subsystem_sup.erl
index d71b6bbc56..cd6defd535 100644
--- a/lib/ssh/src/ssh_subsystem_sup.erl
+++ b/lib/ssh/src/ssh_subsystem_sup.erl
@@ -1,7 +1,7 @@
%%
%% %CopyrightBegin%
%%
-%% Copyright Ericsson AB 2008-2010. All Rights Reserved.
+%% Copyright Ericsson AB 2008-2012. All Rights Reserved.
%%
%% The contents of this file are subject to the Erlang Public License,
%% Version 1.1, (the "License"); you may not use this file except in
@@ -70,13 +70,12 @@ ssh_connectinon_child_spec(Opts) ->
Address = proplists:get_value(address, Opts),
Port = proplists:get_value(port, Opts),
Role = proplists:get_value(role, Opts),
- Name = id(Role, ssh_connection_controler, Address, Port),
- StartFunc = {ssh_connection_controler, start_link, [Opts]},
+ Name = id(Role, ssh_connection_sup, Address, Port),
+ StartFunc = {ssh_connection_sup, start_link, [Opts]},
Restart = transient,
-% Restart = permanent,
Shutdown = 5000,
- Modules = [ssh_connection_controler],
- Type = worker,
+ Modules = [ssh_connection_sup],
+ Type = supervisor,
{Name, StartFunc, Restart, Shutdown, Type, Modules}.
ssh_channel_child_spec(Opts) ->
@@ -86,7 +85,6 @@ ssh_channel_child_spec(Opts) ->
Name = id(Role, ssh_channel_sup, Address, Port),
StartFunc = {ssh_channel_sup, start_link, [Opts]},
Restart = transient,
-% Restart = permanent,
Shutdown = infinity,
Modules = [ssh_channel_sup],
Type = supervisor,
@@ -95,7 +93,7 @@ ssh_channel_child_spec(Opts) ->
id(Role, Sup, Address, Port) ->
{Role, Sup, Address, Port}.
-ssh_connection_sup([{_, Child, _, [ssh_connection_controler]} | _]) ->
+ssh_connection_sup([{_, Child, _, [ssh_connection_sup]} | _]) ->
Child;
ssh_connection_sup([_ | Rest]) ->
ssh_connection_sup(Rest).