use guix style on *.scm

This commit is contained in:
Yann Dupont 2023-01-02 11:18:12 +01:00
parent a85adcc847
commit 09e78ddc85
28 changed files with 1981 additions and 2065 deletions

View file

@ -1,92 +1,102 @@
(define-module (glicid packages containers)
#:use-module (guix download)
#:use-module (guix packages)
#:use-module (guix gexp)
#:use-module ((guix licenses) #:prefix license:)
#:use-module ((gnu packages containers) #:prefix gnu:)
#:use-module (gnu packages linux)
#:use-module (gnu packages gnupg)
#:use-module (gnu packages golang)
#:use-module (gnu packages selinux)
#:use-module (gnu packages bash)
#:use-module (gnu packages version-control)
#:use-module (gnu packages pkg-config)
#:use-module (guix utils)
#:use-module (guix build-system gnu)
)
#:use-module (guix download)
#:use-module (guix packages)
#:use-module (guix gexp)
#:use-module ((guix licenses)
#:prefix license:)
#:use-module ((gnu packages containers)
#:prefix gnu:)
#:use-module (gnu packages linux)
#:use-module (gnu packages gnupg)
#:use-module (gnu packages golang)
#:use-module (gnu packages selinux)
#:use-module (gnu packages bash)
#:use-module (gnu packages version-control)
#:use-module (gnu packages pkg-config)
#:use-module (guix utils)
#:use-module (guix build-system gnu))
(define-public podman
(package
(name "podman")
(version "4.3.1")
(source (origin
(method url-fetch)
(uri (list
(string-append "https://github.com/containers/podman/archive/refs/tags/v" version ".tar.gz")
))
(sha256 (base32 "04w8lwybsxix4ms6gnsj2xp4xkm567fj0vnlwmjn7kbqxv22jp25"))
))
(method url-fetch)
(uri (list (string-append
"https://github.com/containers/podman/archive/refs/tags/v"
version ".tar.gz")))
(sha256
(base32
"04w8lwybsxix4ms6gnsj2xp4xkm567fj0vnlwmjn7kbqxv22jp25"))))
(home-page "https://podman.io")
(synopsis "Manage containers, images, pods, and their volumes")
(description "Podman (the POD MANager) is a tool for managing containers and images, volumes mounted into those containers, and pods made from groups of containers.")
(description
"Podman (the POD MANager) is a tool for managing containers and images, volumes mounted into those containers, and pods made from groups of containers.")
(license license:asl2.0)
(inputs (list btrfs-progs gnu:cni-plugins gnu:conmon gnu:crun gpgme go-github-com-go-md2man iptables libassuan libseccomp libselinux gnu:slirp4netns ))
(native-inputs (list bats git go pkg-config ))
(inputs (list btrfs-progs
gnu:cni-plugins
gnu:conmon
gnu:crun
gpgme
go-github-com-go-md2man
iptables
libassuan
libseccomp
libselinux
gnu:slirp4netns))
(native-inputs (list bats git go pkg-config))
(build-system gnu-build-system)
(arguments
(list
#:make-flags
#~(list #$(string-append "CC=" (cc-for-target))
(string-append "PREFIX=" #$output)
)
#:tests? #f
#:test-target "test"
#:phases
#~(modify-phases %standard-phases
(delete 'configure)
(add-after 'unpack 'set-env
(lambda* (#:key inputs #:allow-other-keys)
(setenv "HOME" "/tmp")
)
)
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(invoke "make" "localsystem")
(invoke "make" "remotesystem")
)
)
)
(add-after 'unpack 'fix-hardcoded-paths
(lambda _
(substitute*
(find-files "libpod" "\\.go")
(("exec.LookPath[(][\"]slirp4netns[\"][)]") (string-append "exec.LookPath(\"" (which "slirp4netns") "\")"))
)
(substitute* "hack/install_catatonit.sh" (("CATATONIT_PATH=\"[^\"]+\"") (string-append "CATATONIT_PATH=" (which "true"))))
(substitute* "vendor/github.com/containers/common/pkg/config/config_linux.go" (("/usr/local/libexec/podman")(string-append #$output "/bin")))
(substitute* "vendor/github.com/containers/common/pkg/config/default.go"
(("/usr/libexec/podman/conmon") (which "conmon")) (("/usr/local/libexec/cni") (string-append #$(this-package-input "cni-plugins") "/bin"))
(("/usr/bin/crun") (which "crun"))
)
)
)
(add-after 'unpack 'build-no-docs
(lambda _
(substitute* "Makefile" (("all: binaries docs") "all: binaries"))
(substitute* "Makefile" (("install: install.bin install.remote install.man install.systemd") "install: install.bin install.remote install.systemd"))
)
)
(add-after 'install 'install-completions
(lambda _
(invoke "make" "install.completions" (string-append "PREFIX=" #$output))
)
)
)
)
)
)
)
(list #:make-flags #~(list #$(string-append "CC="
(cc-for-target))
(string-append "PREFIX="
#$output))
#:tests? #f
#:test-target "test"
#:phases #~(modify-phases %standard-phases
(delete 'configure)
(add-after 'unpack 'set-env
(lambda* (#:key inputs #:allow-other-keys)
(setenv "HOME" "/tmp")))
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(invoke "make" "localsystem")
(invoke "make" "remotesystem"))))
(add-after 'unpack 'fix-hardcoded-paths
(lambda _
(substitute* (find-files "libpod" "\\.go")
(("exec.LookPath[(][\"]slirp4netns[\"][)]")
(string-append "exec.LookPath(\""
(which "slirp4netns") "\")")))
(substitute* "hack/install_catatonit.sh"
(("CATATONIT_PATH=\"[^\"]+\"")
(string-append "CATATONIT_PATH="
(which "true"))))
(substitute* "vendor/github.com/containers/common/pkg/config/config_linux.go"
(("/usr/local/libexec/podman")
(string-append #$output "/bin")))
(substitute* "vendor/github.com/containers/common/pkg/config/default.go"
(("/usr/libexec/podman/conmon")
(which "conmon"))
(("/usr/local/libexec/cni")
(string-append #$(this-package-input
"cni-plugins") "/bin"))
(("/usr/bin/crun")
(which "crun")))))
(add-after 'unpack 'build-no-docs
(lambda _
(substitute* "Makefile"
(("all: binaries docs")
"all: binaries"))
(substitute* "Makefile"
(("install: install.bin install.remote install.man install.systemd")
"install: install.bin install.remote install.systemd"))))
(add-after 'install 'install-completions
(lambda _
(invoke "make" "install.completions"
(string-append "PREFIX="
#$output)))))))))
(define-public podman-4.3.0
(package
@ -94,14 +104,13 @@
(name "podman")
(version "4.3.0")
(source (origin
(method url-fetch)
(uri (list
(string-append "https://github.com/containers/podman/archive/refs/tags/v" version ".tar.gz")
))
(sha256 (base32 "0d5zfi6drac23vb2la2v5s2g27hbz9wgiyvlxfm7hgzjh2ds18sm"))
))
)
)
(method url-fetch)
(uri (list (string-append
"https://github.com/containers/podman/archive/refs/tags/v"
version ".tar.gz")))
(sha256
(base32
"0d5zfi6drac23vb2la2v5s2g27hbz9wgiyvlxfm7hgzjh2ds18sm"))))))
;; YD : now uptreamed…
@ -126,14 +135,13 @@
(name "podman")
(version "4.2.0")
(source (origin
(method url-fetch)
(uri (list
(string-append "https://github.com/containers/podman/archive/refs/tags/v" version ".tar.gz")
))
(sha256 (base32 "1x5jmmz78ggnlyidc0ivcghpkysd4zkm598jjbf9gkaw09cvry0m"))
))
)
)
(method url-fetch)
(uri (list (string-append
"https://github.com/containers/podman/archive/refs/tags/v"
version ".tar.gz")))
(sha256
(base32
"1x5jmmz78ggnlyidc0ivcghpkysd4zkm598jjbf9gkaw09cvry0m"))))))
(define-public podman-4.1.1
(package
@ -141,14 +149,13 @@
(name "podman")
(version "4.1.1")
(source (origin
(method url-fetch)
(uri (list
(string-append "https://github.com/containers/podman/archive/refs/tags/v" version ".tar.gz")
))
(sha256 (base32 "198hdf8wg50zcgrl3982yj3xd227224r7mgb135r9vmgn7lk5gr7"))
))
)
)
(method url-fetch)
(uri (list (string-append
"https://github.com/containers/podman/archive/refs/tags/v"
version ".tar.gz")))
(sha256
(base32
"198hdf8wg50zcgrl3982yj3xd227224r7mgb135r9vmgn7lk5gr7"))))))
(define-public podman-4.1.0
(package
@ -156,11 +163,10 @@
(name "podman")
(version "4.1.0")
(source (origin
(method url-fetch)
(uri (list
(string-append "https://github.com/containers/podman/archive/refs/tags/v" version ".tar.gz")
))
(sha256 (base32 "158fyxv2hd1nwirabrwxascl9lkdphhv0knwrk0qdm0ifcmf257q"))
))
)
)
(method url-fetch)
(uri (list (string-append
"https://github.com/containers/podman/archive/refs/tags/v"
version ".tar.gz")))
(sha256
(base32
"158fyxv2hd1nwirabrwxascl9lkdphhv0knwrk0qdm0ifcmf257q"))))))