From ea203a88cfffc85202fe0866c3f1a566c45dfba8 Mon Sep 17 00:00:00 2001
From: Yann Dupont <yann@objoo.org>
Date: Tue, 26 Oct 2021 22:45:34 +0200
Subject: [PATCH] qemu is now in virtualization

---
 glicid/packages/glicid.scm         |  30 -------
 glicid/packages/virtualization.scm | 133 +++++++++++++++++++++++++++++
 2 files changed, 133 insertions(+), 30 deletions(-)
 create mode 100644 glicid/packages/virtualization.scm

diff --git a/glicid/packages/glicid.scm b/glicid/packages/glicid.scm
index 68fe094..32c929f 100644
--- a/glicid/packages/glicid.scm
+++ b/glicid/packages/glicid.scm
@@ -721,34 +721,4 @@
 )
 
 
-(define-public glicid-qemu
-
-  (package
-    (inherit qemu)
-    (name "glicid-qemu")
-  )
- )
-
-
-(define-public qemu-with-rbd
-
-
-  (package
-    (inherit glicid-qemu)
-    (name "qemu-with-rbd")
-    (arguments
-
-     (substitute-keyword-arguments
-         `(#:tests? #f
-           ,@(package-arguments glicid-qemu)))
-
-   )
-
-     (inputs `(("glicid-ceph:lib", glicid-ceph "lib" )
-      ,@(package-inputs glicid-qemu)))
-
- )
-)
-
-
 ;;; glicid.scm ends here
diff --git a/glicid/packages/virtualization.scm b/glicid/packages/virtualization.scm
new file mode 100644
index 0000000..774514c
--- /dev/null
+++ b/glicid/packages/virtualization.scm
@@ -0,0 +1,133 @@
+(define-module (glicid packages glicid)
+  #:use-module (guix packages)
+  #:use-module (guix download)
+  #:use-module (guix git-download)
+  #:use-module (guix build-system gnu)
+  #:use-module (guix build-system cmake)
+;  #:use-module (guix licenses)
+  #:use-module (gnu packages gawk)
+  #:use-module (gnu packages gcc)
+  #:use-module (gnu packages commencement)
+  #:use-module (guix build-system python)
+  #:use-module ((guix licenses) #:prefix license:)
+  #:use-module ((guix utils) #:select (target-64bit?))
+  #:use-module (gnu packages)
+  #:use-module (gnu packages admin)
+  #:use-module (gnu packages autotools)
+  #:use-module (gnu packages base)
+  #:use-module (gnu packages freeipmi)
+  #:use-module (gnu packages linux)
+  #:use-module (gnu packages mpi)
+  #:use-module (gnu packages perl)
+  #:use-module (gnu packages pkg-config)
+  #:use-module (gnu packages parallel)
+  #:use-module (gnu packages storage)
+  #:use-module (gnu packages networking)
+  #:use-module (gnu packages gtk)  
+  #:use-module (gnu packages python)
+  #:use-module (gnu packages python-science)
+  #:use-module (gnu packages python-web)
+  #:use-module (gnu packages python-xyz)
+  #:use-module (gnu packages readline)
+  #:use-module (gnu packages tcl)
+  #:use-module (gnu packages tls)
+  #:use-module (gnu packages commencement)
+  #:use-module (gnu packages gcc)
+  #:use-module (gnu packages chemistry)
+  #:use-module (gnu packages sphinx)
+  #:use-module (srfi srfi-1)
+  #:use-module (gnu packages mpi)
+  #:use-module (gnu packages sssd)
+  #:use-module (gnu packages fabric-management)
+  #:use-module (gnu packages benchmark)
+  #:use-module (gnu packages messaging)
+  #:use-module (gnu packages web)
+  #:use-module (gnu packages gnome)
+  #:use-module (gnu packages cluster)  
+  #:use-module (gnu packages libevent)
+  #:use-module (gnu packages xorg)
+  #:use-module (gnu packages fontutils)
+  #:use-module (gnu packages flex)
+  #:use-module (gnu packages bison)
+  #:use-module (gnu packages pkg-config)
+  #:use-module (gnu packages autotools)
+  #:use-module (gnu packages fontutils)
+  #:use-module (guix build-system gnu)
+  #:use-module (gnu packages image)
+  #:use-module (gnu packages maths)     
+  #:use-module (guix utils)
+  #:use-module (gnu packages cmake)
+  #:use-module  (gnu packages pretty-print)
+  #:use-module (gnu packages boost)
+  #:use-module (gnu packages curl)
+  #:use-module (gnu packages cryptsetup)
+  #:use-module (gnu packages xml)
+  #:use-module (gnu packages admin)
+  #:use-module (gnu packages assembly)
+  #:use-module (gnu packages authentication)
+  #:use-module (gnu packages bdw-gc)
+  #:use-module (gnu packages boost) 
+  #:use-module (gnu packages compression)
+  #:use-module (gnu packages crypto)
+  #:use-module (gnu packages cryptsetup)
+  #:use-module (gnu packages curl)
+  #:use-module (gnu packages databases)
+  #:use-module (gnu packages disk)
+  #:use-module (gnu packages gperf)
+  #:use-module (gnu packages jemalloc)
+  #:use-module (gnu packages linux)   
+  #:use-module (gnu packages lua)     
+  #:use-module (gnu packages ncurses) 
+  #:use-module (gnu packages networking)
+  #:use-module (gnu packages nss)
+  #:use-module (gnu packages openldap)
+  #:use-module (gnu packages pkg-config)
+  #:use-module (gnu packages python)
+  #:use-module (gnu packages python-xyz)
+  #:use-module (gnu packages sphinx)
+  #:use-module (gnu packages tls)   
+  #:use-module (gnu packages web)   
+;;  #:use-module (gnu packages glicid)
+  #:use-module (gnu packages pretty-print)
+  #:use-module (gnu packages virtualization)
+  #:use-module (glicid packages storage)
+  #:use-module (glicid packages mpi)
+  #:use-module (glicid packages gcc)
+  
+)
+
+
+;;;;;;;;
+
+
+(define-public glicid-qemu
+
+  (package
+    (inherit qemu)
+    (name "glicid-qemu")
+  )
+ )
+
+
+(define-public qemu-with-rbd
+
+
+  (package
+    (inherit glicid-qemu)
+    (name "qemu-with-rbd")
+    (arguments
+
+     (substitute-keyword-arguments
+         `(#:tests? #f
+           ,@(package-arguments glicid-qemu)))
+
+   )
+
+     (inputs `(("glicid-ceph:lib", glicid-ceph "lib" )
+      ,@(package-inputs glicid-qemu)))
+
+ )
+)
+
+
+;;; glicid/virtualizationvirtualization.scm ends here