From: Ian Jackson <ian.jackson@eu.citrix.com>
Date: Tue, 21 May 2019 16:06:24 +0000 (+0100)
Subject: host reuse: Reuse test hosts within a flight
X-Git-Url: http://xenbits.xensource.com/gitweb?a=commitdiff_plain;h=2f9536f2f2a8a1b5664c0fd92c545b543bc9dcc4;p=osstest.git

host reuse: Reuse test hosts within a flight

Mark the host shareable, and unshareable, as appropriate.

There is still a lot more cleanup and improvement to do.

Signed-off-by: Ian Jackson <Ian.Jackson@eu.citrix.com>
---

diff --git a/sg-run-job b/sg-run-job
index af43008..1e2fcfe 100755
--- a/sg-run-job
+++ b/sg-run-job
@@ -29,6 +29,8 @@ proc per-host-prep {} {
     per-host-ts @.      xen-install/@     ts-xen-install
     per-host-ts @.      xen-boot/@        ts-host-reboot
 
+    per-host-ts broken  =               { ts-host-reuse start-test }
+
     per-host-ts .       host-ping-check-xen/@ ts-host-ping-check
     per-host-ts .       =(*)            { ts-leak-check basis }
 }
@@ -64,6 +66,8 @@ proc run-job {job} {
     if {!$ok} return
 
     if {[llength $need_xen_hosts]} {
+        per-host-ts broken  =           { ts-host-reuse prealloc }
+	if {!$ok} return
         eval run-ts broken  =             ts-hosts-allocate + $need_xen_hosts
     }
 
@@ -120,6 +124,7 @@ proc run-job {job} {
        set ok 0
     }
 
+    if {$ok} { per-host-ts .  =            { ts-host-reuse post-test }    }
     if {$ok} { setstatus pass                                             }
 
     if {[llength $need_build_host] && $ok} { jobdb::preserve-task 90 }