[OSSTEST PATCH v3 11/25] DO NOT APPLY make-flight-substep-test

[Wei Liu <wei.liu2@citrix.com>]

From: Ian Jackson <ian.jackson@eu.citrix.com>

This is a simple test case for substeps.

Signed-off-by: Ian Jackson <Ian.Jackson@eu.citrix.com>
CC: Wei Liu <wei.liu2@citrix.com>
---
 make-flight-substep-test | 14 ++++++++++++++
 sg-run-job               |  7 +++++++
 2 files changed, 21 insertions(+)
 create mode 100755 make-flight-substep-test

diff --git a/make-flight-substep-test b/make-flight-substep-test
new file mode 100755
index 0000000..44b0451
--- /dev/null
+++ b/make-flight-substep-test
@@ -0,0 +1,14 @@
+#!/bin/sh
+set -e
+
+flight=`./cs-flight-create play xen-unstable`
+
+runvars=bogus=0
+
+for j in test-1 test-2; do
+    ./cs-job-create $flight $j test-substeps \
+	$runvars
+    runvars=bogus=1
+done
+
+echo $flight
diff --git a/sg-run-job b/sg-run-job
index 01c57aa..314019c 100755
--- a/sg-run-job
+++ b/sg-run-job
@@ -459,6 +459,13 @@ proc run-job/test-rumprun {} {
                  ts-guest-destroy-hard            host   $g   +
 }
 
+proc need-hosts/test-substeps {} { }
+proc run-job/test-substeps {} {
+    run-ts . =   ts-substep-test suba:foo 1 subb:wombat suba=pass
+    run-ts . =.2 ts-substep-test subx:foo 1             subx=fail
+    run-ts . =.3 ts-substep-test ,bogus     subb=pass
+}
+
 if {[file exists sg-run-job-adhoc]} {
     source sg-run-job-adhoc
 }
-- 
2.1.4


_______________________________________________
Xen-devel mailing list
Xen-devel@lists.xen.org
https://lists.xen.org/xen-devel