Dateitransfer mit Perl und Net::FTPSSL läuft in Timeout (Netzwerkprogrammierung und Netzwerke mit Perl)

[thread]18074[/thread]

Dateitransfer mit Perl und Net::FTPSSL läuft in Timeout

Tags: perl5 Net::FTPSSL Pureftpd Ähnliche Threads

Leser: 18

Articles: hide open all | hide show old branches

+10 replies
wikischwedia

2013-01-22 10:23
User since
2013-01-22
7 Artikel
BenutzerIn
Hallo,

ich bin gerade dabei meinen FTP-Server auf ftps umzustellen.

ich habe also ein selbstsigniertes Zertifikat mit eigener CA erstellt und auf dem Server eingespielt.

Den Zugriff von Windows aus habe ich mittlerweile mit Filezilla hinbekommen.
Obwohl eine Firewall dazwischen ist kann ich damit wunderbar zugreifen.

Jetzt habe ich aber noch ein Perlscript welches täglich Logfiles vom Server abholen soll.

Der Kern des Scripts sieht folgendermaßen aus:
Code: (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

use Net::FTPSSL; my $ftps = Net::FTPSSL->new('SERVERNAME', Port => 21, Encryption => EXP_CRYPT, Trace => 1, Debug => 2 ) or die "Can't open ftp.yoursecureserver.com\n$Net::FTPSSL::ERRSTR"; $ftps->login('USER', 'PASSWORD') or die "Can't login: ", $ftps->last_message(); $ftps->binary() or die "Can't change directory: " . $ftps->last_message(); $ftps->put("filezilla.log") or die "Can't get file: " . $ftps->last_message(); $ftps->get("mokmok.txt") or die "Can't get file: " . $ftps->last_message(); $ftps->quit();
Wenn ich dieses Script laufen lasse loggt es sich erfolgreich ein und bleibt beim ersten Dateitransfer hängen.

Auf dem Server sagt mir das Logfile:
Code: (dl )

1 2 3

Jan 22 08:06:12 SERVERNAME pure-ftpd: (?@xxx.xxx.xxx.xxx) [INFO] New connection from xxx.xxx.xxx.xxx Jan 22 08:06:13 SERVERNAME pure-ftpd: (?@xxx.xxx.xxx.xxx) [INFO] SSL/TLS: Enabled TLSv1/SSLv3 with AES256-SHA, 256 secret bits cipher Jan 22 08:06:13 SERVERNAME pure-ftpd: (?@xxx.xxx.xxx.xxx) [INFO] USER is now logged in
und nach einer Weile:
Code: (dl )

Jan 22 08:06:30 SERVERNAME pure-ftpd: (USER@xxx.xxx.xxx.xxx) [ERROR] SSL/TLS [/etc/ssl/private/pure-ftpd.pem]: error:00000000:lib(0):func(0):reason(0)
Die Datei wird auf dem Server zunächst als .pureftpd-upload.50fe390e.15.1902.bf7abb68 angelegt, sie wird aber nie größer als 0 Bytes.

Die Debugausgabe des Scriptes ist:
Code: (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31

SKT <<< 220-Welcome to Pure-FTPd. SKT <<< 220-You are user number 1 of 10 allowed. SKT <<< 220-This is a private system - No anonymous login SKT <<< 220-IPv6 connections are also welcome on this server. SKT <<< 220 You will be disconnected after 15 minutes of inactivity. SKT >>> AUTH TLS SKT <<< 234 AUTH TLS OK. >>> USER +++++++ <<< 331 User <++++++> OK. Password required >>> PASS ******* <<< 230-User <++++++> has group access to: 100 <<< 230-This server supports FXP transfers <<< 230 OK. Current directory is / >>> TYPE I <<< 200 TYPE is now 8-bit binary >>> PBSZ 0 <<< 200 PBSZ=0 >>> PROT P <<< 200 Data protection level set to "private" >>> PASV <<< 227 Entering Passive Mode (xxx,xxx,xxx,xxx,117,49) --- Host (xxx.xxx.xxx.xxx) Port (30001) >>> HELP <<< 214-The following SITE commands are recognized <<< ALIAS <<< CHMOD <<< IDLE <<< UTIME <<< 214 Pure-FTPd - http://pureftpd.org/ <<+ 502 Unknown command ALLO. >>> STOR filezilla.log
Wieso kann Filezilla sich verbinden und Dateien transferieren und nicht mein Script?

ACHTUNG!! Ich habe diese Frage relativ erfolglos bereits hier gestellt: http://stackoverflow.com/questions/14395800/perl-n...

modedit Editiert von GwenDragon: Logs in CODE-Tags
Last edited: 2013-01-22 11:33:31 +0100 (CET)
- +4 replies
- GwenDragon
  
  2013-01-22 13:27
  User since
  2005-01-17
  14748 Artikel
  Admin1
  Das ist anscheinend ein Problem mit deinem pureftpd.
  Dein Skript angepasst auf meinen Server mit pureftpd läuft.
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
  
  use strict; use warnings; use Net::FTPSSL; my $host = 'debianserver'; my $ftps = Net::FTPSSL->new( $host, Port => 21, Encryption => EXP_CRYPT, Trace => 1, Debug => 3, ) or die "Can't open $host\n$Net::FTPSSL::ERRSTR"; $ftps->login( 'test', 'test' ) or die "Can't login: ", $ftps->last_message(); $ftps->binary() or die "Can't change directory: " . $ftps->last_message(); $ftps->put("filezilla.log") or die "Can't get file: " . $ftps->last_message(); $ftps->get("mokmok.txt") or die "Can't get file: " . $ftps->last_message(); $ftps->quit();
  
  Ausgabe:
  more (3.6kb)
  
  Bist du sicher, dass auch keine Firewall Ports blockiert?
  Last edited: 2013-01-22 13:31:50 +0100 (CET)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - wikischwedia
    
    2013-01-22 15:19
    User since
    2013-01-22
    7 Artikel
    BenutzerIn
    
    Ich habe einen Server der hinter der Firewall steht und einen mit dem ich mich direkt verbinden kann.
    Auf beiden Servern habe ich das Problem.
    
    Das TLS habe ich in der pure-ftpd.conf mit der Option 2 (nur TLS, kein unverschlüsseltes FTP) aktiviert.
    
    Wenn die Firewall Ports blockieren würde, könnte ich mit Filezilla nicht zugreifen.
    
    Es sei denn NET::FTPSSL verwendet einen anderen Weg der Verbindung.
    
    Im Filezilla stehen noch folgende Zeilen:
    
    Code: (dl )
    
    1 2 3 4 5 6 7 8 9 10 11
    
    2013-01-17 13:50:55 4412 3 Befehl: AUTH TLS 2013-01-17 13:50:55 4412 3 Antwort: 234 AUTH TLS OK. 2013-01-17 13:50:55 4412 3 Status: Initialisiere TLS... 2013-01-17 13:50:55 4412 3 Status: Überprüfe Zertifikat... 2013-01-17 13:50:55 4412 3 Befehl: USER www 2013-01-17 13:50:55 4412 3 Status: TLS/SSL-Verbindung hergestellt. 2013-01-17 13:50:55 4412 3 Antwort: 331 User www OK. Password required 2013-01-17 13:50:55 4412 3 Befehl: PASS ********* 2013-01-17 13:50:55 4412 3 Antwort: 230-User www has group access to: 100 2013-01-17 13:50:55 4412 3 Antwort: 230-This server supports FXP transfers 2013-01-17 13:50:55 4412 3 Antwort: 230 OK. Current directory is /
    
    "Überprüfe Zertifikat..." zeigt mir das Debuglog vom NET::FTPSSL nicht.
    Last edited: 2013-01-22 15:20:58 +0100 (CET)
  - +2 replies
  - wikischwedia
    
    2013-01-29 13:15
    
    User since
    2013-01-22
    7 Artikel
    BenutzerIn
    
    @GwenDragon:
    mir ist gerade folgender Block in deinem Log aufgefallen:
    
    *******************************************************************
    Using the default of SSL_verify_mode of SSL_VERIFY_NONE for client
    is depreciated! Please set SSL_verify_mode to SSL_VERIFY_PEER
    together with SSL_ca_file|SSL_ca_path for verification.
    If you really don't want to verify the certificate and keep the
    connection open to Man-In-The-Middle attacks please set
    SSL_verify_mode explicitly to SSL_VERIFY_NONE in your application.
    *******************************************************************
    
    Hattest du die Überprüfung des Zertifikates selbst deaktiviert oder benutzt du da den default wert?
    
    Hast du ein selbstsigniertes Zertifikat mit oder ohne eigener CA verwendet?
    - GwenDragon
      
      2013-01-29 16:41
      
      User since
      2005-01-17
      14748 Artikel
      Admin1
      
      Selbstsigniertes Zert, da es ein lokaler Testserver war.
      Keine Überprüfung des Zert per Programm oder Umgebungsvariable veranlasst.
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- +5 replies
- wikischwedia
  
  2013-01-25 11:47
  User since
  2013-01-22
  7 Artikel
  BenutzerIn
  Ich habe jetzt das selbe Script auf einen anderen Server connecten lassen.
  Die Einstellungen beim Zielserver sind die selben wie beim ersten, allerdings steht der Server nicht hinter einer Firewall.
  Beim Ausführen läuft das Script wieder in einen Timeout.
  Im /var/log/messages des Servers steht dann:
  
  Code: (dl )
  
  [ERROR] SSL/TLS [/etc/ssl/private/pure-ftpd.pem]: error:00000000:lib(0):func(0):reason(0)
  
  Versuche ich mich nun mit dem Total Commander mit dem Server zu verbinden, habe ich das selbe Verhalten.
  Zuerst Timeout, dann die Zeile im /var/log/messages
  
  Code: (dl )
  
  [ERROR] SSL/TLS [/etc/ssl/private/pure-ftpd.pem]: error:00000000:lib(0):func(0):reason(0)
  - +4 replies
  - Muffi
    
    2013-01-25 12:01
    
    User since
    2012-07-18
    1465 Artikel
    BenutzerIn
    
    Auf Server und Clientrechner alles abgeschaltet was nach Securitysoftware ausschaut?
    Router dazwischen?
    1 + 1 = 10
    - +3 replies
    - wikischwedia
      
      2013-01-25 15:17
      
      User since
      2013-01-22
      7 Artikel
      BenutzerIn
      
      Securitysoftware läuft keine, zumindest nichts was den Zugriff blockieren könnte.
      Der Zugriff via Filezilla klappt ja, nur über Perl funktioniert es nicht.
      - +2 replies
      - Muffi
        
        2013-01-25 16:01
        
        User since
        2012-07-18
        1465 Artikel
        BenutzerIn
        
        ftp wurde (meiner Meinunng nach) nie dafür gebaut durch Router oder Firewalls gut zu funktionieren. Ich finds sogar furchtbar sowas zuverlässig zum laufen zu kriegen. Es gibt nicht nur einen Weg, wie der Verbindungsaufbau ist und welche Ports benutzt werden.
        
        Läuft Filezilla auch im Passivmode?
        1 + 1 = 10
        
        wikischwedia
        
        2013-01-25 19:09
        
        User since
        2013-01-22
        7 Artikel
        BenutzerIn
        
        Filezilla läuft im passiv mode mit expliziter Verschlüsselung.
        Wenn ich den Total Commander mit den selben Einstellungen auf den Server loslasse, bekomme ich die selbe Fehlermeldung.

View all threads created 2013-01-22 10:23.