proxmox-mirrors/qemu-server
1
0
Fork 0
mirror of https://git.proxmox.com/git/qemu-server synced 2025-07-17 18:36:19 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

cleanup: whitespaces & style

Browse Source
This commit is contained in:
Wolfgang Bumiller 2017-01-05 09:16:28 +01:00
parent 5619e74aed
commit 3b4cf0f0fc
3 changed files with 13 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
PVE/API2/Qemu.pm
View File

@ -2464,15 +2464,14 @@ __PACKAGE__->register_method({
my $total_jobs = scalar(keys %{$drives});
my $i = 1;
my $skipcomplete = 1;
foreach my $opt (keys %$drives) {
my $drive = $drives->{$opt};
$skipcomplete = undef if $total_jobs == $i; #finish after last drive
my $skipcomplete = ($total_jobs != $i); # finish after last drive
my $newdrive = PVE::QemuServer::clone_disk($storecfg, $vmid, $running, $opt, $drive, $snapname,
$newid, $storage, $format, $fullclone->{$opt}, $newvollist, $jobs, $skipcomplete, $oldconf->{agent});
$newid, $storage, $format, $fullclone->{$opt}, $newvollist,
$jobs, $skipcomplete, $oldconf->{agent});
$newconf->{$opt} = PVE::QemuServer::print_drive($vmid, $newdrive);

14
PVE/QemuMigrate.pm
View File

@ -596,10 +596,12 @@ sub phase2 {
$self->{storage_migration_jobs} = {};
$self->log('info', "starting storage migration");
die "the number of destination local disk is not equal to number of source local disk" if (scalar(keys %{$self->{target_drive}}) != scalar @{$self->{online_local_volumes}});
die "the number of destination local disk is not equal to number of source local disk"
if (scalar(keys %{$self->{target_drive}}) != scalar @{$self->{online_local_volumes}});
foreach my $drive (keys %{$self->{target_drive}}){
$self->log('info', "$drive: start migration to to $self->{target_drive}->{$drive}->{nbd_uri}");
PVE::QemuServer::qemu_drive_mirror($vmid, $drive, $self->{target_drive}->{$drive}->{nbd_uri}, $vmid, undef, $self->{storage_migration_jobs}, 1);
my $nbd_uri = $self->{target_drive}->{$drive}->{nbd_uri};
$self->log('info', "$drive: start migration to to $nbd_uri");
PVE::QemuServer::qemu_drive_mirror($vmid, $drive, $nbd_uri, $vmid, undef, $self->{storage_migration_jobs}, 1);
}
}
@ -857,15 +859,14 @@ sub phase3_cleanup {
return if $self->{phase2errors};
if ($self->{storage_migration}) {
eval { PVE::QemuServer::qemu_drive_mirror_monitor($vmid, undef, $self->{storage_migration_jobs}); }; #finish block-job
# finish block-job
eval { PVE::QemuServer::qemu_drive_mirror_monitor($vmid, undef, $self->{storage_migration_jobs}); };
if (my $err = $@) {
eval { PVE::QemuServer::qemu_blockjobs_cancel($vmid, $self->{storage_migration_jobs}) };
eval { PVE::QemuMigrate::cleanup_remotedisks($self) };
die "Failed to completed storage migration\n";
} else {
foreach my $target_drive (keys %{$self->{target_drive}}) {
my $drive = PVE::QemuServer::parse_drive($target_drive, $self->{target_drive}->{$target_drive}->{volid});
$conf->{$target_drive} = PVE::QemuServer::print_drive($vmid, $drive);
@ -897,7 +898,6 @@ sub phase3_cleanup {
}
eval {
my $timer = 0;
if (PVE::QemuServer::vga_conf_has_spice($conf->{vga}) && $self->{running}) {
$self->log('info', "Waiting for spice server migration");

8
PVE/QemuServer.pm
View File

@ -4473,7 +4473,6 @@ sub vm_start {
my $local_volumes = {};
if ($targetstorage) {
foreach_drive($conf, sub {
my ($ds, $drive) = @_;
@ -4658,7 +4657,6 @@ sub vm_start {
#start nbd server for storage migration
if ($targetstorage) {
my $nodename = PVE::INotify::nodename();
my $migrate_network_addr = PVE::Cluster::get_local_migration_ip($migration_network);
my $localip = $migrate_network_addr ? $migrate_network_addr : PVE::Cluster::remote_node_ip($nodename, 1);
@ -4678,7 +4676,6 @@ sub vm_start {
}
if ($migratedfrom) {
eval {
set_migration_caps($vmid);
};
@ -4693,7 +4690,6 @@ sub vm_start {
}
} else {
if (!$statefile && (!defined($conf->{balloon}) || $conf->{balloon})) {
vm_mon_cmd_nocheck($vmid, "balloon", value => $conf->{balloon}*1024*1024)
if $conf->{balloon};
@ -5932,7 +5928,6 @@ sub qemu_drive_mirror {
exec(@$cmd);
exit(-1);
} else {
$jobs->{"drive-$drive"}->{pid} = $pid;
my $timeout = 0;
@ -5944,7 +5939,6 @@ sub qemu_drive_mirror {
}
}
} else {
my $storecfg = PVE::Storage::config();
my ($dst_storeid, $dst_volname) = PVE::Storage::parse_volume_id($dst_volid);
@ -5969,7 +5963,6 @@ sub qemu_drive_mirror {
die "mirroring error: $err";
}
qemu_drive_mirror_monitor ($vmid, $vmiddst, $jobs, $skipcomplete, $qga);
}
@ -5977,7 +5970,6 @@ sub qemu_drive_mirror_monitor {
my ($vmid, $vmiddst, $jobs, $skipcomplete, $qga) = @_;
eval {
my $err_complete = 0;
while (1) {