[pve-devel] [PATCH v3 qemu-server 5/7] cloudinit : add extract_cloudinit_config
Alexandre Derumier
aderumier at odiso.com
Wed Jun 9 13:54:15 CEST 2021
Signed-off-by: Alexandre Derumier <aderumier at odiso.com>
---
PVE/API2/Qemu.pm | 1 +
PVE/QemuServer/Cloudinit.pm | 47 ++++++++++++++++++++++++++++++++++++-
2 files changed, 47 insertions(+), 1 deletion(-)
diff --git a/PVE/API2/Qemu.pm b/PVE/API2/Qemu.pm
index cc58744..8ac3ae3 100644
--- a/PVE/API2/Qemu.pm
+++ b/PVE/API2/Qemu.pm
@@ -1063,6 +1063,7 @@ __PACKAGE__->register_method({
path => '{vmid}/cloudinit',
method => 'GET',
proxyto => 'node',
+ protected => '1',
description => "Get the cloudinit configuration with both current and pending values.",
permissions => {
check => ['perm', '/vms/{vmid}', [ 'VM.Audit' ]],
diff --git a/PVE/QemuServer/Cloudinit.pm b/PVE/QemuServer/Cloudinit.pm
index 156e073..917511e 100644
--- a/PVE/QemuServer/Cloudinit.pm
+++ b/PVE/QemuServer/Cloudinit.pm
@@ -607,11 +607,56 @@ sub dump_cloudinit_config {
}
}
+sub extract_cloudinit_config {
+ my ($conf, $vmid) = @_;
+
+ my $current_drive = undef;
+ PVE::QemuConfig->foreach_volume($conf, sub {
+ my ($ds, $drive) = @_;
+ $current_drive = $drive if PVE::QemuServer::drive_is_cloudinit($drive);
+
+ });
+
+ my $running = PVE::QemuServer::check_running($vmid);
+ my $storecfg = PVE::Storage::config();
+ my $iso_path = PVE::Storage::path($storecfg, $current_drive->{file});
+ my ($storeid, $volname) = PVE::Storage::parse_volume_id($current_drive->{file}, 1);
+ my $scfg = PVE::Storage::storage_config($storecfg, $storeid);
+ my $format = PVE::QemuServer::qemu_img_format($scfg, $volname);
+ my $plugin = PVE::Storage::Plugin->lookup($scfg->{type});
+ $plugin->activate_volume($storeid, $scfg, $volname) if !$running;
+
+ my $raw_cloudinit_config = undef;
+
+ my $path = "/run/pve/cloudinit_current/$vmid";
+ mkpath $path;
+ my $parser = sub {
+ my $line = shift;
+ $raw_cloudinit_config .= "$line\n";
+ };
+ eval {
+ #qemu-img dd is really slower (5s) than convert (0.2s)
+ run_command([
+ ['qemu-img', 'convert', '-f', 'raw', '-O', 'raw', "$iso_path", "$path/iso"]
+ ]);
+
+ run_command([
+ ['isoinfo', '-i', "$path/iso", '-x', "/PROXMOX/VMCONF.\;1"]
+ ], outfunc => $parser);
+ };
+ rmtree($path);
+ $plugin->deactivate_volume($storeid, $scfg, $volname) if !$running;
+
+ my $cloudinit_config = PVE::QemuServer::parse_vm_config("/qemu-server/$vmid.conf", $raw_cloudinit_config);
+ return $cloudinit_config;
+}
+
sub get_pending_config {
my ($conf, $vmid) = @_;
+
my $newconf = { %{$conf} };
- my $cloudinit_current = $newconf->{cloudinit};
+ my $cloudinit_current = extract_cloudinit_config($conf, $vmid);
my @cloudinit_opts = keys %{PVE::QemuServer::cloudinit_config_properties()};
push @cloudinit_opts, 'name';
--
2.20.1
More information about the pve-devel
mailing list