rewrite admin.scm

This commit is contained in:
Jean-François GUILLAUME 2022-12-13 15:35:59 +01:00
parent 854eb4590a
commit 14e35583b8
GPG key ID: 38751DAE145EFB5A

View file

@ -1,92 +1,77 @@
(define-module (glicid packages admin) (define-module (glicid packages admin)
#:use-module ((gnu packages admin) #:prefix gnu:) #:use-module ((gnu packages admin) #:prefix gnu:)
#:use-module (gnu packages base) #:use-module (gnu packages base)
#:use-module (gnu packages compression) #:use-module (gnu packages compression)
#:use-module (gnu packages cyrus-sasl) #:use-module (gnu packages cyrus-sasl)
#:use-module (gnu packages groff) #:use-module (gnu packages groff)
#:use-module (gnu packages hurd) #:use-module (gnu packages hurd)
#:use-module (gnu packages linux) #:use-module (gnu packages linux)
#:use-module (gnu packages openldap) #:use-module (gnu packages openldap)
#:use-module (gnu packages pkg-config) #:use-module (gnu packages pkg-config)
#:use-module (gnu packages tls) #:use-module (gnu packages tls)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix build-system python) #:use-module (guix build-system python)
#:use-module (guix download) #:use-module (guix download)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix utils) #:use-module (guix utils)
#:use-module (glicid packages python) #:use-module (glicid packages python)
) )
(define-public shadow (define-public shadow
(package (package
(inherit gnu:shadow) (inherit gnu:shadow)
(name "shadow") (name "shadow")
(version "4.11.1") (version "4.13")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (list (uri (list (string-append "https://github.com/shadow-maint/shadow/releases/download/v" version "/shadow-" version ".tar.xz")))
(string-append "https://github.com/shadow-maint/shadow/releases/download/v" version "/shadow-" version ".tar.xz") (sha256 (base32 "0b6xz415b4y3y5nk3pw9xibv05kln4cjbmhybyncmrx2g5fj9zls"))))))
))
(sha256 (base32 "15bwf2krh4crj4w2frkzw9pkxiwbq7h56m8wk8w5zbmjb3797w21"))
))
)
)
(define-public sudo (define-public sudo
(let* ((sudo-minimal gnu:sudo)) (let* ((sudo-minimal gnu:sudo))
(package (package
(inherit sudo-minimal) (inherit sudo-minimal)
(name (string-append (package-name sudo-minimal) "-with-ldap")) (name (string-append (package-name sudo-minimal) "-with-ldap"))
(arguments (arguments
(substitute-keyword-arguments (package-arguments sudo-minimal) (substitute-keyword-arguments (package-arguments sudo-minimal)
((#:configure-flags flags) ((#:configure-flags flags)
`(append (list `(append (list
"--enable-sasl" "--enable-sasl"
"--with-ldap" "--with-ldap"
"--enable-openssl" "--enable-openssl"
"--with-nsswitch") "--with-nsswitch")
,flags)))) ,flags))))
(inputs (modify-inputs (package-inputs sudo-minimal) (inputs (modify-inputs (package-inputs sudo-minimal)
(append openldap (append openldap
openssl openssl
cyrus-sasl))) cyrus-sasl)))
(native-inputs (modify-inputs (package-native-inputs sudo-minimal) (native-inputs (modify-inputs (package-native-inputs sudo-minimal)
(append pkg-config)))))) (append pkg-config))))))
(define-public ansible (define-public ansible
(package (package
(inherit gnu:ansible) (inherit gnu:ansible)
(name "ansible") (name "ansible")
(version "6.3.0") (version "6.3.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (pypi-uri name version)) (uri (pypi-uri name version))
(sha256 (base32 "09im4w38bm36arjxmi0jbdrmv6cgnjq4b5ks4kawhicdbb0rzynm")) (sha256 (base32 "09im4w38bm36arjxmi0jbdrmv6cgnjq4b5ks4kawhicdbb0rzynm"))))
)) (propagated-inputs (list ansible-core))))
(propagated-inputs (list ansible-core))
)
)
(define-public ansible-core (define-public ansible-core
(package (package
(inherit gnu:ansible-core) (inherit gnu:ansible-core)
(name "ansible-core") (name "ansible-core")
(version "2.13.3") (version "2.13.3")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (pypi-uri name version)) (uri (pypi-uri name version))
(sha256 (base32 "120rrpj8pqscdf2llipxxvpmg4fxqr3s0vx32f6hq77z60jh9igf")) (sha256 (base32 "120rrpj8pqscdf2llipxxvpmg4fxqr3s0vx32f6hq77z60jh9igf"))))
)) (arguments
(arguments `(
`( #:tests? #f
#:tests? #f #:phases
#:phases (modify-phases %standard-phases
(modify-phases %standard-phases (delete 'sanity-check))))))
(delete 'sanity-check)
)
)
)
)
)