From 9cbf69ca0b62e2096dea7e3d45ee49338730adc4 Mon Sep 17 00:00:00 2001
From: Yang Tse <yangsita@gmail.com>
Date: Thu, 26 Nov 2009 22:07:47 +0000
Subject: Log info for start up failures.

---
 tests/httpsserver.pl | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

(limited to 'tests/httpsserver.pl')

diff --git a/tests/httpsserver.pl b/tests/httpsserver.pl
index 62abb6f7c..2857883e7 100644
--- a/tests/httpsserver.pl
+++ b/tests/httpsserver.pl
@@ -68,6 +68,8 @@ my $certfile="$srcdir/"
             . ($stuncert?"certs/$stuncert":"stunnel.pem");	# stunnel server certificate
 
 my $pidfile="$path/.$proto.pid";	# stunnel process pid file
+my $logfile="$path/log/stunnel.log";    # stunnel log file
+my $loglevel=5;
 
 # find out version info for the given stunnel binary
 my $ver_major;
@@ -90,20 +92,20 @@ if(!$ver_major) {
 elsif($ver_major < 4) {
     # stunnel version less than 4.00
     $cmd  = "$stunnel -p $certfile -P $pidfile -d $port -r $target_port ";
-    $cmd .= "2>/dev/null";
+    $cmd .= ">$logfile 2>&1";
 }
 else {
     # stunnel version 4.00 or later
     $cmd  = "$stunnel $conffile ";
-    $cmd .= "2>/dev/null";
+    $cmd .= ">$logfile 2>&1";
     # stunnel configuration file
     open(STUNCONF, ">$conffile") || exit 1;
     print STUNCONF "
 	CApath = $path
 	cert = $certfile
 	pid = $pidfile
-	debug = 0
-	output = /dev/null
+	debug = $loglevel
+	output = $logfile
 	foreground = yes
 	
 	[curltest]
@@ -120,8 +122,8 @@ if($verbose) {
 	CApath = $path
 	cert = $certfile
 	pid = $pidfile
-	debug = 0
-	output = /dev/null
+	debug = $loglevel
+	output = $logfile
 	foreground = yes
 	
 	[curltest]
-- 
cgit v1.2.3