mirror of
https://github.com/libguestfs/libguestfs.git
synced 2026-03-22 07:03:38 +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)
155 lines
3.6 KiB
Bash
Executable File
155 lines
3.6 KiB
Bash
Executable File
#!/bin/bash
|
|
# Copyright (C) 2014 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 the disk-create API.
|
|
|
|
source ./functions.sh
|
|
set -e
|
|
set -x
|
|
|
|
skip_if_skipped
|
|
|
|
rm -f disk*.img file:*.img
|
|
|
|
# XXX We should also test failure paths.
|
|
|
|
guestfish <<EOF
|
|
disk-create disk1.img raw 256K
|
|
disk-create disk2.img raw 256K preallocation:off
|
|
disk-create disk2.img raw 256K preallocation:sparse
|
|
disk-create disk3.img raw 256K preallocation:full
|
|
disk-create disk4.img qcow2 256K
|
|
disk-create disk5.img qcow2 256K preallocation:off
|
|
disk-create disk5.img qcow2 256K preallocation:sparse
|
|
disk-create disk6.img qcow2 256K preallocation:metadata
|
|
disk-create disk6.img qcow2 256K preallocation:full
|
|
disk-create disk7.img qcow2 256K compat:1.1
|
|
disk-create disk8.img qcow2 256K clustersize:128K
|
|
disk-create disk9.img qcow2 -1 backingfile:disk1.img compat:1.1
|
|
disk-create disk10.img qcow2 -1 backingfile:disk2.img backingformat:raw
|
|
disk-create disk11.img qcow2 -1 backingfile:disk4.img backingformat:qcow2
|
|
|
|
# Some annoying corner-cases in qemu-img.
|
|
disk-create disk:0.img qcow2 256K
|
|
disk-create file:0.img qcow2 256K
|
|
disk-create disk,0.img qcow2 256K
|
|
disk-create disk,,0.img qcow2 256K
|
|
EOF
|
|
|
|
output="$(guestfish <<EOF
|
|
disk-format disk1.img
|
|
disk-format disk2.img
|
|
disk-format disk3.img
|
|
disk-format disk4.img
|
|
disk-format disk5.img
|
|
disk-format disk6.img
|
|
disk-format disk7.img
|
|
disk-format disk8.img
|
|
disk-format disk9.img
|
|
disk-format disk10.img
|
|
disk-format disk11.img
|
|
disk-format disk:0.img
|
|
disk-format file:0.img
|
|
disk-format disk,0.img
|
|
disk-format disk,,0.img
|
|
|
|
disk-has-backing-file disk1.img
|
|
disk-has-backing-file disk2.img
|
|
disk-has-backing-file disk3.img
|
|
disk-has-backing-file disk4.img
|
|
disk-has-backing-file disk5.img
|
|
disk-has-backing-file disk6.img
|
|
disk-has-backing-file disk7.img
|
|
disk-has-backing-file disk8.img
|
|
disk-has-backing-file disk9.img
|
|
disk-has-backing-file disk10.img
|
|
disk-has-backing-file disk11.img
|
|
disk-has-backing-file disk:0.img
|
|
disk-has-backing-file file:0.img
|
|
disk-has-backing-file disk,0.img
|
|
disk-has-backing-file disk,,0.img
|
|
|
|
disk-virtual-size disk1.img
|
|
disk-virtual-size disk2.img
|
|
disk-virtual-size disk3.img
|
|
disk-virtual-size disk4.img
|
|
disk-virtual-size disk5.img
|
|
disk-virtual-size disk6.img
|
|
disk-virtual-size disk7.img
|
|
disk-virtual-size disk8.img
|
|
disk-virtual-size disk9.img
|
|
disk-virtual-size disk10.img
|
|
disk-virtual-size disk11.img
|
|
disk-virtual-size disk:0.img
|
|
disk-virtual-size file:0.img
|
|
disk-virtual-size disk,0.img
|
|
disk-virtual-size disk,,0.img
|
|
EOF
|
|
)"
|
|
|
|
if [ "$output" != "raw
|
|
raw
|
|
raw
|
|
qcow2
|
|
qcow2
|
|
qcow2
|
|
qcow2
|
|
qcow2
|
|
qcow2
|
|
qcow2
|
|
qcow2
|
|
qcow2
|
|
qcow2
|
|
qcow2
|
|
qcow2
|
|
false
|
|
false
|
|
false
|
|
false
|
|
false
|
|
false
|
|
false
|
|
false
|
|
true
|
|
true
|
|
true
|
|
false
|
|
false
|
|
false
|
|
false
|
|
262144
|
|
262144
|
|
262144
|
|
262144
|
|
262144
|
|
262144
|
|
262144
|
|
262144
|
|
262144
|
|
262144
|
|
262144
|
|
262144
|
|
262144
|
|
262144
|
|
262144" ]; then
|
|
echo "$0: unexpected output:"
|
|
echo "$output"
|
|
exit 1
|
|
fi
|
|
|
|
rm disk*.img file:*.img
|