From 63e29e1d1ef8ee37f21b2d9852eba9959d00b82f Mon Sep 17 00:00:00 2001
From: "arseny.kapoulkine"
<arseny.kapoulkine@99668b35-9821-0410-8761-19e4c4f06640>
Date: Wed, 2 Jun 2010 20:29:03 +0000
Subject: tests: Fixed report CSS, VMs are now started in minimized state (GUI
mode)
git-svn-id: http://pugixml.googlecode.com/svn/trunk@501 99668b35-9821-0410-8761-19e4c4f06640
---
tests/autotest-remote-server.pl | 16 +++++++++++++---
tests/autotest-report.pl | 4 ++--
2 files changed, 15 insertions(+), 5 deletions(-)
(limited to 'tests')
diff --git a/tests/autotest-remote-server.pl b/tests/autotest-remote-server.pl
index 970476c..a8410a1 100644
--- a/tests/autotest-remote-server.pl
+++ b/tests/autotest-remote-server.pl
@@ -3,15 +3,25 @@
use IO::Socket;
$vm = shift;
+$log = shift;
+# start virtualbox gui in minimized mode - this should be the first thing we do since this process
+# inherits all handles and we want our sockets/log file closed
+system("start /min virtualbox --startvm $vm");
+
+# start a server; vm will connect to the server via autotest-remote-host.pl
my $server = new IO::Socket::INET(LocalPort => 7183, Listen => 1);
die "Could not create socket: $!\n" unless $server;
-system("vboxmanage startvm $vm --type headless");
+open LOG, ">> $log" || die "Could not open log file: $!\n";
-print "Listening for connection...\n";
+print LOG "Listening for connection...\n";
my $client = $server->accept();
-print while (<$client>);
+# echo all input to log file
+print LOG $_ while (<$client>);
+close LOG;
+$client->close();
+$server->close();
diff --git a/tests/autotest-report.pl b/tests/autotest-report.pl
index c318b93..8ed8dd9 100644
--- a/tests/autotest-report.pl
+++ b/tests/autotest-report.pl
@@ -109,8 +109,8 @@ $configurationarray[$configurations{$_}] = $_ foreach (keys %configurations);
# print header
$stylesheet = <<END;
-table.autotest { border: 1px solid; border-left: none; border-top: none; }
-table.autotest td { border: 1px solid; border-right: none; border-bottom: none; }
+table.autotest { border: 1px solid black; border-left: none; border-top: none; }
+table.autotest td { border: 1px solid black; border-right: none; border-bottom: none; }
END
print <<END;
--
cgit v1.2.3