add-domain: Add readonlydisk optional argument (RHBZ#747290).

[libguestfs.git] / regressions / test-add-domain.sh

diff --git a/regressions/test-add-domain.sh b/regressions/test-add-domain.sh
index ea6d388..7616c38 100755 (executable)
--- a/regressions/test-add-domain.sh
+++ b/regressions/test-add-domain.sh
@@ -20,11 +20,11 @@
 
 set -e
 
-rm -f test1.img test2.img test3.img test.xml test.out
+rm -f test1.img test2.img test3.img test4.img test.xml test.out
 
 cwd="$(pwd)"
 
-truncate -s 1M test1.img test2.img test3.img
+truncate -s 1M test1.img test2.img test3.img test4.img
 
 # Libvirt test XML, see libvirt.git/examples/xml/test/testnode.xml
 cat > test.xml <<EOF
@@ -51,6 +51,12 @@ cat > test.xml <<EOF
         <source file="$cwd/test3.img"/>
         <target dev="hdc"/>
       </disk>
+      <disk type="file">
+        <driver name="qemu" type="raw"/>
+        <source file="$cwd/test4.img"/>
+        <target dev="hdd"/>
+        <readonly/>
+      </disk>
     </devices>
   </domain>
 </node>
@@ -65,6 +71,16 @@ grep -sq "test1.img.*snapshot=on" test.out
 grep -sq "test2.img.*snapshot=on.*format=raw" test.out
 grep -sq "test3.img.*snapshot=on.*format=qcow2" test.out
 
+# Test readonlydisk = "ignore".
+../fish/guestfish >test.out <<EOF
+  -domain guest libvirturi:test://$cwd/test.xml readonly:true readonlydisk:ignore
+  debug-drives
+EOF
+grep -sq "test1.img" test.out
+grep -sq "test2.img" test.out
+grep -sq "test3.img" test.out
+! grep -sq "test4.img" test.out
+
 # Test atomicity.
 rm test3.img
 
@@ -75,5 +91,6 @@ EOF
 ! grep -sq "test1.img" test.out
 ! grep -sq "test2.img" test.out
 ! grep -sq "test3.img" test.out
+! grep -sq "test4.img" test.out
 
-rm -f test1.img test2.img test3.img test.xml test.out
+rm -f test1.img test2.img test3.img test4.img test.xml test.out