Preforkserver beendet Verbindung (Netzwerkprogrammierung und Netzwerke mit Perl)

[thread]13431[/thread]

Preforkserver beendet Verbindung

Leser: 18

Articles: hide open all | hide show old branches

+6 replies
Superfrank

2009-04-24 17:57
User since
2006-09-05
164 Artikel
BenutzerIn
Hallo,
ich habe einen Perlserver im Einsatz, der gemäß

Perl Cookbook, Chapter 17.12
(http://oreilly.com/catalog/9781565922433/)

funktioniert, und wo der Server dem Client eine Antwort mit
Code (perl): (dl )

$client->send("$msg", $flags)
sendet. Leider werden z.B. von einer Textdatei nur ca. die ersten 320 Zeilen gesendet, danach bricht der Server die Verbindung ab. $flags ist mit
Code (perl): (dl )

1 2

my $flags = fcntl($client, F_SETFL, 0); $flags = fcntl($client, F_SETFL, $flags | O_NONBLOCK);
gesetzt.
Hat jemand einen heissen Tip für mich?

Viele Grüsse

Frank

mod-edit pq: link zu einer anscheinend nicht freigegebenen online-version ersetzt
Last edited: 2009-04-24 19:20:14 +0200 (CEST)
- +2 replies
- Superfrank
  
  2009-04-26 12:58
  User since
  2006-09-05
  164 Artikel
  BenutzerIn
  oh, sorry für die Verlinkung. Das Perl-Kochbuch wird warscheinlich jeder hier haben, die anderen finden den Code mit den Suchbegriffen
  
  reaper huntsman 17.12
  
  Ich hoffe das ist indirekt genug?
  
  Einen Fehler hab ich schon gefunden und zwar
  
  Code (perl): (dl )
  
  my $flags = fcntl($client, F_SETFL, 0)
  
  auf
  
  Code (perl): (dl )
  
  my $flags = fcntl($client, F_GETFL, 0)
  
  geändert. Hat leider nicht geholfen. Habe auch noch
  
  Code (perl): (dl )
  
  $client->autoflush(1);
  
  gesetzt, ergab aber keine Änderung.
  
  Viele Grüsse
  
  Frank
  - pq
    
    2009-04-26 13:04
    
    User since
    2003-08-04
    12208 Artikel
    Admin1
    
    2009-04-26T10:58:47 Superfrank
    oh, sorry für die Verlinkung. Das Perl-Kochbuch wird warscheinlich jeder hier haben, die anderen finden den Code mit den Suchbegriffen
    
    den code kann man einfach herunterladen, einfach nur bei dem angegebenen link von mir auf "Examples klicken".
    Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
    lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
- +3 replies
- betterworld
  
  2009-04-26 13:55
  
  User since
  2003-08-21
  2614 Artikel
  ModeratorIn
  
  Die Flags, die fcntl bearbeitet, haben afaik ein anderes Format als diejenigen, die send als Parameter nimmt, siehe zum Beispiel man 2 send.
  
  Vielleicht ist Dein Problem auch gerade das O_NONBLOCK-Flag. Es bewirkt ja, dass nur so viele Daten gesendet werden, wie instantan möglich ist. Der Rest wird einfach nicht geschickt, und send gibt die Länge der geschickten Daten zurück. Wenn Du mehr schicken möchtest, musst Du dann warten, bis wieder Platz da ist. Oder halt einfach auf O_NONBLOCK verzichten.
  Lieblingsmodule: IPC::System::Simple, Path::Class
  - +2 replies
  - Superfrank
    
    2009-04-26 14:10
    
    User since
    2006-09-05
    164 Artikel
    BenutzerIn
    
    Hallo Betterworld,
    ursprünglich hatte ich Blocking aktiviert bzw. das Flag nicht gesetzt, leider hatte der Server die Verbindung nach senden der Daten dann nicht geschlossen, so daß der Client nach dem Empfang noch in der Luft hing. Mit O_NONBLOCK ging es dann und ich habe nicht weiter drüber nachgedacht.
    Mittlerweile habe ich aber einige Änderungen an dem Script vorgenommen (es ist seit ca. 6 Mon. im Einsatz) und habe eben O_NONBLOCK wieder entfernt und jetzt geht es!! Es wird alles gesendet und die Verbindung korrekt vom Server beendet.
    
    Danke für deinen Kopfstoss!
    
    Viele Grüsse
    
    Frank
    - betterworld
      
      2009-04-26 14:11
      
      User since
      2003-08-21
      2614 Artikel
      ModeratorIn
      
      Trotzdem solltest Du diese Flags nicht an send uebergeben.
      Lieblingsmodule: IPC::System::Simple, Path::Class

View all threads created 2009-04-24 17:57.