From 6aa4651b8928255f2982a810eb16eb7e2c7435df Mon Sep 17 00:00:00 2001
From: Dietmar Maurer <dietmar@proxmox.com>
Date: Thu, 13 Sep 2012 09:45:48 +0200
Subject: [PATCH] include additional info in snapshot list

---
 Makefile         | 2 +-
 PVE/API2/Qemu.pm | 8 ++++++--
 2 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/Makefile b/Makefile
index 1b775e29..cd927f4a 100644
--- a/Makefile
+++ b/Makefile
@@ -1,4 +1,4 @@
-RELEASE=2.1
+RELEASE=2.2
 
 VERSION=2.0
 PACKAGE=qemu-server
diff --git a/PVE/API2/Qemu.pm b/PVE/API2/Qemu.pm
index 5d69ca33..a4b84e9f 100644
--- a/PVE/API2/Qemu.pm
+++ b/PVE/API2/Qemu.pm
@@ -1912,7 +1912,9 @@ __PACKAGE__->register_method({
     code => sub {
 	my ($param) = @_;
 
-	my $conf = PVE::QemuServer::load_config($param->{vmid});
+	my $vmid = $param->{vmid};
+
+	my $conf = PVE::QemuServer::load_config($vmid);
 	my $snaphash = $conf->{snapshots} || {};
 
 	my $res = [];
@@ -1922,6 +1924,7 @@ __PACKAGE__->register_method({
 	    my $item = { 
 		name => $name, 
 		snaptime => $d->{snaptime} || 0, 
+		vmstate => $d->{vmstate} ? 1 : 0,
 		description => $d->{description} || '',
 	    };
 	    $item->{parent} = $d->{parent} if $d->{parent};
@@ -1929,7 +1932,8 @@ __PACKAGE__->register_method({
 	    push @$res, $item;
 	}
 
-	my $current = { name => 'current', digest => $conf->{digest} };
+	my $running = PVE::QemuServer::check_running($vmid, 1) ? 1 : 0;
+	my $current = { name => 'current', digest => $conf->{digest}, running => $running };
 	$current->{parent} = $conf->{parent} if $conf->{parent};
 
 	push @$res, $current;
-- 
2.39.5