From: tmoran@acm.org
Subject: Re: ftp client package
Date: Thu, 20 Nov 2003 18:39:57 GMT
Date: 2003-11-20T18:39:57+00:00 [thread overview]
Message-ID: <1U7vb.258017$Tr4.804652@attbi_s03> (raw)
In-Reply-To: d37844cb.0311200821.c9d065a@posting.google.com
>Has someone writen an ada ftp client package?
Do you mean something with declarations like:
type Connection_Type is new Ada.Finalization.Limited_Controlled with private;
procedure Connect(Connection: in out Connection_Type;
Site, User, Password: in String;
Timeout : in Duration := 60.0;
Ftp_Port : in Claw.Sockets.Port_Type
:= Claw.Sockets.Ftp_Port; -- common case
Use_Pasv : in Boolean := True); -- common case
generic
with procedure Process_Incoming_Data(
Line : in out Ada.Streams.Stream_Element_Array;
Last : in out Ada.Streams.Stream_Element_Offset;
Quit : in out Boolean) is Null_Process_Incoming_Data;
procedure General_Get(Connection: in out Connection_Type;
Source_File_Name: in String;
Target_File_Name: in String; -- "" => no target file
Timeout : in Duration := 2.0);
-- Use this generic to download a file. It can save the result
-- as a new disk file, or pass it as it arrives to the generic
-- parameter procedure Process_Incoming_Data. That procedure will
procedure Change_Working_Directory(Connection: in out Connection_Type;
Target_Directory_Name: in String);
and so forth?
next prev parent reply other threads:[~2003-11-20 18:39 UTC|newest]
Thread overview: 9+ messages / expand[flat|nested] mbox.gz Atom feed top
2003-11-20 16:21 ftp client package Volkert
2003-11-20 18:39 ` tmoran [this message]
2003-11-21 6:57 ` Volkert
2003-11-21 8:18 ` tmoran
2003-11-21 20:13 ` Randy Brukardt
2003-11-24 6:52 ` Volkert
2003-11-24 7:09 ` tmoran
2003-11-24 8:05 ` Adrian Hoe
2003-11-24 16:24 ` Volkert
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox