From: Dietmar Maurer <dietmar@proxmox.com>
Date: Mon, 29 Oct 2012 11:15:43 +0000 (+0100)
Subject: fix memory leak in QMP Client (many thanks to Stefan!)
X-Git-Url: https://git.proxmox.com/?a=commitdiff_plain;h=b3ea07f71ee0abbeb26779f88594b1c7e037e124;p=qemu-server.git

fix memory leak in QMP Client (many thanks to Stefan!)
---

diff --git a/Makefile b/Makefile
index 7835a2a..8d098f1 100644
--- a/Makefile
+++ b/Makefile
@@ -2,7 +2,7 @@ RELEASE=2.2
 
 VERSION=2.0
 PACKAGE=qemu-server
-PKGREL=63
+PKGREL=64
 
 DESTDIR=
 PREFIX=/usr
diff --git a/PVE/QMPClient.pm b/PVE/QMPClient.pm
index 9829986..4fdb7f3 100755
--- a/PVE/QMPClient.pm
+++ b/PVE/QMPClient.pm
@@ -7,6 +7,7 @@ use IO::Multiplex;
 use POSIX qw(EINTR EAGAIN);
 use JSON;
 use Time::HiRes qw(usleep gettimeofday tv_interval);
+use Scalar::Util qw(weaken);
 
 use Data::Dumper;
 
@@ -35,6 +36,10 @@ sub new {
 
     $mux->set_callback_object($self);
 
+    # make sure perl doesn't believe this is a circular reference as we 
+    # delete mux in DESTROY
+    weaken($mux->{_object});
+
     return $self;
 }
 
diff --git a/changelog.Debian b/changelog.Debian
index ef17485..06cc400 100644
--- a/changelog.Debian
+++ b/changelog.Debian
@@ -1,3 +1,9 @@
+qemu-server (2.0-64) unstable; urgency=low
+
+  * fix memory leak in QMP Client (many thanks to Stefan!)
+
+ -- Proxmox Support Team <support@proxmox.com>  Mon, 29 Oct 2012 12:14:51 +0100
+
 qemu-server (2.0-63) unstable; urgency=low
 
   * fix bug in vmtar