Re: [twsocket] TFtpClient transfer time...
zayin wrote: Hello, I am using TFtpClient, version 7.12 to transfer a single file. The elapsed time is over 4 1/2 minutes. When I transfer the same single file with FileZilla the elapsed time is 2 1/2 minutes. My test: ICS 7.3 MB/s and FileZilla 12.0 MB/s in a 100 Mbit LAN. After I set DataSocket's winsock send and receive buffer size to 32768 (default 8192) speed notably increased to 11.4. I uploaded this changed OverbyteIcsFtpCli.pas here: http://www.duodata.de/misc/delphi/ics/OverbyteIcsFtpCli.zip Note that it requires current ICSv7 available for download here: http://wiki.overbyte.be/wiki/index.php/ICS_Download Please let me know how it works for you, does it slow down performance when you have plenty of small files to transfer? Maybe we should make these settings a property? Currently I hardcoded them in the component. Also making sure that DataSocket.BufSize (default 1460) doesn't exceed the maximum MTU might give you some more KB/s. In my LAN all PCs are configured to use a MTU of 1452 for best performance with our DSL internet connection and setting that value as DataSocket.BufSize gave me another 0.4 MB/s. With these settings it's as fast as with blocking sockets -- Arno Garrels -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient transfer time...
Arno Garrels wrote: After I set DataSocket's winsock send and receive buffer size to 32768 (default 8192) speed notably increased to 11.4. The reason for this increase is that TryToSent less often hits socket error WSAWOULDBLOCK see also: http://support.microsoft.com/kb/823764/en-us -- Arno Garrels -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient transfer time...
Arno Garrels wrote: My test: ICS 7.3 MB/s and FileZilla 12.0 MB/s in a 100 Mbit LAN. After I set DataSocket's winsock send and receive buffer size to 32768 (default 8192) speed notably increased to 11.4. The receive buffer doesn't matter here of course :) I uploaded this changed OverbyteIcsFtpCli.pas here: http://www.duodata.de/misc/delphi/ics/OverbyteIcsFtpCli.zip Forget this download please. I just checked in a fix, it is available with a SVN client now or included in next daily snapshot: http://wiki.overbyte.be/wiki/index.php/ICS_Download Log: - Added published property DataSocketSndBufSize and public property DataSocketRcvBufSize. Increase DataSocketSndBufSize in order to make uploads faster. Both values default to value 8192 which is the default winsock size. - Removed useless call to WSocket_getsockopt in TCustomFtpCli.DataSocketPutSessionAvailable. -- Arno Garrels -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient transfer time...
zayin wrote: Hello, Thanks Arno. The speed increase was almost double. Please let me know how it works for you, does it slow down performance when you have plenty of small files to transfer? Not sure. The files I am sending, normally just two, are all large installer files. Maybe we should make these settings a property? That would be nice. Then maybe it could be tweaked. I wonder what would happen if it was 65535. It is a property now however defaults to 8192 in order to keep backwards compatibility. After some trouble with my TortoiseSVN client changes are actually checked in now (see my previous mail). -- Arno Garrels Ciao, Mark -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFTPClient
If the file exist on the server I do not want to overwrite the file. I want to abort the transfer. Is that possible? This is not a client issue, but a server issue. usually FTP server allows overwriting existing files. Or do I need to check if the file exists before TFTPClient.Tansmit? Yes, check if the file exist. If I need to check first, what is the best method? One of the list file functions. -- francois.pie...@overbyte.be The author of the freeware multi-tier middleware MidWare The author of the freeware Internet Component Suite (ICS) http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFTPClient...
What are the dataportrangeend and dataportrangestart properties in the TFTPClient component? I searched and could not find any description. I see them mentioned in a FAQ but no description. What I need to do is allow the user to specify a local port number. If I set both of the above properties to X will that fulfill the need? As you may already know, FTP is using TWO ports: one for commands and one for data. And for data, a FTP client act as a server : unless you select passive mode, a FTP client accept data connection from the FTP server. This poses a problem with multiple simultaneous FTP transfer. This is where the port range is involved. The FTP client component will use the port range - if specified - for accepting data connection. This is mandatory when you have a security product which restrict input connections. Whenever possible, it is better to use FTP passive mode in which the FTP client remains a client for everything, that is has only outgoing connections. -- francois.pie...@overbyte.be The author of the freeware multi-tier middleware MidWare The author of the freeware Internet Component Suite (ICS) http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFTPClient...
Hello, What are the dataportrangeend and dataportrangestart properties in the... As you may already know, FTP is using TWO ports: one for commands and one for data. And for data, a FTP client act as a server : unless you select passive mode, a FTP client accept data connection from the FTP server. This poses a problem with multiple simultaneous FTP transfer. This is where the port range is involved. The FTP client component will use the port range - if specified - for accepting data connection. This is mandatory when you have a security product which restrict input connections. Whenever possible, it is better to use FTP passive mode in which the FTP client remains a client for everything, that is has only outgoing connections. Great answer. Thanks Francois. Mark -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFTPClient
Hello, Thanks for the answer. I might have put the question wrong. If the file exist on the server I do not want to overwrite the file. I want to abort the transfer. Is that possible? Or do I need to check if the file exists before TFTPClient.Tansmit? If I need to check first, what is the best method? Thanks, Mark -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFTPClient
Hello, I think the MLST command is the easiest for the purpose since it is used just for single file querying. Regards, SZ On Tue, Nov 23, 2010 at 11:16 PM, zayin za...@pdq.net wrote: Hello, Thanks for the answer. I might have put the question wrong. If the file exist on the server I do not want to overwrite the file. I want to abort the transfer. Is that possible? Or do I need to check if the file exists before TFTPClient.Tansmit? If I need to check first, what is the best method? Thanks, Mark -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFTPClient...
What is the account property in the TFTPClient component? I searched and could not find any description. Account is the property sent using the Acct method, which is an FTP command. Most FTP servers are happy with just a user name, rather than needing an account as well, but it's a very old FTP command so we have to support it. Angus -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFTPClient...
What is the account property in the TFTPClient component? I searched and could not find any description. Account is the property sent using the Acct method, which is an FTP command. Most FTP servers are happy with just a user name, rather than needing an account as well, but it's a very old FTP command so we have to support it. Some mainframe based FTP server are using the account command. -- francois.pie...@overbyte.be The author of the freeware multi-tier middleware MidWare The author of the freeware Internet Component Suite (ICS) http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFTPClient...
Hello, Thank you both for the answers. Ciao, Mark -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] (TFtpClient) Parsing list. Help, help.
Hello!
Here's routine from TurboPower iPRO component pack which I improved a bit
{ Set properties from Unix style line of directory listing }
procedure TIpFtpFileInfo.UnixStyleParse(Info : TStringList);
var
S, A : string;
i, idx : Integer;
wYear, wMonth, wDay, wHour, wMin, shit: Word;
fs: TFormatSettings;
begin
// Get defaults for file creation date/time
DecodeDate(GetTimeFn, wYear, wMonth, wDay);
DecodeTime(GetTimeFn, wHour, wMin, shit, shit);
{File Type}
S := Info[0];
case UpCase(S[1]) of
'-' : FFileType := ftFile;
'D' : FFileType := ftDir;
//'L' : FFileType := ftLink;
'L' : FFileType := ftDir;
else
FFileType := ftUnknown;
end;
{Owner Permissions}
FPermissions.Owner := [];
A := UpperCase(Copy(S, 2, 3));
if CharPos('R', A) 0 then {!!.02}
FPermissions.Owner := FPermissions.Owner + [faRead];
if CharPos('W', A) 0 then {!!.02}
FPermissions.Owner := FPermissions.Owner + [faWrite];
if CharPos('X', A) 0 then {!!.02}
FPermissions.Owner := FPermissions.Owner + [faExecute];
{Group Permissions}
FPermissions.Group := [];
A := UpperCase(Copy(S, 5, 3));
if CharPos('R', A) 0 then {!!.02}
FPermissions.Group := FPermissions.Group + [faRead];
if CharPos('W', A) 0 then {!!.02}
FPermissions.Group := FPermissions.Group + [faWrite];
if CharPos('X', A) 0 then {!!.02}
FPermissions.Group := FPermissions.Group + [faExecute];
{Other Permissions}
FPermissions.Other := [];
A := UpperCase(Copy(S, 8, 3)); {!!.02}
if CharPos('R', A) 0 then
FPermissions.Other := FPermissions.Other + [faRead];
if CharPos('W', A) 0 then {!!.02}
FPermissions.Other := FPermissions.Other + [faWrite];
if CharPos('X', A) 0 then {!!.02}
FPermissions.Other := FPermissions.Other + [faExecute];
{Search index of date property - to avoid owner/group bad data}
// Date field always starts with 3-letter month name
GetLocaleFormatSettings(LANG_ENGLISH, fs);
idx:=0;
for i := 1 to Info.Count-1 do
if AnsiIndexStr(Info[i],fs.ShortMonthNames)-1 then
begin idx:=i; Break; end;
if idx=0 then Exit;
// Get other fields relative to Date
{Owner}
if (idx-3 0) then
FOwner := Info[idx-3];
{Group}
if (idx-2 0) then
FGroup := Info[idx-2];
{Size}
if (idx-1 0) then
FSize := StrToIntDef(Info[idx-1], 0);
{Time stamp}
if (idx = Info.Count + 2) then
// parse timestamp. got it from Indy :)
// format: Feb 27 19:07 or Sep 20 2001, that is, mmm dd time|year
begin
FTimeStamp := Info[idx] + ' ' + Info[idx+1] + ' ' + Info[idx+2];
i:=AnsiIndexStr(Info[idx],fs.ShortMonthNames);
if i=0 then wMonth := i+1;
wDay := StrToIntDef(Info[idx+1], wDay);
i:=Pos(':', Info[idx+2]);
if i = 0 then // Not time info, scan year
begin
wYear := StrToIntDef(Info[idx+2], wYear);
wHour := 0;
wMin := 0;
end
else
begin // Time info, correct year, scan hour, min
if MonthOf(GetTimeFn) wMonth then
Dec(wYear);
wHour:= StrToIntDef(Copy(Info[idx+2],1,i-1),0);
wMin := StrToIntDef(Copy(Info[idx+2],i+1,Length(Info[idx+2])),0);
end;
FDateCreated := EncodeDate(wYear, wMonth, wDay) + EncodeTime(wHour, wMin,
0, 0);
end;
{File name}
FFileName := '';
for i := idx+3 to Info.Count-1 do begin
if(Info[i] = '-')then
break;
if (FFileName '') then
FFileName := FFileName + ' ';
FFilename := FFileName + Info[i];
end;
{Symbolic Link}
FLinkPath := '';
if (FFileType = ftLink) then begin
for i := 0 to Pred(Info.Count) do
if (Info[i] = '-') then
break;
if (i = (Info.Count - 2)) then
FLinkPath := Info[i + 1];
end;
end;
Moreover, I created more powerful robust ICS FTP client descendant with Unix,
VMS, DOS listing parsing. Let me know if someone's interested.
--
Anton
--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be
Re: [twsocket] (TFtpClient) Parsing list. Help, help.
Thanks for example. Thanks for Lionel Rault and Anton Sviridov. -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] (TFtpClient) Parsing list. Help, help.
And it is well. I will show the result. -rwx-- 1 user group 311521 May 29 07:33 1.jpg -rwx-- 1 user group 311521 May 29 07:38 2.jpg drwx-- 1 user group 0 Jun 03 16:13 test1 I can not read the date of file ' May 29 07:33' should be '2010-05-29 07:33:00' how do this??? use FTPLISTEINFO below liglisteFTP represent one line like '-rwx-- 1 user group 311521 May 29 07:33 1.jpg' function AJUSTELIG(chainex:String;lgmax:integer;bourrage:Byte):String; //retourne une chaine contenant exactement lgmax caractères //si chainex est supérieure à lgmax, chainex est tronquée //si chainex est inférieure on y rajoute les caractères de bourrage //bourrage=0 ou 3 : espaces derrière // 1 espaces devant // 2 zéros derrière // 3 zéros devant var lgchaine, cptcar:integer; chainetmp:string; begin If lgmax = 0 Then chainex := '' else begin lgchaine := Length(chainex); If lgchaine lgmax Then begin chainetmp:=''; for cptcar:=1 to lgmax do chainetmp:=chainetmp+chainex[cptcar]; chainex:=chainetmp; end else begin If lgchaine lgmax Then begin Case bourrage of 1:while length(chainex)lgmax do chainex:=#32+chainex; 2:while length(chainex)lgmax do chainex:=chainex+'0'; 3:while length(chainex)lgmax do chainex:='0'+chainex; else while length(chainex)lgmax do chainex:=chainex+#32; End; end; end; end; result := chainex; end; function FTPLISTEINFO(NumChamp:byte;liglisteFTP:string):string; //retourne le champ de liglisteFTP //note1 : retourne '#' si NumChamp incorrect ou champ non trouvé //note2 : si NumChamp=5 : retourne '#' si la ligne est un répertoire //NumChamp=1 PRIV //=2 IND //=3 NOM1 //=4 NOM2 //=5 TAILLE //=6 MOIS converti au format 01 à 12 : retourne toujours 2 chiffres //=7 JOUR : retourne toujours 2 chiffres //=8 HEUREMINUTE : retire le ':' et retourne toujours 4 chiffres //=9 NOMFIC var lgcar,cptcar,cptchamp:byte; champx,champret,moisx,heux,minx :string; fin,espace,heure:boolean; moisl,jol,heul,minl:longint; begin champret:='#'; lgcar:=length(liglisteFTP); if ((lgcar0)and(numchamp=5)) then begin if liglisteftp[1]='d' then lgcar:=0; end; if ((lgcar0)and (NumChamp0)and(numchamp=9)) then begin cptchamp:=1; cptcar:=0; champx:=''; fin:=false; espace:=false; repeat inc(cptcar); case liglisteFTP[cptcar] of #32 :if cptchamp9 then begin if espace=false then begin if cptchamp=NumChamp then fin:=true else begin cptchamp:=cptchamp+1; champx:=''; end; end; espace:=true; end else begin //le nom peut comporter des espaces champx:=champx+#32; end; else begin champx:=champx+liglisteFTP[cptcar]; espace:=false; end; end; if cptcar=lgcar then fin:=true; until (fin); if champx'' then begin if cptchamp=NumChamp then begin case numchamp of 6:begin moisl:=0; moisx:=MAJUS(champx);//passer en majuscules if moisx='JAN' then moisl:=1 else if moisx='FEB' then moisl:=2 else if moisx='MAR' then moisl:=3 else if moisx='APR' then moisl:=4 else if moisx='MAY' then moisl:=5 else if moisx='JUN' then moisl:=6 else if moisx='JUL' then moisl:=7 else if moisx='AUG' then moisl:=8 else if moisx='SEP' then moisl:=9 else if moisx='OCT' then moisl:=10 else if moisx='NOV' then moisl:=11 else if moisx='DEC' then moisl:=12; if moisl0 then champret:=AJUSTELIG(N(moisl),2,3); end; 7:begin jol:=T(champx); if ((jol0) and (jol=31)) then champret:=AJUSTELIG(N(jol),2,3); end; 8:begin heux:=''; minx:=''; heure:=true; for cptcar:=1 to length(champx) do begin if champx[cptcar]=':' then heure:=false else begin if heure=true then
Re: [twsocket] TFTPClient in Free pascal
I am trying to use TFTPClient in FreePascal. I have used twSocket successfully but the FTPClient will not compile because when trying to link the ICSZLibObj it comes up with Error: IllegalCOFF Magic while reading C:/xxx/adler32.obj. (every external obj comes up with that error). I have trying a lot of googling with no real answers. It is probably enough to find a ZLib library adapted for FreePascal. -- francois.pie...@overbyte.be The author of the freeware multi-tier middleware MidWare The author of the freeware Internet Component Suite (ICS) http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient, DataSocket.OnSessionClosed event is not always fired
I've reproduced this problem yesterday and I did it right now again (many times). start OverbyteIcsFtpServ.exe from your archive. start xferdemo2.exe - activate options: No Feta, No Mode Z, No MD5/CRC Check, No TMP File for UP/DOWN, all diagnostics level activated - click Check Upload - the problem occurs after first LIST - CPU utilisation = 99% LOGs: Server LOG FtpServer (c) 1998-2008 F. Piette V1.10 Using: TWSocket (c) 1996-2007 Francois Piette V6.08 TFtpServer (c) 1998-2008 F. Piette V1.57 Winsock: Version 2.2 WinSock 2.0 Running ! Server started ! 127.0.0.1=(Not Logged On) connected 127.0.0.1=(Not Logged On) USER anonymous 127.0.0.1=anonymous [0ms] 331 Password required for anonymous. 127.0.0.1=anonymous PASS test@ ! 127.0.0.1=anonymous is authenticated ! 127.0.0.1=anonymous Home Directory: c:\temp\ 127.0.0.1=anonymous [0ms] 230 User anonymous logged in. 127.0.0.1=anonymous PWD 127.0.0.1=anonymous [0ms] 257 /c:/temp is current directory. 127.0.0.1=anonymous TYPE I 127.0.0.1=anonymous [0ms] 200 Type set to I. 127.0.0.1=anonymous SYST 127.0.0.1=anonymous [0ms] 215 UNIX Type: L8 Internet Component Suite 127.0.0.1=anonymous CWD /c:/temp/ 127.0.0.1=anonymous [0ms] 250 CWD command successful. /c:/temp is current directory. 127.0.0.1=anonymous PWD 127.0.0.1=anonymous [0ms] 257 /c:/temp is current directory. 127.0.0.1=anonymous PASV 127.0.0.1=anonymous [0ms] 227 Entering Passive Mode (127,0,0,1,82,9). 127.0.0.1=anonymous LIST ! 127.0.0.1=anonymous Directory Listing Path: c:\temp\*.* drw-rw-rw- 1 ftp ftp0 Mar 09 15:19 . drw-rw-rw- 1 ftp ftp0 Mar 09 15:19 .. 127.0.0.1=anonymous [0ms] 150 Opening data connection for directory list. ! 127.0.0.1=anonymous Directory 115bytes sent in 120 seconds (0bytes/sec) 127.0.0.1=anonymous [120094ms] 501 Cannot RETR. Error - Connection aborted (#10053) ! 127.0.0.1=anonymous Data session closed. Error #10053 127.0.0.1=anonymous QUIT 127.0.0.1=anonymous [0ms] 221 Goodbye. ! 127.0.0.1=anonymous disconnected after 120 secs, total recv 85, total xmit 548 -- Client LOG Source Directory: D:\FTP\TestDirs Connecting to FTP Server: Connect/Logon to FTP Server: localhost:21 15:25:05:937 TWSocket will connect to 127.0.0.1:21 220-Welcome to my Server 220- 220 ICS FTP Server ready. FTP Session Connected to 127.0.0.1 USER anonymous 15:25:05:937 00A88B2C PutDataInSendBuffer 264 len 16 [1] 15:25:05:937 00A88B2C TryToSend 264 15:25:05:937 00A88B2C TryToSend 264 331 Password required for anonymous. PASS 15:25:05:937 00A88B2C PutDataInSendBuffer 264 len 12 [2] 15:25:05:937 00A88B2C TryToSend 264 15:25:05:937 00A88B2C TryToSend 264 230 User anonymous logged in. 15:25:05:953 00A88B2C TryToSend 264 230 User anonymous logged in. PWD 15:25:05:953 00A88B2C PutDataInSendBuffer 264 len 5 [3] 15:25:05:953 00A88B2C TryToSend 264 257 /c:/temp is current directory. 15:25:05:953 00A88B2C TryToSend 264 Current Directory: /c:/temp/ Succesfully logged onto FTP Server: anonymous TYPE I 15:25:05:953 00A88B2C PutDataInSendBuffer 264 len 8 [4] 15:25:05:953 00A88B2C TryToSend 264 200 Type set to I. 15:25:05:953 00A88B2C TryToSend 264 Succesfully logged onto FTP Server: anonymous SYST 15:25:05:953 00A88B2C PutDataInSendBuffer 264 len 6 [5] 15:25:05:953 00A88B2C TryToSend 264 215 UNIX Type: L8 Internet Component Suite 15:25:05:953 00A88B2C TryToSend 264 UNIX Type: L8 Internet Component Suite Checking files already on FTP Server CWD /c:/temp/ 15:25:05:968 00A88B2C PutDataInSendBuffer 264 len 15 [6] 15:25:05:968 00A88B2C TryToSend 264 250 CWD command successful. /c:/temp is current directory. 15:25:05:968 00A88B2C TryToSend 264 PWD 15:25:05:968 00A88B2C PutDataInSendBuffer 264 len 5 [7] 15:25:05:968 00A88B2C TryToSend 264 257 /c:/temp is current directory. 15:25:05:968 00A88B2C TryToSend 264 PASV 15:25:06:171 00A88B2C PutDataInSendBuffer 264 len 6 [8] 15:25:06:171 00A88B2C TryToSend 264 227 Entering Passive Mode (127,0,0,1,82,9). 15:25:06:171 ! Data Socket Connect 15:25:06:171 TWSocket will connect to 127.0.0.1:21001 LIST 15:25:06:171 00A88B2C PutDataInSendBuffer 264 len 6 [9] 15:25:06:171 00A88B2C TryToSend 264 15:25:06:171 00A88B2C TryToSend 264 150 Opening data connection for directory list. 15:25:06:171 00A88B2C TryToSend 264 15:25:06:171 ! Data Session Connected (Get) 15:25:06:171 00A89480 TryToSend 296 501 Cannot RETR. Error - Connection aborted (#10053) 15:27:06:265 00A89480 *CloseCalled 296 15:27:06:265 00A89480 TCustomWSocket.Shutdown 1 296 15:27:06:265 ! Data Session closed ! RETR/LIST/NLST Failed Directory Listing Abandoned, Failed Response Request Failed: 501 Cannot RETR. Error - Connection aborted (#10053) Failed to List Files on FTP Server Logging Off from FTP Server QUIT 15:27:06:265 00A88B2C PutDataInSendBuffer 264 len 6 [10] 15:27:06:265 00A88B2C TryToSend 264 221 Goodbye. 15:27:06:265 00A88B2C *CloseCalled 264 15:27:06:265
Re: [twsocket] TFtpClient, DataSocket.OnSessionClosed event is not always fired
I've reproduced this problem yesterday and I did it right now again (many times). Sorry, works fine on my PC using the same binaries, repeatedly. XP SP2 with Sophos anti-virus but no firewall software (I use a proper hardware firewall, Sonicwall TZ190). Connect/Logon to FTP Server: 127.0.0.1:21 220-Welcome to my Server 220- 220 ICS FTP Server ready. FTP Session Connected to 127.0.0.1 USER angusadmin 331 Password required for angusadmin. PASS 230 User angusadmin logged in. 230 User angusadmin logged in. PWD 257 /d:/ceyedxfer is current directory. Current Directory: /d:/ceyedxfer/test/ Succesfully logged onto FTP Server: angusadmin TYPE I 200 Type set to I. Locating files to Download CWD /d:/ceyedxfer/test/ 250 CWD command successful. /d:/ceyedxfer/test is current directory. PWD 257 /d:/ceyedxfer/test is current directory. PORT 127,0,0,1,4,174 200 Port command successful. LIST 150 Opening data connection for directory list. 226 File sent ok ! 1.88Kbytes received/sent in 0 milliseconds Server Returned 27 Line(s), Bytes 1,922 for Directory: /d:/ceyedxfer/test/ CWD /d:/ceyedxfer/test/rassource/ 250 CWD command successful. /d:/ceyedxfer/test/rassource is current directory. PWD 257 /d:/ceyedxfer/test/rassource is current directory. PORT 127,0,0,1,4,175 200 Port command successful. LIST 150 Opening data connection for directory list. 226 File sent ok ! 1.24Kbytes received/sent in 0 milliseconds Server Returned 19 Line(s), Bytes 1,271 for Directory: /d:/ceyedxfer/test/rassource/ Angus -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient, DataSocket.OnSessionClosed event is not always fired
What can I say. Great. But don't you think we just can't say to our users sorry, works fine...? You have now detailed Logs from YOUR own application and don't want at least to try to reproduce this? Reproduce is the operative word. I can not, and this is not something that I recall being reported over the past 10 years that this FTP code has been widely used. I have this FTP code (the latest V6, server and client) running on hundreds of clients on about 20 different LANs, using wireless as it happens but still high speed, and I don't see these errors. The only time I get data errors is when using FTP through firewalls, specifically using non-standard ports (2100) with which the firewall is unaware. Why are you passive mode? That is normally only needed with firewalls. As Arno has said, poor firewall software regularly causes problems with FTP data connections, and can usually only be fully disabled by re-installing windows... Angus -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient, DataSocket.OnSessionClosed event is not always fired
Thank you for trying that! Have you tried all in passive mode? I've WinXP Pro (not virtual) with Kaspersky IS 7.0.0.125 (actual version). As I said with 7x it happens not always, but this way I can reproduce the problem in 99%: on the server side I create directory structur with about 100 subdirs - then in xferdemo2 I click on list host files (MultiFTP tab). The problem usually occurs. 09.03.08, 20:34, Arno Garrels [EMAIL PROTECTED]: asvetov wrote: I've reproduced this problem yesterday and I did it right now again (many times). start OverbyteIcsFtpServ.exe from your archive. start xferdemo2.exe - activate options: No Feta, No Mode Z, No MD5/CRC Check, No TMP File for UP/DOWN, all diagnostics level activated - click Check Upload - the problem occurs after first LIST - CPU utilisation = 99% Sorry, I cannot reproduce the problem. I even installed current Kaspersky Internet Security 7 Trial on a clean virtual machine. Plenty of downloads w/o any error from both ICS and FileZilla server. -- Arno Garrels [TeamICS] http://www.overbyte.be/eng/overbyte/teamics.html -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient, DataSocket.OnSessionClosed event is not always fired
asvetov wrote: Have you tried all in passive mode? Yes. I've WinXP Pro (not virtual) with Kaspersky IS 7.0.0.125 (actual version). W2K SP4, IS 7.0.1.325 downloaded today from their German website. As I said with 7x it happens not always, but this way I can reproduce the problem in 99%: on the server side I create directory structur with about 100 subdirs - then in xferdemo2 I click on list host files (MultiFTP tab). The problem usually occurs. I listed entire volume C: which has not the depth of 100 subdirs. -- Arno Garrels [TeamICS] http://www.overbyte.be/eng/overbyte/teamics.html 09.03.08, 20:34, Arno Garrels [EMAIL PROTECTED]: asvetov wrote: I've reproduced this problem yesterday and I did it right now again (many times). start OverbyteIcsFtpServ.exe from your archive. start xferdemo2.exe - activate options: No Feta, No Mode Z, No MD5/CRC Check, No TMP File for UP/DOWN, all diagnostics level activated - click Check Upload - the problem occurs after first LIST - CPU utilisation = 99% Sorry, I cannot reproduce the problem. I even installed current Kaspersky Internet Security 7 Trial on a clean virtual machine. Plenty of downloads w/o any error from both ICS and FileZilla server. -- Arno Garrels [TeamICS] http://www.overbyte.be/eng/overbyte/teamics.html -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient, DataSocket.OnSessionClosed event is not always fired
Just updated to 7.0.1.325 The same problems. But I have noticed important thing: the problem not occurs if PC is NOT connected to the LAN/Router (really unplugged stand alone). If PC is connected to the LAN/Router (no matter if client and server on the same machine) the problems occurs. 09.03.08, 21:17, Arno Garrels [EMAIL PROTECTED]: asvetov wrote: Have you tried all in passive mode? Yes. I've WinXP Pro (not virtual) with Kaspersky IS 7.0.0.125 (actual version). W2K SP4, IS 7.0.1.325 downloaded today from their German website. As I said with 7x it happens not always, but this way I can reproduce the problem in 99%: on the server side I create directory structur with about 100 subdirs - then in xferdemo2 I click on list host files (MultiFTP tab). The problem usually occurs. I listed entire volume C: which has not the depth of 100 subdirs. -- Arno Garrels [TeamICS] http://www.overbyte.be/eng/overbyte/teamics.html 09.03.08, 20:34, Arno Garrels [EMAIL PROTECTED]: asvetov wrote: I've reproduced this problem yesterday and I did it right now again (many times). start OverbyteIcsFtpServ.exe from your archive. start xferdemo2.exe - activate options: No Feta, No Mode Z, No MD5/CRC Check, No TMP File for UP/DOWN, all diagnostics level activated - click Check Upload - the problem occurs after first LIST - CPU utilisation = 99% Sorry, I cannot reproduce the problem. I even installed current Kaspersky Internet Security 7 Trial on a clean virtual machine. Plenty of downloads w/o any error from both ICS and FileZilla server. -- Arno Garrels [TeamICS] http://www.overbyte.be/eng/overbyte/teamics.html -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be -- Яндекс.Фотки: Когда под рукой только мобильный http://mobile.yandex.ru/fotki/ -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient, DataSocket.OnSessionClosed event is not always fired
asvetov wrote: Just updated to 7.0.1.325 The same problems. But I have noticed important thing: the problem not occurs if PC is NOT connected to the LAN/Router (really unplugged stand alone). If PC is connected to the LAN/Router (no matter if client and server on the same machine) the problems occurs. My first user impression of Kaspersky: After installation Windows doesn't shutdown properly any more, note this was a clean install !! The following handles in user profile hive W2KSP4\Administrator (S-1-5-21-583907252-287218729-839522115-500) have been remapped because they were preventing the profile from unloading successfully: avp.exe (472) HKCU (0x3d8) It's a huge suite, with probably plenty of huge bugs. Forget it, instead get ClamWin, a reliable hardware router and don't open e-mail attachments g -- Arno Garrels 09.03.08, 21:17, Arno Garrels [EMAIL PROTECTED]: asvetov wrote: Have you tried all in passive mode? Yes. I've WinXP Pro (not virtual) with Kaspersky IS 7.0.0.125 (actual version). W2K SP4, IS 7.0.1.325 downloaded today from their German website. As I said with 7x it happens not always, but this way I can reproduce the problem in 99%: on the server side I create directory structur with about 100 subdirs - then in xferdemo2 I click on list host files (MultiFTP tab). The problem usually occurs. I listed entire volume C: which has not the depth of 100 subdirs. -- Arno Garrels [TeamICS] http://www.overbyte.be/eng/overbyte/teamics.html 09.03.08, 20:34, Arno Garrels [EMAIL PROTECTED]: asvetov wrote: I've reproduced this problem yesterday and I did it right now again (many times). start OverbyteIcsFtpServ.exe from your archive. start xferdemo2.exe - activate options: No Feta, No Mode Z, No MD5/CRC Check, No TMP File for UP/DOWN, all diagnostics level activated - click Check Upload - the problem occurs after first LIST - CPU utilisation = 99% Sorry, I cannot reproduce the problem. I even installed current Kaspersky Internet Security 7 Trial on a clean virtual machine. Plenty of downloads w/o any error from both ICS and FileZilla server. -- Arno Garrels [TeamICS] http://www.overbyte.be/eng/overbyte/teamics.html -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be -- Яндекс.Фотки: Когда под рукой только мобильный http://mobile.yandex.ru/fotki/ -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient, DataSocket.OnSessionClosed event is not always fired
I don't know why, but the problem is suddenly gone - after some tests it's not occurs anymore with 7.0.1.325 (but still with 6.0.2.621 on other PC) and as I can see even ftp client/server works speedier as before. Many thanks to everybody who have tried to help me and good start into the new week! 09.03.08, 22:18, Arno Garrels [EMAIL PROTECTED]: asvetov wrote: Just updated to 7.0.1.325 The same problems. But I have noticed important thing: the problem not occurs if PC is NOT connected to the LAN/Router (really unplugged stand alone). If PC is connected to the LAN/Router (no matter if client and server on the same machine) the problems occurs. My first user impression of Kaspersky: After installation Windows doesn't shutdown properly any more, note this was a clean install !! The following handles in user profile hive W2KSP4\Administrator (S-1-5-21-583907252-287218729-839522115-500) have been remapped because they were preventing the profile from unloading successfully: avp.exe (472) HKCU (0x3d8) It's a huge suite, with probably plenty of huge bugs. Forget it, instead get ClamWin, a reliable hardware router and don't open e-mail attachments g -- Arno Garrels 09.03.08, 21:17, Arno Garrels [EMAIL PROTECTED]: asvetov wrote: Have you tried all in passive mode? Yes. I've WinXP Pro (not virtual) with Kaspersky IS 7.0.0.125 (actual version). W2K SP4, IS 7.0.1.325 downloaded today from their German website. As I said with 7x it happens not always, but this way I can reproduce the problem in 99%: on the server side I create directory structur with about 100 subdirs - then in xferdemo2 I click on list host files (MultiFTP tab). The problem usually occurs. I listed entire volume C: which has not the depth of 100 subdirs. -- Arno Garrels [TeamICS] http://www.overbyte.be/eng/overbyte/teamics.html 09.03.08, 20:34, Arno Garrels [EMAIL PROTECTED]: asvetov wrote: I've reproduced this problem yesterday and I did it right now again (many times). start OverbyteIcsFtpServ.exe from your archive. start xferdemo2.exe - activate options: No Feta, No Mode Z, No MD5/CRC Check, No TMP File for UP/DOWN, all diagnostics level activated - click Check Upload - the problem occurs after first LIST - CPU utilisation = 99% Sorry, I cannot reproduce the problem. I even installed current Kaspersky Internet Security 7 Trial on a clean virtual machine. Plenty of downloads w/o any error from both ICS and FileZilla server. -- Arno Garrels [TeamICS] http://www.overbyte.be/eng/overbyte/teamics.html -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be -- Яндекс.Фотки: Когда под рукой только мобильный http://mobile.yandex.ru/fotki/ -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be -- Яндекс.Почта. Поищите спам где-нибудь еще http://mail.yandex.ru/nospam -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient, DataSocket.OnSessionClosed event is not always fired.
Sounds more like somebody is blocking/intercepting the call to Connect? BTW: I do not use any real time AV scanners or other background security tools, it's my experience that they make more trouble than they help. Same applies to personal firewalls. They all hook the API function calls as they like. If they do not hook correctly the hooked application will fail or even crash. And especially Kaspersky is known to do ugly things in their drivers (as I read in a nice analysis from some driver-guru on the internet a couple of months ago). Unfortunately it's always the poor application vendor who is blamed :( -- Arno Garrels asvetov wrote: Hello all! I have sporadic problems with TFtpClient where OnSessionClosed event of DataSocket not always fired. Especially if FTP Server is on the LAN, or on the same machine as FTP Client and Firewall/Antivirus Software (in my case Kaspersky Internet Security V6) on the client machine is installed. Mostly the problem occurs with synchronous actions and when ftpWaitUsingSleep is activated. But also (however seldom) without ftpWaitUsingSleep option and even with completely Asynchronous logic. Important: if I deactivate my AV Software, all runs without any problems. BUT I don't think Kaspersky is responsible for this problems, because other Clients (i.e. FlashFXP or Filezilla or ftp.exe) works just fine. I can reproduce this problem with all ICS Versions (5 and 6). This is what I do Compile and Start OverbyteIcsFtpServ.exe Compile OverbyteIcsFtpTst.exe (add ftpWaitUsingSleep option to FTP Client options) - start - activate options: Passive mode, Synchronous - click on buttons: connect (we connect to local host) - pwd - dir. Finito. We wait until timeout occurred. Server Protocol FtpServer (c) 1998-2007 F. Piette V1.09 Using: TWSocket (c) 1996-2007 Francois Piette V6.08 TFtpServer (c) 1998-2007 F. Piette V1.53 Winsock: Version 2.2 WinSock 2.0 Running ! Server started ! 127.0.0.1 connected 127.0.0.1 USER anonymous 127.0.0.1 331 Password required for anonymous. 127.0.0.1 PASS [EMAIL PROTECTED] ! 127.0.0.1 User 'anonymous' is authenticated 127.0.0.1 230 User anonymous logged in. 127.0.0.1 PWD 127.0.0.1 257 /C:/TEMP is current directory. 127.0.0.1 PASV 127.0.0.1 227 Entering Passive Mode (127,0,0,1,11,140). 127.0.0.1 LIST 127.0.0.1 150 Opening data connection for directory list. 127.0.0.1 501 Cannot RETR. Error - Socket is not connected (#10057) ! 127.0.0.1 Data session closed. Error #10057 ! 127.0.0.1 disconnected -- Client Protocol Winsock version 2.2 WinSock 2.0 Running Executing Requested Command 220-Welcome to my Server 220- 220 ICS FTP Server ready. Session Connected, error = 0 USER anonymous 331 Password required for anonymous. PASS [EMAIL PROTECTED] 230 User anonymous logged in. Request 5 Done. StatusCode = 230 LastResponse was : '230 User anonymous logged in.' No error Command Success Executing Requested Command PWD 257 /C:/TEMP is current directory. Request 32 Done. StatusCode = 257 LastResponse was : '257 /C:/TEMP is current directory.' No error Directory is /C:/TEMP Command Success Executing Requested Command PASV 227 Entering Passive Mode (127,0,0,1,11,140). LIST 150 Opening data connection for directory list. Session Closed, error = 0 Command Failure Request 7 Done. StatusCode = 426 LastResponse was : '150 Opening data connection for directory list.' Error = 426 (426 Timeout) I use: Windows XP SP2 (all patches), Delphi 2005 and ICS V5, Kaspersky Internet Security V6 (Please notice: Firewall is deactivated! Only Mail Antivirus is activated) Have somebody else confronted with such problems? Can anybody help? - Thanks for any help best Regards, A.Svetov -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient, DataSocket.OnSessionClosed event is not always fired.
As I already said, other Clients work fine. And yes, I can reproduce all with latest V6 - Server Protocol FtpServer (c) 1998-2008 F. Piette V1.10 Using: TWSocket (c) 1996-2007 Francois Piette V6.08 TFtpServer (c) 1998-2008 F. Piette V1.57 Winsock: Version 2.2 WinSock 2.0 Running ! Server started ! 127.0.0.1=(Not Logged On) connected 127.0.0.1=(Not Logged On) USER anonymous 127.0.0.1=anonymous [0ms] 331 Password required for anonymous. 127.0.0.1=anonymous PASS [EMAIL PROTECTED] ! 127.0.0.1=anonymous is authenticated ! 127.0.0.1=anonymous Home Directory: c:\temp\ 127.0.0.1=anonymous [16ms] 230 User anonymous logged in. 127.0.0.1=anonymous PWD 127.0.0.1=anonymous [0ms] 257 /c:/temp is current directory. 127.0.0.1=anonymous PASV 127.0.0.1=anonymous [0ms] 227 Entering Passive Mode (127,0,0,1,82,9). 127.0.0.1=anonymous LIST ! 127.0.0.1=anonymous Directory Listing Path: c:\temp\*.* drw-rw-rw- 1 ftp ftp0 Mar 08 14:28 . drw-rw-rw- 1 ftp ftp0 Mar 08 14:28 .. drw-rw-rw- 1 ftp ftp0 Mar 08 14:28 Dir1 drw-rw-rw- 1 ftp ftp0 Mar 08 14:29 Dir2 127.0.0.1=anonymous [0ms] 150 Opening data connection for directory list. ! 127.0.0.1=anonymous Directory 253bytes sent in 15 seconds (16bytes/sec) 127.0.0.1=anonymous [15031ms] 501 Cannot RETR. Error - Socket is not connected (#10057) ! 127.0.0.1=anonymous Data session closed. Error #10057 ! 127.0.0.1=anonymous disconnected after 17 secs, total recv 66, total xmit 454 - Client Protocol Winsock version 2.2 WinSock 2.0 Running Executing Requested Command 220-Welcome to my Server 220- 220 ICS FTP Server ready. Session Connected, error = 0 USER anonymous 331 Password required for anonymous. PASS [EMAIL PROTECTED] 230 User anonymous logged in. Request 5 Done. StatusCode = 230 LastResponse was : '230 User anonymous logged in.' No error Command Success Executing Requested Command PWD 257 /c:/temp is current directory. Request 32 Done. StatusCode = 257 LastResponse was : '257 /c:/temp is current directory.' No error Directory is /c:/temp Command Success Executing Requested Command PASV 227 Entering Passive Mode (127,0,0,1,82,9). LIST 150 Opening data connection for directory list. Session Closed, error = 0 Command Failure Request 7 Done. StatusCode = 426 LastResponse was : '150 Opening data connection for directory list.' Error = 426 (426 Timeout) 08.03.08, 20:52, Arno Garrels [EMAIL PROTECTED]: Sounds more like somebody is blocking/intercepting the call to Connect? BTW: I do not use any real time AV scanners or other background security tools, it's my experience that they make more trouble than they help. Same applies to personal firewalls. They all hook the API function calls as they like. If they do not hook correctly the hooked application will fail or even crash. And especially Kaspersky is known to do ugly things in their drivers (as I read in a nice analysis from some driver-guru on the internet a couple of months ago). Unfortunately it's always the poor application vendor who is blamed :( -- Arno Garrels -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient, DataSocket.OnSessionClosed event is not always fired.
once again: firewall is completely deaktivated. Background file scanner too. But seems to be, that some Kaspersky componnents still active and only when I complete deactivate protection works all fine. BTW: As for Kaspersky, I really like it and did my BEST experiense with it. 08.03.08, 20:52, Arno Garrels [EMAIL PROTECTED]: Sounds more like somebody is blocking/intercepting the call to Connect? BTW: I do not use any real time AV scanners or other background security tools, it's my experience that they make more trouble than they help. Same applies to personal firewalls. They all hook the API function calls as they like. If they do not hook correctly the hooked application will fail or even crash. And especially Kaspersky is known to do ugly things in their drivers (as I read in a nice analysis from some driver-guru on the internet a couple of months ago). Unfortunately it's always the poor application vendor who is blamed :( -- Arno Garrels -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient, DataSocket.OnSessionClosed event is not always fired.
Hello asvetov, Firewalls and Anti-virus are NEVER 100% disabled because they load low level drivers on system boot. So the only way for you to be sure that firewall is not involved in your problem is to uninstall it or you may reboot Windows in safe mode and temporary rename kl1.sys klf.sys klim5.sys so Kaspersky will not run at all next boot. regards. a once again: firewall is completely deaktivated. Background file scanner too. But seems to be, that some Kaspersky componnents still active and only when I complete deactivate protection works all a fine. a BTW: As for Kaspersky, I really like it and did my BEST experiense with it. a 08.03.08, 20:52, Arno Garrels [EMAIL PROTECTED]: Sounds more like somebody is blocking/intercepting the call to Connect? BTW: I do not use any real time AV scanners or other background security tools, it's my experience that they make more trouble than they help. Same applies to personal firewalls. They all hook the API function calls as they like. If they do not hook correctly the hooked application will fail or even crash. And especially Kaspersky is known to do ugly things in their drivers (as I read in a nice analysis from some driver-guru on the internet a couple of months ago). Unfortunately it's always the poor application vendor who is blamed :( -- Arno Garrels -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient, DataSocket.OnSessionClosed event is not always fired
once again: firewall is completely deaktivated. Background file scanner too. But seems to be, that some Kaspersky componnents still active and only when I complete deactivate protection works all fine. On how many different PCs can you reproduce the fault with the latest V6 FTP versions? A fault on a single PC is rarely worth investigating, it's nearly always a corrupt PC. Angus -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient retrieve file size for progress bar
Hello, Some old FTP servers do not support the SIZE command as it is not mandatory in RFC959. Yuo will need to use a parser and parse LS response. Regards, SZ - Original Message - From: Michael Fritz [EMAIL PROTECTED] To: twsocket@elists.org Sent: Thursday, February 15, 2007 12:20 PM Subject: [twsocket] TFtpClient retrieve file size for progress bar Hi, I'm using the BasFtp1 demo of ICS to test downloading a file from an FTP server. I changed this demo (at least a tried to) to retrieve the file size before downloading to feed a progress bar. I've changed the RequestDone event the following way: [..] ftpTypeSetAsync: begin FtpClient1.HostFileName := FFileName; FtpClient1.LocalFileName := FLocalFileName; FtpClient1.SizeAsync; here // FtpClient1.GetAsync; here end; ftpSizeAsync, ftpFileSizeAsync : new begin ProgressBar1.Max := FtpClient1.SizeResult; FtpClient1.GetAsync; end; ftpGetAsync: begin FSuccess := (FtpClient1.StatusCode = 226); FtpClient1.QuitAsync; end; When SizeAsync is executed the status/error code I get is 550, access denied. I assume that authentication was correct, since all previous status messages told me so. So what's wrong here? Or better how would you determine the file size before downloading? -- cu, Michael -- Feel free - 5 GB Mailbox, 50 FreeSMS/Monat ... Jetzt GMX ProMail testen: www.gmx.net/de/go/mailfooter/promail-out -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient retrieve file size for progress bar
Hi, I don't think so 'cause Internet Explorer shows the size correctly *and* the more advanced demo FtpTst1 returns the size correctly. So I'm clueless at the moment. cu, Michael Original-Nachricht Datum: Thu, 15 Feb 2007 12:31:59 +0200 Von: Fastream Technologies [EMAIL PROTECTED] An: ICS support mailing twsocket@elists.org CC: Betreff: Re: [twsocket] TFtpClient retrieve file size for progress bar Hello, Some old FTP servers do not support the SIZE command as it is not mandatory in RFC959. Yuo will need to use a parser and parse LS response. Regards, SZ - Original Message - From: Michael Fritz [EMAIL PROTECTED] To: twsocket@elists.org Sent: Thursday, February 15, 2007 12:20 PM Subject: [twsocket] TFtpClient retrieve file size for progress bar Hi, I'm using the BasFtp1 demo of ICS to test downloading a file from an FTP server. I changed this demo (at least a tried to) to retrieve the file size before downloading to feed a progress bar. I've changed the RequestDone event the following way: [..] ftpTypeSetAsync: begin FtpClient1.HostFileName := FFileName; FtpClient1.LocalFileName := FLocalFileName; FtpClient1.SizeAsync; here // FtpClient1.GetAsync; here end; ftpSizeAsync, ftpFileSizeAsync : new begin ProgressBar1.Max := FtpClient1.SizeResult; FtpClient1.GetAsync; end; ftpGetAsync: begin FSuccess := (FtpClient1.StatusCode = 226); FtpClient1.QuitAsync; end; When SizeAsync is executed the status/error code I get is 550, access denied. I assume that authentication was correct, since all previous status messages told me so. So what's wrong here? Or better how would you determine the file size before downloading? -- cu, Michael -- Feel free - 5 GB Mailbox, 50 FreeSMS/Monat ... Jetzt GMX ProMail testen: www.gmx.net/de/go/mailfooter/promail-out -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be -- Feel free - 10 GB Mailbox, 100 FreeSMS/Monat ... Jetzt GMX TopMail testen: www.gmx.net/de/go/mailfooter/topmail-out -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient lrecl and recfm
Use Quote() to send a literal command to the server. Contribute to the SSL Effort. Visit http://www.overbyte.be/eng/ssl.html -- [EMAIL PROTECTED] Author of ICS (Internet Component Suite, freeware) Author of MidWare (Multi-tier framework, freeware) http://www.overbyte.be - Original Message - From: Antonio Marcos Pereira [EMAIL PROTECTED] To: twsocket@elists.org Sent: Tuesday, August 22, 2006 3:08 PM Subject: [twsocket] TFtpClient lrecl and recfm Hello, I'm changing a program that it's use the TFtpClient to put and get files in a Mainframe. For necessity of the customer, i have to informe 2 params (LPARAM and RECFM) by SITE command to the server. After several attempts and researches to discover how can i send this command by TFtpClient i didn't have success. Someone can help me? Some information or direction are welcome. Thanks. Antonio ps.: Excuse my english. -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient lrecl and recfm
Ok! Thank you very much! Antonio On 8/22/06, Francois Piette [EMAIL PROTECTED] wrote: Use Quote() to send a literal command to the server. Contribute to the SSL Effort. Visit http://www.overbyte.be/eng/ssl.html -- [EMAIL PROTECTED] Author of ICS (Internet Component Suite, freeware) Author of MidWare (Multi-tier framework, freeware) http://www.overbyte.be - Original Message - From: Antonio Marcos Pereira [EMAIL PROTECTED] To: twsocket@elists.org Sent: Tuesday, August 22, 2006 3:08 PM Subject: [twsocket] TFtpClient lrecl and recfm Hello, I'm changing a program that it's use the TFtpClient to put and get files in a Mainframe. For necessity of the customer, i have to informe 2 params (LPARAM and RECFM) by SITE command to the server. After several attempts and researches to discover how can i send this command by TFtpClient i didn't have success. Someone can help me? Some information or direction are welcome. Thanks. Antonio ps.: Excuse my english. -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFTPClient- the command ls
[EMAIL PROTECTED] wrote: The command ls gives me a list with folders and files, but how can I get the files or the folders only ? Please find attached ZIP, FtpCommon.pas (9 KB, hopefully not deleted by the listserver) helps a lot when you need to parse the returned file listing. I HAVEN'T WROTE THAT STUFF, and unfortunately I can't remember who was the author. If Angus listens, please post the link, or better the unit including your fixes. Arno Garrels -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient Abort
1) Is there any special reason, why in procedure TCustomFtpCli.AbortAsync WSockets are Closed instead of Aborted? No special reason. If not, I would like to change calls to WSocket.Abort. Looks good. 2) Also in this proc. DestroyLocalStream is called twice, can I delete one of them? OK. -- Contribute to the SSL Effort. Visit http://www.overbyte.be/eng/ssl.html -- [EMAIL PROTECTED] http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient - Quit never returns when not connected!
Hallo, I've a problem using TftpClient. Is it related to the subject ? I guess no ! You should have opened a new thread with a proper subject. I can't obtain a connection, if on a Lan there is a squid proxy server. Why?? I can't tell you anything if you don't give more informations about the failed connection. Please repost a message (do not reply to this one, create a new message) with subject FTP client, no connection with squid proxy and explain the more exactly possible what you do and what error you have. It is also useful to do your testing using FtpTst demo program so that we are sure it is not your own code which has a problem. -- Contribute to the SSL Effort. Visit http://www.overbyte.be/eng/ssl.html -- [EMAIL PROTECTED] http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient - Quit never returns when not connected!
Not connected, quit = error code 200 (means OK) Not connected, any other command = error code 503 or exception. -- [EMAIL PROTECTED] http://www.overbyte.be - Original Message - From: Arno Garrels [EMAIL PROTECTED] To: ICS support mailing twsocket@elists.org Sent: Saturday, January 14, 2006 8:02 PM Subject: Re: [twsocket] TFtpClient - Quit never returns when not connected! Francois PIETTE wrote: FLastResponse := '200 OK not connected'; A 200 answer mean OK, let's continue. Probably the message should better be: 503 Bad sequence of commands. Not connected. As far as I understand, Quit should _not return any error when not connected, Yes, it looks reasonable for Quit command only. That's obviously why no longer an exception is triggered (which has been triggered in older versions). What I mean is, either an exception has to be triggered when not connected (I can pretty well live with that) or the command must return with an OK. Current handling is buggy! You change affect all commands. At test must be done to select the most appropriate error message given the command. I haven't the overview of the most appropriate error code. There should be an easy solution (raising an exception was easy!). wasn't it handled in other classes the same? I don't understand this. Sorry. As far as I recall in TSmtpCli you may call QUIT w/o raising an exception when not connected as well and it returns with a OK-result. -- [EMAIL PROTECTED] http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient and directory listing
However, does anyone have a small sample of code to retrieve a directory, and - for example - place the contents into a listbox? You need to parse the directory listing returned, there are two common formats and several more less common. There are some functions at http://www.smatters.com/ics/ that will parse such directories into string lists, although there are some bugs. Or you can use my high level FTP TMagFtp component, which includes all the directory handling stuff and will download files only after checking they are newer, automatically. There's an example that shows how to list a directory, and it's subdirectories (which is much harder). The compiled version is free from: http://www.magsys.co.uk/delphi/magxfer.asp The source is available free to ICS SSL contributors, from the SSL download page. Angus -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFtpClient Timeouts?
What's the best way to detect if a timeout has occurred in a TFtpClient operation? A TTimer. -- [EMAIL PROTECTED] http://www.overbyte.be -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFTPClient upload problem
From: Arno Garrels [EMAIL PROTECTED] Do you explicitly call TypeBinary/TypeBinaryAsync? It is not enough to set property Binary only. No, I don't. When and where should I call this? Woody (TMW) -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFTPClient upload problem
From: Arno Garrels [EMAIL PROTECTED] Woody (TMW) wrote: I am using the TFTPclient component in a small app I built for maintaining my web pages and files. For a long time, everything worked great. Well, I changed ISP's and so I had to move my web page over to the new location. Now, whenever I upload my zip files to the ftp directory, they seem to get corrupted. When I try to download the files for testing, Winzip reports that there are errors and that some bytes are missing. I thought this might be a problem between using ASCII and binary but I have the component set to binary. Do you explicitly call TypeBinary/TypeBinaryAsync? It is not enough to set property Binary only. Arno, I tried putting a call to TypeBinary just after filling in user,password and host name but before opening the connection and it didn't change anything. FTP1.UserName := edUser.Text; FTP1.Password := edPass.Text; FTP1.HostName := edURL.Text; FTP1.TypeBinary; FTP1.TypeSet; try FTP1.Connect; if FTP1.Connected then begin ... Woody (TMW) -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
Re: [twsocket] TFTPClient upload problem
Woody (TMW) wrote: I am using the TFTPclient component in a small app I built for maintaining my web pages and files. For a long time, everything worked great. Well, I changed ISP's and so I had to move my web page over to the new location. Now, whenever I upload my zip files to the ftp directory, they seem to get corrupted. When I try to download the files for testing, Winzip reports that there are errors and that some bytes are missing. I thought this might be a problem between using ASCII and binary but I have the component set to binary. Do you explicitly call TypeBinary/TypeBinaryAsync? It is not enough to set property Binary only. Arno Garrels -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
