From a6c74f3b4031f8f599db214886d2561d5647e1e1 Mon Sep 17 00:00:00 2001
From: JEAN-FRANCOIS GUILLAUME <mrbear@yam-it.net>
Date: Fri, 10 Dec 2021 21:05:50 +0100
Subject: [PATCH] first attempt to add apptainer-singularity

---
 glicid/packages/linux.scm | 61 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 61 insertions(+)

diff --git a/glicid/packages/linux.scm b/glicid/packages/linux.scm
index f18ce17..da17993 100644
--- a/glicid/packages/linux.scm
+++ b/glicid/packages/linux.scm
@@ -1,7 +1,17 @@
 (define-module (glicid packages linux)
   #:use-module (guix packages)
   #:use-module (guix download)
+  #:use-module ((guix licenses) #:prefix license:)
+  #:use-module (guix build-system gnu)
+  #:use-module (guix build-system go)
+  #:use-module (gnu packages backup)
+  #:use-module (gnu packages compression)
+  #:use-module (gnu packages cryptsetup)
+  #:use-module (gnu packages golang)
   #:use-module ((gnu packages linux) #:prefix gnu:)
+  #:use-module (gnu packages pkg-config)
+  #:use-module (gnu packages python)
+  #:use-module (gnu packages tls)
 )
 
 (define-public rdma-core-newer-37.1
@@ -71,3 +81,54 @@
 (define local-libfabric libfabric-newer-1.14.0)
 
 (define-public libfabric-latest local-libfabric)
+
+(define-public apptainer-singularity-3.8.5
+  (package
+    (name "singularity")
+    (version "3.8.5")
+    (source
+      (origin
+        (method url-fetch)
+        (uri (string-append "https://github.com/apptainer/singularity/releases/download/v" version "/singularity-" version ".tar.gz"))
+        (sha256 (base32 "1r1w2n1ndj5psvpm87ij6gwr0hwrbsn6gllv4q44spbvq2spizvz"))
+      )
+    )
+    (home-page "https://apptainer.org/")
+    (synopsis "THE CONTAINER SYSTEM FOR SECURE HIGH PERFORMANCE COMPUTING")
+    (description "Apptainer/Singularity is the most widely used container system for HPC.
+                  It is designed to execute applications at bare-metal performance while
+                  being secure, portable, and 100% reproducible. Apptainer is an 
+                  open-source project with a friendly community of developers and users.
+                  The user base continues to expand, with Apptainer/Singularity now used
+                  across industry and academia in many areas of work."
+    )
+    (license license:bsd-3)
+    (build-system gnu-build-system)
+    (inputs `(
+      ("libarchive", libarchive)
+      ("python", python-wrapper)
+      ("zlib", zlib)
+      ("squashfs-tools", squashfs-tools)
+      ("openssl", openssl)
+      ("libseccomp", gnu:libseccomp)
+      ("cryptsetup", cryptsetup)
+      ("go", go-1.17)
+      ("pkg-config", pkg-config)
+    ))
+    (arguments
+      `(#:phases
+        (modify-phases %standard-phases
+          (replace 'configure
+            (lambda* (#:key inputs native-inputs propagated-inputs configure-flags #:allow-other-keys)
+              (begin
+                (invoke "./mconfig" "--localstatedir=/var")
+              )
+            )
+          )
+        )
+      )
+    )
+  )
+)
+
+apptainer-singularity-3.8.5