aboutsummaryrefslogtreecommitdiffstats
path: root/lib/ssh/src/ssh_ssh.erl
diff options
context:
space:
mode:
authorNiclas Eklund <[email protected]>2010-04-21 14:33:19 +0000
committerErlang/OTP <[email protected]>2010-04-21 14:33:19 +0000
commit9ac34d4580a6ba9af0f448cc3f1220036a0aa796 (patch)
tree4b6960853be0224b524dd93b81fe44af40a6fbaf /lib/ssh/src/ssh_ssh.erl
parent494341d4660ea9cf220848393e718b01fc7926e4 (diff)
downloadotp-9ac34d4580a6ba9af0f448cc3f1220036a0aa796.tar.gz
otp-9ac34d4580a6ba9af0f448cc3f1220036a0aa796.tar.bz2
otp-9ac34d4580a6ba9af0f448cc3f1220036a0aa796.zip
Removed deprecated functions and module
Diffstat (limited to 'lib/ssh/src/ssh_ssh.erl')
-rw-r--r--lib/ssh/src/ssh_ssh.erl65
1 files changed, 0 insertions, 65 deletions
diff --git a/lib/ssh/src/ssh_ssh.erl b/lib/ssh/src/ssh_ssh.erl
deleted file mode 100644
index b1ad90731d..0000000000
--- a/lib/ssh/src/ssh_ssh.erl
+++ /dev/null
@@ -1,65 +0,0 @@
-%%
-%% %CopyrightBegin%
-%%
-%% Copyright Ericsson AB 2005-2010. 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
-%% compliance with the License. You should have received a copy of the
-%% Erlang Public License along with this software. If not, it can be
-%% retrieved online at http://www.erlang.org/.
-%%
-%% Software distributed under the License is distributed on an "AS IS"
-%% basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
-%% the License for the specific language governing rights and limitations
-%% under the License.
-%%
-%% %CopyrightEnd%
-%%
-
-%%
-
-%%% Description: THIS MODULE IS DEPRECATD AND SHOULD BE REMOVED IN R14
-
--module(ssh_ssh).
-
--export([connect/1, connect/2, connect/3]).
--deprecated({connect, 1, next_major_release}).
--deprecated({connect, 2, next_major_release}).
--deprecated({connect, 3, next_major_release}).
-
--include("ssh.hrl").
--include("ssh_connect.hrl").
-
--define(default_timeout, 10000).
-
-%%% Backwards compatibility
-connect(A) ->
- connect(A, []).
-
-connect(Host, Opts) when is_list(Host) ->
- connect(Host, 22, Opts);
-connect(CM, Opts) ->
- Timeout = proplists:get_value(connect_timeout, Opts, ?default_timeout),
- session(CM, Timeout).
-
-connect(Host, Port, Opts) ->
- case ssh:connect(Host, Port, Opts) of
- {ok, CM} ->
- session(CM, proplists:get_value(connect_timeout,
- Opts, ?default_timeout));
- Error ->
- Error
- end.
-
-session(CM, Timeout) ->
- case ssh_connection:session_channel(CM, Timeout) of
- {ok, ChannelId} ->
- Args = [{channel_cb, ssh_shell},
- {init_args,[CM, ChannelId]},
- {cm, CM}, {channel_id, ChannelId}],
- {ok, State} = ssh_channel:init([Args]),
- ssh_channel:enter_loop(State);
- Error ->
- Error
- end.