PVE::QemuConfig->foreach_volume($conf, sub {
my ($ds, $drive) = @_;
+
my ($storeid, $volname) = PVE::Storage::parse_volume_id($drive->{file}, 1);
return if !$volname || $volname !~ m/vm-$vmid-cloudinit/;
$generator->($conf, $vmid, $drive, $volname, $storeid);
});
- my $cloudinit_conf = {};
+ my $cloudinitconf = delete $conf->{cloudinit};
+ $cloudinitconf = {};
my @cloudinit_opts = keys %{PVE::QemuServer::cloudinit_config_properties()};
push @cloudinit_opts, 'name';
for my $opt (@cloudinit_opts) {
+
if ($opt =~ m/^ipconfig(\d+)/) {
my $netid = "net$1";
next if !defined($conf->{$netid});
- $cloudinit_conf->{$netid} = $conf->{$netid};
+ $conf->{cloudinit}->{$netid} = $conf->{$netid};
}
- $cloudinit_conf->{$opt} = $conf->{$opt} if $conf->{$opt};
+ $conf->{cloudinit}->{$opt} = $conf->{$opt} if $conf->{$opt};
}
- my $has_cloudinit_drive = 0;
+ $conf->{cloudinit}->{name} = "VM$vmid" if !$conf->{cloudinit}->{name};
+
for my $opt (keys %{$conf}) {
if (PVE::QemuServer::is_valid_drivename($opt)) {
my $drive = PVE::QemuServer::parse_drive($opt, $conf->{$opt});
if (PVE::QemuServer::drive_is_cloudinit($drive)) {
- $has_cloudinit_drive = 1;
- $cloudinit_conf->{$opt} = $conf->{$opt};
+ $conf->{cloudinit}->{$opt} = $conf->{$opt};
}
}
}
- $cloudinit_conf->{name} //= "VM$vmid" if $has_cloudinit_drive;
- return $cloudinit_conf;
+ PVE::QemuConfig->write_config($vmid, $conf);
+
}
sub dump_cloudinit_config {