mirror of
https://github.com/libguestfs/libguestfs.git
synced 2026-03-21 22:53:37 +00:00
b5fbc7e617
Replace strange $TEST_FUNCTIONS variable/expansion thing with something more like what we use in nbdkit, a simple tests/functions.sh script that gets sourced into each test script. Update the common submodule to get: commit 8137d47d0e654065391151eb275e3b64f230f6f5 Author: Richard W.M. Jones <rjones@redhat.com> Date: Thu Feb 13 11:13:55 2025 +0000 mlcustomize, mltools: Replace $TEST_FUNCTIONS TEST_FUNCTIONS is being removed from libguestfs and guestfs-tools (it was removed from virt-v2v a while back). Make the same adjustment in the common submodule. (and some other commits which are not relevant to libguestfs)
81 lines
2.3 KiB
Bash
Executable File
81 lines
2.3 KiB
Bash
Executable File
#!/bin/bash -
|
|
# libguestfs
|
|
# Copyright (C) 2010 Red Hat Inc.
|
|
#
|
|
# This program is free software; you can redistribute it and/or modify
|
|
# it under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation; either version 2 of the License, or
|
|
# (at your option) any later version.
|
|
#
|
|
# This program is distributed in the hope that it will be useful,
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with this program; if not, write to the Free Software
|
|
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
|
|
# Test guestfish -d option.
|
|
|
|
source ../tests/functions.sh
|
|
set -e
|
|
set -x
|
|
|
|
skip_if_skipped
|
|
|
|
rm -f test-d-{1,2,3,4}.img
|
|
rm -f test-d.xml test-d.out
|
|
|
|
$VG guestfish sparse test-d-1.img 1M
|
|
$VG guestfish sparse test-d-2.img 1M
|
|
$VG guestfish disk-create test-d-3.img qcow2 1M
|
|
$VG guestfish sparse test-d-4.img 1M
|
|
|
|
# Libvirt test XML, see libvirt.git/examples/xml/test/testnode.xml
|
|
cat > test-d.xml <<EOF
|
|
<node>
|
|
<domain type="test">
|
|
<name>guest</name>
|
|
<os>
|
|
<type>hvm</type>
|
|
<boot dev='hd'/>
|
|
</os>
|
|
<memory>524288</memory>
|
|
<devices>
|
|
<disk type="file">
|
|
<source file="$abs_builddir/test-d-1.img"/>
|
|
<target dev="hda"/>
|
|
</disk>
|
|
<disk type="file">
|
|
<driver name="qemu" type="raw"/>
|
|
<source file="$abs_builddir/test-d-2.img"/>
|
|
<target dev="hdb"/>
|
|
</disk>
|
|
<disk type="file">
|
|
<driver name="qemu" type="qcow2"/>
|
|
<source file="$abs_builddir/test-d-3.img"/>
|
|
<target dev="hdc"/>
|
|
</disk>
|
|
<disk type="file">
|
|
<driver name="qemu" type="raw"/>
|
|
<source file="$abs_builddir/test-d-4.img"/>
|
|
<target dev="hdd"/>
|
|
<readonly/>
|
|
</disk>
|
|
</devices>
|
|
</domain>
|
|
</node>
|
|
EOF
|
|
|
|
$VG guestfish -c "test://$abs_builddir/test-d.xml" --ro -d guest \
|
|
debug-drives </dev/null >test-d.out
|
|
grep -sq "test-d-1.img readonly" test-d.out
|
|
! grep -sq "test-d-1.img.*format" test-d.out
|
|
grep -sq "test-d-2.img readonly format=raw" test-d.out
|
|
grep -sq "test-d-3.img readonly format=qcow2" test-d.out
|
|
grep -sq "test-d-4.img readonly format=raw" test-d.out
|
|
|
|
rm test-d-{1,2,3,4}.img
|
|
rm test-d.xml test-d.out
|