Subject: [PATCH] gnu: virtualization: Add qmpbackup.
From: Rutger Helling <[email-masked]>
To: [email-masked]
Date: Tue, 05 Dec 2017 08:26:15 +0100
List-Id: <debbugs-submit.debbugs.gnu.org>

Hey Guix, 

This patch adds qmpbackup.

From 46a7ca3cf49e11f13f5df15d6ef50aec8d4f09e0 Mon Sep 17 00:00:00 2001
From: Rutger Helling <[email-masked]>
Date: Tue, 5 Dec 2017 08:19:21 +0100
Subject: [PATCH] gnu: virtualization: Add qmpbackup.

* gnu/packages/virtualization.scm (qmpbackup): New variable.
---
 gnu/packages/virtualization.scm | 25 ++++++++++++++++++++++++-
 1 file changed, 24 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/virtualization.scm b/gnu/packages/virtualization.scm
index 184ba0155..5993fbada 100644
--- a/gnu/packages/virtualization.scm
+++ b/gnu/packages/virtualization.scm
@@ -61,7 +61,7 @@
   #:use-module (guix build-system gnu)
   #:use-module (guix build-system python)
   #:use-module (guix download)
-  #:use-module ((guix licenses) #:select (gpl2 gpl2+ lgpl2.1 lgpl2.1+))
+  #:use-module ((guix licenses) #:select (gpl2 gpl2+ gpl3+ lgpl2.1 lgpl2.1+))
   #:use-module (guix packages)
   #:use-module (guix utils)
   #:use-module (srfi srfi-1))
@@ -687,3 +687,26 @@ mainly implemented in user space.")
     ;; The project is licensed under GPLv2; files in the lib/ directory are
     ;; LGPLv2.1.
     (license (list gpl2 lgpl2.1))))
+
+(define-public qmpbackup
+  (package
+    (name "qmpbackup")
+    (version "0.2")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "https://github.com/abbbi/qmpbackup/archive/"
+                                  version ".tar.gz"))
+              (sha256
+               (base32
+                "10k9mnb1yrg4gw1rvz4kw4dxc4aajl8gnjrpm3axqkg63qmxj3qn"))
+              (file-name (string-append name "-" version ".tar.gz"))))
+    (build-system python-build-system)
+    (arguments
+     `(#:python ,python-2))
+    (home-page "https://github.com/abbbi/qmpbackup")
+    (synopsis "Create live full and incremental backups via QMP")
+    (description "qmpbackup is designed to create live full and
+incremental backups of running qemu virtual machines via the QMP
+protocol.  It makes use of the dirty-bitmap feature introduced in later
+qemu versions.")
+    (license gpl3+)))
-- 
2.15.1