add-domain: Add readonlydisk optional argument (RHBZ#747290).
[libguestfs.git] / regressions / test-add-domain.sh
index d124b62..7616c38 100755 (executable)
 
 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>
@@ -58,22 +64,33 @@ EOF
 
 ../fish/guestfish >test.out <<EOF
   domain guest libvirturi:test://$cwd/test.xml readonly:true
-  debug-cmdline
+  debug-drives
 EOF
 grep -sq "test1.img.*snapshot=on" test.out
 ! grep -sq "test1.img.*format" 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
 
 ../fish/guestfish >test.out <<EOF
   -domain guest libvirturi:test://$cwd/test.xml readonly:true
-  debug-cmdline
+  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
 
-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