From: Daniel Stenberg <daniel@haxx.se>
Date: Mon, 19 Apr 2004 15:20:30 +0000 (+0000)
Subject: changed the logging to work when the logfile is removed during testing
X-Git-Tag: curl-7_11_2~42
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=6f8b4395ec12484e4a461a999d1e52d669306a16;p=thirdparty%2Fcurl.git

changed the logging to work when the logfile is removed during testing
---

diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index 3beb6030af..13c4b82188 100644
--- a/tests/ftpserver.pl
+++ b/tests/ftpserver.pl
@@ -38,15 +38,15 @@ use strict;
 
 require "getpart.pm";
 
-open(FTPLOG, ">log/ftpd.log") ||
-    print STDERR "failed to open log file, runs without logging\n";
-
+# open and close each time to allow removal at any time
 sub logmsg {
     my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) =
         localtime(time);
+    open(FTPLOG, ">>log/ftpd.log");
     printf FTPLOG ("%02d:%02d:%02d (%d) ",
                    $hour, $min, $sec, $$);
     print FTPLOG @_;
+    close(FTPLOG);
 }
 
 sub ftpmsg {
@@ -530,7 +530,6 @@ for ( $waitedpid = 0;
     open(STDIN,  "<&Client")   || die "can't dup client to stdin";
     open(STDOUT, ">&Client")   || die "can't dup client to stdout";
     
-    FTPLOG->autoflush(1);
     &customize(); # read test control instructions
 
     print @welcome;