From 4305207d61ace1f85940de18a877b0fa29fd40a5 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Fabian=20Gr=C3=BCnbichler?= Date: Fri, 4 Aug 2017 14:54:07 +0200 Subject: [PATCH 1/1] migrate: reduce polling intervals MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Signed-off-by: Fabian Grünbichler --- PVE/QemuMigrate.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/PVE/QemuMigrate.pm b/PVE/QemuMigrate.pm index 4e6a7f0..fc847cc 100644 --- a/PVE/QemuMigrate.pm +++ b/PVE/QemuMigrate.pm @@ -723,7 +723,7 @@ sub phase2 { $self->log('info', "migrate uri => $ruri failed: $merr") if $merr; my $lstat = 0; - my $usleep = 2000000; + my $usleep = 1000000; my $i = 0; my $err_count = 0; my $lastrem = undef; @@ -784,8 +784,8 @@ sub phase2 { my $xbzrlepages = $stat->{"xbzrle-cache"}->{"pages"} || 0; my $xbzrlecachemiss = $stat->{"xbzrle-cache"}->{"cache-miss"} || 0; my $xbzrleoverflow = $stat->{"xbzrle-cache"}->{"overflow"} || 0; - #reduce sleep if remainig memory if lower than the everage transfert - $usleep = 300000 if $avglstat && $rem < $avglstat; + # reduce sleep if remainig memory is lower than the average transfer speed + $usleep = 100000 if $avglstat && $rem < $avglstat; $self->log('info', "migration status: $stat->{status} (transferred ${trans}, " . "remaining ${rem}), total ${total})"); -- 2.39.2