From c55db8df23fde25c09dc0e93840ae4e7193fc2f4 Mon Sep 17 00:00:00 2001 From: Alexandre Derumier Date: Thu, 27 Dec 2012 09:18:16 +0100 Subject: [PATCH] add downtime && expected_downtime query-migrate info Signed-off-by: Alexandre Derumier (cherry picked from commit 135007c0992c62c394f956e6aa8b3f207355c0a3) --- PVE/QemuMigrate.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/PVE/QemuMigrate.pm b/PVE/QemuMigrate.pm index 282cbc5..38f1d05 100644 --- a/PVE/QemuMigrate.pm +++ b/PVE/QemuMigrate.pm @@ -402,7 +402,8 @@ sub phase2 { my $delay = time() - $start; if ($delay > 0) { my $mbps = sprintf "%.2f", $conf->{memory}/$delay; - $self->log('info', "migration speed: $mbps MB/s"); + my $downtime = $stat->{downtime} || 0; + $self->log('info', "migration speed: $mbps MB/s - downtime $downtime ms"); } } @@ -424,11 +425,12 @@ sub phase2 { my $xbzrlepages = $stat->{"xbzrle-cache"}->{"pages"} || 0; my $xbzrlecachemiss = $stat->{"xbzrle-cache"}->{"cache-miss"} || 0; my $xbzrleoverflow = $stat->{"xbzrle-cache"}->{"overflow"} || 0; + my $expected_downtime = $stat->{"expected-downtime"} || 0; #reduce sleep if remainig memory if lower than the everage transfert $usleep = 300000 if $avglstat && $rem < $avglstat; $self->log('info', "migration status: $stat->{status} (transferred ${trans}, " . - "remaining ${rem}), total ${total})"); + "remaining ${rem}), total ${total}) , expected downtime ${expected_downtime}"); #$self->log('info', "migration xbzrle cachesize: ${xbzrlecachesize} transferred ${xbzrlebytes} pages ${xbzrlepages} cachemiss ${xbzrlecachemiss} overflow ${xbzrleoverflow}"); } -- 2.39.2