Module: tools
Branch: master
Commit: 011f01d4a353c8779fc83432a3452660d8b7b922
URL: http://source.winehq.org/git/tools.git/?a=commit;h=011f01d4a353c8779fc83432…
Author: Francois Gouget <fgouget(a)codeweavers.com>
Date: Fri Nov 24 10:00:04 2017 +0100
testbot: Improve the $VM::GetHost() documentation.
Signed-off-by: Francois Gouget <fgouget(a)codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard(a)winehq.org>
---
testbot/lib/WineTestBot/VMs.pm | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/testbot/lib/WineTestBot/VMs.pm b/testbot/lib/WineTestBot/VMs.pm
index 7bd6d64..b931342 100644
--- a/testbot/lib/WineTestBot/VMs.pm
+++ b/testbot/lib/WineTestBot/VMs.pm
@@ -179,7 +179,9 @@ sub GetHost($)
{
my ($self) = @_;
- # The URI is of the form protocol://user@hostname/hypervisor-specific-data
+ # VirtURI is of the form proto://user@hostname:port/hypervisor-specific-data
+ # This returns the 'hostname:port' part. Note that the port can be used to
+ # tunnel connections to different VM hosts and thus must be included.
return $1 if ($self->VirtURI =~ m%^[^:]+://(?:[^/@]*@)?([^/]+)/%);
return "localhost";
}
Module: tools
Branch: master
Commit: c9ccc6cd895aa33004f761fb9d796678370e8a4b
URL: http://source.winehq.org/git/tools.git/?a=commit;h=c9ccc6cd895aa33004f761fb…
Author: Francois Gouget <fgouget(a)codeweavers.com>
Date: Fri Nov 24 09:59:32 2017 +0100
testbot: Fix the $Tunnel configuration setting prefix.
Signed-off-by: Francois Gouget <fgouget(a)codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard(a)winehq.org>
---
testbot/lib/WineTestBot/ConfigLocalTemplate.pl | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/testbot/lib/WineTestBot/ConfigLocalTemplate.pl b/testbot/lib/WineTestBot/ConfigLocalTemplate.pl
index 1b1a62e..6ac6b44 100644
--- a/testbot/lib/WineTestBot/ConfigLocalTemplate.pl
+++ b/testbot/lib/WineTestBot/ConfigLocalTemplate.pl
@@ -90,7 +90,7 @@ $WineTestBot::Config::AgentPort = undef;
# - If set to an SSH URI, then tunneling is performed using these parameters.
# - Any other setting disables SSH tunneling. In particular to disable
# tunneling for SSH VirtURIs it is recommended to set this to 'never'.
-$Tunnel = undef;
+$WineTestBot::Config::Tunnel = undef;
# If set this specifies the SSH tunnel parameters to be used for the
# TestAgent connection. This is mostly useful for parameters that cannot be
Module: tools
Branch: master
Commit: cef9778f92efcff5c08ddfadb4a128db9203eea5
URL: http://source.winehq.org/git/tools.git/?a=commit;h=cef9778f92efcff5c08ddfad…
Author: Francois Gouget <fgouget(a)codeweavers.com>
Date: Fri Nov 24 09:59:13 2017 +0100
testbot: Don't check idle and off VMs on the Engine shutdown.
Signed-off-by: Francois Gouget <fgouget(a)codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard(a)winehq.org>
---
testbot/bin/Engine.pl | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/testbot/bin/Engine.pl b/testbot/bin/Engine.pl
index 598d2bd..ad492f6 100755
--- a/testbot/bin/Engine.pl
+++ b/testbot/bin/Engine.pl
@@ -96,9 +96,9 @@ In all other cases the VM is powered off and marked as such.
=back
=cut
-sub Cleanup(;$$)
+sub Cleanup($;$$)
{
- my ($KillTasks, $KillVMs) = @_;
+ my ($Starting, $KillTasks, $KillVMs) = @_;
# Verify that the running tasks are still alive and requeue them if not.
# Ignore the Job and Step status fields because they may be a bit out of date.
@@ -128,7 +128,7 @@ sub Cleanup(;$$)
}
elsif ($KillTasks)
{
- # We will kill the Task's process so requeue the Task.
+ # We will kill the child process so requeue the Task.
$Requeue = 1;
}
else
@@ -193,7 +193,7 @@ sub Cleanup(;$$)
}
# else let the process finish its work
}
- else
+ elsif ($Starting)
{
if ($VM->Status eq "idle")
{
@@ -241,7 +241,7 @@ sub HandleShutdown($$)
return "0Invalid KillVMs shutdown parameter\n";
}
- Cleanup($KillTasks, $KillVMs);
+ Cleanup(0, $KillTasks, $KillVMs);
$RunEngine = 0;
LogMsg "Waiting for the last clients to disconnect...\n";
@@ -715,7 +715,7 @@ sub main()
LogMsg "Capping MaxRevertsWhileRunningVMs to MaxRevertingVMs ($MaxRevertsWhileRunningVMs)\n";
}
$MaxVMsWhenIdle ||= $MaxActiveVMs;
- Cleanup();
+ Cleanup(1);
# Check for patches that arrived while the server was off.
HandleWinePatchMLSubmission();