From be82a5b6ed52be90ec5fd55b70002f9a2a89265a Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?P=C3=A9ter=20Dimitrov?= <peterdmv@erlang.org>
Date: Thu, 1 Mar 2018 17:07:12 +0100
Subject: inets: Support ftp stand_alone mode

Change-Id: I38bbca9d3fb2d90869cfe468e444204514301c36
---
 lib/ftp/src/ftp.erl | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)

(limited to 'lib/ftp')

diff --git a/lib/ftp/src/ftp.erl b/lib/ftp/src/ftp.erl
index 6bf83184e3..083ca9fc87 100644
--- a/lib/ftp/src/ftp.erl
+++ b/lib/ftp/src/ftp.erl
@@ -31,6 +31,10 @@
          service_info/1
         ]).
 
+%% Added for backward compatibility
+%% Called by inets:start()
+-export([start_standalone/1]).
+
 -export([start_link/1, start_link/2]).
 
 %%  API - Client interface
@@ -128,6 +132,21 @@
 start() ->
     application:start(ftp).
 
+start_standalone(Options) ->
+    try
+	{ok, StartOptions} = start_options(Options),
+	{ok, OpenOptions}  = open_options(Options),
+	case start_link(StartOptions, []) of
+	    {ok, Pid} ->
+		call(Pid, {open, ip_comm, OpenOptions}, plain);
+	    Error1 ->
+		Error1
+	end
+    catch
+	throw:Error2 ->
+	    Error2
+    end.
+
 start_service(Options) ->
     try
 	{ok, StartOptions} = start_options(Options),
-- 
cgit v1.2.3