From ca3ac8820078650e52fc517c6bdb1a6a0e6e3d38 Mon Sep 17 00:00:00 2001 From: Thomas Lamprecht Date: Fri, 16 Oct 2020 16:52:29 +0200 Subject: [PATCH] drop legacy __read_avail code Signed-off-by: Thomas Lamprecht --- PVE/QemuServer.pm | 33 --------------------------------- 1 file changed, 33 deletions(-) diff --git a/PVE/QemuServer.pm b/PVE/QemuServer.pm index 9b646b56..a138b2e3 100644 --- a/PVE/QemuServer.pm +++ b/PVE/QemuServer.pm @@ -4195,39 +4195,6 @@ sub qemu_block_set_io_throttle { } -# old code, only used to shutdown old VM after update -sub __read_avail { - my ($fh, $timeout) = @_; - - my $sel = new IO::Select; - $sel->add($fh); - - my $res = ''; - my $buf; - - my @ready; - while (scalar (@ready = $sel->can_read($timeout))) { - my $count; - if ($count = $fh->sysread($buf, 8192)) { - if ($buf =~ /^(.*)\(qemu\) $/s) { - $res .= $1; - last; - } else { - $res .= $buf; - } - } else { - if (!defined($count)) { - die "$!\n"; - } - last; - } - } - - die "monitor read timeout\n" if !scalar(@ready); - - return $res; -} - sub qemu_block_resize { my ($vmid, $deviceid, $storecfg, $volid, $size) = @_; -- 2.39.5