From 7c6e0d5981bee90456de8ab10b6f0d5a90637a61 Mon Sep 17 00:00:00 2001
From: Yang Tse <yangsita@gmail.com>
Date: Wed, 6 May 2009 10:32:06 +0000
Subject: [PATCH] Temporary and HP-UX autobuild specific change to debug SSH
 server start-up failures

---
 tests/runtests.pl | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/tests/runtests.pl b/tests/runtests.pl
index 467b70670..c7935e4b9 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -1162,6 +1162,8 @@ sub runsshserver {
         return (0,0);
     }
 
+    my $dbghosttype=join(' ', runclientoutput("uname -a"));
+
     my $pid = checkserver($pidfile);
     if($pid > 0) {
         stopserver($pid);
@@ -1181,6 +1183,10 @@ sub runsshserver {
     if($sshpid <= 0 || !kill(0, $sshpid)) {
         # it is NOT alive
         logmsg "RUN: failed to start the SSH server\n";
+        if(($dbghosttype =~ /HP-UX/) && ($dbghosttype =~ /hairball/)) {
+          display_sshdlog();
+          display_sshdconfig();
+        }
         stopserver("$pid2");
         $doesntrun{$pidfile} = 1;
         return (0,0);