From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from firstgate.proxmox.com (firstgate.proxmox.com [212.224.123.68]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (2048 bits)) (No client certificate requested) by lists.proxmox.com (Postfix) with ESMTPS id D86F88603F for ; Wed, 22 Dec 2021 14:53:16 +0100 (CET) Received: from firstgate.proxmox.com (localhost [127.0.0.1]) by firstgate.proxmox.com (Proxmox) with ESMTP id 8412916F3A for ; Wed, 22 Dec 2021 14:53:14 +0100 (CET) Received: from proxmox-new.maurer-it.com (proxmox-new.maurer-it.com [94.136.29.106]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (2048 bits)) (No client certificate requested) by firstgate.proxmox.com (Proxmox) with ESMTPS id 9850216D52 for ; Wed, 22 Dec 2021 14:53:06 +0100 (CET) Received: from proxmox-new.maurer-it.com (localhost.localdomain [127.0.0.1]) by proxmox-new.maurer-it.com (Proxmox) with ESMTP id D52FF45F44 for ; Wed, 22 Dec 2021 14:53:05 +0100 (CET) From: =?UTF-8?q?Fabian=20Gr=C3=BCnbichler?= To: pve-devel@lists.proxmox.com Date: Wed, 22 Dec 2021 14:52:46 +0100 Message-Id: <20211222135257.3242938-11-f.gruenbichler@proxmox.com> X-Mailer: git-send-email 2.30.2 In-Reply-To: <20211222135257.3242938-1-f.gruenbichler@proxmox.com> References: <20211222135257.3242938-1-f.gruenbichler@proxmox.com> MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit X-SPAM-LEVEL: Spam detection results: 0 AWL 0.233 Adjusted score from AWL reputation of From: address BAYES_00 -1.9 Bayes spam probability is 0 to 1% KAM_DMARC_STATUS 0.01 Test Rule for DKIM or SPF Failure with Strict Alignment SPF_HELO_NONE 0.001 SPF: HELO does not publish an SPF Record SPF_PASS -0.001 SPF: sender matches SPF record Subject: [pve-devel] [PATCH v3 qemu-server 03/10] parse_config: optional strict mode X-BeenThere: pve-devel@lists.proxmox.com X-Mailman-Version: 2.1.29 Precedence: list List-Id: Proxmox VE development discussion List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Wed, 22 Dec 2021 13:53:16 -0000 when passing a config from one cluster to another, we want to be strict when parsing - it's better to fail the migration early and upgrade the target node instead of failing the migration later (when significant work for transferring disks and/or state has already been done) or not at all, but silently lose config settings that the target doesn't understand. this also might be helpful in other cases - e.g. when restoring from a backup. Signed-off-by: Fabian Grünbichler --- Notes: v3: new PVE/QemuServer.pm | 20 +++++++++++++++----- 1 file changed, 15 insertions(+), 5 deletions(-) diff --git a/PVE/QemuServer.pm b/PVE/QemuServer.pm index f5beb1b..be88385 100644 --- a/PVE/QemuServer.pm +++ b/PVE/QemuServer.pm @@ -2329,7 +2329,7 @@ sub destroy_vm { } sub parse_vm_config { - my ($filename, $raw) = @_; + my ($filename, $raw, $strict) = @_; return if !defined($raw); @@ -2339,6 +2339,16 @@ sub parse_vm_config { pending => {}, }; + my $handle_error = sub { + my ($msg) = @_; + + if ($strict) { + warn $msg; + } else { + die $msg; + } + }; + $filename =~ m|/qemu-server/(\d+)\.conf$| || die "got strange filename '$filename'"; @@ -2393,14 +2403,14 @@ sub parse_vm_config { if ($section eq 'pending') { $conf->{delete} = $value; # we parse this later } else { - warn "vm $vmid - propertry 'delete' is only allowed in [PENDING]\n"; + $handle_error->("vm $vmid - property 'delete' is only allowed in [PENDING]\n"); } } elsif ($line =~ m/^([a-z][a-z_]*\d*):\s*(.+?)\s*$/) { my $key = $1; my $value = $2; eval { $value = check_type($key, $value); }; if ($@) { - warn "vm $vmid - unable to parse value of '$key' - $@"; + $handle_error->("vm $vmid - unable to parse value of '$key' - $@"); } else { $key = 'ide2' if $key eq 'cdrom'; my $fmt = $confdesc->{$key}->{format}; @@ -2410,7 +2420,7 @@ sub parse_vm_config { $v->{file} = $volid; $value = print_drive($v); } else { - warn "vm $vmid - unable to parse value of '$key'\n"; + $handle_error->("vm $vmid - unable to parse value of '$key'\n"); next; } } @@ -2418,7 +2428,7 @@ sub parse_vm_config { $conf->{$key} = $value; } } else { - warn "vm $vmid - unable to parse config: $line\n"; + $handle_error->("vm $vmid - unable to parse config: $line\n"); } } -- 2.30.2