From 4dcc780c2a068d1c51408022466e373f9fa842dd Mon Sep 17 00:00:00 2001
From: Wolfgang Link <w.link@proxmox.com>
Date: Mon, 15 Feb 2016 11:45:56 +0100
Subject: [PATCH] If we freeze the fs with the Qemu-Guest-Agent test if QGA is
 running.

---
 PVE/QemuServer.pm | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/PVE/QemuServer.pm b/PVE/QemuServer.pm
index 1139438c..bfce953b 100644
--- a/PVE/QemuServer.pm
+++ b/PVE/QemuServer.pm
@@ -6120,6 +6120,17 @@ sub do_snapshots_with_qemu {
     return undef;
 }
 
+sub qga_check_running {
+    my ($vmid) = @_;
+
+    eval { vm_mon_cmd($vmid, "guest-ping", timeout => 3); };
+    if ($@) {
+	warn "Qemu Guest Agent are not running - $@";
+	return 0;
+    }
+    return 1;
+}
+
 sub snapshot_create {
     my ($vmid, $snapname, $save_vmstate, $comment) = @_;
 
@@ -6131,7 +6142,7 @@ sub snapshot_create {
 
     my $running = check_running($vmid);
 
-    my $freezefs = $running && $config->{agent};
+    my $freezefs = $running && $config->{agent} && qga_check_running($vmid);
     $freezefs = 0 if $snap->{vmstate}; # not needed if we save RAM
 
     my $drivehash = {};