Adam Williamson
3 years ago
parent
fa529caf4b
commit
b1707f67c8
@ -1,85 +0,0 @@
|
|||||||
From 9e0a29dacf60cb63edf20b6558207691abcf40e8 Mon Sep 17 00:00:00 2001
|
|
||||||
From: Marius Kittler <mkittler@suse.de>
|
|
||||||
Date: Wed, 8 Sep 2021 17:21:57 +0200
|
|
||||||
Subject: [PATCH] Fix `qemu-img` failure with QEMU 6.1.0 due to missing file
|
|
||||||
format
|
|
||||||
|
|
||||||
* Specify format of backing file on image creation with `qemu-img`
|
|
||||||
* See https://progress.opensuse.org/issues/98117
|
|
||||||
---
|
|
||||||
OpenQA/Qemu/BlockDev.pm | 10 ++++++----
|
|
||||||
t/18-qemu.t | 16 ++++++++--------
|
|
||||||
2 files changed, 14 insertions(+), 12 deletions(-)
|
|
||||||
|
|
||||||
diff --git a/OpenQA/Qemu/BlockDev.pm b/OpenQA/Qemu/BlockDev.pm
|
|
||||||
index 19f70a98bf..99a970ddb6 100644
|
|
||||||
--- a/OpenQA/Qemu/BlockDev.pm
|
|
||||||
+++ b/OpenQA/Qemu/BlockDev.pm
|
|
||||||
@@ -158,13 +158,15 @@ creating.
|
|
||||||
|
|
||||||
=cut
|
|
||||||
sub gen_qemu_img_cmdlines {
|
|
||||||
- my $self = shift;
|
|
||||||
- my @cmdlns = defined $self->backing_file ? $self->backing_file->gen_qemu_img_cmdlines : ();
|
|
||||||
+ my $self = shift;
|
|
||||||
+
|
|
||||||
+ my $backing_file = $self->backing_file;
|
|
||||||
+ my @cmdlns = defined $backing_file ? $backing_file->gen_qemu_img_cmdlines : ();
|
|
||||||
return @cmdlns unless $self->needs_creating;
|
|
||||||
|
|
||||||
my @params = ('create', '-f', $self->driver);
|
|
||||||
- push(@params, ('-b', $self->backing_file->file))
|
|
||||||
- if defined $self->backing_file;
|
|
||||||
+ push(@params, '-F', $backing_file->driver, '-b', $backing_file->file)
|
|
||||||
+ if defined $backing_file;
|
|
||||||
push(@params, $self->file);
|
|
||||||
push(@params, $self->size);
|
|
||||||
|
|
||||||
diff --git a/t/18-qemu.t b/t/18-qemu.t
|
|
||||||
index 147ed8a2e4..2d15dc1850 100755
|
|
||||||
--- a/t/18-qemu.t
|
|
||||||
+++ b/t/18-qemu.t
|
|
||||||
@@ -84,7 +84,7 @@ $bdc->add_existing_drive('hd1', '/abs/path/sle15-minimal.qcow2', 'virtio-blk', 2
|
|
||||||
@gcmdl = $bdc->gen_cmdline();
|
|
||||||
is_deeply(\@gcmdl, \@cmdl, 'Generate qemu command line for single existing drive');
|
|
||||||
|
|
||||||
-@cmdl = ([qw(create -f qcow2 -b /abs/path/sle15-minimal.qcow2 raid/hd1-overlay0 22548578304)]);
|
|
||||||
+@cmdl = ([qw(create -f qcow2 -F qcow2 -b /abs/path/sle15-minimal.qcow2 raid/hd1-overlay0 22548578304)]);
|
|
||||||
@gcmdl = $bdc->gen_qemu_img_cmdlines();
|
|
||||||
is_deeply(\@gcmdl, \@cmdl, 'Generate qemu-img command line for single existing drive');
|
|
||||||
|
|
||||||
@@ -114,7 +114,7 @@ $proc = qemu_proc('-foo', \%vars);
|
|
||||||
@gcmdl = $proc->gen_cmdline();
|
|
||||||
is_deeply(\@gcmdl, \@cmdl, 'Generate qemu command line for single existing UEFI disk using vars');
|
|
||||||
|
|
||||||
-@cmdl = ([qw(create -f qcow2 -b), "$Bin/data/Core-7.2.iso", qw(raid/hd0-overlay0 11116544)]);
|
|
||||||
+@cmdl = ([qw(create -f qcow2 -F qcow2 -b), "$Bin/data/Core-7.2.iso", qw(raid/hd0-overlay0 11116544)]);
|
|
||||||
@gcmdl = $proc->blockdev_conf->gen_qemu_img_cmdlines();
|
|
||||||
is_deeply(\@gcmdl, \@cmdl, 'Generate qemu-img command line for single existing UEFI disk');
|
|
||||||
|
|
||||||
@@ -229,8 +229,8 @@ $proc->deserialise_state(path($path)->slurp());
|
|
||||||
is_deeply(\@gcmdl, \@cmdl, 'Command line after snapshot and serialisation')
|
|
||||||
|| diag(explain(\@gcmdl));
|
|
||||||
|
|
||||||
-@cmdl = ([qw(create -f qcow2 -b raid/hd0 raid/hd0-overlay1 10G)],
|
|
||||||
- [qw(create -f qcow2 -b raid/cd0-overlay0 raid/cd0-overlay1 11116544)]);
|
|
||||||
+@cmdl = ([qw(create -f qcow2 -F qcow2 -b raid/hd0 raid/hd0-overlay1 10G)],
|
|
||||||
+ [qw(create -f qcow2 -F qcow2 -b raid/cd0-overlay0 raid/cd0-overlay1 11116544)]);
|
|
||||||
@gcmdl = $bdc->gen_qemu_img_cmdlines();
|
|
||||||
is_deeply(\@gcmdl, \@cmdl, 'Generate reverted snapshot images');
|
|
||||||
|
|
||||||
@@ -384,10 +384,10 @@ subtest 'relative assets' => sub {
|
|
||||||
symlink("$Bin/data/Core-7.2.iso", "./Core-7.2.iso");
|
|
||||||
$proc = qemu_proc('-foo', \%vars);
|
|
||||||
my @gcmdl = $proc->blockdev_conf->gen_qemu_img_cmdlines();
|
|
||||||
- @cmdl = map { [qw(create -f qcow2 -b), "$dir/Core-7.2.iso", "raid/$_-overlay0", 11116544] } qw(hd0 cd0 cd1);
|
|
||||||
- push @cmdl, ["create", "-f", "qcow2", "-b", "$Bin/data/uefi-code.bin", "raid/pflash-code-overlay0", 1966080];
|
|
||||||
- push @cmdl, ["create", "-f", "qcow2", "-b", "$dir/Core-7.2.iso", "raid/pflash-vars-overlay0", 11116544];
|
|
||||||
- is_deeply(\@gcmdl, \@cmdl, 'find the asset real path');
|
|
||||||
+ @cmdl = map { [qw(create -f qcow2 -F), $_ eq 'hd0' ? 'qcow2' : 'raw', '-b', "$dir/Core-7.2.iso", "raid/$_-overlay0", 11116544] } qw(hd0 cd0 cd1);
|
|
||||||
+ push @cmdl, [qw(create -f qcow2 -F raw -b), "$Bin/data/uefi-code.bin", "raid/pflash-code-overlay0", 1966080];
|
|
||||||
+ push @cmdl, [qw(create -f qcow2 -F raw -b), "$dir/Core-7.2.iso", "raid/pflash-vars-overlay0", 11116544];
|
|
||||||
+ is_deeply(\@gcmdl, \@cmdl, 'find the asset real path') or diag explain \@gcmdl;
|
|
||||||
};
|
|
||||||
|
|
||||||
subtest 'qemu was killed due to the system being out of memory' => sub {
|
|
||||||
@ -1,102 +0,0 @@
|
|||||||
From 489916d5a18113365a97eb3181cbb6c5e351c467 Mon Sep 17 00:00:00 2001
|
|
||||||
From: Marius Kittler <mkittler@suse.de>
|
|
||||||
Date: Wed, 8 Sep 2021 18:20:52 +0200
|
|
||||||
Subject: [PATCH] Deduce format of backing file from extension
|
|
||||||
|
|
||||||
* So even if we assign an ISO as HDD_x we would use the correct parameter
|
|
||||||
`-F raw` (and not `-F qcow2`)
|
|
||||||
* See https://github.com/os-autoinst/os-autoinst/pull/1764/files#r704549754
|
|
||||||
and https://progress.opensuse.org/issues/98117
|
|
||||||
---
|
|
||||||
OpenQA/Qemu/BlockDev.pm | 4 +++-
|
|
||||||
OpenQA/Qemu/BlockDevConf.pm | 10 ++++------
|
|
||||||
t/18-qemu.t | 16 +++++++++++-----
|
|
||||||
3 files changed, 18 insertions(+), 12 deletions(-)
|
|
||||||
|
|
||||||
diff --git a/OpenQA/Qemu/BlockDev.pm b/OpenQA/Qemu/BlockDev.pm
|
|
||||||
index 99a970ddb6..58f226fc65 100644
|
|
||||||
--- a/OpenQA/Qemu/BlockDev.pm
|
|
||||||
+++ b/OpenQA/Qemu/BlockDev.pm
|
|
||||||
@@ -33,7 +33,7 @@ weakened.
|
|
||||||
=cut
|
|
||||||
|
|
||||||
package OpenQA::Qemu::BlockDev;
|
|
||||||
-use Mojo::Base 'OpenQA::Qemu::MutParams';
|
|
||||||
+use Mojo::Base 'OpenQA::Qemu::MutParams', -signatures;
|
|
||||||
|
|
||||||
use Scalar::Util 'weaken';
|
|
||||||
use OpenQA::Qemu::SnapshotConf;
|
|
||||||
@@ -216,6 +216,8 @@ sub _from_map {
|
|
||||||
->snapshot($snap_conf->get_snapshot(sequence => $this->{snapshot}));
|
|
||||||
}
|
|
||||||
|
|
||||||
+sub deduce_driver ($self) { $self->driver($self->file =~ qr/\.qcow2$/ ? 'qcow2' : 'raw') }
|
|
||||||
+
|
|
||||||
sub CARP_TRACE { 'OpenQA::Qemu::BlockDev(' . (shift->node_name || '') . ')' }
|
|
||||||
|
|
||||||
1;
|
|
||||||
diff --git a/OpenQA/Qemu/BlockDevConf.pm b/OpenQA/Qemu/BlockDevConf.pm
|
|
||||||
index 2b8dacbf32..bac282dfbc 100644
|
|
||||||
--- a/OpenQA/Qemu/BlockDevConf.pm
|
|
||||||
+++ b/OpenQA/Qemu/BlockDevConf.pm
|
|
||||||
@@ -131,7 +131,7 @@ new overlay is created so that the existing qcow2 image is not modified.
|
|
||||||
sub add_existing_drive {
|
|
||||||
my ($self, $id, $file_name, $model, $size, $num_queues) = @_;
|
|
||||||
|
|
||||||
- my $base_drive = $self->add_existing_base($id, $file_name, $size)->implicit(1);
|
|
||||||
+ my $base_drive = $self->add_existing_base($id, $file_name, $size)->implicit(1)->deduce_driver;
|
|
||||||
my $overlay = $self->add_new_overlay($id . OVERLAY_POSTFIX . '0', $base_drive);
|
|
||||||
|
|
||||||
return $self->_push_new_drive_dev($id, $overlay, $model, $num_queues);
|
|
||||||
@@ -164,11 +164,9 @@ variables. See the OpenQA::Qemu::PFlashDevice class.
|
|
||||||
=cut
|
|
||||||
sub add_pflash_drive {
|
|
||||||
my ($self, $id, $file_name, $size) = @_;
|
|
||||||
- my $base_drive = $self->add_existing_base($id, $file_name, $size)
|
|
||||||
- ->implicit(1)
|
|
||||||
- ->driver($file_name =~ qr/\.qcow2$/ ? 'qcow2' : 'raw');
|
|
||||||
- my $overlay = $self->add_new_overlay($id . OVERLAY_POSTFIX . '0', $base_drive);
|
|
||||||
- my $pflash = OpenQA::Qemu::PFlashDevice->new()
|
|
||||||
+ my $base_drive = $self->add_existing_base($id, $file_name, $size)->implicit(1)->deduce_driver;
|
|
||||||
+ my $overlay = $self->add_new_overlay($id . OVERLAY_POSTFIX . '0', $base_drive);
|
|
||||||
+ my $pflash = OpenQA::Qemu::PFlashDevice->new()
|
|
||||||
->id($id)
|
|
||||||
->drive($overlay);
|
|
||||||
|
|
||||||
diff --git a/t/18-qemu.t b/t/18-qemu.t
|
|
||||||
index 2d15dc1850..9483b296d4 100755
|
|
||||||
--- a/t/18-qemu.t
|
|
||||||
+++ b/t/18-qemu.t
|
|
||||||
@@ -114,7 +114,7 @@ $proc = qemu_proc('-foo', \%vars);
|
|
||||||
@gcmdl = $proc->gen_cmdline();
|
|
||||||
is_deeply(\@gcmdl, \@cmdl, 'Generate qemu command line for single existing UEFI disk using vars');
|
|
||||||
|
|
||||||
-@cmdl = ([qw(create -f qcow2 -F qcow2 -b), "$Bin/data/Core-7.2.iso", qw(raid/hd0-overlay0 11116544)]);
|
|
||||||
+@cmdl = ([qw(create -f qcow2 -F raw -b), "$Bin/data/Core-7.2.iso", qw(raid/hd0-overlay0 11116544)]);
|
|
||||||
@gcmdl = $proc->blockdev_conf->gen_qemu_img_cmdlines();
|
|
||||||
is_deeply(\@gcmdl, \@cmdl, 'Generate qemu-img command line for single existing UEFI disk');
|
|
||||||
|
|
||||||
@@ -380,13 +380,19 @@ subtest DriveDevice => sub {
|
|
||||||
};
|
|
||||||
|
|
||||||
subtest 'relative assets' => sub {
|
|
||||||
- $vars{$_} = "Core-7.2.iso" for qw(ISO ISO_1 HDD_1 UEFI_PFLASH_VARS);
|
|
||||||
+ $vars{$_} = "Core-7.2.iso" for qw(ISO ISO_1 UEFI_PFLASH_VARS);
|
|
||||||
+ $vars{$_} = "some.qcow2" for qw(HDD_1 UEFI_PFLASH_VARS);
|
|
||||||
symlink("$Bin/data/Core-7.2.iso", "./Core-7.2.iso");
|
|
||||||
+ path('./some.qcow2')->spurt('123');
|
|
||||||
$proc = qemu_proc('-foo', \%vars);
|
|
||||||
my @gcmdl = $proc->blockdev_conf->gen_qemu_img_cmdlines();
|
|
||||||
- @cmdl = map { [qw(create -f qcow2 -F), $_ eq 'hd0' ? 'qcow2' : 'raw', '-b', "$dir/Core-7.2.iso", "raid/$_-overlay0", 11116544] } qw(hd0 cd0 cd1);
|
|
||||||
- push @cmdl, [qw(create -f qcow2 -F raw -b), "$Bin/data/uefi-code.bin", "raid/pflash-code-overlay0", 1966080];
|
|
||||||
- push @cmdl, [qw(create -f qcow2 -F raw -b), "$dir/Core-7.2.iso", "raid/pflash-vars-overlay0", 11116544];
|
|
||||||
+ @cmdl = (
|
|
||||||
+ [qw(create -f qcow2 -F qcow2 -b), "$dir/some.qcow2", "raid/hd0-overlay0", 512],
|
|
||||||
+ [qw(create -f qcow2 -F raw -b), "$dir/Core-7.2.iso", "raid/cd0-overlay0", 11116544],
|
|
||||||
+ [qw(create -f qcow2 -F raw -b), "$dir/Core-7.2.iso", "raid/cd1-overlay0", 11116544],
|
|
||||||
+ [qw(create -f qcow2 -F raw -b), "$Bin/data/uefi-code.bin", "raid/pflash-code-overlay0", 1966080],
|
|
||||||
+ [qw(create -f qcow2 -F qcow2 -b), "$dir/some.qcow2", "raid/pflash-vars-overlay0", 512],
|
|
||||||
+ );
|
|
||||||
is_deeply(\@gcmdl, \@cmdl, 'find the asset real path') or diag explain \@gcmdl;
|
|
||||||
};
|
|
||||||
|
|
||||||
@ -1 +1 @@
|
|||||||
SHA512 (os-autoinst-ad28b4b59369ada5731ebd7f0916bc2e52324988.tar.gz) = 18dca7ea8d587953aa0823e376c7bd8197c3fbd2a1c57d148a5946a2edf4bfe02c8ad81067c950166719c906c7170a79935f8fd4baea6df1dd0f3844097c983c
|
SHA512 (os-autoinst-627473ea5222dd4ad4cb0bfe82f0d5b5bcbe23c8.tar.gz) = ce2092237fe81e67fa5292d0ffd1d08f9deda9828831a7794599669067799d77bdff2282fcc760884815d7edfcf5972f4466c6e70caea1dd07ea835d5b0867d4
|
||||||
|
|||||||
Loading…
Reference in new issue